|
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 C D E F G L M N O P R S T U V X p ½
Length: 3865472 (0x3afb80)
Description: Bits:30009663 Philips computer tape "600105"
Types: SimhTapContainer, ½" Magnetic Tape
| name | artifact |
|---|---|
| IBM3270 | «none» |
| IBM3270//OBJCT.OB | ⟦b6eb7d847⟧ pts_type |
| IBM3270/CTAB01.SC | ⟦6332fb376⟧ pts_type |
| IBM3270/DATDIV.SC | ⟦7ee696adb⟧ pts_type |
| IBM3270/DRDC25.SC | ⟦805267403⟧ pts_type |
| IBM3270/DW2501.SC | ⟦8564cfb3c⟧ pts_type |
| IBM3270/LIST.UF | ⟦239ea3f1a⟧ pts_type |
| IBM3270/M:PROC.UF | ⟦43f9de80a⟧ pts_type |
| IBM3270/NOIFLI.UF | ⟦5d2e5101a⟧ pts_type |
| IBM3270/PRT.SC | ⟦c9b2127f7⟧ pts_type |
| IBM3270/START.SC | ⟦410f2c9ca⟧ pts_type |
| IBM3270/TB3270.SC | ⟦e7c51f641⟧ pts_type |
| IBM3270/VDUPRT.SC | ⟦69c5527dc⟧ pts_type |
| INT:PROD | «none» |
| INT:PROD//OBJCT.OB | ⟦7a22a52d5⟧ pts_type |
| SAG | «none» |
| SAG//OBJCT.OB | ⟦d4293ea8b⟧ pts_type |
| SAG/ASM.LM | ⟦6be3e01a8⟧ pts_type |
| SAG/CCI.LM | ⟦5f8d9acc6⟧ pts_type |
| SAG/CPLGEN.LM | ⟦c47c4076b⟧ 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/DMPGEF.LM | ⟦05176f858⟧ pts_type |
| SAG/DMPGEN.LM | ⟦716dfe07b⟧ pts_type |
| SAG/DUMPA.LM | ⟦937c7e685⟧ pts_type |
| SAG/EDIT.LM | ⟦0bdc280ee⟧ pts_type |
| SAG/LED.LM | ⟦90e64be69⟧ pts_type |
| SAG/LKE.LM | ⟦35fb19e1e⟧ pts_type |
| SAG/M:PROC.UF | ⟦0de83974e⟧ pts_type |
| SAG/OBDIR.UF | ⟦eeb9c5cd8⟧ pts_type |
| SAG/OBX.LM | ⟦cdb6a5c8a⟧ pts_type |
| SAG/PCAS.LM | ⟦2833a2312⟧ pts_type |
| SAG/PDISC.LM | ⟦6794bb8c8⟧ pts_type |
| SAG/PMPTS.LM | ⟦9699a3ec0⟧ pts_type |
| SAG/PRDUMP.LM | ⟦1859c4a11⟧ pts_type |
| SAG/RUM.LM | ⟦066729252⟧ pts_type |
| SAG/SUM.LM | ⟦085d40662⟧ pts_type |
| SAG/SUP.LM | ⟦078190433⟧ pts_type |
| SAG/SUP600.LM | ⟦85a1f0fab⟧ pts_type |
| SAG/SUP60M.LM | ⟦5f1444ca9⟧ pts_type |
| SAG/SUP800.LM | ⟦6be374d07⟧ pts_type |
| SAG/SYSGEN.LM | ⟦1a3bedfa2⟧ pts_type |
| SAG/TLK.LM | ⟦5d9da5d34⟧ pts_type |
| SAG/TOSSUT.LM | ⟦93de6c66f⟧ pts_type |
| SAG/TRA.LM | ⟦1ee307c49⟧ pts_type |
| SAG/XRF.LM | ⟦7b8dd3a9b⟧ pts_type |
| SCREEN | «none» |
| SCREEN/SCREEN.SC | ⟦b092b6efd⟧ pts_type |
| SCREEN/SPDDIV.SC | ⟦3079ef484⟧ pts_type |
| SCREEN/SPLITT.SC | ⟦45511a8d9⟧ pts_type |
| SCREEN/STRINP.SC | ⟦559816e30⟧ pts_type |
| SCREEN/STROUT.SC | ⟦b7e52d60e⟧ pts_type |
| TOSSUTIL | «none» |
| TOSSUTIL//OBJCT.OB | ⟦f6531fb25⟧ pts_type |
| TOSSUTIL/CASCON.UF | ⟦f57955024⟧ pts_type |
| TOSSUTIL/CASCOP.LM | ⟦32dfed1a0⟧ pts_type |
| TOSSUTIL/CONF01.UF | ⟦6e36d89e1⟧ pts_type |
| TOSSUTIL/DUMENT.SC | ⟦71e51424f⟧ pts_type |
| TOSSUTIL/FLXCON.UF | ⟦3d37d6fbc⟧ pts_type |
| TOSSUTIL/FLXCOP.LM | ⟦d97362237⟧ pts_type |
| TOSSUTIL/FLXMON.LM | ⟦31993c5d3⟧ pts_type |
| TOSSUTIL/MON01.LM | ⟦e08d1344a⟧ pts_type |
| TOSSUTIL/MON02.LM | ⟦d6bf03744⟧ pts_type |
| TOSSUTIL/MONCOP.LM | ⟦31993c5d3⟧ pts_type |
| TOSSUTIL/OBDIR.UF | ⟦5fe4fe34b⟧ pts_type |
| TOSSUTIL/UTIL01.LM | ⟦e9099823d⟧ pts_type |
| TOSSUTIL/UTIL01.UF | ⟦a7937a09a⟧ pts_type |
| TOSSUTIL/UTIL02.LM | ⟦c374bb8cd⟧ pts_type |
| TOSSUTIL/UTIL02.UF | ⟦c0aabc60b⟧ pts_type |
| TOSSUTIL/UTIL03.LM | ⟦2480dcb02⟧ pts_type |
| TOSSUTIL/UTIL03.UF | ⟦e8a12321b⟧ pts_type |
| TOSSUTIL/UTIL04.LM | ⟦f1e72da3e⟧ pts_type |
| TOSSUTIL/UTIL04.UF | ⟦63178c242⟧ pts_type |
| TOSSUTIL/UTIL05.LM | ⟦9670a577e⟧ pts_type |
| TOSSUTIL/UTIL05.UF | ⟦d3790422d⟧ pts_type |
| TOSSUTIL/UTIL06.LM | ⟦a1bc1774d⟧ pts_type |
| TOSSUTIL/UTIL06.UF | ⟦18778d986⟧ pts_type |
| TOSSWORK | «none» |
| TOSSWORK//OBJCT.OB | ⟦970d61240⟧ pts_type |
| TOSSWORK/ADDMOD.SC | ⟦36a132ad1⟧ pts_type |
| TOSSWORK/CTABX.SC | ⟦49a9ecc16⟧ pts_type |
| TOSSWORK/DFTAB.SC | ⟦e9a9aa00e⟧ pts_type |
| TOSSWORK/DIVMOD.SC | ⟦d0dfaa260⟧ pts_type |
| TOSSWORK/DMBUF.SC | ⟦7c65e1f3b⟧ pts_type |
| TOSSWORK/DMFDB.SC | ⟦c2ba57834⟧ pts_type |
| TOSSWORK/DMINIT.SC | ⟦33cce9eb9⟧ pts_type |
| TOSSWORK/DMOPCL.SC | ⟦c523c31f0⟧ pts_type |
| TOSSWORK/DMSUBR.SC | ⟦d03dbe9b2⟧ pts_type |
| TOSSWORK/DMSUBX.SC | ⟦f6ab2f431⟧ pts_type |
| TOSSWORK/DMTASK.SC | ⟦a622c1612⟧ pts_type |
| TOSSWORK/DRCD01.SC | ⟦9e3d03891⟧ pts_type |
| TOSSWORK/DRDC07.SC | ⟦8a48cc276⟧ pts_type |
| TOSSWORK/DRDC13.SC | ⟦bfc632302⟧ pts_type |
| TOSSWORK/DRDC15.SC | ⟦154d579af⟧ pts_type |
| TOSSWORK/DRDC17.SC | ⟦51e73fb77⟧ pts_type |
| TOSSWORK/DRDC81.SC | ⟦106860e4d⟧ pts_type |
| TOSSWORK/DRDC82.SC | ⟦c96ad2787⟧ pts_type |
| TOSSWORK/DRDI01.SC | ⟦3fa237bdf⟧ pts_type |
| TOSSWORK/DRDN01.SC | ⟦991a6efd0⟧ pts_type |
| TOSSWORK/DRDU01.SC | ⟦8cfb309ca⟧ pts_type |
| TOSSWORK/DRDY01.SC | ⟦bcbe08c39⟧ pts_type |
| TOSSWORK/DRFD01.SC | ⟦95ac1a7aa⟧ pts_type |
| TOSSWORK/DRGP01.SC | ⟦d786adbd5⟧ pts_type |
| TOSSWORK/DRGP02.SC | ⟦5680a37c9⟧ pts_type |
| TOSSWORK/DRIC01.SC | ⟦5f086df34⟧ pts_type |
| TOSSWORK/DRKB01.SC | ⟦ac7a02ac9⟧ pts_type |
| TOSSWORK/DRKB03.SC | ⟦0b57f3d58⟧ pts_type |
| TOSSWORK/DRLP01.SC | ⟦8882d3ac5⟧ pts_type |
| TOSSWORK/DRLT01.SC | ⟦62a2e0b09⟧ pts_type |
| TOSSWORK/DRMS02.SC | ⟦b2864fabf⟧ pts_type |
| TOSSWORK/DRMT01.SC | ⟦a79511bdd⟧ pts_type |
| TOSSWORK/DRRT01.SC | ⟦87101d104⟧ pts_type |
| TOSSWORK/DRSOP1.SC | ⟦8ee8b23d4⟧ pts_type |
| TOSSWORK/DRSW01.SC | ⟦5be09445d⟧ pts_type |
| TOSSWORK/DRTC01.SC | ⟦57e9d7069⟧ pts_type |
| TOSSWORK/DRTP02.SC | ⟦4a01fcd5f⟧ pts_type |
| TOSSWORK/DRTP03.SC | ⟦7d1831293⟧ pts_type |
| TOSSWORK/DRTW01.SC | ⟦b2589d262⟧ pts_type |
| TOSSWORK/DSKSUB.SC | ⟦424b57e90⟧ pts_type |
| TOSSWORK/DSUMOD.SC | ⟦75ef3c956⟧ pts_type |
| TOSSWORK/DTTP03.SC | ⟦b9bd47866⟧ pts_type |
| TOSSWORK/DVTDI.SC | ⟦821bef7e7⟧ pts_type |
| TOSSWORK/DVTDN.SC | ⟦6c2719ee4⟧ pts_type |
| TOSSWORK/DVTDY.SC | ⟦3c39c30b7⟧ pts_type |
| TOSSWORK/DVTG1.SC | ⟦0107ae830⟧ pts_type |
| TOSSWORK/DVTGP.SC | ⟦11577f13d⟧ pts_type |
| TOSSWORK/DVTKB.SC | ⟦a83fce7c6⟧ pts_type |
| TOSSWORK/DVTT1.SC | ⟦3b7f47e52⟧ pts_type |
| TOSSWORK/DVTTP.SC | ⟦784111879⟧ pts_type |
| TOSSWORK/DW0701.SC | ⟦db92674e8⟧ pts_type |
| TOSSWORK/DW1301.SC | ⟦a1187d743⟧ pts_type |
| TOSSWORK/DW1501.SC | ⟦8a0227d11⟧ pts_type |
| TOSSWORK/DWII01.SC | ⟦c7effe2c9⟧ pts_type |
| TOSSWORK/DWIO01.SC | ⟦27faf8249⟧ pts_type |
| TOSSWORK/EBCDIC.SC | ⟦5ced23a64⟧ pts_type |
| TOSSWORK/FMTASK.SC | ⟦632bd69c9⟧ pts_type |
| TOSSWORK/LDTASK.SC | ⟦45cc13df4⟧ pts_type |
| TOSSWORK/LKMAL.SC | ⟦7b999bb4c⟧ pts_type |
| TOSSWORK/LRPINT.SC | ⟦0c3106e97⟧ pts_type |
| TOSSWORK/MONTAB.SC | ⟦9a9574e57⟧ pts_type |
| TOSSWORK/MONTIM.SC | ⟦70f9799cc⟧ pts_type |
| TOSSWORK/MPYMOD.SC | ⟦93784cc7e⟧ pts_type |
| TOSSWORK/MSUBS.SC | ⟦e5395e1d0⟧ pts_type |
| TOSSWORK/PFTAB.SC | ⟦73ece0531⟧ pts_type |
| TOSSWORK/SCLASS.SC | ⟦946f5f2d2⟧ pts_type |
| TOSSWORK/ST8000.SC | ⟦938591c7f⟧ pts_type |
| TOSSWORK/SYSLDA.SC | ⟦12580361a⟧ pts_type |
| TOSSWORK/SYSLDM.SC | ⟦b60c491e1⟧ pts_type |
| TOSSWORK/SYSLOD.SC | ⟦712fab8b6⟧ pts_type |
| TOSSWORK/SYSTAB.SC | ⟦55e9b729b⟧ pts_type |
| TOSSWORK/TABORT.SC | ⟦405ec8dd1⟧ pts_type |
| TOSSWORK/TCLASS.SC | ⟦84a66b4e0⟧ pts_type |
| TOSSWORK/TDISP.SC | ⟦144a4c281⟧ pts_type |
| TOSSWORK/TIMER.SC | ⟦f21d5d52a⟧ pts_type |
| TOSSWORK/TIODM.SC | ⟦10e4b4bc9⟧ pts_type |
| TOSSWORK/TIODMX.SC | ⟦e121b9d8b⟧ pts_type |
| TOSSWORK/TLDSEG.SC | ⟦a49c11802⟧ pts_type |
| TOSSWORK/TMMLKM.SC | ⟦553da68d9⟧ pts_type |
| TOSSWORK/TOSSFM.SC | ⟦3ff838167⟧ pts_type |
| TOSSWORK/TOSSIO.SC | ⟦7b50a0551⟧ pts_type |
| TOSSWORK/TPROC.SC | ⟦14a0d8064⟧ pts_type |
| TOSSWORK/TSWBLK.SC | ⟦202dc4d57⟧ pts_type |
| TOSSWORK/TTMJOB.SC | ⟦ffb9b4cd4⟧ 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=0x0196, f02=0x0010, f03=0x0008}
0x000000…000ca0 DirEnt {nam=»CCI «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0070, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»CSEG1 «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0090, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»CSEG2 «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0098, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»CSEG3 «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x00a8, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»CSEG4 «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x00b8, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»CSEG5 «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x00c0, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»LED «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x00e0, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»CSEG7 «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x00f0, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»CSEG8 «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x00f8, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»CSEG9 «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0108, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»CSEGA «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0110, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»CSEGB «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0118, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»CSEGC «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0120, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»CSEGD «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0128, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»CSEGE «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0130, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»PRDUMP«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0158, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»DMPGEN«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0170, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»XRF «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0178, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»DMPGEF«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0180, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»CPLGEN«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0188, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»SUP800«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0190, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»LKE «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x01d0, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»EDIT «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x01e8, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»M:PROC«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x02d8, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»SUM «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x02e8, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»RUM «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x02f8, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»DUMPA «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0310, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»OBX «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0338, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»PDISC «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0398, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»TOSSUT«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x03d8, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»PCAS «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0428, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»PMPTS «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0438, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»SUP600«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0478, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»ASM «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x04c8, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»TLK «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x04e8, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»TRA «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x1128, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»/OBJCT«, typ=»OB«, f00=0x0000, f01=0x0000, f02=0x05b8, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»SYSGEN«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0760, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»SUP60M«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x07c0, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»OBDIR «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x0800, f03=0x0000}
0x000000…000ca0 }
0x000ca0…000e34 (0, 1) Opaque[0x194]
0x000e34…000fc8 # DirEnt {nam=»SUP «, typ=»LM«, f00=0x019a, f01=0x0196, f02=0x0010, f03=0x0008}
0x000e34…000fc8 IdxSect {
0x000e34…000fc8 f00 = 0x0000 // 0xe34 @0x0
0x000e34…000fc8 f01 = 0x0018 // 0xe36 @0x2
0x000e34…000fc8 gno = [ // 0xe38 @0x4
0x000e34…000fc8 [0x00]: C0x0000.0x2.0
0x000e34…000fc8 [0x01]: C0x0000.0x3.0
0x000e34…000fc8 [0x02]: C0x0001.0x0.0
0x000e34…000fc8 [0x03]: C0x0001.0x1.0
0x000e34…000fc8 [0x04]: C0x0001.0x2.0
0x000e34…000fc8 [0x05]: C0x0001.0x3.0
0x000e34…000fc8 [0x06]: C0x0002.0x0.0
0x000e34…000fc8 [0x07]: C0x0002.0x1.0
0x000e34…000fc8 [0x08]: C0x0002.0x2.0
0x000e34…000fc8 [0x09]: C0x0002.0x3.0
0x000e34…000fc8 [0x0a]: C0x0003.0x0.0
0x000e34…000fc8 [0x0b]: C0x0003.0x1.0
0x000e34…000fc8 ]
0x000e34…000fc8 }
0x000fc8…00115c Dummy {f00=0x0000, f01=0x0190, f02=»l Nr8 # # #$ A~ X - _ H*f* + + ,0-T
0x00115c…0012f0 Dummy {f00=0x0000, f01=0x0190, f02=»
0x0012f0…001484 Dummy {f00=0x0000, f01=0x0190, f02=» l ( "D r !f9 : G p R $ $ %Z&>F E % 9 J DMC,MCGBHDB&WMC RYD RDD ASE0ABF PSF RSG & TY J- LP / TK M
0x001484…001618 Dummy {f00=0x0000, f01=0x0190, f02=» $ DK V DK 8 V P DK V DK ( V DK a ^ DK a 8DK ) a
0x001618…0017ac Dummy {f00=0x0000, f01=0x0190, f02=» ? ? ? ? ? ? ? Q~ & ? ? ? ? ? ? ? MX ? ? ? ? ? ? ? L 2b
0x0017ac…001940 Dummy {f00=0x0000, f01=0x0190, f02=» f l Z f Z f D Z
0x001940…001ad4 (0, 2) Dummy {f00=0x0000, f01=0x0190, f02=» Z V f R . Z | f ? ? ? ? ? ? ? _ ? ? ? ? ? ? ?
0x001ad4…001c68 Dummy {f00=0x0000, f01=0x0190, f02=» ? ? ? eX ? ? ? ? ? ? ? l eX j & L r 0 V |
0x001c68…001dfc Dummy {f00=0x0000, f01=0x0190, f02=» 6 6 6 6 6
0x001dfc…001f90 Dummy {f00=0x0000, f01=0x0190, f02=» 6 6
0x001f90…002124 Dummy {f00=0x0000, f01=0x0190, f02=» :
0x002124…0022b8 Dummy {f00=0x0000, f01=0x0190, f02=»
[…0x2…]
0x0025e0…002774 (0, 3) Dummy {f00=0x0001, f01=0x0190, f02=»
[…0x1…]
0x002908…002a9c Dummy {f00=0x0001, f01=0x0190, f02=» P
0x002a9c…002c30 Dummy {f00=0x0001, f01=0x0190, f02=»
[…0x1…]
0x002dc4…002f58 Dummy {f00=0x0001, f01=0x0190, f02=» *
0x002f58…0030ec Dummy {f00=0x0001, f01=0x0190, f02=»
[…0x2…]
0x003414…0035a8 Dummy {f00=0x0001, f01=0x0190, f02=» @
0x0035a8…00373c Dummy {f00=0x0001, f01=0x0190, f02=» A A R$ A A R A A R A @#" > > > > > > > > ? ? ? ? ? ? ? U ^ ( H ( P F" _ Q 4&? ?R _ 5 H _ ^ ;j >P @ * Q 9A D *P _ P A ( @ Q A ' A"T ( A A)F_ @ A
0x00373c…0038d0 Dummy {f00=0x0001, f01=0x0190, f02=» @ ? ? > "D P P Q P ! P @ $ H @ P W ( < JZ @ 9a:a R0 "Z Q Q" ?A <P @"N %J & _ ( _ _ 0 % JZ T @ W @ R (P& P (_ =a:a =A:A Z P Z _" TR @
0x0038d0…003a64 Dummy {f00=0x0001, f01=0x0190, f02=» @% L F" 0 JZ @ PR 0=a @ ?a RX @ ?a VN=A 0 ( P>P< , T T 1W 1W T )W )W ( , _ C ( _ 5 H A& A& A& A& A& A& A' A& ' ( D >a @ =a (@ D U@ x ',W U, @
0x003a64…003bf8 Dummy {f00=0x0001, f01=0x0190, f02=» B :a Y B R A& _ @& ' W4 @& A& ,Xp _ < @ A' A( A( A( A( A( A( ( =a @ >a V _ @ >a Y A' A' 4 T ' ( "^ 5 U P" @' @( @( @( @( @( @( ( @' x @& 8
0x003bf8…003d8c Dummy {f00=0x0001, f01=0x0190, f02=» @ !@ *V @ P @ X0 , *V A _< U` A)F @ , L ? ? , L L L L L L ? ? ? ? ? ? ? @" Px @ > > > > > > > ; [ [ [ [ [ [ > > [ [ A @" H" " ? A" >
0x003d8c…003f20 Dummy {f00=0x0001, f01=0x0190, f02=»? V :!9 V @ P R W ;A [ [ : _4 Pj T Pf V Q UF V Ud Q4P P 9A?A:AV R Z _ P*R R P ;A [ [ : V X"Z(_( L _P S
0x003f20…0040b4 (0, 5) Dummy {f00=0x0001, f01=0x0190, f02=»R _ ;A [ [ : # P| ' PL , ; R <a V 9A:A ; V ; V V W V < V < V H T P R ;H [ [ : _ T P ; R4 < S , _ _ W < R $ <A Q" T" U" :$ _ < Z& - W _ < <A9 R :a
0x0040b4…004248 Dummy {f00=0x0001, f01=0x0190, f02=» R Q ;H [ [ : " _J ? ? ? ? ? ? ? Q _ ^ ( H g& - W . W / X I I R P8 X RlP RrT Y Y W x Y Y $ 0T W W 6 X ? ? ? ? ? ? ? .^ 7 X #? P ? ? ? ? ? ? ? . 7 6 (@ 7P %
0x004248…0043dc Dummy {f00=0x0001, f01=0x0190, f02=»7 (@_~ 52X R Y _ X D $! TR ? ? ? ? ? ? ? /F 7 8 M ? ? ? ? ? ? ? /l 7 % > > > > > > > > ? ? ? ? ? ? ? / 7 P X 7^ 7v / 4 8 TRT X 5P 4 $ <A 52 Pl 52 X X X M M
0x0043dc…004570 Dummy {f00=0x0001, f01=0x0190, f02=»_ X X X U 5 X E _ X 4 Y 5 X 4 Y ! 1P, 0P +P Q Q W W Q Q R P Q 5 Y / ? ? ? ? ? ? ? 1 7 Qv 1& 4 " PF X Q< X P P ? ? ? ? ? ? ? 1X 7 (@ Y C^ X X X R
0x004570…004704 Dummy {f00=0x0001, f01=0x0190, f02=»1 7 > > > > > > > > 52R X X Q Y ( O` ? ? ? ? ? ? ? 2D 7 ? ? ? ? ? ? ? 2 7 (@ 7P ? ? ? ? ? ? ? 2z 7 2 4 X M X ! 40" P2 O` X ? ? ? ? ? ? ? 2 7 (@ C^ X 4Q W 9AY T Q P
0x004704…004898 Dummy {f00=0x0001, f01=0x0190, f02=» Qz 9AY Tn9ATj @3 D4 @3 $W 1 Y $ D ! P 2 Y 0 P :ET OFP OST Y Y X 5Z X M _d3 4 4 ABCDEFGHI JKLMNOPQR /STUVWXYZ 4 4$4*[.<(+^!$*);] ,%_>?" P X 2 ' Q X 4 X X R ( 5
0x004898…004a2c Dummy {f00=0x0001, f01=0x0190, f02=» A , DKP L X X L ! X L P L @ _ C C # ( _R _ _ _ _ _ X T 5b 4 X ! TH X X X T" $ :ET D OFT W OST X P % Y X R X 4 ! X Y T T Y Y
0x004a2c…004bc0 Dummy {f00=0x0001, f01=0x0190, f02=» X R 8 TYX WH H6 Y _8 X X: X R X ( _$ _* $ XtRX P Y _ A6 X X Y X Y _ $ P4R P6 X Q Y Y <dW Y W $ P R , _ X X*Y$ X X X6 Y Z(P A6 ZrP Y _8 _< _@ ! 4 $ X
0x004bc0…004d54 (0, 6) Dummy {f00=0x0001, f01=0x0190, f02=» > > > > > 7 V <a W X ' ?A q A82 > > > > > > > 80 , 0W 0T _ l P$ X X ] X * A8aJ " * - X ( 7P = V X X C^ X 4 L ! L % T< L P4 M ^ L X 4 _ ? ? ? ?
0x004d54…004ee8 Dummy {f00=0x0001, f01=0x0190, f02=»9J: 9l9l: : 9~9~9~9~: 9b9t < W* = W" < W ?: L :AR| M W M M 4 L T M M L PH=GV L L 4 9 M 2 ;6 M L 9G L 4 L M L M M L 4 : W M " A< L P L 9JR@ P P T A, 5 U P T Q P P
0x004ee8…00507c Dummy {f00=0x0001, f01=0x0190, f02=» L ' 7P P p Y "(@ P P $ M : P ( M P Q P P P W P T Q (@ L " A<(@ H H T A, E $ I 4P _ 5 % E (@ L 2 ( P _ 4 ) % ] M (@ L 2 A$ T!fR Q @!f] A,>
0x00507c…005210 Dummy {f00=0x0001, f01=0x0190, f02=» T V P T"W L >F A$ L & A$ < M 4 ; M L M L " P M < : M L M A< L ! PT L M L M L & P L E E M < : M M L L % T D V L ! P L ! XfWn L M L M M =0 : L :c:A L D
0x005210…0053a4 Dummy {f00=0x0001, f01=0x0190, f02=» D Q = M 2 < L L $:BV W $:AV M " M A L L $ M 0 D L U M " V L R L M ( M * M , L X L U M W > M 2 < L D L L 0U L 0 L (U L ( L L R $ 9 _ R $ 9 M , L M M
0x0053a4…005538 Dummy {f00=0x0001, f01=0x0190, f02=» L L , U A< L A$ L U ?X M 2 < L M $ L M & L L I P0% P L X =h P W P L X T M . L 9 M L A$ L L . Q L L L R 0 % _ M M L . P M . ? M 2 < L U @, M 2 < L
0x005538…0056cc Dummy {f00=0x0001, f01=0x0190, f02=»P0W" M L A$ @ M ( L U @ M 2 < L L ( E L % E L E L E M A M 2 < L P$ A< M 2 ;r M "W F" = JZW ( L 4 5 L L " C m M ^ U L ( L L ? ? ? ? ? ? ? A A H 4 R W 7
0x0056cc…005860 Dummy {f00=0x0001, f01=0x0190, f02=» d _ AB0 B AH 5 T6 @H P H BD BH BL BP BT @H AH AB0 ( 5 4 X _8 B P W M: B ( "^ B, B . L ER B H L L . Q L L L R 0 % _ M M L . P M . ? M 2 5 B J I B P
0x005860…0059f4 (0, 7) Dummy {f00=0x0002, f01=0x0190, f02=»D X W* 8 AD T AD D (@( 4 4 : 0 :R - Y PU,DNXX,STAT,RY C ;r 5 J ? B C 1P C Y _ @B RDP A P 8 FL B X X ! R V Y AD 8 TKP Y LPP MTP Y
0x0059f4…005b88 Dummy {f00=0x0002, f01=0x0190, f02=»B. 4 X X ? ? ? ? ? ? ? E. 7 _ 5 J B @ Q P P T Z B W P B $>H $ NOT W0 J @ ! $ T P Y B C C R ] B, 0 % E M 0AB CD ADDR @ 9a:a;a R R AF F AH
0x005b88…005d1c Dummy {f00=0x0002, f01=0x0190, f02=»U AE E lX E ( "^ F = JZ @ A @ !? $> A"T H _* 5 @H B @ A B, 0 JZ AG AG G ( "^ @ A ( C 5 @ 4 B P J _ 5 B, 5 J AG J R: P J R( G ( "^ G ^ @ T G (
0x005d1c…005eb0 Dummy {f00=0x0002, f01=0x0190, f02=»PP , X QD lX Hl Y , lX Hl Z H @H P : HV ` : B I lX _* AHB H> ( "^ : ; ;<A ' R `R Q QB _ QB <a : : : - A ~(@ A" AH A A A A AH AH AH a H @ ? ? > "D P :b
0x005eb0…006044 Dummy {f00=0x0002, f01=0x0190, f02=» @ @ @ @ Y Y Y Y " A "; V W # @ A AH @ ? ? > Q @ ? ? ? ? ? ? ? I F" @ P <a:a B :A : P6 $ R, Z R R Q $ :D P $ R ^& : B P R( AJH AJJ AJL AJN AJP AJR AJT
0x006044…0061d8 Dummy {f00=0x0002, f01=0x0190, f02=» ? JX ( < JZ B @ 9a:a R @ @J @"N %J '~ %J :EOS:EOV _* AHB H> ( AK< K> !? QM P ^ 52 V X 58 58 X AK AK0 AK2 KR @K@T AK@ !L PM !L L Q AK2P !L _ MF !L P Y !L !L AK2X _
0x0061d8…00636c Dummy {f00=0x0002, f01=0x0190, f02=»9C^ W| !L _ !L Wn !L _ K8 Y Y _ X r s W4 X @ _ W$ AW @W $W %W W !W W X 9d)` AKB AK0A T 7P 9CV * 9AV 9AV X 1P * 9EV )@ X Q6{ X Y Q& X $ :ET D OSP OVT * W * W Y AK0 Y 4 @K0J P Mj
0x00636c…006500 Dummy {f00=0x0002, f01=0x0190, f02=» :EOS:EOV ( < "$&1368 AM M !? QM P ^ 52 AN X AQ X AQ Q R x % =A Y X Y4 Z8 AM $ $ T D i M !Q. X "! T( !Q^ P Y " @M !? 1P P !Qb Y !P HN N N N N N N Q N Q(P P Q Q Q P P AQ !QV " P* AN
0x006500…006694 (0, 8) Dummy {f00=0x0002, f01=0x0190, f02=» D P X &Q Y W Y 4 X $;H D :ET $;H D OSP OVT W W !ON X ! P X 1P W @ X U W W W !ON X ! . @Wp !ON X ! Tb AW^ X P& T "P R Q W 8T Y W, W< O P6 4 X Q @Q Y _ X R Q @
0x006694…006828 Dummy {f00=0x0002, f01=0x0190, f02=» AP X 9c T DM EM 4 X B X :c HM % P^ !Qn_N !Qr !P _X !Qv_^ !Qf Y " !P _p M _ X # ;dC Y AM AM 7P AQ _ _ _( _, _0 _4 _8 _< _@ _D _H @M @M J P* P8 AQ X Q I -W ,A W @M ;I U @M M 4A @
0x006828…0069bc Dummy {f00=0x0002, f01=0x0190, f02=» C _: DL P H C _ P X( DD _Z :EOS :EOF 52 5J 5 @ !? ?R _ R 4 ' !? 0X A "! X6 @ Q P ^L_ P XP P R :AV L D I I "R (@(@ ^ :j >Z ^ @ P _ A $ M (@ M M M B
0x0069bc…006b50 Dummy {f00=0x0002, f01=0x0190, f02=» X M W M W y Y Y Y # C B 58 B 58 $? U P R Rx P R U8 RxP P| P Pv P $P &PN "P< /P :P ;P <P =P >P ?P 1 Rx 8 RxWv T W RrW T W Rl W W T W Wx
0x006b50…006ce4 Dummy {f00=0x0002, f01=0x0190, f02=» $ X _0 8 TCX< TKXB MTXH DYXN :EOS :EOF 52 5J 5 @ !? ?R _ R 4 ' !? 0X A "! X6 @ Q P ^L_ P XP P R :AV L D I I "R (@(@ ^ :j >Z ^ @ P _ A $ M (@ M M M B
0x006ce4…006e78 Dummy {f00=0x0002, f01=0x0190, f02=» X M W M W y Y Y Y # C B 58 B 58 $? P X0 X Y X ZL ZL B Y % ZL L P Y W* L % P M M M M Wx B % ?A ' B % B =e L P H Y H L X T $ T M W&
0x006e78…00700c Dummy {f00=0x0002, f01=0x0190, f02=» M X M @UXT L % P M W8 L " * AX - AX L " ! U$ ! Q L W X|W 8 X 7PM % ! R " T. L L X W L W L L X W L X AUXA M X W W =h C L % Ph L =c M B !?PN P6! TD C B <b $ !@ <B
0x00700c…0071a0 Dummy {f00=0x0002, f01=0x0190, f02=» B M Y k ` M T8 L T: P* M Y _vW C B % T L Z X Y M P* L P L 4 M L P <C M =C M XH Ut M Y B AUf X P P P P P P< a !a$ @U AUZ B T B @Uv )
0x0071a0…007334 (0, 9) Dummy {f00=0x0002, f01=0x0190, f02=» L ZN M V !a$ !aD a B P0 " T* B T$ B S @UZT !a$ @U AUZ ! P W a B <b :b ^ AU AUb AU`R8P AU AU` ! W" ! Q ! W ! P U ! ! _ P" Q Rj ! W` ! ! WN !
0x007334…0074c8 Dummy {f00=0x0002, f01=0x0190, f02=» @U` @U AU ! @UZ ! P W Y $ B Y a @U 9e L P| M !^ " P !^ " T M L Z M WL !^r @UZ ! P L P: !^ " T L @Uv HW& !^ " T L @V W M L Zl a T X $ P@ D R: P @UZ ! P !^* T D $ !_j @UZ ! T L
0x0074c8…00765c Dummy {f00=0x0002, f01=0x0190, f02=»UZ ! P !^ W !^ " P M L Z. a 4 !^h @UZ ! P !^ " T W$ !^ " P M L . a @V L 4 @U L " P $ AU^ 4 L :C* W W O Ux ^ YZ O Vt ^ YZ N~ V ^ YZ @U^:BWF Ux _ YZ Vt _ YZ ~ V _ YZ L
0x00765c…0077f0 Dummy {f00=0x0002, f01=0x0190, f02=» ) Y @Ud 4 X ? ? ? ? ? ? ? _ 7 P _ =b%0 X $ L <B<j P L 4 $ _ 4 L % T _ Yt_ L =AV: ` YtW L <AR A"R<B M P C M P C 4 X ` ` X % ` L % 4 L ? 4 P L !# Y Y L
0x0077f0…007984 Dummy {f00=0x0002, f01=0x0190, f02=» M F P D * ! T @Uh @Ud 4" X 4 !^ T M AU AU^ !^ 4 a Uv D TOT< D ( 1T2 B E 0 @UZ ! P !^ W !^ " P M L ZF a 4 YZ O Vt YZ N~ V ( 0 $ , c0 X Y X c B Y % c L
0x007984…007b18 Dummy {f00=0x0002, f01=0x0190, f02=» B M B M a a V 4 Y T T W _ 52 B < V < 58 L P :g: L :C ? L L M L M a R> a Q8 a R M M M M W M M M M y W _ @a P M WR Aa L " * Acg- Ac L " X ! Y M T(% T$ !
0x007b18…007cac Dummy {f00=0x0002, f01=0x0190, f02=»PD P@ P< P8 P4 eF !g B T B @a ) @a I @a I eF B P,9 Q$ B < R :A R V Q Aa Aa W eF V Aa Aa Aa X P< P P4 P M @a M M !f !d P @ W M @a M M !f !d e d
0x007cac…007e40 Dummy {f00=0x0002, f01=0x0190, f02=» X ? ? ? ? ? ? ? ev 7 P @a @a L T8 L Pj M e ? ? ? ? ? ? ? 7 X m M M WR L P2 M l e ? ? ? ? ? ? ? 7 X M M W f ? ? ? ? ? ? ? 7 X 7P =b%0 X $ L <B<j P L 4 $ _ L =AV L <AR
0x007e40…007fd4 (0, 10) Dummy {f00=0x0002, f01=0x0190, f02=» 7P < $ <C ! 9 4 @a 9C @a : 4 M a M !d eF 4 ^ @ T <j =h Qj P. ^ %x 8P F" X % !X %`X P % X. R" X>W % P T % XT <A P X^<a P @ p @ $ " P $^ F"
0x007fd4…008168 Dummy {f00=0x0002, f01=0x0190, f02=» j* > > aj* @j* E @j @j @j @j" @j$ @j& @j( j* Q (@ T W@ &_T@ H P P T ?f' W " H Wx " Wn & P >b& >AW >a& @T " X X T$W. " P X ` `T 8 P X 8 T" T" T
0x008168…0082fc Dummy {f00=0x0002, f01=0x0190, f02=» >" Hj, Aj4 T" T" T" T" T" T" " " " " " " " T" Aj4 > ?f' _ 8 @ T <j =h @ _ X X X X $ PjVj^jvkfk % P Y Y Y >% X P Y _" P" P& R| ^T Y _D _T X _ X _
0x0082fc…008490 Dummy {f00=0x0002, f01=0x0190, f02=»P Q X Q % _" Y Y Y 4 % X P Y $ W Y =D %_ X P V % P Y X XT Q _ j Q j 0DKER UNIT CYLD STAT k k 4 k l W2 k l X W$ k l W k ( X = 0
0x008490…008624 Dummy {f00=0x0002, f01=0x0190, f02=» M Y$ #? @ P R P T T T Y" P T _ X D D E E ] @ E @ mB ? ? > ? ? ? ? ? ? ? pb C ( "^ @p n U T " P " P @p W C "& # ( "^ A p @p @
0x008624…0087b8 Dummy {f00=0x0002, f01=0x0190, f02=» [ [ @ L ! P Y _ @ M ^ U > > > > > > >WZ A p ^ T " T0 ! P W SY SD AD _ ! P _, J _2 pb # C ( "^ P p p p p CCT I T P Q _, Apl
0x0087b8…00894c Dummy {f00=0x0002, f01=0x0190, f02=» "^ B P @ !? M @p P M L R ! _ PP I H P _ A l A A A @ ~ p: A ~ @pB A ~ @ r,( A~ A A "^ H (@_0 $ ( , 0 4 8 < pp T " P " P @ W C "& # ( "^ A p @ @
0x00894c…008ae0 Dummy {f00=0x0002, f01=0x0190, f02=» [ [ @ L ! P Y _ @ M ^ U > > > > > > >W A p ^ T " T ! P W SY SD AD _ ! P _, J _2 # C ( "^ P CCT I T DOS - PTS 600
0x008ae0…008c74 (0, 11) Dummy {f00=0x0003, f01=0x0190, f02=»@ M ^ U > > > > > > >W A p ^ T " T ! P W SY SD AD _ ! P _, J _2 # C ( "^ P CCT I T DOS - PTS 6000 REL. 10.0 sb
0x008c74…008e08 Dummy {f00=0x0003, f01=0x0012, f02=» # # 'x(p(x) ) )
0x008e08…008f9c Dummy {f00=0x0003, f01=0x0190, f02=» P IDENT INIMON < P* 781128 - B.VINK - PC1964 - SET BIT SY IN DCTHD $ L P* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * d P* . P* P860 DISK OPERATING SYSTEM P* P* B P*
0x008f9c…009130 Dummy {f00=0x0003, f01=0x0190, f02=»ING TO THE ^ P* 6 P* SYSTEM DISK ADDRESS P* X L P* SCANNING OF SYSTEM DIRECTORY , FIND CCI DISK ADDRESS b P* P* L P* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
0x009130…0092c4 Dummy {f00=0x0003, f01=0x0190, f02=» P EXTRN M:LDNX P EXTRN CVTSTB $ P EXTRN CPT D P EXTRN CVTMSZ b P EXTRN CVTBKA P EXTRN PCT61 P EXTRN T:DCT P EXTRN CVTSBA P
0x0092c4…009458 Dummy {f00=0x0003, f01=0x0190, f02=»ST A2,0 n P* P* 8 P* SUPERVISOR COMMUNICATION VECTOR EQUIVALENCE $ P* ` P* j P* t P* ~ P* P* 8 PCVEADR EQU /82 ADDR OF SUPERVISOR CVT P* . PCVEMSZ EQU 0 MEMORY S
0x009458…0095ec Dummy {f00=0x0003, f01=0x0190, f02=»CVESBA+2 BIGGEST BUFFER ADDR ~ 2 PCVEBKA EQU CVEBBA+2 BACKGROUND ADDR ( : PCVEDSP EQU CVEBKA+2 START ADDR OF DISPATCHER ^ 8 PCVEPLS EQU CVEDSP+2 BASIC PULSE FOR RTC 2 PCVEFCT EQU CVEDSP+6 FILE CODE TABLE
0x0095ec…009780 Dummy {f00=0x0003, f01=0x018e, f02=»CVEDCT+2 JOB PARAMETER TABLE ~ . PCVEBPL EQU CVEJPT+2 BUFFER POOL ( @ PCVELFT EQU CVEBPL+2 LOGICAL FILE DESCRIPTION TABLE Z < PCVEYAR EQU CVELFT+2 CURRENT YEAR, 2 ASCIL CHAR < PCVEMON EQU CVEYAR+2 CURRENT MONT
0x009780…009914 (0, 12) Dummy {f00=0x0003, f01=0x0190, f02=» ` @H ` " B !( 9 ! +b L * b dX B ,i p$ A j z dH&g S xzx j `@ ` `0 H q@% H @R z@u ` `@ : @ `H ja @ `H @ z@U x @ [ ` x d @8 U ! ` ` @Z @ @ ` @ @P ` `p ( ( ` @ ` `X ` @ X @ `
0x009914…009aa8 Dummy {f00=0x0003, f01=0x0190, f02=» @l p JGz S 3 f ` w @ 3 H! S d j Z S Q @ S H! 3 d 6 | @Bh ' 4 _{ N4`w l ` `PZ 4 P0 2 t0 ` @ c@ % @ @ bH @ @ D@ F ( C0 @ @ ` ` B @ ` d `[ `h C 4 4 @ ` @ { W E @ `P` E ` `X @Q ` E
0x009aa8…009c3c Dummy {f00=0x0003, f01=0x018e, f02=»CIEVED 7 2 P********************************************* 8 PADI120 EQU * 8 D P LDK A1,0 NEGATIVE RESPONSE 8 X P ST A1,DWTA4,A7 8 | P ABL INIDLE 8 P EJECT 8 0 P******************************************* 8 P* TCA BUSY 8 0 P******
0x009c3c…009dd0 Dummy {f00=0x0003, f01=0x0190, f02=» 8 l PADI900 EQU * 9 P LDR A2,A6 SAVE A6 9 P LDR A6,A7 9 6 P CF A15,TENDIO 9 H P LDR A6,A2 RESTORE A6 9 ^ P ABL LDISP GO TO DISPATCHER 9 | P EJECT 9 > P********************************************************** 9 P* 9 , P* DELAY RO
0x009dd0…009f64 Dummy {f00=0x0003, f01=0x018e, f02=»=2 NEGATIVE RESPONSE 9 P* : > P********************************************************** : ( PDELAYL LD* A2,4,A5 : j " P CF A5,ILABEL SET INPUT LABEL : P LDK A2,2 : P ADS A2,4,A5 : PDELAY EQU * : P LDK A2,0 : * P ST A2,READY,A6 CL
0x009f64…00a0f8 Dummy {f00=0x0003, f01=0x0190, f02=» : p P LDK A2,SYN ; P CF A5,WRITE ; P RB DEL100 ; 0 PDEL110 EQU * ; B P LDR A4,A2 ; V PDEL120 ADK A5,4 SKIP STACK ; h P ADK A4,0 SET CR ; P ABR* A5 ; P EJECT ; P* ; P* ; P* HALT INPUT SYLCU ; P* ; P* ; PHALTIN
0x00a0f8…00a28c Dummy {f00=0x0003, f01=0x0190, f02=» ; n P RTN A5 < P* < P* < " PHIDLE CF A5,HALTIN < , PINIDLE CF A5,READ < F P RB INIDLE < ` P EJECT < r P* < P* < P* DISCONNECT MODEMS < P* < P* < ( PDISCON LDR* A2,A6 GET DEVICE ADDRESS < . P ADKL A2,CIOH COMPUTE CI
0x00a28c…00a420 Dummy {f00=0x0003, f01=0x0190, f02=» < r PDISC20 HLT HALT INPUT SYLCU = P RTN A5 = , P* = < P* = F P* START OUTPUT SYLCU = P P* = l P* = v PSTOUT EQU * = " P LDR* A2,A6 GET DEVICE ADDRESS = P ADKL A2,CIOST = P ST A2,STO100 = P LDK A2,/60 = P INH = " PST
0x00a420…00a5b4 (0, 13) Opaque[0x194]
0x00a5b4…00a748 # DirEnt {nam=»CCI «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0070, f03=0x0000}
0x00a5b4…00a748 IdxSect {
0x00a5b4…00a748 f00 = 0x0003 // 0xa5b4 @0x0
0x00a5b4…00a748 f01 = 0x0008 // 0xa5b6 @0x2
0x00a5b4…00a748 gno = [ // 0xa5b8 @0x4
0x00a5b4…00a748 [0x00]: C0x0003.0x2.0
0x00a5b4…00a748 [0x01]: C0x0003.0x3.0
0x00a5b4…00a748 [0x02]: C0x0004.0x0.0
0x00a5b4…00a748 [0x03]: C0x0004.0x1.0
0x00a5b4…00a748 ]
0x00a5b4…00a748 }
0x00a748…00a8dc Dummy {f00=0x0003, 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
0x00a8dc…00aa70 Dummy {f00=0x0003, 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
0x00aa70…00ac04 Dummy {f00=0x0003, 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 $
0x00ac04…00ad98 Dummy {f00=0x0003, 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 #
0x00ad98…00af2c Dummy {f00=0x0003, 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
0x00af2c…00b0c0 Dummy {f00=0x0003, 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
0x00b0c0…00b254 (0, 14) Dummy {f00=0x0003, 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 * < (
0x00b254…00b3e8 Dummy {f00=0x0003, 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
0x00b3e8…00b57c Dummy {f00=0x0003, 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 _(
0x00b57c…00b710 Dummy {f00=0x0003, 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
0x00b710…00b8a4 Dummy {f00=0x0003, 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
0x00b8a4…00ba38 Dummy {f00=0x0003, 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
0x00ba38…00bbcc Dummy {f00=0x0003, 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
0x00bbcc…00bd60 Dummy {f00=0x0003, 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
0x00bd60…00bef4 (0, 15) Dummy {f00=0x0004, 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
0x00bef4…00c088 Dummy {f00=0x0004, 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
0x00c088…00c21c Dummy {f00=0x0004, 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
0x00c21c…00c3b0 Dummy {f00=0x0004, 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
0x00c3b0…00c544 Dummy {f00=0x0004, 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
0x00c544…00c6d8 Dummy {f00=0x0004, 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
0x00c6d8…00c86c Dummy {f00=0x0004, 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
0x00c86c…00ca00 Dummy {f00=0x0004, 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
0x00ca00…00cb94 (0, 16) Dummy {f00=0x0004, 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
0x00cb94…00cd28 Dummy {f00=0x0004, 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
0x00cd28…00cebc Dummy {f00=0x0004, 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
0x00cebc…00d050 Dummy {f00=0x0004, 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
0x00d050…00d1e4 Dummy {f00=0x0004, 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
0x00d1e4…00d378 Dummy {f00=0x0004, 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
0x00d378…00d50c Dummy {f00=0x0004, 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
0x00d50c…00d6a0 Dummy {f00=0x0004, 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
0x00d6a0…00d834 (0, 17) Opaque[0x194]
0x00d834…00d9c8 # DirEnt {nam=»CSEG1 «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0090, f03=0x0000}
0x00d834…00d9c8 IdxSect {
0x00d834…00d9c8 f00 = 0x0004 // 0xd834 @0x0
0x00d834…00d9c8 f01 = 0x0002 // 0xd836 @0x2
0x00d834…00d9c8 gno = [ // 0xd838 @0x4
0x00d834…00d9c8 [0x00]: C0x0004.0x2.0
0x00d834…00d9c8 ]
0x00d834…00d9c8 }
0x00d9c8…00db5c Dummy {f00=0x0004, 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
0x00db5c…00dcf0 Dummy {f00=0x0004, 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
0x00dcf0…00de84 Dummy {f00=0x0004, 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
0x00de84…00e018 Dummy {f00=0x0004, 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
0x00e018…00e1ac Dummy {f00=0x0004, 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&
0x00e1ac…00e340 Dummy {f00=0x0004, 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~
0x00e340…00e4d4 (0, 18) Opaque[0x194]
0x00e4d4…00e668 # DirEnt {nam=»CSEG2 «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0098, f03=0x0000}
0x00e4d4…00e668 IdxSect {
0x00e4d4…00e668 f00 = 0x0004 // 0xe4d4 @0x0
0x00e4d4…00e668 f01 = 0x0004 // 0xe4d6 @0x2
0x00e4d4…00e668 gno = [ // 0xe4d8 @0x4
0x00e4d4…00e668 [0x00]: C0x0004.0x3.0
0x00e4d4…00e668 [0x01]: C0x0005.0x0.0
0x00e4d4…00e668 ]
0x00e4d4…00e668 }
0x00e668…00e7fc Dummy {f00=0x0004, 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.
0x00e7fc…00e990 Dummy {f00=0x0004, f01=0x0190, f02=»WPW W P @P @T ` 2( _> F K V U 5 W R WrWpW Wl_v V R P V X V Q W R FWF V ] R W4 V P R W : V YPZ( V Y , R FW : W V W 2 P L 8 : EOV ON INPUT FILE,MOUNT NEW
0x00e990…00eb24 Dummy {f00=0x0004, f01=0x0190, f02=» 8 R @ : R W W W W W V R ' Q ' W 2 R WtWrWpW V W W V R^ ' QX V RR W b R WPWNWLWJWZ V | SC N N _ V | UF_ V U Q _ W W W W W < W V , X X P Rb T W A
0x00eb24…00ecb8 Dummy {f00=0x0004, f01=0x0190, f02=» V V V W _6 V W F ; V F F );A F ( R ?U ) Y ) ( T Y W V K V QD R W W W W W W V V V ' ] W _ V R _ WNWvWf V K > R W W W W C V C c l R WjW
0x00ecb8…00ee4c Dummy {f00=0x0004, f01=0x0190, f02=» 8 W 2 : LINE NUMBER INPUT FILE CAN NOT BE ASSIGNED OUTPUT NOT ASSIGNED W f R WVWTWRW W V ~ R WFWDWBW@ P4 1 ) R W"W W W 0 O : W W 8 : 00 W
0x00ee4c…00efe0 Dummy {f00=0x0004, 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 "
0x00efe0…00f174 (0, 19) Dummy {f00=0x0005, 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 *
0x00f174…00f308 Dummy {f00=0x0005, 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
0x00f308…00f49c Dummy {f00=0x0005, f01=0x0190, f02=» W (>a ( % P _ V % V % P _" ( % P _ P P _ A ( ` " PROGRAM NAME SECTOR STRT INIT ACTL DATE W
0x00f49c…00f630 Dummy {f00=0x0005, 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
0x00f630…00f7c4 Dummy {f00=0x0005, 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
0x00f7c4…00f958 Dummy {f00=0x0005, 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
0x00f958…00faec Dummy {f00=0x0005, 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
0x00faec…00fc80 Dummy {f00=0x0005, 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
0x00fc80…00fe14 (0, 20) Opaque[0x194]
0x00fe14…00ffa8 # DirEnt {nam=»CSEG3 «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x00a8, f03=0x0000}
0x00fe14…00ffa8 IdxSect {
0x00fe14…00ffa8 f00 = 0x0005 // 0xfe14 @0x0
0x00fe14…00ffa8 f01 = 0x0004 // 0xfe16 @0x2
0x00fe14…00ffa8 gno = [ // 0xfe18 @0x4
0x00fe14…00ffa8 [0x00]: C0x0005.0x1.0
0x00fe14…00ffa8 [0x01]: C0x0005.0x2.0
0x00fe14…00ffa8 ]
0x00fe14…00ffa8 }
0x00ffa8…01013c Dummy {f00=0x0005, f01=0x0190, f02=» * . W & R W W WDW W ^ 8 : _ _ $ _ !_ _& h_0 IDENT V 8 V /O W /LP /S V W : SC W R _ W>_~_ 4 # R _ W _ ( V X W V Z
0x01013c…0102d0 Dummy {f00=0x0005, f01=0x0190, f02=» : UF W _D F R, F T V LW W W R 4W W X N ! 4 V # R _* V 4 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
0x0102d0…010464 Dummy {f00=0x0005, 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
0x010464…0105f8 Dummy {f00=0x0005, 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
0x0105f8…01078c Dummy {f00=0x0005, 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
0x01078c…010920 Dummy {f00=0x0005, 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
0x010920…010ab4 (0, 21) Dummy {f00=0x0005, 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
0x010ab4…010c48 Dummy {f00=0x0005, 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
0x010c48…010ddc Dummy {f00=0x0005, 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
0x010ddc…010f70 Dummy {f00=0x0005, 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 @
0x010f70…011104 Dummy {f00=0x0005, 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
0x011104…011298 Dummy {f00=0x0005, 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
0x011298…01142c Dummy {f00=0x0005, 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
0x01142c…0115c0 Dummy {f00=0x0005, 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
0x0115c0…011754 (0, 22) Opaque[0x194]
0x011754…0118e8 # DirEnt {nam=»CSEG4 «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x00b8, f03=0x0000}
0x011754…0118e8 IdxSect {
0x011754…0118e8 f00 = 0x0005 // 0x11754 @0x0
0x011754…0118e8 f01 = 0x0002 // 0x11756 @0x2
0x011754…0118e8 gno = [ // 0x11758 @0x4
0x011754…0118e8 [0x00]: C0x0005.0x3.0
0x011754…0118e8 ]
0x011754…0118e8 }
0x0118e8…011a7c Dummy {f00=0x0005, 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
0x011a7c…011c10 Dummy {f00=0x0005, 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
0x011c10…011da4 Dummy {f00=0x0005, 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
0x011da4…011f38 Dummy {f00=0x0005, 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
0x011f38…0120cc Dummy {f00=0x0005, 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
0x0120cc…012260 Dummy {f00=0x0005, 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)
0x012260…0123f4 (0, 23) Opaque[0x194]
0x0123f4…012588 # DirEnt {nam=»CSEG5 «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x00c0, f03=0x0000}
0x0123f4…012588 IdxSect {
0x0123f4…012588 f00 = 0x0006 // 0x123f4 @0x0
0x0123f4…012588 f01 = 0x0008 // 0x123f6 @0x2
0x0123f4…012588 gno = [ // 0x123f8 @0x4
0x0123f4…012588 [0x00]: C0x0006.0x0.0
0x0123f4…012588 [0x01]: C0x0006.0x1.0
0x0123f4…012588 [0x02]: C0x0006.0x2.0
0x0123f4…012588 [0x03]: C0x0006.0x3.0
0x0123f4…012588 ]
0x0123f4…012588 }
0x012588…01271c Dummy {f00=0x0006, 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.
0x01271c…0128b0 Dummy {f00=0x0006, 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
0x0128b0…012a44 Dummy {f00=0x0006, 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 :
0x012a44…012bd8 Dummy {f00=0x0006, 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
0x012bd8…012d6c Dummy {f00=0x0006, 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 #
0x012d6c…012f00 Dummy {f00=0x0006, 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
0x012f00…013094 (0, 24) Dummy {f00=0x0006, 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
0x013094…013228 Dummy {f00=0x0006, 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
0x013228…0133bc Dummy {f00=0x0006, 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
0x0133bc…013550 Dummy {f00=0x0006, 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
0x013550…0136e4 Dummy {f00=0x0006, 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
0x0136e4…013878 Dummy {f00=0x0006, 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
0x013878…013a0c Dummy {f00=0x0006, 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
0x013a0c…013ba0 Dummy {f00=0x0006, 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 #
0x013ba0…013d34 (0, 25) Dummy {f00=0x0006, 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
0x013d34…013ec8 Dummy {f00=0x0006, 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
0x013ec8…01405c Dummy {f00=0x0006, 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
0x01405c…0141f0 Dummy {f00=0x0006, 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 :
0x0141f0…014384 Dummy {f00=0x0006, 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
0x014384…014518 Dummy {f00=0x0006, 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
0x014518…0146ac Dummy {f00=0x0006, 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
0x0146ac…014840 Dummy {f00=0x0006, 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
0x014840…0149d4 (0, 26) Dummy {f00=0x0006, 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
0x0149d4…014b68 Dummy {f00=0x0006, 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
0x014b68…014cfc Dummy {f00=0x0006, 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
0x014cfc…014e90 Dummy {f00=0x0006, 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:
0x014e90…015024 Dummy {f00=0x0006, 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
0x015024…0151b8 Dummy {f00=0x0006, 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
0x0151b8…01534c Dummy {f00=0x0006, 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
0x01534c…0154e0 Dummy {f00=0x0006, 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
0x0154e0…015674 (0, 27) Opaque[0x194]
0x015674…015808 # DirEnt {nam=»LED «, 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=» 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
0x01599c…015b30 Dummy {f00=0x0007, 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
0x015b30…015cc4 Dummy {f00=0x0007, 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
0x015cc4…015e58 Dummy {f00=0x0007, 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
0x015e58…015fec Dummy {f00=0x0007, 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.
0x015fec…016180 Dummy {f00=0x0007, 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
0x016180…016314 (0, 28) Dummy {f00=0x0007, 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 @ *
0x016314…0164a8 Dummy {f00=0x0007, 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
0x0164a8…01663c Dummy {f00=0x0007, 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
0x01663c…0167d0 Dummy {f00=0x0007, 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
0x0167d0…016964 Dummy {f00=0x0007, 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
0x016964…016af8 Dummy {f00=0x0007, 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
0x016af8…016c8c Dummy {f00=0x0007, 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
0x016c8c…016e20 Dummy {f00=0x0007, 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
0x016e20…016fb4 (0, 29) Opaque[0x194]
0x016fb4…017148 # DirEnt {nam=»CSEG7 «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x00f0, f03=0x0000}
0x016fb4…017148 IdxSect {
0x016fb4…017148 f00 = 0x0007 // 0x16fb4 @0x0
0x016fb4…017148 f01 = 0x0002 // 0x16fb6 @0x2
0x016fb4…017148 gno = [ // 0x16fb8 @0x4
0x016fb4…017148 [0x00]: C0x0007.0x2.0
0x016fb4…017148 ]
0x016fb4…017148 }
0x017148…0172dc Dummy {f00=0x0007, f01=0x0190, f02=» 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( _
0x0172dc…017470 Dummy {f00=0x0007, 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 _>
0x017470…017604 Dummy {f00=0x0007, 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
0x017604…017798 Dummy {f00=0x0007, 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
0x017798…01792c Dummy {f00=0x0007, 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
0x01792c…017ac0 Dummy {f00=0x0007, 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
0x017ac0…017c54 (0, 30) Opaque[0x194]
0x017c54…017de8 # DirEnt {nam=»CSEG8 «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x00f8, f03=0x0000}
0x017c54…017de8 IdxSect {
0x017c54…017de8 f00 = 0x0007 // 0x17c54 @0x0
0x017c54…017de8 f01 = 0x0004 // 0x17c56 @0x2
0x017c54…017de8 gno = [ // 0x17c58 @0x4
0x017c54…017de8 [0x00]: C0x0007.0x3.0
0x017c54…017de8 [0x01]: C0x0008.0x0.0
0x017c54…017de8 ]
0x017c54…017de8 }
0x017de8…017f7c Dummy {f00=0x0007, 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
0x017f7c…018110 Dummy {f00=0x0007, 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 > &
0x018110…0182a4 Dummy {f00=0x0007, 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
0x0182a4…018438 Dummy {f00=0x0007, 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
0x018438…0185cc Dummy {f00=0x0007, 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
0x0185cc…018760 Dummy {f00=0x0007, 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
0x018760…0188f4 (0, 31) Dummy {f00=0x0008, 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
0x0188f4…018a88 Dummy {f00=0x0008, 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
0x018a88…018c1c Dummy {f00=0x0008, 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
0x018c1c…018db0 Dummy {f00=0x0008, 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
0x018db0…018f44 Dummy {f00=0x0008, 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
0x018f44…0190d8 Dummy {f00=0x0008, 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*
0x0190d8…01926c Dummy {f00=0x0008, 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
0x01926c…019400 Dummy {f00=0x0008, 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
0x019400…019594 (0, 32) Opaque[0x194]
0x019594…019728 # DirEnt {nam=»CSEG9 «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0108, f03=0x0000}
0x019594…019728 IdxSect {
0x019594…019728 f00 = 0x0008 // 0x19594 @0x0
0x019594…019728 f01 = 0x0002 // 0x19596 @0x2
0x019594…019728 gno = [ // 0x19598 @0x4
0x019594…019728 [0x00]: C0x0008.0x1.0
0x019594…019728 ]
0x019594…019728 }
0x019728…0198bc Dummy {f00=0x0008, f01=0x0190, f02=» 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
0x0198bc…019a50 Dummy {f00=0x0008, 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
0x019a50…019be4 Dummy {f00=0x0008, 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
0x019be4…019d78 Dummy {f00=0x0008, 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
0x019d78…019f0c Dummy {f00=0x0008, 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
0x019f0c…01a0a0 Dummy {f00=0x0008, 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
0x01a0a0…01a234 (0, 33) Opaque[0x194]
0x01a234…01a3c8 # DirEnt {nam=»CSEGA «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0110, f03=0x0000}
0x01a234…01a3c8 IdxSect {
0x01a234…01a3c8 f00 = 0x0008 // 0x1a234 @0x0
0x01a234…01a3c8 f01 = 0x0002 // 0x1a236 @0x2
0x01a234…01a3c8 gno = [ // 0x1a238 @0x4
0x01a234…01a3c8 [0x00]: C0x0008.0x2.0
0x01a234…01a3c8 ]
0x01a234…01a3c8 }
0x01a3c8…01a55c Dummy {f00=0x0008, 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
0x01a55c…01a6f0 Dummy {f00=0x0008, 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
0x01a6f0…01a884 Dummy {f00=0x0008, 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
0x01a884…01aa18 Dummy {f00=0x0008, 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
0x01aa18…01abac Dummy {f00=0x0008, 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
0x01abac…01ad40 Dummy {f00=0x0008, 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
0x01ad40…01aed4 (0, 34) Opaque[0x194]
0x01aed4…01b068 # DirEnt {nam=»CSEGB «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0118, f03=0x0000}
0x01aed4…01b068 IdxSect {
0x01aed4…01b068 f00 = 0x0008 // 0x1aed4 @0x0
0x01aed4…01b068 f01 = 0x0002 // 0x1aed6 @0x2
0x01aed4…01b068 gno = [ // 0x1aed8 @0x4
0x01aed4…01b068 [0x00]: C0x0008.0x3.0
0x01aed4…01b068 ]
0x01aed4…01b068 }
0x01b068…01b1fc Dummy {f00=0x0008, 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
0x01b1fc…01b390 Dummy {f00=0x0008, 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
0x01b390…01b524 Dummy {f00=0x0008, 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 "
0x01b524…01b6b8 Dummy {f00=0x0008, 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
0x01b6b8…01b84c Dummy {f00=0x0008, 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 '
0x01b84c…01b9e0 Dummy {f00=0x0008, 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 :
0x01b9e0…01bb74 (0, 35) Opaque[0x194]
0x01bb74…01bd08 # DirEnt {nam=»CSEGC «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0120, f03=0x0000}
0x01bb74…01bd08 IdxSect {
0x01bb74…01bd08 f00 = 0x0009 // 0x1bb74 @0x0
0x01bb74…01bd08 f01 = 0x0002 // 0x1bb76 @0x2
0x01bb74…01bd08 gno = [ // 0x1bb78 @0x4
0x01bb74…01bd08 [0x00]: C0x0009.0x0.0
0x01bb74…01bd08 ]
0x01bb74…01bd08 }
0x01bd08…01be9c Dummy {f00=0x0009, 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
0x01be9c…01c030 Dummy {f00=0x0009, 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
0x01c030…01c1c4 Dummy {f00=0x0009, 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
0x01c1c4…01c358 Dummy {f00=0x0009, 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
0x01c358…01c4ec Dummy {f00=0x0009, 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 _
0x01c4ec…01c680 Dummy {f00=0x0009, 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 *
0x01c680…01c814 (0, 36) Opaque[0x194]
0x01c814…01c9a8 # DirEnt {nam=»CSEGD «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0128, f03=0x0000}
0x01c814…01c9a8 IdxSect {
0x01c814…01c9a8 f00 = 0x0009 // 0x1c814 @0x0
0x01c814…01c9a8 f01 = 0x0002 // 0x1c816 @0x2
0x01c814…01c9a8 gno = [ // 0x1c818 @0x4
0x01c814…01c9a8 [0x00]: C0x0009.0x1.0
0x01c814…01c9a8 ]
0x01c814…01c9a8 }
0x01c9a8…01cb3c Dummy {f00=0x0009, 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
0x01cb3c…01ccd0 Dummy {f00=0x0009, 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
0x01ccd0…01ce64 Dummy {f00=0x0009, 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
0x01ce64…01cff8 Dummy {f00=0x0009, 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
0x01cff8…01d18c Dummy {f00=0x0009, 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
0x01d18c…01d320 Dummy {f00=0x0009, 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
0x01d320…01d4b4 (0, 37) Opaque[0x194]
0x01d4b4…01d648 # DirEnt {nam=»CSEGE «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0130, f03=0x0000}
0x01d4b4…01d648 IdxSect {
0x01d4b4…01d648 f00 = 0x0009 // 0x1d4b4 @0x0
0x01d4b4…01d648 f01 = 0x000a // 0x1d4b6 @0x2
0x01d4b4…01d648 gno = [ // 0x1d4b8 @0x4
0x01d4b4…01d648 [0x00]: C0x0009.0x2.0
0x01d4b4…01d648 [0x01]: C0x0009.0x3.0
0x01d4b4…01d648 [0x02]: C0x000a.0x0.0
0x01d4b4…01d648 [0x03]: C0x000a.0x1.0
0x01d4b4…01d648 [0x04]: C0x000a.0x2.0
0x01d4b4…01d648 ]
0x01d4b4…01d648 }
0x01d648…01d7dc Dummy {f00=0x0009, 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 @
0x01d7dc…01d970 Dummy {f00=0x0009, 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
0x01d970…01db04 Dummy {f00=0x0009, 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 @
0x01db04…01dc98 Dummy {f00=0x0009, 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
0x01dc98…01de2c Dummy {f00=0x0009, 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 @
0x01de2c…01dfc0 Dummy {f00=0x0009, 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
0x01dfc0…01e154 (0, 38) Dummy {f00=0x0009, 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 @
0x01e154…01e2e8 Dummy {f00=0x0009, 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
0x01e2e8…01e47c Dummy {f00=0x0009, 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 @
0x01e47c…01e610 Dummy {f00=0x0009, 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
0x01e610…01e7a4 Dummy {f00=0x0009, 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 @
0x01e7a4…01e938 Dummy {f00=0x0009, 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
0x01e938…01eacc Dummy {f00=0x0009, 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 @
0x01eacc…01ec60 Dummy {f00=0x0009, 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
0x01ec60…01edf4 (0, 39) Dummy {f00=0x000a, 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 @
0x01edf4…01ef88 Dummy {f00=0x000a, 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
0x01ef88…01f11c Dummy {f00=0x000a, 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 @
0x01f11c…01f2b0 Dummy {f00=0x000a, 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
0x01f2b0…01f444 Dummy {f00=0x000a, 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 @
0x01f444…01f5d8 Dummy {f00=0x000a, 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
0x01f5d8…01f76c Dummy {f00=0x000a, 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 @
0x01f76c…01f900 Dummy {f00=0x000a, 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
0x01f900…01fa94 (0, 40) Dummy {f00=0x000a, 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 @
0x01fa94…01fc28 Dummy {f00=0x000a, 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
0x01fc28…01fdbc Dummy {f00=0x000a, 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 @
0x01fdbc…01ff50 Dummy {f00=0x000a, 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
0x01ff50…0200e4 Dummy {f00=0x000a, 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 @
0x0200e4…020278 Dummy {f00=0x000a, 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
0x020278…02040c Dummy {f00=0x000a, 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
0x02040c…0205a0 Dummy {f00=0x000a, 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 _
0x0205a0…020734 (0, 41) Dummy {f00=0x000a, 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
0x020734…0208c8 Dummy {f00=0x000a, 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
0x0208c8…020a5c Dummy {f00=0x000a, 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: @
0x020a5c…020bf0 Dummy {f00=0x000a, 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
0x020bf0…020d84 Dummy {f00=0x000a, 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
0x020d84…020f18 Dummy {f00=0x000a, 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
0x020f18…0210ac Dummy {f00=0x000a, 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
0x0210ac…021240 Dummy {f00=0x000a, 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
0x021240…0213d4 (0, 42) Opaque[0x194]
0x0213d4…021568 # DirEnt {nam=»PRDUMP«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0158, f03=0x0000}
0x0213d4…021568 IdxSect {
0x0213d4…021568 f00 = 0x000a // 0x213d4 @0x0
0x0213d4…021568 f01 = 0x0006 // 0x213d6 @0x2
0x0213d4…021568 gno = [ // 0x213d8 @0x4
0x0213d4…021568 [0x00]: C0x000a.0x3.0
0x0213d4…021568 [0x01]: C0x000b.0x0.0
0x0213d4…021568 [0x02]: C0x000b.0x1.0
0x0213d4…021568 ]
0x0213d4…021568 }
0x021568…0216fc Dummy {f00=0x000a, f01=0x0190, f02=» & A @ x D A D A D A D A @ @ @ @ W" @ T @ A A _< @ A @ A @ @ @ @ W $ | @ A A < @ FDT T T W R T T @
0x0216fc…021890 Dummy {f00=0x000a, f01=0x0190, f02=» @ _ @ @ T @ P ^ A @ z @ Pl @ x A x * @ @ @ T A @ |P @ ~T ^ @ A @ A @ T @ @ P ^ @ @ X | ` ^ D)hH P D >~ `" f >~ $ d p 4d @u { H
0x021890…021a24 Dummy {f00=0x000a, f01=0x0190, f02=»AST AREAEN REVLOP N DMP1 RET1 h NDLOC1 LOCEOF RET2 EXIT $ LOOP CASTST yERR yEOF DMP25 DMP3 > RET3 & RET6 8 DLLOOP Z JMP2 v RET4 OFLOP1 JMP1 RET5 , NUMEOF EOF1 OFLTST OFLOP2 $ C C ( : $ - -
0x021a24…021bb8 Dummy {f00=0x000a, f01=0x0190, f02=» @ 4 Y : T @ " p 0 5 0 P R D U M P REL 10.0 5 ==================== K 0 PRINTOUT OF MEMORY DUMP FROM F L E X I B L E - DISC
0x021bb8…021d4c Dummy {f00=0x000a, f01=0x0190, f02=»E EDITDT EDLOOP DATFLD SLASK CVALOP TIMFLD DAYLOP > TITWRT f NEWMOV Z TXTCAS CASFLX R TITECB TITLNO TITTAB TITLOP t PRTR TXT1 TXT6 TXT7 TXT11 " TXT9 p TXT10 9 $ Y :0123456789ABCDEF
0x021d4c…021ee0 Dummy {f00=0x000a, f01=0x0190, f02=» - f ( : r P XLOOP HEXDIG LINE t NILOC WXLOOP WXL001 ( WALOOP < WADOT J WASCR L LINECB f PRTFC @ TKT D E ~ ^ @ j A j T l( :
0x021ee0…022074 (0, 43) Dummy {f00=0x000b, f01=0x0190, f02=» C A S E T T E ADDPAG @ NEWMOV 4 TXTCAS PAGTXT x PAGENO j PNOFLD PAGECB l SPAECB PRTR SPATXT ; ; ; ; ; ; R Q @ - WL @ - A R* X R X _ Q @ X" A T - _0 D - Z
0x022074…022208 Dummy {f00=0x000b, f01=0x0190, f02=» J 6 @ NOP YE , @ S P _8 A ~ A : $ J 6 @ NOT@ A A A A @ |T A @ ~P A A zW YE l @ S v A z A x A z @ z @ U d WJ @ z _ T J J
0x022208…02239c Dummy {f00=0x000b, f01=0x0190, f02=» !00T !00T @ ~P @ @ !00P !00P @ W x S @ 9H @ @ :H @ $Wf S @ WR S @ 9H @ @ :H @ $W4 S R R R R W r @ x A x A A A A A A A A A A C C ( @ $
0x02239c…022530 Dummy {f00=0x000b, f01=0x0190, f02=» C C ( : I : @ FDP 8 ( J 6 @ YE : @ S D A G T :R Q Z [ Z [ : R W U Z [ : A L 0R 4V 0 Z [ : A A " L 0R,
0x022530…0226c4 Dummy {f00=0x000b, f01=0x0190, f02=» CASETTE: E1; FLOPPY: F4 - F7; ANSWER 00000-FFFFF D f * D ANSWER NOT 11 CHARACTERS &IF AREA 1 ANSWER CAN NOT BE ONLY "CR" 6:TH CHARACTER NOT A HYPHEN "-" ,IF ONE SIDE ENDADR MUST BE LESS THEN 0FFFF .IF ONE SIDE STARTADR MUST BE LESS
0x0226c4…022858 Dummy {f00=0x000b, f01=0x0190, f02=»F STARTADR NOT HEXADECIMAL ENDADR NOT HEXADECIMAL ENDADR LESS THEN STARTADR : R W 6 0PRDUMP REL 10.0 DATE 80.03.14 12NC=8701 359 41000 # SELECTIO
0x022858…0229ec Dummy {f00=0x000b, f01=0x0190, f02=» SIDE1 (0-63K) ? INSERTED SIDE2 ? A ( A * @ A 8 , ! T ( @ * 8 , @ * P 8 , @ ( A ( A * @ FDP 1 ( V , @ (& T ( n @ * T 4 -
0x0229ec…022b80 Dummy {f00=0x000b, f01=0x0190, f02=» Z , : HEX 0END OF PRDUMP 0FINIS. ( 0THERE WAS BLOCKS/SECTORS IN DUMP. 0XX ERROR STATUS WORD: 0 0INPUT-DEVICE MUST BE CASSETTE OR FLEXIBLE-DISC NOT OPERABLE D 0REQUESTE
0x022b80…022d14 (0, 44) Dummy {f00=0x000b, f01=0x0190, f02=» FDP @ C ( A @ T A A @ FDT THW RB _^ @ FDP @ C ( A @ T A A W W : @ T` B @ FDT P W V A ( @ C @ FDP ( @ A @
0x022d14…022ea8 Dummy {f00=0x000b, f01=0x0190, f02=» ( : J 6 @ ? T n_< D @ T$ D - - - D - : D :_zE1TK F4FD F5FD F6FD F7FD FILECODE: ASSETTE OR FLEXIBLE-DISC NOT OPERABLE D 0REQUESTE
0x022ea8…02303c Dummy {f00=0x000b, f01=0x0190, f02=» FDP @ C ( A @ T A A @ FDT T W R _^ @ ( A @ T A A W W : @ T B @ FDT P W V A ( @ C @ FDP ( @ A @
0x02303c…0231d0 Dummy {f00=0x000b, f01=0x0190, f02=»ASKFL QE1 QF4 QF5 QF6 QF7 ECBFC ECBBA ECBRL ECBEL ECBRC ECBCW1 ECBCW2 BUFF1 INLOOP INLAST SECTOR NILOC1 CTEST1 INEOF yOK1 NILOC2 INRTN * LASTBU EOFCND GETRTN CTEST2 ` WAIT j ERR2 d NILOC3 REWRTN
0x0231d0…023364 Dummy {f00=0x000b, f01=0x0190, f02=»1 LINK1 BUFF2 BUF2 LINK2 T A A @ FDT T W R _^ @ ( A @ T A A W W : @ T B @ FDT P W V A ( @ C @ FDP ( @ A @
0x023364…0234f8 Dummy {f00=0x000b, f01=0x0190, f02=»CTER p P SLL A1,8 ( P LC A1,SELBUF+8 GET THIRD CHARACTER ( P LC A2,SELBUF+9 GET FOURTH CHARACTER J P SLL A2,8 v ( P LC A2,SELBUF+/A GET FIFTH CHARACTER 4 P CF A14,HXBIN2 CONVERSION FROM STRING TO BINARY & P RF SERR9 ERROR RETURN FROM
0x0234f8…02368c Dummy {f00=0x000b, f01=0x018e, f02=» LD A1,0,A12 GET FIRST PART OF START ADDRESS . P LD A2,4,A12 GET FIRST PART OF END ADDRESS 4 " P CF A14,ADCMP1 COMPARE ADDRESS f 0 P LD A1,2,A12 GET SECOND PART OFSTART ADDRESS , P LD A2,6,A12 GET SECOND OF END ADDRESS $ P CF A14,ADCMP2 COMPARE A
0x02368c…023820 Dummy {f00=0x000b, f01=0x0190, f02=» 0 P* INCREMENT POINTER TO ADDRESS-FIELD TABLE, ( P* AND GO TO SELECTION OF NEXT AREA. 8 P* d P LD A1,TABREF n P ADK A1,8 P ST A1,TABREF P ABL SELLOP P EJECT P* . P* SUBROUTINE TO PRINT A LINE TO TELL WHAT &
0x023820…0239b4 (0, 45) Opaque[0x194]
0x0239b4…023b48 # DirEnt {nam=»DMPGEN«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0170, 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.0x2.0
0x0239b4…023b48 ]
0x0239b4…023b48 }
0x023b48…023cdc Dummy {f00=0x000b, f01=0x0190, f02=» ( d ( d ( d ( d ( d( d ( ( B T `T : f 0 T T B P D D W* B P 0 0
0x023cdc…023e70 Dummy {f00=0x000b, f01=0x0190, f02=» 4c @S{ D d 2Z $"z y B % y D Dbf d j 0TK ERROR 6 0DMPGEN REL 10.0 DATE 80.03.14 12NC=8701 361 41000 WRITE PROTECTED NOT OPERABLE STATUS WORD: $ A. A
0x023e70…024004 Dummy {f00=0x000b, f01=0x0190, f02=» V @ W @ A @ @ UU A @ T P A x _ W _ K _ A K : T `T : B P W B UU
0x024004…024198 Dummy {f00=0x000b, f01=0x018c, f02=» PDUMP80 SST A3,CHCR * P RB(NA) DUMP60 TRY OTR IF NOT ACCEPTED " P P & PERRORD LDK A1,/02 IND ERROR ON SOP X P RB DUMP10 P P* ( P* EXCOM SUBR TO EXECUTE CHCR COMMAND P* P PEXCOM CIO A1,1,CHCR P SST A3,
0x024198…02432c Dummy {f00=0x000b, f01=0x2008, f02=» DUMP80 SST A3,CHCR * P RB(NA) DUMP60 TRY OTR IF NOT ACCEPTED " P P & PERRORD LDK A1,/02 IND ERROR ON SOP X P RB DUMP10 P P* ( P* EXCOM SUBR TO EXECUTE CHCR COMMAND P* P PEXCOM CIO A1,1,CHCR P SST A3,
0x02432c…0244c0 Dummy {f00=0x000b, f01=0x018e, f02=»YS SET TO 1 BY DRIVER DRTC02 TO INDICATE I/O-ERROR, AND @ P* BITS 2-15 ARE THE EXACT BIT-CONFIGURATION RETURNED BY THE @ P* CASSETTE HARDWARE. P* P EJECT P* > P* CASSETTE SOFTWARE-STATUS BITS, RETURNED BY DRIVER DRTC02 P*
0x0244c0…024654 (0, 46) Opaque[0x194]
0x024654…0247e8 # DirEnt {nam=»XRF «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0178, 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.0x3.0
0x024654…0247e8 ]
0x024654…0247e8 }
0x0247e8…02497c Dummy {f00=0x000b, f01=0x0190, f02=» | 8 P 4I w x b # g $ ^ : 9 i $ 7 f w x4r tV u ' qC ~5 * zuqV $ # > P ZD k c r Px oV iX % 5Zf Q > - @ $ ' 4` 1P X-8 T ~ n tB l Tg t z ^ X lBZB H X2 Z j{ z
0x02497c…024b10 Dummy {f00=0x000b, f01=0x0190, f02=» RLINES INPUT. 1XRF 10.1 CROSS REFERENCE LISTING OF MODULE: &&&&&& DATE: YYMMDD PAGE: 0 SYMBOL DEF REFERENCES NO MORE SPACE AVAILABLE 0RESTARTED AFTER MEMORY OVERFLOW r P jW ( R ( @ R$ # X"
0x024b10…024ca4 Dummy {f00=0x000b, f01=0x0190, f02=» PP< _ (' X )R X*_ (" X, E PP _ D # P : @ ( ? (T , ) , ( T ( )T ) P 4 @ ( T ( T A @ ( :ENTR EEXTR@ XEXT @ XEND ` S A > @ ( *P H ( CT A > (
0x024ca4…024e38 Dummy {f00=0x000b, f01=0x0190, f02=»Y$ Y0 Pl P, ^< Q _( W @ 7 @ 7 @ @ W 7 : V * J R ` K W _. @ _N !A Z^ !Z Yd R ) 0 !' Xv ! P !, P !
0x024e38…024fcc Dummy {f00=0x000b, f01=0x0190, f02=» EN . T 8 ! > *_H ! P . A < A @ B ! P *_ ! ( P @ >Q *W ! X` 0 ! Xj_ !' T ! X| !, X" !+ X( !- X. 0_ F( C R8Q> F l C (
0x024fcc…025160 Dummy {f00=0x000b, f01=0x0190, f02=» A . D @ V " @ A W 6 A A & R Q T W@ *** + V ` P 9j D ' . R Q + G Tn @ < 0 A @ z A $ F( @ P A H " A J F( A H C ( @ x' U
0x025160…0252f4 (0, 47) Opaque[0x194]
0x0252f4…025488 # DirEnt {nam=»DMPGEF«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0180, f03=0x0000}
0x0252f4…025488 IdxSect {
0x0252f4…025488 f00 = 0x000c // 0x252f4 @0x0
0x0252f4…025488 f01 = 0x0002 // 0x252f6 @0x2
0x0252f4…025488 gno = [ // 0x252f8 @0x4
0x0252f4…025488 [0x00]: C0x000c.0x0.0
0x0252f4…025488 ]
0x0252f4…025488 }
0x025488…02561c Dummy {f00=0x000c, f01=0x0190, f02=» L ( ( ( J @ ? T ^_< D @ T D -W D $_d ( @ " Pf $ @ ( @ 4 ( 4 @ " P ( 4 ( $ C C
0x02561c…0257b0 Dummy {f00=0x000c, f01=0x0190, f02=» $ ( ( : FLOPPY: FD1 - FD4 n $ @ 4Z wL a [ ? d d% L & "~ T &b CCn 1 d J < R:R: ` 0FL ERROR 6 0DMPGEF REL 10.0 DATE 80.03.14 12NC=8701 376
0x0257b0…025944 Dummy {f00=0x000c, f01=0x0190, f02=» l ~ UU ' &P _ A. A I. L A 9 Z F. " :D # P& W W t W t W W W W W Th T TRWH ) T _ r v A T L :L W A 8B Tt A L : @ @
0x025944…025ad8 Dummy {f00=0x000c, f01=0x0190, f02=» &b CCn 1 d J < R:R: ` 0FL ERROR 6 0DMPGEF REL 10.0 DATE 80.03.14 12NC=8701 376
0x025ad8…025c6c Dummy {f00=0x000c, f01=0x018e, f02=»NUMBER (LEAST SIGNIFICANT BIT) P* BIT 10: RETRY & P* BIT 11: PROGRAM ERROR > P* BIT 12: INCORRECT LENGTH ^ P* BIT 13: DATA FAULT P* BIT 14: ZERO P* BIT 15: NOT OPERABLE DRIVE P* P* H P*SIGNIFICANT BITS IN STATUS RE
0x025c6c…025e00 Dummy {f00=0x000c, f01=0x018e, f02=» 6 PDUMPFD EQU * FIRST BYTE TO BE LOADED BY BOOTSTRAP * P DATA ' ' UNUSED DISC-FORMAT BYTES > P l PEXEC EQU * START ADDRESS t P LDR A13,P PROGRAM POINTER PBASE EQU * 4 P SUKL A13,BASE-DUMPFD A13:= DUMPFD START ADDRESS P P
0x025e00…025f94 (0, 48) Opaque[0x194]
0x025f94…026128 # DirEnt {nam=»CPLGEN«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0188, f03=0x0000}
0x025f94…026128 IdxSect {
0x025f94…026128 f00 = 0x000c // 0x25f94 @0x0
0x025f94…026128 f01 = 0x0002 // 0x25f96 @0x2
0x025f94…026128 gno = [ // 0x25f98 @0x4
0x025f94…026128 [0x00]: C0x000c.0x1.0
0x025f94…026128 ]
0x025f94…026128 }
0x026128…0262bc Dummy {f00=0x000c, f01=0x0190, f02=» L f N( N ( N Z( N ( N( B T `T : ~ f ~ r f r Z( ( $ C C ( : 9 $ Y :0123456789ABCDEF ^ lFZF H 2 Z j z
0x0262bc…026450 Dummy {f00=0x000c, f01=0x0190, f02=» 0TK ERROR 4 0CPLGEN REL 10.0 DATE 80.03.14 12NC=8701 363 41000 STATUS WORD: [ A P UU x ' &P _ B A. R:R: ` T l` % l` ;d# A I T P^ 1 I T: P 0V W XB X"9A_
0x026450…0265e4 Dummy {f00=0x000c, f01=0x0190, f02=» & P* CASSETTE STATUS BITS. GENERAL. P* . 6 P* HARDWARE STATUS IS RETURNED BY DRIVER DRTC02 IF 8 H P* AT LEAST ONE OF THE STATUS BITS 6, 12-15, RETURNED BY THE CASSETTE r 8 P* HARDWARE, IS SET TO 1, THUS INDICATING I/O-ERROR, : P* ELSE I/O IS
0x0265e4…026778 Dummy {f00=0x000c, f01=0x0190, f02=»S, r P* RETURNED BY DRIVER DRTC02 P* . P* BIT 0: 1 8 P* BIT 1: ZERO L P* BIT 2: BOT MISSING b P* BIT 3: TAPE-MARK DETECTED P* BIT 4: NO DATA/ERASED P* BIT 5: BOT/EOT-HOLE P* BIT 6: WRITE PROTECTED P* BI
0x026778…02690c Dummy {f00=0x000c, f01=0x018e, f02=»11: ZERO P* BIT 12: INCORRECT LENGTH P* BIT 13: CRC-ERROR 2 P* BIT 14: THROUGHPUT ERROR N P* BIT 15: NOT OPERABLE p P* P* @ P* IN HARDWARE STATUS,RETURNED BY DRIVER DRTC02, BIT ZERO IS B P* ALWAYS SET TO 1 BY DRIVER DRTC02
0x02690c…026aa0 Dummy {f00=0x000c, f01=0x0190, f02=» P EJECT P* > P* CASSETTE SOFTWARE-STATUS BITS, RETURNED BY DRIVER DRTC02 P* b P* BIT 0: ZERO l P* BIT 1: ZERO P* BIT 2: ZERO P* BIT 3: ZERO P* BIT 4: ZERO P* BIT 5: ZERO P* BIT 6: ZERO P*
0x026aa0…026c34 (0, 49) Opaque[0x194]
0x026c34…026dc8 # DirEnt {nam=»SUP800«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0190, f03=0x0000}
0x026c34…026dc8 IdxSect {
0x026c34…026dc8 f00 = 0x000c // 0x26c34 @0x0
0x026c34…026dc8 f01 = 0x0010 // 0x26c36 @0x2
0x026c34…026dc8 gno = [ // 0x26c38 @0x4
0x026c34…026dc8 [0x00]: C0x000c.0x2.0
0x026c34…026dc8 [0x01]: C0x000c.0x3.0
0x026c34…026dc8 [0x02]: C0x000d.0x0.0
0x026c34…026dc8 [0x03]: C0x000d.0x1.0
0x026c34…026dc8 [0x04]: C0x000d.0x2.0
0x026c34…026dc8 [0x05]: C0x000d.0x3.0
0x026c34…026dc8 [0x06]: C0x000e.0x0.0
0x026c34…026dc8 [0x07]: C0x000e.0x1.0
0x026c34…026dc8 ]
0x026c34…026dc8 }
0x026dc8…026f5c Dummy {f00=0x000c, f01=0x0190, f02=»S >Y 2 :7 &| _ <~
0x026f5c…0270f0 Dummy {f00=0x000c, f01=0x0190, f02=»
0x0270f0…027284 Dummy {f00=0x000c, f01=0x0190, f02=» S $ l ~ / 1(> B:! 0!p"T=@<J !$/ AXDM9 MC= HD8 WM9^RY:rRD:rAS; AB= PS=*RS=x & TY J& LP ( DK K
0x027284…027418 Dummy {f00=0x000c, f01=0x0190, f02=» DK ) ER T ? ? ? ? ? ? ? ' ? ? ? ? ? ? ? ) Z , Z b
0x027418…0275ac Dummy {f00=0x000c, f01=0x0190, f02=» Z L f : Z r f p ? ? ? ? ? ? ? P ? ? ? ? ? ? ? F P ? ? ? ? ? ? ? H ? ? ? ?
0x0275ac…027740 Dummy {f00=0x000c, f01=0x0190, f02=» r & L 6 6
0x027740…0278d4 (0, 50) Dummy {f00=0x000c, f01=0x0190, f02=» 6 6 6 6
0x0278d4…027a68 Dummy {f00=0x000c, f01=0x0190, f02=»
[…0x4…]
0x0280b8…02824c Dummy {f00=0x000c, f01=0x0190, f02=» 6
0x02824c…0283e0 Dummy {f00=0x000c, f01=0x0190, f02=»
0x0283e0…028574 (0, 51) Dummy {f00=0x000d, f01=0x0190, f02=»
[…0x3…]
0x028a30…028bc4 Dummy {f00=0x000d, f01=0x0190, f02=» L
0x028bc4…028d58 Dummy {f00=0x000d, f01=0x0190, f02=»
[…0x1…]
0x028eec…029080 Dummy {f00=0x000d, f01=0x0190, f02=» @ _ ? ? ? ? ? ? ? A R2 @ A A R$ A A R A A R A @ 8 > > > > > > > > ? ? ? ? ? ? ? U ^ ( H ( P <~ _ Q
0x029080…029214 (0, 52) Dummy {f00=0x000d, f01=0x0190, f02=»% _ @ A ^ 9j ?R > > > > > > > A @ E E E E E E > > a @ E @ ? ? > P P Q P ! P @ ! ? @ P W $ < @ @ 9a:a R0 Q Q" ?A <P @
0x029214…0293a8 Dummy {f00=0x000d, f01=0x0190, f02=» @ ;a=a R W* @ =a Z ;a RP ) i " E $ @ ;a=a R @ =a V ;A , P = - - _F @" L <~ 0 @ @ PR 0=a @ ?a RX @ ?a VN=A 0 ( P>P< , T T 1W 1W T )W )W ( , _ C
0x0293a8…02953c Dummy {f00=0x000d, f01=0x0190, f02=»W U, @" x # W @" A" ,P$ _: @" @" @" @" @" @" _ A" A" A" A" A" A" B A$ A" B :a Y B R A" _ @" # W4 @" A" ,Xp _ < @ A$ A$ A$ A$ A$ A$ A$ $"
0x02953c…0296d0 Dummy {f00=0x000d, f01=0x0190, f02=» x @" 8R P =A_ %_ XJ _ P0 @ !@T @ @ R <~ E A A ^ 9j =Q > > > > > > > > P @ !@ &l @ P @ X0 , &l A _< U` A% @ , L ? ? , L L L L L L ? ? ? ? ? ? ?
0x0296d0…029864 Dummy {f00=0x000d, f01=0x0190, f02=» ? A > @ P ,V$ A % @ 9 % T A T @ &z ? ? >_ ? ? ? ? ? ? ? Q _ ^ ( H & W '~ W ' X I I R P8 X B"P B(T Y Y W x Y Y $ 0T W W ,^ X ? ? ? ? ? ? ? '0 - X #?
0x029864…0299f8 Dummy {f00=0x000d, f01=0x0190, f02=» ? ? ? ? ' - ? ? ? ? ? ? ? ' - (@_~ + X R Y _ X D $! TR ? ? ? ? ? ? ? ( . 8 M ? ? ? ? ? ? ? (> - % > > > > > > > > ? ? ? ? ? ? ? (j . P X - - ( * 8 TRT X + + ? ? + Pl
0x0299f8…029b8c Dummy {f00=0x000d, f01=0x0190, f02=»B"P B(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 Q Q W W Q Q R P Q 5 Y ( ? ? ? ? ? ? ? ) . Qv ) * " PF X Q< X P P ? ? ? ? ? ? ? **
0x029b8c…029d20 Dummy {f00=0x000d, f01=0x0190, f02=» - Y Y X X T ? ? ? ? ? ? ? * - > > > > > > > > ? @ ? > X B A* B (@ $ X X W W $ # C C P L L m A , DKP L X X L ! X L P L @ _ C C # $ _R _ _ _
0x029d20…029eb4 (0, 53) Dummy {f00=0x000d, f01=0x0190, f02=» R X + ! X Y T T Y Y Y Y Y U U X @ _ X X X X P,~, , -0, P $ Y Y Y Y > * Y 8 TPP" X R 8 TYX WH H, Y _8 X X: X R X ( _$ _* $ XtRX P Y _ A-& X
0x029eb4…02a048 Dummy {f00=0x000d, f01=0x0190, f02=» A-& ZrP Y _8 _< _@ ! * ! X M A- T Q * X X B A- P X $ ,^_" B W B W A W I W J X %?W X %? A.4 A.8 > > > > > > > .6 V <a W X ' ?A q A. > > > > > > > .
0x02a048…02a1dc Dummy {f00=0x000d, f01=0x0190, f02=»% T< L P4 M ^ L X 4 _ ? ? ? ? ? ? ? L W L R % _R ^ 1 @ M " L '? L U "T 6 WP T 6 WF T 6 / 0^/ / 0^0^/ / / / 0^/ / 2t W* 3 W" 2t W 5 L :AR| M W M M 4 L T M
0x02a1dc…02a370 Dummy {f00=0x000d, f01=0x0190, f02=» L 9JR@ P P T 7 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 0p P ( M P Q P P P W P T Q
0x02a370…02a504 Dummy {f00=0x000d, f01=0x0190, f02=» M (@ L 2 7~ T R Q @ ] 7 > 9C 9C > ^ U (@ L T U U U M L M L M M L 4 0p L 7~ ! :c:A 7~ L T V P T"W L >F 7~ L & 7~ 2t M 4 1 M L M L " P M 2 0p M L M
0x02a504…02a698 Dummy {f00=0x000d, f01=0x0190, f02=»XfWn L M L M M 3 0p L :c:A L D V D M L ! T*_ L < 7~< R M M "W 3 M 4 1 L E M L "! 7~ L 2 L T L P L D Q 4& M 2 2 L L $:BV W $:AV M " M 7h L L $ M 0 D L U M "
0x02a698…02a82c Dummy {f00=0x000d, f01=0x0190, f02=» 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 7 L 7~ L U 5 M 2 2 L M $ L M & L L I P0% P L X =h P
0x02a82c…02a9c0 Dummy {f00=0x000d, f01=0x0190, f02=» L . P M . 6 M 2 2 L U 6 M 2 2 L L L & ) L $ I L M L L U M 7 @ M L M M M W L 7~ @ M M ( L P0W" M L 7~ @ M ( L U 7, M 2 2 L L ( E L % E L E L E M 7h
0x02a9c0…02ab54 (0, 54) Dummy {f00=0x000d, f01=0x0190, f02=» L L ? ? ? ? ? ? ? M.A A ? 4 R W 7 @ Q 8 8 8 8 8 ? 7 5 8 ( "^ 9 ( "^ 5 9 $ @9 b 4T W j b H bP H d _ A8 8 A? 5 T6 @? P ? 8 8 8 8 8 @? A? A8 $ 5 4 X _8 8
0x02ab54…02ace8 Dummy {f00=0x000d, f01=0x0190, f02=» L . P M . 6 M 2 5 8 @j @P 8 P @j - _ 8 5 @j @P @j @P* :a;a 8 :A ;A > 8 T :< 0P :RY _ 1 X 1 9 :aW8 9 : X W* 8 A: T A:l :h(@( * + : 0 :R - Y
0x02ace8…02ae7c Dummy {f00=0x000d, f01=0x0190, f02=» R V Y A; 8 TKP Y LPP MTP Y Y T T Y Y U U 0!? 5T W 1 Q TKP MTT Y P ; Y (@ 8 P Q 1 8 + X X ? ? ? ? ? ? ? ; .:_ 5 @j 8 @ l Q mP P lT Z 8 W P l
0x02ae7c…02b010 Dummy {f00=0x000d, f01=0x0190, f02=» L 0AB CD ADDR @ 9a:a;a R R A<z <| A? _ $ _ P A @? P$ @<z = ^ ] ] @<| _ A? $ < <. A _ = @ 0 9U A<@ <D S <0 ( "^ < = @ @ A @ !? T A ? _* 5 @? 8 @ A 8
0x02b010…02b1a4 Dummy {f00=0x000d, f01=0x0190, f02=» R: P @j R( > ( "^ > ^ @ T = ( "^ 8 8 = I/0 ERROR 5> W 1 1 A9 A? A? > A> A9 9 S 9 , PP , X QD S > Y , S > Z H @? P : > ` : 9 I S _* A>
0x02b1a4…02b338 Dummy {f00=0x000d, f01=0x0190, f02=» A A A A? A? A? a ?R @ ? ? > P :b" Q P T4 P Q Q @ @ @ @ Y Y Y Y P AAV ( Qh Q P( @ @ @ @ Y Y Y Y " A "; V W # @ A A? @ ? ? > Q @
0x02b338…02b4cc Dummy {f00=0x000d, f01=0x0190, f02=» 8 P R( A@ A@ A@ A@ A@ A@ A@ @ ,:j Z ( I ^ - ^ *@9J M @ @@ @@ @@ @@ @@ @@ @@ @ ? ? ? ? ? ? ? @ $ < @ B @ 9a:a R @ @AV @ !` # !` C "! PX @ l Q mP
0x02b4cc…02b660 Dummy {f00=0x000d, f01=0x0190, f02=» DD _Z :EOS :EOF + + +v @ !? ?R _ BR * ' !? 0X A "! X6 @ l Q mP ^L_ P nXP P lR :AV L D I I "R (@(@ ^ :j >Z ^ @ P _ A ! M (@ M M M B B M M # C C @
0x02b660…02b7f4 (0, 55) Dummy {f00=0x000e, f01=0x0190, f02=» # C B + B + $? D P R B. P R D B.P P| P Pv P $P &PN "P< /P :P ;P <P =P >P ?P 1 B. 8 B.Wv DNW B(W DZW B" W W DpW Wx 8 MTPp DYPj X T Y $ WZ D
0x02b7f4…02b988 Dummy {f00=0x000e, f01=0x0190, f02=»DYXN _Z OS :EOF + + +v @ ( 0 $ , F X Y X GF B Y % GF L G M B P + X P P P P + B P P 4 ^ :A HE6W W M B M B M E. E6V 4 Y T T W
0x02b988…02bb1c Dummy {f00=0x000e, f01=0x0190, f02=» M M W M M M M y W _ @E P M WR AE L " * AF - AF L " X ! Y M T(% T$ ! R L W L A T M AE AE X - B M G4 SL J2 M _* E& Y B AE X P PD P@ P< P8 P4 H !J B T B
0x02bb1c…02bcb0 Dummy {f00=0x000e, f01=0x0190, f02=»E X P< P P4 P M @E M M !Jt !Hb P @ W M @E M M !Jt !Hb H H| ? ? ? ? ? ? ? - X M AE AE AE X - AE ! T @E AE @E Y @E U AE G M X + X ? ? ? ? ? ? ? H . P @E @E L
0x02bcb0…02be44 Dummy {f00=0x000e, f01=0x0190, f02=» M W I ? ? ? ? ? ? ? - X - =b%0 X $ L <B<j P L * $ _ L =AV L <AR A <B M * X J> X % J> L % * L ? * G8 M AE . + M @E 7P < $ <C ! 9 4 @E
0x02be44…02bfd8 Dummy {f00=0x000e, f01=0x0190, f02=»E X P P P P M @L( Y X X M( M( B Y ! M( L Q$ B Tr B Sf M 9A DJ L P :a P VN P :A M M J J + 4 Y T T W _ X $ P W M ! B < V < + B Y B Y L ?a M " : L ? M L
0x02bfd8…02c16c Dummy {f00=0x000e, f01=0x0190, f02=» M M M W M M M ? * AL L " :A AL * AL L " X I [ ! T, L :EV W L L q r B M X - $(,0 !%)-1 "&*.2 #'+/3 J M Y B AJ X P P P P P~ P4 O !O B
0x02c16c…02c300 Dummy {f00=0x000e, f01=0x0190, f02=»! T B R AJ S [hU O h AJ AJ AJ !O !O X ! P !N W !O P M L Z$ O Y AJ AJ P L AJ @J hZT AJ _ X O A Y B AJ B AJ @J AJ @J !O !O !O P M L Z W AJ Y AJ P L AJ @J hZD A
0x02c300…02c494 (0, 56) Dummy {f00=0x000e, f01=0x0190, f02=» @J @J * W Oh ? - X M AJ X - X + L P& M !N P M L Z M O 4 AJ @J 4R 4 @ AJ DL L : V V 4 AJ 4 M !N " T AJ AJ !O* P M L Z O 4 X ? P$ . <b X ! ? P L * ! _ L
0x02c494…02c628 Dummy {f00=0x000e, f01=0x0190, f02=» P X M L8 X P2 Y M B 9A DJ 9B M " : M L8 M AJ . + W P M B Q SL L X( M L8 M 9 V 9c ! O @J 4 @ _ X X X X $ PQ Q Q R R % P Y Y Y >
0x02c628…02c7bc Dummy {f00=0x000e, f01=0x0190, f02=» 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 %_ X P V % P Y X XT Q _ R Q R 0DKER UNIT CYLD STAT S&
0x02c7bc…02c950 Dummy {f00=0x000e, f01=0x0190, f02=» ; ? 0 :R 9 Y 9 9 : : : @ l P lR ! R P n L M M Y$ #? @ l P lR P n T T T Y" P T _ X n D n D E E l ] l @ E @ T ? ? > ? ? ? ? ? ? ? W C
0x02c950…02cae4 Dummy {f00=0x000e, f01=0x0190, f02=» W [ [ [ [ [ [ [ ^ [ [ [ [ @ l L l! P Y _ @ M l n ^ U > > > > > > >WZ 0 A ^ T " T0 ! P W SY SD AD _ ! P _, J _2
0x02cae4…02cc78 Dummy {f00=0x000e, f01=0x0190, f02=» W L 9 !? AV AV AV AV AV AV J AV T8 B ! P B J (@" T L #( "^ B P @ !? M @X"P M L R ! _ PP I H P _ A S A A A @ ~ W A ~ @W A ~ @ Y ( 7 A A "^ ? (@_0
0x02cc78…02ce0c Dummy {f00=0x000e, f01=0x0190, f02=» [ [ [ [ [ [ [ ^ [ [ [ [ @ l L l! P Y _ @ M l n ^ U > > > > > > >W 0 A ^ T " T ! P W SY SD AD _ ! P _, J _2
0x02ce0c…02cfa0 Dummy {f00=0x000e, f01=0x0190, f02=» L 9 !? A A A A A A J A T B ! P B J (@" T L #( "^ B P @ !? M @ P M L R ! _ PP I H P _ A S A A A @ ~ A ~ @ A ~ @ ( 7 A A "^ ? (@_0
0x02cfa0…02d134 (0, 57) Opaque[0x194]
0x02d134…02d2c8 # DirEnt {nam=»LKE «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x01d0, f03=0x0000}
0x02d134…02d2c8 IdxSect {
0x02d134…02d2c8 f00 = 0x000e // 0x2d134 @0x0
0x02d134…02d2c8 f01 = 0x0006 // 0x2d136 @0x2
0x02d134…02d2c8 gno = [ // 0x2d138 @0x4
0x02d134…02d2c8 [0x00]: C0x000e.0x2.0
0x02d134…02d2c8 [0x01]: C0x000e.0x3.0
0x02d134…02d2c8 [0x02]: C0x000f.0x0.0
0x02d134…02d2c8 ]
0x02d134…02d2c8 }
0x02d2c8…02d45c Dummy {f00=0x000e, 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
0x02d45c…02d5f0 Dummy {f00=0x000e, 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
0x02d5f0…02d784 Dummy {f00=0x000e, 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
0x02d784…02d918 Dummy {f00=0x000e, 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
0x02d918…02daac Dummy {f00=0x000e, 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
0x02daac…02dc40 Dummy {f00=0x000e, 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 :
0x02dc40…02ddd4 (0, 58) Dummy {f00=0x000e, 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 $"
0x02ddd4…02df68 Dummy {f00=0x000e, 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`
0x02df68…02e0fc Dummy {f00=0x000e, 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 <
0x02e0fc…02e290 Dummy {f00=0x000e, 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
0x02e290…02e424 Dummy {f00=0x000e, 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
0x02e424…02e5b8 Dummy {f00=0x000e, 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
0x02e5b8…02e74c Dummy {f00=0x000e, 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" @
0x02e74c…02e8e0 Dummy {f00=0x000e, 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
0x02e8e0…02ea74 (0, 59) 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
0x02ea74…02ec08 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
0x02ec08…02ed9c 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
0x02ed9c…02ef30 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 @
0x02ef30…02f0c4 Dummy {f00=0x000f, f01=0x0190, f02=» LABEL = FIXS3-1 DATE = 790507 PACK NBR = 001 f P Y _( Y M : ] =IR E
[…0x3…]
0x02f580…02f714 (0, 60) Opaque[0x194]
0x02f714…02f8a8 # DirEnt {nam=»EDIT «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x01e8, f03=0x0000}
0x02f714…02f8a8 IdxSect {
0x02f714…02f8a8 f00 = 0x000f // 0x2f714 @0x0
0x02f714…02f8a8 f01 = 0x003c // 0x2f716 @0x2
0x02f714…02f8a8 gno = [ // 0x2f718 @0x4
0x02f714…02f8a8 [0x00]: C0x000f.0x1.0
0x02f714…02f8a8 [0x01]: C0x000f.0x2.0
0x02f714…02f8a8 [0x02]: C0x000f.0x3.0
0x02f714…02f8a8 [0x03]: C0x0010.0x0.0
0x02f714…02f8a8 [0x04]: C0x0010.0x1.0
0x02f714…02f8a8 [0x05]: C0x0010.0x2.0
0x02f714…02f8a8 [0x06]: C0x0010.0x3.0
0x02f714…02f8a8 [0x07]: C0x0011.0x0.0
0x02f714…02f8a8 [0x08]: C0x0011.0x1.0
0x02f714…02f8a8 [0x09]: C0x0011.0x2.0
0x02f714…02f8a8 [0x0a]: C0x0011.0x3.0
0x02f714…02f8a8 [0x0b]: C0x0012.0x0.0
0x02f714…02f8a8 [0x0c]: C0x0012.0x1.0
0x02f714…02f8a8 [0x0d]: C0x0012.0x2.0
0x02f714…02f8a8 [0x0e]: C0x0012.0x3.0
0x02f714…02f8a8 [0x0f]: C0x0013.0x0.0
0x02f714…02f8a8 [0x10]: C0x0013.0x1.0
0x02f714…02f8a8 [0x11]: C0x0013.0x2.0
0x02f714…02f8a8 [0x12]: C0x0013.0x3.0
0x02f714…02f8a8 [0x13]: C0x0014.0x0.0
0x02f714…02f8a8 [0x14]: C0x0014.0x1.0
0x02f714…02f8a8 [0x15]: C0x0014.0x2.0
0x02f714…02f8a8 [0x16]: C0x0014.0x3.0
0x02f714…02f8a8 [0x17]: C0x0015.0x0.0
0x02f714…02f8a8 [0x18]: C0x0015.0x1.0
0x02f714…02f8a8 [0x19]: C0x0015.0x2.0
0x02f714…02f8a8 [0x1a]: C0x0015.0x3.0
0x02f714…02f8a8 [0x1b]: C0x0016.0x0.0
0x02f714…02f8a8 [0x1c]: C0x0016.0x1.0
0x02f714…02f8a8 [0x1d]: C0x0016.0x2.0
0x02f714…02f8a8 ]
0x02f714…02f8a8 }
0x02f8a8…02fa3c Dummy {f00=0x000f, f01=0x0190, f02=» D ( b D F b J, b i d b o b w b y b } h h b b , b b 0@ :C H A M t H R M t PB " P :C_ @ 9C E ^ t V V ( T # Y$ @ z f
0x02fa3c…02fbd0 Dummy {f00=0x000f, f01=0x0190, f02=» ? : ? : a b @ P , 4 6 @ T h " b
0x02fbd0…02fd64 Dummy {f00=0x000f, f01=0x0190, f02=» @ T $ . @ P L ` " @ P 6 4 v
0x02fd64…02fef8 Dummy {f00=0x000f, f01=0x0190, f02=» Z @ 8 @ @ @ @ P @ 8 A @ : A @ < A @ > A b& > @ @ P @ 8 A @ : A @ < A @ > A b2 > @ @ P : b @ 8 A @ : A @ > A b> > @ @
0x02fef8…03008c Dummy {f00=0x000f, f01=0x0190, f02=» > A bV > @ @ P < @ 8 A @ : A @ > A bb > @ @ P Z @ 8 A @ : A @ > A bn > @ @ P @ 8 A @ : A @ > A bz > @ @ " P @
0x03008c…030220 Dummy {f00=0x000f, f01=0x0190, f02=» P j @ > A $ @ * @ @ P & > @ @ ( P @" @ P " ( > @ @ , P , : @ & @ Z @ 8 B ` B @ ( P
0x030220…0303b4 (0, 61) Dummy {f00=0x000f, f01=0x0190, f02=» @ & P @ @ > > , : * @ *" " " " "
0x0303b4…030548 Dummy {f00=0x000f, f01=0x0190, f02=» H A @ : p @ P0 @ A @ P ( A A ( A P J A
0x030548…0306dc Dummy {f00=0x000f, f01=0x0190, f02=» A : A A A : 0 I @" @ P 0 " " @" @" Q @" U @ r :
0x0306dc…030870 Dummy {f00=0x000f, f01=0x0190, f02=» ` @ P Z > @ Z " " " @ A @ A @ A b @ P : @ A @ A @ A . @ P 2 : Z
0x030870…030a04 Dummy {f00=0x000f, f01=0x0190, f02=» 0 I ` @ R " 6 @ ` U f | @ _2 v v _8 "
0x030a04…030b98 Dummy {f00=0x000f, f01=0x0190, f02=» R P $ INPUT I/O-ERROR FC:/XXXX, ST:/YYYY > z ~ P A : A t A v p A 8 8( @ @T0 @ : @ >P ( T A > t r z :R P T _ p @ 8! f D( ( 0 I
0x030b98…030d2c Dummy {f00=0x000f, f01=0x0190, f02=» 0 I " " @ @ @" Q : TYDY R J 0 I V N . @ $ P x @ * $ @ $ @ & T Z @ $ @ (
0x030d2c…030ec0 Dummy {f00=0x000f, f01=0x0190, f02=» B B r , D H * J : 0 aN , * ^ 0 I j b @ j A R R j j @ p l @ l ` l U l @ p l_2 X v_ p l @ l @ j U * L l @ p
0x030ec0…031054 (0, 62) Dummy {f00=0x000f, f01=0x0190, f02=» : T$ @ , @ H P ( ( _0 @ , @ T @ , @ P A ,_R _ 6 P A v _ : @ ! @ @ , I p A P &P ^ P P P ^ _ Q & P A , P A A :
0x031054…0311e8 Dummy {f00=0x000f, f01=0x0190, f02=»
0x0311e8…03137c Dummy {f00=0x000f, f01=0x0190, f02=» NO @ ! @ P A 0 ( @ A @ D . @ , @ LPP DYP< TYP6 A PV 1 _ A ( @ P A , Q : A ) P$ $ T _ T _ P ) _( .
0x03137c…031510 Dummy {f00=0x000f, f01=0x0190, f02=» + . ) P 8 T I _ ) _ . A ( T 1 A . A ( . < 2 b 0 I n f n @ @
0x031510…0316a4 Dummy {f00=0x000f, f01=0x0190, f02=» P P p U 4 P P 9 Y P 4 9 : 8D Q 0 - : 7_ P 0 P R _ P 0V P - , 0 R - : d ' p 0 A 0 ( @ : P p V <A 0 _ :
0x0316a4…031838 Dummy {f00=0x000f, f01=0x0190, f02=» Z @ p @ p t @ t @ ~ U @ v ` V @ J_v ` @ ~ R @ v ` R @ v @ | v l Z @ v @ | r | x @ x @ v R ^ x @ |
0x031838…0319cc Dummy {f00=0x000f, f01=0x0190, f02=» r x : | v t x 0 F: 0 0 $ P 8H , A ( ( Z P @ P ( ( @ < : ER 0123456789ABCDEF 8 *** ERROR NUMBER ***: W W W W
0x0319cc…031b60 Dummy {f00=0x000f, f01=0x0190, f02=» 0 4P&R ! P 8 S =aP 8 Sr _ : Pj_ p Uf p S^ TZ p UT SN p SH TD p U> p S4 P T( : _: _( p p Q S : W W f P 0 4T D f 0V S : :
0x031b60…031cf4 (0, 63) Dummy {f00=0x0010, f01=0x0190, f02=»
[…0x1f…]
0x034de0…034f74 (0, 67) Dummy {f00=0x0011, f01=0x0190, f02=»
[…0xb…]
0x0360d0…036264 Dummy {f00=0x0011, f01=0x0190, f02=» A
0x036264…0363f8 Dummy {f00=0x0011, f01=0x0190, f02=» _| A z _ A z * _ A z _
0x0363f8…03658c Dummy {f00=0x0011, f01=0x0190, f02=» @ c c b " @" @b R b b c6 " @b " _2 c Z " c " @b c " @b c c Z " c b c _d " @b c c Z " c b c b " b b c g c g b " b
0x03658c…036720 Dummy {f00=0x0011, f01=0x0190, f02=» e 0 Ie e e " d c d d @e Ae e e d @e T e e&
0x036720…0368b4 (0, 69) Dummy {f00=0x0011, f01=0x0190, f02=» d c e :c d d d d d g 0 Ig g e e e e f Z @g g `g @e T f" f( f _2 @g Af f g e e @e P fd fx e e f f e f
0x0368b4…036a48 Dummy {f00=0x0011, f01=0x0190, f02=»e e e e g 0 Ig g g @g g g Z " g g g g @g g g Z " g g g g :g g i 0 Ii i g g iz jN i g `i P
0x036a48…036bdc Dummy {f00=0x0011, f01=0x0190, f02=» i i g h iz g i g g @g P h h @i Ai @i Ai i g g @g P i i @i Ai i i g i : i @g i i| Z " i g i i @g i i| Z " i g i g i :
0x036bdc…036d70 Dummy {f00=0x0011, f01=0x0190, f02=»" jD i jD jB " j, @jB Aj2 j2 Z " jD " jD jB " j6 : i j 0 Ij j @" @jH P j j jJ jF j " jF j Z " j j " jF j :" jL
0x036d70…036f04 Dummy {f00=0x0011, f01=0x0190, f02=» G X e| 0 Ie e @e Aeb eb Z @e e e b @b @b T e @b @b T @e c c. b e eP @b @b P cL cX b b c` b b e @b e @e Aef @e Aeh ef l e b
0x036f04…037098 Dummy {f00=0x0011, f01=0x0190, f02=» e " b @b @" U d4 dJ d b @b b _2 ep b er k& @b P dz d b @b e ev Z " e b e d b @b e ev Z " e b e _ ez b @b @" T d e e@ ep b _. ep
0x037098…03722c Dummy {f00=0x0011, f01=0x0190, f02=» , ; g 0 Ig g e " e " @g Ag @g Ag @g Ag g g g e @g P f" f( f _P " " e " " @e " @g Ag g Z @g g g e @e @e T g @e @e
0x03722c…0373c0 Dummy {f00=0x0011, f01=0x0190, f02=» e " @" @e P g g( " " @" @e U gF gN " " e `g T gv g e g g e e g : e e + - k 0 Ik k k g g k @k A
0x0373c0…037554 (0, 70) Dummy {f00=0x0011, f01=0x0190, f02=»k Aj j nN @k Aj j Z @k k k g @g @g T k @g @g T @k h h g k j @g @g P i i g g i& g g k @g k @k Aj @k Aj j nN @k Aj @k Aj @k Ak j r k g
0x037554…0376e8 Dummy {f00=0x0011, f01=0x0190, f02=» `k T j hh g `k R k `k @" Q @k jP j` g k g `k P j j g g j `k @g U j j g g j g g g k g k :
0x0376e8…03787c Dummy {f00=0x0011, f01=0x0190, f02=» T kt k k k @k k _B @k Ak @k Ak k n @k" Q k k k k k k :_Z k" k k k :k k$ k n2 0 In> n6 @n@ An n Z @n> nB `nB @l P lZ ln l n@
0x03787c…037a10 Dummy {f00=0x0011, f01=0x0190, f02=»n@ @l nD n" Z @n> nF `nB `nF P m m* n@ @l n@ mn n@ @l nB @n@ An n Z @n> nD @n> An& @nD An* n& vJ n@ n. Z nB `nB @l P m m l n@ l `n@ P m n n. Z
0x037a10…037ba4 Dummy {f00=0x0011, f01=0x0190, f02=» 0 In n @n An n Z @n n `n @nH P n n n @nJ n _H n : nL * r 0 Irh r` n n rj n n n r8 Z @rl rn `rn @n T o@ ob r& @rl Ar< r< ~ @n
0x037ba4…037d38 Dummy {f00=0x0011, f01=0x0190, f02=» T o o p _2 @rh ArD @rl ArH rD z @n P p p p _< n @n rn rL Z @rl rp n @n rp n @n rn rL Z @rl rp n rp n n r" @rh ArP @rl ArT rP z @n P p r" @n @n Q p p
0x037d38…037ecc Dummy {f00=0x0011, f01=0x0190, f02=» @n @n U q` qr n n n r : n @n rn rL Z @rl rp n @n rr rX Z @rl rt rt @n rp n @n n n @n rn rL Z @rl rp n @n rr rX Z @rl rt rp `rt n oD n n n r :n n n n n n
0x037ecc…038060 Dummy {f00=0x0011, f01=0x0190, f02=» r rv @uL Au* u* Z @uJ uR uR r u. u @r Q s sv @uJ Au2 @uL Au4 u2 uN r `uN P sR sb r rv uL @r uL t @r @r P s s " uN t @r @r P s s "
0x038060…0381f4 (0, 71) Dummy {f00=0x0012, f01=0x0190, f02=» P tF tZ r rv t @uL Au* u* Z @uJ uR `uR @r P t t @uN Au8 u6 rv t r uR @uN Au< u: rv t r rv r @rv P u u uL @r uL rv uP rv u> : r rxr r
0x0381f4…038388 Dummy {f00=0x0012, f01=0x0190, f02=» u uT @uV uT_B v Z @v v `v `v P u u uT v :_L uX uT uT v :uTuZ ? % $ [ * A zB 0 IzN zF v4 v$ v4 v& v6 v( zP v* y Z @zN zV zV v, @v, `zR T zV
0x038388…03851c Dummy {f00=0x0012, f01=0x0190, f02=» zV @v* `zP P @zV wJ wb @zT Az z . v0 y> @v, @v> P zV v* @v4 zX z Z @zN zZ `zZ `zR P @zV w w @zT Az z . v0 y> @v, @v@ P w x< @zN Az @zT Az z | zV vB @zV P
0x03851c…0386b0 Dummy {f00=0x0012, f01=0x0190, f02=»v< P zV @v2 @v> P @zV zX @v2 @vD P @zX x x yr @zT Az" z" v( y> @zT Az, z* . v0 @zN Az z zV @zT Az4 z2 . v0 v. v& v* @v4 v* y Z @zN zV zV v, v @v, `zR T y y vB v"
0x0386b0…038844 Dummy {f00=0x0012, f01=0x0190, f02=»v$v: v* v$v.vH v$v&v(vF v$v:zV v$v:v6 v$v: ERROR IN OMATCH CAN'T HAPPEN A % ? $ [ N } 0 I} } z z @} A} } Z @} } } z^ @} A} } Z @} } } z` @z^ @z P { { z
0x038844…0389d8 Dummy {f00=0x0012, f01=0x0190, f02=»{ z zb }^ @z` @z P { { `} @z P { { z zb }^ @z` @z P { |( @z^ @z T | |$ z zb }^ @z` @z P |F |p @z^ @z P |d |l z zb }^ @z` @z P | | }
0x0389d8…038b6c Dummy {f00=0x0012, f01=0x0190, f02=»T } } @z } @} A} } L @z P @} }J }R z zb }^ } @zb @z V }| } } @zb } z z z } : z } z z^ } z^ } z zd ERROR IN PATSIZ CAN'T HAPPEN A % $ ? [ N * z
0x038b6c…038d00 Dummy {f00=0x0012, f01=0x0190, f02=» @} @} P @ @} @} P @ ~ ~ } } d @} @} P @} @} P @ ~ 2 @} r Z @ @} } d @} @} P P ~ } d v } z : } } ~ }
0x038d00…038e94 (0, 72) Dummy {f00=0x0012, f01=0x0190, f02=» @ A 4 @ A k& @ P > X : ` @" P t_ : aN * 0 I @ @ ` V
0x038e94…039028 Dummy {f00=0x0012, f01=0x0190, f02=» @ A @ A . @ A @ A . @ " A @ A @ A . @ A @ A . : 0 I ` ` Q f r ( &
0x039028…0391bc Dummy {f00=0x0012, f01=0x0190, f02=» d 0 I p h @ p A Z @ r A Z nN @ r A Z @ p t ` t @ T R h P r @ r_J @ r A Z @ p t t @ @ R t @ @ Q @ t P @ @ @ Q t
0x0391bc…039350 Dummy {f00=0x0012, f01=0x0190, f02=» @ N T 0 I @ A Z @ z @ z @ | T z x @ ~ Z @ ` @ P . : | x @ ~ @ A Z @
0x039350…0394e4 Dummy {f00=0x0012, f01=0x0190, f02=» T 0 I ` X @ ` A N @ b A P N ` ` ` ` P @ H R T : N [ ] , 0 I 8 0 : @ j : @ : A Z @ 8 @ ` @ @ l P
0x0394e4…039678 Dummy {f00=0x0012, f01=0x0190, f02=» f @ 8 A @ : A @ < A " @ > A $ ( Z @ < @ > @ h @ j @ @ : A Z @ 8 @ ` @ @ v P x d z d d , : x n p r p t p v p h x
0x039678…03980c Dummy {f00=0x0012, f01=0x0190, f02=» Z @ * . ` ( ` . P F B B :_T H B B : J D J 0 I @ 2 0 2 @ 0 R " 0 0 : 0 1 2 3 4 5 6 7 8 9 A B C D E F G
0x03980c…0399a0 Dummy {f00=0x0012, f01=0x0190, f02=» @ ` D T P @ @ T @ P r @ @ P @ F A @ H A P @ J A @ L A @ N A . @ @ T @ J A @ L A @ N A . ` L @ U P H @ R
0x0399a0…039b34 (0, 73) Dummy {f00=0x0012, f01=0x0190, f02=» @ J R @ R A " u @ Q @ F A " @ H A $ @ J A & @ L A ( @ N A * ` L @ P Z @ J R @ R A . , u @ Q f @ F A . @ H A 0 @ J A 2 @ L A 4 @ N A 6 , ` @ J A @ L A @ N A .
0x039b34…039cc8 Dummy {f00=0x0012, f01=0x0190, f02=» 0 I @ @ @ A t @ A v t @ A v v u V @ A z z Z @ @ A t @ A v t u X @ X @ V U 0 n X @ X_2
0x039cc8…039e5c Dummy {f00=0x0012, f01=0x0190, f02=»
0x039e5c…039ff0 Dummy {f00=0x0012, f01=0x0190, f02=» c6 0 IcB c: cD @b cJ c. Z @cB cL `cL @b P b c @cF Ac4 c2 d cH c b cH cH b b c6 :cJb "
0x039ff0…03a184 Dummy {f00=0x0012, f01=0x0190, f02=» . e 0 Ie e `e @d P dH d d cN e e " e 6 d cN @cN @d P d d e _" e e d @e P d d d cN e e Z cP e `e @d P e e Z cP
0x03a184…03a318 Dummy {f00=0x0012, f01=0x0190, f02=» cN e e 6 d cN e :d c cPd d d d d c g 0 Ig, g$ e e e e g Z @g, g. `g. @e T f@ fF f _2 @g, Ag g g e e @e P f f e
0x03a318…03a4ac Dummy {f00=0x0012, f01=0x0190, f02=»_ e g :e e e e " g.e e e e e e g 0 Ig g g @g0 g g Z " g g g g @g2 g g Z " g g g g :g g4 i 0 Ii i g g i jl
0x03a4ac…03a640 Dummy {f00=0x0012, f01=0x0190, f02=»h i @g i i Z " i i g h i g i g g @g P h h @i Ai @i Ai i g g @g P i$ i> @i Ai i i g i : i @g i i Z " i g i i @g i i
0x03a640…03a7d4 (0, 74) Dummy {f00=0x0012, f01=0x0190, f02=» i j" @j` AjP jP Z " jb i jb j` " jJ @j` AjP jP Z " jb " jb j` " jT : i j 0 Ij j @" @jf P j j jh jd j " jd j Z " j j " jd j :" jj
0x03a7d4…03a968 Dummy {f00=0x0012, f01=0x0190, f02=» c 0 Ic c b c c @b c c Z @c c `c @b P c c @c Ac c c b @c P c@ c @c Ac c fl c b @c P c| c c i c @c Ac c d
0x03a968…03aafc Dummy {f00=0x0012, f01=0x0190, f02=» A : A : . fF 0 IfR fJ `fT @d P d d d c f* fR " f4 6 d c @c @d P
0x03aafc…03ac90 Dummy {f00=0x0012, f01=0x0190, f02=» P fX f> Z c fZ `fZ @d P @fX e e d c f& f8 h fV d @fV P f f d c f& fB 6 e c fF :d d c d d d d d d g 0 Ig g `g
0x03ac90…03ae24 Dummy {f00=0x0012, f01=0x0190, f02=»g `g @fh " " @g Ag g i " g fb @fb `g V gT gj g fb @fh fb_2 g g g g _( g jR fj g g f f g : g fbf^f`f^f` hf 0 Ihr hj @" @g P
0x03ae24…03afb8 Dummy {f00=0x0012, f01=0x0190, f02=» i 0 Ii i h hv h hx i Z @i i `i @h T h h i _2 @i Ai i j hx h @hx P i( i< h hv i i h| i i i h~ i jR i jR " @h
0x03afb8…03b14c Dummy {f00=0x0012, f01=0x0190, f02=» jB jJ @i i i @i R j, j4 " i i j> : j 0 Ij j j @jL j j Z " j j j j @jN j j Z " j j j j :j jP l
0x03b14c…03b2e0 Dummy {f00=0x0012, f01=0x0190, f02=» l Z " l `l @j V k k l @j l l Z " l l j k l j l j j @j P k l @l Al @l Al l j j @j P l@ lZ @l Al l g j l : l @j l
0x03b2e0…03b474 (0, 75) Dummy {f00=0x0013, f01=0x0190, f02=» mX 0 Imd m @" @l P m m* l l mJ " l mT Z " mf mf " l mX :" l
0x03b474…03b608 Dummy {f00=0x0013, f01=0x0190, f02=» cp 0 Ic| ct b c c~ @b c @c| Ac^ @c Acb @c Acd c^ c c b @c P c$ cL cf b ch v cl v cn b c b b cp : c b " b b b P
0x03b608…03b79c Dummy {f00=0x0013, f01=0x0190, f02=»d dp Z @d d `d @c P d: dN c d d^ c d d c c dt :c c
0x03b79c…03b930 Dummy {f00=0x0013, f01=0x0190, f02=» c 0 Id d b d d @b d @d Ac @d Ac @d Ac c d& d b @d P c c @d Ac c d b @d P c c @d Ac c e( d b @d P c c
0x03b930…03bac4 Dummy {f00=0x0013, f01=0x0190, f02=» P e 0 Ie e e d d Z @e e `e @d P dv d d e d @d d d d e d Z @e e `e @d P d d d" e d d$ e e d d e :d d"
0x03bac4…03bc58 Dummy {f00=0x0013, f01=0x0190, f02=»g6 f fh e @f Aff ff f fh e f `f @e$ " " @f Aff ff g6 " f e @e `f V f f& f< e @e$ e _2 fj f fh f _( fl g e& f f e e ft : f e e e e e
0x03bc58…03bdec Dummy {f00=0x0013, f01=0x0190, f02=»g Z " g0 " g0 g. " g" : f g 0 Ig g g @g4 g2 g4 @g2 R g g " g2 g2 g : h" 0 Ih. h& h0 @g h6 h Z " h8 h. h8 h2 @g h6
0x03bdec…03bf80 Dummy {f00=0x0013, f01=0x0190, f02=»
[…0x1…]
0x03c114…03c2a8 Dummy {f00=0x0013, f01=0x0190, f02=» gJ 0 IgV gN e gZ gX @e gX @gV Ag4 @gX Ag6 g4 hh g^ e @g^ P f: g" @gV Ag4 @gX Ag6 g4 ht g^ e @g^ P f~ g" gX @e
0x03c2a8…03c43c Dummy {f00=0x0013, f01=0x0190, f02=» @g^ P g g" g8 h gZ gZ b b gJ : b e g^ " " P hN 0 IhZ hR h gd hJ Z @hZ hb `hb @gf P g g gh h^ gd @gh gd g gj h^ hJ Z @hZ hb `hb @gl
0x03c43c…03c5d0 Dummy {f00=0x0013, f01=0x0190, f02=»_ A z _ A z > _(
0x03c5d0…03c764 Dummy {f00=0x0013, f01=0x0190, f02=»
[…0x1…]
0x03c8f8…03ca8c Dummy {f00=0x0013, f01=0x0190, f02=» p` 0 Ipl pd k h k @" U l l& h p` : " k @k @" U lJ l` p$ k @k k _2 k k k k p. k k k
0x03ca8c…03cc20 Dummy {f00=0x0013, f01=0x0190, f02=»m p4 q2 k m k k @k @k Q pp @k @k T @pp mF mf k k @pl Ap@ p: t k k @k @k P pp @k @k P @pp m m p0 Z aN pp @pp Ap@ p@ p| k k @k k m k k l @k @k P n
0x03cc20…03cdb4 (0, 77) Dummy {f00=0x0013, f01=0x0190, f02=»k p0 Z h pp `pp @k T n o p. k k @k T n o p0 k k @k pp p4 y @pp @k Q o o p$ pP vn k @k k k k p0 Z aN pp `pp @k T oh o~ o k @k
0x03cdb4…03cf48 Dummy {f00=0x0013, f01=0x0190, f02=» k @h P p p p$ k h lN h p` :k k k aNk aNk k h k k k h k k k k k k k k k k q 0 Iq q `q `q Q p p pv pt p @q Aq q Z @q q q q q @px
0x03cf48…03d0dc Dummy {f00=0x0013, f01=0x0190, f02=» q( q" t Z @t t `t @q& T q q tv @t At t } @q" q"_N t Z @t t `t @q* P q r q" q q" @q, q" q q$ t Z @t t `t @q& T r, r2 rl_2 @t At @t At t z" @q& P rf
0x03d0dc…03d270 Dummy {f00=0x0013, f01=0x0190, f02=» At @t At t z" @q& P s tr @q @q& Q s sN s q @q0 t t Z @t t t q _J q @q( t t Z @t t `t @q& Q s s s _n @q @q& U s s q& q q t : q @q( t t Z @
0x03d270…03d404 Dummy {f00=0x0013, f01=0x0190, f02=» t t Z @t t t `t q q q q q t :q"q0 q"q$q0 q$ q"t q0 q q"t q0 vB 0 IvN vF t t v2 Z @vT v `v @t T u" u8 v, t @t t _B v2 Z @vT v t
0x03d404…03d598 Dummy {f00=0x0013, f01=0x0190, f02=»vV Av< @vX Av> @vZ Av@ v: p| t _P v( v2 Z @vT v @v Av: @vV Av< @vX Av> @vZ Av@ v: p| t u& vB :t t t t w 0 Iw w `w @vf R v v vh w w @w Aw w
0x03d598…03d72c Dummy {f00=0x0013, f01=0x0190, f02=»vd `w V wV wl w vd @vj vd_2 w w w w _( w vl w w v^ v^ w : w vdv`vbv`vb xh 0 Ixt xl @" @w P x x6 @xt Axd xd Z " xv w xv xt " x^ @xt Axd xd
0x03d72c…03d8c0 Dummy {f00=0x0013, f01=0x0190, f02=» x xz y Z @y y `y @x T x x y _2 @y Ay y . xz x @xz P y* y> x xx y y x~ y y y x y y " @x " " @x " x xx_ xx y :xzx xzx|" y
0x03d8c0…03da54 (0, 78) Dummy {f00=0x0013, f01=0x0190, f02=» I}N }F z y @}P A}* }* Z @}N }V }V y @}T A}* }* Z @}R }V }V y @y @z P z z y }B : z y @y @z P z {$ }T @z }V }. Z @}R }X @y `}X P { { z y | @y @z P
0x03da54…03dbe8 Dummy {f00=0x0013, f01=0x0190, f02=» { z y | @y @z P { { @y @z P { { z y | @y @z P | |b }T @z }V @}R A}4 }2 . @z P |V |^ z y | @y @z P | | @y @z T }V }T @z }X @}R A
0x03dbe8…03dd7c Dummy {f00=0x0013, f01=0x0190, f02=» y y }B : z }Vz y }Vy }Xz y ERROR IN PATSIZ CAN'T HAPPEN A % $ ? [ N * 0 I @ A~ ~ Z @ } @} @}z P } } }| }Z ~ @} @}~ P @} @} P @
0x03dd7c…03df10 Dummy {f00=0x0013, f01=0x0190, f02=» ~ Z @ @}| }Z ~ @} @} P ~ ~ } }Z ~ }Z : }| }|} }^ 0 I @ @ R p x " :
0x03df10…03e0a4 Dummy {f00=0x0013, f01=0x0190, f02=» 0 I ( " ( ` P " : @ * Z " ` @ , V @ * Z " & &
0x03e0a4…03e238 Dummy {f00=0x0013, f01=0x0190, f02=» @ A w " : @ * Z " & @ ( Z " , " : $ * & 0 I @ A | @ A ~ | ` ` P n v :
0x03e238…03e3cc Dummy {f00=0x0013, f01=0x0190, f02=» " " " :" 0 I @ A Z @ ` & @ & ` Q & @ ( &_2 Z @ ` ` P ( $ $ :_T * $ $ : , & ,
0x03e3cc…03e560 Dummy {f00=0x0013, f01=0x0190, f02=» G jT 0 Ij` jX h h @jb AjD jD Z @j` jh `jh @h P h i h jT : jb @h jh jH Z @j` jj `jj @h P i@ iJ h jT : jb @h jh @jb AjD jD Z @j` jj @j` AjL @jj AjP @jd AjR jL q
0x03e560…03e6f4 (0, 79) Dummy {f00=0x0014, f01=0x0190, f02=»j" jb @h jb h jf j* h jf h h h jT : h jhh jh l 0 Il l @l Al l Z @l l `l @jn P j j jp l k l @jr l l Z @l l `l @jn P
0x03e6f4…03e888 Dummy {f00=0x0014, f01=0x0190, f02=»k k l @jr l k l @jr l @l Al l Z @l l @l Al @l Al l l l l Z l `l @jn P l l jp l jp `l P l@ ll l Z l jn l jp jl l| jt jl jl l
0x03e888…03ea1c Dummy {f00=0x0014, f01=0x0190, f02=»p l l l l l l p l p Z @p p p l @l `p T p @l @l T @p mf p l l @l @l P m m @p Ap p th l o @l @l P p @l `p P @p m m @p Ap p th l o @l @l
0x03ea1c…03ebb0 Dummy {f00=0x0014, f01=0x0190, f02=» P n n @p Ap @p Ap p v p l @p P n n p o @l @l P p @l `p Q @p o o l l p Z @p p p l @l @l P p @l @l P @p p @l @l P @p ox
0x03ebb0…03ed44 Dummy {f00=0x0014, f01=0x0190, f02=» l p Z @p p p l m. @l `p T p" p6 l l p~ @p Ap p th @l P pb pv l l p~ l l l p :l l l l l l l l p l l l l l l l l l l l l l l p l l l l l
0x03ed44…03eed8 Dummy {f00=0x0014, f01=0x0190, f02=»r r `r @p T @r q q r p @p p _l r Z @r r `r @p P q q p r @r Ar r th p r @r Ar r u r @r Ar r th p _ r Z @r r `r `r T rF rZ p p r @r Ar
0x03eed8…03f06c Dummy {f00=0x0014, f01=0x0190, f02=» * tJ 0 ItV tN tX @r r @r `tZ V s8 sN s r @r r _2 r @r r t& Z @tV t^ @t^ At* @tV At, t* th r _P tX @r tX tZ r @tV At4 @tZ At6 t2 th r @tV At< @tZ At> t: th r
0x03f06c…03f200 Dummy {f00=0x0014, f01=0x0190, f02=» t 0 It t `u `u Q t t tb t` t @u At t Z @u u t u u @td u td t` t` t : tf @ N T vh 0 Ivt vl @vv Av` v` Z @vt vx vx
0x03f200…03f394 (0, 80) Dummy {f00=0x0014, f01=0x0190, f02=»u vV vv @u vv @vv Av` v` Z @vt vx vx u @u @u P v v$ u u vV @u @u P vB vN u u vV u u u vh : u vxu N [ ] xD 0 IxP xH xR @v xR @xR Ax x
0x03f394…03f528 Dummy {f00=0x0014, f01=0x0190, f02=» v~ xV v @xT Ax. @xV Ax0 x, th v~ @xP Ax6 @xR Ax8 @xT Ax: @xV Ax< x4 x x@ Z @xT xX xV @v @v xX @xR Ax x Z @xP xX `xX @v P w w v v| x v v| v| xD : v v v v v v v v v v v
0x03f528…03f6bc Dummy {f00=0x0014, f01=0x0190, f02=» { 0 I{ { @{ A{ { Z @{ | | x @x `{ T | @x @x T @| y& { @x @x P yD y @{ A{ @{ A{ { u | @{ A{ @| A{ @| A{ { th x {r @x @x T y y @{ A{ @| A{ @| A
0x03f6bc…03f850 Dummy {f00=0x0014, f01=0x0190, f02=»{ @| A{ @| A{ { th x {r | @x | { Z @{ | @| A{ { | @x Q z z @{ A{ @{ A{ @{ A{ @| A{ @| A{ { | {r | @x | { Z @{ | @| A{ { | @x Q { {N @{ A{ @{ A{ @{ A{ @
0x03f850…03f9e4 Dummy {f00=0x0014, f01=0x0190, f02=»x { : x | x | x x | x xZ xp | 0 I| | | | | Z @| | `| @| T |` |v | | @| | _B | Z @| | `| `| P | | | |
0x03f9e4…03fb78 Dummy {f00=0x0014, f01=0x0190, f02=» @~ A} @~ A} } u ~$ @~ A} } | | @~ A} } Z @~ ~$ @~ A} @~$ A} } | | @| @| U } } } | @| | _2 ~ Z @~ ~$ @~$ A~ @~ A~ @~ A~ @~" A~ ~ th | _P ~ : ~$ | | |
0x03fb78…03fd0c Dummy {f00=0x0014, f01=0x0190, f02=» c@ 0 IcL cD b cR cN @b cT c6 Z @cL cV `cV @b P c c$ c: g> cT @cP Ac> c< d cR cR b b c@ :cTb " cT
0x03fd0c…03fea0 Dummy {f00=0x0014, f01=0x0190, f02=» . e 0 Ie e `e @d P dR df d cX e e " e 6 d cX @cX @d P d d e _" e e d @e P d d d cX e e Z cZ e `e @d P e e
0x03fea0…040034 (0, 81) Dummy {f00=0x0014, f01=0x0190, f02=»e e d cX e e 6 d cX e :d c cZd d d d d d g* 0 Ig6 g. e e e e g Z @g6 g8 `g8 @e T fJ fP g _2 @g6 Ag g hN e e @e P f
0x040034…0401c8 Dummy {f00=0x0014, f01=0x0190, f02=» e _ e g* :e e e e " g8e e e e e e g 0 Ig g g @g< g: g< @g: R g g " g: g: g : h* 0 Ih6 h. h8 @g h> h& Z " h@ h6 h@ h: @g
0x0401c8…04035c Dummy {f00=0x0014, f01=0x0190, f02=» hB j j j4 hH `j4 P h h hB j$ : j4 @hJ j6 j Z " j8 `j8 @hL V h i j4 @hJ j6 j Z " j8 j8 hF i, j hF j hB hJ @hB P i` i| @j0 Aj @j2 Aj" j
0x04035c…0404f0 Dummy {f00=0x0014, f01=0x0190, f02=» @hH j6 j Z " j8 hL j8 hB j$ :hDj6hJhF j 0 Ij j @" @j: P jv j @j Aj j Z " j j: j j " j @j Aj j Z " j " j j " j : j< kf
0x0404f0…040684 Dummy {f00=0x0014, f01=0x0190, f02=»" j
0x040684…040818 Dummy {f00=0x0014, f01=0x0190, f02=» d 0 Id( d b d, d* @b d* @d( Ad @d* Ad @d, Ad d eH d0 b @d0 P c" c2 b d, b `d, P cZ c @d( Ad @d* Ad @d. Ad @d, Ad d dB d0 b @d0
0x040818…0409ac Dummy {f00=0x0014, f01=0x0190, f02=» b " " P e 0 Ie* e" e, d4 e Z @e* e2 `e2 @d6 P d d d8 e. d4 @d8 d4 d d: e. e Z @e* e2 `e2 @d< P d d d> e0 e d@ e0 e0 d2
0x0409ac…040b40 Dummy {f00=0x0014, f01=0x0190, f02=» @h Ahp hn k @h Ahn @h Ahp @h Ahr @h Aht hn l8 h e@ @h P e g @h Ahn @h Ahp hn k @h Aht ht Z @h h h e8 @e8 @eB T h @e8 @eD T @h fV fj e> h g @e8 @eB P f f
0x040b40…040cd4 (0, 82) Dummy {f00=0x0014, f01=0x0190, f02=» @h P g g, h `h h e> `h P gT gd eF h e@ `h T g e e> `h R h `h @" Q @h g g eF h eF `h P h
0x040cd4…040e68 Dummy {f00=0x0014, f01=0x0190, f02=» e@ e< e:e< jp 0 Ij| jt h @" U j~ @" `j| U j `j| @" U @j @j~ i$ i8 h h jJ jT j j~ jV h jX j~ jV h jT h jX
0x040e68…040ffc Dummy {f00=0x0014, f01=0x0190, f02=» `j| " @j| Ajb jb h @j| Ajb jb j~ jV h jd j jh j h h h jp :" j~" h h h h h h h h h h j 0 Ij j j @j j j @j R j j " j j j :
0x040ffc…041190 Dummy {f00=0x0014, f01=0x0190, f02=»k k kr :k j k 0 Il l @l Ak k Z @l l `l @k P k k l @k l _H k : k 0 1 2 3 4 5 6 7 8 9 . $ / n 0 In n l( l @n An
0x041190…041324 Dummy {f00=0x0014, f01=0x0190, f02=»P l l l, l n @l. n nx @l& @l0 P m, m8 " n nx @l& @l2 P mV mb " n nx @l& @l4 P n @l& @l6 P @n m nh @n An @n An n o n l, @n P m m l,
0x041324…0414b8 Dummy {f00=0x0014, f01=0x0190, f02=»n An n r l nx l. l l( @l P n n n @l. n l n l n : l(l l& l* n o 0 Io o n n o Z @o o `o @n T oB oX o n @n n _B
0x0414b8…04164c Dummy {f00=0x0014, f01=0x0190, f02=» 0 Iq q @q Aq q Z @q q `q @o P p p( o q q( q @o q q Z @q q `q @o P pf pz o q q( @q Aq q Z @q q q @o q q Z @q r `q `r P p p
0x04164c…0417e0 Dummy {f00=0x0014, f01=0x0190, f02=» P qV qf o q o `q P q q q Z q o q o o q o o o q : o q o q o q o o s 0 Is s " s `s @r P rN
0x0417e0…041974 (0, 83) Dummy {f00=0x0015, f01=0x0190, f02=» r r s : `s @" P r _ r r r s : aN 0 9 t 0 It t @t At @t At t k s s @t At t Z @t t `t @s T s s t t @s t _J @t At t Z
0x041974…041b08 Dummy {f00=0x0015, f01=0x0190, f02=»t @s @s$ P t @s @s& V @t @t tp t s( s t t @s s _ s t : s,s s* ? % $ [ * A x 0 Ix x t t t t t t x t x Z @x x x
0x041b08…041c9c Dummy {f00=0x0015, f01=0x0190, f02=» t w @t @t P x @t `x P @x u v @x Ax x {j t w @t @t P x t @t x x Z @x x `x `x P @x vZ vr @x Ax x {j t w @t @t P v v @x Ax @x Ax x @ x t
0x041c9c…041e30 Dummy {f00=0x0015, f01=0x0190, f02=» Z @x x x t @t @t P x @t @t P @x x @t @t P @x w w x @x Ax x y t w @x Ax x {j t @x Ax x x @x Ax x {j t t t t @t t x Z @x x x t u< @t `x T
0x041e30…041fc4 Dummy {f00=0x0015, f01=0x0190, f02=»t t t t t t x t t t t t t t t t t t t t t x t t t t t y 0 Iy y y x y Z @y y `y @y T yT yj y x @y x _B @y Ay @y Ay y | @y Q y y y
0x041fc4…042158 Dummy {f00=0x0015, f01=0x0190, f02=» @y y @y `{ V z: zP z y @y y _2 y @y y {( Z @{X {` @{` A{, @{X A{. {, {j y _P {Z @y {Z { y @{X A{6 @{ A{8 {4 {j y @{X A{> @{ A{@ {< {j y @{^ A{D @{X A{F @{ A{H {D {j y @{X A{> @{ A{@ {< {j
0x042158…0422ec Dummy {f00=0x0015, f01=0x0190, f02=»| Q { { {d {b { @| A{ { Z @| | | | | @{f | {f {b {b { : {h * 0 I | | | | | v Z @ ` @| T |~ | d @ A z z
0x0422ec…042480 Dummy {f00=0x0015, f01=0x0190, f02=» @| T } } }Z_2 @ A @ A @ @| P }T }X }Z_< | @| Z @ | @| | @| Z @ | | | ` @ A @ A @ @| P } ` @| @| Q ~
0x042480…042614 (0, 84) Dummy {f00=0x0015, f01=0x0190, f02=» ~ _n @| @| U ~ ~ | | | : | @| Z @ | @| Z @ @| | @| | | @| Z @ | @| Z @ ` | | | | | :| | | | |
0x042614…0427a8 Dummy {f00=0x0015, f01=0x0190, f02=» @ $ $ @ @ T , " @ $ Z @ & ` & @ P j v " @ " @ " A Z @ $ $ @ @ P @ @ P
0x0427a8…04293c Dummy {f00=0x0015, f01=0x0190, f02=» @ A Z @ ` @ 0 P @ A @ A {j * @ . @ A @ A {j * , @ A @ A {j * @ A @ A @ A @ A Z @ @ , @ . @ A Z @
0x04293c…042ad0 Dummy {f00=0x0015, f01=0x0190, f02=» 4 , < ERROR IN OMATCH CAN'T HAPPEN A % ? $ [ N ` 0 I l d * @ n A H H Z @ l t t @ r A H H Z @ p t t @ @ * P ` : , @ @ . P
0x042ad0…042c64 Dummy {f00=0x0015, f01=0x0190, f02=» ` ` n @ , P ~ * @ @ 2 P @ @ 4 T , @ @ 6 P @ @ 4 P * @ @ 8 P 8 r @ , t @ p A R P j @ ,
0x042c64…042df8 Dummy {f00=0x0015, f01=0x0190, f02=» j @ * P @ t , < @ @ * V & > n @ n , ` : > t > t v < ERROR IN PATSIZ CAN'T HAPPEN A % $ ? [ N * $ 0 I 0 ( @ 2 A Z @
0x042df8…042f8c Dummy {f00=0x0015, f01=0x0190, f02=» P @ 6 d p x @ z @ P 4 @ z @ P @ 4 2 @ 4 Z @ 0 6 6 @ x @ z @ P x < x $ : 4 | 0 I
0x042f8c…043120 Dummy {f00=0x0015, f01=0x0190, f02=» 9 A B C D E F G H I J K L M N O P Q R S T U V W X Y Z @ - B 0 I N F @ R A Z @ P Z Z @ ` N T Z @ @ T @ Z | @ @ P @ P A @ R A Z @ T A @ V A @ X
0x043120…0432b4 (0, 85) Dummy {f00=0x0015, f01=0x0190, f02=» R @ Z @ P ^ ` ^ @ P @ Z | @ T A @ V A " @ X A $ {j V @ Z & Z @ T @ A , * n @ Q $ @ P A , @ R A . @ T A 0 @ V A 2 @ X A 4 * X V @ Z & Z @ T
0x0432b4…043448 Dummy {f00=0x0015, f01=0x0190, f02=» " @ X A $ {j R @ R @ R A Z @ P Z Z D B : Z Z : 0 I F > @ J A 2 2 Z @ H L J ` L b @ b ` J
0x043448…0435dc Dummy {f00=0x0015, f01=0x0190, f02=» ` : : h b h 0 I @ T @ T @ A l @ A n l @ A n n n N @ A r r Z @ @ A l @ A n l n P @ P @ N U ( f P @ T P_2 v Z @
0x0435dc…043770 Dummy {f00=0x0015, f01=0x0190, f02=» c, 0 Ic8 c0 b c< @c< Ac$ c c> b @c> P c c c& cN c< c< b b c, :b " " " b dB 0 IdN dF @dR Ad2 d2 cB dN cD @cD `dP U
0x043770…043904 Dummy {f00=0x0015, f01=0x0190, f02=» v d8 cF cL c@ c@ dB : cDaNcBcHdTcHcJ
0x043904…043a98 Dummy {f00=0x0015, f01=0x0190, f02=» d 0 Id( d d* @b d* b d, @d( Ad @d* Ad @d, Ad d f d0 b @d0 P c" c2 b d, b `d, P cZ c @d( Ad @d* Ad @d. Ad @d, Ad d dB d0 b @d0
0x043a98…043c2c Dummy {f00=0x0015, f01=0x0190, f02=» b " " P e 0 Ie* e" e, d4 e Z @e* e2 `e2 @d6 P d d d8 e. d4 @d8 d4 d d: e. e Z @e* e2 `e2 @d< P d d d> e0 e d@ e0 e0 d2
0x043c2c…043dc0 Dummy {f00=0x0015, f01=0x0190, f02=»f U f `f @" U @f @f e e e> e4 f f " " e6 " e8 @e8 @" U f f f e8 @e< e8_2 f e: f j6 e4 e> @e4 P fV fZ f @" `f U fx f e6 @e< e6
0x043dc0…043f54 (0, 86) Dummy {f00=0x0015, f01=0x0190, f02=» j @j Ai @j Ai i l @j Ai @j Ai @j Ai @j Ai i of j" f @j" P gp i @j Ai @j Ai i l @j Ai i Z @j j" j" f @f @f T j" @f @f T @j" g g f j i @f @f
0x043f54…0440e8 Dummy {f00=0x0015, f01=0x0190, f02=» of j" f @j" P h h j `j j f `j P h h f j f `j T i gp f `j R j" `j @" Q @j" iX ih f j f `j
0x0440e8…04427c Dummy {f00=0x0015, f01=0x0190, f02=» j f j : f f f f kt 0 Ik kx j. j$ j0 j& kZ Z @k k `k @j2 T j j kP_2 @k Ak^ k^ l j& j. @j& P j j j. j$ kP kd
0x04427c…044410 Dummy {f00=0x0015, f01=0x0190, f02=»j(" k j*j(j(j,j*j( k 0 Il l l @k l k Z " l l l l @k l k Z " l l l k :l k l 0 Il l @l Al l Z @l l `l @l P ll
0x044410…0445a4 Dummy {f00=0x0015, f01=0x0190, f02=»n l `n P m m l n| : n @l n nr Z " n `n @l V mL mx n @l n nr Z " n n l m np l nv l l @l P m m @n Anx @n Anz nx l l
0x0445a4…044738 Dummy {f00=0x0015, f01=0x0190, f02=» Z " n l n l n| :l n l l o, 0 Io8 o0 @" @n P n n @o8 Ao( o( Z " o: n o: o8 " o" @o8 Ao( o( Z " o: " o: o8 " o, : n 0 1 2 3 4 5 6 7 8 9
0x044738…0448cc Dummy {f00=0x0015, f01=0x0190, f02=» o p< @r Aq @r Aq q v r oZ `r P p p( oZ o< r @o r q @oT @o^ P pZ pf " r q @oT @o` P p p " r q @oT @ob P r @oT @od P @r p q @r Aq @
0x0448cc…044a60 Dummy {f00=0x0015, f01=0x0190, f02=» P qV qn @r Aq q u o< q o r @r Ar r u o< q o o< oV @o< P q q r @o r o< r o< r : oVo>oT oX r r 0 Ir r @" @r
0x044a60…044bf4 (0, 87) Dummy {f00=0x0016, f01=0x0190, f02=» 0 Ist sl r r sd Z @st sx `sx @r T s s sR r @r r _B sd Z @st sx `sv `sx P sF sP r sh :_L r r r sh :r r u 0 Iu u @u Au u Z @u u `u @s|
0x044bf4…044d88 Dummy {f00=0x0016, f01=0x0190, f02=» u t @u Au u Z @u u u @s u u Z @u u `u `u P t t u @s u t u @s u @u Au u Z @u u @u Au @u Au u x u u Z u `u @s| P u u& s~ u s~ `u
0x044d88…044f1c Dummy {f00=0x0016, f01=0x0190, f02=»s v 0 Iv v " v `v @u P v v& @v Av v v v: @v Av v } v @v Av v u v | @u P vr v u u u v : `v @" P v _ u
0x044f1c…0450b0 Dummy {f00=0x0016, f01=0x0190, f02=»v v @x| Axf xf Z @xz x~ `x~ @v T w wr xZ x| @v x|_J @x| Axf xf Z @xz x~ x~ v @v @v R x~ @v @v Q @x~ w w xZ v @v v @v @v Q x~ @v @v P x @v @v V @x @x~
0x0450b0…045244 Dummy {f00=0x0016, f01=0x0190, f02=» % $ [ * A | 0 I| | x x x x x x | x |V Z @| | | x @x `| T | @x @x T @| y4 { x x @x @x P yZ yr @| A| |Z x { @x @x P | @x `| P @|
0x045244…0453d8 Dummy {f00=0x0016, f01=0x0190, f02=» z z2 @| A|p |n x { @x @x P zP z @| A|v @| A|z |v v | x @| P z z { { @x @x P | @x `| Q @| z {b x x |~ Z @| | | x @x @x P | @x @x P
0x0453d8…04556c Dummy {f00=0x0016, f01=0x0190, f02=» @| A| | x x x x @x x |V Z @| | | x x @x `| T { | x x |L @| A| | @x P |0 |D x x |L 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
0x04556c…045700 Dummy {f00=0x0016, f01=0x0190, f02=» T } }* }r | @| | _B @} A} @} A} } V @| Q }^ }p | | | } :_Z | | | } :| | | ~ 0 I~ ~ ~ @} } } @} R } } " } } ~ :
0x045700…045894 (0, 88) Dummy {f00=0x0016, f01=0x0190, f02=»~ ~ _2 ~ @~ ~ ^ Z @ @ A b @ A d b ~ _P @~ ~ @ A l @ A n j ~ @ A t @ A v r ~ @ A z @ A | @ A ~ z ~ @ A t @ A v r ~ ~ :~ ~( ~ ~"~$ ~"~& ~" ~"
0x045894…045a28 Dummy {f00=0x0016, f01=0x0190, f02=» Z @ 8 > 6 > : @ : * : * 0 I J B D L F Z @ ` @ J T @ A @ F F_N Z @ ` @ N P
0x045a28…045bbc Dummy {f00=0x0016, f01=0x0190, f02=» v @ J P _< B @ L Z @ H @ D B @ R Z @ D H D @ A @ A v @ J P ( @ B @ J Q D r B @ T Z @ B_J
0x045bbc…045d50 Dummy {f00=0x0016, f01=0x0190, f02=» : B @ L Z @ B @ L Z @ @ L B @ P F B @ R Z @ B @ L Z @ ` D D @ @ : F T F H T H F T D F T
0x045d50…045ee4 Dummy {f00=0x0016, f01=0x0190, f02=» 8 X @ Z F Z @ V ` @ P 8 X @ X @ X A B B Z @ V Z Z @ @ P 8 @ @ P $ 0 8 J : Z
0x045ee4…046078 Dummy {f00=0x0016, f01=0x0190, f02=» @ 6 A @ 8 A ` 4 @ d 4 " @ 6 A @ 8 A ` 8 b @ 6 A @ 8 A ` @ 2 A @ 4 A @ 6 A @ 8 A @ " Z @ 6 : 8 @ b @ d : @ 4 A Z @ 2 : ` : @ p P r
0x046078…04620c Dummy {f00=0x0016, f01=0x0190, f02=»IN OMATCH CAN'T HAPPEN A % ? $ [ N 0 I ` < @ A ~ ~ Z @ > @ A ~ ~ Z @ @ @ > @ ` P < : b B @ @ @ d P . x @ b Z @ @ >
0x04620c…0463a0 Dummy {f00=0x0016, f01=0x0190, f02=» @ @ h P @ > @ j T b B > @ @ @ l P & P @ > @ j P D L ` B > @ @ @ n P n @ b @ A @ b P b B > @ @ @ p P
0x0463a0…046534 (0, 89) Dummy {f00=0x0016, f01=0x0190, f02=» r @ B @ ` V t @ B b < < : t t > > r D ERROR IN PATSIZ CAN'T HAPPEN A % $ ? [ N * Z 0 I f ^ @ h A N N Z @ f j j @ @ P < H
0x046534…0466c8 Dummy {f00=0x0016, f01=0x0190, f02=» P j @ @ P @ j h @ j R Z @ f l l @ D @ @ P 0 < D V r Z : j 0 I @ A @ A ` ` P
0x0466c8…04685c Dummy {f00=0x0016, f01=0x0190, f02=» X Y Z @ - x 0 I | @ A 8 8 Z @ 2 @ 2 ` T @ 2 @ 6 T @ 2 @ 2 @ 8 P @ A < @ A > < @ A B @ A D @ A F @ 4 @ 2 @ : T 2 Z
0x04685c…0469f0 Dummy {f00=0x0016, f01=0x0190, f02=» @ @ A V @ A X @ A Z T 4 @ < Z @ @ A b ` r @ 6 Q & Z @ A b @ A d @ A f @ A h @ A j ` @ < Z @ @ A n l r @ 6 Q @
0x0469f0…046b84 Dummy {f00=0x0016, f01=0x0190, f02=» Z @ 2 z x : > 2 > : > p 0 I | t @ A h h Z @ ~ ` @ ` Q V @ _2 l Z @ ~
0x046b84…046d18 Dummy {f00=0x0016, f01=0x0190, f02=» 0 I @ @ @ A @ A @ A r @ A Z @ @ A @ A r @ @ U H ^ @ _2 Z @ @ A @ A @ A @ A
0x046d18…046eac Dummy {f00=0x0016, f01=0x0190, f02=»# $ U U W : 50 50 Aq Aq Aq Aq q Aq :o p,p p p SWALLOW CARD TIMEOUT (MULTIPLES OF 2.56 S) : TRANSMISSION TIMEOUT (MULTIPLES OF 2.56 S) : PIN LOADING TIMEOUT (MULTIPLES OF 2.56 S) : BUZZER TIMEOUT (MULTIPLES OF
0x046eac…047040 Dummy {f00=0x0016, f01=0x0190, f02=»$ / $$ PIN CALCULATION FIELDS : @d P` q a Z Y rl q r ( q a Z Y rf r rB " : @d P q q :PARTITION LENGTH IN BYTES ( HEXA ) : NUMBER OF PARTITIONS : !!CH $$ X:A$$ / $$ !!CH $$ X:B$$ $$ # 0 !00R !
0x047040…0471d4 (0, 90) Opaque[0x194]
0x0471d4…047368 # DirEnt {nam=»M:PROC«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x02d8, f03=0x0000}
0x0471d4…047368 IdxSect {
0x0471d4…047368 f00 = 0x0016 // 0x471d4 @0x0
0x0471d4…047368 f01 = 0x0004 // 0x471d6 @0x2
0x0471d4…047368 gno = [ // 0x471d8 @0x4
0x0471d4…047368 [0x00]: C0x0016.0x3.0
0x0471d4…047368 [0x01]: C0x0017.0x0.0
0x0471d4…047368 ]
0x0471d4…047368 }
0x047368…0474fc Dummy {f00=0x0016, 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=
0x0474fc…047690 Dummy {f00=0x0016, 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
0x047690…047824 Dummy {f00=0x0016, 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
0x047824…0479b8 Dummy {f00=0x0016, f01=0x018e, f02=» , POPT OUT=@MOUT=@M=,FC=@FC=F4,FT=M,INP=@M= PMOV @A=,/L,@AU 4 PRUN PDISC,0 A=@A= J , POPT OUT=@AOUT=@A,FC=@FC=F4,FT=A,INP=@A= d PMOV @C=,/A,@CU PRUN PDISC,0 C=@C= , POPT OUT=@COUT=@C=,FC=@FC=F4,FT=C,INP=@C= P$PDISCE P=@M=
0x0479b8…047b4c Dummy {f00=0x0016, f01=0x0190, 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
0x047b4c…047ce0 Dummy {f00=0x0016, f01=0x0190, f02=» d 0 PMES TO FLEXIBLE DISCS FOR PTS 8000 PMES < PMOV SUP,/L,SAG,/F0 H PKPF /L,SUP b PMOV CCI,/L,SAG,/F0 t PKPF /L,CCI PMOV CSEG1,/L,SAG,/F0 PKPF /L,CSEG1 PMOV CSEG2,/L,SAG,/F0 PKPF /L,CSEG2 PMOV CSEG
0x047ce0…047e74 (0, 91) Dummy {f00=0x0017, f01=0x0190, f02=»MOV CSEG7,/L,SAG,/F0 PKPF /L,CSEG7 PMOV CSEG8,/L,SAG,/F0 0 PKPF /L,CSEG8 L PMOV CSEG9,/L,SAG,/F0 ` PKPF /L,CSEG9 | PMOV CSEGA,/L,SAG,/F0 PKPF /L,CSEGA PMOV CSEGB,/L,SAG,/F0 PKPF /L,CSEGB PMOV CSEGC,/L,SAG,/F0
0x047e74…048008 Dummy {f00=0x0017, f01=0x0190, f02=»G,/F0 PKPF /L,SUP800 PMOV PMPTS,/L,SAG,/F0 $ PKPF /L,PMPTS @ PEND T P$SYS800A ` D PMES MOVE LOAD MODULES ETC FROM SAG TO A FLEXIBLEBLE DISC p 4 PMES TO USE THEM ON THE PTS-8000 SERIES. PMOV LED,/L,SAG,/F0
0x048008…04819c Dummy {f00=0x0017, f01=0x0190, f02=»0 | PKPF /L,DMPGEF PEND P$SYS800B , > PMES MOVE LOAD MODULES ETC FROM SAG TO A FLEXIBLE DISC < 0 PMES TO USE THEM ON THE PTS-8000 SERIES. ~ PMOV LKE,/L,SAG,/F0 PKPF /L,LKE PMOV EDIT,/L,SAG,/F0 PKPF /L,EDIT
0x04819c…048330 Dummy {f00=0x0017, f01=0x4124, f02=»,PDISC PMOV TOSSUT,/L,SAG,/F0 PKPF /L,TOSSUT , PMOV ASM,/L,SAG,/F0 B PKPF /L,ASM PMOV TLK,/L,SAG,/F0 n PKPF /L,TLK PMOV TRA,/L,SAG,/F0 PKPF /L,TRA PINC /OBJCT,SAG,/F0 PMOV SYSGEN,/L,SAG,/F0 PKPF /L,SYS
0x048330…0484c4 Dummy {f00=0x0017, 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
0x0484c4…048658 Dummy {f00=0x0017, 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
0x048658…0487ec Dummy {f00=0x0017, f01=0x0190, f02=» J F IDENT LRPINT REL 9.2 79-11-16 870105040920 J F " IHLKM LKM030 LKMRQE LKMERR LKMQDI IHRTC TIMQUE@ MONCLO IHPFARC R INIFLG IHLKM INTSAV PRUNN TTB:SA , ( A$ A
0x0487ec…048980 Dummy {f00=0x0017, f01=0x0190, f02=» 7$ W A V ( U LKMAL , LKMERR d < HALTN P * & Q P @ V L ` LKMRQE j LKMQDI r QTJOB TDISP IHRTC z , ( i U
0x048980…048b14 (0, 92) Opaque[0x194]
0x048b14…048ca8 # DirEnt {nam=»SUM «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x02e8, f03=0x0000}
0x048b14…048ca8 IdxSect {
0x048b14…048ca8 f00 = 0x0017 // 0x48b14 @0x0
0x048b14…048ca8 f01 = 0x0004 // 0x48b16 @0x2
0x048b14…048ca8 gno = [ // 0x48b18 @0x4
0x048b14…048ca8 [0x00]: C0x0017.0x1.0
0x048b14…048ca8 [0x01]: C0x0017.0x2.0
0x048b14…048ca8 ]
0x048b14…048ca8 }
0x048ca8…048e3c Dummy {f00=0x0017, f01=0x0190, f02=» 5 8 fY%w x b # g $ ^ : 9 i $ 7 f w |4r tV u 3 qC 5 * zuqV $ ' > P ZD o c r P| sV i % 9Zj Q > - D $ 4` 1P -8 T r tB l`Tg t z ^ lFZF H 2 Z j z
0x048e3c…048fd0 Dummy {f00=0x0017, f01=0x0190, f02=»R * Z ` D L R L A L W W ` * @ bV& L | ** - Z ` d h X 8 8 ( 8Y, W W : ( " f SUM 10.0 (800314) *** SAV
0x048fd0…049164 Dummy {f00=0x0017, f01=0x0190, f02=»1 357 41000 0SAVE D I S C ONTO MAGTAPE 0SAVE U S E R ONTO MAGTAPE 0MEMORY OVERFLOW STATISTICS TOTAL NUMBER OF SAVED USERS: SAVED FILES: SAVED GRANULES: A X z USERID: @ bV
0x049164…0492f8 Dummy {f00=0x0017, f01=0x0190, f02=» A v : A B @ bV T X 9! A | bV ( @ bV(W @ bV " T F Z2 @ bV @ V D F X _ A z :( " f SUM 10.0 (800314) *** SAV
0x0492f8…04948c Dummy {f00=0x0017, f01=0x0190, f02=»1 357 41000 0SAVE D I S C ONTO MAGTAPE 0SAVE U S E R ONTO MAGTAPE 0MEMORY OVERFLOW STATISTICS TOTAL NUMBER OF SAVED USERS: SAVED FILES: SAVED GRANULES: A USERID: @ bV T Z
0x04948c…049620 Dummy {f00=0x0017, f01=0x0190, f02=» STATUS WORD: @ * P WRITE PROTECTED @ * P NOT OPERABLE @ * P END OF TAPE ( < $" = A A ( : A B A D @( L A B A D < ! X !XXT L( ( @ L! : h A B A D (
0x049620…0497b4 (0, 93) Dummy {f00=0x0017, f01=0x0190, f02=»_ 0Z2 U ]@ YF< Y< ZT L A ` * R P b bZ : h bZ : F SA?? DISC FILE CODE ? OK ? LISTING OF FILENAMES ETC.? < $" = @ 0 A 0 A 2 A 0 : A 2W @ n A 2 A R A U "
0x0497b4…049948 Dummy {f00=0x0017, f01=0x0190, f02=» A 2 : ; [ [ [ Z Z Z : : < , = = $ - Y : - : " :d H - " H - :0123456789ABCDEF A 9h _@ - Y : @ nY : @ U " : @ A R _ : N A : J (
0x049948…049adc Dummy {f00=0x0017, f01=0x0190, f02=» 1 0Z2 U ]@ YF< Y< ZT L A ` R P b bZ : hPAGE: J F SA?? DISC FILE CODE ? OK ? LISTING OF FILENAMES ETC.? < $" = @ A A A : A W @ Z V Z W Z R` P WX
0x049adc…049c70 Dummy {f00=0x0017, f01=0x0190, f02=» 4X X [ Z _ TV 4P P _ lWJ U : l R O T O O W O U W W @ * @ A &P @ : _ _ _ 1^ _ 1Y P . 0^& Q *_8 W ?B?e + A "
0x049c70…049e04 Dummy {f00=0x0017, f01=0x0190, f02=»C P @ * XXXXING SECTOR: XXXX, STATUS WORD: XXXX ( READWRIT , %Q R Y W W Z ' [ : ; [ [ [ [ [ R Q @ - WJ @ - A R( X R X _ Q @ X A T -
0x049e04…049f98 Dummy {f00=0x0017, f01=0x0190, f02=» 8 P A_A ( A_1 ) { l A_A [ P [ T 4 A . @ 0 8A:a @ . 8A:a V [ T @ . Z [ 8 T Z & & T @ . Z 8 TB . F ' & F % G A_: = A_1
0x049f98…04a12c Dummy {f00=0x0017, f01=0x0190, f02=» [ U F A_;P [ _$ [ X Z @ . ! Z @ . H A_: , A_1X A_: _1 G^,U A_A @_1 . C ( A_1P A_A _ _ A l A A_A A_: = A
0x04a12c…04a2c0 Dummy {f00=0x0017, f01=0x0190, f02=»_2 _ G A_: , A_1X W A_: ( A_1 A_AT A_AW( A_A @_2 8A:a OQf @_2 . G A_: , A_1T0 : A_A @_2 8A:a PQ @_2 . G . F G U A_A A_: ) A_1P A_A
0x04a2c0…04a454 (0, 94) Opaque[0x194]
0x04a454…04a5e8 # DirEnt {nam=»RUM «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x02f8, f03=0x0000}
0x04a454…04a5e8 IdxSect {
0x04a454…04a5e8 f00 = 0x0017 // 0x4a454 @0x0
0x04a454…04a5e8 f01 = 0x0006 // 0x4a456 @0x2
0x04a454…04a5e8 gno = [ // 0x4a458 @0x4
0x04a454…04a5e8 [0x00]: C0x0017.0x3.0
0x04a454…04a5e8 [0x01]: C0x0018.0x0.0
0x04a454…04a5e8 [0x02]: C0x0018.0x1.0
0x04a454…04a5e8 ]
0x04a454…04a5e8 }
0x04a5e8…04a77c Dummy {f00=0x0017, f01=0x0190, f02=» 4 X 5 8 fY%w x b # g $ ^ : 9 i $ 7 f w |4r tV u 3 qC 5 * zuqV $ ' > P ZD o c r P| sV i % 9Zj Q > - D $ 4` 1P -8 T r tB l`Tg t z ^ lFZF H 2 Z j z
0x04a77c…04a910 Dummy {f00=0x0017, f01=0x0190, f02=» V b @ X D 4D;a<a * A A A R$S D L R( L A L 2 W v 0MT AT EOF! W H 2 A R Sr @ ^ _& @ V& 4 ** - &Z b N 0 8
0x04a910…04aaa4 Dummy {f00=0x0017, f01=0x0190, f02=» (800314) *** RESTORED FILES WITH GRANULE ADDRESSES ************** DATE OF RUN: YYMMDD 0RUM REL 10.0 DATE 80. 03. 14 12NC=8701 356 41000 0RESTORE D I S C FROM MAGTAPE 0RESTORE U S E R FROM MAGTAPE 0MEMORY OVERFLOW STATISTICS TOTAL NUMBER OF RESTOR
0x04aaa4…04ac38 Dummy {f00=0x0017, f01=0x0190, f02=» P zW D * A x @ Q @ lT T A W 0 0 A | A K @ 4 K K @ T W N 4 0 @ 0 @ | V @ V N H @ vT @
0x04ac38…04adcc Dummy {f00=0x0017, f01=0x0190, f02=» OVFL W v 0CATALOG OVFL @ $ 4 v WHEN CREATING USER UUUUUUUU NEW USERID: N:O OF FILES RESTORED:, N:O OF GRANULES ALLOCATED: zE D I S C FROM MAGTAPE 0RESTORE U S E R FROM MAGTAPE 0MEMORY OVERFLOW STATISTICS TOTAL NUMBER OF RESTOR
0x04adcc…04af60 Dummy {f00=0x0017, f01=0x0190, f02=» lT z T RW A | A A K V6 B @ K B @ 0 0 ~ J @ | 9! A t V P R P v 0DISC OVFL W X V8 | 9! W ! T V B T ~ | Z$ V AQ, @ @ ~
0x04af60…04b0f4 (0, 95) Dummy {f00=0x0018, f01=0x0190, f02=» 4 v* WHEN RESTORING FFFFFFTT OF USER UUUUUUUU V A v @ v d ~ J ]x _ W S v UNEXPECTED TAPE MARK A v v RESTORED FILE NO GOOD _ < $" = 8 A A ( : A A ( A A ! X !XX
0x04b0f4…04b288 Dummy {f00=0x0018, f01=0x0190, f02=» A W ! T _ !//T ( _ 0Z2 U ]@ YF< Y< ZT A R 8 P Z : Z : 0DISC?? DISC FILE CODE ? OK ? LISTING OF FILENAMES ETC.? < $" = @ A A j A :
0x04b288…04b41c Dummy {f00=0x0018, f01=0x0190, f02=» @ d #U. A b @ b A d f p @ 8 N A : ; [ [ [ Z Z Z : : < , = = $ - Y : - : " :d H l - " H l - :0123456789ABCDEF A 9h R _@ - Y : @ ` nY : @ dU : @ ` A `R Z_
0x04b41c…04b5b0 Dummy {f00=0x0018, f01=0x0190, f02=» A W ! T _ !//T 1 0Z2 U ]@ YF< Y< ZT A R P Z : PAGE: 0DISC?? DISC FILE CODE ? OK ? LISTING OF FILENAMES ETC.? < $" = @ A A A :
0x04b5b0…04b744 Dummy {f00=0x0018, f01=0x0190, f02=» : : W _" ~ n J 4X X [ Z _ ~ n JTV 4P P _ WJ U 4 : R O T O O W O U W W x A P @ : _ _ _ 1^ _ 1Y
0x04b744…04b8d8 Dummy {f00=0x0018, f01=0x0190, f02=» : A ]B v 0TOO MANY I/O ERRORS ON DISC P 4 @ v* XXXXING SECTOR: XXXX, STATUS WORD: XXXX ( READWRIT A ( @ P P,QT @ P0WH @ @ P> A Q8 ( ( _6 ( @ P W W @
0x04b8d8…04ba6c Dummy {f00=0x0018, f01=0x0190, f02=» v LENGTH ERROR _ ( : , %Q R Y W W Z ' [ : V T(= @ | M ~ A | _ @ | V I ~ _ U X W @ | R A | L ~ M ~9# Z : _ _ _ 1^ _ 1Y
0x04ba6c…04bc00 Dummy {f00=0x0018, f01=0x0190, f02=» : A ]B v 0TOO MANY I/O ERRORS ON DISC P 4 @ v* XXXXING SECTOR: XXXX, STATUS WORD: XXXX ( READWRIT A ( @ P P Q @ P W @ @ P A Q ( ( _6 ( @ P W W @ ;
0x04bc00…04bd94 (0, 96) Dummy {f00=0x0018, f01=0x0190, f02=» Z Z Z Z Z : :- 0123456789 d ' A A @ x 4 R" 4X @ x =C R 9 W - 9W: - 9W. ;c ` xQ( $ ,` A 5 <` @ x+ z @ x : W ~ M ~9# Z : _ _ _ 1^ _ 1Y
0x04bd94…04bf28 Dummy {f00=0x0018, f01=0x0190, f02=» A W ! T _ !//T ( _ 0Z2 U ]@ YF< Y< ZT A R 8 P Z : Z : 0DISC?? DISC FILE CODE ? OK ? LISTING OF FILENAMES ETC.? < $" = @ A A j A :
0x04bf28…04c0bc Dummy {f00=0x0018, f01=0x0190, f02=» @ d #U. A b @ b A d f p @ 8 N A : ; [ [ [ Z Z Z : : < , = = $ - Y : - : " :d H l - " H l - :0123456789ABCDEF A 9h R _@ - Y : @ ` nY : @ dU : @ ` A `R Z_
0x04c0bc…04c250 Dummy {f00=0x0018, f01=0x0190, f02=» A W ! T _ !//T 1 0Z2 U ]@ YF< Y< ZT A R P Z : PAGE: 0DISC?? DISC FILE CODE ? OK ? LISTING OF FILENAMES ETC.? < $" = @ A A A :
0x04c250…04c3e4 Dummy {f00=0x0018, f01=0x0190, f02=» : : W _" ~ n J 4X X [ Z _ ~ n JTV 4P P _ WJ U 4 : R O T O O W O U W W x A P @ : _ _ _ 1^ _ 1Y
0x04c3e4…04c578 Dummy {f00=0x0018, f01=0x0190, f02=» : A ]B v 0TOO MANY I/O ERRORS ON DISC P 4 @ v* XXXXING SECTOR: XXXX, STATUS WORD: XXXX ( READWRIT A ( @ P P,QT @ P0WH @ @ P> A Q8 ( ( _6 ( @ P W W @
0x04c578…04c70c Dummy {f00=0x0018, f01=0x0190, f02=» v LENGTH ERROR _ ( : , %Q R Y W W Z ' [ : V T(= @ | M ~ A | _ @ | V I ~ _ U X W @ | R A | L ~ M ~9# Z : _ _ _ 1^ _ 1Y
0x04c70c…04c8a0 Dummy {f00=0x0018, f01=0x0190, f02=» : A ]B v 0TOO MANY I/O ERRORS ON DISC P 4 @ v* XXXXING SECTOR: XXXX, STATUS WORD: XXXX ( READWRIT A ( @ P P Q @ P W @ @ P A Q ( ( _6 ( @ P W W @ ;
0x04c8a0…04ca34 (0, 97) Opaque[0x194]
0x04ca34…04cbc8 # DirEnt {nam=»DUMPA «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0310, f03=0x0000}
0x04ca34…04cbc8 IdxSect {
0x04ca34…04cbc8 f00 = 0x0018 // 0x4ca34 @0x0
0x04ca34…04cbc8 f01 = 0x000a // 0x4ca36 @0x2
0x04ca34…04cbc8 gno = [ // 0x4ca38 @0x4
0x04ca34…04cbc8 [0x00]: C0x0018.0x2.0
0x04ca34…04cbc8 [0x01]: C0x0018.0x3.0
0x04ca34…04cbc8 [0x02]: C0x0019.0x0.0
0x04ca34…04cbc8 [0x03]: C0x0019.0x1.0
0x04ca34…04cbc8 [0x04]: C0x0019.0x2.0
0x04ca34…04cbc8 ]
0x04ca34…04cbc8 }
0x04cbc8…04cd5c Dummy {f00=0x0018, f01=0x0190, f02=» l #2 5 8 fY%w x b # g $ ^ : 9 i $ 7 f w |4r tV u 3 j @ @ h @ z @ FLT T W A l A rQ P A v_B z A tT A r :
0x04cd5c…04cef0 Dummy {f00=0x0018, f01=0x0190, f02=»_ @ v P d A v : < d = v = R 0W 1 v Y Y = YF> X d J 4 ` NO DATA.W ` END OF VOLUME W ` END OF TAPE Wn ` BEGIN OF TAPE WL ` END OF SEGMENT A nW ` END OF FILE A p A n
0x04cef0…04d084 Dummy {f00=0x0018, f01=0x0190, f02=»G W % ` PARITY ERRORW DUMP IN ^ BLOCK NO: SIZE: UNKNOWN STATUS WORD: BLOCKS SKIPPED. PRINTED: ' U8 ! T v ! T v 4 4 ~# T . 9 Y< F " v d " v Q
0x04d084…04d218 Dummy {f00=0x0018, f01=0x0190, f02=»" = @ A A A : A W @ n A A , A U , ( @ @ A A h ( : U h W @ #U. A @ 1 A p @ l A : ; [ [ [ Z Z Z : : < , = = $ -
0x04d218…04d3ac Dummy {f00=0x0018, f01=0x0190, f02=» @ U : @ A R _ : 1 A : $ SIZE: UNKNOWN STATUS WORD: BLOCKS SKIPPED. PRINTED: ' U8 ! T ! T 1 4 # T . 9 Y< F " " Q
0x04d3ac…04d540 Dummy {f00=0x0018, f01=0x0190, f02=»" = @ A A A : A W @ ! R ?U : : $ - - Y : @ 4 Q $ 1 ^ ` 1 Y j d ~ d $ d T T d ^ @ @
0x04d540…04d6d4 (0, 98) Dummy {f00=0x0018, f01=0x0190, f02=»ME: : : FORMAT: R EDITDT EDLOOP DATFLD SLASK CVALOP TIMFLD LOOP TXT5 j TXT5:L TXT6 ~ TXT6:L TXT1 TXT1:L $ LOOOP : TXTAB LENTAB TXT4 TXT3 TXT2 TXT4:L TXT3:L TXT2:L A A l !AAPN !EE
0x04d6d4…04d868 Dummy {f00=0x0018, f01=0x0190, f02=» A A A W ` A ^ " : 0 d : [ R 8 !--P # 0Z Y" W W 9H [ : 4 Q $ d !SST@ vR<Q l vU0 vR P 9 _ rW t l / "( A z_ A ( A A
0x04d868…04d9fc Dummy {f00=0x0018, f01=0x0190, f02=» ASCII OR EBCDIC ? ASCII OR HEXA/ASCII ? C: Q1:L yECB QUEST1 GETPAR l HEXAQA TABLEN MOVTAB LOOP EBCDIC FMTFLG HEXAQE Q2:L QUEST2 RETURN T NOHEXA 8 RORDER V COMND SCLAB ` INPREQ ^ PRMPTP " QUESTN 0 GET
0x04d9fc…04db90 Dummy {f00=0x0018, f01=0x0190, f02=» LKM3 PROMPT PRPT:L IBF:L SPALOP L LOOPP l L001 | L002 ~ CTWECB TEXT1 CODE1 CODE2 ASCII A @ FDP 1 ! ( : @ FDP ! ( 1 @ FDT @ C A C W ( : 1 ( B @ FDT" T$ @ C A
0x04db90…04dd24 Dummy {f00=0x0018, f01=0x0190, f02=» "( B T : C C ( LP NOT OPERABLE . x LOOP EBCDIC FMTFLG HEXAQE Q2:L QUEST2 R C C ( $ : &CASETTE:E1
0x04dd24…04deb8 Dummy {f00=0x0018, f01=0x0190, f02=» - ! - - D - ( B R : @ ) D _ E1TK E4MT F4FD F5FD F6FD F7FD FILECODE: XX NOT OPERABLE A C ! @ FDT T @ C A
0x04deb8…04e04c Dummy {f00=0x0018, f01=0x0190, f02=» ( B T : C C ( LP NOT OPERABLE x LOOP EBCDIC FMTFLG HEXAQE Q2:L QUEST2 R C C ( $ : &CASETTE:E1
0x04e04c…04e1e0 Dummy {f00=0x0018, f01=0x0190, f02=» - - - D - ( B R : @ ) D _ E1TK E4MT F4FD F5FD F6FD F7FD FILECODE: XX NOT OPERABLE A C @ FDT T @ C A
0x04e1e0…04e374 (0, 99) Dummy {f00=0x0019, f01=0x0190, f02=» ( B T : C C ( LP NOT OPERABLE x LOOP EBCDIC FMTFLG HEXAQE Q2:L QUEST2 R C C ( $ : &CASETTE:E1
0x04e374…04e508 Dummy {f00=0x0019, f01=0x0190, f02=» - - - D - ( B R : @ ) D _ E1TK E4MT F4FD F5FD F6FD F7FD FILECODE: XX NOT OPERABLE A C @ FDT T @ C A
0x04e508…04e69c Dummy {f00=0x0019, f01=0x0190, f02=» ( B T : C C ( LP NOT OPERABLE x LOOP EBCDIC FMTFLG HEXAQE Q2:L QUEST2 R C C ( $ : &CASETTE:E1
0x04e69c…04e830 Dummy {f00=0x0019, f01=0x0190, f02=» - - - D - ( B R : @ ) D _ E1TK E4MT F4FD F5FD F6FD F7FD FILECODE: XX NOT OPERABLE A C @ FDT T @ C A
0x04e830…04e9c4 Dummy {f00=0x0019, f01=0x0190, f02=» ( B T : C C ( LP NOT OPERABLE x LOOP EBCDIC FMTFLG HEXAQE Q2:L QUEST2 R C C ( $ : &CASETTE:E1
0x04e9c4…04eb58 Dummy {f00=0x0019, f01=0x0190, f02=» - - - D - ( B R : @ ) D _ E1TK E4MT F4FD F5FD F6FD F7FD FILECODE: XX NOT OPERABLE A C @ FDT T @ C A
0x04eb58…04ecec Dummy {f00=0x0019, f01=0x0190, f02=» ( B T : C C ( LP NOT OPERABLE x LOOP EBCDIC FMTFLG HEXAQE Q2:L QUEST2 R C C ( $ : &CASETTE:E1
0x04ecec…04ee80 Dummy {f00=0x0019, f01=0x0190, f02=» - - - D - ( B R : @ ) D _ E1TK E4MT F4FD F5FD F6FD F7FD FILECODE: XX NOT OPERABLE A C @ FDT T @ C A
0x04ee80…04f014 (0, 100) Dummy {f00=0x0019, f01=0x0190, f02=» ( B T : C C ( LP NOT OPERABLE x LOOP EBCDIC FMTFLG HEXAQE Q2:L QUEST2 R ! ( $ : &CASETTE:E1
0x04f014…04f1a8 Dummy {f00=0x0019, f01=0x0190, f02=» - - - D - ( B R : @ ) D _ E1TK E4MT F4FD F5FD F6FD F7FD FILECODE: XX NOT OPERABLE A C @ FDT T @ C A
0x04f1a8…04f33c Dummy {f00=0x0019, f01=0x0190, f02=» ( B T : C C ( LP NOT OPERABLE x LOOP EBCDIC FMTFLG HEXAQE Q2:L QUEST2 R ( $ : &CASETTE:E1
0x04f33c…04f4d0 Dummy {f00=0x0019, f01=0x0190, f02=» - - - D - ( B R : @ ) D _ E1TK E4MT F4FD F5FD F6FD F7FD FILECODE: XX NOT OPERABLE A C @ FDT T @ C A
0x04f4d0…04f664 Dummy {f00=0x0019, f01=0x0190, f02=» ( B T : C C ( LP NOT OPERABLE x LOOP EBCDIC FMTFLG HEXAQE Q2:L QUEST2 R ( $ : &CASETTE:E1
0x04f664…04f7f8 Dummy {f00=0x0019, f01=0x0190, f02=» - - - D - ( B R : @ ) D _ E1TK E4MT F4FD F5FD F6FD F7FD FILECODE: XX NOT OPERABLE A C @ FDT T @ C A
0x04f7f8…04f98c Dummy {f00=0x0019, f01=0x0190, f02=» ( B T : C C ( LP NOT OPERABLE x LOOP EBCDIC FMTFLG HEXAQE Q2:L QUEST2 R ( $ : &CASETTE:E1
0x04f98c…04fb20 Dummy {f00=0x0019, f01=0x0190, f02=» - - - D - ( B R : @ ) D _ E1TK E4MT F4FD F5FD F6FD F7FD FILECODE: XX NOT OPERABLE A C @ FDT T @ C A
0x04fb20…04fcb4 (0, 101) Dummy {f00=0x0019, f01=0x0190, f02=» ( B T : C C ( LP NOT OPERABLE x LOOP EBCDIC FMTFLG HEXAQE Q2:L QUEST2 R ( $ : &CASETTE:E1
0x04fcb4…04fe48 Dummy {f00=0x0019, f01=0x0190, f02=» - - - D - ( B R : @ ) D _ E1TK E4MT F4FD F5FD F6FD F7FD FILECODE: XX NOT OPERABLE A C @ FDT T @ C A
0x04fe48…04ffdc Dummy {f00=0x0019, f01=0x0190, f02=» ( B T : C C ( LP NOT OPERABLE x LOOP EBCDIC FMTFLG HEXAQE Q2:L QUEST2 R ( $ : &CASETTE:E1
0x04ffdc…050170 Dummy {f00=0x0019, f01=0x0190, f02=» - - - D - ( B R : @ ) D _ E1TK E4MT F4FD F5FD F6FD F7FD FILECO ; [ [ [ [ [ R Q @1 - WJ @1 - A1 R( X1 R X1 _ Q @1 X A1 T1
0x050170…050304 Dummy {f00=0x0019, f01=0x0190, f02=» !$*); ??? &%->? :#@'=" ABCDEFGHI JKLMNOPQR STUVWXYZ 0123456789 ( R * 2| Y _ : ~ & P$ U ?V W _ vW 2 dW $UN # v v : $ : &CASETTE:E1
0x050304…050498 Dummy {f00=0x0019, f01=0x0190, f02=» - - - D - ( B R : @ ) D _ E1TK E4MT F4FD F5FD F6FD F7FD FILECODE: XX NOT OPERABLE A C @ FDT T @ C A
0x050498…05062c Dummy {f00=0x0019, f01=0x0190, f02=» ( B T : C C ( LP NOT OPERABLE x LOOP EBCDIC FMTFLG HEXAQE Q2:L QUEST2 R ( $ : &CASETTE:E1
0x05062c…0507c0 Dummy {f00=0x0019, f01=0x0190, f02=» - - - D - ( B R : @ ) D _ E1TK E4MT F4FD F5FD F6FD F7FD FILECODE: XX NOT OPERABLE A C @ FDT T @ C A
0x0507c0…050954 (0, 102) Opaque[0x194]
0x050954…050ae8 # DirEnt {nam=»OBX «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0338, f03=0x0000}
0x050954…050ae8 IdxSect {
0x050954…050ae8 f00 = 0x0019 // 0x50954 @0x0
0x050954…050ae8 f01 = 0x0018 // 0x50956 @0x2
0x050954…050ae8 gno = [ // 0x50958 @0x4
0x050954…050ae8 [0x00]: C0x0019.0x3.0
0x050954…050ae8 [0x01]: C0x001a.0x0.0
0x050954…050ae8 [0x02]: C0x001a.0x1.0
0x050954…050ae8 [0x03]: C0x001a.0x2.0
0x050954…050ae8 [0x04]: C0x001a.0x3.0
0x050954…050ae8 [0x05]: C0x001b.0x0.0
0x050954…050ae8 [0x06]: C0x001b.0x1.0
0x050954…050ae8 [0x07]: C0x001b.0x2.0
0x050954…050ae8 [0x08]: C0x001b.0x3.0
0x050954…050ae8 [0x09]: C0x001c.0x0.0
0x050954…050ae8 [0x0a]: C0x001c.0x1.0
0x050954…050ae8 [0x0b]: C0x001c.0x2.0
0x050954…050ae8 ]
0x050954…050ae8 }
0x050ae8…050c7c Dummy {f00=0x0019, f01=0x0190, f02=» [ X R p X T0 x <~< ^ ^:^T^x^ ^ _ _ T0 * _ 8 0 d 0 0 $ 0 D F 0
0x050c7c…050e10 Dummy {f00=0x0019, f01=0x0190, f02=»
[…0x4…]
0x051460…0515f4 (0, 103) Dummy {f00=0x001a, f01=0x0190, f02=»
[…0x2…]
0x05191c…051ab0 Dummy {f00=0x001a, f01=0x0190, f02=» *UD* *MD*
0x051ab0…051c44 Dummy {f00=0x001a, f01=0x0190, f02=»
[…0x7…]
0x052750…0528e4 Dummy {f00=0x001a, f01=0x0190, f02=» ! !
0x0528e4…052a78 Dummy {f00=0x001a, f01=0x0190, f02=»
[…0x12…]
0x0546e0…054874 (0, 107) Dummy {f00=0x001b, f01=0x0190, f02=»
[…0x2…]
0x054b9c…054d30 Dummy {f00=0x001b, f01=0x0190, f02=» ! !
0x054d30…054ec4 Dummy {f00=0x001b, f01=0x0190, f02=»
[…0x15…]
0x056fe8…05717c Dummy {f00=0x001b, f01=0x0190, f02=» 0 0 0 0 0 0 0" $ & ( '00 0 ! # % ' $ 100 80-03-14MODULEIDENT=YYMMDDENTRY REFERRED FROM M
0x05717c…057310 Dummy {f00=0x001b, f01=0x0190, f02=» STATISTICS E $ * 0 6 < B H J 0 ijk J 0 JB6B % _ _ _ F " A 1 1 , P PA PA P P 1 4 h J b 1 P PE P PD PC P P PC P P P@ P P PC P P ED
0x057310…0574a4 Dummy {f00=0x001b, f01=0x0190, f02=»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 Q$ R R0Q RA S R* S QR_ 0P PW 0P0Q 0QP P 4 "@ @ @ 4 $ A 1 "1 " 1 1 DC E 4 c&1 . ` 4 @`
0x0574a4…057638 Dummy {f00=0x001b, f01=0x0190, f02=»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 P0P PA 4 4 UE h J b U G U U 4 SG R G(RA RIW 0RA 0HR RH P G(PA Q R W Q R p q r s t u v w x y + S A R0R PA& RA*4 @
0x057638…0577cc Dummy {f00=0x001b, f01=0x0190, f02=»MBOLS* UNDEFINED *INPUT I/O ERROR* MULTIDEFINED ** UNREFERENCED *DOUBLE DEF MODULEINPUT FORMAT ERRORNAMES AREA OVERFLOWCHAIN ITEM AREA OVERFLOWINTERNAL ERROR IN INPUT ROUTINE -TTTT9 $ % # & Q la 0 # % 0 S: X ! $ & S ob
0x0577cc…057960 Dummy {f00=0x001b, f01=0x0190, f02=»= 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 1 OBX REL= d . e f 8701 378 4 d _ p q r ( s 0 t 8 u @ v H w P x X y ` z h { ( OBJECT CROSS REFERENCE: 8 ob G h J W DATE: i - j - k f
0x057960…057af4 (0, 111) Dummy {f00=0x001c, f01=0x0190, f02=» 0 flc f d f d ( W W W > i* i i % Y m C n. & R V C n. h ' ( gZ( $ i^ P C C h i / "!@P n. C B h~ & % _ i W i i n. / W i h x g
0x057af4…057c88 Dummy {f00=0x001c, f01=0x0190, f02=» C W4781"&$ 39#$;< i B n. 'W i ( W C C C ( ' Pl i I "%@T^ B P B PR B 5W B TD P B % P C + j B P ! T B B U ( 5 _ "( l V I C B :( ' P i I : 6 V ?d ( # V "
0x057c88…057e1c Dummy {f00=0x001c, f01=0x0190, f02=» #? o ;D:B : n. C : m #0 T & C C : C C V W V Q (W Q W Q W j j 4 ! P T 0P(W$ 8 C S W C C 0 P C ;a 6 4 ZH T : 49d_Z B@5 @
0x057e1c…057fb0 Dummy {f00=0x001c, f01=0x0190, f02=» Lk R R _ R _ # Q R V > _V ' P _d P & 1 P 1_ , @ - R T U :B@ ' d k l l l m$m l m r.p p q0t4u u l mHmHm m m l m m x }>| |`| }>|:l m m m m l l l l @ t , V
0x057fb0…058144 Dummy {f00=0x001c, f01=0x0190, f02=»YPP > @l0] @l0]f 8_l ( 2 P W _ 2 # P LcjP " 2 P V D ! R T P _l 8^: Dl ! Pn DcxPh 6 7_* 2 # PR LclPL n. 2" &]P R W ^^ $! 6P Q $ T P DcjP _z _j _ _ _ 6 7
0x058144…0582d8 Dummy {f00=0x001c, f01=0x0190, f02=» W< 6 2 " T v n. : " # o ;b , (V ; [ n. Z H (;AR H & z ;AV: Z H # o ; 6 n. : & & Z 4 o : ,P T 4W
0x0582d8…05846c Dummy {f00=0x001c, f01=0x0190, f02=» 7 : 4 ( ; V Y : 2! : 2 6 " # o ;b ; : W # " T & T + : * & !@P `1` P q Q ; 8 V W Q P # P ! P 4 V W Q P
0x05846c…058600 Dummy {f00=0x001c, f01=0x0190, f02=»T 9e! = K : #0 P8" T * & : * & !`P :J +_ +Q q _0 , V W R V W R XV W 1 ^ _0 R W ( V W Q P W ! W V P , V W Q P W $ W V P T
0x058600…058794 (0, 112) Dummy {f00=0x001c, f01=0x0190, f02=» 9 : & P Q r ,^ , < r # ; [ _n' d V W V 4! P < S S S X 4 9d * & ! R + : V W R 4 0R Y 7 Y& P Z,;D 9_8 8 _< V W YL T 9 : &9d
0x058794…058928 Dummy {f00=0x001c, f01=0x0190, f02=» 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 + : & 6 [ [ [ [ $ [ [ >h ; w r. w r. w p
0x058928…058abc Dummy {f00=0x001c, f01=0x0190, f02=» I Z ! : 4 P 9 59D_ ! :d" 5 : 0 !0 " Tz *V &V PP= ;@ R P W ;a=a P " R & R V T W V E + : & 6 [ [ [ [ $ [
0x058abc…058c50 Dummy {f00=0x001c, f01=0x0190, f02=» _ T { [ w w [ QB [ w p { R [ _ w p w u Z ! Z $ Z %_P [ Q* w p w q R [ Z { w p z 9e! W Z : V I _ , " -! 9H X" ,9 -9d_ Z H D & H D % [
0x058c50…058de4 Dummy {f00=0x001c, f01=0x0190, f02=»y { { y y x 6W4 K K K K : n. xV xF x n y P 2 " T W "@T '?W "? Hx " K :e J J " J _T Z ; 6 [ 7 J Q : Z 7 : Pd 4
0x058de4…058f78 Dummy {f00=0x001c, f01=0x0190, f02=» + n. [ [ < !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 ! XBW *X& FWF :P # U J 1 zX !00 ;_ _ 9P F " X<# ; W )0_@ J R
0x058f78…05910c Dummy {f00=0x001c, f01=0x0190, f02=»zX 8 !++P !-- z ;$# + ^" _( Z z^. PT*AXYZ9 y2 { : ! P ! P ! P ! P n. ! P m W : ! )P9H " # T &W &" :I : |. : P & _ &X _ : : : : ~H x : { : ~0$0T
0x05910c…0592a0 Dummy {f00=0x001c, f01=0x0190, f02=» _( : ~0$0TH $ R W R # P W ) V E ~H$0T Wp W W ( ~0 [ ~H : Z !0 , !0P2 0 > 4 R :d" 8 R ! :DW ! 9 R R Y, : rL : n. n.#03 T jP kT T : &
0x0592a0…059434 (0, 113) Dummy {f00=0x001c, f01=0x0190, f02=»W ( ~d p *1 TID ADDR OP CR LVL MODIFIED OPERAND CREDIT 2.1 TRACE * A~dT ~X ( A~ A~d( ~d p A~ ) Y V A~h ~l V _ v A~ : ~ Wr ~ 2 n.
0x059434…0595c8 Dummy {f00=0x001c, f01=0x0190, f02=» 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~f A~j ER A~~ R A~ ~ R 4 4 A~ ~ U 4 - _ ~~ @~ lb ILLEGAL OPERATION MIXED ARITHMETIC ILLEGA
0x0595c8…05975c Dummy {f00=0x001c, f01=0x0190, f02=»ERFLOW INDEX OVERFLOW ILL INDEX TYPE DIV BY ZERO EDIT BUFFER OVFL EDIT PICTURE OVERFLOW "ALLOCATION ERR AT INITIALIZATION ILLEGAL INSTRUCTION ADDRESS ILLEGAL FORMAT CODE NO FIX BUFFER ALLOCATED FIX BUFFER NOT ALLOWED ILLEGAL CONTROL CODE ILLEGAL IN
0x05975c…0598f0 Dummy {f00=0x001c, f01=0x0190, f02=» _ <a R f <a V : ( P W W W W W W W W W W W W ~ ** A~f A~j ERIDENT ( d n. J G ' n. J G ' n. J G ' l n. n. @ PB @ $;m @ P P $ + Y @
0x0598f0…059a84 Dummy {f00=0x001c, f01=0x0190, f02=»P P % A dW A A @ ' l ( : ( B RBP T2! T>W4 @ ! P4 U ! T( A B A B A : A : A : d_^ n. &9! ' l : ( v N @ X W 7 W N P <!@P ] ]
0x059a84…059c18 Dummy {f00=0x001c, f01=0x0190, f02=» Z h * & K [ * & i [ 6 * & [ d * & [ * & [ * &
0x059c18…059dac Dummy {f00=0x001c, f01=0x0190, f02=» [ x * & Y * & w D * & r * & * & * &
0x059dac…059f40 Dummy {f00=0x001c, f01=0x4090, f02=» * & !g ] $ $ ! ] R !g! ] z@ ] r * & * & * &
0x059f40…05a0d4 (0, 114) Opaque[0x194]
0x05a0d4…05a268 # DirEnt {nam=»PDISC «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0398, f03=0x0000}
0x05a0d4…05a268 IdxSect {
0x05a0d4…05a268 f00 = 0x001c // 0x5a0d4 @0x0
0x05a0d4…05a268 f01 = 0x0010 // 0x5a0d6 @0x2
0x05a0d4…05a268 gno = [ // 0x5a0d8 @0x4
0x05a0d4…05a268 [0x00]: C0x001c.0x3.0
0x05a0d4…05a268 [0x01]: C0x001d.0x0.0
0x05a0d4…05a268 [0x02]: C0x001d.0x1.0
0x05a0d4…05a268 [0x03]: C0x001d.0x2.0
0x05a0d4…05a268 [0x04]: C0x001d.0x3.0
0x05a0d4…05a268 [0x05]: C0x001e.0x0.0
0x05a0d4…05a268 [0x06]: C0x001e.0x1.0
0x05a0d4…05a268 [0x07]: C0x001e.0x2.0
0x05a0d4…05a268 ]
0x05a0d4…05a268 }
0x05a268…05a3fc Dummy {f00=0x001c, f01=0x0190, f02=» > :T( 5 8 fY%w x b # g $ ^ : 9 i $ 7 f w |4r tV u 3 qC 5 * zuqV $ ' > P ZD o c r P| sV i % 9Zj Q > - D $ 4` 1P -8 T r tB l`Tg t z ^ lFZF H 2 Z j z
0x05a3fc…05a590 Dummy {f00=0x001c, f01=0x0190, f02=» 4c @]u N d 2Z $"z y L / y N Dl` n $ @ 4Z wL a [ ? d d% L & "~ T &b CCn 1 d J < R:R: ` T l` % l`zF :| Fb fvzn : v ` ^* D3bH P D' >~ `" f >~ $' d p 4d @ B
0x05a590…05a724 Dummy {f00=0x001c, f01=0x0190, f02=» ^F < 5 8 fY%w x b # g $ ^ : 9 i $ 7 f w |4r tV u 3 qC 5 * zuqV $ ' > P ZD o c r P| sV i % 9Zj Q > - D $ 4` 1P -8 T r tB l`Tg t z ^ lFZF H 2 Z j z
0x05a724…05a8b8 Dummy {f00=0x001c, f01=0x0190, f02=» 4c @]u N d 2Z $"z y L / y N Dl` n $ @ 4Z wL a [ ? d d% L & "~ T &b CCn 1 d J < R:R: ` T l` % l`zF :| Fb fvzn : v ` ^* D3bH P D' >~ `" f >~ $' d p 4d @ B
0x05a8b8…05aa4c Dummy {f00=0x001c, f01=0x0190, f02=» ^F < 5 8 fY%w x b # g $ ^ : 9 i $ 7 f w |4r tV u 3 qC 5 * zuqV $ ' > P ZD o c r P| sV i % 9Zj Q > - D $ 4` 1P -8 T r tB l`Tg t z ^ lFZF H 2 Z j z
0x05aa4c…05abe0 Dummy {f00=0x001c, f01=0x0190, f02=» 4c @]u N d 2Z $"z y L / y N Dl` n $ @ 4Z wL a [ ? d d% L & "~ T &b CCn 1 d J < R:R: ` T l` % l`zF :| Fb fvzn : v ` ^* D3bH P D' >~ `" f >~ $' d p 4d @ B
0x05abe0…05ad74 (0, 115) Dummy {f00=0x001d, f01=0x0190, f02=» ^F < 5 8 fY%w x b # g $ ^ : 9 i $ 7 f w |4r tV u 3 qC 5 * zuqV $ ' > P ZD o c r P| sV i % 9Zj Q > - D $ 4` 1P -8 T r tB l`Tg t z ^ lFZF H 2 Z j z
0x05ad74…05af08 Dummy {f00=0x001d, f01=0x0190, f02=» 4c @]u N d 2Z $"z y L / y N Dl` n $ @ 4Z wL a [ ? d d% L & "~ T &b CCn 1 d J < R:R: ` T l` % l`zF :| Fb fvzn : v ` ^* D3bH P D' >~ `" f >~ $' d p 4d @ B
0x05af08…05b09c Dummy {f00=0x001d, f01=0x0190, f02=» ^F < 5 8 fY%w x b # g $ ^ : 9 i $ 7 f w |4r tV u 3 qC 5 * zuqV $ ' > P ZD o c r P| sV i % 9Zj Q > - D $ 4` 1P -8 T r tB l`Tg t z ^ lFZF H 2 Z j z
0x05b09c…05b230 Dummy {f00=0x001d, f01=0x0190, f02=» 4c @]u N d 2Z $"z y L / y N Dl` n $ @ 4Z wL a [ ? d d% L & "~ T &b CCn 1 d J < R:R: ` T l` % l`zF :| Fb fvzn : v ` ^* D3bH P D' >~ `" f >~ $' d p 4d @ B
0x05b230…05b3c4 Dummy {f00=0x001d, f01=0x0190, f02=» ^F < 5 8 fY%w x b # g $ ^ : 9 i $ 7 f w |4r tV u 3 qC 5 * zuqV $ ' > P ZD o c r P| sV i % 9Zj Q > - D $ 4` 1P -8 T r tB l`Tg t z ^ lFZF H 2 Z j z
0x05b3c4…05b558 Dummy {f00=0x001d, f01=0x0190, f02=» :01 p 2Z $"z y L / y N Dl` n $ @ 4Z wL a [ ? d d% L & "~ T &b CCn 1 d J < R:R: ` T l` % l`zF :| Fb fvzn : v ` ^* D3bH P D' >~ `" f >~ $' d p 4d @ B
0x05b558…05b6ec Dummy {f00=0x001d, f01=0x0190, f02=» ^F < 5 8 fY%w x b # g $ ^ : 9 i $ 7 f w |4r tV u 3 qC 5 * zuqV $ ' > P ZD o c r P| sV i 9Zj Q > - D $ 4` 1P -8 T r tB l`Tg t z ^ lFZF H 2 Z j z
0x05b6ec…05b880 Dummy {f00=0x001d, f01=0x0190, f02=» :01 2Z $"z y L / y N Dl` n $ @ 4Z wL a [ ? d d% L & "~ T &b CCn 1 d J < R:R: ` T l` % l`zF :| Fb fvzn : v ` ^* D3bH P D' >~ `" f >~ $' d p 4d @ B
0x05b880…05ba14 (0, 116) Dummy {f00=0x001d, f01=0x0190, f02=» P w |4r tV u 3 qC 5 * zuqV $ ' > P ZD o c r P| sV i 9Zj Q > - D $ 4` 1P -8 T r tB l`Tg t z ^ lFZF H 2 Z j z
0x05ba14…05bba8 Dummy {f00=0x001d, f01=0x0190, f02=» :01 2Z $"z y L / y N Dl` n $ @ 4Z wL a [ ? d d% L & "~ T &b CCn 1 d J < R:R: ` T l` % l`zF :| Fb fvzn : v ` ^* D3bH P D' >~ `" f >~ $' d p 4d @ B
0x05bba8…05bd3c Dummy {f00=0x001d, f01=0x0190, f02=» P w |4r tV u 3 qC 5 * zuqV $ ' > P ZD o c r P| sV i 9Zj Q > - D $ 4` 1P -8 T r tB l`Tg t z ^ lFZF H 2 Z j z
0x05bd3c…05bed0 Dummy {f00=0x001d, f01=0x0190, f02=» :01 2Z $"z y L / y N Dl` n $ @ 4Z wL a [ ? d d% L & "~ T &b CCn 1 d J < R:R: ` T l` % l`zF :| Fb fvzn : v ` ^* D3bH P D' >~ `" f >~ $' d p 4d @ B
0x05bed0…05c064 Dummy {f00=0x001d, f01=0x0190, f02=» P w |4r tV u 3 qC 5 * zuqV $ ' > P ZD o c r P| sV i 9Zj Q > - D $ 4` 1P -8 T r tB l`Tg t z ^ lFZF H 2 Z j z
0x05c064…05c1f8 Dummy {f00=0x001d, f01=0x0190, f02=» :01 2Z $"z y L / y VOLUME 2 L VOLUME 365 2 & 0 F ` x * < V j 600PDISC REL 10.0 DATE 80.03.14 12NC=8701 082 41000 STATUS WORD: XXXX , IN
0x05c1f8…05c38c Dummy {f00=0x001d, f01=0x0190, f02=» NO TOSS DISC FORMAT BADSPOT ON TRACK ZERO MORE THAN 5 BADSPOTS FLEXIBLE DISC WRITE PROTECTED ONE OR MORE VOLUMES UNKNOWN DISC OVERFLOW TOO MANY EXTENTS ILLEGAL BLOCKLENGTH VTOC OVERFLOW FILENAME ALREADY USED FILENAME UNKNO
0x05c38c…05c520 Dummy {f00=0x001d, f01=0x0190, f02=»LE INPUT DISC I/O ERROR TOO MANY SECTORS IN FILE , &l 'v & @ "T A A & " @ 8 ! P $ @ " A & @ A A @ A L A NV P A A @ "U H COP T A X
0x05c520…05c6b4 (0, 117) Dummy {f00=0x001d, f01=0x0190, f02=» @ J A P^ @ @P* @ NT$ @ @ BP A & @ A B * W. & _^ Y A f @ R )j )Z A 8 f @ NP %0 %x % A " @ @ A A G "> A , A A @ A @ A A A X A ( E X Y X E Y & '
0x05c6b4…05c848 Dummy {f00=0x001d, f01=0x0190, f02=» A _ % _ XPD @ @ P @ R8 @ A ( @ R )j )Z ( A A 8 f @ Z6W % X " @ G @ G G ) % &l &l( "bW$ A A % @ ! : A N . A % @ P T P _ * @
0x05c848…05c9dc Dummy {f00=0x001d, f01=0x0190, f02=» +| : A % @ P T V _ 11P . D : 00 :: " _l : & 0 P 1 Q 1 Q 0 P @ "P 1 Q F A d A & : &H : p 0V , - P X 9A_ : $2R" ;D (! 0R U R V
0x05c9dc…05cb70 Dummy {f00=0x001d, f01=0x0190, f02=» A L +| A R : @ P % @ T p R: 8 :p P <` D E ;@ % _> @ T " A TT A P : h @ R A J R A J U @ N A N +| h +| A R : P 8 @ P @ T R U +| 8 +| @ T "
0x05cb70…05cd04 Dummy {f00=0x001d, f01=0x0190, f02=» ( @ @ , T~ A : M R W - M : P V 0 : W W W p l C P l C ( : & &l &r W W W W _$ W _, W &r "T ? $ & Y :0123456789ABCDEF A A % v < ( P @< A &
0x05cd04…05ce98 Dummy {f00=0x001d, f01=0x0190, f02=» @ @ , & xPT Z ( P T T _. P P @ Z < ! X" !,,X( 5 _ @ !@@TV @ ! CT< $ % Q ( ! P R| ! Qv % _ . +| W( +| @ ! AP P T8 A " T ( $(R" A A 7# A
0x05ce98…05d02c Dummy {f00=0x001d, f01=0x0190, f02=» X W0 P& ( ! X !::P !00R !99Q _$ T : & W > P W A $ 8 +| @ &T4 @ "P Q, 9H A dW" S A 6 A a A b A d A f @ ( A h + 0 A & @ $P 74 W ,f + P T P W @ "T @ h Y A : P 8 $ "T @ $ A 6 A @
0x05d02c…05d1c0 Dummy {f00=0x001d, f01=0x0190, f02=»_n @ DP % [ : A D D A F A H +R R4Q@ A % A H A D @ D @ @V2 & @ D D @ @ H E B_T A % A H_L & _V A @ @ @ A @ A % A A 2 * : T E A FQ W V |Z" : Q ( % _ : ; [ [ [ [
0x05d1c0…05d354 (0, 118) Dummy {f00=0x001d, f01=0x0190, f02=» A, A+ A, A, A, A, , P A, @+ P 7P @, : R !LLP< R 1 R 2 Y A,b A,` A,^ Y A,^ A,` @,bW S 1 A,^ S 2 A,` A+ - / :
0x05d354…05d4e8 Dummy {f00=0x001d, f01=0x0190, f02=» X "' "' A,F @, . R 0 $' R T W $ T A,F R !LLP @+ T A,( A,* R 1 R 8 A,: R 6! A,8PJ A,> A,@ @,( @,* :P A,( A,*S$ @,> @,@ : Y4 @,( A,8 @,* A,:W : A+ A+ @+ @+ @,` :P A+ A+ @,8 @,: : A,8 A,:Y4W R 6:B A+
0x05d4e8…05d67c Dummy {f00=0x001d, f01=0x0190, f02=» A, A, A, . A,Z9H A,X A,V A, A, A, @, P A, A, B A/ ( B 1 @/ C C @,X C ( C B / 1 : @,X:c A, A,, A,. A,0 A,2 @+ A,$ @+ A,& A,> @,$ @,& :P A,$ A,& @,> R 1$ 0 A,( 0 A,* @,(T @,*X" @,(
0x05d67c…05d810 Dummy {f00=0x001d, f01=0x0190, f02=» A,0 @,* A,2_ @,( A,, @,* A,. @+ A,( @+ A,*W 4 T^ Q 1 Q Q ,J R A,L @, A,T A,V @,X C ( C @,R /T @,dT 3 A,d : W W : _ @, T _ _ R @+ A,( @+ A,* !LLPJ @,, T @,. @,` 3 P A,4 P A,6 @,, @,. @,( @,* : A,, A
0x05d810…05d9a4 Dummy {f00=0x001d, f01=0x0190, f02=»0 P A,, 0 A,. A,( A,* @,` : A,( A,* @,( @,* @,` :P A,( A,* @,, @,. @,` : A,, A,.^6 @,( @,* P P :P Q Q P A,, 0 A,. @,, @,( @,* : A,, A,.T Q Q @,, Q @,. 1 @+ @+ @,( @,* : A+ A+ A,, A,. @,FP @,8 @,: @,( @,* : A,8 A,:
0x05d9a4…05db38 Dummy {f00=0x001d, f01=0x0190, f02=»/ : : A, @, @,Z A, 2 C A, @, @, 1 A,T A,V ( @,R / 1 ,L 6 P J S T $ 1T P _ , X`_2 A, : @+ T 3p @, 1 Q : , 3p @, 9 @, K @, K @,( K @,* K @,4 K @,6 K K K R 2 K R
0x05db38…05dccc Dummy {f00=0x001d, f01=0x0190, f02=» ( @,R / 1 : @+ T 3p @, 1 Q : , 3p @, 3n A, 6| 2 A,L @,^ % @,L R 2 R 1 % Y @,( A,> @,* A,@ @,4 @,6 A,B A,D :P A,( A,* ,J @,^ C @,B A,T @,D A,V( C @,B @,D @,` @,FP @,H :P A,B A,D @,( @,BYXR @,* @
0x05dccc…05de60 Dummy {f00=0x001d, f01=0x0190, f02=»,BY`R @,* @,DYl @,> A,( @,@ A,* : A, @+ Q6 A+ 9 9 9 A9 ( 9 9 A9 ( : 9 @, 0 A: @,4 @,6 :) K& @,( @,* :9 K& , :? @, T :H 9 9 A A9 ( ,J @, : A, 7L T @, T : A+ A, - A, T>
0x05de60…05dff4 (0, 119) Dummy {f00=0x001e, f01=0x0190, f02=», J A,( J A,* J A,4 J A,6 6| R @,X9c A, @, 9 0 A70 0 A72 @70T @72 9V P @,4T P @,6 7` A,> A,@ A7. @70 @72 P P :P A70 A72 @,> @,@ @7. @,4 @70Tr @,6 @72Th P A,4 P A,6 A,> A,@ A7. P 0 @,( @,* :P Q 1 P A,( 0 A,* @,> @
0x05dff4…05e188 Dummy {f00=0x001e, f01=0x0190, f02=» Q @,6 Q _ 8 7` 3 @,( I @,* ) @,4 I @,6 I 7` ( - : 9 FILE 9 9 VOLUME NAME FILE EXT.NO EXTENT BASE EXTENT LENGTH : A DELETED
0x05e188…05e31c Dummy {f00=0x001e, f01=0x0190, f02=»Q R S P W S _ R _ ;A [ :: A, @, 0 A70 0 A72 @70T @72 P @,4T P @,6 7` A;: A,@ A7. @70 @72 P P A70 A72 @,> @,@ @7. @,4 @70T @,6 @72T P ; ,4 P A,6 A,> A,@ A7. P 0 @,( @,* Q 1 P A,( 0 A,* @,> @
0x05e31c…05e4b0 Dummy {f00=0x001e, f01=0x0190, f02=» @,6 Q _ NUMBER OF BADSPOTS = -WRITING THE SECTORS -FORMATTING THE DISC -CHECKING THE SECTORS TOSS REL 10.0 Z $ A< D A< D A< D A< D A< [ : Z $ A< D A< D A< D A< D A<
0x05e4b0…05e644 Dummy {f00=0x001e, f01=0x0190, f02=»= = = : = = = : <, 2 C C ( B & D B .P " T D : A< @ A<0 A<" = R ' P P =HP P Q < M ? =HQ R S < [+ [h 4 = [4 4 P =HT(T(T( < rS S E = q+
0x05e644…05e7d8 Dummy {f00=0x001e, f01=0x0190, f02=»=HT(T(T( < L L P@ =HKhLhMh < 1g 1h P =HMXNXOX < L L W 2 A<. A< $ A<; $ A< A<- R ! T <, A< ( B D " D P C C ( @D C I^ D <, 2 C I I " C ( @D
0x05e7d8…05e96c Dummy {f00=0x001e, f01=0x0190, f02=»<. D <, R R C ' P ( C ( B R % R E R E B N< % Z R R E ( ( ( A<F A<H A< : A: ;: A;: ; A; ; A; 2 <h =z <, A<0 A< 2 =
0x05e96c…05eb00 Dummy {f00=0x001e, f01=0x0190, f02=» @< U, Y A<0 Y A<0_ A< A<0_ < A<0 A<" =z < ( $ A<. = <, ( = < B & D B P Wl @<" Y 2 < < P W T = T P < < W( $ Y P = _2 <
0x05eb00…05ec94 (0, 120) Dummy {f00=0x001e, f01=0x0190, f02=» ( = <, B & D B P W @<0 Y , < < P W T = T P < < W $ Y P = _2 < < = = @< TP @< U| QB A<0 Q4 A<0W* T P6 @: ;:V. A: = = < ( B <,(
0x05ec94…05ee28 Dummy {f00=0x001e, f01=0x0190, f02=» $ M _> H < ^| - ( M _ @: Q> < ^ ( M H - _" @;:Q < ^ $ M D - _" A; <e J <N =z < ; @; QT @; 4 T = : 1 Q @; Q4 4 T : = 1 Q @; Q _* @; W @< @< : Q
0x05ee28…05efbc Dummy {f00=0x001e, f01=0x0190, f02=»< R @< Y Y 2 T T 4 R _ T 4 : U 5 <J = < A<0 G A<L @< Q U( _ 2 % 2 * % Y : ; G 2 * @; Q Pl * BA % DS % PO % T % 5 Y 5
0x05efbc…05f150 Dummy {f00=0x001e, f01=0x0190, f02=» 2 @< R V 2 U A< = ]D 2 2 @<L % % <J ) % % Z @< % @< % @< % < ( % Y 2 % @< O . R O 1 R O 0 = < ( @<& D H : @< T < :< I Q
0x05f150…05f2e4 Dummy {f00=0x001e, f01=0x0190, f02=» Y I I2 I I2 AH H ( I I2 `H YP 2 : R _ P 0 - : ; [ V - - ' I I d I I I Z : : ; J I : V *W R - _ 1 T R PJ - _ : : R _
0x05f2e4…05f478 Dummy {f00=0x001e, f01=0x0190, f02=» Jd Jz Z Z Z Z : : ; K J : V *W R - _ 1 T R PK - _ : F %? t v UU v 3 2P _ 4 , ) T G.G K. A ;A; G. $ ] ] S S
0x05f478…05f60c Dummy {f00=0x001e, f01=0x0190, f02=» P X _ R R "( R L ?e =e Q P ?e R P S ?C/ G O % R ' P % =B S t w E M % n :L P #P ( B. T P ' " P : P S P S P " `_" : R _
0x05f60c…05f7a0 Dummy {f00=0x001e, f01=0x0190, f02=» %? v t v UU < 3 2P _ 4 , ) T G.G K. A ;A; G. ^ ] ] S S S S % =A S S S . N 0 N S W P X _ R
0x05f7a0…05f934 (0, 121) Dummy {f00=0x001e, f01=0x0190, f02=» t w E M % t R.Q& @ Q R %| _B _& :O P #P ( B. T P ' " P : P S P S P " `_" F t v @0 UU 3 2P _ 4 , ) T G.G K.
0x05f934…05fac8 Dummy {f00=0x001e, f01=0x0190, f02=» N 0 " N S W " P X _ R R <" R R Q* " P #P ( B. T P ' " P : P S P S P " `_"Q =D @ t w E M T 1 E _ M @ p : 6 "?
0x05fac8…05fc5c Dummy {f00=0x001e, f01=0x0190, f02=» S S " :A S S S . N 0 S & N S W P X _ R R "? R R R h:B* S R P S B J 4R 4 :B 4 R : V V 49B R 4R @ t w A I ! j :SH
0x05fc5c…05fdf0 Dummy {f00=0x001e, f01=0x0190, f02=» D2 F1 F2 ; [ @ H ( R2 I P _ H H H ? S (P (R _ H W W Z # [ : Z : P #P ( B. T P ' " P : P S P S P " `_"Q =D @ t w E M T 1 E _ M @ p : "?
0x05fdf0…05ff84 Dummy {f00=0x001e, f01=0x018e, f02=» P P P P P* $ , P* START MONITOR OR STAND ALONE PROGRAM . P* ^ P* ON EXIT FROM DPL: h , P* A1= FORMAT,DEVICE TYPE 6 P* A2: BIT 10 = 0 CARTRIDGE DISC 0 P* B
0x05ff84…060118 Dummy {f00=0x001e, f01=0x0190, f02=» T > P* A8= FILE EXTENDED BASE,MOST SIGNIFICANT 0 P* A9= ADDRESS AFTER MONITOR J ( P* A13= MONITOR START ~ P P PSTARTA ABR A13 P EJECT CRVOL P* P* READ SECTOR SUBROUT
0x060118…0602ac Dummy {f00=0x001e, f01=0x0190, f02=»= BUFFER ADDRESS ~ P* P* REGISTER USAGE: " & P* A4 = CYLINDER MASK > ( P* A5 = WORKING REGISTER h ( P* A7 = WORKING REGISTER P* PREDSEC DATA *+2 P LDK A5,0 P LDR A7,A6 LOGICAL S
0x0602ac…060440 Dummy {f00=0x001e, f01=0x0190, f02=»L A7,/FFE0 P SRL A5,5 P SUR A7,A5 $ P SUR A7,A6 6 P ADK A7,31 H * P RF(P) DIV110 NO CORRECTION OF RESULT Z P ADK A5,1 PDIV110 EQU * . P LDR A5,A5 A5:=CYL NBR = LOG SEC NBR / 31 P RF(Z) DIV120 CYLINDER 0 P ADK A5,
0x060440…0605d4 (0, 122) Opaque[0x194]
0x0605d4…060768 # DirEnt {nam=»TOSSUT«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x03d8, f03=0x0000}
0x0605d4…060768 IdxSect {
0x0605d4…060768 f00 = 0x001e // 0x605d4 @0x0
0x0605d4…060768 f01 = 0x0014 // 0x605d6 @0x2
0x0605d4…060768 gno = [ // 0x605d8 @0x4
0x0605d4…060768 [0x00]: C0x001e.0x3.0
0x0605d4…060768 [0x01]: C0x001f.0x0.0
0x0605d4…060768 [0x02]: C0x001f.0x1.0
0x0605d4…060768 [0x03]: C0x001f.0x2.0
0x0605d4…060768 [0x04]: C0x001f.0x3.0
0x0605d4…060768 [0x05]: C0x0020.0x0.0
0x0605d4…060768 [0x06]: C0x0020.0x1.0
0x0605d4…060768 [0x07]: C0x0020.0x2.0
0x0605d4…060768 [0x08]: C0x0020.0x3.0
0x0605d4…060768 [0x09]: C0x0021.0x0.0
0x0605d4…060768 ]
0x0605d4…060768 }
0x060768…0608fc Dummy {f00=0x001e, f01=0x0190, f02=» Ii : j 0 $ ^ : 9 i $ 7 f w |4r tV u 3 qC 5 * zuqV $ ' > P ZD o c r P| sV i % 9Zj Q > - D $ 4` 1P -8 T r tB l`Tg t z ^ + RC: 6 F j z
0x0608fc…060a90 Dummy {f00=0x001e, f01=0x0190, f02=» ;PROGRAM ABORTED BY OPERATOR; TP TO > R > C ( B P 0_ B C : $ !; P I , =Z I , * C C ( : $ !; P I , =Z I , * _: [ * N` Z : [ [ [ [ QxP~
0x060a90…060c24 Dummy {f00=0x001e, f01=0x0190, f02=» : [ _ $6 Y R $6 Y$R $6 $> Y6 _ [ [ Q. , 0R" 9U AR FQ 0 P =D _, [ Z Z : = ! U 9 - Y : [ [ [ [ [ [ [ Rd 0=A O T R !LLT
0x060c24…060db8 Dummy {f00=0x001e, f01=0x0190, f02=» : TO >EV UP ZN j TO >BV 0W,_d>AV* b P P~ >Px Pr PlW _ A h TO >FV :A HQD @ hY HQF @ hZ >AV R W _ _ @ h @ l >BV -Wp>AV -Wh>AVd B j RV _ @ l T T S S S S >T T S S S S @ j - -
0x060db8…060f4c Dummy {f00=0x001e, f01=0x0190, f02=» 0_ @Nj @ j EXT ( HNlP X$_ @ l INn :a A f ;a LO # A A ^ P A ^ TH N #( W0 @ ^P N #( : d M ^ R _ N| W `_ * @ P8 P2 R " R Q N #( @
0x060f4c…0610e0 Dummy {f00=0x001e, f01=0x0190, f02=» @ f:A HNl A x HNn A z p ( A A A A A A 8 P A @ P @ : R !LLP< R 1 R 2 Y A A
0x0610e0…061274 (0, 123) Dummy {f00=0x001f, f01=0x0190, f02=»FD J T ( B TH ( B T< C C ( B P ! W B Q* ( , X "' ` _ "' A @ R 0 $' R T W $ T A R !LLP @ T A A R 1 R 8 A R 6! A PJ A A @ @ 5| A A
0x061274…061408 Dummy {f00=0x001f, f01=0x0190, f02=» A A @ PZ @ A @ A @ A @ Y P8 @ A @ @ @ 5 P Y @ @ 5 A A A R A A A . A 9H A A A A A @ P A A B A H ( B @ H C C @ C ( C B / : @ :c
0x061408…06159c Dummy {f00=0x001f, f01=0x0190, f02=» @ @ R Q @ @ R @ A @ A @ @ ZTQ @ @ Z` @ @ R:Q @ @ U. @ @ Y R @ @ Y A @ A @ A _ @ A @ A @ A @ A W T^ Q 1 Q Q R A @ A A @ C ( C @ /T @ T A : W
0x06159c…061730 Dummy {f00=0x001f, f01=0x0190, f02=» A RnX W4 @ @ @ @ 5 A A ( @ P A P A @ @ P P 5| Q Q @ Q @ 1 z P A 0 A A A @ 5 A A @ @ @ 5| A A @ @ @ 5 A A ^6 @ @ P P 5| Q Q P A 0 A @
0x061730…0618c4 Dummy {f00=0x001f, f01=0x0190, f02=» z A A @ J : A z : P2 . P* @ P @ A @ A @ A J : : A @ @ A 2 C A @ @ A A ( @ / 6 P J S T $ 1T P _ X`_2 A : @ T
0x0618c4…061a58 Dummy {f00=0x001f, f01=0x0190, f02=» R 1:H R K R !LLT R 4:H R 5 K K $ K & A ( F . " F R !LLP R 6 K % R 4 K & K ( K ) ( @ / : @ T , @ Q : , @ * A 8 2 A @ % @ R 2 R 1 % Y @ A @ A @ @
0x061a58…061bec Dummy {f00=0x001f, f01=0x0190, f02=» @ Yd @ A @ A @ C @ A @ A ( C @ / @ @ @ @ P @ 5| A A @ @ Y`R @ @ Yl @ A @ A : A @ Q6 A T h F A X ( p 9 A t ( F @ 0 A @ @ 5: @
0x061bec…061d80 Dummy {f00=0x001f, f01=0x0190, f02=» T> , @ P. T& A z : P . P _> : F @ - ( @ / J A J A J A J A J A 8 R @ 9c A @ 0 A 0 A @ T @ P @ T P @ A A A @ @ P P
0x061d80…061f14 (0, 124) Dummy {f00=0x001f, f01=0x0190, f02=» @ @ T _ ] = ] ] A A A P P @ @ 5 A A @ @ @ @ @ @ @ @ Q @ Q _ @ I @ ) @ I @ I ( - : ` FILE | 9 VOLUME NAME FILE EXT.NO
0x061f14…0620a8 Dummy {f00=0x001f, f01=0x0190, f02=»ETEDDU1 DU2 DU3 DU4 MD1 MD2 FD1 FD2 1 0 0VOLUME NAME: DISC: 0FREE SPACE TABLE 0EXT BASE EXT LENGTH OF ENTRIES USED 0VOLUME TABLE OF CONTENTS 0FILE FILE FILE
0x0620a8…06223c Dummy {f00=0x001f, f01=0x0190, f02=»LEN ORG LENGTH FACT REC NO SEC NO EXT NO DATE PER FILES ADDRESS NO NO/SOP 0NUMBER OF FREE ENTRIES IN VTOC = ( - : C ( B z : 2 A A p A R A R A A , ` @ , P _ ,
0x06223c…0623d0 Dummy {f00=0x001f, f01=0x0190, f02=» t 2 H , 9 TO 4 4 I ` Y 0 * 8 $ * ^ * , A | , A t , A v " , A x @ x A >c A z C ( B . t B & ~ A 4 * ~ * * 2 z 4P 4W 4P4 A p 5: 4 4
0x0623d0…062564 Dummy {f00=0x001f, f01=0x0190, f02=» * | t r x r D ( B . t B & ~ v v]B *% 8 R p v R J U !LLT2 J " c 44 J " k 44 - U 8 U T U ZW - U d U l J 8 44 J ? 44 J J 5:
0x062564…0626f8 Dummy {f00=0x001f, f01=0x0190, f02=» T 44 J & X 44 v R p $ ! R !__Q Y . % Y p * W A @ 44 4 * & * 4 * W W W W :LPOP XLS TK1 TK2 MT1 MT2 pqCSH @ j !NNP !YYP D A h : @ j! P P D A h
0x0626f8…06288c Dummy {f00=0x001f, f01=0x0190, f02=» j ` Z D A h : W D @ j CDP FDP MDP DUT : W W S : @ j $P Wj 9a D A h : @ j I P ^ WF : R I j W6 : R !LLT : @ j! YT A h @ f &T : X #2 A W* A A A A W$ A A
0x06288c…062a20 Dummy {f00=0x001f, f01=0x0190, f02=» P _ @ T A A! W @ P A _ A _ @ f F ] F ( = F F ( = P P P P _* _0 F ] @ @! ! A! ( B ( @F LP F ] : ] < ( A! @! @ T A
0x062a20…062bb4 (0, 125) Dummy {f00=0x001f, f01=0x0190, f02=»F F ( = P P P P _& _, @ f *T $ @ f *T F B C W @ P F B C @ f *T %T T" B A! F A! ! : ( B T : ! P ! L' P< ( @! P W ! ( Q 9A DV2T
0x062bb4…062d48 Dummy {f00=0x001f, f01=0x0190, f02=» @ j DKTj A : @ j DKP WX A : @ j DKX. W6 S DK ! A H H P Y S ( a S : W D ! P !TTP " W0 " W& " E P " A W " A h : @ j @ l "P ^ Wp C ;b : @
0x062d48…062edc Dummy {f00=0x001f, f01=0x0190, f02=» A "@W 0 _ A W< ! @ h # ( B # TlW IBM LABEL;TOSS LABEL; A W ! ( B ' @ h #( B P R P $ T W T # P :' P P #xW # _ j $6 Z rQ0 , 0 $6 Z %U #2 : ,! 9D ,"
0x062edc…063070 Dummy {f00=0x001f, f01=0x0190, f02=» : "_ _ S : 6 W @6 A h : 6 &P P @W W F < ) F < ) P P P P _& _, : &PV T 6 6> % T@ @ A W2 6 6^ % T @ A W 6> 6^ % T @ A W : $ ) :
0x063070…063204 Dummy {f00=0x001f, f01=0x0190, f02=» A "@W 0 _ A W ! @ h # ( &^ B # T W IBM LABEL;TOSS LABEL; A W ! ( B ' @ h #( & P R P $ T W T # P :' P P #xW # Z % NUMBER OF BADSPO
0x063204…063398 Dummy {f00=0x001f, f01=0x0190, f02=» Z $ A' D A' D A' D A' D A' [ : Z $ A' D A' D A' D A' D A' [ : Z $ A' D A' D A' D A' D A' [ : ' C C ( : S : : V : (f (f (f : (v (v (v : ' 2 C
0x063398…06352c Dummy {f00=0x001f, f01=0x0190, f02=» ' M *` ( h i j ' [+ [h 4 ' [4 4 P ( a a a ' rS S E ' q+ W R ' &? &@ ( a a a P ( a b c ' P ( c d e ' &? &@ Wf R ( a a a ' L L P@ ( a b
0x06352c…0636c0 Dummy {f00=0x001f, f01=0x0190, f02=» B / " /~ P C C ( + C `x / ' 2 C I I " C ( + ( + C W B 9 R ! T : /~ / ' C C C ( B ! : /~ C `x A' A' / ' R R C ' P (
0x0636c0…063854 (0, 126) Dummy {f00=0x001f, f01=0x0190, f02=» A% & A& &^ A& & A& 2 '@ (R ' A' A' 2 (f ' T (f ( ' Tv B & /~ B /~ P& T /v @& & /z ) I A& (f @' @' U, Y A' Y A' _
0x063854…0639e8 Dummy {f00=0x001f, f01=0x0190, f02=» P Wl @& Y 2 ' ' P W T (f T P ' ' W( $ Y P (f_2 ' ' W& T /v @% & /z A% ( ( @' T& @' /j Q A& Q @ A& ' ( & ( ( ' B & /~ B P W
0x0639e8…063b7c Dummy {f00=0x001f, f01=0x0190, f02=»( ( @' TP @' U| QB A' Q4 A' W* T P6 @% & V. A% ( ( & ( -` ' ( .r W W W W W 3 : A& A' @& % & @% Qv @& QN $ (Q*R D H R Q W & ^` - $ M _> H & ^| - ( M _
0x063b7c…063d10 Dummy {f00=0x001f, f01=0x0190, f02=» 4 T ( 5 1 Q @& Q4 4 T 5 ( 1 Q @& Q _* @& W @' @' 5 Q 1 Q A& @' A' &Z & 2 P T 0P( 0 % % @& Q ( _4 _ % & R @' Y Y 2 T T 4
0x063d10…063ea4 Dummy {f00=0x001f, f01=0x0190, f02=» * % Y : & 1 2 * @& Q Pl * BA % DS % PO % T % 5 Y 5 Y % % , % , % B % % (_x ( ^ W ( Y A' R " T `' A' 9A D' 2 @' R V 2 U
0x063ea4…064038 Dummy {f00=0x001f, f01=0x0190, f02=» ( % Y 2 % @' O . R O 1 R O 0 ( & ( @& /~ 3 : @' T & : R _ P 0 - : ; [ V - - ' 3 3 d 3 3 3 Z : : ; 4. 3 : V *W R - _ 1 T R P4. -
0x064038…0641cc Dummy {f00=0x001f, f01=0x0190, f02=»' 4x 4x d 4x 4x 4 Z Z Z Z : : ; 52 4 : V *W R - _ 1 T R P52 - _ : [ S Q"R S P W S _ R Q _ ;A [ : [ Q S W
0x0641cc…064360 Dummy {f00=0x001f, f01=0x0190, f02=» ( % Y 2 % @' O . R O 1 R O 0 ( & ( @& /~ 3 : @' T & : R _ P 0 - : ; [ V - - ' 3 3 d 3 3 3 Z : : ; 4. 3 : V *W R - _ 1 T R P4. -
0x064360…0644f4 (0, 127) Dummy {f00=0x0020, f01=0x0190, f02=»' 4x 4x d 4x 4x 4 Z Z Z Z : : ; 52 4 : V *W R - _ 1 T R P52 - _ : [ S Q"R S P W S _ R Q _ ;A [ : [ Q S W
0x0644f4…064688 Dummy {f00=0x0020, f01=0x0190, f02=» ( % Y 2 % @' O . R O 1 R O 0 ( & ( @& /~ 3 : @' T & : R _ P 0 - : ; [ V - - ' 3 3 d 3 3 3 Z : : ; 4. 3 : V *W R - _ 1 T R P4. -
0x064688…06481c Dummy {f00=0x0020, f01=0x0190, f02=»' 4x 4x d 4x 4x 4 Z Z Z Z : : ; 52 4 : V *W R - _ 1 T R P52 - _ : [ S Q"R S P W S _ R Q _ ;A [ : [ Q S W
0x06481c…0649b0 Dummy {f00=0x0020, f01=0x0190, f02=» ( % Y 2 % @' O . R O 1 R O 0 ( & ( @& /~ 3 : @' T & : R _ P 0 - : ; [ V - - ' 3 3 d 3 3 3 Z : : ; 4. 3 : V *W R - _ 1 T R P4. -
0x0649b0…064b44 Dummy {f00=0x0020, f01=0x0190, f02=»' 4x 4x d 4x 4x 4 Z Z Z Z : : ; 52 4 : V *W R - _ 1 T R P52 - _ : [ S Q"R S P W S _ R Q _ ;A [ : [ Q S W
0x064b44…064cd8 Dummy {f00=0x0020, f01=0x0190, f02=» ( % Y 2 % @' O . R O 1 R O 0 ( & ( @& /~ 3 : @' T & : R _ P 0 - : ; [ V - - ' 3 3 d 3 3 3 Z : : ; 4. 3 : V *W R - _ 1 T R P4. -
0x064cd8…064e6c Dummy {f00=0x0020, f01=0x0190, f02=»' 4x 4x d 4x 4x 4 Z Z Z Z : : ; 52 4 : V *W R - _ 1 T R P52 - _ : [ S Q"R S P W S _ R Q _ ;A [ : [ Q S W
0x064e6c…065000 Dummy {f00=0x0020, f01=0x0190, f02=» ( % Y 2 % @' O . R O 1 R O 0 ( & ( @& /~ 3 : @' T & : R _ P 0 - : ; [ V - - ' 3 3 d 3 3 3 Z : : ; 4. 3 : V *W R - _ 1 T R P4. -
0x065000…065194 (0, 128) Dummy {f00=0x0020, f01=0x0190, f02=»' 4x 4x d 4x 4x 4 Z Z Z Z : : ; 52 4 : V *W R - _ 1 T R P52 - _ : [ S Q"R S P W S _ R Q _ ;A [ : [ Q S W
0x065194…065328 Dummy {f00=0x0020, f01=0x0190, f02=» ( % Y 2 % @' O . R O 1 R O 0 ( & ( @& /~ 3 : @' T & : R _ P 0 - : ; [ V - - ' 3 3 d 3 3 3 Z : : ; 4. 3 : V *W R - _ 1 T R P4. -
0x065328…0654bc Dummy {f00=0x0020, f01=0x0190, f02=»' 4x 4x d 4x 4x 4 Z Z Z Z : : ; 52 4 : V *W R - _ 1 T R P52 - _ : [ S Q"R S P W S _ R Q _ ;A [ : [ Q S W
0x0654bc…065650 Dummy {f00=0x0020, f01=0x0190, f02=» ( % Y 2 % @' O . R O 1 R O 0 ( & ( @& /~ 3 : @' T & : R _ P 0 - : ; [ V - - ' 3 3 d 3 3 3 Z : : ; 4. 3 : V *W R - _ 1 T R P4. -
0x065650…0657e4 Dummy {f00=0x0020, f01=0x0190, f02=»' 4x 4x d 4x 4x 4 Z Z Z Z : : ; 52 4 : V *W R - _ 1 T R P52 - _ : [ S Q"R S P W S _ R Q _ ;A [ : [ Q S W
0x0657e4…065978 Dummy {f00=0x0020, f01=0x0190, f02=» ( % Y 2 % @' O . R O 1 R O 0 ( & ( @& /~ 3 : @' T & : R _ P 0 - : ; [ V - - ' 3 3 d 3 3 3 Z : : ; 4. 3 : V *W R - _ 1 T R P4. -
0x065978…065b0c Dummy {f00=0x0020, f01=0x0190, f02=»' 4x 4x d 4x 4x 4 Z Z Z Z : : ; 52 4 : V *W R - _ 1 T R P52 - _ : [ S Q"R S P W S _ R Q _ ;A [ : [ Q S W
0x065b0c…065ca0 Dummy {f00=0x0020, f01=0x0190, f02=» ( % Y 2 % @' O . R O 1 R O 0 ( & ( @TOSS UTILITIES REL 10.0 DATE: 80-03-14 12NC=870136641000 ; CC: WHAT?? CRV CRF DLF PVC XEY , 9:)*+ W
0x065ca0…065e34 (0, 129) Dummy {f00=0x0020, f01=0x0190, f02=» 67 - 4.5/0123 - <= 8 GHF@ 8J KLMVQRSTO 8 NP B AI A A V! VAW!T T"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!
0x065e34…065fc8 Dummy {f00=0x0020, f01=0x0190, f02=» ' |
0x065fc8…06615c Dummy {f00=0x0020, f01=0x0190, f02=» d N ""@"F" " " " # "# " $ $ " $b " t ! $ ! $ ! j ` $
0x06615c…0662f0 Dummy {f00=0x0020, f01=0x0190, f02=» " ( . 5 6 4 * H ( F # #: VdV V V V V V V V W W*W>WNWXWdVrV WnW W Y W W W W W W X X*X*X:XJXXXtVd X X X X V X X X V X Y Y(W X W YBYZY YZYzY W
0x0662f0…066484 Dummy {f00=0x0020, f01=0x0190, f02=»[|[ [ [ ^ [T[.] ] [ ^ Z [.[>[ Z [.[>^ Z [.^ ^ _Z ] [ [n[ ^ _rZ [. 4 J h_ ] ]*]@]V]j] ]V JZ [.[>_8Z [.] Z [.^ ~ Z [. 4 J h^T] Z [. 4 J h^T] ^ Z [.] ^8^ ^ Z [.[>^l [ ^ ^ _ 4 J h [ ^ ^ ^ 4 J h ^ _ ^ J h 4Z [ ^ ^ _$ 4 J_ _ _
0x066484…066618 Dummy {f00=0x0020, f01=0x0190, f02=» NAMES:;FILE NAME:; NUMBER OF VTOC ENTRIES:;CREATION DATE:; RETENTION PERIOD:;BLOCKING FACTOR:; EFFECTIVE RECORD LENGTH:; MAXIMUM NUMBER OF RECORDS:; SECTOR NUMBER:; POSITION:;HEX.VALUE:; FILE ORG:;***INPUT DEFINITION***; ***OUTPUT DEFINITION***;PACK:;OUTPUT DEVIC
0x066618…0667ac Dummy {f00=0x0020, f01=0x0190, f02=»PUT TAPE:;TAPE VOLUME ID:;RECORD LIMITS:; PRINT FORMAT:;RECORD NUMBERS IN LISTING:; CHARACTER CODE:;PROGRAM LENGTH:;MONITOR NUMBER:;START SWITCH ON SOP:; MORE THAN ONE APPLICATION :;DATA SET NAME:; BOE-SECTOR:;EOE-SECTOR:;EXPIRATION DATE:; VOLUME INITIALIZATION:;
0x0667ac…066940 Dummy {f00=0x0020, f01=0x0190, f02=»CORD LENGTH INPUT TAPE:;LOAD FACTOR:; INDEX FILE NAME:; MASTER INDEX FILE NAME:;INPUT DEVICE:;PTS 6876 DISC :;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 A
0x066940…066ad4 (0, 130) Dummy {f00=0x0020, f01=0x0190, f02=»N 18 BADSPOTS.DISC NOT USABLE;DISC I/O ERROR.;PRINTER NOT OPERABLE; TOO MANY SECTORS IN FILE; DISC OVERFLOW;MORE THAN 4 EXTENTS NEEDED; ILLEGAL BLOCK LENGTH; VTOC OVERFLOW;NO FREE SPACE ENTRY AVAILABLE;FILE NAME ALREADY USED; NO TOSS DISC FORMAT;TAPE UNIT NOT OPER
0x066ad4…066c68 Dummy {f00=0x0020, f01=0x0190, f02=»NOT LOCKED/LOADED;INCORRECT TNR;OUTPUT I/O ERROR, ;INPUT I/O ERROR, ; BLOCK FACTOR ON OUTPUT TOO LARGE; TAPE MARK MISSING;TAPE MARK MISSING AFTER LABEL RECORD; LABEL RECORD MISSING; UNEXPECTED TAPE MARK; LABEL RECORD ERROR; ILLEGAL BLOCK LENGTH ON INPUT;EOF INSI
0x066c68…066dfc Dummy {f00=0x0020, f01=0x0190, f02=»OCKED;FLEX. DISC NOT LOCKED;FLEX. DISC WRITE PROTECTED; DATA SET NAME ALREADY USED; DATA SET NAME NOT FOUND;NO IBM DISC FORMAT; BLOCK SEQUENCE ERROR; KEY DEF. ERROR; LOAD FACTOR TOO SMALL;KEY SEQUENCE ERROR; DATA SET DEF. ERROR;ILLEGAL SECTOR NUMBER;CARD READER NO
0x066dfc…066f90 Dummy {f00=0x0020, f01=0x0190, f02=»LOWED TO MIX DISCSIZES; NOT ENOUGH CORE;OVERFLOW; WRONG FD PARAMETER; ILLEGAL FILE-CODE;ILLEGAL ECB PARAMETER;UNKNOWN FILE; ILLEGAL VOLUME/FILE NAME; BE`& CORD; LABEL RECORD MIS OK? 0OUTPUT VOLUME NAME: ` C C R A` " P A` ( : : B
0x066f90…067124 Dummy {f00=0x0020, f01=0x0190, f02=» [ ; @` H` -P Z : : H` M :B L # ;A H` @ P 0!? T P $ _@ P ZH P ! _ DU2 DU1 DU4 DU3 MD1 MD2 MD3 MD4 FD1 FD2 FD3 FD4 CD1 CD2 %? v S : S f S 6 S b% =A S ^ S ` x UU
0x067124…0672b8 Dummy {f00=0x0020, f01=0x0190, f02=» R ' P % =B S t w E M % n : T G.G K. A ;A; G. x ] S z | . N 0 N S W P X _ R z R 6"( R ~ | c< P #P & B.
0x0672b8…06744c Dummy {f00=0x0020, f01=0x0190, f02=» [ ; @` H` -P Z : : H` M :B L # ;A %? v S @ S l S < S h% =A S d S f V UU H 3 2P _ , ) 0 R _ <d?d U ?e R P S ?C/ G O % R ' P
0x06744c…0675e0 Dummy {f00=0x0020, f01=0x0190, f02=» G. T ] S . N 0 R N S 4 W P X _ R R <"( R e P #P & B. T P ' " P : P S P S P " ^_" F t v @0
0x0675e0…067774 (0, 131) Dummy {f00=0x0021, f01=0x0190, f02=»% T V S @- S S < M % T S " . N 0 " N S W " P X _ R R <" R R gp " P #P ( B. T P ' " P : P S P S P " `_"g
0x067774…067908 Dummy {f00=0x0021, f01=0x0190, f02=» G.G K. A ;A; G. ( ] ] S S S S " :A S S S . N 0 S & N S W P X _ R R "? R R i h:B* S R P S B J 4R 4 :B
0x067908…067a9c Dummy {f00=0x0021, f01=0x0190, f02=» T P ' " P : P S P S P % `_" " . N 0 " N S W " P X _ R R <" R R gp " P #P ( B. T P ' " P : P S P S P " `_"g
0x067a9c…067c30 Dummy {f00=0x0021, f01=0x0190, f02=» P* * PBADSTP DATA BADSTP TABLE FOR BADSPOTS P RES QBADSP STORAGE, READ < PBADSTE EQU * ^ P* r & PWRSTP DATA WRSTP TAB FOR BADSPOTS | P RES QBADSP STORAGE, WRITE PWRSTE EQU * P* * PSPADTP DATA SPADET TAB FOR FREE SP
0x067c30…067dc4 Dummy {f00=0x0021, f01=0x018e, f02=» P* P* PWBUF DATA 0 P* 0 P EJECT CRVOL : P* P P* Z " PECBR DATA 0 ECB FOR DISC READ d PECBBF EQU *-ECBR P DATA 0 PECBRL EQU *-ECBR P DATA QSECL2 PECBEL EQU *-ECBR P DATA 0 PEC
0x067dc4…067f58 Dummy {f00=0x0021, f01=0x0190, f02=» P EJECT CRVOL P* P* $ PECBW DATA 0 ECB FOR WRITING . P DATA 0 R P DATA QSECL2 b P DATA 0,0,0 ECBEL, -RC, -CW v P DATA 0 CW2 =1 P* P* " PPRECB DATA 0 ECB FOR PRINTING $ P RES 5 ECBBF, -RL, -EL, -RC, -
0x067f58…0680ec Dummy {f00=0x0021, f01=0x0190, f02=»BA DATA 0 VTOC BASE PVTOCLE DATA 0 VTOC LENGTH P* > ( PBSSET DATA ' NUMBER OF BADSPOTS =' H PBSPNO DATA ' ' t P DATA ' ' PQBSSEL EQU *-BSSET P* P EJECT CRVOL P* P* * PWRSET DATA ' -WRITING THE S
0x0680ec…068280 Dummy {f00=0x0021, f01=0x0190, f02=»ING THE SECTORS' | PQRDSEL EQU *-RDSET P DATA 0 2 PTOSREL DATA 'TOSS REL 10.0' B P* f P EJECT CRVOL p P* P* P* =1 P* RETRY DELETED =30 PQCYLNR DATA 0 TOT NO OF CYL $ PQSECND DATA 0 LAST USABLE SECTOR
0x068280…068414 (0, 132) Opaque[0x194]
0x068414…0685a8 # DirEnt {nam=»PCAS «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0428, f03=0x0000}
0x068414…0685a8 IdxSect {
0x068414…0685a8 f00 = 0x0021 // 0x68414 @0x0
0x068414…0685a8 f01 = 0x0004 // 0x68416 @0x2
0x068414…0685a8 gno = [ // 0x68418 @0x4
0x068414…0685a8 [0x00]: C0x0021.0x1.0
0x068414…0685a8 [0x01]: C0x0021.0x2.0
0x068414…0685a8 ]
0x068414…0685a8 }
0x0685a8…06873c Dummy {f00=0x0021, f01=0x0190, f02=» ^ ^ 0XX ERROR 2 0PCAS REL 10.0 DATE 80.03.14 12NC=8701 362 41000 0TO MANY SEGMENTS STATUS WORD: D $ 4` 1P -8 T r tB l`Tg t z ^ lFZF H 2 Z j z
0x06873c…0688d0 Dummy {f00=0x0021, f01=0x0190, f02=» 4c @]u N d 2Z $"z y L / y N Dl` n $ @ 4Z wL a [ ? d d% L & "~ T &b CCn 1 d J < R:R: ` T l` % l`zF :| Fb fvzn : v ` ^* D3bH P D' >~ `" f >~ $' d p 4d @ B
0x0688d0…068a64 Dummy {f00=0x0021, f01=0x0190, f02=» ^F < 0XX ERROR 2 0PCAS REL 10.0 DATE 80.03.14 12NC=8701 362 41000 0TO MANY SEGMENTS STATUS WORD: D $ 4` 1P -8 T r tB l`Tg t z ^ lFZF H 2 Z j z
0x068a64…068bf8 Dummy {f00=0x0021, f01=0x0190, f02=» 4c @]u N d 2Z $"z y L / y N Dl` n $ @ 4Z wL a [ ? d d% L & "~ T &b CCn 1 d J < R:R: ` T l` % l`zF :| Fb fvzn : v ` ^* D3bH P D' >~ `" f >~ $' 4d @ B
0x068bf8…068d8c Dummy {f00=0x0021, f01=0x0190, f02=» @ A A @ A A A @ A A A @ CRP W0 A P (R 2 @ 9a @ A 0 ) A A ^ W ,= V % @ QB @ @ P8 @ U A W* @ P A W A , a A A A T
0x068d8c…068f20 Dummy {f00=0x0021, f01=0x0190, f02=»Pd A A A A T ` 9a A A @ A A ^ A 0% ) ( A : ( % @ E A A ( ( @ " ` T( : @ 0 @ Q( &( @ . T A 0 : TKW DKW FM A N J
0x068f20…0690b4 (0, 133) Dummy {f00=0x0021, f01=0x0190, f02=»P P Q : $ C C ( : 9 $ Y :0123456789ABCDEF P (R 2 @ 9a @ A 0 ) A A ^ W ,= V % @ Q @ @ P @ U A W @ P A W A , a A A A T
0x0690b4…069248 Dummy {f00=0x0021, f01=0x000c, f02=» @ X
0x069248…0693dc Dummy {f00=0x0021, f01=0x018e, f02=» 0 P IDENT PCAS REL 10.0 80-03-14 8701 362 41000 P 8 P @ P H P P P X P ` P* h 0 P* PCAS WRITE PROGRAM FROM /L ON CASSETTE /3 r P* P* BLOCK LAYOUT: P* P* CCCC P* .... $ P* .... UP TO 240 BYTES OF
0x0693dc…069570 Dummy {f00=0x0021, f01=0x0190, f02=» P* REGISTER USE: $ P* A1: PNTR IN CTBUF CODE WORDS $ P* A2: PNTR IN CTREL RELOC BYTES H $ P* A3: PNTR IN DKBUF CODE WORDS p $ P* A4: PNTR IN DKBUF RELOC BYTES P* A5: RELOCATION MASK P* A6: SCRATCH P* A7: ORDER P
0x069570…069704 Dummy {f00=0x0021, f01=0x0190, f02=»* P EJECT P* P* " & P* CASSETTE STATUS BITS. GENERAL. , P* V 6 P* HARDWARE STATUS IS RETURNED BY DRIVER DRTC02 IF ` H P* AT LEAST ONE OF THE STATUS BITS 6, 12-15, RETURNED BY THE CASSETTE 8 P* HARDWARE, IS SET TO 1, THUS INDI
0x069704…069898 Dummy {f00=0x0021, f01=0x0190, f02=»* $ P* CASSETTE HARDWARE-STATUS BITS, P* RETURNED BY DRIVER DRTC02 2 P* V P* BIT 0: 1 ` P* BIT 1: ZERO t P* BIT 2: BOT MISSING P* BIT 3: TAPE-MARK DETECTED P* BIT 4: NO DATA/ERASED P* BIT 5: BOT/EOT-HOLE
0x069898…069a2c Dummy {f00=0x0021, f01=0x0190, f02=»RROR ~ P* BIT 10: ZERO P* BIT 11: ZERO " P* BIT 12: INCORRECT LENGTH 8 P* BIT 13: CRC-ERROR Z P* BIT 14: THROUGHPUT ERROR v P* BIT 15: NOT OPERABLE P* P* @ P* IN HARDWARE STATUS,RETURNED BY DRIVER DRTC02, BIT ZERO IS
0x069a2c…069bc0 Dummy {f00=0x0021, f01=0x0190, f02=» T P* CASSETTE HARDWARE. P* $ P EJECT . P* < > P* CASSETTE SOFTWARE-STATUS BITS, RETURNED BY DRIVER DRTC02 F P* P* BIT 0: ZERO P* BIT 1: ZERO P* BIT 2: ZERO P* BIT 3: ZERO P* BIT 4: ZERO P* BIT 5
0x069bc0…069d54 (0, 134) Opaque[0x194]
0x069d54…069ee8 # DirEnt {nam=»PMPTS «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0438, f03=0x0000}
0x069d54…069ee8 IdxSect {
0x069d54…069ee8 f00 = 0x0021 // 0x69d54 @0x0
0x069d54…069ee8 f01 = 0x0010 // 0x69d56 @0x2
0x069d54…069ee8 gno = [ // 0x69d58 @0x4
0x069d54…069ee8 [0x00]: C0x0021.0x3.0
0x069d54…069ee8 [0x01]: C0x0022.0x0.0
0x069d54…069ee8 [0x02]: C0x0022.0x1.0
0x069d54…069ee8 [0x03]: C0x0022.0x2.0
0x069d54…069ee8 [0x04]: C0x0022.0x3.0
0x069d54…069ee8 [0x05]: C0x0023.0x0.0
0x069d54…069ee8 [0x06]: C0x0023.0x1.0
0x069d54…069ee8 [0x07]: C0x0023.0x2.0
0x069d54…069ee8 ]
0x069d54…069ee8 }
0x069ee8…06a07c Dummy {f00=0x0021, f01=0x0190, f02=» :T ` % C 8 C ( #( #WN < C C ( P C C ( b @ P !VVT A W !WW A T C C ( h C % C ( @ h ? T & _B @ h F1ZL F9YR T h *L 00 @ h '
0x06a07c…06a210 Dummy {f00=0x0021, f01=0x0190, f02=» A$ $ F &> C C ( C % E C ( @ NOT *L YE Z *L & S * * C C ( 8 C C ( @ b ? T & _> D b AB 88T B D 63 d D 68 n B D 75T
0x06a210…06a3a4 Dummy {f00=0x0021, f01=0x0190, f02=»* 01PMPTS REL 10.0 DATE 80.03.14 12NC=8701 364 41000 DISK TYPE : C COMPLETE PREMARK: C DISC FILE CODE : VV XX NOT OPERABLE END OF PMPTS VOLUME LABEL MISSING OR UNREADABLE OK ? ? T F1ZL F9YR 00 @
0x06a3a4…06a538 Dummy {f00=0x0021, f01=0x0190, f02=» A F C C ( C % E C ( @ NOT YE Z S * C C ( C C ( @ b ? T _> D b AB 88T B D 63 d 68 n B D 75T
0x06a538…06a6cc Dummy {f00=0x0021, f01=0x0190, f02=» 01PMPTS REL 10.0 DATE 80.03.14 12NC=8701 364 41000 DISK TYPE : C COMPLETE PREMARK: C DISC FILE CODE : VV XX NOT OPERABLE END OF PMPTS VOLUME LABEL MISSING OR UNREADABLE OK ? ? T F1ZL F9YR 00 @
0x06a6cc…06a860 Dummy {f00=0x0021, f01=0x0190, f02=» A F C C ( C % E C ( @ NOT YE Z S * C C ( C C ( @ b ? T _> D b AB 88T B D 63 d 68 n B D 75T
0x06a860…06a9f4 (0, 135) Dummy {f00=0x0022, f01=0x0190, f02=» 01PMPTS REL 10.0 DATE 80.03.14 12NC=8701 364 41000 DISK TYPE : C COMPLETE PREMARK: C DISC FILE CODE : VV XX NOT OPERABLE END OF PMPTS VOLUME LABEL MISSING OR UNREADABLE OK ? ? T F1ZL F9YR 00 @
0x06a9f4…06ab88 Dummy {f00=0x0022, f01=0x0190, f02=» A F C C ( C % E C ( @ NOT YE Z S * C C ( C C ( @ b ? T _> D b AB 88T B D 63 d 68 n B D 75T
0x06ab88…06ad1c Dummy {f00=0x0022, f01=0x0190, f02=» 01PMPTS REL 10.0 DATE 80.03.14 12NC=8701 364 41000 DISK TYPE : C COMPLETE PREMARK: C DISC FILE CODE : VV XX NOT OPERABLE END OF PMPTS VOLUME LABEL MISSING OR UNREADABLE OK ? ? T F1ZL F9YR 00 @
0x06ad1c…06aeb0 Dummy {f00=0x0022, f01=0x0190, f02=» A F C C ( C % E C ( @ NOT YE Z S * C C ( C C ( @ b ? T _> D b AB 88T B D 63 d 68 n B D 75T
0x06aeb0…06b044 Dummy {f00=0x0022, f01=0x0190, f02=» 01PMPTS REL 10.0 DATE 80.03.14 12NC=8701 364 41000 DISK TYPE : C COMPLETE PREMARK: C DISC FILE CODE : VV XX NOT OPERABLE END OF PMPTS VOLUME LABEL MISSING OR UNREADABLE OK ? ? T F1ZL F9YR 00 @
0x06b044…06b1d8 Dummy {f00=0x0022, f01=0x0190, f02=» A F C C ( C % E C ( @ NOT YE Z S * C C ( C C ( @ b ? T _> D b AB 88T B D 63 d 68 n B D 75T
0x06b1d8…06b36c Dummy {f00=0x0022, f01=0x0190, f02=» 01PMPTS REL 10.0 DATE 80.03.14 12NC=8701 364 41000 DISK TYPE : C COMPLETE PREMARK: C DISC FILE CODE : VV XX NOT OPERABLE END OF PMPTS VOLUME LABEL MISSING OR UNREADABLE OK ? ? T F1ZL F9YR 00 @
0x06b36c…06b500 Dummy {f00=0x0022, f01=0x0190, f02=» A F C C ( C % E C ( @ NOT YE Z S * C C ( C C ( @ b ? T _> D b AB 88T B D 63 d 68 n B D 75T
0x06b500…06b694 (0, 136) Dummy {f00=0x0022, f01=0x0190, f02=» 01PMPTS REL 10.0 DATE 80.03.14 12NC=8701 364 41000 DISK TYPE : C COMPLETE PREMARK: C DISC FILE CODE : VV XX NOT OPERABLE END OF PMPTS VOLUME LABEL MISSING OR UNREADABLE OK ? ? T F1ZL F9YR 00 @
0x06b694…06b828 Dummy {f00=0x0022, f01=0x0190, f02=» A F C C ( C % E C ( @ NOT YE Z S * C C ( C C ( @ b ? T _> D b AB 88T B D 63 d 68 n B D 75T
0x06b828…06b9bc Dummy {f00=0x0022, f01=0x0190, f02=» 01PMPTS REL 10.0 DATE 80.03.14 12NC=8701 364 41000 DISK TYPE : C COMPLETE PREMARK: C DISC FILE CODE : VV XX NOT OPERABLE END OF PMPTS VOLUME LABEL MISSING OR UNREADABLE OK ? ? T F1ZL F9YR 00 @
0x06b9bc…06bb50 Dummy {f00=0x0022, f01=0x0190, f02=» A F C C ( C % E C ( @ NOT YE Z S * C C ( C C ( @ b ? T _> D b AB 88T B D 63 d 68 n B D 75T
0x06bb50…06bce4 Dummy {f00=0x0022, f01=0x0190, f02=» 01PMPTS REL 10.0 DATE 80.03.14 12NC=8701 364 41000 DISK TYPE : C COMPLETE PREMARK: C DISC FILE CODE : VV XX NOT OPERABLE END OF PMPTS VOLUME LABEL MISSING OR UNREADABLE OK ? ? T F1ZL F9YR 00 @
0x06bce4…06be78 Dummy {f00=0x0022, f01=0x0190, f02=» A F C C ( C % E C ( @ NOT YE Z S * C C ( C C ( @ b ? T _> D b AB 88T B D 63 d 68 n B D 75T
0x06be78…06c00c Dummy {f00=0x0022, f01=0x0190, f02=» 01PMPTS REL 10.0 DATE 80.03.14 12NC=8701 364 41000 DISK TYPE : C COMPLETE PREMARK: C DISC FILE CODE : VV XX NOT OPERABLE END OF PMPTS VOLUME LABEL MISSING OR UNREADABLE OK ? ? T F1ZL F9YR 00 @
0x06c00c…06c1a0 Dummy {f00=0x0022, f01=0x0190, f02=» A F C C ( C % E C ( @ NOT YE Z S * C C ( C C ( @ b ? T _> D b AB 88T B D 63 d 68 n B D 75T
0x06c1a0…06c334 (0, 137) Dummy {f00=0x0022, f01=0x0190, f02=» 01PMPTS REL 10.0 DATE 80.03.14 12NC=8701 364 41000 DISK TYPE : C COMPLETE PREMARK: C DISC FILE CODE : VV XX NOT OPERABLE END OF PMPTS VOLUME LABEL MISSING OR UNREADABLE OK ? ? T F1ZL F9YR 00 @
0x06c334…06c4c8 Dummy {f00=0x0022, f01=0x0190, f02=» A F C C ( C % E C ( @ NOT YE Z S * C C ( C C ( @ b ? T _> D b AB 88T B D 63 d 68 n B D 75T
0x06c4c8…06c65c Dummy {f00=0x0022, f01=0x0190, f02=» 01PMPTS REL 10.0 DATE 80.03.14 12NC=8701 364 41000 DISK TYPE : C COMPLETE PREMARK: C DISC FILE CODE : VV XX NOT OPERABLE END OF PMPTS VOLUME LABEL MISSING OR UNREADABLE OK ? ? T F1ZL F9YR 00 @
0x06c65c…06c7f0 Dummy {f00=0x0022, f01=0x0190, f02=» A F C C ( C % E C ( @ NOT YE Z S * C C ( C C ( @ b ? T _> D b AB 88T B D 63 d 68 n B D 75T
0x06c7f0…06c984 Dummy {f00=0x0022, f01=0x0190, f02=» 01PMPTS RE C C ( #( # : $ ! R !__Q P _ : : & # $ C C C ( B : 0 & "! #( B : ' C C ( ' $ $ &> ' C C ( : ' '"'`'j' F1 - F9 :6875 - 2,5 MB; 6876
0x06c984…06cb18 Dummy {f00=0x0022, f01=0x0190, f02=» P !00R* !::R !AAR !FFQ Y& 8 9 Y 9 8 9 W? W? W? W? 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 PF_ L ( ) W4 @R 0 P 9D _( W? V? V
0x06cb18…06ccac Dummy {f00=0x0022, f01=0x0190, f02=»9C L _( V? V? V? V? V? W? V? V? V? V? V? 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* (@
0x06ccac…06ce40 Dummy {f00=0x0022, f01=0x0190, f02=»( : * & ) * ) _ SYSTEM HALTED, PLEASE RESTART SYSTEM +$ A A 9D: " @ :D R 0 P P 9H _4 W _< W V V V V V : W W W W W L T P _ L S r S t S S S S A5 A
0x06ce40…06cfd4 (0, 138) Dummy {f00=0x0022, f01=0x0190, f02=» C ( #( 7r *0(@ ," # C C ( #( (@ * 5b # X V -| 8 C ( X 9DVr X C X # P $ A4 % P _ ( X 8 *L X $ ? T X ! P 9b & _~ W _ X X _ -" C % E
0x06cfd4…06d168 Dummy {f00=0x0022, f01=0x0190, f02=» R R S R R S 5 LABEL = S < DATE = S h S l S p PACK NBR = S v 0 $ S f S h S j S l S n S . S S 8 R * $P 1 1 _ 8 " $P 1 1 _ 8 :A $P 1 1 _ R &N N 9 @ 0< S 9* . 3L
0x06d168…06d2fc Dummy {f00=0x0022, f01=0x0190, f02=» / 3 W W: $T R T R T R 4 B8 > B8 T 0< . W /( S 9jN R S S >E s S R B9 Q2>A R Q( 7 (@ + 7 _ 7 _ 7 _ R / QB A7 A7 7 _< 8 _D / Q A8x / _ A8| 0 _ A
0x06d2fc…06d490 Dummy {f00=0x0022, f01=0x0190, f02=» R % R 9J 0 3fW R B8 R R R V 9d9A S - ] " :A H8 M ? S - Y < R R . % A1B 9J 1 3fW Q B9 R R 9J 1, 3fW R % Z $CATALOG S R S R S R R 2 QN
0x06d490…06d624 Dummy {f00=0x0022, f01=0x0190, f02=» R 2 A5r 7 (@ *0(@ ," # C C ( #( ,` & 3 2R 3L R R 3 2p 3 3 _ _ S R 9H R R R R S R O R 2 N 3 0 3L R R R R 9J 2 3f
0x06d624…06d7b8 Dummy {f00=0x0022, f01=0x0190, f02=»SbY ?T > Z > RP> > RL> ^ 7 / N S2Y ?T $ > ZT> R > V > R > _ / / / / A4L R R @4L : R 8 OKP NOT 2 [ : : R 8 YET [ W NOT ," [ : : A4L R 4F Q S S R : 4L 6 6 7
0x06d7b8…06d94c Dummy {f00=0x0022, f01=0x0190, f02=» * / T 4L : R Y R R 8 0_: 4L R r @5Z ^ R t @5 T S S &_X R t @5` S _ 6875687660 8 3 6" 8 4 6J L 6R 0 6Z 466 r 5 6f * 6 4 6 6 4 6 " 6
0x06d94c…06dae0 Dummy {f00=0x0022, f01=0x0190, f02=»: PACK NBR: DISK UNIT PHYSICAL ADDRESS: DAD NAME: NBR. OF CYL OF DDDDDD : NBR. OF INT OF / : DK TYPE(1215 OR 1216): NBR. OF SEC./ GRAN. OF : : NBR. OF SEC./ TRACK OF ," [ : SEC. LENGTH(IN CHAR) OF S : SYST. USERID: PASSWORD :
0x06dae0…06dc74 (0, 139) Dummy {f00=0x0023, f01=0x0190, f02=»D TRACK IN FIRST CYL. TOO MANY DEF. TRACKS: DAD TOO BIG,BITAB OFLOW NBR. OF INT NOT COMPATIBLE WITH NBR. OF SECT/TRNBR. OF INT NOT LESS THAN NBR. OF SECT/TRXPCTD: 0 READ: 46 r.p.r3L. 3 /X3f3 3 3,2 3 3"3:3>
0x06dc74…06de08 Dummy {f00=0x0023, f01=0x0190, f02=»3 3030 3030 3030 3030 ( ( P P P P SYST. USERID: / GRAN. -DEVICE ADDRESS UNKNOWN -I/O ERROR NO SYSTEM USER POSSIBLE RUN AGAIN ? : END OF PMPTS
0x06de08…06df9c Dummy {f00=0x0023, f01=0x0190, f02=»
0x06df9c…06e130 Dummy {f00=0x0023, f01=0x0190, f02=» CATALOG
0x06e130…06e2c4 Dummy {f00=0x0023, f01=0x0190, f02=» ( 0 $ ,
0x06e2c4…06e458 Dummy {f00=0x0023, f01=0x0190, f02=» CATALOG LABEL: DATE: PACK NBR: A* ? *0 ? ) :^ * ? ) :x *
0x06e458…06e5ec Dummy {f00=0x0023, f01=0x0190, f02=») : * : $ ? T & _( @9 A9 9 ) 9 * @9 ? T & _& NOT 9 T 9 ?z ?| :N = I ! P A S I D 9 A :N D T AD P D A @ ! 8 @?z @= P 8A A?z A= A8 O: = ?z ?| A8
0x06e5ec…06e780 Dummy {f00=0x0023, f01=0x0190, f02=»?z O: ?z N: A?| @:N A:N_P D> P D A:N @:N! v @= T @?z O: = ?z A A= A D :N @?z @= 9@ AB 9@ O: @: 9AR 9 : ) 9 P ? A: D P D A:N Q AD D P D @<T A= 9 CV :N = " A<D 9
0x06e780…06e914 (0, 140) Dummy {f00=0x0023, f01=0x0190, f02=» AD* AD4 AD8 ADX ADb ADf AD AD" AD> ADP :0 ) :> * NO @:>P YE @:> ( ? A AC :> $$ A* ) (@ * I ! :I ! Dl) :N @?xA SvY (D Q ^ A SdI Y :I ! Dl = @?xA SHY (L Q ^ A S6I Y : @:N P P 4 ^ :A H= W W 9C
0x06e914…06eaa8 Dummy {f00=0x0023, f01=0x0190, f02=» SUPERV AM AM AM AM W2 *0(@ EX # C C ( (@ ( MX l # X V W 8 C ( X 9DV0 X C X # P $ AP ( W _ X XD B_L E C ( A ! T 8 Y X ;EV E ' _| W 00 F Qh_
0x06eaa8…06ec3c Dummy {f00=0x0023, f01=0x0190, f02=» r 0 f S . S S O R * $P 1 1 _ O " $P 1 1 _ O " :A $P 1 1 _ R & N N @ H K G K W BP T _" S KL G: L6 S S KT R R BP " BP < KL Gx L6 AG J R
0x06ec3c…06edd0 Dummy {f00=0x0023, f01=0x0190, f02=» E. N _ N _ N _ N _& R H* QB AO AO O _D O _L HN Q AO HZ_ AO Hf_ AO R Ht_* AO R H _8 AO R H _F AO O $_ R H QB AO AO NBR OF O KL H L6 R S R % R KT R R R R V 9d
0x06edd0…06ef64 Dummy {f00=0x0023, f01=0x0190, f02=» KT R % Z $CATALOG S R S R S R R J QJ VTOC S BP R BP S R 9H R R R R J R S S S S R J AM AM (@ E` O G & KL Jn L6 R
0x06ef64…06f0f8 Dummy {f00=0x0023, f01=0x0190, f02=» KT : LP AL =h K. K K W @L K. K* K W : :a :Av v >L >B F : >B _ LP AL =h K Kn K W @L K K K W : :a :Av v >L >B _f N G >L >B _| >A >K >B _ N STY ?T > Z<> RB> RB
0x06f0f8…06f28c Dummy {f00=0x0023, f01=0x0190, f02=»Lh @L :0 $(,1 !%)-2 "&*.3 #'+/ AL R L Q S Q VTOC : R 8 YEP( NOT$ # L C C ( * : END OF PMPTS L : L : L R r @M6P _" S & @M8 S r_(888863 R T SYSTEM S :M 8 L M
0x06f28c…06f420 Dummy {f00=0x0023, f01=0x0190, f02=»L: DATE: PACK NBR: DISK UNIT PHYSICAL ADDRESS: DAD NAME: NBR. OF CYL OF DDDDDD : NBR. OF INT OF A : SYST. USERID: DYN AREA OVF. F.C. MISSINGINVALID PARAM F.C. NOT ASGN INV. F.C. INV. DEVICE SEEK ERRORUNKNOWN DEVICEDEVICE NOT OPERABLE THRUPUT ERR
0x06f420…06f5b4 (0, 141) Dummy {f00=0x0023, f01=0x0190, f02=»LE WITH NBR. OF SECT/TRNBR. OF INT NOT LESS THAN NBR. OF SECT/TRXPCTD: S READ:VTOC : R 8 SELECTED F F L6K K KH K8K<K K R r @ S ; :P _ , ) Y %? r
0x06f5b4…06f748 Dummy {f00=0x0023, f01=0x0190, f02=» x T 4 &: 4: V - P Y _( Y M : $ ] $ =IR E : $_ AQ` Qh 0 1 Y SINGIN AQ Q 4 0R, ! Q& P 8 8 W Y( AQ @Q @Q VICE NOT OPE 338 9 9 8 Y
0x06f748…06f8dc Dummy {f00=0x0023, f01=0x0190, f02=» P P 4 ^ :A D W W =C W E I Q W P _ A _ M Y @ | T T &: 4: V - P Y _( ( ( 0 $ , ; :P _ L &? ] ] ] ] >L
0x06f8dc…06fa70 Dummy {f00=0x0023, f01=0x0190, f02=» X ] X f X ] X f x T& P Z : T ] f_^ T &: 4: V - P Y _( Y 3P Q Q / ] f : 0 ] f : ] f : h P W ] Z : 0 ] f ] h ::L :B Bq Dq B J
0x06fa70…06fc04 Dummy {f00=0x0023, f01=0x0190, f02=» ( P RF(Z) BIOL20 LOGICAL SECTOR 1 *PTS J P SUK A1,2 * *PTS J 0 ( P RF(Z) BIOL30 LOGICAL SECTOR 3 *PTS J H ( P LDKL A1,-52 INITIATE PHYS SECT *PTS J t PBIOL10 EQU * * *PTS J & P ADK A1,52 INCREASE PHYS SECS *PTS J P SUK A2,13 * *PTS J P RB(NN)
0x06fc04…06fd98 Dummy {f00=0x0023, f01=0x018e, f02=»OGICAL SECTOR 1 *PTS J & P LDK A1,4 PHYSICAL SECTOR 4 *PTS K P RF BIOL40 * *PTS K F & PBIOL30 EQU * LOGICAL SECTOR 3 *PTS K ` P LDK A1,16 * *PTS K $ PBIOL40 EQU * CREATE CIO REGISTER K P SLL A1,3 * *PTS K P ORKL A1,/C000 * *PTS K P RTN A
0x06fd98…06ff2c Dummy {f00=0x0023, f01=0x0190, f02=» K PMES L D PMES THE MODULE IPFLOP IS UPDATED TO RUN ON PROGRAMMED CHANNEL L > PMES AND TO PERFORM INTERLACING TO FIT THE TOSS BOOTSTRAP L PMES L PASG 2,NO L PLED IPFLOP L 6 P!!RE 0,$$IPFLOP$$IPFLOP REL 10.0 DATE 80.03.14$$ L P!!
0x06ff2c…0700c0 Dummy {f00=0x0023, f01=0x0190, f02=» L b P!!DL 42,55 M P!!DL 68 M P LDR A3,P * PTS M * B PIPLD25 ADK A3,BASE-IPLD25 COMPUTE START ADRESS FOR BASE * PTS M B P!!RE 81,$$A15$$A13 * PTS$$ M P!!DL 86,87 M P!!RE 88,$$ADS$$ORS$$ M P ORS A8,INR-BASE,A7 * PTS M P ORS A8,CIOST-
0x0700c0…070254 (0, 142) Opaque[0x194]
0x070254…0703e8 # DirEnt {nam=»SUP600«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0478, f03=0x0000}
0x070254…0703e8 IdxSect {
0x070254…0703e8 f00 = 0x0023 // 0x70254 @0x0
0x070254…0703e8 f01 = 0x0014 // 0x70256 @0x2
0x070254…0703e8 gno = [ // 0x70258 @0x4
0x070254…0703e8 [0x00]: C0x0023.0x3.0
0x070254…0703e8 [0x01]: C0x0024.0x0.0
0x070254…0703e8 [0x02]: C0x0024.0x1.0
0x070254…0703e8 [0x03]: C0x0024.0x2.0
0x070254…0703e8 [0x04]: C0x0024.0x3.0
0x070254…0703e8 [0x05]: C0x0025.0x0.0
0x070254…0703e8 [0x06]: C0x0025.0x1.0
0x070254…0703e8 [0x07]: C0x0025.0x2.0
0x070254…0703e8 [0x08]: C0x0025.0x3.0
0x070254…0703e8 [0x09]: C0x0026.0x0.0
0x070254…0703e8 ]
0x070254…0703e8 }
0x0703e8…07057c Dummy {f00=0x0023, f01=0x0190, f02=»l Nr8 # # #$ A~ X - _ H*f* + + ,0-T
0x07057c…070710 Dummy {f00=0x0023, f01=0x0190, f02=»
0x070710…0708a4 Dummy {f00=0x0023, f01=0x0190, f02=» l ( "D r !f9 : G p R $ $ %Z&>F E % 9 J DMC,MCGBHDB&WMC RYD RDD ASE0ABF PSF RSG & TY J- LP / TK M
0x0708a4…070a38 Dummy {f00=0x0023, f01=0x0190, f02=» $ DK V DK 8 V P DK V DK ( V DK a ^ DK a 8DK ) a
0x070a38…070bcc Dummy {f00=0x0023, f01=0x0190, f02=» ? ? ? ? ? ? ? Q~ & ? ? ? ? ? ? ? MX ? ? ? ? ? ? ? L 2b
0x070bcc…070d60 Dummy {f00=0x0023, f01=0x0190, f02=» f l Z f Z f D Z
0x070d60…070ef4 (0, 143) Dummy {f00=0x0024, f01=0x0190, f02=» Z V f R . Z | f ? ? ? ? ? ? ? _ ? ? ? ? ? ? ?
0x070ef4…071088 Dummy {f00=0x0024, f01=0x0190, f02=» ? ? ? eX ? ? ? ? ? ? ? l eX j & L r 0 V |
0x071088…07121c Dummy {f00=0x0024, f01=0x0190, f02=» 6 6 6 6 6
0x07121c…0713b0 Dummy {f00=0x0024, f01=0x0190, f02=» 6 6
0x0713b0…071544 Dummy {f00=0x0024, f01=0x0190, f02=» :
0x071544…0716d8 Dummy {f00=0x0024, f01=0x0190, f02=»
[…0x4…]
0x071d28…071ebc Dummy {f00=0x0024, f01=0x0190, f02=» P
0x071ebc…072050 Dummy {f00=0x0024, f01=0x0190, f02=»
[…0x1…]
0x0721e4…072378 Dummy {f00=0x0024, f01=0x0190, f02=» *
0x072378…07250c Dummy {f00=0x0024, f01=0x0190, f02=»
[…0x2…]
0x072834…0729c8 Dummy {f00=0x0024, f01=0x0190, f02=» @
0x0729c8…072b5c Dummy {f00=0x0024, f01=0x0190, f02=» A A R$ A A R A A R A @#" > > > > > > > > ? ? ? ? ? ? ? U ^ ( H ( P F" _ Q 4&? ?R _ 5 H _ ^ ;j >P @ * Q 9A D *P _ P A ( @ Q A ' A"T ( A A)F_ @ A
0x072b5c…072cf0 Dummy {f00=0x0024, f01=0x0190, f02=» @ ? ? > "D P P Q P ! P @ $ H @ P W ( < JZ @ 9a:a R0 "Z Q Q" ?A <P @"N %J & _ ( _ _ 0 % JZ T @ W @ R (P& P (_ =a:a =A:A Z P Z _" TR @
0x072cf0…072e84 Dummy {f00=0x0024, f01=0x0190, f02=» @% L F" 0 JZ @ PR 0=a @ ?a RX @ ?a VN=A 0 ( P>P< , T T 1W 1W T )W )W ( , _ C ( _ 5 H A& A& A& A& A& A& A' A& ' ( D >a @ =a (@ D U@ x ',W U, @
0x072e84…073018 Dummy {f00=0x0024, f01=0x0190, f02=» B :a Y B R A& _ @& ' W4 @& A& ,Xp _ < @ A' A( A( A( A( A( A( ( =a @ >a V _ @ >a Y A' A' 4 T ' ( "^ 5 U P" @' @( @( @( @( @( @( ( @' x @& 8
0x073018…0731ac Dummy {f00=0x0024, f01=0x0190, f02=» @ !@ *V @ P @ X0 , *V A _< U` A)F @ , L ? ? , L L L L L L ? ? ? ? ? ? ? @" Px @ > > > > > > > ; [ [ [ [ [ [ > > [ [ A @" H" " ? A" >
0x0731ac…073340 Dummy {f00=0x0024, f01=0x0190, f02=»? V :!9 V @ P R W ;A [ [ : _4 Pj T Pf V Q UF V Ud Q4P P 9A?A:AV R Z _ P*R R P ;A [ [ : V X"Z(_( L _P S
0x073340…0734d4 (0, 146) Dummy {f00=0x0024, f01=0x0190, f02=»R _ ;A [ [ : # P| ' PL , ; R <a V 9A:A ; V ; V V W V < V < V H T P R ;H [ [ : _ T P ; R4 < S , _ _ W < R $ <A Q" T" U" :$ _ < Z& - W _ < <A9 R :a
0x0734d4…073668 Dummy {f00=0x0024, f01=0x0190, f02=» R Q ;H [ [ : " _J ? ? ? ? ? ? ? Q _ ^ ( H g& - W . W / X I I R P8 X RlP RrT Y Y W x Y Y $ 0T W W 6 X ? ? ? ? ? ? ? .^ 7 X #? P ? ? ? ? ? ? ? . 7 6 (@ 7P %
0x073668…0737fc Dummy {f00=0x0024, f01=0x0190, f02=»7 (@_~ 52X R Y _ X D $! TR ? ? ? ? ? ? ? /F 7 8 M ? ? ? ? ? ? ? /l 7 % > > > > > > > > ? ? ? ? ? ? ? / 7 P X 7^ 7v / 4 8 TRT X 5P 4 $ <A 52 Pl 52 X X X M M
0x0737fc…073990 Dummy {f00=0x0024, f01=0x0190, f02=»_ X X X U 5 X E _ X 4 Y 5 X 4 Y ! 1P, 0P +P Q Q W W Q Q R P Q 5 Y / ? ? ? ? ? ? ? 1 7 Qv 1& 4 " PF X Q< X P P ? ? ? ? ? ? ? 1X 7 (@ Y C^ X X X R
0x073990…073b24 Dummy {f00=0x0024, f01=0x0190, f02=»1 7 > > > > > > > > 52R X X Q Y ( O` ? ? ? ? ? ? ? 2D 7 ? ? ? ? ? ? ? 2 7 (@ 7P ? ? ? ? ? ? ? 2z 7 2 4 X M X ! 40" P2 O` X ? ? ? ? ? ? ? 2 7 (@ C^ X 4Q W 9AY T Q P
0x073b24…073cb8 Dummy {f00=0x0024, f01=0x0190, f02=» Qz 9AY Tn9ATj @3 D4 @3 $W 1 Y $ D ! P 2 Y 0 P :ET OFP OST Y Y X 5Z X M _d3 4 4 ABCDEFGHI JKLMNOPQR /STUVWXYZ 4 4$4*[.<(+^!$*);] ,%_>?" P X 2 ' Q X 4 X X R ( 5
0x073cb8…073e4c Dummy {f00=0x0024, f01=0x0190, f02=» A , DKP L X X L ! X L P L @ _ C C # ( _R _ _ _ _ _ X T 5b 4 X ! TH X X X T" $ :ET D OFT W OST X P % Y X R X 4 ! X Y T T Y Y
0x073e4c…073fe0 Dummy {f00=0x0024, f01=0x0190, f02=» X R 8 TYX WH H6 Y _8 X X: X R X ( _$ _* $ XtRX P Y _ A6 X X Y X Y _ $ P4R P6 X Q Y Y <dW Y W $ P R , _ X X*Y$ X X X6 Y Z(P A6 ZrP Y _8 _< _@ ! 4 $ X
0x073fe0…074174 (0, 147) Dummy {f00=0x0025, f01=0x0190, f02=» > > > > > 7 V <a W X ' ?A q A82 > > > > > > > 80 , 0W 0T _ l P$ X X ] X * A8aJ " * - X ( 7P = V X X C^ X 4 L ! L % T< L P4 M ^ L X 4 _ ? ? ? ?
0x074174…074308 Dummy {f00=0x0025, f01=0x0190, f02=»9J: 9l9l: : 9~9~9~9~: 9b9t < W* = W" < W ?: L :AR| M W M M 4 L T M M L PH=GV L L 4 9 M 2 ;6 M L 9G L 4 L M L M M L 4 : W M " A< L P L 9JR@ P P T A, 5 U P T Q P P
0x074308…07449c Dummy {f00=0x0025, f01=0x0190, f02=» L ' 7P P p Y "(@ P P $ M : P ( M P Q P P P W P T Q (@ L " A<(@ H H T A, E $ I 4P _ 5 % E (@ L 2 ( P _ 4 ) % ] M (@ L 2 A$ T!fR Q @!f] A,>
0x07449c…074630 Dummy {f00=0x0025, f01=0x0190, f02=» T V P T"W L >F A$ L & A$ < M 4 ; M L M L " P M < : M L M A< L ! PT L M L M L & P L E E M < : M M L L % T D V L ! P L ! XfWn L M L M M =0 : L :c:A L D
0x074630…0747c4 Dummy {f00=0x0025, f01=0x0190, f02=» D Q = M 2 < L L $:BV W $:AV M " M A L L $ M 0 D L U M " V L R L M ( M * M , L X L U M W > M 2 < L D L L 0U L 0 L (U L ( L L R $ 9 _ R $ 9 M , L M M
0x0747c4…074958 Dummy {f00=0x0025, f01=0x0190, f02=» L L , U A< L A$ L U ?X M 2 < L M $ L M & L L I P0% P L X =h P W P L X T M . L 9 M L A$ L L . Q L L L R 0 % _ M M L . P M . ? M 2 < L U @, M 2 < L
0x074958…074aec Dummy {f00=0x0025, f01=0x0190, f02=»P0W" M L A$ @ M ( L U @ M 2 < L L ( E L % E L E L E M A M 2 < L P$ A< M 2 ;r M "W F" = JZW ( L 4 5 L L " C m M ^ U L ( L L ? ? ? ? ? ? ? A A H 4 R W 7
0x074aec…074c80 Dummy {f00=0x0025, f01=0x0190, f02=» d _ AB0 B AH 5 T6 @H P H BD BH BL BP BT @H AH AB0 ( 5 4 X _8 B P W M: B ( "^ B, B . L ER B H L L . Q L L L R 0 % _ M M L . P M . ? M 2 5 B J I B P
0x074c80…074e14 (0, 148) Dummy {f00=0x0025, f01=0x0190, f02=»D X W* 8 AD T AD D (@( 4 4 : 0 :R - Y PU,DNXX,STAT,RY C ;r 5 J ? B C 1P C Y _ @B RDP A P 8 FL B X X ! R V Y AD 8 TKP Y LPP MTP Y
0x074e14…074fa8 Dummy {f00=0x0025, f01=0x0190, f02=»B. 4 X X ? ? ? ? ? ? ? E. 7 _ 5 J B @ Q P P T Z B W P B $>H $ NOT W0 J @ ! $ T P Y B C C R ] B, 0 % E M 0AB CD ADDR @ 9a:a;a R R AF F AH
0x074fa8…07513c Dummy {f00=0x0025, f01=0x0190, f02=»U AE E lX E ( "^ F = JZ @ A @ !? $> A"T H _* 5 @H B @ A B, 0 JZ AG AG G ( "^ @ A ( C 5 @ 4 B P J _ 5 B, 5 J AG J R: P J R( G ( "^ G ^ @ T G (
0x07513c…0752d0 Dummy {f00=0x0025, f01=0x0190, f02=»PP , X QD lX Hl Y , lX Hl Z H @H P : HV ` : B I lX _* AHB H> ( "^ : ; ;<A ' R `R Q QB _ QB <a : : : - A ~(@ A" AH A A A A AH AH AH a H @ ? ? > "D P :b
0x0752d0…075464 Dummy {f00=0x0025, f01=0x0190, f02=» @ @ @ @ Y Y Y Y " A "; V W # @ A AH @ ? ? > Q @ ? ? ? ? ? ? ? I F" @ P <a:a B :A : P6 $ R, Z R R Q $ :D P $ R ^& : B P R( AJH AJJ AJL AJN AJP AJR AJT
0x075464…0755f8 Dummy {f00=0x0025, f01=0x0190, f02=» ? JX ( < JZ B @ 9a:a R @ @J @"N %J '~ %J :EOS:EOV _* AHB H> ( AK< K> !? QM P ^ 52 V X 58 58 X AK AK0 AK2 KR @K@T AK@ !L PM !L L Q AK2P !L _ MF !L P Y !L !L AK2X _
0x0755f8…07578c Dummy {f00=0x0025, f01=0x0190, f02=»9C^ W| !L _ !L Wn !L _ K8 Y Y _ X r s W4 X @ _ W$ AW @W $W %W W !W W X 9d)` AKB AK0A T 7P 9CV * 9AV 9AV X 1P * 9EV )@ X Q6{ X Y Q& X $ :ET D OSP OVT * W * W Y AK0 Y 4 @K0J P Mj
0x07578c…075920 Dummy {f00=0x0025, f01=0x0190, f02=» :EOS:EOV ( < "$&1368 AM M !? QM P ^ 52 AN X AQ X AQ Q R x % =A Y X Y4 Z8 AM $ $ T D i M !Q. X "! T( !Q^ P Y " @M !? 1P P !Qb Y !P HN N N N N N N Q N Q(P P Q Q Q P P AQ !QV " P* AN
0x075920…075ab4 (0, 149) Dummy {f00=0x0025, f01=0x0190, f02=» D P X &Q Y W Y 4 X $;H D :ET $;H D OSP OVT W W !ON X ! P X 1P W @ X U W W W !ON X ! . @Wp !ON X ! Tb AW^ X P& T "P R Q W 8T Y W, W< O P6 4 X Q @Q Y _ X R Q @
0x075ab4…075c48 Dummy {f00=0x0025, f01=0x0190, f02=» AP X 9c T DM EM 4 X B X :c HM % P^ !Qn_N !Qr !P _X !Qv_^ !Qf Y " !P _p M _ X # ;dC Y AM AM 7P AQ _ _ _( _, _0 _4 _8 _< _@ _D _H @M @M J P* P8 AQ X Q I -W ,A W @M ;I U @M M 4A @
0x075c48…075ddc Dummy {f00=0x0025, f01=0x0190, f02=» C _: DL P H C _ P X( DD _Z :EOS :EOF 52 5J 5 @ !? ?R _ R 4 ' !? 0X A "! X6 @ Q P ^L_ P XP P R :AV L D I I "R (@(@ ^ :j >Z ^ @ P _ A $ M (@ M M M B
0x075ddc…075f70 Dummy {f00=0x0025, f01=0x0190, f02=» X M W M W y Y Y Y # C B 58 B 58 $? U P R Rx P R U8 RxP P| P Pv P $P &PN "P< /P :P ;P <P =P >P ?P 1 Rx 8 RxWv T W RrW T W Rl W W T W Wx
0x075f70…076104 Dummy {f00=0x0025, f01=0x0190, f02=» $ X _0 8 TCX< TKXB MTXH DYXN :EOS :EOF 52 5J 5 @ !? ?R _ R 4 ' !? 0X A "! X6 @ Q P ^L_ P XP P R :AV L D I I "R (@(@ ^ :j >Z ^ @ P _ A $ M (@ M M M B
0x076104…076298 Dummy {f00=0x0025, f01=0x0190, f02=» X M W M W y Y Y Y # C B 58 B 58 $? P X0 X Y X ZL ZL B Y % ZL L P Y W* L % P M M M M Wx B % ?A ' B % B =e L P H Y H L X T $ T M W&
0x076298…07642c Dummy {f00=0x0025, f01=0x0190, f02=» M X M @UXT L % P M W8 L " * AX - AX L " ! U$ ! Q L W X|W 8 X 7PM % ! R " T. L L X W L W L L X W L X AUXA M X W W =h C L % Ph L =c M B !?PN P6! TD C B <b $ !@ <B
0x07642c…0765c0 Dummy {f00=0x0025, f01=0x0190, f02=» B M Y k ` M T8 L T: P* M Y _vW C B % T L Z X Y M P* L P L 4 M L P <C M =C M XH Ut M Y B AUf X P P P P P P< a !a$ @U AUZ B T B @Uv )
0x0765c0…076754 (0, 150) Dummy {f00=0x0025, f01=0x0190, f02=» L ZN M V !a$ !aD a B P0 " T* B T$ B S @UZT !a$ @U AUZ ! P W a B <b :b ^ AU AUb AU`R8P AU AU` ! W" ! Q ! W ! P U ! ! _ P" Q Rj ! W` ! ! WN !
0x076754…0768e8 Dummy {f00=0x0025, f01=0x0190, f02=» @U` @U AU ! @UZ ! P W Y $ B Y a @U 9e L P| M !^ " P !^ " T M L Z M WL !^r @UZ ! P L P: !^ " T L @Uv HW& !^ " T L @V W M L Zl a T X $ P@ D R: P @UZ ! P !^* T D $ !_j @UZ ! T L
0x0768e8…076a7c Dummy {f00=0x0025, f01=0x0190, f02=»UZ ! P !^ W !^ " P M L Z. a 4 !^h @UZ ! P !^ " T W$ !^ " P M L . a @V L 4 @U L " P $ AU^ 4 L :C* W W O Ux ^ YZ O Vt ^ YZ N~ V ^ YZ @U^:BWF Ux _ YZ Vt _ YZ ~ V _ YZ L
0x076a7c…076c10 Dummy {f00=0x0025, f01=0x0190, f02=» ) Y @Ud 4 X ? ? ? ? ? ? ? _ 7 P _ =b%0 X $ L <B<j P L 4 $ _ 4 L % T _ Yt_ L =AV: ` YtW L <AR A"R<B M P C M P C 4 X ` ` X % ` L % 4 L ? 4 P L !# Y Y L
0x076c10…076da4 Dummy {f00=0x0025, f01=0x0190, f02=» M F P D * ! T @Uh @Ud 4" X 4 !^ T M AU AU^ !^ 4 a Uv D TOT< D ( 1T2 B E 0 @UZ ! P !^ W !^ " P M L ZF a 4 YZ O Vt YZ N~ V ( 0 $ , c0 X Y X c B Y % c L
0x076da4…076f38 Dummy {f00=0x0025, f01=0x0190, f02=» B M B M a a V 4 Y T T W _ 52 B < V < 58 L P :g: L :C ? L L M L M a R> a Q8 a R M M M M W M M M M y W _ @a P M WR Aa L " * Acg- Ac L " X ! Y M T(% T$ !
0x076f38…0770cc Dummy {f00=0x0025, f01=0x0190, f02=»PD P@ P< P8 P4 eF !g B T B @a ) @a I @a I eF B P,9 Q$ B < R :A R V Q Aa Aa W eF V Aa Aa Aa X P< P P4 P M @a M M !f !d P @ W M @a M M !f !d e d
0x0770cc…077260 Dummy {f00=0x0025, f01=0x0190, f02=» X ? ? ? ? ? ? ? ev 7 P @a @a L T8 L Pj M e ? ? ? ? ? ? ? 7 X m M M WR L P2 M l e ? ? ? ? ? ? ? 7 X M M W f ? ? ? ? ? ? ? 7 X 7P =b%0 X $ L <B<j P L 4 $ _ L =AV L <AR
0x077260…0773f4 (0, 151) Dummy {f00=0x0026, f01=0x0190, f02=» 7P < $ <C ! 9 4 @a 9C @a : 4 M a M !d eF 4 ^ @ T <j =h Qj P. ^ %x 8P F" X % !X %`X P % X. R" X>W % P T % XT <A P X^<a P @ p @ $ " P $^ F"
0x0773f4…077588 Dummy {f00=0x0026, f01=0x0190, f02=» j* > > aj* @j* E @j @j @j @j" @j$ @j& @j( j* Q (@ T W@ &_T@ H P P T ?f' W " H Wx " Wn & P >b& >AW >a& @T " X X T$W. " P X ` `T 8 P X 8 T" T" T
0x077588…07771c Dummy {f00=0x0026, f01=0x0190, f02=» >" Hj, Aj4 T" T" T" T" T" T" " " " " " " " T" Aj4 > ?f' _ 8 @ T <j =h @ _ X X X X $ PjVj^jvkfk % P Y Y Y >% X P Y _" P" P& R| ^T Y _D _T X _ X _
0x07771c…0778b0 Dummy {f00=0x0026, f01=0x0190, f02=»P Q X Q % _" Y Y Y 4 % X P Y $ W Y =D %_ X P V % P Y X XT Q _ j Q j 0DKER UNIT CYLD STAT k k 4 k l W2 k l X W$ k l W k ( X = 0
0x0778b0…077a44 Dummy {f00=0x0026, f01=0x0190, f02=» M Y$ #? @ P R P T T T Y" P T _ X D D E E ] @ E @ mB ? ? > ? ? ? ? ? ? ? pb C ( "^ @p n U T " P " P @p W C "& # ( "^ A p @p @
0x077a44…077bd8 Dummy {f00=0x0026, f01=0x0190, f02=» [ [ @ L ! P Y _ @ M ^ U > > > > > > >WZ A p ^ T " T0 ! P W SY SD AD _ ! P _, J _2 pb # C ( "^ P p p p p CCT I T P Q _, Apl
0x077bd8…077d6c Dummy {f00=0x0026, f01=0x0190, f02=» "^ B P @ !? M @p P M L R ! _ PP I H P _ A l A A A @ ~ p: A ~ @pB A ~ @ r,( A~ A A "^ H (@_0 $ ( , 0 4 8 < pp T " P " P @ W C "& # ( "^ A p @ @
0x077d6c…077f00 Dummy {f00=0x0026, f01=0x0190, f02=» [ [ @ L ! P Y _ @ M ^ U > > > > > > >W A p ^ T " T ! P W SY SD AD _ ! P _, J _2 # C ( "^ P CCT I T DOS - PTS 600
0x077f00…078094 (0, 152) Opaque[0x194]
0x078094…078228 # DirEnt {nam=»ASM «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x04c8, f03=0x0000}
0x078094…078228 IdxSect {
0x078094…078228 f00 = 0x0026 // 0x78094 @0x0
0x078094…078228 f01 = 0x0008 // 0x78096 @0x2
0x078094…078228 gno = [ // 0x78098 @0x4
0x078094…078228 [0x00]: C0x0026.0x1.0
0x078094…078228 [0x01]: C0x0026.0x2.0
0x078094…078228 [0x02]: C0x0026.0x3.0
0x078094…078228 [0x03]: C0x0027.0x0.0
0x078094…078228 ]
0x078094…078228 }
0x078228…0783bc Dummy {f00=0x0026, 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~
0x0783bc…078550 Dummy {f00=0x0026, 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
0x078550…0786e4 Dummy {f00=0x0026, 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
0x0786e4…078878 Dummy {f00=0x0026, 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
0x078878…078a0c Dummy {f00=0x0026, 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
0x078a0c…078ba0 Dummy {f00=0x0026, 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"#
0x078ba0…078d34 (0, 153) Dummy {f00=0x0026, 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 : @
0x078d34…078ec8 Dummy {f00=0x0026, 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.
0x078ec8…07905c Dummy {f00=0x0026, 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
0x07905c…0791f0 Dummy {f00=0x0026, 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
0x0791f0…079384 Dummy {f00=0x0026, 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
0x079384…079518 Dummy {f00=0x0026, 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 ,
0x079518…0796ac Dummy {f00=0x0026, 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 = ] ]
0x0796ac…079840 Dummy {f00=0x0026, 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
0x079840…0799d4 (0, 154) Dummy {f00=0x0026, 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
0x0799d4…079b68 Dummy {f00=0x0026, 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
0x079b68…079cfc Dummy {f00=0x0026, 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
0x079cfc…079e90 Dummy {f00=0x0026, 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
0x079e90…07a024 Dummy {f00=0x0026, 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
0x07a024…07a1b8 Dummy {f00=0x0026, 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 @
0x07a1b8…07a34c Dummy {f00=0x0026, 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
0x07a34c…07a4e0 Dummy {f00=0x0026, 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
0x07a4e0…07a674 (0, 155) Dummy {f00=0x0027, 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
0x07a674…07a808 Dummy {f00=0x0027, 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
0x07a808…07a99c Dummy {f00=0x0027, 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
0x07a99c…07ab30 Dummy {f00=0x0027, 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
0x07ab30…07acc4 Dummy {f00=0x0027, f01=0x0190, f02=» LABEL = FIXS3 DATE = 790404 PACK NBR = 001 f 4: V - P Y _( Y M : ] =IR E
[…0x3…]
0x07b180…07b314 (0, 156) Opaque[0x194]
0x07b314…07b4a8 # DirEnt {nam=»TLK «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x04e8, f03=0x0000}
0x07b314…07b4a8 IdxSect {
0x07b314…07b4a8 f00 = 0x0027 // 0x7b314 @0x0
0x07b314…07b4a8 f01 = 0x001a // 0x7b316 @0x2
0x07b314…07b4a8 gno = [ // 0x7b318 @0x4
0x07b314…07b4a8 [0x00]: C0x0027.0x1.0
0x07b314…07b4a8 [0x01]: C0x0027.0x2.0
0x07b314…07b4a8 [0x02]: C0x0027.0x3.0
0x07b314…07b4a8 [0x03]: C0x0028.0x0.0
0x07b314…07b4a8 [0x04]: C0x0028.0x1.0
0x07b314…07b4a8 [0x05]: C0x0028.0x2.0
0x07b314…07b4a8 [0x06]: C0x0028.0x3.0
0x07b314…07b4a8 [0x07]: C0x0029.0x0.0
0x07b314…07b4a8 [0x08]: C0x0029.0x1.0
0x07b314…07b4a8 [0x09]: C0x0029.0x2.0
0x07b314…07b4a8 [0x0a]: C0x0029.0x3.0
0x07b314…07b4a8 [0x0b]: C0x002a.0x0.0
0x07b314…07b4a8 [0x0c]: C0x002a.0x1.0
0x07b314…07b4a8 ]
0x07b314…07b4a8 }
0x07b4a8…07b63c Dummy {f00=0x0027, f01=0x0190, f02=» D E % 6 % . % A / H < / W :C H A M 4 H R M 4 PB " P :C_ @ 9C E ^ 4 V V ( T # Y$ @ : ( @ D A V A X D ( A ;FR A W H T A Z 2 >
0x07b63c…07b7d0 Dummy {f00=0x0027, f01=0x0190, f02=» H A N A T A $ @ A @ $ A " @ ( A & @ , A * @ N @ T A R A P A < A @ X A V V $P D " X E _ @ P @ A @ " A $ @ & A ( @ * A , @ P > H > H $ > > > >
0x07b7d0…07b964 Dummy {f00=0x0027, f01=0x0190, f02=» > % @ T8 @ P ! ! > > > > ( _ MR:FC W MR:OPN : D D ! L Qz L , % X P$ P P V G = G 0 G X <A @ BQ( P D G X G = X G X G V
0x07b964…07baf8 Dummy {f00=0x0027, f01=0x0190, f02=» < N M N M T - Y : < V ;AP N N MR:RS W MR:GER F % P F P G G 0 1 G T G W F P~ N G G = U : H 4 8 U : L H V V V V V F P 0 G T G F F
0x07baf8…07bc8c Dummy {f00=0x0027, f01=0x0190, f02=»U : H W MR:PUR F % P F P F G G F G T G W 9 F TX F PR F U : D x F P 0 G T G F F W MR:ENR F ! P
0x07bc8c…07be20 Dummy {f00=0x0027, f01=0x0190, f02=» 1 G T G W F PH N G G = U : H F Pd 0 G T G F P " F P. 0 G T G F P U : H l " " " W MR:PUW F % P F P F G G F G T G W 9 F T0 F P 0 G
0x07be20…07bfb4 (0, 157) Dummy {f00=0x0027, f01=0x0190, f02=» G W % U : H F P. 0 G T G F P U : H MR:AR W MR:ASB & P P 2 F P F D E T %W ) G G 2 W MR:REL & P P D G G P 0 E T E MR:L
0x07bfb4…07c148 Dummy {f00=0x0027, f01=0x0190, f02=» W MR:WAI F R R G < ( B F B ] B P W B P ; R _ D G G R W MR:INF < ( B MR:RWR W MR:RBR F P $ T F T F P@ 0 G T G F
0x07c148…07c2dc Dummy {f00=0x0027, f01=0x0190, f02=» F U : H N G G = MR:PC W MR:EXI D ( W MR:DAT @ T I Y 6 W MR:TIM @ " T I I Y I < I I 2 I p MR:ES
0x07c2dc…07c470 Dummy {f00=0x0027, f01=0x0190, f02=»T( " U : H T X N W MR:REW F $ P P p 1 U : H N p # " 'Q R # : A A A A A A A A A A A A A A A A A A A A
0x07c470…07c604 Dummy {f00=0x0027, f01=0x0190, f02=» L ! 0 5 1 L # # :* CREDIT CODE LINKER REL 10.0 800314 * * DATE XXXXXX * PAGE 0000 *
0x07c604…07c798 Dummy {f00=0x0027, f01=0x0190, f02=» UUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUU
0x07c798…07c92c Dummy {f00=0x0027, f01=0x0190, f02=»UUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUU IDENT O T:D TRA NOD P:PIL T:FMT P:S001T:KEY S:GTABT:LIT P:BAS T:BAT T:PAT P:
0x07c92c…07cac0 Dummy {f00=0x0027, f01=0x0190, f02=»P : < = G T . F P _ F =h P8 T* . F P _ F P _ : & A ' : @ ' : # HT W T W ( < ) = # : # H P n P ( ) = # : ^ V H H
0x07cac0…07cc54 (0, 158) Dummy {f00=0x0027, f01=0x0190, f02=» V H H ` V H H V H H
0x07cc54…07cde8 Dummy {f00=0x0027, f01=0x0190, f02=» b V H H V H H `
0x07cde8…07cf7c Dummy {f00=0x0027, f01=0x0190, f02=»
[…0x3…]
0x07d438…07d5cc Dummy {f00=0x0027, f01=0x0190, f02=» | n n
0x07d5cc…07d760 Dummy {f00=0x0027, f01=0x0190, f02=» ( p !
0x07d760…07d8f4 (0, 159) Dummy {f00=0x0028, f01=0x0190, f02=»! :f Q P # :b TD A! A! [ T 9h A! & A! T A! T 9h A! & A! A! W P@ P Z P Q0 0P* P$ P T [ # : # ! H #b A!( A!D A!J > NO 3 D S S H S > > # :
0x07d8f4…07da88 Dummy {f00=0x0028, f01=0x0190, f02=» # @ X @ dW& # @ d @ X @ ` @ U A =a>a R, @ V A =A>A A d A X " # : A A F ; &P _ # : : T : _ # %T # :
0x07da88…07dc1c Dummy {f00=0x0028, f01=0x0190, f02=»T # : )P _ [ [ [ [ ; Z [ : [ [ : Z # Z # Z Z Z Z Z Z Z : = $> % D $N % $X ( ( I/O ERROR FILE = STAT
0x07dc1c…07ddb0 Dummy {f00=0x0028, f01=0x0190, f02=» " : : : G P W l : J A : _ A : _ A : _( A : _4 A : _@ A : b _L A : _X A : j _d A : x _p A : _| A : _ A : _ A : _
0x07ddb0…07df44 Dummy {f00=0x0028, f01=0x0190, f02=» B A ` A d A ( C ( C ( C A(D ($ @(D ,P T (F @ X A @ @ A PWF A @(DT R2 ]B @ D !CCT A N A J C _n > A V $P$ D D X D * E _( A P @(DP T&
0x07df44…07e0d8 Dummy {f00=0x0028, f01=0x0190, f02=» l % @(D A' A'& > > _ @ 9CV @ NT DW D A E A @ V A X @ ` A d A A > V @ d $P( D X ) # - M M _, ) V $P ! # ) A _ ) @ P A A N N J C C @ 9D % N A J
0x07e0d8…07e26c Dummy {f00=0x0028, f01=0x0190, f02=» : A ( : 2 R > : 5 v@7 7 > - - 7 ( - 2 #b @ V : " T. T Tn B P, B $ PZ B P Y<PL P T T W4 P4 W0 : )P ;M C W # : #b A,: T
0x07e26c…07e400 Dummy {f00=0x0028, f01=0x0190, f02=» T| N ` N" :A B ;m )t " )t # )t ( T B ! T @)r! T A)r Z`_ A)r WB ! T. N T A)r @)r! T _ A)rW ! T A)r ) # : @)l @)n @)r" T P, @)pU +vWv R V $Rp A)l A)nWB
0x07e400…07e594 (0, 160) Dummy {f00=0x0028, f01=0x0190, f02=»_ _ @)p R V$ H N " @)p (" :A + : + @)p A)p_8 R @)p N R W )p T W # V8 A)j ,$ R @)l @)n A)n A)l A)p R S _P )p : # @)j R P S > R V A)j_" # : #b A-j R R @ ZR -b_ $:ARL:A
0x07e594…07e728 Dummy {f00=0x0028, f01=0x0190, f02=» A @ S b S # : @ 9FV@ @ b C E T A ET6W& D E P E DDP R E P D A D -b _^ _ S > R Z R S A Z : #b @ 9CV 9IR 4 # : 2 R >_ #b @ 9L . @ 9C 4 R P C / 0` 0 L n
0x07e728…07e8bc Dummy {f00=0x0028, f01=0x0190, f02=» ~ 1 1 2J 2 ' 2| 2 A A A A A A A A n A z A A A @ ` A d @ P A # : R @ P " R P / @0^P 6 ,P _ P 2 0` 0 @ :DV W 1 2J = = R
0x07e8bc…07ea50 Dummy {f00=0x0028, f01=0x0190, f02=» $P 0Pj D L , 1 L P L 8 - 9 W6 @ =LR L V( 8 @ =LV X R Y _t X~ A0^_ : (P: (T _ ,P L P ^ P X" X&_ I ( 9 5 ) 4 _: : $P D H R I _ 0 _ : # H T"
0x07ea50…07ebe4 Dummy {f00=0x0028, f01=0x0190, f02=» 9 P 9 Pz 9: C T @ , A ,W D C C ( # U :x D T A > D C C B U P :x 1 1 1 4P _ 4 9 1 # : $P D
0x07ebe4…07ed78 Dummy {f00=0x0028, f01=0x0190, f02=» : > R : #b x 4 f # @ 9C 4x @ T R < 4 PW R < P @ @ A A C h H " 4 . < X P & ;D _ R % ;D @ b 4 H " 4 < 0 4 A 4 ` H
0x07ed78…07ef0c Dummy {f00=0x0028, f01=0x0190, f02=» @ T A A @ P R > S # > # : : A gP A _ @ TL f d T A R > S # > _V @ * A A _ _ @ _ @ $ @ b _. * & " , ( $ @ T R :h -Q 5R : @ T 4
0x07ef0c…07f0a0 Dummy {f00=0x0028, f01=0x0190, f02=» # # : #b R 9i @ :LRn 7z 9 P( 7r 7 9 P D7 D7 6 R ;a T C :OV C ;NV R Wp 7z 9 P4 @ <DR" 7 7 9 P D7 W 9: 6 ! Z C 8 W
0x07f0a0…07f234 (0, 161) Dummy {f00=0x0028, f01=0x0190, f02=» R P*?A S ?i R :x S # : n z f r ~ j v 9B9B9B9: $ ( #b 2>iP & R W R @ 9C 4 # : f " 2?m f # X8 8 8t f f Pd f @ T ( @
0x07f234…07f3c8 Dummy {f00=0x0028, f01=0x0190, f02=» T. B P P& Q @ P Q # : _ >_ # 8 8 2 0P ( 1 " P$ " ) # @8 I W P I # : @8 >_ #b W #b Q 9 U 9g D9 $ $ T2 @ n A n F P > S S M H > ;
0x07f3c8…07f55c Dummy {f00=0x0028, f01=0x0190, f02=» 8 5R6Q0 Q, ;^ _` Q < X T _t W #b " P W ;t V W ;t R R T T R Q ; ; ; ; V R T(W # Q
0x07f55c…07f6f0 Dummy {f00=0x0028, f01=0x0190, f02=» W : #b @ n D HP A n @ n D HT D F [ A n # : A n @ n F R P > S E H > S _< # P, Q B ^ _ @ T C _0 # : #b $P D D P V L PF =h & >A D R _ " P W
0x07f6f0…07f884 Dummy {f00=0x0028, f01=0x0190, f02=» C A # : # (P:W (P4 H V W P&Q =t P _ 5 ( 9 ) =t 8 # : >_F <T 5 9 : #b @ PF R ! @ R P : A @ S R B> 4T # : #b R ? ? ? ?, X?H #b W #b R ! TR
0x07f884…07fa18 Dummy {f00=0x0028, f01=0x0190, f02=»! D?` D?f P # P Tr T Q !CCP @ P Ap P @ 9EV 9GR P B C @ P 8 # : 2 R >_ B_ R 0P Y P : P ! P P P Q P :>~> ? ? >x? > ? >x? ? > B C P Z b ^ #b R # p
0x07fa18…07fbac Dummy {f00=0x0028, f01=0x0190, f02=» U :xW @ ! P& R ! ^ # A A p A # : [ A _ #b A p A A A ^ @ P A # : #b W #b @ 9B ^ A A C C P6 ' ?A ^ :x ^ :x p ^ C @
0x07fbac…07fd40 Dummy {f00=0x0028, f01=0x0190, f02=» ' ?A B2 B0 !CCT W2 T W, X ' P" X A T R " P B< B< R P4W C C W$ , P - C - A > P Y # : @ C _ ^ 2 Z . b 0 #b @ P @ Y A 8P X V W QL V W Y"
0x07fd40…07fed4 (0, 162) Dummy {f00=0x0028, f01=0x0190, f02=» ( > @L A ` A d A @ 9 R A A 9 R| 'J > A Z A . A ^ A 2 A j A v A A A A A A B 2 A > A @ V A X A @ P A V $P D " X E _ ` P 'Z D A T A P @ :DR$ D @ > A > @ R W R @ BP W 'd A B @ BR @ 9DR
0x07fed4…080068 Dummy {f00=0x0028, f01=0x0190, f02=» V % @ P @ < ( A < A H A L A ' A % @ P T ) A P ' @ T @ X A V : A _ D ? :n R S Z S A Z @ <P. A' @ <R A' > A <:A H' A' > : N J P D C V A : E $ N J " P C _ :
0x080068…0801fc Dummy {f00=0x0028, f01=0x0190, f02=» * / #b N r ( @ X ( # : #b R S > P R # S _ # : R S S U W S # > S 4 S R > : #b A*H R R @ ZR *@_ $:ARL:ARB H b " b $ D @ Z R
0x0801fc…080390 Dummy {f00=0x0028, f01=0x0190, f02=» E T A ET6W& D E P E DDP R E P D A D *@ _^ _ S > R Z R S A Z : #b @ 9CV 9IR 1 # : 2 R >_ #b @ 9L + @ 9C 1 R P C , -> - L n 8 n f - L z 8
0x080390…080524 Dummy {f00=0x0028, f01=0x0190, f02=»/ A A A A A A A A n A z A A A @ ` A d @ P A # : R @ P " R P , @-<P 6 ,P _ P 2 -> - @ :DV W - /( : : R > S # > > / /Z '
0x080524…0806b8 Dummy {f00=0x0028, f01=0x0190, f02=» L 8 - 9 W6 @ =LR L V( 5 @ =LV X R Y _t X~ A-<_ : (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 _ - _ # : # $ /"
0x0806b8…08084c Dummy {f00=0x0028, f01=0x0190, f02=»6 C T @ , A ,W D C C ( # U 7V D T A > D C C B U P 7V - - - 4P _ 4 9 - # : $P D H ^ E _ $P D H ^ E _ : R W
0x08084c…0809e0 Dummy {f00=0x0028, f01=0x0190, f02=»# @ 9C 1V @ T R 9 1 PW R 9 P @ @ A A C h H " 1 . < X P & ;D _ R % ;D @ b 1 H " 1 < 0 1 A 1 ` H " 1 < 1P T A @ P& @ P
0x0809e0…080b74 (0, 163) Dummy {f00=0x0029, f01=0x0190, f02=» # : : A gP A _ @ TL f d T A R > S # > _V @ * A A _ _ @ _ @ $ @ b _. * & " , ( $ @ T R :h -Q 20 : @ T 1 2 R > :; ; ;`; 2 2$2$2$2 2 2 2 2 2 2 2 > > >
0x080b74…080d08 Dummy {f00=0x0029, f01=0x0190, f02=» 6 P( 4P 4h 6 P D4x D4h 3 R ;a T C :OV C ;NV R Wp 4X 6 P4 @ <DR" 4` 4p 6 P D4pW 6 3 ! Z C 5 W " @ C C @ # # : # >
0x080d08…080e9c Dummy {f00=0x0029, f01=0x0190, f02=» 7V S # : n z f r ~ j v 6 6 6 6 $ ( #b 2>iP & R W R @ 9C 1 # : f " 2?m f # X4 4 5R f f Pd f @ T 9 @ <CV C @ <CV : C P C $P _
0x080e9c…081030 Dummy {f00=0x0029, f01=0x0190, f02=» _ >_ # 5 5 2 0P ( 1 " P$ " ) # @5 I W P I # : @5 >_ #b W #b Q 6 U 9g D6 $ $ T2 @ n A n F P > S S M H > 8~ :a # R R S > _ S <H % [ [
0x081030…0811c4 Dummy {f00=0x0029, f01=0x0190, f02=» Q, 8< _` Q < X T _t W #b " P W 8R V W 8R R R T T R Q 8~ 8~ 8f 8f V R T(W # Q P R Zf _n R 6 P
0x0811c4…081358 Dummy {f00=0x0029, f01=0x0190, f02=» n # : A n @ n F R P > S E H > S _< # P, Q B ^ _ @ T C _0 # : #b $P D D P V L PF =h & >A D R _ " P W 7V " P W D Y T
0x081358…0814ec Dummy {f00=0x0029, f01=0x0190, f02=» T Tn B P, B $ PZ B P Y<PL P T T W4 P4 W0 : )P ;M C W # : # (P:W (P4 H V W P&Q : P _ 5 ( 9 ) : 8 # : >_F <T 5 9 : #b @ PF R ! @ R
0x0814ec…081680 Dummy {f00=0x0029, f01=0x0190, f02=»! TR @ P D< D< (P* H ;AZ H P # X P T A , > W| < P < X< W R ! D< D< P # P Tr T Q !CCP @ P > P @ 9EV 9GR P B C @ P 5 # : 2 R >_ B_
0x081680…081814 (0, 164) Dummy {f00=0x0029, f01=0x0190, f02=» & S PD " @ ^ D U 7VW A @ ! P ! @ ^ ) A @ R` @ ^ D U 7VW @ ! P& R ! ^ # A A p A # : [ A _ #b A p A A A ^ @ P A # : #b W
0x081814…0819a8 Dummy {f00=0x0029, f01=0x0190, f02=» C @ # R 3 #b < RJ @ ^ D " :AT 9h P _ R " S P 9H R @ ^ 2x # : # ' ?A ? ? !CCT W2 T W, X ' P" X A T R " P ? ? R P4W C C W$ , P -
0x0819a8…081b3c Dummy {f00=0x0029, f01=0x0190, f02=» W Y" X P X P 5 X T A A W 5 ( 8 ) 9 + _b # :
0x081b3c…081cd0 Dummy {f00=0x0029, f01=0x0190, f02=» F .R F 0 F *Q &< G . F .?DV ?d' % G . 2 F M M G =T p M P G * : F * F 0R 2 R&P 0 G * G * F M M _, : F 1 I I G * G ( ' F .>A ' + ' F n #
0x081cd0…081e64 Dummy {f00=0x0029, f01=0x0190, f02=» F 0 U U F .?BV F X ,?d'> )f " # U 2 U G * F .?CV@ F X ,?A'> )t " # U 2 U G * G . G / : F - n " p U U G * : G . G / : G .
0x081e64…081ff8 Dummy {f00=0x0029, f01=0x0190, f02=» _()0 :R ' : # T V u0 ' )>9d A( )> d )> )> A( ( ( (X ( R W( ( ( P( !00X R !00P P % ( ( P _" % # : R _ 9D :) ) ) * * *$*>*V*d*x* * * * * + +&+X+Z+p+ + + + , ,",8,N,
0x081ff8…08218c Dummy {f00=0x0029, f01=0x0190, f02=»ABLE CALL TABLE PERFORM TABLE LITERAL POOL CROSS REFERENCE LISTING UNSATISFIED EXTERNALS PICTURE POOL LINKER STATISTICS KEYTABLE POOL FORMAT POOL SEGMENT MAP LINKER STATISTICS TOTAL &LOC MODULE ERROR COMMENT $LOC DATA IX SY
0x08218c…082320 Dummy {f00=0x0029, f01=0x0190, f02=»AL 2 S E G M E N T N U M B E R O F 0NUMBER 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 UNSATI
0x082320…0824b4 (0, 165) Dummy {f00=0x0029, f01=0x0190, f02=» TOO MANY LITERALS FORMAT LENGTH ERROR MULTI DEF ENTRY 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 TAB
0x0824b4…082648 Dummy {f00=0x0029, f01=0x0190, f02=» PROGRAM LENGTH = NUMBER OF ERRORS KEYTABLE DESCRIPTOR TABLE KEYTABLE POOL SIZE AVAILABLE WORKSPACE USED WORKSPACE UNUSED WORKSPACE MAX WORKSPACE PER MODULE SEGMENT SIZE PERCENTUAL USAGEPROGRAM LENGTH =LINKAGE ERROR : : XXXXX BYTES, XXXXX ENTRIES: XXXX
0x082648…0827dc Dummy {f00=0x0029, f01=0x0190, f02=» f ~ @ D A ` A d A @ @ P } ( : A } S A ~ |W > p ?H/ 2 Tr Q / 2 2 2 2 2 2 2 v 2 /@ 2 U`/ 2 38 6z N J " @ A T
0x0827dc…082970 Dummy {f00=0x0029, f01=0x0190, f02=» 6> A 8 W 8x T U`/ 2 1| > P ! @ M A @ M A @ M A A A A : # A1 A1 > 3 S S @ S @ S S > # : # <: @ T U` 2 P <: #
0x082970…082b04 Dummy {f00=0x0029, f01=0x0190, f02=» A2 > R :R8W @2 P.> > & 3 @2 S :a S @20 A2 > A2 # : # # A2 > " Z # ?h # S A3 > # : f j r v ~ " $ * , # @ @ P 3 3 =B < P L A P O W L P
0x082b04…082c98 Dummy {f00=0x0029, f01=0x0190, f02=»o W K =^ & A 3( < P F q P * W F P * =^ 34 # : f j ~ # @ P @ A4Z 4N > @ A4 @4Z A 4 4R > @ A4^ @4 A 6 T > @ A4` T @4^ A 8 4V > @ @4` A : A @
0x082c98…082e2c Dummy {f00=0x0029, f01=0x0190, f02=» C T 1 e 4b <: 4Z <: <: @ Q T 1 e 4d <: 4 <: <: T* 1 e 4f <: 4^ <: <: @ Q T v 1 e 4h <: 4` <: <: # : # 9a :a ; S < S dR _ Q R
0x082e2c…082fc0 Dummy {f00=0x0029, f01=0x0190, f02=»PD R( " # 0 C P C P C _, @ P = _ Z P " %W ! # 0 C P C _ > 2! P( ! P ! R A _& @ @&_8 R ! R R 9 Zd <: _ 7 8 8&848P8j) ) )
0x082fc0…083154 (0, 166) Dummy {f00=0x0029, f01=0x0190, f02=» 4 6 : # W # W # > X7 > > A7 @7 X7 V > 7 " # X7 0 P" P P /`W /D # @ P % " ) X7 $ $ T 9A P 9a ( P P 7 W )
0x083154…0832e8 Dummy {f00=0x0029, f01=0x0190, f02=» P 5 X T A A W 5 ( 8 ) 9 + _b # : # > D: > > 8 ; U @ ;L > (X X V * " Wr X 9AV" (X (XWH X L T X " G W" (X
0x0832e8…08347c Dummy {f00=0x0029, f01=0x0190, f02=» > X X VL H 9a @ / 2 / <: X R / <: :09AR H XZ H V % <: % R <: :0 # : # 8P* X ^ X % <: % <: A _. # : ; % <P %_ : : # @ P <8
0x08347c…083610 Dummy {f00=0x0029, f01=0x0190, f02=»;a A<4= V A = V U A<6W^ @<4PV @<4 9a :A 3& A= > # S @= A=, > A<4 A<6 # : # "P _ P # : # P, Q B ^ _ @ T C _0 # : #b $P D D P V L PF =h &
0x083610…0837a4 Dummy {f00=0x0029, f01=0x0190, f02=»# _ # = : >V>f>n>rSTR BIN BCD PIC KEY FMT FTB #b A>L > T>D > > 8 @ X ^ @ VP > " T (X X 9l9B @>L >N # (X T R > _z Q W: X '
0x0837a4…083938 Dummy {f00=0x0029, f01=0x0190, f02=» - @> Q A> W A> @ V > (X > R <: _ Q @ V > > @> @ ^ > > _ # : # x P R * " B @ P _ > # (X h H " P T # >
0x083938…083acc Dummy {f00=0x0029, f01=0x0190, f02=» 8P X Y R X R W ^ # # : I E I I W I E E E I E E E E I E E E I E E # W # AA 8 B > @A T" P $ X P 8 B A @A P P /4 # W * " A ( AX " !WWP A
0x083acc…083c60 Dummy {f00=0x0029, f01=0x0190, f02=» A # > A # : #b *Pp Z Z R 8 4 U 8 5R6Q0 Q, D$ _` Q < X T _t W #b " P W D: V W D: R R T T R Q
0x083c60…083df4 (0, 167) Dummy {f00=0x002a, f01=0x0190, f02=»P B [ # : D $ ! 9A : R W : #b @ n D HP A n @ n D HT D F [ A n # : A n @ n F R P > S E H > S _<
0x083df4…083f88 Dummy {f00=0x002a, f01=0x0190, f02=» / 00 TLK.ERR. # ?$ A ` A d A @ @ TD A A 20 > 0 A A 4 > 7 6 @ P & @ T . > 5 @ T T @ P W ;< @ ?a @ A 5V A @ A 1 :> P / ( / ( A/ ( # :
0x083f88…08411c Dummy {f00=0x002a, f01=0x0190, f02=» 3P 3Pj_: 2$ <A ]H f " 4?m f # f 3R P $P _ " C _^ 4V W >AX R _ T , L X L L T 5_( G _0 @0 V > > T S # 0 : # N E 8P E _
0x08411c…0842b0 Dummy {f00=0x002a, f01=0x0190, f02=» H 2 ";L = <J ( <J_T N $P. D ' X ( <J <J <J_2 <J = # : # # A3 > " Z # ?h # S A3J > # : #b @ V : " T. T Tn
0x0842b0…084444 Dummy {f00=0x002a, f01=0x0190, f02=» # : & " * 4N4V4^4f4n4v4~4 4 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 # 2 aH = eh eh = 3 $PNR
0x084444…0845d8 Dummy {f00=0x002a, f01=0x0190, f02=»S < S dR _ Q R _ # : I E I I W I E E E I E E E E I E E E I E E # W # A5 8 6 > @5 T" P $ X P 8 6 5 @5 P P /4 # W * " 5 ( 5 " !WWP A 5
0x0845d8…08476c Dummy {f00=0x002a, f01=0x0190, f02=»5 # > 5 # : # > > > > N 8P > X % (X X 9h S ( X ! P X 5V ( % G R $P D _ ! ( ) ( > _ # : # A7 A7 A > P R > _
0x08476c…084900 Dummy {f00=0x002a, f01=0x0190, f02=» H X ?a @/ = _* V $X H X ?a ` H L P / / = _: 2$ <A ] f " 4?m f # f 3R B ! X $P _ " C A7 _d 3TN 2$ <A 4 $P0 ( V S W* R >A_ % H
0x084900…084a94 (0, 168) Dummy {f00=0x002a, f01=0x0190, f02=» L d ` h 4 6 8 : ` l 4 6 : # W # W # > X9 > > A9 @9 X9 V > 9 " # X9 0 P" P P /`W /D # @ P % " ) X9 $ $
0x084a94…084c28 Dummy {f00=0x002a, f01=0x0190, f02=» > > > 8P X T > > $ X* > ?m # P S S ! 9bT W D;8 S X ! Pj X T * " S WH (X (X (X - ' # & > 8 # : # @
0x084c28…084dbc Dummy {f00=0x002a, f01=0x0190, f02=»= V S = V S ;a A<D= V A = V U A<FW^ @<DPV @<D 9a :A 3& A= > # S @= A=< > A<D A<F # : # A=b N =c J " T" =P $R ( <J_ <J # : # A= A= > 3 S S
0x084dbc…084f50 Dummy {f00=0x002a, f01=0x0190, f02=» ' # > V ' @= # A= > R :R8W @= P.> > & 3 @= S :a S @> A> > A= # : # 4P [R > , > (X - ' # ( G ( ) ' _` P P > # :
0x084f50…0850e4 Dummy {f00=0x002a, f01=0x2008, f02=» B h p x
0x0850e4…085278 Dummy {f00=0x002a, f01=0x40a8, f02=» @ F IDENT Z:TB70 TRA 3.3 79-11-16 O111 REL 79-03-01/JATE Z:TB70 H Z:TB70T Z & 2 n 4 @ SREGCOSTREG VOL2 4 @
0x085278…08540c Dummy {f00=0x002a, f01=0x409e, f02=» @ F IDENT D:TB80 TRA 3.3 79-11-16 O111 REL 79-03-01/JATE D:TB80 H D:TB80T Z h n :T @ @ SREGCOSTREG VOL2 4 @
0x08540c…0855a0 Dummy {f00=0x002a, f01=0x4168, f02=» @ F IDENT Z:TB80 TRA 3.3 79-11-16 O111 REL 79-03-01/JATE Z:TB80 H Z:TB80T Z & n & & = & [ & y & & & & &
0x0855a0…085734 (0, 169) Opaque[0x194]
0x085734…0858c8 # DirEnt {nam=»TRA «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x1128, f03=0x0000}
0x085734…0858c8 IdxSect {
0x085734…0858c8 f00 = 0x0089 // 0x85734 @0x0
0x085734…0858c8 f01 = 0x001a // 0x85736 @0x2
0x085734…0858c8 gno = [ // 0x85738 @0x4
0x085734…0858c8 [0x00]: C0x0089.0x1.0
0x085734…0858c8 [0x01]: C0x0089.0x2.0
0x085734…0858c8 [0x02]: C0x012b.0x3.0
0x085734…0858c8 [0x03]: C0x012c.0x0.0
0x085734…0858c8 [0x04]: C0x012c.0x1.0
0x085734…0858c8 [0x05]: C0x012c.0x2.0
0x085734…0858c8 [0x06]: C0x012c.0x3.0
0x085734…0858c8 [0x07]: C0x012d.0x0.0
0x085734…0858c8 [0x08]: C0x012d.0x1.0
0x085734…0858c8 [0x09]: C0x012d.0x2.0
0x085734…0858c8 [0x0a]: C0x012d.0x3.0
0x085734…0858c8 [0x0b]: C0x012e.0x0.0
0x085734…0858c8 [0x0c]: C0x012e.0x1.0
0x085734…0858c8 ]
0x085734…0858c8 }
0x0858c8…085a5c Dummy {f00=0x0089, f01=0x0190, f02=» #M M 2 # " 2 3 l 2 D h Fp R Fp W Fp [ d 2 ` :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
0x085a5c…085bf0 Dummy {f00=0x0089, f01=0x0190, f02=» N $ @ H | @ A @ P A A N A @ Q -J % : A A& ' N @ P A A W - @ A A n A < A > A @ A A A : . @ n @-H . A . ., ( @ p A r A p 1 (J - (J (J TD
0x085bf0…085d84 Dummy {f00=0x0089, f01=0x0190, f02=» @ BP .8 @ R .D @ - P T ~ P : T : _&.P. @ P R 2 d T @ R : @ P @ RP & P z T @ T A .h A L @ TL @ BP .8 F : z ` H :
0x085d84…085f18 Dummy {f00=0x0089, f01=0x0190, f02=»% P< . W2 @ :P A : ! P"% T .8 -J W % T .8 : @ = V A J . @ T @ P T : * AZ AZ 09 .. '' < * '' * < J A p A A A-F M u
0x085f18…0860ac Dummy {f00=0x0089, f01=0x0190, f02=» W* A U -J @ T n N @ V4 # b U -J N P A P @ V> @ XP <W * # b IQb N T P @ IV2 J +R IP W + # b IQ N PF J # W
0x0860ac…086240 Dummy {f00=0x0089, f01=0x0190, f02=» : Q : M M N N N N$N0N<NHNTN`NnN`N`N`N`N`N`N`N`N`N`N`N` (STACKTOP
0x086240…0863d4 (0, 170) Dummy {f00=0x0089, f01=0x0190, f02=» IDENT MODNAM TRA XX.Y - - F1 O1111 = , ( Z J , j ) z Z ) z , j , & , C X W D ' , , @' @' ,
0x0863d4…086568 Dummy {f00=0x0089, f01=0x0190, f02=» , " B+ - AZ f AZ f 09 f .. f AZ AZ 09 .. , TERM . TWB . UWB . CWB . SWB . DWB . DSET . START . REENTER . STACK . FMTCTL . BLK . DBLK . BIN / BCD / BOOL / STRG
0x086568…0866fc Dummy {f00=0x0089, f01=0x0190, f02=»CMP SET A CLEAR @ TEST C XCOPY j COPY b EDIT ` EDSUB l INV B IB 6 B W 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 BF P BT T BOK
0x0866fc…086890 Dummy {f00=0x0089, f01=0x0190, f02=» $ CBNE ( CBNG * CBNL , CALL 0 RET 4 INSERT d INSRT d MATCH h DELETE f DLETE f EXIT 0 "PAUSE 0 "KI 0 <NKI 0 <RSTRT 0 .USE 0 2UNUSE 0 8ACTV 0 &EDWRT 0 HDSC0 0 NDSC1 0 TDSC2 0 XSTAT 0 hWAIT 0 nMWAIT 0 rSWITCH 0 "
0x086890…086a24 Dummy {f00=0x0089, f01=0x0190, f02=»DOWN 0 "TDOWN 0 "TUP 0 "DUPL 0 GETABX 0 |SETCUR 0 "GETCTL 0 TSTCTL 0 GETFLD 0 DISPLAY0 ERASE 0 PRINT 0 DYKI 0 UPDFLD 0 EDFLD 0 ATTFMT 0 DETFMT 0 "RREAD 0 RWRITE 0 READ 0 WRITE 0 ,REWRITE0 TDISCARD0 pPOSIT 0 OPEN 0 CLOSE 0 nRSTAT
0x086a24…086bb8 Dummy {f00=0x0089, f01=0x0190, f02=» O $ @ 5 h ! Q ! Q O " " Q :
0x086bb8…086d4c Dummy {f00=0x0089, f01=0x0190, f02=» QIDENT H EJECT SPACE LIST NLIST DDIV DDUM OPTNS / CON /hPERF /tPERFI / PLIST / END / FTABLE / INCLUDE / KTAB / FRMT / FMEL / FMELI / FCTL / FCOPY / FXCOPY 0 FTEXT 0 FLINK
0x086d4c…086ee0 Dummy {f00=0x0089, f01=0x0190, f02=»FBNZ 0 FBNP 0 FBNN 0 FB 0 FBF 0 FBT 0 FSL 0 FNL 1 FKI 1 FINP 1 FEOR 1,FMEND 18ENTRY 1DEXT 1PEXPROC 1 EQU 1hPROC 1tPFRMT 1 PKTAB 1 PLIT 1 PBIN 1 PBCD 1 PSTRG 1 PFREE 1 PBOOL 1 PDSET 1 PEND
0x086ee0…087074 (0, 171) Dummy {f00=0x012b, f01=0x0190, f02=»XXXXXX * PAGE 0000 * DATA DIVISION PROCEDURE DIVISION PROCEDURE LABELS DATA ITEM NAME TABLE nLOC OC OPERANDS LINE LABEL OPCODE OPERANDS COMMENT C n IX
0x087074…087208 Dummy {f00=0x012b, f01=0x0190, f02=»PE NAME REF TYPE NAME REF TYPE NAME REF TYPE IX TYPE VALUE PROGRAM LENGTH = ERROR = REL 10.0 800314 * ! @ Pn $ T < ! T` @ <aP @ Q % % (J - R * A uX6 @ U -J @ U
0x087208…08739c Dummy {f00=0x012b, f01=0x0190, f02=» @ 4W W 2 : 9l:D 0 :R = : Q2 T W. 6 !0 R" !: R !A R !F Q $ =D _2 :END PDIV DDUM IDENT FRMT FMEND PEND ***GENERATED STATEMENT*** @ 9 V^ ?C & , R P Q W
0x08739c…087530 Dummy {f00=0x012b, f01=0x0190, f02=»! T ! : W @ ! Q A < ! P @ Q A / @ Q -J : @ ! Y A " ! T -J : : @& ) A& A B : B @ Q % % A L A : @ P @ P A& B : < ! P # 6
0x087530…0876c4 Dummy {f00=0x012b, f01=0x0190, f02=» V @ N @ P : A -J % % ( T : ' _ A " @ J ~ Q f 4 R W ~ @ f 4 Y P _P L R < # P _ ! @ J %
0x0876c4…087858 Dummy {f00=0x012b, f01=0x0190, f02=»P _ W @! R ! ! A! ! : ! U : R _ $ : 0 4T Y ::a Y : @ U4 u @ Q 9AR W 9CV - W : T 9 : .
0x087858…0879ec Dummy {f00=0x012b, f01=0x0190, f02=»! # A Z P 6 P R* - W( @ 8P" @ W ! P W T - W - $0P A ZWn P # P - @TT # A! L A L R T2 @ P A X _B # - W A! A! T Q W P - Z
0x0879ec…087b80 Dummy {f00=0x012b, f01=0x0190, f02=» ! T P U U W" ! P P U n P h @ A L R P F P ! P: 6 !+ P !- P P Q W % # T W @ 3 T <D P _ A L A L R 9 _
0x087b80…087d14 (0, 172) Dummy {f00=0x012c, f01=0x0190, f02=» P @ Y =h 9 W @ W T ! @ # P P, 6 !0 R !9 U !A R !F Q % W W P 3 T <D_B 9 A L R_R @ @ W ! T" *>H J V >d _ K >h + P4 ! 9 V - 9 V - 9 V - 9 V - A! !
0x087d14…087ea8 Dummy {f00=0x012c, f01=0x0190, f02=» E E E E E E $ : ! W ! D D D D D D $ : [ [ [ [ ; Z [ Z [ : [ [ : " Z " Z Z Z Z Z
0x087ea8…08803c Dummy {f00=0x012c, f01=0x0190, f02=» P _ >hX> : Z ] _$ _ _&MEMORY OVERFLOW SEQUENCE ERROR DIRECTIVE MISSING SYNTAX ERROR LENGTH TRUNCATION MULTIDEFINED UNDEFINED UNEXPECTED VALUE UNDEFINED TYPE UNEXPECTED TYPE ILLEGAL CONSTANT
0x08803c…0881d0 Dummy {f00=0x012c, f01=0x0190, f02=» BLOCKS TOO MANY DATA ITEMS BLOCK SIZE OVERFLOW TOO MANY DATASETS TOO MANY PARAMETERS TOO MANY START STMTSILLEGAL DIMENSION TOO MANY VALUES OUT OF RANGE UNSPECIFIED PARAM PARAMETER LIST OVFL NO START DEFINITION @ >aPH @-FP@ & ** '
0x0881d0…088364 Dummy {f00=0x012c, f01=0x0190, f02=»& " @ U - A& < V M u & ' n & " : P W V W # C ( : @& % - A& < Rf @& @ V < < R0<
0x088364…0884f8 Dummy {f00=0x012c, f01=0x0190, f02=» n + , A& @& " @& ?d' & n 6 * n 2 , - n * n 2 , 0 , @& ' . " * 2 , 2 , A& '2 P (r P )< &j ,| R : ( ( ( ( P ( P
0x0884f8…08868c Dummy {f00=0x012c, f01=0x0190, f02=» )N )Z )f )f P ) P * *( *4 *4
0x08868c…088820 Dummy {f00=0x012c, f01=0x0190, f02=» * * * * +v
0x088820…0889b4 (0, 173) Dummy {f00=0x012c, f01=0x0190, f02=» R& R W T R = ( B T B P : : * + &j ,| - : + _$ * @, P ?a 9H + *
0x0889b4…088b48 Dummy {f00=0x012c, f01=0x0190, f02=»= STATUS = ":H - " - 2 + & -v + ( 0 , ( @ P u -J : Z A J _ A J v _ A J _( A J _4 A J _@ A J N _L A J _X A J T _d A J z _p A J _| A J _ A J _ A J
0x088b48…088cdc Dummy {f00=0x012c, f01=0x0190, f02=» _ A J _( A J _4 A J * _@ A J _L A J _X A J _d A J _p A J $ _| A J _ A J _ A J _ A J * _ A J l _ A J _ A J _ A J 8 _ A J f _ A J _ Z A J _ A J _ A J _(
0x088cdc…088e70 Dummy {f00=0x012c, f01=0x0190, f02=» _ A J _ A J _ A J _ A J _ A J _ A J * _ A J D _ Z A J P _ A J _ A J h _( A J t _4 A J 6 _@ A J _L A J _X A J _d A J _p A J _| A J _ A J _ A J d _ A J | _
0x088e70…089004 Dummy {f00=0x012c, f01=0x0190, f02=» A J _4 A J j _@
0x089004…089198 Dummy {f00=0x012c, f01=0x0190, f02=»2 TRUE 2 T 2 FALSE 2 F 2 @ <V @ 7 Rr u @2 @ P 9D 3 9 ( T@ 2 =P P =T . -JW @ A3 @ ?A A A3 <, - : T:A000T:D000 *0 : CZ
0x089198…08932c Dummy {f00=0x012c, f01=0x0190, f02=» F ! P A2 8 A2 8 & 3 # >HQ >AR -J W -J P -J E @ A2 A2 A2 A2 9h A2 A2 2 . A L L R 2 A2 @ P ?D A2 : 2 @2 8 @ ~ !DD 5 #
0x08932c…0894c0 Dummy {f00=0x012c, f01=0x0190, f02=» Q A A R( 3 T -JWJ 2 PD -JW< 2 P T A3 3 W A3 3 2 ! 3 @2 P$ @d 7 @3 7 A2 : 3< # A2 2 >HV - W* # >HZ U - V -
0x0894c0…089654 (0, 174) Dummy {f00=0x012c, f01=0x0190, f02=» 2 0 ' 2 @ 4 A2 W A2 @ 7 7 u 8 & 8 8 & P @2 T -JW @2 2 3 E A @ @2 P A2 A 8 2 @ ! P^ u 7 @ 8Q> @3 u 7 D AA A^ A n
0x089654…0897e8 Dummy {f00=0x012c, f01=0x0190, f02=» 0 ' : W W W W W W -J : 9pFC= 9 BUFL= 9 DEV= 9 BUFDS= @ R P u R $@P 2 T W( @2 @ P 9jT W 9fT 2 @ u @2 :D @ Q :D & A2 A8" A8& A8( A86 A88 A
0x0897e8…08997c Dummy {f00=0x012c, f01=0x0190, f02=»-J_ W - _^ @86 Y A8#_x @88 ( 6 0 A8& @ A8"_ @8< D ZR$@XV @2 ]` A8(_ @8: h_ (9 099 (,9 ) 099 8) W W W ! @3 ? 8 W $ W " A V A9 2 @ P @3 <V @3 <R @ 7 R u
0x08997c…089b10 Dummy {f00=0x012c, f01=0x0190, f02=»P # ! T _ ^ X A9 A9 < 9 RF @9 9 T U4 @9 $ T ^ P @9 P - @9 A9 < _> P @9 ! Q - W - @2 @ P 9D 3 9 9 ( @9 P @ ! PV @ @ V=L @9 9 @3 Y 9 R @
0x089b10…089ca4 Dummy {f00=0x012c, f01=0x0190, f02=»W W -J : 6 Q R P =oT >BV U - W - : @ ! P* @ 8Q$ ": @ A< 0 D " : = INDS= = OUTDS= @= T A= !?A < A=$ A=& =
0x089ca4…089e38 Dummy {f00=0x012c, f01=0x0190, f02=» A< _l @=&T0 R"$@P @ P A< _ W W - _ >dADRMOD= > LITADR= @>*P -J A>* > # P $ & : @>(T A>( T T R X( Q A % A 2 A A A A A _R @ Qj T` TX RRXn TH
0x089e38…089fcc Dummy {f00=0x012c, f01=0x0190, f02=»V B A2 A n & : # 6 T = V - =A a : - :? @? ? P< # >HR$ U - ? A? A : - : -J : @@ T. # >HR( U - A@
0x089fcc…08a160 Dummy {f00=0x012c, f01=0x0190, f02=» D @ n G @3 G G @ n D @ @ S AA D A^ A n P 2 D _ D @ n A n D @ A A A 8 : E E A E E : :BTABT:ATAB : T:A000 @ ! P @A P : AA @3 ;B
0x08a160…08a2f4 (0, 175) Dummy {f00=0x012c, f01=0x0190, f02=» % H E _D @ _( 2 AA 9h AA A A A A A D AA A^ P E _ E A n D P D _ D @ n D @ AA @ AA U AA AA C* @ AA @ AA S AA AA C* @ A : A D
0x08a2f4…08a488 Dummy {f00=0x012c, f01=0x0190, f02=» D A A P. D " D @A _4 D @ n D : * F @, T @ n- K K J =A?A R , T^ : R T, ' A nSd : R<W* T - W ' / =A>A?A ' A nS8 A nS2 R :AR K K A, :=A?A>A^ A, K K !
0x08a488…08a61c Dummy {f00=0x012c, f01=0x0190, f02=», T <GQ @, TJ : @* P <E, # ! T = V A, :R , : @ ! G G D @ @ AE AA A^ P E _ E A n @E P " D _ @ AE E " D
0x08a61c…08a7b0 Dummy {f00=0x012c, f01=0x0190, f02=»D AA A^ @@ P @ E ? ? P E _ E E A n " D @E @ 9 Q * D @@ T D D W D D @? D P D D _" D @ n D
0x08a7b0…08a944 Dummy {f00=0x012c, f01=0x0190, f02=», P =A>A^ A, C ! , :
0x08a944…08aad8 Dummy {f00=0x012c, f01=0x0190, f02=» 2pLIST 2 # ! 2 2 8 ! TV T 2 P . - W @ A2 @ Q @ P % % @ A @2 A A N - A :
0x08aad8…08ac6c Dummy {f00=0x012c, f01=0x0190, f02=»
[…0x1…]
0x08ae00…08af94 (0, 176) Dummy {f00=0x012d, f01=0x0190, f02=»
0x08af94…08b128 Dummy {f00=0x012d, f01=0x0190, f02=» 9 9 G ? ? 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 IH> 9 <t9 9 9 9 9 9 9 9 ?:9 9 9 9 9 9 9 B E E I )> "R
0x08b128…08b2bc Dummy {f00=0x012d, f01=0x0190, f02=» H :H 9 2 + 9 + ( 0 , ( DOS SYSTEM ERROR ON ADDRESS = W j 2 V 9 , : 5 V 9D9k D9 :J: : ; 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
0x08b2bc…08b450 Dummy {f00=0x012d, f01=0x0190, f02=» @ U 9 . : M - <X F G U W D V : F V # f = Z V ;d R W W W W ' C ; R WdW W W V SCP" OBP LMP UFP : K V K K K
0x08b450…08b5e4 Dummy {f00=0x012d, f01=0x0190, f02=» @ _ 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 P
0x08b5e4…08b778 Dummy {f00=0x012d, f01=0x0190, f02=» 4 T C = R _ _ _ _ B , @ T * ,9cP J Y _ :` @ T T P T R ?A?i _ U U U W : W V C >n R W _ _ _ T 4 & C > R WL_ _ _ B , ,9c J [
0x08b778…08b90c Dummy {f00=0x012d, f01=0x0190, f02=» V * 4T _ R ; J S6 T J 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
0x08b90c…08baa0 Dummy {f00=0x012d, f01=0x0190, f02=»? R ? R B W B < B , PX PN P RT T MTP TCP TKT2 ( B :ER ( B P ( A6 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
0x08baa0…08bc34 (0, 177) Dummy {f00=0x012d, f01=0x0190, f02=»B WxWv_ T TY * < B' ( < _L W W V W V W < B B W$W(W V <_x B B W W _, T TPX>_8 W C _ V B , P P P R W , P* 09AR R C* P F F G W W W V : L
0x08bc34…08bdc8 Dummy {f00=0x012d, f01=0x0190, f02=» G G F G , P D D @ U F L ?L D P X C L =CR =AR DP=CRH DJWB D =CR: DVW4 Db=l P* DhW$ ' ' ( J G G G G G G G G G C L '
0x08bdc8…08bf5c Dummy {f00=0x012d, f01=0x0190, f02=»W D B P8 R R H T H T H P < 6 D G G G G G G G G G G G C W Q Z P F G V : P G G "P P _ < # @ 2 P P _ : AF<
0x08bf5c…08c0f0 Dummy {f00=0x012d, f01=0x0190, f02=» F R *P G. F 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
0x08c0f0…08c284 Dummy {f00=0x012d, f01=0x0190, f02=» V # H 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
0x08c284…08c418 Dummy {f00=0x012d, f01=0x0190, f02=»9AR W W @I : I AI B P @I B R _ : X _$ X _, 2 <_(I I I ; J W" ; JbW ; JjW Z " [ Z : ! @JZ Z 9c Z P L U _< :` % _H % _P XV _Z
0x08c418…08c5ac Dummy {f00=0x012d, f01=0x0190, f02=» # VF @ 3$ $ 3$ R $@P T $ P $ P W @ Q @ T W @ P $ TB $ T <HRv # P @ n @ Q ;hP - D8 4 @ BPv <CVp Pj 2 @T 2 3PR U2 - W( $ P4 $ P B KW F R A
0x08c5ac…08c740 Dummy {f00=0x012d, f01=0x0190, f02=» J6 F6 < 6 5 2 >. = FL FX 86 9h = ;V Fd J9 4 O 4 U 34"@ 5 4. O D O A @ ! " @ A
0x08c740…08c8d4 (0, 178) Dummy {f00=0x012d, f01=0x0190, f02=» 3 @3N @ P @3HP @ P W @ P 4 5 0 1 $@P WH $0T # - _ &<BV A T W &R <CV &<CV _ & T - @ Q @ A n @ BT W E @ BP A 3R A3N A A3J A3F A :5 NW, 6 NE, ! < !..T< 5 P . %
0x08c8d4…08ca68 Dummy {f00=0x012d, f01=0x0190, f02=»W - _$:FMTITEM # : V @ : V $ < 6| T P _ W R> R4 "@PP P: @ BP A "!T( @ QV TN @ PHW R $ T W W - @ P " P W " P " P :JV A @ Q @ D8 Q $0
0x08ca68…08cbfc Dummy {f00=0x012d, f01=0x0190, f02=»NW, 8|SEQ, 8 DIR, 8 CUR, 8 IXSEQ, 8 IXDIR, T:WRITT:LWRIT: $ P $ P < !..T 7 . -J 5 $`X $ PR XW S W( D W C W X W I W X A82 A9 9 83W A9 9 82 ~ 80 @ Q
0x08cbfc…08cd90 Dummy {f00=0x012d, f01=0x0190, f02=» A 56 $ T B 56 = 56 ? T P Q 56 D8_ - 56 J A3H A9 # V~ $ P( R ;> !0P @ D8 T 56 @ ;> ;:$@T $ ;>_: @ BP A $ Tf ;> @ Qb $ TP @ T WH $ P @ P< @ DT @ BT(
0x08cd90…08cf24 Dummy {f00=0x012d, f01=0x0190, f02=» R $pTX @ D8 0 @9 T 56 R4$ P4_& <E 56 @ B 4 A3H @9 4 @ P 4 W W W W - 9 @ U &:HR @= 9B @ @ n @ ,$ T, L R - W - R Q @ @ Z. W Q L P M W F @ <" A
0x08cf24…08d0b8 Dummy {f00=0x012d, f01=0x0190, f02=» ^ P( @ BV R W @ V$ P ? A! ! @ T @ B P* @ D8 56 @ A @ BQ P$ A P @ $ D8 56 L A @ DT @ D8 @ 56 4 <U - < A! ! D8 @ D8 Y @3FP A B @ U8 @ A @ 3 - @! M . M
0x08d0b8…08d24c Dummy {f00=0x012d, f01=0x0190, f02=» A= A= 56 # R4$ P4 T* = @= D8 @= <d D8 56 W - = _8 ? @ BP " Tf P ?^ < R ?b @ U =cT ; R& P ; V P& T W % P 9AW T 4 R2 >, D8 >, P T W -
0x08d24c…08d3e0 Dummy {f00=0x012d, f01=0x0190, f02=»W T < V A A D8 56 W - <H^ _* ! @ U> @ P W0 u @3P ) u @ " : >U - > @ BP , @ <R A < @ P BP : - _ A? @ A? A? # $0P T W # ! P < R*< R6 P R $ P W2
0x08d3e0…08d574 (0, 179) Dummy {f00=0x012d, f01=0x0190, f02=»- W W W &0T # ? :$$$TRA ! @ P> A @ U2 A4 @ B B A4 A4 ! : P0 R P"? R ? R T B _6 B : * @, T @ n K Q A n ' A, FR @, P K ,
0x08d574…08d708 Dummy {f00=0x012d, f01=0x0190, f02=» T $ @3R @3T C A ! : <a$ @3JP * $ P * @ < W @ n @ L ABN=N=b C @BN : ! @ n @ @3JP * C ! : @, T <GQ @, TJ : @* P <E, # ! T = V A, :R , : @ P @ P @* U
0x08d708…08d89c Dummy {f00=0x012d, f01=0x0190, f02=» A @ n @ BP @3L A A* : ! * ,| - ! " K K :H K ?a + P$ @ BP ! U 3V ! * &j : P @ BT A A @ Q : <C R @ Q: Dn R A A @ @ A L R # U : V ;h XF A A
0x08d89c…08da30 Dummy {f00=0x012d, f01=0x0190, f02=» A @D6P * Q U A A3N : @D6P @ Q"W @ B R A A3N : W " 5 1 A3N A A : A A* @ BTX @ n A P, R C" R A~ Y" C"W % % @ A A L : @3L A 3 P" 2 C" A3L Y
0x08da30…08dbc4 Dummy {f00=0x012d, f01=0x0190, f02=»H APPL= I DUPL= J NUM J$ALPHA J<MINL= JpMAXL= J REWRT J ME J NEOI J NCLR J CTAB K VERIF K*USATTR KBSCHK= AG4 8 F AG 44 4~ AG4 F AF AG
0x08dbc4…08dd58 Dummy {f00=0x012d, f01=0x0190, f02=» @F P Q @G2 AG W @G2 AG @F P 9dT @ P 9A G, G @G( IG @G) IG @G* IG G W$ G @F P Q @G2 W W @G2 W W AG6 D8 @G6P _ A : 44 56 @F G AF A3D ? T2 A3D G2 :hP AF 9H @G4T AG G AG
0x08dd58…08deec Dummy {f00=0x012d, f01=0x0190, f02=» # G F & G # <HZ X& @ R R "@TnW Rf$ Pb @ P G.W G- @F ! Xh& Xf # <HZp @ R R "@T$W R P @ P G0_ G._ W - _ @G G AG G @G G AG @ AG( G @G G AG ? T @V G( G
0x08deec…08e080 Dummy {f00=0x012d, f01=0x0190, f02=» AG( G @G G AG @ AG* G @G G AG AG* G @G G AG AG* G @G G AG AG* G @G G AG ? ^ G* G 4XW 4X A3F W 4@ A3F A B A < !==T ?r M @3FP D8 M ?r A B 48
0x08e080…08e214 (0, 180) Dummy {f00=0x012e, f01=0x0190, f02=»W 4D AKlW 4D AKlW 4F AKlW 4F AKlWz 4F AKlWn 4F AKlWb 4F AKlWV 4V AKlWH 4F AKlW< 4L AKlW0 4P AKlW$ 4P AKlW 4D AKlW 4D AKlW A B ?r D8 Kl 4~
0x08e214…08e3a8 Dummy {f00=0x012e, f01=0x0190, f02=»:FMTITEM ?r A B A D 40 4~ ? P P @? F # < V A < 6 Fp ( 1T P _ @ Wr @ R2 R($ 9 $@XD $ T @ QJ T< @ P<WJ R<$ 9 $ P0 Fx @T( Fx 3PR @ D8 56 W W W
0x08e3a8…08e53c Dummy {f00=0x012e, f01=0x0190, f02=» : @ U T A3P A3L A B @ <Rb A < @ Q( u @ < ) : u @ < C A 3R A3N B : -J_ -JW T K K A3P A3L A B @ <ZF A < @ Q K _ K @ < C A
0x08e53c…08e6d0 Dummy {f00=0x012e, f01=0x0190, f02=» )W4 u * @ < C W -J : -J_p # AH AH T - WD AH @ P: Rz $ P $ P - " @ ! P ** C @H @H ! r @ P ( C : @ " P @H AH H : @ P R $@P $ P $ P
0x08e6d0…08e864 Dummy {f00=0x012e, f01=0x0190, f02=» AJ u ? P P W - @ A L A L R A > Z> @ J @ <R8 A < @ Q @ < )W0 # >U -J > < # BPW W -J : ?D ?P ! @ < V& @K K AK K K
0x08e864…08e9f8 Dummy {f00=0x012e, f01=0x0190, f02=»:FMTITEM 4 4b 4 A3JW 4 A L 4b @ LP A L 4, A3J_2 -J : A @3JT ? P P @? F # < V A < @ R, R"$ 9 $@P @ Q T @ P W 6 Fp ( 1T P _ @ Wj R @P @ PT WN RX
0x08e9f8…08eb8c Dummy {f00=0x012e, f01=0x0190, f02=» I| @ P B % % @ P @ U H W AH @ P 0 H @ u ! P -J @H P # >HRT U - @H T V @ Q4 H W: @H 9CV $ P W,$PP W W W W - W -J AH : @ R.P. T" AH
0x08eb8c…08ed20 Dummy {f00=0x012e, f01=0x0190, f02=» A P _ : T_@ ***WARNING***FOLLOWING FORMAL PARAMETERS ARE NOT TYPE DEFINED: 8 W4 4 W. 2 W( > W" 0 W 0 W 0AW 0DW 0`W 1@ @ P -JW AI
0x08ed20…08eeb4 (0, 181) Dummy {f00=0x012e, f01=0x0190, f02=» P* @ P: A H @ @ P P V Q _ & X : W W W W - $0 & K # _0 ! @ Pd P I I @ @ P H _" P( > I & % I & % ! : AZK ,K K K AZK 09K ..K @(K ,K K K
0x08eeb4…08f048 Dummy {f00=0x012e, f01=0x0190, f02=» V VR VH V> $@P # <HR&;D+ @ A & X : W - $0 K # _$ - _&
0x08f048…08f1dc Dummy {f00=0x012e, f01=0x0190, f02=» - # & . ( @& Q , A& ' x & @ n & @-H & " ' - # & ' @-HPD 2 + + + " 2 + ( 0 , :TRA.ERR.BIN BCD STR BOL FTB FOR EQU EXT ADR KEY PRO FLB @ P d 3 D
0x08f1dc…08f370 Dummy {f00=0x012e, f01=0x0190, f02=» ! P 9 R _ & W * 9AV MW 9AV U Q& nZ % _ P % :
0x08f370…08f504 Dummy {f00=0x012e, f01=0x0000, f02=»
[…0x3…]
0x08f9c0…08fb54 (0, 182) Opaque[0x194]
0x08fb54…08fce8 # DirEnt {nam=»/OBJCT«, typ=»OB«, f00=0x0000, f01=0x0000, f02=0x05b8, f03=0x0000}
0x08fb54…08fce8 IdxSect {
0x08fb54…08fce8 f00 = 0x002d // 0x8fb54 @0x0
0x08fb54…08fce8 f01 = 0x006a // 0x8fb56 @0x2
0x08fb54…08fce8 gno = [ // 0x8fb58 @0x4
0x08fb54…08fce8 [0x00]: C0x002d.0x3.0
0x08fb54…08fce8 [0x01]: C0x002e.0x0.0
0x08fb54…08fce8 [0x02]: C0x002e.0x1.0
0x08fb54…08fce8 [0x03]: C0x002e.0x2.0
0x08fb54…08fce8 [0x04]: C0x002e.0x3.0
0x08fb54…08fce8 [0x05]: C0x002f.0x0.0
0x08fb54…08fce8 [0x06]: C0x002f.0x1.0
0x08fb54…08fce8 [0x07]: C0x002f.0x2.0
0x08fb54…08fce8 [0x08]: C0x002f.0x3.0
0x08fb54…08fce8 [0x09]: C0x0030.0x0.0
0x08fb54…08fce8 [0x0a]: C0x0030.0x1.0
0x08fb54…08fce8 [0x0b]: C0x0030.0x2.0
0x08fb54…08fce8 [0x0c]: C0x0030.0x3.0
0x08fb54…08fce8 [0x0d]: C0x0031.0x0.0
0x08fb54…08fce8 [0x0e]: C0x0031.0x1.0
0x08fb54…08fce8 [0x0f]: C0x0031.0x2.0
0x08fb54…08fce8 [0x10]: C0x0031.0x3.0
0x08fb54…08fce8 [0x11]: C0x0032.0x0.0
0x08fb54…08fce8 [0x12]: C0x0032.0x1.0
0x08fb54…08fce8 [0x13]: C0x0032.0x2.0
0x08fb54…08fce8 [0x14]: C0x0032.0x3.0
0x08fb54…08fce8 [0x15]: C0x0033.0x0.0
0x08fb54…08fce8 [0x16]: C0x0033.0x1.0
0x08fb54…08fce8 [0x17]: C0x0033.0x2.0
0x08fb54…08fce8 [0x18]: C0x0033.0x3.0
0x08fb54…08fce8 [0x19]: C0x0034.0x0.0
0x08fb54…08fce8 [0x1a]: C0x0034.0x1.0
0x08fb54…08fce8 [0x1b]: C0x0034.0x2.0
0x08fb54…08fce8 [0x1c]: C0x0034.0x3.0
0x08fb54…08fce8 [0x1d]: C0x0035.0x0.0
0x08fb54…08fce8 [0x1e]: C0x0035.0x1.0
0x08fb54…08fce8 [0x1f]: C0x0035.0x2.0
0x08fb54…08fce8 [0x20]: C0x0035.0x3.0
0x08fb54…08fce8 [0x21]: C0x0036.0x0.0
0x08fb54…08fce8 [0x22]: C0x0036.0x1.0
0x08fb54…08fce8 [0x23]: C0x0036.0x2.0
0x08fb54…08fce8 [0x24]: C0x0036.0x3.0
0x08fb54…08fce8 [0x25]: C0x0037.0x0.0
0x08fb54…08fce8 [0x26]: C0x0037.0x1.0
0x08fb54…08fce8 [0x27]: C0x0037.0x2.0
0x08fb54…08fce8 [0x28]: C0x0037.0x3.0
0x08fb54…08fce8 [0x29]: C0x0038.0x0.0
0x08fb54…08fce8 [0x2a]: C0x0038.0x1.0
0x08fb54…08fce8 [0x2b]: C0x0038.0x2.0
0x08fb54…08fce8 [0x2c]: C0x0038.0x3.0
0x08fb54…08fce8 [0x2d]: C0x0039.0x0.0
0x08fb54…08fce8 [0x2e]: C0x0039.0x1.0
0x08fb54…08fce8 [0x2f]: C0x0039.0x2.0
0x08fb54…08fce8 [0x30]: C0x0039.0x3.0
0x08fb54…08fce8 [0x31]: C0x003a.0x0.0
0x08fb54…08fce8 [0x32]: C0x003a.0x1.0
0x08fb54…08fce8 [0x33]: C0x003a.0x2.0
0x08fb54…08fce8 [0x34]: C0x003a.0x3.0
0x08fb54…08fce8 ]
0x08fb54…08fce8 }
0x08fce8…08fe7c Dummy {f00=0x002d, f01=0x4144, f02=» > @ IDENT FMOVE T,REL=10.0,800314,870137141000 FMOVE F FMOVE V I:EVA0 h I:ERR2 z I:EVA5 , ( D #0 & + I:ER18 I:RT1 * & $ P _
0x08fe7c…090010 Dummy {f00=0x002d, f01=0x40f8, f02=» > @ IDENT TYPET T,REL=10.0,800314,870137141000 TYPET F TYPET V I:EVA0 h I:ERR2 z I:RT1 , ( B #03 ;d # + @ @
0x090010…0901a4 Dummy {f00=0x002d, f01=0x40fc, f02=» > @ IDENT ICLEAR T,REL=10.0,800314,870137141000 ICLEAR F ICLEAR X I:EVA0 l I:RT1 ~ , ( @ #0 0T ' ' _ T $ @
0x0901a4…090338 Dummy {f00=0x002d, f01=0x411c, f02=» > @ IDENT EMPTYT T,REL=10.0,800314,870137141000 EMPTYT F EMPTYT X I:EVA0 l , ( @ #0 0T & ! T ~ I:RT1 , ( P & ! X T C T T !P
0x090338…0904cc Dummy {f00=0x002d, f01=0x0190, f02=» > @ IDENT T:STIN T,REL=10.0,800314,870137141000 STRIN1 F STRIN1 X T:STEV l , ( @ X x & Y " X R W ~ T:RNOK T:LOFS , ( P _ Y $ I:E
0x0904cc…090660 Dummy {f00=0x002d, f01=0x416a, f02=» ! P " P z I:ERR2 , ( s W " P X $ X " R W , , ( V R W V % _ I:MOV T:GRFC , ( $ " D $ D X T:ROK $ X y &
0x090660…0907f4 (0, 183) Dummy {f00=0x002e, f01=0x018e, f02=» > @ IDENT T:STOU T,REL=10.0,800314,870137141000 STROU1 F STROU1 X T:STEV l T:LOFS ~ * & @ X x & Y " I:EVA0 T:LOPS I:ER17 , (
0x0907f4…090988 Dummy {f00=0x002e, f01=0x4158, f02=» f , ( s ?A W ?AW <! P , ( X " X R W V y 8 T:DUPX h T:GRFC z , ( & Y $ 8 " X X T:ROK T:RNOK x ( y $ < 8 9
0x090988…090b1c Dummy {f00=0x002e, f01=0x414a, f02=» > @ IDENT T:STEV T,REL=10.0,800314,870137141000 T:STEV F T:STEV X T:GRFC l I:EVA0 ~ * & H #0T Y Y , ( ! T # P & #0T ( I:ERR2 7
0x090b1c…090cb0 Dummy {f00=0x002e, f01=0x0190, f02=» > @ IDENT T:EDFL T,REL=10.0,800314,870137141000 T:EDFL F T:EDFL X T:PM1 l T:PM2 | T:CASP , ( I Y ( x P Y * , ( x y W X " T:DUPX
0x090cb0…090e44 Dummy {f00=0x002e, f01=0x0190, f02=» , ( w V X ( x C T:SCUW 4 , ( ( Y * X Y , X F , ( X C & C C v T:IOER , ( ( B P 9 R 9 X , ( !@P X X * b ) Y *
0x090e44…090fd8 Dummy {f00=0x002e, f01=0x0190, f02=» B U C Q C D T:CLR1 * T:CLR2 < , ( mP X X * $" ~_> @ Y N , ( X * _R X !@XX y X # ~ , ( x V y X X * P , ( P 1 _ 1 X * X
0x090fd8…09116c Dummy {f00=0x002e, f01=0x4148, f02=» X n T:CLIT T:EKEY , ( C $ " P y _ x T 2 , ( a@ X H X X * , )$ b P _ : H D !T P d )Wv 9 T UP m d yV& Ph R^ PP #P =T QU [Q e r g t 4 0 i k m
0x09116c…091300 Dummy {f00=0x002e, f01=0x0190, f02=» > @ IDENT T:DYKI T,REL=10.0,800314,870137141000 J F " T:DYKI T:PM1 T:PM2 T:CLR1 T:CLIT T:CLR2 T:IOER T:EKEY T:BELL F T:DYKI I:EVA7 , ( @ ' Y y , ( x C y X
0x091300…091494 (0, 184) Dummy {f00=0x002e, f01=0x0190, f02=»:CLRD , ( C Q " T X , ( ! X X ! x Y~ Y > , ( _ X "@P B R y C B n , ( P 9 V _F9 V X ! T X !@ T:EKEY , ( X y C _d y C C X
0x091494…091628 Dummy {f00=0x002e, f01=0x0190, f02=» _$ _ y z T:CLR2 ^ T:SCUW . * & Y @_6 x X@ X X # @ , ( u C _. B ]d P C n , ( Q X8_H x XD @ Y c C y , ( XR X x x T:BELL
0x091628…0917bc Dummy {f00=0x002e, f01=0x0190, f02=» T:LOFS I:EVA0 T:LOPS , , ( @H ( ( > T:CLMI n , ( #H : B C _J + T:PM1 @ T:GRFC , ( ? . X 9 V ! P @ Y I
0x0917bc…091950 Dummy {f00=0x002e, f01=0x4124, f02=» j , ( " ( $ $ : ! P # P : : H D ! ! @ YTf a eR k B uT y Q T , P R P V f H D ! VV T P #Q( S P Q8 , 3 < MV SP P P
0x091950…091ae4 Dummy {f00=0x002e, f01=0x0190, f02=» > @ IDENT T:UPDF T,REL=10.0,800314,870137141000 T:UPDF F T:UPDF X T:GRFC l I:ER14 ~ , ( @ 2! Y " T:LOFS I:EVA0 T:LOPS , (
0x091ae4…091c78 Dummy {f00=0x002e, f01=0x406a, f02=»R T:RCTS $ O X MT D ` T@ f T:GRFC l I:ER14 ~ , ( @ 2! Y " T:LOFS I:EVA0 T:LOPS , (
0x091c78…091e0c Dummy {f00=0x002e, f01=0x0190, f02=» > @ IDENT T:DUPL T,REL=10.0,800314,870137141000 T:DUPL T:DUPX F T:DUPL ` T:GRFC t I:EVA0 I:ERR2 T:RNOK , ( HB !0 X T:ROK T:DUPX
0x091e0c…091fa0 Dummy {f00=0x002e, f01=0x406c, f02=» I:MOV & " S V : KT WV > h V@ h ` T:GRFC t I:EVA0 I:ERR2 T:RNOK , ( HB !0 X T:ROK T:DUPX
0x091fa0…092134 (0, 185) Dummy {f00=0x002e, f01=0x4186, f02=» > @ IDENT T:GETC T,REL=10.0,800314,870137141000 T:GETC F T:GETC X T:GRFC l I:ER14 ~ I:EVA0 , ( @ 2' I:ERR2 I:RT1 , ( " P # P
0x092134…0922c8 Dummy {f00=0x002e, f01=0x415a, f02=» > @ IDENT T:GETA T,REL=10.0,800314,870137141000 T:GETA F T:GETA X T:GRFC l I:EVA0 ~ I:ERR2 , ( H ! P # P X T:RNOK T:ROK T:RCR ( $
0x0922c8…09245c Dummy {f00=0x002e, f01=0x413a, f02=» > @ IDENT T:TSTC T,REL=10.0,800314,870137141000 T:TSTC F T:TSTC X T:GRFC l , ( @ X " 9b! X :c 2" ~ I:ER14 T:RTES , ( H @ ;
0x09245c…0925f0 Dummy {f00=0x002e, f01=0x0190, f02=» > @ IDENT T:TFWD T,REL=10.0,800314,870137141000 D @ T:TLEF T:TRIG T:TLDO T:TDOW T:TUP T:TFWD T:TBWD T:THOM F T:TLEF T:TRIG T:TLDO T:TDOW T:TUP T:TFWD T
0x0925f0…092784 Dummy {f00=0x002e, f01=0x411a, f02=» Y 4 Y n T:TABE , ( ? 2 Y 69h Q X :h Y 0 W T:SCR2 P T:TABC b T:TABN t * & ] U X Q W Y 0 w 8 4 W W W W W W !W IQ YW ]U eQ kW
0x092784…092918 Dummy {f00=0x002e, f01=0x0190, f02=» > @ IDENT T:DISP T,REL=10.0,800314,870137141000 T:PRIN T:DISP T:ERAS F T:PRIN h T:FDSP | T:EDWI T:GRFC T:GTIP , ( D 9H Y * T:DISP
0x092918…092aac Dummy {f00=0x002e, f01=0x0190, f02=» *9h p I:ER14 , ( S P R Y >_ P R P R " T:TABD R , ( q Y +W Y + W d , ( T R W Q W Y , ( + U Q Y T:TABC , (
0x092aac…092c40 Dummy {f00=0x002e, f01=0x418c, f02=»Y , ( X 0 Y 8 P Y , ( # 0 X 0 X 2] X 8 Y 0 : X 0 : T:WRDY j , ( C :H* : X 2T Y 2 : | T:EDIO $ a @ C 1 B ] : H D ! 1 W !W 7T SP: WR aP cR i
0x092c40…092dd4 (0, 186) Dummy {f00=0x002e, f01=0x0190, f02=» > @ IDENT T:GETF T,REL=10.0,800314,870137141000 T:GETF T:GTIT T:GTIP F T:GETF h I:ER14 | , ( X +! X +! U 9K T:TABC T:TABN T:GTIT 0 T:GRFC , (
0x092dd4…092f68 Dummy {f00=0x002e, f01=0x40c8, f02=» I:EVA2 I:ER15 , ( W 4 0 6 2 X 0 " I:ERR2 R & " u@ : ! P # T : d 0 U S z e z P T @ T:TABN T:GTIT 0 T:GRFC , (
0x092f68…0930fc Dummy {f00=0x002e, f01=0x0190, f02=» > @ IDENT T:REWR T,REL=10.0,800314,870137141000 . * T:REWR T:SCUW T:CLRD T:IOWR T:CASP F T:IOWR x T:SCUW , ( C ( C : T:CLRD * T:REWR 0 , ( ! C B
0x0930fc…093290 Dummy {f00=0x002e, f01=0x4148, f02=» D : K + Q | I:EVA3 ! I:EPIC ! . , ( } 2 P P ! @ T:LOPS ! p , ( ( B X # V : ! I:EVA0 ! I:ECPY ! I:EVI ! ( $ $ _0
0x093290…093424 Dummy {f00=0x002e, f01=0x0190, f02=» > @ IDENT T:DEDT T,REL=10.0,800314,870137141000 " . * T:TABC T:TABD T:TABE T:TABN T:SCR2 " F I:EVNO " x I:ESKI " I:EVA0 " I:EBRI " I:EBRB " I:EBR " , (
0x093424…0935b8 Dummy {f00=0x002e, f01=0x0190, f02=» " z T:DSL # I:EXPY # * T:TABC ( # < T:TABD , # P T:TABE 0 # d , ( ! W W X 0Q # x T:EDWI # I:EVT # , ( 9 Y ( Y *P # I:EDSK #
0x0935b8…09374c Dummy {f00=0x002e, f01=0x0190, f02=» V _` " P T " P & # T:LOPS $ 0 , ( (W " P Y 0] Y $ B , ( (_z P P T " X _@ $ r T:EDWF $ , ( " P * X *# P B 1 $ I:ER16 $ , ( " *W
0x09374c…0938e0 Dummy {f00=0x002e, f01=0x4130, f02=» . C $ | , ( a W @ X (T W X y 6 Y ( % T:TABN % L T:RCR % ` : X (;n 0 % p H D ! +W /W 7Q ; . ? , KP Q P PR V PL T Ph Wp P P % < 8 P T0 P" P W P 9P ?P ET OP c
0x0938e0…093a74 (0, 187) Dummy {f00=0x002f, f01=0x0190, f02=» > @ IDENT T:ENLI T,REL=10.0,800314,870137141000 & T:DNL T:DSL & F I:EVNO & I:ECPY & n I:EPIC & I:ETXT & I:ETAB & I:EBRI & I:EBRB & I:EBR & * &
0x093a74…093c08 Dummy {f00=0x002f, f01=0x0190, f02=» & I:ESKI ' . I:EXPY ' @ T:DSL ( ' R T:GRFC ' d T:DNL 6 ' v , ( ! " $ Y . Y ,W ' , ( 9 $ Y . X ( X ." P X 0R T ' T:WRDY ' , ( W Y *P
0x093c08…093d9c Dummy {f00=0x002f, f01=0x4182, f02=» Q Y *T , : " P X 0U ' , ( X *# P P T " T : ( , I:ER16 ( T:ENIN ( n , ( " . Y . 0 Y ( ( , ( $ Y *T " T ! 1 W ( ! ) , : ( H D ! 6
0x093d9c…093f30 Dummy {f00=0x002f, f01=0x0190, f02=» > @ IDENT T:EINP T,REL=10.0,800314,870137141000 ) " T:PKI T:PINP T:TKI T:TINP ) F T:PKI ) l T:PINP ) ~ T:GRFC ) I:ETAB ) I:EVIN ) , ( I P & ) , ( Y *T
0x093f30…0940c4 Dummy {f00=0x002f, f01=0x0190, f02=» & V D ! P $ ) | T:TINP * T:TKI * 0 , ( u ! P %_ : V * B , ( Y " X .9H $ P * r , ( & X ( " Q Y +Q R " P W * I:ER16 * , ( " U Y , " Q "
0x0940c4…094258 Dummy {f00=0x002f, f01=0x0190, f02=» P * t , ( I W X ! X $" P Q X (# P X + , ( i # :! R W T @ Y ( + D T:ENIN + t T:ENI + I:EXIT + , ( W Y , W Y ( + , ( : X *:h X (! # P X & V + , (
0x094258…0943ec Dummy {f00=0x002f, f01=0x0190, f02=» + h , ( # P Y (_ P P Y , T:WRDY , 8 , ( C 8 & X 8 X $ W _ , J , ( a " P X ( T X & V H "@T , z , ( P V Y X (P , T:CLMI , , ( X (
0x0943ec…094580 Dummy {f00=0x002f, f01=0x0190, f02=» 8 V Y 8 : " P X & V , , ( ( P : : "0P - , , ( 7 $ T W %T : : Y - , ( W ( X $ Y X " Y X & Y X < Y - , ( w @ : Y : X : X ( - , ( T X & V H " V
0x094580…094714 (0, 188) Dummy {f00=0x002f, f01=0x4146, f02=» P - P H D ! W U Q R P" P PD W #Pt )Pn /P 5P A EP< I R . H D ! KWZ [P< ]Q eP2 sR$ uW y R } T$ W W P Tb W P@ . X H D !$ T, T R #P 3P* ; * ?P| [Wh cP mT }TF * P6 P z P . < 8 P V T P
0x094714…0948a8 Dummy {f00=0x002f, f01=0x0190, f02=» > @ IDENT T:ENIN T,REL=10.0,800314,870137141000 / T:ENIN T:ENI T:EVOU / F T:ENIN / f T:ENI / z , ( X Y " X Y $ X Y & X @W X / T:LOFS / , ( ! < Y = " / I:EGTB
0x0948a8…094a3c Dummy {f00=0x002f, f01=0x0190, f02=» X (P / n T:WRDY 0 , ( W X & V D ! P @ W X 0 , ( W Y ( : X , Y X $ Y 0 P , ( X &T Y Y Y W V $ 0 , ( :H D Y D :H Y ! P V 0 I:EVA0 0 I:EVA1 0 , (
0x094a3c…094bd0 Dummy {f00=0x002f, f01=0x411a, f02=» 0 , ( Q : 2' " P T 1 I:EVA3 1 8 I:EPIC 1 J , ( mD W : N : 1 H D ! W CT IW SP a mT" }T W4 W, P W" P W W T WD 1 ( $ P W )P /W A X aP gT qW 1
0x094bd0…094d64 Dummy {f00=0x002f, f01=0x4144, f02=» > @ IDENT T:SETC T,REL=10.0,800314,870137141000 2 T:SETC T:SCUR 2 F T:SETC 2 ` T:GRFC 2 t T:EDWI 2 T:RCTS 2 T:SCUR 2 , ( A C 2 T:WRDY 2
0x094d64…094ef8 Dummy {f00=0x002f, f01=0x40e2, f02=» > @ IDENT T:CLMI T,REL=10.0,800314,870137141000 3 T:CLMI 3 F T:CLMI 3 X , ( "0P ' Q W ' 3 l ! Y : 3 P Q W 3 ( 3 @ 3 A2,0 PCLRM20 EQU * P SCR
0x094ef8…09508c Dummy {f00=0x002f, f01=0x0190, f02=» > @ IDENT T:ATTF T,REL=10.0,800314,870137141000 4 J F " T:ATTF T:DETF T:ROK T:RNOK T:RCR T:RCTS T:RTES T:GRFC T:WRDY 4 F T:CLDY 4 T:DETF 4 T:ATTF 4 I:EVA6 4 I:FFSN 4 , ( W
0x09508c…095220 Dummy {f00=0x002f, f01=0x4100, f02=» < V E B 4 ~ T:RNOK < 5 T:GRFC @ 5 2 T:WRDY H 5 F T:EDIO 5 Z * & ; X _ v : C C 5 l T:CLDY 5 $ Y @ : C : 5 @ W @ 5 l 5 @ 5 W
0x095220…0953b4 (0, 189) Dummy {f00=0x002f, f01=0x0190, f02=» > @ IDENT T:LSEG T,REL=10.0,800314,870137141000 6 & " T:LOFS T:LOPS T:LSEG T:CSEG 6 F T:LSEG 6 p T:CSEG 6 , ( ( R : V E V D ' 6 I:ER1C 6 , ( ! $ W P 6
0x0953b4…095548 Dummy {f00=0x002f, f01=0x402c, f02=»R ;P OW YP 6 d 7 @ 7 (00314,870137141000 6 & " T:LOFS T:LOPS T:LSEG T:CSEG 6 F T:LSEG 6 p T:CSEG 6 , ( ( R : V E V D ' 6 I:ER1C 6 , ( ! $ W P 6
0x095548…0956dc Dummy {f00=0x002f, f01=0x4146, f02=» > @ IDENT T:DC00 T,REL=10.0,800314,870137141000 8 DCREAD DCWRTE DCEXCH 8 F T:FDS0 8 h DCREAD 8 z T:DCR1 8 DCWRTE 8 T:DCW1 8 DCEXCH 8 T:DCE1 8 , ( I$
0x0956dc…095870 Dummy {f00=0x002f, f01=0x40aa, f02=» > @ IDENT T:SWI0 T,REL=10.0,800314,870137141000 9 SWITCH 9 F T:SWIT 9 X SWITCH 9 j @ 9 ~ 9 @ 9 ~ . P* CREDIT ASSEMBLER SUBROUTINE ENTRIES * . P*
0x095870…095a04 Dummy {f00=0x002f, f01=0x40da, f02=» > @ IDENT T:TEI0 T,REL=10.0,800314,870137141000 : TESTIO ABORT : F T:TEST : ^ TESTIO : p T:ABOR : ABORT : H : : @ : . P*
0x095a04…095b98 Dummy {f00=0x002f, f01=0x40de, f02=» > @ IDENT T:CLO0 T,REL=10.0,800314,870137141000 ; SETTIM GETTIM ; F T:SETT ; ` SETTIM ; r T:GETT ; GETTIM ; H ; ; @ ; . P*
0x095b98…095d2c Dummy {f00=0x002f, f01=0x40a6, f02=» > @ IDENT T:DEL0 T,REL=10.0,800314,870137141000 < DELAY < F T:DELA < V DELAY < h @ < z < @ < * ~ . P* CREDIT ASSEMBLER SUBROUTINE ENTRIES * . P*
0x095d2c…095ec0 Dummy {f00=0x002f, f01=0x40aa, f02=» > @ IDENT T:GTI0 T,REL=10.0,800314,870137141000 = GETTID = F T:GETI = X GETTID = j @ = ~ = @ = ~ . P* CREDIT ASSEMBLER SUBROUTINE ENTRIES * . P*
0x095ec0…096054 (0, 190) Dummy {f00=0x002f, f01=0x0190, f02=» > @ IDENT T:DC T,REL=10.0,800314,870137141000 > 6 2 T:DCRE T:DCR1 T:DCWR T:DCW1 T:DCEX T:DCE1 > F T:DCRE > T:FDSP > T:DCR1 > T:DCWR > T:DCW1 > T:EDIO > , ( @@ /
0x096054…0961e8 Dummy {f00=0x002f, f01=0x416e, f02=» 6 > * & 5 / "!@P ? I:EVA0 ? 8 , ( O ' / #0T ? J , ( i C #0T C ? z , ( #0 T ' P &R &P C ? * & #0 T & C : W ?
0x0961e8…09637c Dummy {f00=0x002f, f01=0x40b6, f02=» > @ IDENT T:SWI T,REL=10.0,800314,870137141000 @ T:SWIT @ F T:SWIT @ X I:RT1 @ l ( @ | @ @ @ E LEVEL P* PT:SWIT EQU * P LDK A7,0 " P SU PP,CSB,TCA GET
0x09637c…096510 Dummy {f00=0x002f, f01=0x4174, f02=» > @ IDENT T:TEI T,REL=10.0,800314,870137141000 A T:TEST T:ABOR A F T:TEST A ` T:FDSP A t I:RT1 A T:ABOR A * & @ "R V I A T:KIAA A , ( ( T
0x096510…0966a4 Dummy {f00=0x002f, f01=0x410e, f02=» > @ IDENT T:DEL T,REL=10.0,800314,870137141000 C T:DELA C F T:DELA C X I:EVA0 C l I:ERR C ~ , ( @ #0 P ( C I:RT1 C C P C $ C @
0x0966a4…096838 Dummy {f00=0x002f, f01=0x4124, f02=» > @ IDENT T:MSK0 T,REL=10.0,800314,870137141000 D MASK D F MASK D V I:EVA0 D h , ( @ #0 T #0 T V D z I:RT1 D D I:ERR D # D T T D
0x096838…0969cc Dummy {f00=0x002f, f01=0x0190, f02=» > @ IDENT T:SCD T,REL=10.0,800314,870137141000 E T:ACTV T:PAUS T:RSTR E F T:ACTV E h , ( 2 ;BP P J E | P:BAS E I:ERR4 E , ( ! T ( E I:NTPB
0x0969cc…096b60 Dummy {f00=0x002f, f01=0x4092, f02=» W & F : ( E I:RT1 F * w F : $ P P4 %T 1 ^ EW4 O ^ ]W F T ~ F |@ F
0x096b60…096cf4 (0, 191) Dummy {f00=0x0030, f01=0x018e, f02=» > @ IDENT T:USE T,REL=10.0,800314,870137141000 G T:USE T:UERR G F T:USE G ^ I:ERR4 G p , ( 2 & >A >A 2 G I:EVA0 G , ( $ & V D 9a 9 G P:MTAB G , (
0x096cf4…096e88 Dummy {f00=0x0030, f01=0x0190, f02=» G f , ( @ 9 X ( H , ( 9 8 ? X Q , V H 8 , ( ( - 4T H h , ( V 5 ( W V H , ( P W U V X 9T H T:UERR B H
0x096e88…09701c Dummy {f00=0x0030, f01=0x4010, f02=» H H @ I @ 9 X ( H , ( 9 8 ? X Q , V H 8 , ( ( - 4T H h , ( V 5 ( W V H , ( P W U V X 9T H T:UERR B H
0x09701c…0971b0 Dummy {f00=0x0030, f01=0x0190, f02=» > @ IDENT T:UNUS T,REL=10.0,800314,870137141000 J T:UNUS J F T:UNUS J X I:ERR4 J l , ( 2 ' >A >A 2 J ~ P:MTAB J , ( $ V L ;a ; R @ ( 8 J , ( = ? X
0x0971b0…097344 Dummy {f00=0x0030, f01=0x402a, f02=» 5R@ OQ* J K @ K &,800314,870137141000 J T:UNUS J F T:UNUS J X I:ERR4 J l , ( 2 ' >A >A 2 J ~ P:MTAB J , ( $ V L ;a ; R @ ( 8 J , ( = ? X
0x097344…0974d8 Dummy {f00=0x0030, f01=0x4096, f02=» > @ IDENT T:EXIT T,REL=10.0,800314,870137141000 L T:EXIT L F T:EXIT L X ( L l L @ L KM P DATA 3 P* P END @ LDKL A6,-1 P ABL T:UERR END @ P ADR
0x0974d8…09766c Dummy {f00=0x0030, f01=0x4138, f02=» > @ IDENT T:GTCW T,REL=10.0,800314,870137141000 M GETCW M F T:FDSP M V GETCW M h I:EVA0 M z T:BINB M , ( H "$ P B B M T:GTCW M I:RT1 M $ W M
0x09766c…097800 Dummy {f00=0x0030, f01=0x4128, f02=» > @ IDENT T:GTID T,REL=10.0,800314,870137141000 N T:GETI N F T:GETI N X I:EVA0 N l , ( @ #0T R W T V G 9h N ~ I:RT1 N I:ERR N ' W N T R W T '
0x097800…097994 (0, 192) Dummy {f00=0x0030, f01=0x018e, f02=» > @ IDENT T:DM T,REL=10.0,800314,870137141000 O & " T:OPEN T:CLOS T:COMM T:RSTA O F T:OPEN O p T:FDSP O , ( @ # 9 2! P T O T:WRIO O T:IO2 O T:CLOS . O , (
0x097994…097b28 Dummy {f00=0x0030, f01=0x4090, f02=» T:RSTA X P T:SCW2 P T:IO3 P * ( $ W C P : P T P f j P z@ P , ( @ # 9 2! P T O T:WRIO O T:IO2 O T:CLOS . O , (
0x097b28…097cbc Dummy {f00=0x0030, f01=0x018c, f02=» > @ IDENT T:DMR T,REL=10.0,800314,870137141000 Q & " T:DREA T:IREA T:XREA T:IXID Q F T:DREA Q p T:REAX Q T:SCW2 Q T:IO3 Q T:IREA Q T:IO2 Q , ( $ Q
0x097cbc…097e50 Dummy {f00=0x0030, f01=0x4008, f02=»@ R IDENT T:DMR T,REL=10.0,800314,870137141000 Q & " T:DREA T:IREA T:XREA T:IXID Q F T:DREA Q p T:REAX Q T:SCW2 Q T:IO3 Q T:IREA Q T:IO2 Q , ( $ Q
0x097e50…097fe4 Dummy {f00=0x0030, f01=0x0190, f02=» > @ IDENT T:DMW T,REL=10.0,800314,870137141000 S 6 2 T:SWRI T:DWRI T:IWRI T:DREW T:CREW T:IREW S F T:SWRI S T:WRIX S T:IO4 S T:DWRI S T:SCW2 S , ( / / S
0x097fe4…098178 Dummy {f00=0x0030, f01=0x40fc, f02=» 5D / C S , ( O ( B B @ C T , , ( o ( ( B B T , ( C C ( C T T:IO5 T C T T @ T / S
0x098178…09830c Dummy {f00=0x0030, f01=0x4182, f02=» > @ IDENT T:DMDI T,REL=10.0,800314,870137141000 U T:DDIS T:CDIS T:IDIS U F T:DDIS U h T:FDSP U | T:SCW2 U T:IO3 U T:CDIS U , ( $ C <H / U T:IDIS $ U
0x09830c…0984a0 Dummy {f00=0x0030, f01=0x4168, f02=» > @ IDENT T:DMPO T,REL=10.0,800314,870137141000 V T:DPOS T:IPOS V F T:DPOS V ` T:FDSP V t T:SCW2 V T:GTBY V T:IO4 V , ( H@ C <H / V T:IPOS V T:WRIX
0x0984a0…098634 (0, 193) Dummy {f00=0x0030, f01=0x0190, f02=» > @ IDENT T:IO T,REL=10.0,800314,870137141000 W J F " T:WRIT T:READ T:SREA T:KI T:NKI T:EDWR T:DSC0 T:DSC1 T:DSC2 W F H D ! T:EDWE T:EDWF T:EDWI T:EDIO T:XSTA T:WAIT T:IO1 T:IO2 T:IO3 W J F " T:IO4 T:IO5 T:FDS0 T:FDSP T:GDSP T
0x098634…0987c8 Dummy {f00=0x0030, f01=0x0190, f02=»:WRIT W T:LWRI X , ( W / X $ T:WRIX " X T T:WRIO & X h I:EVA0 X | , ( ! _ P <H X T:SREA B X T:READ B X T:REAX J X , ( ? :
0x0987c8…09895c Dummy {f00=0x0030, f01=0x0190, f02=» , ( { C C W C C J Y , ( ' W 781"&$ 39#$;< '()*+,-! Y 4 T:DSC2 Y d , ( P Y x T:XSTA Y T:WAIT Y , ( _D B 'W ( Y T:MWA
0x09895c…098af0 Dummy {f00=0x0030, f01=0x0190, f02=» Y T:IO3 D Z T:IO4 H Z I:ER19 Z , , ( 5 1W C C C " Z > T:IO5 Z Z n T:IORE ^ Z T:GCW2 Z * & S ( ' P P "! P Z T:GTCW Z I:RT1 Z , ( q W B
0x098af0…098c84 Dummy {f00=0x0030, f01=0x0190, f02=» Z j T:EDWR [ I:EDW [ , ( 5 P C : [ . T:EDWE [ ^ T:EDWF [ r , ( C C B B P C [ T:EDWI [ I:ERR [ , ( : "!@T V I C [
0x098c84…098e18 Dummy {f00=0x0030, f01=0x018e, f02=» Y [ t I:ERR5 , ( e C & & , ( B C "!@ V , ( : B T T T:FDS0 T:FDSP T:GDSP P:MTAB , (
0x098e18…098fac Dummy {f00=0x0030, f01=0x0190, f02=» , ( @ V H ;D:B " ] , ( : _, C ] 8 T:GTBY 2 ] h T:SCW2 ] | , ( P / : : 2 "! P ] T:DSCX R ] I:EVA2 ] , ( O : P C W
0x098fac…099140 Dummy {f00=0x0030, f01=0x415e, f02=» ] h H D ! Y W L D " H % ) - " 1P G J IW M Q " ]P cV { ^ H D ! V 2 W > W > " P W Wb 2 ;W" ^ T H D !B ]P. a gP$ mP sW }P P P& P P P P ^ H D ! 0 T ?P C O S "
0x099140…0992d4 (0, 194) Dummy {f00=0x0030, f01=0x0190, f02=» > @ IDENT T:CW T,REL=10.0,800314,870137141000 _ F B T:GCW2 T:GTCW T:SCW2 T:STCW T:SCW0 T:BCDB T:BINB T:KIAA _ F T:KIAC _ T:STCW _ I:EVA2 _ T:SCW0 _ , ( @ #0 T & C C : C _
0x0992d4…099468 Dummy {f00=0x0030, f01=0x0190, f02=» X R _ V _ T:GTCW ` I:ERR2 ` 4 , ( 4 _P :#0 T B 'W B ` F T:BINB ` v , ( B " : ` , ( P P L R ` , ( R _ R _
0x099468…0995fc Dummy {f00=0x0030, f01=0x0190, f02=» T U :J ` z , ( ] a B@ ' d w5 1 a T:KIAA a J T:KIAC a ^ T:GCW2 a r , ( } #0 T a T:SCW2 a , ( B ' : B B : a , (
0x0995fc…099790 Dummy {f00=0x0030, f01=0x4062, f02=» PR a T 8 4 Z R R Q !P )P 9P IR T P T b b L@ b ^:KIAC a ^ T:GCW2 a r , ( } #0 T a T:SCW2 a , ( B ' : B B : a , (
0x099790…099924 Dummy {f00=0x0030, f01=0x0190, f02=» > @ IDENT T:ADIT T,REL=10.0,800314,870137141000 c & " T:RREA T:RRE1 T:RWRI T:RWR1 c F T:RREA c p T:FDSP c T:RRE1 c I:EVA0 c , ( A #0 T &R c T:STCW c I:ERR c
0x099924…099ab8 Dummy {f00=0x0030, f01=0x40ac, f02=» / "!@P c v T:IO1 d , ( S #0T C : d & m W d V X TX RX A X _T oW d r v d @ d I:EVA0 c , ( A #0 T &R c T:STCW c I:ERR c
0x099ab8…099c4c Dummy {f00=0x0030, f01=0x0190, f02=» > @ IDENT T:KIA T,REL=10.0,800314,870137141000 e T:KIA T:NKIA e F T:KIA e ^ T:NKIA e p T:ABUF e , ( W P 6 V :a L e T:KIPR e , ( Q ' ( ( e
0x099c4c…099de0 Dummy {f00=0x0030, f01=0x0190, f02=» 6 K e , ( u V K V V K V K f , ( V 6V ( - _ : J 7 f P , ( J V W J :A f * & V 6V $ - _ * + : f , ( D T E D :A D ;A f
0x099de0…099f74 (0, 195) Dummy {f00=0x0031, f01=0x410a, f02=» I @P _ W *) + : f , ( g $: R P $ : D V D g 0 ( $ V ( < C C _, g ` H D !L W PZ !QJ % p 7 < ST WP c V V T> Q U 3 d AP g IP QW mR oP g g @ g
0x099f74…09a108 Dummy {f00=0x0031, f01=0x4098, f02=» > @ IDENT T:ABUF T,REL=10.0,800314,870137141000 h T:ABUF h F M h X T:ABUF h n h @ h IN T:ABUF f & !T:ABUF RES SIZE KIA/NKIA SAVEAREA P EJECT T:ABUF END @
0x09a108…09a29c Dummy {f00=0x0031, f01=0x018e, f02=» > @ IDENT WRITEL T,REL=10.0,800314,870137141000 i WRITEL i F WRITEL i X T:FDS0 i l I:EVA0 i ~ , ( D / #0T C i , ( #0 T &R &P C i T:IO2 i , ( 9
0x09a29c…09a430 Dummy {f00=0x0031, f01=0x400c, f02=» i @ j IDENT WRITEL T,REL=10.0,800314,870137141000 i WRITEL i F WRITEL i X T:FDS0 i l I:EVA0 i ~ , ( D / #0T C i , ( #0 T &R &P C i T:IO2 i , ( 9
0x09a430…09a5c4 Dummy {f00=0x0031, f01=0x0190, f02=» > @ IDENT I:NTP T,REL=10.0,800314,870137141000 k B > I:TRC I:NTP I:NTPA I:NTPB I:NTPR I:RST I:RT0 I:RT1 I:RT2 k F I:MOV k I:ADD k I:SUB k I:CMP k I:MUL k * & T k
0x09a5c4…09a758 Dummy {f00=0x0031, f01=0x0190, f02=» k I:XCP l I:EDS l , ( / l ( A l X I:TRC N l v I:RST P l T:CSEG l I:NTPA T l I:NTPB X l P:MTAB l , ( O W V 7 @
0x09a758…09a8ec Dummy {f00=0x0031, f01=0x0190, f02=» I:CHK l , ( B " $ m I:EVA0 m > I:EVA2 m P , ( pV 9c D & ( m b I:RT2 m , ( Q W :aW @ NYR m I:TRA m I:RT1 m I:TRB m
0x09a8ec…09aa80 Dummy {f00=0x0031, f01=0x0190, f02=» V m j T:BAT n , ( W _ 2 # ;B V T n , ( 7 2W V P L , V 2 n J , ( U P " 2 P V D ! R T V n z , ( u P V W V P _ 8 n T:PAT n , ( ^t D . 2 ! 9BP V
0x09aa80…09ac14 (0, 196) Dummy {f00=0x0031, f01=0x0190, f02=» 7_ 2 # P L 6P n , ( @ & 2" &] Y $! o * , ( @ + 6P Q $ T 9BP . _ _ o Z , ( K W 6 @ & " T 7 $ o , ( i V P W _ o I:EVB o , ( P
0x09ac14…09ada8 Dummy {f00=0x0031, f01=0x40f4, f02=» o N H D ! = ? A C E G I K M kP uP VP Q W p H D ! W, P P W< - L 3T 9W UP [P kR oT uP P P T W p V 8 4 T PH PB -P /Q 3T 7P KW ]T oP W W p U p @ p , ( P
0x09ada8…09af3c Dummy {f00=0x0031, f01=0x018e, f02=» > @ IDENT I:EVA T,REL=10.0,800314,870137141000 q J F " I:EVA0 I:EVA1 I:EVA2 I:EVA3 I:EVA5 I:EVA6 I:EVA7 I:EVB I:EVI q F I:FML I:EVTO q P:MTAB q , ( :l:d:h q I:EVA2 q I:E
0x09af3c…09b0d0 Dummy {f00=0x0031, f01=0x0190, f02=» q f , ( 9 # W @ $ E " T ; [ r , ( W # :H 2 T Z L r 8 , ( @ w L D V W # r h , ( L E V $ W D V r I:EVA0 r , ( @ L , W 6 2 W " r
0x09b0d0…09b264 Dummy {f00=0x0031, f01=0x0190, f02=» Z Z r , ( 3 : R ; s 0 I:ERR9 s ` , ( S 6 : F _v s r , ( s :B , (V ; H [ [ s , ( [ Z (;AR H W s I:E
0x09b264…09b3f8 Dummy {f00=0x0031, f01=0x0190, f02=» & Z s t , ( 4 : Z t , ( ' 4 " 2@P : [ t D , ( G [ & @ $ ! P t t , ( e Z [ 6 [ Z t I:FML t , ( 7 . Z 7
0x09b3f8…09b58c Dummy {f00=0x0031, f01=0x4174, f02=»VI t , ( :;h : ; V Y : u I:EVB u < , ( 2! : 6 2 W u N , ( " # ;b ; u ~ ? : ;f" #?_" u H D ! #W 'W -P 1W = ?W4 KT> [ kT V, W V
0x09b58c…09b720 Dummy {f00=0x0031, f01=0x018e, f02=» > @ IDENT I:ADS T,REL=10.0,800314,870137141000 v I:ADD I:SUB v F I:ADD v I:SUB v n I:ERR2 v I:ERR1 v * & @ W # v , ( " T & T + : * v I:C
0x09b720…09b8b4 (0, 197) Dummy {f00=0x0031, f01=0x0190, f02=» , ( ! X # P 4 V W w , ( Q P [ " X $ P T w 4 , ( R R ` ; <( w d , ( Q P # W " <! =# T W = Z w , ( P _ V ^< `_@ w , ( ) R Q <# =_
0x09b8b4…09ba48 Dummy {f00=0x0031, f01=0x4056, f02=» W T6 W P )R +Q 7P w h AP GU KP QT x $ l x @@ x R T w 4 , ( R R ` ; <( w d , ( Q P # W " <! =# T W = Z w , ( P _ V ^< `_@ w , ( ) R Q <# =_
0x09ba48…09bbdc Dummy {f00=0x0031, f01=0x4184, f02=» > @ IDENT I:CMP T,REL=10.0,800314,870137141000 y I:CMP y F I:CMP y V I:ERR1 y h , ( #0 P " T * & y z , ( : * & !`P :J +_ +Q y I:CPA y , ( ? _0
0x09bbdc…09bd70 Dummy {f00=0x0031, f01=0x4172, f02=» > @ IDENT I:CPA T,REL=10.0,800314,870137141000 z I:CPA z F I:CPA z V * & R W z h , ( ( V W Q P W ! W V z , ( ? P , V W Q P W $ W V z * & _ P
0x09bd70…09bf04 Dummy {f00=0x0031, f01=0x0190, f02=» > @ IDENT I:MOV T,REL=10.0,800314,870137141000 { I:MOV I:MVC { F I:MOV { I:MVC { n , ( $0#0;b P P P P { , ( ! 0 - P _ 4 V { , ( A W Q P ) P 9_ &" ! 9 :
0x09bf04…09c098 Dummy {f00=0x0031, f01=0x0190, f02=»V { p , ( 4! P < S S S X | , ( 4 9d * & ! R + : | @ , ( V W R 4 0R Y | p , ( ! 7 Y& P Z,;D 9_8 8 _< | I:ERR8 | , ( A V W YL T 9 :
0x09c098…09c22c Dummy {f00=0x0031, f01=0x40fc, f02=»V 7 Y | r , ( P _& & Q 9d! )0 + P 7 Y } Z $ _ : } B H D ! ^ P P PF P -P0 EQ GP OP gP kQ s S S S } f 0 , R R R )P oP( T WJ V P. P } } @ } 9 :
0x09c22c…09c3c0 Dummy {f00=0x0031, f01=0x018e, f02=» > @ IDENT I:MUL T,REL=10.0,800314,870137141000 ~ I:MUL I:SH1L ~ F I:MUL ~ ^ I:ERR2 ~ p I:ERR1 ~ , ( V ) 0 !0 ~ , ( " T *V &V : V ~ , ( = S W P
0x09c3c0…09c554 (0, 198) Dummy {f00=0x0031, f01=0x0190, f02=» ~ f , ( [ [ $ [ [ I:MOV I:NTFA 8 * & P>h [ [ P I:SUB ~ , ( Z P , ( [ 9a Z $" T 9d! P P [ I:ADD , ( P
0x09c554…09c6e8 Dummy {f00=0x0031, f01=0x40e6, f02=» I:SH1L z , ( g ! I Z ! : 4 P 9 , ( 59D_ " P P [ ! :d" B 5 : r D @ @ TV 9V GP WV cW PP P6 P( P 5 z AR IP P P P @ I:ADD , ( P
0x09c6e8…09c87c Dummy {f00=0x0031, f01=0x018e, f02=» > @ IDENT I:DIV T,REL=10.0,800314,870137141000 I:DIV I:SH1R F I:DIV ^ I:ERR2 p I:ERR1 , ( 0 !0 " T , ( *V &V P = , ( ; ;@
0x09c87c…09ca10 Dummy {f00=0x0031, f01=0x0190, f02=» , ( V & 6 , ( [ [ [ [ $ 8 I:MOV I:NTFA h , ( [ [ &! P I:SUB , ( , ( z " ! !
0x09ca10…09cba4 Dummy {f00=0x0031, f01=0x018e, f02=» r e P _ , ( i T { [ [ Q [ & I:ADD V , ( P { R [ _ f , ( Z ! Z $ * & P Z %_N [ Q * & R
0x09cba4…09cd38 Dummy {f00=0x0031, f01=0x40b2, f02=» f + X" ,9 -9d_ H D ! Tz V 'V 5PP KR QP UW aP iR qR yV T W P +P $ ( $ YQ eP y Q@ R Q* R W p 6 @ ! Z $ * & P Z %_N [ Q * & R
0x09cd38…09cecc Dummy {f00=0x0031, f01=0x40da, f02=» > @ IDENT I:NTF T,REL=10.0,800314,870137141000 I:NTFA F I:NTFA X , ( Z H D & H l $ ! D % [ ( 8 @ P ABR* WK2 P P END ,PS
0x09cecc…09d060 Dummy {f00=0x0031, f01=0x0190, f02=» > @ IDENT I:EDT T,REL=10.0,800314,870137141000 F B I:EDT I:EDW I:ED1 I:EDSK I:EVT I:ETAB I:EXIT I:ETXT I:ECPY F D @ I:ECTR I:ESL I:ENL I:EOR I:ECW I:ECWC I:EFIL I:EFLA I:SCB I:FFSN I:EXPY , ( !!
0x09d060…09d1f4 (0, 199) Dummy {f00=0x0032, f01=0x0190, f02=»5 I:EVB I:EGTB I:EVI , I:EVA3 < I:EVA0 N * & AUT ` I:EVNO I:EPIC I:ESKI I:EBRI I:EBRB I:EBR * & Q T
0x09d1f4…09d388 Dummy {f00=0x0032, f01=0x0190, f02=» { 6 K K I:EDT . I:ED1 @ I:EDW R , ( K K V K : d I:EVA6 , ( * R B " V , ( V Z P 2 " T W , (
0x09d388…09d51c Dummy {f00=0x0032, f01=0x0190, f02=» 7 [ Z P I:ERR9 * , ( U $ [ V < I:EXIT z l P:MTAB , ( s & 7_ Z @ " (! * & P $ Z 7 Z Z P I:FFSN , (
0x09d51c…09d6b0 Dummy {f00=0x0032, f01=0x0190, f02=» : R J P v I < : I:ETXT ( I:ECPY < , ( J Q : P 4 P I:EXPY * I:ECTR < , ( % ! T _ P 4 W K I:ESL F I:ENL P , ( E W
0x09d6b0…09d844 Dummy {f00=0x0032, f01=0x418c, f02=»_& X ,W X & . J K I:EFIL ( I:SCB < I:ERRD N , ( : V : J T 0 1 ` H D ! U Y [ e f g z i p k 4 m P s u F y * < < H D ! P T W T W ;
0x09d844…09d9d8 Dummy {f00=0x0032, f01=0x0190, f02=» > @ IDENT I:EPIC T,REL=10.0,800314,870137141000 I:EPIC F I:EPIC X I:EVA0 l : + ~ [ [ < , ( ! !AAP !TTT W !**T * [ R A
0x09d9d8…09db6c Dummy {f00=0x0032, f01=0x0190, f02=»T j , ( *W FP . :T Z ! XBW *X& I:ERRD : , ( W :P # U J 1 p ! L I:SCB | , ( 00T ; _ 9P F " X> # ; W )0_B , ( J R Z R 4! P ;)0
0x09db6c…09dd00 Dummy {f00=0x0032, f01=0x4158, f02=» , ( k ,_ 8 _ : W 8W p 8 ! , ( ++P !-- z ;$# + ^" _( 4 " |`. PT*AXYZ9 d 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
0x09dd00…09de94 (0, 200) Dummy {f00=0x0032, f01=0x0190, f02=» > @ IDENT I:EDTE T,REL=10.0,800314,870137141000 D @ I:EKIH I:EINH I:EVIN I:EBRI I:EBRB I:EBR I:ESKI I:EVNO F I:EGTD I:EGTB I:EKIH I:EINH I:ETAB I:EVIN , ( @
0x09de94…09e028 Dummy {f00=0x0032, f01=0x018a, f02=»:ERR2 * & ; W : ! )P9H " I:EBR r < , ( W # T &W &" :I : N I:EBRB v ~ I:ESKI I:EVNO I:ER11 I:EGTD I:EGTB , ( u : P &
0x09e028…09e1bc Dummy {f00=0x0032, f01=0x4008, f02=»@ * & ; W : ! )P9H " I:EBR r < , ( W # T &W &" :I : N I:EBRB v ~ I:ESKI I:EVNO I:ER11 I:EGTD I:EGTB , ( u : P &
0x09e1bc…09e350 Dummy {f00=0x0032, f01=0x40ea, f02=» > @ IDENT I:EDS T,REL=10.0,800314,870137141000 I:EDS F I:EDS V I:EVS2 h I:ED1 z , ( : { : & @ P2E,OP1E END OF MAIN STRING
0x09e350…09e4e4 Dummy {f00=0x0032, f01=0x0190, f02=» > @ IDENT I:STR T,REL=10.0,800314,870137141000 $ I:INS I:DLT I:MCH I:CPY I:XCP F I:DLT n I:EVS1 , ( @ $0T P 9 I:MCH " * & _ $0T [ , ( ;
0x09e4e4…09e678 Dummy {f00=0x0032, f01=0x0190, f02=» $ t , ( R W R # P W ) V E I:EVS2 D , ( $0T W W V I:ERR I:CPY I:XCP , ( W [ , ( : Z !0 ,
0x09e678…09e80c Dummy {f00=0x0032, f01=0x409c, f02=» : H D !@ T H Pb )T ?T UR$ ]P cT mTd oW TH R W R P W ( $ T Wr W W P4 R* R %W Z P @ PY I:XCP , ( W [ , ( : Z !0 ,
0x09e80c…09e9a0 Dummy {f00=0x0032, f01=0x0190, f02=» > @ IDENT I:EVS T,REL=10.0,800314,870137141000 I:EVS1 I:EVS2 F I:EVA0 ` , ( @ #03 T jP r , ( kT T : & 9! " : $ , ( = : T W V 9! , ( ]
0x09e9a0…09eb34 (0, 201) Dummy {f00=0x0032, f01=0x4082, f02=»2 I:ERR _^ W , ( T )T GT KW eQ< qQ0 }Q$ T W < l@ ~ #03 T jP r , ( kT T : & 9! " : $ , ( = : T W V 9! , ( ]
0x09eb34…09ecc8 Dummy {f00=0x0032, f01=0x0190, f02=» > @ IDENT I:TRA T,REL=10.0,800314,870137141000 2 . I:NTR I:PRT I:TRA0 I:TRA I:TRB I:BUF I:ECB F I:ECB | I:BUF , ( *1 TID ADDR OP CR LVL MOD ( / IFIED OPERAND
0x09ecc8…09ee5c Dummy {f00=0x0032, f01=0x0190, f02=» ( z , ( ! @ ' $ * A T ( , ( A A ( J , ( p A ) Y V A V z I:HEX I:HEXB , ( V . 1 V v I:TRA0 8
0x09ee5c…09eff0 Dummy {f00=0x0032, f01=0x0190, f02=» I:EVA0 I:HEXW , ( e & ( @ |Q X I:TRB | , ( R A W # V D ! )0 1 , ( @ & # T 6 V ^ I:NTPR I:PRT
0x09eff0…09f184 Dummy {f00=0x0032, f01=0x4028, f02=»W> T n @ $ e & ( @ |Q X I:TRB | , ( R A W # V D ! )0 1 , ( @ & # T 6 V ^ I:NTPR I:PRT
0x09f184…09f318 Dummy {f00=0x0032, f01=0x0190, f02=» > @ IDENT I:ERR T,REL=10.0,800314,870137141000 D @ I:ERR I:ERR0 I:ERR1 I:ERR2 I:ERR3 I:ERR4 I:ERR5 I:ERR6 F F B I:ERR7 I:ERR8 I:ERR9 I:ERRA I:ERRB I:ERRC I:ERRD I:ERRE F B I:ERRF I:ER10 I:ER11 I:ER12 I:ER13 I:ER1
0x09f318…09f4ac Dummy {f00=0x0032, f01=0x0190, f02=» I:ERR3 I:ERR4 I:ERR5 0 I:ERR6 D I:ERR7 X , ( W W W W W W W W l I:ERR8 I:ERR9 $ I:ERRA ( I:ERRB , I:ERRC 0 I:ERR
0x09f4ac…09f640 Dummy {f00=0x0032, f01=0x018e, f02=» I:ER12 H I:ER13 L I:ER14 P , I:ER15 T @ I:ER16 X T I:ER17 h , ( A W W W W W W W W | I:ER18 ` I:ER19 d I:ER1A h I:ER1B l I:ER1C p
0x09f640…09f7d4 (0, 202) Dummy {f00=0x0032, f01=0x0190, f02=» f I:HEXB , ( $ ER A R A " I:ECB J * & @ R 4 4 $ A Z I:PRT , ( & U 4 - _ TC:ERR I:NTPR , ( @
0x09f7d4…09f968 Dummy {f00=0x0032, f01=0x0190, f02=» ILLEGAL REQUESTED | , ( W LENGTH STACK UNDERFLOW ARIT , ( w HM OVERFLOW STACK OVERFLOW IN L , ( DEX OVERFLOW ILL INDEX TYPE DI | , ( V BY ZERO EDIT BUFFER OVFL ED , ( IT PICTURE OVERFLOW ALLOCATION
0x09f968…09fafc Dummy {f00=0x0032, f01=0x0190, f02=»LOCA l , ( W TED FIX BUFFER NOT ALLOWED IL , ( w LEGAL CONTROL CODE ILLEGAL INDE < , ( X VALUE FORMAT CONDITIONS CHAN l , ( GED ILLEGAL PARAMETER LENGTH , ( ERROR DATASET BUSY ILLEGAL DA , ( TASE
0x09fafc…09fc90 Dummy {f00=0x0032, f01=0x412a, f02=» W` W WX WT #WP 'WL +WH /WD 3W@ 7W< ;W8 ?W4 | H D ! CW0 GW, KW( OW$ SW WW [W _W cW gW kW oW sW R D 8 H D ! U # 3 C ] _ q @ < " + A [ s
0x09fc90…09fe24 Dummy {f00=0x0032, f01=0x4108, f02=» > @ IDENT I:HEX T,REL=10.0,800314,870137141000 I:HEXB I:HEXW I:HEX F I:HEXB f I:HEXW z I:HEX , ( W 9 " R 0 1 Y ! : W " @
0x09fe24…09ffb8 Dummy {f00=0x0032, f01=0x413c, f02=» > @ IDENT I:CHK T,REL=10.0,800314,870137141000 I:CHK F I:CHK V P:BAS h P:END x , ( ;a V P V P W TC:CHK I:ERR , ( B <a R 9a V :
0x09ffb8…0a014c Dummy {f00=0x0032, f01=0x0190, f02=» > @ IDENT TRACHK T,REL=10.0,800314,870137141000 & " TC:CHK TC:ABT TC:ERR TC:RDC F TC:CHK p , ( @ P ( TT:HLT TT:TRP , ( !" _ @ P @ P P V
0x0a014c…0a02e0 Dummy {f00=0x0032, f01=0x0190, f02=» P n TT:VER TT:VMM , ( s $ $P T , D 2 , ( @ E : @ P A H A b TT:TID TT:PRC TT:SNO , ( W TW V A V TB:ENT ,
0x0a02e0…0a0474 (0, 203) Dummy {f00=0x0033, f01=0x0190, f02=» TC:RDC TB:RDC TC:ERR & TT:MSG : * & TB( : TB( : A L , ( A E A V A z P:MTAB , ( 3 @ " # P ( R , ( @ M TB( ( A
0x0a0474…0a0608 Dummy {f00=0x0033, f01=0x4042, f02=» W W P R ;P CR4 kP sR ~ ,@ >G : * & TB( : TB( : A L , ( A E A V A z P:MTAB , ( 3 @ " # P ( R , ( @ M TB( ( A
0x0a0608…0a079c Dummy {f00=0x0033, f01=0x0190, f02=» > @ IDENT TRATAB T,REL=10.0,800314,870137141000 F B TT:TON TT:TRP TT:LOP TT:VON TT:VER TT:VMM TT:HLT TT:PRC F & " TT:TID TT:MSG TT:SNO TT:TRS TT:TON TT:TRP , (
0x0a079c…0a0930 Dummy {f00=0x0033, f01=0x418a, f02=» j , ( a TT:VON : TT:VER N , ( b , ( TT:VMM @ TT:HLT
0x0a0930…0a0ac4 Dummy {f00=0x0033, f01=0x0190, f02=» > @ IDENT TRABUG T,REL=10.0,800314,870137141000 TB:ENT TB:ABT TB:RDC F h P:BAS z , ( , ( , (
0x0a0ac4…0a0c58 Dummy {f00=0x0033, f01=0x0190, f02=»( ( ( TT:PRC $ TT:SNO 6 , ( i D "! A * @ @ H , ( @ *P ( V x , ( R V W Z T , ( _" = T , (
0x0a0c58…0a0dec Dummy {f00=0x0033, f01=0x0190, f02=»B:RDC 8 , ( ! P @ A A , , ( ; A . "V # ( A , @ , ( @ [ P UW T A ,P p , ( { @ = W Q M / , ( S I J T Y G L P , (
0x0a0dec…0a0f80 Dummy {f00=0x0033, f01=0x0190, f02=» UU A A A A A A A A , ( B ; A P A A , 0 , ( [ + - ; : ( . ` , ( { X " , A L A L @ A , ( @ A _T X ,T X , ( ) A A
0x0a0f80…0a1114 (0, 204) Dummy {f00=0x0033, f01=0x0190, f02=» @ V " @ T , ( ( ; " @ @ P A A " @ , ( [ 8T @ 4 A @ : A @ @ A P , ( * { @ F A @ A @ A @ @ A , ( F @ A :P W @ T @ , ( @ Z @ A 4 W
0x0a1114…0a12a8 Dummy {f00=0x0033, f01=0x0190, f02=» p , ( ; 0 P P P @ , ( [ R _ @ , ( { _T p , ( 8 4 T P W , ( T @R W , ( U
0x0a12a8…0a143c Dummy {f00=0x0033, f01=0x0190, f02=» ; D @ A 8P W @ T @ , ( [ Z A @ 8 0 , ( { @ A 2 ` , ( A 8 @ R V ;a , ( @ Q _ 1 8 @ A , ( 2_ 0 A
0x0a143c…0a15d0 Dummy {f00=0x0033, f01=0x0190, f02=» @ 6 A @ < A @ B A , ( EU [ @ A @ A < @ A B @ A 6 , ( { P W @ T @ V @ P , ( @ A 0 0 P , ( @ @ P @ 1 8 A , ( @ @ < A @ 6 A _
0x0a15d0…0a1764 Dummy {f00=0x0033, f01=0x0190, f02=» 0 p , ( $ W ! T @ P @ " 1 , ( P w 8 P @ @ @ @ T @ , ( @ @ R A *9l! P p , ( &9d! ) W P &9d , ( & _ & , ( P
0x0a1764…0a18f8 Dummy {f00=0x0033, f01=0x018e, f02=» S P R % < < ! , ( H s T @ P @ ! 0 , ( D 5 = 8 8P @ ` TT:TRP TT:TRS , ( W $ TT:TON * & @
0x0a18f8…0a1a8c Dummy {f00=0x0033, f01=0x0190, f02=» , ( @ ! @ @ T I _: TT:HLT 8 * & ( = P @ _ A , A J I:TRC x , ( Y @ A 8 @ ! A , ( s 8P @ @ P @ P , ( @ R @ T @
0x0a1a8c…0a1c20 Dummy {f00=0x0033, f01=0x0190, f02=» R )W A | , ( 8 , A A :B A , ( @ Q (P _ H @ T @ L , ( @ H A " EQ GT | , ( = LT NE NG NL P @ * R , ( ] @ P Q (
0x0a1c20…0a1db4 (0, 205) Dummy {f00=0x0033, f01=0x0190, f02=» A l , ( :B A (P _ @ , ( @ @ P @ < , ( V @ Q 1 @ Q Q l , ( +D A " ( R ( @ , ( G$ V @ H ) I " , ( a $
0x0a1db4…0a1f48 Dummy {f00=0x0033, f01=0x0190, f02=» P ,T n P )T , ( @ A T @ R ?aP * , , ( :l" T & W T C B B , ( B B B " A A A , ( ? A A A A R Q , ( _ ! 9D# 9hP Q
0x0a1f48…0a20dc Dummy {f00=0x0033, f01=0x0190, f02=»Q L % Q | , ( W , ( C L , ( " _* Q P Q V | , ( ? _ W " A < V , ( _ " F <P
0x0a20dc…0a2270 Dummy {f00=0x0033, f01=0x0190, f02=» A l , ( .T @ *P P " A " , ( X X " , , A A < , ( :B A Q (P _ # # H A " l , ( ; A A 4 4 @ , ( [ I T A A A T A , ( @ { T
0x0a2270…0a2404 Dummy {f00=0x0033, f01=0x0190, f02=» n , ( "( @ " :S :X , ( :Y :Z $P W A > , ( + A 0R 9Q 0 A :B n , ( K _" A " , ( k A 0R 9U AR FQ , (
0x0a2404…0a2598 Dummy {f00=0x0033, f01=0x0190, f02=» "! R _U .W A : , ( A " 9d ! R . , ( + :W W W W ? ^ , ( K W :W .W / a A T " , ( k @ T A ( , ( @ A "
0x0a2598…0a272c Dummy {f00=0x0033, f01=0x0190, f02=» ! 1 ~ u 4 H D ! . K W e : y V } 6 P R V W V T 0 6 W P H D ! V $ P P 6 L #P ' 0 / ; t CV U : [P H D !o _W e V i 6 oP s w {
0x0a272c…0a28c0 Dummy {f00=0x0033, f01=0x0190, f02=» W . [ t _ c g k o s $ { d n T n j H D ! . 4 P 4 )V - 1 4 9T EP ] cT < H D ! P W T T W D W : 0 W H D ! 0 V 'PZ 9 T ? EP I L U
0x0a28c0…0a2a54 (0, 206) Dummy {f00=0x0033, f01=0x0190, f02=» # / ? : IP M QW WT c l H D ! k u t } 0 0 < 0 0 R Q : j ( H D ! D 6 0 P P P P -P 9T a {P W T t H D ! V 6 P P D 0 T P V T
0x0a2a54…0a2be8 Dummy {f00=0x0033, f01=0x0190, f02=» 9 =P` KT X H D ! Q S 4 WPF m T u $ y 6 T P P 0 W" b T W R % H D !1 3T =P A I 0 uPd PL P j j 0 R T V ` H D ! Rt W P RV W b * * * Q P T ' * MP2 UR* H D ! p Y j ] _
0x0a2be8…0a2d7c Dummy {f00=0x0033, f01=0x0190, f02=» !A T 4 R: P T* W T 7 ; ? C G K O S j UR H D ! [Q kP oQ Pl ( P R PL W~ Pz R Tr Qj W" P` QV L H D !`C QL N N W /Q 3P 5Q 9V IW Q f wP W* P T j j H D ! j T P d P d :
0x0a2d7c…0a2f10 Dummy {f00=0x0033, f01=0x018a, f02=» j P WH # j + b 1 Z 7R =Q C b Q j | H D ! _ b g j o wR$ }U R Q j T j 0 8 H D !q T R U WV $ ! $ )R /W& 5 V 9W ? V H D ! CW GW KW OW SW Y ] cT g m oT s w
0x0a2f10…0a30a4 Dummy {f00=0x0033, f01=0x4008, f02=»@ j P WH # j + b 1 Z 7R =Q C b Q j | H D ! _ b g j o wR$ }U R Q j T j 0 8 H D !q T R U WV $ ! $ )R /W& 5 V 9W ? V H D ! CW GW KW OW SW Y ] cT g m oT s w
0x0a30a4…0a3238 Dummy {f00=0x0033, f01=0x0190, f02=» J F IDENT SYSLOD REL 10.0 80-03-15 870105041000 & " SYSLODK SYSBAS NUMSEG PRGLG1 R NUMSEG | PRGLG1 SYSBAS SYSLODK SCTSFA SCTIPL , ( (
0x0a3238…0a33cc Dummy {f00=0x0033, f01=0x0190, f02=» TABBE , ( 5 A. UU @ @ ! P >B , ( QB@ @ A @ E D D SCTMSZ| t * & k P _ $ % $P _ % A SCTEFA * & H >f A A , ( H
0x0a33cc…0a3560 Dummy {f00=0x0033, f01=0x0190, f02=» , ( @* A W * A W :a2 SAVE09 4 SAVE04 F , ( * A & W F W X APPTYP , ( + @ F W CRP BAP SCTPSZ * & E COP A W F A @ ,
0x0a3560…0a36f4 (0, 207) Dummy {f00=0x0034, f01=0x018e, f02=» F P W W @ $ P @ SAVE05 , SAVE01 > SAVE03 P SAVE13 b , ( " R W " W $ & t CMPADR: * & A ( *R SAVE07 SAVE08L , (
0x0a36f4…0a3888 Dummy {f00=0x0034, f01=0x0190, f02=» h SCTNOP * & ' & V . V "P A 0 @ * & = @ *U U A H , ( S $ Q *V v SAVE22 , ( k H Y2 W 2 V @ " T , ( @ W .
0x0a3888…0a3a1c Dummy {f00=0x0034, f01=0x0190, f02=» 4 Y P @ , ( P @ 0T W - ( SCTLAP X , ( 4P _ T <B :L A j TTB:MT SCTMMPL , ( 1 H 6 W . 8 A : SCTNPE , ( I
0x0a3a1c…0a3bb0 Dummy {f00=0x0034, f01=0x0190, f02=» SCTMMC , ( Z& = 8 >:L , ( @ , < P W <9B @ B , ( H V W Q W $ r SCTLAC , ( BB @ A @ . MMDDIV , ( B@ @
0x0a3bb0…0a3d44 Dummy {f00=0x0034, f01=0x0190, f02=» W _> , ( w , $ , ( $ V V P W @ T , ( @ @ ! T _ P * & 6 :l , ( B B9b ) V B_
0x0a3d44…0a3ed8 Dummy {f00=0x0034, f01=0x018e, f02=» W r , ( Y W . @ , ( w@ W & B , ( r , ( V ( 00 , ( P , (
0x0a3ed8…0a406c Dummy {f00=0x0034, f01=0x0190, f02=» , ( Q _ S A A @ R , ( o@ @ ! T A A @ V 4 MOVEN d , ( & V $ I D W t M:REL , ( @ $ F V $ $ ) LDALEN , ( H H
0x0a406c…0a4200 Dummy {f00=0x0034, f01=0x0190, f02=» h , ( .T : D , ( 3 : : 0 !TTT 8 , ( Q 0 !;;T : W W 0 ! h , ( q 99Q P !00R P 00W 11 A , ( P =H_, !11R T 0 !LLP !RRP ! , ( @AAP !SS
0x0a4200…0a4394 (0, 208) Dummy {f00=0x0034, f01=0x0190, f02=» : : : : 0 ) , ( / T : !00T W ( : ( , ( M TID=TCL=LEV=TDC=T0LC=0SD X , ( k C=S0A I. : C. n , ( X C.9h! # " , ( :A K :
0x0a4394…0a4528 Dummy {f00=0x0034, f01=0x018e, f02=» A A A v , ( @ % A W A A A A , ( E A A A @ A A : 9e F , ( e :e Q P 9e @ v , ( P A 9C) A I " @ , ( ! P " :B A t q B J , (
0x0a4528…0a46bc Dummy {f00=0x0034, f01=0x0190, f02=» f , ( % :B A t w B J " r , ( E R Q @ ( = @ Q @ 8 , ( e "| _@ _$ : A A A h , ( A A A @ A A : , ( @ h:B* A @ P A B J 4 , ( @ R 4 :B
0x0a46bc…0a4850 Dummy {f00=0x0034, f01=0x0190, f02=» ! T W A A I , ( E ! : 9D @ @ r s @ ( , ( e A I T - A _ I N T X , ( V S : , ( , ( 9P S Y T $ 1T C !
0x0a4850…0a49e4 Dummy {f00=0x0034, f01=0x0190, f02=» d C !CCT xB. n <X B.9 , ( B@ ; H Q _ _ !SST 0 ( SCTSWB~ X SAVE25S j , ( @ [ @ U P A N X X W | SAVE260 SAVE27 , ( y P W R X X S W SAVE2
0x0a49e4…0a4b78 Dummy {f00=0x0034, f01=0x0190, f02=» V XT W X F P , ( H P V , W , @ $ P $ , ( p W D T : A _ T , ( % 0V , - P X 9A_ : E@ @ ! P (W ( : H D ! KP$ kP P Q" U R> P0 P
0x0a4b78…0a4d0c Dummy {f00=0x0034, f01=0x0190, f02=»TJ P P P T W P T n H D ! OW cT sW V V W P P W V W Q ! %P * H D !/ 7P EP* I D QP a u D D PZ T P V^ $ v H D ! - 1 9PH = v A & CW> G KT Q U WW ] a e > H
0x0a4d0c…0a4ea0 Dummy {f00=0x0034, f01=0x018e, f02=» P : " Z H D ! * b 7T ? L C H Q J U ] a e mR uT { f z P H D ! P PN T T ! > ) A @ OT YT aW gW sQ wP }R P W b H D ! P. R T$ P P P P W W T~ Rr U Rf Q` TR H D ! R V
0x0a4ea0…0a5034 (0, 209) Dummy {f00=0x0034, f01=0x417a, f02=» H D ! K S W sQ yP P P R U P P ER, GQ$ _Q { H D ! P R V V R L ! % f P H D !x` )T - x 1 j 9 j ? f mT T V S PJ T@ T: Tr P H D ! P$ T #Tx CQ UTF S W
0x0a5034…0a51c8 Dummy {f00=0x0034, f01=0x018c, f02=» > @ IDENT T:CLO T,REL=10.0,800314,870137141000 T:SETT T:GETT F T:SETT ` I:EVA0 t I:RT1 T:GETT , ( @ ( ( $ @ ( _
0x0a51c8…0a535c Dummy {f00=0x0034, f01=0x4008, f02=»@ IDENT T:CLO T,REL=10.0,800314,870137141000 T:SETT T:GETT F T:SETT ` I:EVA0 t I:RT1 T:GETT , ( @ ( ( $ @ ( _
0x0a535c…0a54f0 Dummy {f00=0x0034, f01=0x2008, f02=» L = SST101 DATE = 80 03 21 1216PACK NBR = 0101
0x0a54f0…0a5684 Dummy {f00=0x0034, f01=0x0190, f02=» ** ; 4 P** ** < 2 4 P** USES ROUTINE 'MOVE' ABOVE. TO-ADDRESS IS ** < j 4 P** ASSUMED TO BE DATA-PART OF MEMORY ** < 4 P** LSTADR POINTS AT LAST (HIGHEST) FREE *
0x0a5684…0a5818 Dummy {f00=0x0034, f01=0x0190, f02=» A1 AS IN 'MOVE' ** < 4 P** OUTPUT: A2=TO-ADDRESS (LSTADR UPDATED) ** = * 4 P** WORK-REG: A4 ** = b 4 P*********************************************** = P = PMOVING EQU * = & P LD A2,LSTADR,A13 GET
0x0a5818…0a59ac Dummy {f00=0x0034, f01=0x0190, f02=» CREDIT-MMUPAG=1 ] " P CC A4,DWBFST,A6 SHARED W.B.? ^ P XIF ^ > P IFT CREDIT+MMUPAG=2 ^ J * P EL A10,DWBFST,A6 CHECK IF SHARED W.B. ^ f " P SRC A6,1 RIGHT OR LEFT BYTE? ^ P RF(N) MOVD30 RIGHT! ^ P ANKL A10,/FF00 ^ P ECR A10,A10 ^ P RF MO
0x0a59ac…0a5b40 Dummy {f00=0x0034, f01=0x0190, f02=» ^ P RB(NE) MOVD20 NO! _ P* DWB FOUND * _ " , P NGR A4,A2 CALCULATE DISPLACEMENT IN T:A _ 8 P IFT CREDIT-MMUPAG=1 _ h P AD A4,WATLEN,A12 _ P XIF _ P IFT CREDIT+MMUPAG=2 _ P EL A10,WATLEN,A12 _ P ADR A4,A10 _ P XIF _ P IFF CRE
0x0a5b40…0a5cd4 (0, 210) Dummy {f00=0x0034, f01=0x0190, f02=»W.B.-ADDRESS _ v P IFT CREDIT-MMUPAG=1 ` 2 P ADR* A4,A8 A4=POINTER TO W.B.-ADDRESS IN T:A ` 0 " P STR A3,A4 CHANGE W.B.-ADDRESS ` f P XIF ` P IFT CREDIT+MMUPAG=2 ` . P LD A2,FLAG,A13 REAL DATA-PART PROCESSING? ` P RF(Z) MOVD50 NO! ` P TL* MMT
0x0a5cd4…0a5e68 Dummy {f00=0x0034, f01=0x0190, f02=»W.B.-ADDRESS ` ~ & P TL* MMFROM,A13 RELOAD FROM-TABLE a P XIF a > P IFF CREDIT=0 a J P ST A4,WBADD,A13 a ` . P LD A2,SWITCH,A13 WB-ADDRESS CHANGE ONLY? a x P RB(NZ) MOVD10 YES! a P CALL MOVDT MOVE D.T. a P RB MOVD10 a PMOVD60 EQU * a
0x0a5e68…0a5ffc Dummy {f00=0x0034, f01=0x0190, f02=» 4 P** ** b 4 P** COPY TWB'S AND RESERVE SPACE FOR SWB'S ** b < 4 P** ** b t 4 P** INPUT : A8=ACTUAL T:A-ADDRESS ** b 4 P** A12=T:D-ADDRESS
0x0a5ffc…0a6190 Dummy {f00=0x0034, f01=0x018e, f02=» PTWBSWB EQU * c P ST A7,SAVE04,A13 SAVE A7 c " P LD A7,TWBMSK,A12 GET TWB MASK c : P IFT CREDIT+MMUPAG=2 c ` " P EL A7,TWBMSK,A12 GET TWB MASK c | P XIF c P IFF CREDIT=0 c P CALL SHIFT c " PTWSW10 RF(Z) TWSW20 ALL DONE! c P CALL GETW
0x0a6190…0a6324 Dummy {f00=0x0034, f01=0x0190, f02=» P RB TWSW10 d PTWSW20 EQU * d P IFT CREDIT+SWPBLK=2 d * P EJECT d F P d T P d ` P* RESERVE SPACE FOR SWB'S * d l P*************************** d P XIF d P IFT CREDIT+SWBMMU=2 d P LD A7,SWBMSK,A12 d P XIF d P IFT C
0x0a6324…0a64b8 Dummy {f00=0x0034, f01=0x0190, f02=» d t P CALL GETWB e P CALL MOVWB RESERVE SPACE e ( P ST A2,NEWAD2,A13 SAVE W.B.-ADDRESS e > & P CALL MOVDWB CHANGE DWB- ADDRESSES e j P CALL SKIFTA e P RB TWSW30 e PTARZAN EQU * e P XIF e P IFT CREDIT=1 e P LD A7,SAVE04,A13 RESTOR
0x0a64b8…0a664c Dummy {f00=0x0034, f01=0x018e, f02=» u P EL A10,CIA,A4 v P SUR A2,A10 NEW T:A-ADDRESS v " P SUR A1,A10 'OLD' T:A-ADDRESS v B 8 P* COMPUTE AND STORE ADDRESSES TO DATA-SETS IN FCB * v h P v P EL A3,FCD,A12 ANY FCD? v P RF(Z) MOVT10 NO! v P LDR A4,A2 GET T:A-ADDRESS v 0 P
0x0a664c…0a67e0 Dummy {f00=0x0034, f01=0x018e, f02=» PMOVT05 EQU * w P ADR A3,A2 START OF FCB w P TL* MMTO,13 LOAD TO-TABLE w 8 P EL A10,FCBDD1,A3 w Z P ADR A10,A4 w t P ES A10,FCBDD1,A3 w P EL A10,FCBDD2,A3 w P ADR A10,A4 w P ES A10,FCBDD2,A3 w & P TL* MMFROM,A13 RELOAD FROM-TA
0x0a67e0…0a6974 (0, 211) Dummy {f00=0x0035, f01=0x0190, f02=» w 6 P** ** x 6 P** ** x B 6 P** COMPARE ADDRESSES. RESULT IN PSW ON RETURN ** x | 6 P** ** x 6 P** INPUT : A11 COMPARED
0x0a6974…0a6b08 Dummy {f00=0x0035, f01=0x0190, f02=» ** x d 6 P************************************************** y P y H PCMPADR EQU * y T P TNM A11,A9 y h P RF(NN) CMPA10 y | P CWR A9,A11 y P RF CMPA20 y PCMPA10 CWR A11,A9 y . PCMPA20 CFI A14,PSW,A13 PUT RESULT ON STACK y P RTN
0x0a6b08…0a6c9c Dummy {f00=0x0035, f01=0x0190, f02=» * y D P* ICBMVD - INDICATE CURRENT BLOCK MOVED * z 8 D P* ===================================== * z D P* *
0x0a6c9c…0a6e30 Dummy {f00=0x0035, f01=0x0190, f02=» * z X D P* ENTRY: A8 - FIRST T:A POINTER * { D P* A6 - SECOND T:A POINTER * { X D P* BIT - BIT NUMBER SET IN CWB- OR UWB-MASK * { D P*
0x0a6e30…0a6fc4 Dummy {f00=0x0035, f01=0x0190, f02=» * { x D P* * | 0 D P* WORK REGISTERS: A1,A2 * | x D P* * | D P
0x0a6fc4…0a7158 Dummy {f00=0x0035, f01=0x0190, f02=» | P D P*************************************************************** } P EJECT } P PICBMVD EQU * } ^ P LDKL A1,/8000 SET BIT 0 } r 6 P LD A2,BIT,A13 GET BIT NUMBER IN CWB- OR UWB-MASK } " PIBAM10 RF(Z) IBAM20 BIT FOUND } & P SRL A1,1 SHIFT BIT RI
0x0a7158…0a72ec Dummy {f00=0x0035, f01=0x0000, f02=»
[…0xf…]
0x0a8a98…0a8c2c Dummy {f00=0x0035, f01=0x018e, f02=»E E x P* F PTRM190 EQU * F ( P LD A6,DCWRQ CHECK APPLICATION QUEUE F ( " P RB(Z) TRM130 NOTHING IN QUEUE F T P EJECT F z P* F P* F P* F " P* HERE TO TRANSMIT AN IFRAME F P* F PTRM300 EQU * F " P SUK A6,DWTWQ GET DWT ADDRESS
0x0a8c2c…0a8dc0 Dummy {f00=0x0035, f01=0x0190, f02=» F n ( P LD A3,ECBRL,A8 GET REQUESTED LENGTH G P ADK A3,1 ADJUST LENGTH G 4 " P ST A6,WRDWT SAVE WRITING DWT G T $ P LDR* A1,A6 GET SUB-TERM ADDRESS G z P ANK A1,/FF G P* G P IFF MMUPAG=0 G * P LDKL A4,MMUBUF GET MMU BUFFER ADDRESS G P LD
0x0a8dc0…0a8f54 (0, 214) Dummy {f00=0x0035, f01=0x0190, f02=»,A8 G * P CF A15,DC:MOT MOVE DATA TO MMU BUFFER H PTRM320 EQU * H : P XIF H N P* H Z * P LD A7,ECBBA,A8 OUTPUT BUFFER ADDRESS H d ( P ADK A7,1 USE FREE-WORD TO INSERT IT H P SCR A1,A7 H $ P SUK A7,2 INIT OUTPUT ADDRESSING H P ST A7,SWITCH H
0x0a8f54…0a90e8 Dummy {f00=0x0035, f01=0x0190, f02=» H f P CF A5,WRFRAM I > P************** WHEN DONE,UPDATE PROTOCOL COUNTERS ***** I P LD A1,VSCNT UPDATE V(S) I ` P ADK A1,1 I P ANK A1,7 MODULO 7 I P ST A1,VSCNT I " P ST A1,CPCNT UPDATE CHECKPINT I P* I P* DISPATCH I P* I
0x0a90e8…0a927c Dummy {f00=0x0035, f01=0x018e, f02=» LDR* A1,A2 GET COMMAND I P CWK A2,COMQE J $ P RF(NE) TRME10 NOT END OF QUEUE J 6 ( P LDKL A2,COMQ-2 RESET OUTPUT POINTER J ^ PTRME10 EQU * J P ADK A2,2 J P ST A2,QOUT J P ABL TRM J P EJECT J P* J " P* PREPARE C-FIELD FOR I-FRAM
0x0a927c…0a9410 Dummy {f00=0x0035, f01=0x0190, f02=» J P ORR A1,A2 K P LD A2,VSCNT GET N(S) K P SLL A2,1 K 8 P ORR A1,A2 K J & P STR A1,A4 STORE C-FIELD IN BUFFER K P RTN A5 K P EJECT K P* K P* K , P* QUEUEING FACILITY FOR HDLC TRANSMITTER K 2 P* ON ENTRY A1 CONTAINS REQUESTED
0x0a9410…0a95a4 Dummy {f00=0x0035, f01=0x0190, f02=»NSMITTER K P* L P CF A15,SETIME L P DATA TRM,1 AFTER 100 MS L 0 P RF QMRTN L P P* L b P* PUT COMMAND ON QUEUE L l P* L PQMTRM10 EQU * L P LD A2,QIN L P CWK A2,COMQE L ( P RF(NE) QMTRM20 STILL SPACE IN QUEUE L " P LDKL A2,C
0x0a95a4…0a9738 Dummy {f00=0x0035, f01=0x0190, f02=» PQMRTN EQU * M P IFT CPU852=1 M P ADKL A15,4 M . P ABR* A15 M B P XIF M T P IFT CPU852=0 M ` P RTN A15 M v P XIF M P* M P EJECT M P* M P* RESET PROCEDURE COUNTERS M P* M P* M PRESCON EQU * M P CM VSCNT
0x0a9738…0a98cc Dummy {f00=0x0035, f01=0x0000, f02=»
0x0a98cc…0a9a60 Dummy {f00=0x0035, f01=0x0004, f02=»0 0
0x0a9a60…0a9bf4 (0, 215) Dummy {f00=0x0036, f01=0x0190, f02=» J F IDENT DRDY01 REL 10.0 80-03-14 870105041000 DYADY ECHODY R DYADY j OUTPUT | , ( P DISIOE * & !@ ! P P & , ( =
0x0a9bf4…0a9d88 Dummy {f00=0x0036, f01=0x0190, f02=» GETCHR , ( @ ! X , ( " E P 8'0P E T ! T @ * & 9 _t ! T @_ ! p , ( B P ! B C , ( ^N P R ?] _ C _ DWTBC
0x0a9d88…0a9f1c Dummy {f00=0x0036, f01=0x0190, f02=» B Y n , ( & ! W 8!0T 8 !@P ! , ( $ P ! ! ! > TENDIO n * & 1P X & C ,T Y & TDISP , ( X Y & Y > X DWTST , ( "
0x0a9f1c…0aa0b0 Dummy {f00=0x0036, f01=0x0190, f02=» Y & n , ( E $Zl T _ ! X $ ECHODY l > , ( a P ! R V P P R ECHRTN , ( @H ! W X $ X , ( ! _ X $ X X & ! , ( ! Y
0x0aa0b0…0aa244 Dummy {f00=0x0036, f01=0x0190, f02=»U )X R X X &" , ( ) Y * X ) V Y ! " , ( G@ X $ X & ! X * R * & e `R Y ! ! ! , ( 4 ! V ! , ( V W :h ! 4 X )" X '
0x0aa244…0aa3d8 Dummy {f00=0x0036, f01=0x410a, f02=» P( P TD T T P d P R ?P _ o H D ! u d W T P P P T Q R /T OT aP e @ H D ! oR uV {P P" W d U W U R@ 7V E d S iR V V W R @
0x0aa3d8…0aa56c Dummy {f00=0x0036, f01=0x2008, f02=»
0x0aa56c…0aa700 Dummy {f00=0x0036, f01=0x0000, f02=»
[…0x6…]
0x0ab078…0ab20c Dummy {f00=0x0036, f01=0x018e, f02=» BIT 5 $ P ORKL A1,/2000 SET BIT 2 INSTEAD P* 6 P EJECT DRTC01 @ P* X P* b PENDIO4 EQU * l P SRL A2,1 P TM A1,A2 & P RF(Z) ENDIO5 NOT WRITE PROTECTED P LD A7,DWTOR,A6 ORDER CODE P ANK A7,/3F P SUK
0x0ab20c…0ab3a0 Dummy {f00=0x0036, f01=0x0190, f02=» x P* PENDIO5 EQU * P IFT DBCAS=2 & $ P CF A15,SWLXY SWITCH TO LEVEL XY : P LDR* A6,A6 GET OTHER DWT b * P CF A15,TENDIO PERFORM TENDIO FOR THIS P LDR* A6,A6 GET FIRST DWT P XIF $ P CF A15,SWLXY SWITCH TO LEVEL XY , P
0x0ab3a0…0ab534 (0, 217) Dummy {f00=0x0036, f01=0x0190, f02=» PTM LDKL A3,-1 P ST A3,HELPME P* 0 P* W R I T E : P* P P* WRITE ONE BLOCK Z P* v P* , PWRITE LD A3,DWTBKC,A6 GET BLOCK COUNTER " P RF(NZ) WRIT10 NOT FIRST BLOCK & P CF A8,ERASE MAKE ONE BLANK BLOCK *
0x0ab534…0ab6c8 Dummy {f00=0x0036, f01=0x0190, f02=» A1,A2 P ANK A2,/0E ! P RF(Z) WRIT30 STATUS OK ! " P* ! B , PWRIT12 ST A4,WRITA4 STORE RETRY COUNTER ! L P LD A2,SEKBYT,A6 ! | P RF(Z) WRIT15 SEQ. COUNTING ! P* ! P EJECT DRTC01 ! P* ! P* ! $ P CF A8,BKSP BACKSPACE ONE
0x0ab6c8…0ab85c Dummy {f00=0x0036, f01=0x018e, f02=»NDICATOR ! v P LD A4,WRITA4 GET NO ... " P LDR A2,A2 " 0 & P RF(NZ) WRIT40 POSITIONING NOT OK " B P SUK A4,RTRIES ... OF ERASE " l P* " PWRIT20 CF A8,ERASE ERASE " P ORR A1,A2 SAVE EOT " P ADK A4,1 COUNT ERASE " P RB(NG) WRIT20 NOT R
0x0ab85c…0ab9f0 Dummy {f00=0x0036, f01=0x0190, f02=» . P ORR A1,A2 3 TRIALS DONE,SET ERASE BIT #4 # P RF WRIT50 GIVE UP # 6 P* # P P EJECT DRTC01 # Z P* # r P* # | PWRIT30 LD A2,TCDAX GET ORDER # P SUK A2,4 TAPE MARK WRITTEN? # P RB(NZ) READ30 NO # P LDR A2,A1 CHECK IF # P SLL
0x0ab9f0…0abb84 Dummy {f00=0x0036, f01=0x0190, f02=»R # P* $ , PWRIT50 LD A7,EFFLEN GET EFFECTIVE LENGTH $ P RB READ40 $ D P* $ V P EJECT DRTC01 $ ` P* $ x P* $ P* L O A D $ P* $ P* LOAD CASSETTE $ P* $ P* $ " PLOAD CF A8,LOCK LOCK CASSETTE $ " P RF(Z) REW
0x0abb84…0abd18 Dummy {f00=0x0036, f01=0x0190, f02=»* REWIND TAPE $ P* % P* % " , PREWIND CM DWTBKC,A6 CLEAR BLOCK COUNTER % , ( P CF A8,SBOT SEARCH BEGINNING OF TAPE % PREW010 EQU * % P LDR A3,A2 % P SRL A3,7 % P ANK A3,6 % P ORK A3,1 PREPARE STATUS % P RB LOAD10 % P* %
0x0abd18…0abeac Dummy {f00=0x0036, f01=0x0000, f02=»
[…0x9…]
0x0acce0…0ace74 (0, 219) Dummy {f00=0x0037, f01=0x0000, f02=»
[…0x5…]
0x0ad658…0ad7ec Dummy {f00=0x0037, f01=0x0190, f02=»20 - * P LDK A1,5 ILLEGAL INTERRUPT PARAMETER . P CF A15,HALT . 8 P . L * PIHMT20 LDKL A6,DWMT01 GET DWT ADDRESS . T $ P LD A8,DWTECB,A6 GET ECB ADDRESS . & P LD A5,MTSA5 RESTORE STACK POINTER . P LDK A2,/00 . , P LDKL A3,/2847 CHECK IF ILL STAT
0x0ad7ec…0ad980 Dummy {f00=0x0037, f01=0x0190, f02=») IHMT30 ILL STATUS . P LDK A2,/80 ILL DATA / P / 8 PIHMT30 SLC A2,2 / @ P ST A2,2,A5 UPDATE CR / X " P LD A2,MTSA2 RESTORE REGISTERS / v P LD A3,ECBRL,A8 / $ P LD A4,2,A2 CHECK IF SEQ NUMBERS / P RF(N) *+4 NO / P ADK A3,2 YES ADJUST L
0x0ad980…0adb14 (0, 220) Dummy {f00=0x0037, f01=0x0190, f02=»WER ON RECOVERY / | P* 0 P 0 " PMTDRON EQU * 0 * P IFT CPU852=1 0 > & P CF A15,SAVE8 SAVE A1-A8 ON STACK 0 T P XIF 0 ~ P* 0 P IFT CPU852=0 0 " P MSR 8,A15 SAVE A1-A8 ON STACK 0 P XIF 0 P* 0 P LDKL A6,DWMT01 0 P CM DWTST,
0x0adb14…0adca8 Dummy {f00=0x0037, f01=0x0190, f02=»T TIMER 0 P CM MTTIM INDICATE NO TIMER 1 P 1 4 , PMTON05 LD A4,MTPWF CHECK IF PWF TIMER ON 1 < P RF(NZ) MTON10 YES 1 l P LDKL A4,MTPWF 1 P CF A15,SETIMP NO START IT 1 P DATA MTON20,MTPTOT 1 P 1 . PMTON10 LDKL A3,-MTPTOT WAIT FOR EVERYT
0x0adca8…0ade3c Dummy {f00=0x0037, f01=0x0190, f02=» LD A8,DWTECB,A6 LOAD ECB ADDRESS 1 " P LDKL A5,MTSTB LOAD STACK BASE 2 * 0 P LDKL A2,MTCHS GET ADDRESS TO CHANNEL STATUS 2 P P 2 PMTON30 LD A1,2,A2 GET STATUS 2 P SRC A1,1 2 P RF(N) MTON40 OFF-LINE 2 $ P CF A5,MTRC RECOVER THIS CHANNEL 2 P
0x0ade3c…0adfd0 Dummy {f00=0x0037, f01=0x0190, f02=» IF ACTIVE REQUEST 2 ~ P ABL(Z) DISEND NO RETURN 3 & P ABL MTDA40 REPEAT ACTIVE REQUEST 3 : P EJECT DRMT01 3 d P 3 | P* 3 : P* MTRC RECOVERY ROUTINE. THE TAPE IS POSITIONED BEFORE 3 0 P* THE BLOCK GIVEN BY THE SEQUENCE COUNTER. 3 8 P* IF UN
0x0adfd0…0ae164 Dummy {f00=0x0037, f01=0x0190, f02=»DDRESS TO CHANNEL STATUS 3 P* A6: DWT ADDRESS 4 P* 4 : P* EXIT: 4 D P* 4 T P* A1: STATUS AFTER RECOVERY 4 ^ $ P* A2: ADDRESS TO CHANNEL STATUS 4 P* A6: DWT ADDRESS 4 P* 4 P 4 P 4 & PMTRC LDR A7,A2 CALC CHANNEL NUMBER 4 P
0x0ae164…0ae2f8 Dummy {f00=0x0037, f01=0x0190, f02=» 4 t P CF A5,ONLI 5 P LDR* A3,A2 GET SEQ COUNTER 5 & P ABL(Z) SBOW TAPE SHOULD BE AT BOT 5 @ 8 P LDK A7,MTRBLK REVERSE TAPE TO AVOID ANY OLD BLOCKS 5 j PMTRC05 CF A5,SKPR 5 P SUK A7,1 5 P RB(NZ) MTRC05 5 P 5 * PMTRC10 CF A5,RSQN READ S
0x0ae2f8…0ae48c Dummy {f00=0x0037, f01=0x0000, f02=»
[…0xf…]
0x0afc38…0afdcc Dummy {f00=0x0037, f01=0x0190, f02=» * % n * P* * & * P************************************* & : P* & h P* & r PRW:200 EQU * & | P CF A5,IOROUT & P DATA /0048 & P SUK A7,2 NUMBER OF SECTORS & P RF(N) RW:230 1 SECTOR IN IO & $ P RF(NZ
0x0afdcc…0aff60 Dummy {f00=0x0037, f01=0x0190, f02=» XX,XX , & P CF A5,IOROUT ' P DATA /0040 ' , P RF RW:600 ' @ PRW:260 EQU * , XX,XXXXXX, ' R P CF A5,IOROUT ' v P DATA /80C0 ' P* ' P EJECT DRDU01 ' P* ' ( P************************************ ' ( P*
0x0aff60…0b00f4 (0, 223) Dummy {f00=0x0038, f01=0x0190, f02=» * ' z ( P************************************ ( P* ( B P* ( L PRW:300 EQU * ( V P SUK A7,3 SECTOR COUNTER ( j 0 P RF(NG) RW:500 LESS THAN FOUR SECTORS IN IO ( P CF A5,IOROUT ( P DATA /80C0 ( P CF A5,IOROUT ( P DATA /80C
0x0b00f4…0b0288 Dummy {f00=0x0038, f01=0x0190, f02=» * ( z ( P* READ/WRITE ON THE LAST SECTORS * ) ( P* IN IO * ) B ( P* * ) n ( P************************************ ) P* ) P* ) PRW:500 EQU * ) P RF(Z) RW:580 3 SECTORS )
0x0b0288…0b041c Dummy {f00=0x0038, f01=0x018e, f02=»T ) P DATA /0080 * P RF RW:600 * PRW:560 EQU * ,XXXXXX,XX , * 0 P CF A5,IOROUT * T P DATA /80C0 * j P CF A5,IOROUT * ~ P DATA /0040 * P RF RW:600 * PRW:580 EQU * ,XXXXXX,XXXXXX, * P CF A5,IOROUT * P DATA /80C0 * P
0x0b041c…0b05b0 Dummy {f00=0x0038, f01=0x0190, f02=» * P************************ + P* * + ( P* READ AFTER WRITE * + H P* * + h P************************ + P* + 0 P* DWTSEI=1:ST PHYSICAL SECTOR NUMBER IN IO + 8 P* 1ST POS IN DWT=LAST PHYSICAL S
0x0b05b0…0b0744 Dummy {f00=0x0038, f01=0x0190, f02=» & P RF(NZ) RW:700 NOT PHYSICAL WRITE , P LDKL A2,-/100 , . , P LD A1,DWTSEP,A6 GET 1ST SECTOR POSITION , D P RF(Z) RW:645 , XX, , t P RF(P) RW:640 , XXXX, , P ADK A2,/80 , PRW:640 EQU * , P ADK A2,/80 , PRW:645 EQU * , , P ST A2,E
0x0b0744…0b08d8 Dummy {f00=0x0038, f01=0x018e, f02=»ET NUMBER OF PHYSICAL SECTORS , P STR A1,A6 - & P* - 8 P EJECT DRDU01 - B P* - X P* - b PRW:650 EQU * - l P CF A5,IOROUT - P DATA /40C0 - P IMR A6 NEXT PHYSICAL SECTOR - P LDKL A1,PHSECL - " P ADS A1,ECBEL,A8 UPDATE ECBEL -
0x0b08d8…0b0a6c Dummy {f00=0x0038, f01=0x0190, f02=» n INIFLG , ( WB Y $ Y @ &T Y ! ! T , ( q @ Y ! ! T Y ! ! P Y P VOLCLR , ( ( Y ! ! P Y , ( ( Y $ Y , ( B $ P X Y
0x0b0a6c…0b0c00 Dummy {f00=0x0038, f01=0x0190, f02=» INTSAV , ( _ A Y $ Y _ A , , ( ? I F 9AZL9a P D ) L , ( 3@$ X V # T X X X | , ( M 4 Y $W C X P TENDIO , ( B g . " !
0x0b0c00…0b0d94 (0, 224) Dummy {f00=0x0038, f01=0x0190, f02=» T @ 8 # " Q P R * & P Q X X X 0 DWDU01 ^ , ( Y ! W 4 r , ( , ( 7 , ( W
0x0b0d94…0b0f28 Dummy {f00=0x0038, f01=0x0190, f02=» F j j P P P b H D !+Z P P X T ' ~ + R 1 ~ 5 9V8 = ~ A R K n Y & ]T a ~ e R H D ! q u yR j V V R0 P ( W" ( R T ( WJ ( j H D !X WB ( U ( ( P Q R" ( W ( ( W ( ( ' X H D ! $ /
0x0b0f28…0b10bc Dummy {f00=0x0038, f01=0x0190, f02=» H N H D ! ~ R H Wt ~ R P W % ) - H 1 H D ! 5 7W, =R A H E Y . [W _ H c y } ~ f P V H D !g " X P^ ~ f P " X H T$ P H D ! @ W W ~
0x0b10bc…0b1250 Dummy {f00=0x0038, f01=0x4128, f02=» W R W( W$ W H T W 3T ; J ? P Q H D ! S p ] F cT oTn }T` r P r P F P P$ P B H D ! F p +P 9 F ;V AT( WW c " eP yT R H Tr 4 0 F P T2 T( ^ P R P V W !
0x0b1250…0b13e4 Dummy {f00=0x0038, f01=0x2008, f02=»
0x0b13e4…0b1578 Dummy {f00=0x0038, f01=0x0000, f02=»
[…0x8…]
0x0b2218…0b23ac Dummy {f00=0x0038, f01=0x018e, f02=» STORE EOD NO IN DWT - P* . PLOA:65 EQU * . & P LDKL A3,/400 . : , P ORRS A3,A6 UPDATE TEMPORARY RETURN CODE . P P* . PLOA:70 EQU * . P XIF . P LD A2,DWTA3,A6 . " P ORS A2,DWTLC,A6 INDICATE LOCK . PLOA:80 EQU * . P ABL END:RC
0x0b23ac…0b2540 Dummy {f00=0x0038, f01=0x018e, f02=» P XIF / P* / P EJECT DRFD01 / P* / 2 P* / < P IFF TOSS+IBM=0 / F P* / ^ P* ERROR , UNLOCK / h 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
0x0b2540…0b26d4 (0, 226) Dummy {f00=0x0038, f01=0x018e, f02=» & P LDKL A4,BUF DRIVER BUFFER ADDRESS 0 P RTN A5 0 . P XIF 0 > P* 0 J P EJECT DRFD01 0 T P* 0 l P********** 0 v P* * 0 P* UNLOAD * 0 P* * 0 P********** 0 P* 0 PUNLOAD EQU * 0 P IFT IBM=1 0 P* 0
0x0b26d4…0b2868 Dummy {f00=0x0038, f01=0x0190, f02=» 4 P ST A7,12,A8 STORE EOD-NO IN CONTROL WORD OF ECB 1 P* 1 < , P* READ DATA SET LABEL TO DRIVER BUFFER 1 F P* 1 v P CF A5,DSLIO PREPARE FOR I/O 1 & P CF A5,FD:REA READ DATA SET LABEL 1 $ P CF A5,UNL:RC RETURN CODE CHECK 1 P ENB 1 P* 1
0x0b2868…0b29fc Dummy {f00=0x0038, f01=0x018e, f02=»BY 26 1 P* 2 P LDK A1,0 2 PUNL:10 SUK A7,26 2 * P RF(N) UNL:20 2 B P ADK A1,1 2 X P RB UNL:10 2 j P* 2 | P EJECT DRFD01 2 P* 2 P* 2 PUNL:20 ADK A7,27 2 P* 2 P* A1 = BINARY TRACK NO 2 * P* A7 = SECTOR NO W
0x0b29fc…0b2b90 Dummy {f00=0x0038, f01=0x018e, f02=» 2 P SUK A4,1 3 P SRL A3,8 LEFT BYTE 3 P SCR A3,A4 STORE IN BUFFER 3 6 P LDR A7,A1 TRACK 3 X ( P CF A5,BINDEC DEC EBCDIC-CODED IN A3 3 p P SUK A4,3 3 P STR A3,A4 TRACK INTO BUF 3 F P INH INHIBIT INTERRUPTS
0x0b2b90…0b2d24 Dummy {f00=0x0038, f01=0x0190, f02=» ( P CF A5,FD:WRITE WRITE DATA SET LEBEL 4 $ P CF A5,UNL:RC CHECK RETURN CODE 4 0 P CF A5,DSOPCH 4 X P CMR A2 INDICATE NOT OPEN 4 n P* 4 P EJECT DRFD01 4 P* 4 P* UNLOCK 4 P* 4 P XIF 4 PUNL:70 EQU * 4 P LDK A2,/C UNL
0x0b2d24…0b2eb8 Dummy {f00=0x0038, f01=0x0190, f02=»A6 INDICATE UNLOCK IN DWT 4 P RB LOA:80 END:IO 5 " P* 5 < P IFT IBM=1 5 F P* 5 X P* UNLOAD RETURN CODE CHECK 5 b P* 5 PUNL:RC EQU * 5 P ANKL A3,/207 5 P RF(Z) RTN:A5 NO RETURN CODE 5 P ANKL A3,/200 5 & P RF(Z) RTN:A5 NOT WR
0x0b2eb8…0b304c Dummy {f00=0x0038, f01=0x0190, f02=»QUEST FOR OPEN ORDER IF RUNNING M z P* N ( " P LD A4,DWTTP2,A6 TIMER POINTER N 2 P RF(Z) FDON09 NOT RUNNING N X P CMR A4 STOP TIMER N z $ P CM DWTTP2,A6 INDICATE NO TIMER N PFDON09 EQU * N P* N 6 P* OPEN FD TO MAKE FOLLOWING LOCK ORDER POSS
0x0b304c…0b31e0 Dummy {f00=0x0038, f01=0x0190, f02=»EN/CLOSE FLAG N ~ P ORS A2,DWTOCF,A6 SAVE O ( P XRRS A2,A4 SET STATUS WORD TO OPEN O 4 P LDR* A2,A4 O ` & P OTR A2,0,SOPDA SET DRIVE TO OPEN O t P* O PFDON23 EQU * O P XIF O P* O P EJECT O P* O P* LOCK DOORS O P* O
0x0b31e0…0b3374 (0, 227) Dummy {f00=0x0039, f01=0x018e, f02=»WTA3,A6 SAVE O P* P P EJECT P P* P , P* PUT DRIVE NO IN CIO INSTR P 6 P* P Z P SRN A2,A3 DRIVE NO IN A3 P d * P CF A5,SETCIO PUT DRVE NO IN CIO-INSTR P P LDK A2,/14 LOCK P P CF A5,FD:REA P P LD A2,DWTA3,A6 DRIVE IND. P P ANK
0x0b3374…0b3508 Dummy {f00=0x0039, f01=0x0190, f02=» P RB(NE) FDON25 Q P* Q P IFT OPCLOS=1 Q $ P* Q : D P* RESTORE OPEN/CLOSE STATUS TO SAME VALUE AS BEFORE POWER OFF Q D P* Q $ P LD A2,DWTOCF,A6 OPEN/CLOSE FLAG Q " P ORS A2,SPDLCI TO STATUS WORD Q P CM DWTOCF,A6 CLEAR FLAG Q $ P LD
0x0b3508…0b369c Dummy {f00=0x0039, f01=0x0190, f02=» ANY REQUEST Q P* R P CM DWTA2,A6 RESET FDON FLAG R PFDON60 EQU * R B P LD A8,DWTECB,A6 R V 0 P ABL(Z) END:IO NO REQUEST, RETURN VIA TENDIO R n P* R P* RETRY REQUEST R P* R P IM DWTRTY,A6 INDICATE RETRY R P LD A7,DWTORD,A6 R ,
0x0b369c…0b3830 Dummy {f00=0x0039, f01=0x0190, f02=»VATE R P* S P EJECT DRFD01 S P* S . P******************** S 8 P* * S T P* READY INTERRUPT * S p P* * S P******************** S P* S PFDRE EQU * S P LD A2,DWTA2,A6 S * P RB(NZ) F:DISP P
0x0b3830…0b39c4 Dummy {f00=0x0039, f01=0x0190, f02=» XIF S P* T P IFF TOSS+IBM=0 T P CM DWTST,A6 SET UNIT BUSY T . P RB FDONVL READ VOLUME NAMES T P P XIF T t P* T P EJECT DRFD01 T P* T P********************* T P* * T P* INTERRUPT HANDLER * T P*
0x0b39c4…0b3b58 Dummy {f00=0x0039, f01=0x0190, f02=»2=1 T * P CF A15,SAVE8 SAVE REGISTERS ON STACK U P XIF U : P* U F P IFT CPU852=0 U P " P MSR 8,A15 SAVE A1-A8 ON STACK U f P XIF U P* U P LDKL A6,DWFD01 DWT ADDRESS U P IFT CHAN=1 U P ENB U & P LD A1,DWTUB,A6 GET BUFFER POINTER
0x0b3b58…0b3cec Dummy {f00=0x0039, f01=0x0190, f02=»E EXTENDED INSTRUCTION t . P* SET IS OBTAINED BY SETTING CPU852 EQU 0. P* P PCPU852 EQU 1 Z P* n P EJECT DRCR01 DRCR01 x P STATUS P ******************** P -HARDWARE: . P BIT 10: INPUT HOPPER EMPTY OR OUTP
0x0b3cec…0b3e80 Dummy {f00=0x0039, f01=0x0190, f02=»: REQUEST ERROR P 3: :EOF DETECTED " P 12: INCORRECT LENGTH < P 13: DATA FAULT b : P 2: HW BIT 10 IS SHIFTED TO BIT 2 IN ECB RETURN CODE P P P ORDER P ******************** P
0x0b3e80…0b4014 (0, 228) Dummy {f00=0x0039, f01=0x0190, f02=»DE ON 8 BITS, AND STORED r , P UNTIL REQUESTED LENGTH IS REACHED P EJECT DRCR01 P P *********************** h P *NORMAL REGISTER USAGE* P *********************** P A1=RETURN CODE P A2=WORK REGISTER P A3=WOR
0x0b4014…0b41a8 Dummy {f00=0x0039, f01=0x0190, f02=» : P***************************************************** : P* NOTE! IN COMMENTS, THE FOLLOWING NOTATION IS USED * H : P* CARD COLUMNES: 1,2,3,4.......80 * : P* CARD ROWS : 12,11,0,1,2,3.....9 * : P******
0x0b41a8…0b433c Dummy {f00=0x0039, f01=0x018e, f02=»************* P * P DATA DVBLEN+DVBLEN MMU BUFFER LENGTH " P DATA DEVIND MMU DEVICE INDEX N PCRADR DATA ACCR t " P DATA 0 ABORT ROUTINE ADDRESS P IFT CHAN=0 P* P********** P* BUFFER * P********** PMU
0x0b433c…0b44d0 Dummy {f00=0x0039, f01=0x0190, f02=» P* ACTIVATION PART * P* * & P************************* H P j PACCR EQU * t P SUK A7,2 ORDER 2? " P ABL(NZ) DISIOE REQUEST ERROR PORDER2 LD A3,REQLEN,A8 P CWK A3,80 P RF(NG) AC.1 &
0x0b44d0…0b4664 Dummy {f00=0x0039, f01=0x0190, f02=»FLAG RESET RECOVERY INDICATOR P CF A5,READ READ ONE CARD & 2 P ANKL A1,/FFF7 RESET "INCORRECT LENGTH" BIT 12 H P OR A1,STATUS,A6 ~ P LDR A2,A1 RETURN CODE P ANK A2,/20 P RF(Z) ENDIO BIT 10 NOT SET P XRR A1,A2 RESET BIT 10
0x0b4664…0b47f8 Dummy {f00=0x0039, f01=0x0190, f02=» " P****************************** " P* SUBROUTIN TO READ ONE CARD * . " P****************************** T PREAD EQU * z P ST A5,DWTA5,A6 SAVE A5 P LD A4,BUFFER,A8 P SUK A4,1 , P ST A4,DWTA4,A6 SAVE BUFFER ADDRESS - 1 P L
0x0b47f8…0b498c Dummy {f00=0x0039, f01=0x0000, f02=»
[…0x11…]
0x0b6460…0b65f4 (0, 231) Dummy {f00=0x003a, f01=0x0000, f02=»
[…0x6…]
0x0b6f6c…0b7100 Dummy {f00=0x003a, f01=0x0002, f02=»1p
0x0b7100…0b7294 (0, 232) Dummy {f00=0x003a, f01=0x0190, f02=» J F IDENT TLDSEG REL 10.0 80-03-14 870105041000 TLDSEGK TLDS15 TLDS20 R TLDSEGK t TTB:SP SEG:NS LKM030 , ( B T R L U 9C TTB:SB SEG:D
0x0b7294…0b7428 Dummy {f00=0x003a, f01=0x4116, f02=»CTMMP SCTNPE , ( 5 D " @ @ - U SCTLAPV P TTB:MT b TTB:CB@ t TTB:SA , ( M $ _ 9B @ T u g@ X > R U 'T 1W. KU l
0x0b7428…0b75bc Dummy {f00=0x003a, f01=0x2008, f02=»
0x0b75bc…0b7750 Dummy {f00=0x003a, f01=0x0000, f02=»
[…0xa…]
0x0b8718…0b88ac Dummy {f00=0x003a, f01=0x0190, f02=»RE d P LDKL A14,/7FFF P* " P EJECT TOSSFM , P* D ( P* SEARCH THE FILE EXTENT THAT HOLDS N P* THE REQUESTED SECTORS z * PFM:070 EQU * * P LC A6,EWTEXL-1,A3 FILE EXTENT LENGTH P LD A7,EWTEXL,A3 " P CWR A1,A6
0x0b88ac…0b8a40 Dummy {f00=0x003a, f01=0x0190, f02=»ENT FOUND ~ * PFM:080 EQU * P IFT CPU852=0 0 . P DSR A6 SUBTRACT LENGTH FROM SECTOR NUMBER F P XIF x P* P IFT CPU852=1 2 P SUR A1,A6 SUBTRACT LENGTH FROM SECTOR NUMBER P SUR A2,A7 P RF(NN) FM:090 NOT UNDERFLOW
0x0b8a40…0b8bd4 (0, 234) Dummy {f00=0x003a, f01=0x0190, f02=»DRESS TO 2ND EWT BLOCK . ) LDR* A3,A3 ADDRESS TO NEXT EWT STRUCTURE $ P RB(NZ) FM:070 CHECK NEXT EXTENT P * x 4 /FM:RQE EQU * FILE MANAGEMENT REQUEST ERROR EXIT P LDKL A1,/A000 REQUEST ERROR P RB FM:040 * EJECT TOSSF
0x0b8bd4…0b8d68 Dummy {f00=0x003a, f01=0x0190, f02=» LC A10,EWTEXB-1,A4 FILE EXTENT BASE P LD A11,EWTEXB,A4 , * F IFT CPU852=0 P " P DAR A10 COMPUTE SECTOR NUMBER f XIF * IFT CPU852=1 & P ADR A1,A10 COMPUTE SECTOR NUMBER P ADR A2,A11 RF(O) FM:140 OVER
0x0b8d68…0b8efc Dummy {f00=0x003a, f01=0x018e, f02=»ON t SUK A1,1 * EJECT TOSSFM & * > * H PFM:115 EQU * R " P LDR A12,A1 SAVE SECTOR NUMBER f P LDR A13,A2 P* IFT MMUPAG=0 . P LC A3,ECBRL,A8 REQUESTED LENGTH (SECTORS) XIF *
0x0b8efc…0b9090 Dummy {f00=0x003a, f01=0x0190, f02=» . P ADR A2,A3 COMPUTE LAST REQUESTED SECTOR+1 RF(O) FM:150 OVERFLOW 6 * T PFM:120 EQU * ^ 0 P ADR A6,A10 COMPUTE LAST SECTOR+1 IN EXTENT r P ADR A7,A11 P RF(O) FM:160 OVERFLOW * PFM:125 EQU * P CWR A6,A1 0 P
0x0b9090…0b9224 Dummy {f00=0x003a, f01=0x0190, f02=» P CWR A7,A2 4 P RB(L) FM:RQE ALL SECTORS NOT WITHIN THIS EXTENT P XIF N P* Z P IFT XTSPLI=1 d 4 P RF(L) FM:170 ALL SECTORS NOT WITHIN THIS EXTENT z P CWR A7,A2 4 P RF(L) FM:170 ALL SECTORS NOT WITHIN THIS EXTENT P XIF
0x0b9224…0b93b8 Dummy {f00=0x003a, f01=0x0190, f02=» = DISC INDEX (FROM FNDDWD) 0 P* A4 = 0 (INDICATES NOT I/O-AND-ACTIVATION) $ P* A5 = TTAB ADDRESS X * P* A6 = DISC DWT ADDRESS (FROM FNDDWD) t P* A7 = ORDER CODE P* A8 = ECB ADDRESS * PFM:130 EQU * $ P LC A2,EWTVOL,A4 FIL
0x0b93b8…0b954c Dummy {f00=0x003a, f01=0x0000, f02=»
[…0x1…]
0x0b96e0…0b9874 (0, 235) Opaque[0x194]
0x0b9874…0b9a08 # DirEnt {nam=»SYSGEN«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0760, f03=0x0000}
0x0b9874…0b9a08 IdxSect {
0x0b9874…0b9a08 f00 = 0x003b // 0xb9874 @0x0
0x0b9874…0b9a08 f01 = 0x0018 // 0xb9876 @0x2
0x0b9874…0b9a08 gno = [ // 0xb9878 @0x4
0x0b9874…0b9a08 [0x00]: C0x003b.0x0.0
0x0b9874…0b9a08 [0x01]: C0x003b.0x1.0
0x0b9874…0b9a08 [0x02]: C0x003b.0x2.0
0x0b9874…0b9a08 [0x03]: C0x003b.0x3.0
0x0b9874…0b9a08 [0x04]: C0x003c.0x0.0
0x0b9874…0b9a08 [0x05]: C0x003c.0x1.0
0x0b9874…0b9a08 [0x06]: C0x003c.0x2.0
0x0b9874…0b9a08 [0x07]: C0x003c.0x3.0
0x0b9874…0b9a08 [0x08]: C0x003d.0x0.0
0x0b9874…0b9a08 [0x09]: C0x003d.0x1.0
0x0b9874…0b9a08 [0x0a]: C0x003d.0x2.0
0x0b9874…0b9a08 [0x0b]: C0x003d.0x3.0
0x0b9874…0b9a08 ]
0x0b9874…0b9a08 }
0x0b9a08…0b9b9c Dummy {f00=0x003b, f01=0x0190, f02=»r ] @ . A > @ 4 A @ @x @s @s @yzP& @hf A` @hh A` @hdP A`| @hbP A` W @y P A[ A[ A[ @a( A[ A[ A[ @y A[ @`z A[ @`t @`v A[ @y A[ A[ @ @`~ A[ @ 0P A[ @` A[ @ T @ * A[ @` A[ A[ @ @`~P @ T A
0x0b9b9c…0b9d30 Dummy {f00=0x003b, f01=0x0190, f02=» $ @`z A[ A @`r A[ A @`t @`v A[ A @a( A[ A[ A A A[ A[ A[ A[ A[ A[ A[ A[ PH @ 4" H A[ A[ A[ A[ @ A[ A[ A[ A[ A[ P( 6W" A[ A[ A[ A[ A[ P @ 6 @` A[ A[ A[ @` A A[ @`~ A @` A @`| A A
0x0b9d30…0b9ec4 Dummy {f00=0x003b, f01=0x0190, f02=» F A v % @ r A W A r @x T . @y P W@ @a P Z ` [ $ ZW @a(P [ W [ Z 8 A r l A v [ L[ R M[ _ @`z A[ @`r A[ @`t @`v A[ @ * @ A[ @` A[ A[ A[ @` A[ @`~ A
0x0b9ec4…0ba058 Dummy {f00=0x003b, f01=0x0190, f02=» D A D AT A F A A H $R % _ A [ 8 B 8 u : DATA ILLINT122123124125126127128129130131132133134135136138139140141142145149150155156159163 04204304404504604704804905005105205305405505605705805906
0x0ba058…0ba1ec Dummy {f00=0x003b, f01=0x0190, f02=»CH $$CHRT1$$IHLP$$LED SYSTABLED PFTAB LED INITAB!!IL 63 !!CH $$IHINPT$$TRAP$$ !!DL 85 ! D @ J R V Z ^ A[ A[ A[ A[ A[ : @ P@ A[ @ P 2T A[ A[ W A[ A[ W A[ @ *P @ _< :_$!!RE 127,$$ILLINT$$CHRT1$$!!RE 128,$$ILLINT$
0x0ba1ec…0ba380 Dummy {f00=0x003b, f01=0x0190, f02=»56159163 : 3L<c P | & & : & & : & : & : ` & : & & : : A n A m X ( A p A o X ( x Y ( T T ' X ( A p A o X ( x Y ( T T ' : A P V V : X ( A R
0x0ba380…0ba514 (0, 236) Dummy {f00=0x003b, f01=0x0190, f02=» . F R ^ p z !!IL 12 !!IL 41 A h A x A w A g :!!IL 55 010101010101010101 EXTRN IH0000!!CH $$ILLINT XX$$IHAABB XX$$ !!CH $$CHLT1 14$$ILLINT 14$$!!CH $$IHFD 15$$ ILLINT 15$$!!CH $$CHRT3
0x0ba514…0ba6a8 Dummy {f00=0x003b, f01=0x0190, f02=» 21$$ILLINT 21$$!!CH $$IHCC3 23$$ILLINT 23$$!!CH $$CHLT3 26$$ILLINT 26$$!!CH $$CHLT4 27$$ILLINT 27$$ DC A N ON A R L T M A P < : 3D T R X L 4P _ _ : 0715178182 2213 @s P
0x0ba6a8…0ba83c Dummy {f00=0x003b, f01=0x0190, f02=»G$$*$$ @x Pl @`|P @` P @` P @` P D B A W C A @s n : E A @s _ D A @s _ @a( @ P G A _2 : F A @ _@ L pR _ L p,0 ) $ ) I :' d !!CH $$ X:A$$ $$ 4R P Z T 5 _$ : 4P^R`
0x0ba83c…0ba9d0 Dummy {f00=0x003b, f01=0x0190, f02=» _ 4R T _ : 4R T $X R l _$ : A 0 ) A W W W W W # C C ( B RF : _( $ @ $ A !YYP$ !NNP !$$T L !## u W : u _x _ t W
0x0ba9d0…0bab64 Dummy {f00=0x003b, f01=0x0190, f02=»******************* P R D ! P ) _ _ : A _, ~ DTOSS TOSSWORK A T A X A A ` A d A h A l p t x | A A : A W ( -R _ : ( =R2 ( =
0x0bab64…0bacf8 Dummy {f00=0x003b, f01=0x0190, f02=» _ 4R T _ : 4R T $X R _$ :MOV ,/S,TOSSWORKINC ,TOSSWORK KPF /S,0 ASG /E0,TY10!!EN DATA 00!!DL LED KPF /O I/O ERROR SCR J 9 `r 8R T
0x0bacf8…0bae8c Dummy {f00=0x003b, f01=0x0190, f02=»'Z A( A(j A( A( A*r A' A ( A n A) A A A A A A A' A( A(l A( A( A! A! A# A# A$ A% A%| A&X A*t A' A) A A( @ P DR A @ @ A X A * A 0 A A 6> X @` P DR A * @` P DR A 0 X +~ , 1n @a T W
0x0bae8c…0bb020 Dummy {f00=0x003b, f01=0x0190, f02=» A B (W ! T R 4 Y : 7F 7R 8 6 @ *P @ SP NUT 1 A @ P @ SP NUT 1 A 2 A 4 @ < SP 1P AE A62 1 @ SP NUT A @ X @ SP 1P AE 7& L 00 @ @ *T A : @y T A > @y T A B
0x0bb020…0bb1b4 (0, 237) Dummy {f00=0x003b, f01=0x0190, f02=»CD01DRMS02DROD01DRTP03DRGP02DRAS01DRSL01DRTC01DRSOP1DRSOP1DRMT01DRTW01DRDU01DRLP01DRFD01DRMD01DRCD01 DM01DRCR01DRIC01000000DRDC07DRDC15DRDC17DRDC81DRDC82DRDCXXDRDCYYDRDC22DRDC13DRCC01 ******************** D R I V E R S ********************* D & Z
0x0bb1b4…0bb348 Dummy {f00=0x003b, f01=0x0190, f02=»+r+r+r +r+r+r+r+r+r+r+r+r RETURN CODE UPON RECOVERY : CUT/PERFORATE JOURNAL TAPE : SPECIAL CHARACTER /13 : SPECIAL CHARACTER /14 : COMPLETION OF REQUEST IF PRINT OBJECT IS REMOVED : END OF REQUEST WHEN SELECTOR UNIT OR PRINTER IS INACTIVE : ROOM
0x0bb348…0bb4dc Dummy {f00=0x003b, f01=0x0190, f02=»L CHARACTER /13 : SPECIAL CHARACTER /14 : COMPLETION OF REQUEST IF PRINT OBJECT IS REMOVED : INDICATION OF RECOVERY IN RETURN CODE (/80) : END OF REQUEST WHEN SELECTOR UNIT OR PRINTER IS INACTIVE : ROOMLESS POINT CODES : MMU BUFFER SIZE (BYTES) :
0x0bb4dc…0bb670 Dummy {f00=0x003b, f01=0x0190, f02=»ON OF READ REQUEST AT POWER ON : CIRCULAR INPUT BUFFER SIZE : CODE CONVERSION/8-BIT SETTING : NUMERIC SHIFT FUNCTION : KEYBOARD LOCK IF NO KEYLOCK ON : MMU BUFFER SIZE (BYTES) : MMU KEY TABLE SIZE : ROOMLESS POINT CODES : SPECIAL CHARACTER
0x0bb670…0bb804 Dummy {f00=0x003b, f01=0x0190, f02=»F TRAILING BLANKS : END OF REQUEST WHEN SELECTOR UNIT OR PRINTER IS INACTIVE : MMU BUFFER SIZE (BYTES) : ORDER,WRITE NUMERIC DISPLAY : MMU BUFFER SIZE (BYTES) : ORDER,WRITE PROGRAM DISPLAY : FLASH FUNCTION : LOGG FUNCTION FOR INPUT/OUTPUT
0x0bb804…0bb998 Dummy {f00=0x003b, f01=0x0190, f02=»S : SOFTWARE TIMEOUT HANDLING MISSING DATA REQUESTS FROM PRINTERS : 01 NUMBER OF CASSETTE DRIVES : ORDERS LOCK,ERASE AND REVERSE ONE BLOCK : MMU BUFFER SIZE (WORDS) : LOGG FUNCTION FOR INPUT/OUTPUT CHRS : NUMBER OF LOCAL CHANNEL UNITS : ACKUMU
0x0bb998…0bbb2c Dummy {f00=0x003b, f01=0x0190, f02=»EST FILE CODE : 01 KEYBOARD TIMEOUT : COMPLETION OF READ REQUEST AT POWER ON : MMU BUFFER SIZE (WORDS) : GRAPHIC MODE : ONLY 6344/46 : LOWER CASE CHARACTERS : ECHO OF EOR-KEY : SUPRESSION OF TRAILING BLANKS : CURSOR STEADY ON 6386/6385 (
0x0bbb2c…0bbcc0 Dummy {f00=0x003b, f01=0x0190, f02=»F DISC UNITS : UNPACKED DISC FORMAT (A2) : PACKED DISC FORMAT (A3) : 00 EXTRA SOP INPUT DWT : FLASH FUNCTION : RECIEVE BUFFER LENGTH : DC-TASK DATCOM FILE CODE : INTERRUPT LOGGING : POLL TIMEOUT VALUE : STATUS AND RVI HANDLING : READ
0x0bbcc0…0bbe54 (0, 238) Dummy {f00=0x003b, f01=0x0190, f02=» SPEED HIGH : SIEMENS MSV1 PROCEDURE : NUMBER OF RECEIVE BUFFERS : 00 PHYSICAL LINE NUMBER : IBM CHARACTER HANDLING : MESSAGE PASSING TO DC:TASK : IBM-3270 PACKAGE : MMU BUFFER SIZE (WORDS) : RECEIVE BUFFER LENGTH : DC-TASK DATCOM FILE CO
0x0bbe54…0bbfe8 Dummy {f00=0x003b, f01=0x0190, f02=»PHYSICAL LINE NUMBER : MMU BUFFER SIZE (WORDS) : NUMBER OF LINES : BSC PROCEDURE (ELSE SIEMENS MSV2) : EBCDIC CODE (IF NO ASCII) : EBCDIC TRANSPARANCY : BID TIME OUT VALUE : LOGG AREA LENGTH PER LINE : 00 PHYSICAL LINE NUMBER : 34 04 05
0x0bbfe8…0bc17c Dummy {f00=0x003b, f01=0x0190, f02=»NES : POLL LIST LENGTH : MAX BLOCK LENGTH : INTERRUPT LOGGING : RETRY LIMIT : 00 PHYSICAL LINE NUMBER : 34 04 05 06 07 32 33 35 36 37 38 MMU BUFFER SIZE (WORDS) : NUMBER OF LINES : POLL LIST LENGTH : INTERRUPT LOGGING : RETR
0x0bc17c…0bc310 Dummy {f00=0x003b, f01=0x0190, f02=»RECEIVE BUFFER LENGTH : DC-TASK DATCOM FILE CODE : PHYSICAL LINE NUMBER : MMU BUFFER SIZE (WORDS) : RECEIVE BUFFER LENGTH : DC-TASK DATCOM FILE CODE : PHYSICAL LINE NUMBER : MMU DEVICE BUFFER : RECEIVE BUFFER LENGTH : DC-TASK DATCOM FILE
0x0bc310…0bc4a4 Dummy {f00=0x003b, f01=0x0190, f02=»S. : 00 PHYSICAL LINE NUMBER : MMU BUFFER SIZE (WORDS) : RECEIVE BUFFER LENGTH : DC-TASK DATCOM FILE CODE : INTERRUPT LOGGING : NUMBER OF RECEIVE BUFFERS (2-4) : POLL TIME-OUT VALUE : 00 PHYSICAL LINE NUMBER : MMU BUFFER SIZE : LP ON
0x0bc4a4…0bc638 Dummy {f00=0x003b, f01=0x0190, f02=» 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 SIZE (BYTES) : MMU KEY TABLE SIZE : CR ON PROGRAMMED
0x0bc638…0bc7cc Dummy {f00=0x003b, f01=0x0190, f02=»ATION (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 SIZE (WORDS) : NATIONAL CHARACTER VARIATION (0-15) :
0x0bc7cc…0bc960 Dummy {f00=0x003b, f01=0x0190, f02=» : NUMBER OF DISC UNITS : READ AFTER WRITE : LOGG FUNCTION FOR INPUT/OUTPUT CHRS : NUMBER OF LOCAL CHANNEL UNITS : 01 LOGG FUNCTION FOR INPUT/OUTPUT CHRS : NUMBER OF LOCAL CHANNEL UNITS : 01 A/ W &P +r & + A,R 8R P &
0x0bc960…0bcaf4 (0, 239) Dummy {f00=0x003c, f01=0x0190, f02=» @q P 1XW @q T 0 W$ 0 W @s @s @{ @x @s P 1X 0 _ : @,R 4 A4 a4 _t 4R>" :Q [N A, W$ [N A, P , Z6T 5W _B : - R R P @D 5 P @D U P @D U @, D P P P
0x0bcaf4…0bcc88 Dummy {f00=0x003c, f01=0x0190, f02=» P : 4 0Q 0 A) : : _ > @, D / / 1 7 3, @ 7 T # R dR W ! 0| 0~ 0|P( R D D _ 00 D ^ 0| @D :HV. !YYT 1;BV 8W !NNT 0;BV : A2 _ PD !00Z !99Y @
0x0bcc88…0bce1c Dummy {f00=0x003c, f01=0x0190, f02=» dR _ _ @, D ! _ 4R [N A/ P T A4. A4- / A4,W@ 4 !SSPZ P T # R dR W ! P P A4, T A4. 4 W A4 3 W A4 4 A4 A4 A4( _ P A/ 4@ E : ! P@ .l @D !SSP& .l !NN .l @,
0x0bce1c…0bcfb0 Dummy {f00=0x003c, f01=0x0190, f02=» _f TL PH QB A0 A0 A0 D D ( - 0 D R - _ .@ .l @q P 5Z # @s P 5~ # @{ P 5 # @x P 5 # @s P 5 # @s P 6 # P 8 : 64 0 < : A : 3 @` P @
0x0bcfb0…0bd144 Dummy {f00=0x003c, f01=0x0190, f02=» 0 : A2 A2 A2 D ,,P <H .l .l 2 .l A2 @2 P @2 A2 .l X 17P 81P 82T @2 .lW @2 _ @2 _ <C 3L X Q 0 a2 @, A2 X 17T @2 A2 W 9B A2 @2 T A2 _ , @3L 5_ 9
0x0bd144…0bd2d8 Dummy {f00=0x003c, f01=0x0190, f02=»19 062021 072223 322627 332829 353233 363637 373839 384243 394647 EBCDIC LED EBCDIC!!DL 34,65!!DL 75,91!!CH $$EQU X:B$$EQU 0$$ !!CH $$ X:A$$ $$ !!CH $$ X:A$$ $$!!CH $$ X:A$$ $$ LED DVTKB : !!CH $$/2122,/2426,/3B3C,/3E40,/5E5F$$/ ,/
0x0bd2d8…0bd46c Dummy {f00=0x003c, f01=0x0190, f02=» 0 : A A A ,,P <H .l .l .l A @ P @ A .l X 17P 81P 82!!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 EQU 1$
0x0bd46c…0bd600 Dummy {f00=0x003c, f01=0x0190, f02=» T 6 : 6 @ KEP A A4 A4 A4( / 0 :DRKB03 LED DRKB03 @ PT 7 4 @(J SP CIT Q 0W @(J A B ( 7F ( 7R 8 :LED DVTOD @` T 7 :DRIC0X @ SP ECP 1P AE :DC : 7| : ( SP MMT
0x0bd600…0bd794 (0, 240) Dummy {f00=0x003c, f01=0x0190, f02=»R U Q P <H9D_( : : 9 5W : 9 @7 A, A, @7 A, : : 9 , ;v v Z P2 ; ; @y P B A; ; 8 @7 A, A, @7 A, @q P" TA A:& @s @s P TM A:P A:V A: T A: @x P TL
0x0bd794…0bd928 Dummy {f00=0x003c, f01=0x0190, f02=»x @yzP TO A:D : :l B : : Z 8 A: A:8 ;X A A4 0 @:2P 1 A4 3 8 A : : 7 0W @(J ( ( L K M - P R O C E S S O R S IMER TPROC MLKM DSEGTABORT MONTIM NTIM SSFM SSFM
0x0bd928…0bdabc Dummy {f00=0x003c, f01=0x0190, f02=»9050051 LED LKMAL P <H9D_(DELAY/DELAY AND ACTIVATION : ABORT FUNCTION : GET/SET TIME : LED LRPINT ; tl :LED TABORTATTACH/DETACH : LED TOSSIO!!CH $$ X:A$$ 1$$ @: A; @: A; @: A; @: A; @:&
0x0bdabc…0bdc50 Dummy {f00=0x003c, f01=0x0190, f02=»P A`V @`ZP A`Z M P E Id 7W DH E Id IX v Z PP 01 7 > `P E A> =vT _@ 7 @Ib Id AIb @62R ML C _h @LnPV AWp @IbP Id ALr ALn Lp E AIY 01 AIZ M T Dh
0x0bdc50…0bdde4 Dummy {f00=0x003c, f01=0x0190, f02=» A> (R> [N A> P" (P W T N 7 W > _D W W X B C , D _ L 4P 1 A> @Ib 7 Id 01 7 @L , 7 4 W V T1P G1P TPT, 1 0P 1T W A> / A> @> W A> AIb
0x0bdde4…0bdf78 Dummy {f00=0x003c, f01=0x0190, f02=» D DE = 01 W L @D > R *Pr_ 7 A P^ "T @ . 1T V SIT TF P, LD !,,T2 U, LD LD 9H # A _4 # AL : ?0 @D 7 A : V @D P KB L V MTT 0P C @ I 7 P& @D !,,
0x0bdf78…0be10c Dummy {f00=0x003c, f01=0x0190, f02=»P ?0 @D W @D $ @IbP E@ @D _D T :h" P 0R U Q P <H9D_( : ?0 M ?0 ? ?0 @D A 9H @D A A A ?0 V KBT$ bqP brP b6T L @62
0x0be10c…0be2a0 Dummy {f00=0x003c, f01=0x0190, f02=»D !NNP !YY ?0 W : M ?0 V W ?0 Bl ?0 B W : D 0 0R Q ; W : # +0 !99U :d" *0 !99U :H : T TP M T1 NH G1 NH D4 Nn D5 Nn MD N CD N TWP DUP FDT MVW MVW 7 V
0x0be2a0…0be434 (0, 241) Dummy {f00=0x003c, f01=0x0190, f02=» 8 : AC4 f Ae$ : @IZ aWp !99R ?0W AIZ : 1R Q : ?0 L "P. @ P , 7 B W AL : T SIT* @ . 1T" 7 @L P @L W 02 W AL : DEFINE TERMINAL DEVICE CLASSES DEFINE ECHO DEVICE CLASSES
0x0be434…0be5c8 Dummy {f00=0x003c, f01=0x0190, f02=»JxJ KN J<J<K K FILE CODE : DEVICE ADDRESS : PTS NUMBER : BACKSPACE KEY : CANCEL KEY : END OF RECORD KEY : MULTIPLE ZERO KEY : ECHO DEVICE : KEYBOARD TIME-OUT : CODE CONVERSION : ?<? APA@A@A@A@@R B B LB6BFT1
0x0be5c8…0be75c Dummy {f00=0x003c, f01=0x0190, f02=»
[…0x1…]
0x0be8f0…0bea84 Dummy {f00=0x003c, f01=0x0190, f02=» b2c1e1b3b1cBb4b6bqbr bAbBb2c1b3b4b6bqbr cBcQcRcDc c cF 20203000003010909090 000010100010101010 10101000202000 FILE CODE : DEVICE ADDRESS :
0x0bea84…0bec18 Dummy {f00=0x003c, f01=0x0190, f02=»MBER : NUMBER OF LINES : NUMBER OF CHARACTERS/LINE : KEYBOARD FILE CODE : PIN CHARACTER : DISPLAY FILE CODE : FILE CODE JOURNAL : DEVICE ADRESS : FILE CODE DOCUMENT :
0x0bec18…0bedac Dummy {f00=0x003c, f01=0x0190, f02=» LEVEL: ********* : LED DRTW01!!CH $$ X:F$$ / $$ b2c1e1b3b1cBb4b6bqbr bAbBb2c1b3b4b6bqbr cBcQcRcDc c cF M W M( Et $ ! P ) _ :END OF RECORD KEY : TRIPLE ZERO KEY : AE b6 : CO AE : 7 V W V W
0x0bedac…0bef40 Dummy {f00=0x003c, f01=0x0190, f02=» P W @D AD 0 AD @D : : @q C 7 W V W 0 W V W 2 W V W V W 1 W C 7 V W 0 W V W 1 W C 7 V W V W W : V W : A @z P V AS Id Sd 4 8R @ObV @LpP O Rx O X *0 T1P@
0x0bef40…0bf0d4 (0, 242) Dummy {f00=0x003c, f01=0x0190, f02=» AV _ / P Q$ AOb T _ ` AO AOb b Ud_ : 8R F_ P _ : AR AR AR Id9a R _ :H 00 00 AR AS R : A16 0 R : X P Id D@ 00 AS X Wf X NT2 @V 90R R V U U
0x0bf0d4…0bf268 Dummy {f00=0x003c, f01=0x0190, f02=»10T V W X AV X AV V X X W 1 AS$ !99U W 1 AS$ 40 Q W 1 AS$ Q 8 DIT : @V AV P AS& 1 AS$ X 90R V X 90R X Q X AS6 X AS8 S* X ASX X ASZ SL Q O T !99U AS#:h AS% @z P
0x0bf268…0bf3fc Dummy {f00=0x003c, f01=0x0190, f02=» U 10 AV _Z @ 0Tf P P " 9U AVb VR P P8 ! " R _ EV P AVL AV} AV~ V8 Vf A :LED DVT Q2Q$Q$Q P P QBQ P Q P Q !!CH $$DVT $$DV $$!!CH $$ECH$$DW $$!!CH $$/1111$$/ 000$$ !!CH $$BCA$$ $$
0x0bf3fc…0bf590 Dummy {f00=0x003c, f01=0x0190, f02=»
0x0bf590…0bf724 Dummy {f00=0x003c, f01=0x0190, f02=» !!DL 07 !!DL 29 DATA 1 !!CH $$2010$$0000$$ !!CH $$DATA /3F4F,/5F6F$$ $$
0x0bf724…0bf8b8 Dummy {f00=0x003c, f01=0x0190, f02=»B0 !!CH $$KBAD$$KBAD3$$!!CH $$0 CODE $$CTAB00 CODE $$ Id9a R _ :H 00 AV : 32 @ P" @ P W AWx 16 @ 4P X$ AWzW @ *P @ P W AWx : W~ : T E SWr0000000000 * W
0x0bf8b8…0bfa4c Dummy {f00=0x003c, f01=0x0190, f02=»00 : 4T : 3T 12 : 2T 08 : 1T 04 : 00 : _ a v Z P [ [N 0R _ _ W AY AY > X, D ( H <H% [h V2 ` A[l A[v [h _ A[l A[v _ A[l A[v Zn Y`rW E`P H !,,P
0x0bfa4c…0bfbe0 Dummy {f00=0x003c, f01=0x0190, f02=»s P" @` T @a @y P FD A` W DU A`| 1 A_ Y @a(P @` P Z0 @x Aa @` P$ 2 A_ Z0 @x A 4 Aq Aq Aq Aq @a Ph A . Aq Aq Aq Aq WP _ : Av| u @x Ax Ax A . 01 Ax Av| DW Ax x 8 : @`PP a* a `P ` $R T )
0x0bfbe0…0bfd74 (0, 243) Dummy {f00=0x003d, f01=0x0190, f02=» ` tl NU A ^ @a Q 00 A ^ A z A @y P 01 A ( : 09HR _ _ : F_ P F_ ^ : Z _ KB KEYBOARD TP TELLER TERMINAL PRINTER GP GENERAL PRINTER DN NUMERIC DISPLAY DI INDICATOR DISPLAY/KEYBOARD LAMPS DY VI
0x0bfd74…0bff08 Dummy {f00=0x003d, f01=0x0190, f02=»OPTICAL DOCUMENT READER T1 TELLER TERMINAL PRINTER (TP71) G1 GENERAL PRINTER AS LOCAL TERMINALS (PTS 8000) SL LOCAL AND REMOTE TERMINALS (PTS 8000) TC TAPE CASSETTE SI SOP INPUT SO SOP OUTPUT MT MAGNETIC TAPE UNIT TW
0x0bff08…0c009c Dummy {f00=0x003d, f01=0x0190, f02=»DGE DISC (80MB) CR CARD READER II INTERTASK COMMUNICATION 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 C
0x0c009c…0c0230 Dummy {f00=0x003d, f01=0x0190, f02=»RIVER DRDC22 D9 DATA COM DRIVER DRDC13 DEVICE ABBREVIATIONS DEFINE DEVICES : DC-DRIVER1 NAME,USERID : KBTPGPDNDIDYLTRT MSODT1G1ASSL TCSISOMTTWDULPFDMDCDDMCRIIIOD1D2D3D4D5D6D7D8D9
0x0c0230…0c03c4 Dummy {f00=0x003d, f01=0x0190, f02=»VTDY DVTMS DVTOD DVTT1 DVTG1 aX v Z T Aa W az v Z P Aa W Aa :KEYBOARD 6236/71/72 IN SYSTEM : ONLY KEYBOARD 6236/71/72 : @a @y P 01 A A! A" A&8 A& : ` $ ` P DC Aa( : DEVICE LIST (Y/N) :
0x0c03c4…0c0558 Dummy {f00=0x003d, f01=0x0190, f02=» b b < 7 :
0x0c0558…0c06ec Dummy {f00=0x003d, f01=0x0190, f02=»
0x0c06ec…0c0880 Dummy {f00=0x003d, f01=0x0190, f02=»ECIAL DEVICE-CLASSES FILE CODE FIXED DISC : UNIT NUMBER : FILE CODE CARTRIDGE DISC : FILE CODE : UNIT NUMBER : FILE CODE : INPUT FILE CODE : OUTPUT FILE CODE :
0x0c0880…0c0a14 (0, 244) Dummy {f00=0x003d, f01=0x0190, f02=» FILE CODE LEFT DISC : DISC UNIT NUMBER : FILE CODE RIGHT DISC : FILE CODE : LINE NUMBER : INPUT FILE CODE : LINE NUMBER : OUTPUT FILE CODE : FILE CODE :
0x0c0a14…0c0ba8 Dummy {f00=0x003d, f01=0x0190, f02=» Ahh A` @x P DM A` : L`r P T _ : @ . Al @ 4 Al @z T DW Am^ l @a(P @mH 4 k l md 8Rt X Am` KBT @l T Al CGT @l TL Al G1T @q T< Aq TPT @l T, Al T1T @l T Al UdT m T mL _x X P" mb
0x0c0ba8…0c0d3c Dummy {f00=0x003d, f01=0x0190, f02=» @s T W l mr l mj @mH 00 Al Am Am m @mH @l k / Am@ 0 T T1P* G1P$ MDP CDP DUP FDP TPP MTT T CGT @l TH Al 0 AmA AmB T nd DV Am@ T AmB @mJ AmD @mH UdT m m. 4^ m Al T T$ @l PT @a(
0x0c0d3c…0c0ed0 Dummy {f00=0x003d, f01=0x0190, f02=»T AmH mJ mr mb mr 00 Al Am Am Am T P AmJ Amb h S Al W Ajs Am_ Ud Al @x @s @s @yz @ Xl $ p l md o l 00 Al Am Am Am l mj m pP m 8 Ud_ :
0x0c0ed0…0c1064 Dummy {f00=0x003d, f01=0x0190, f02=» 0715178182 2213 ASM DC:TABLED TCLASS!!IL 11 DATA TC00TC00 DATA TC00E-* TC00E EQU * DATA +1Sd00 EXTRN DV 00!!IL 6!!IL 12 $ !99R % : LPPl MTPf MDP` CDPZ DMPT FDPN DUT PF 02WD D1
0x0c1064…0c11f8 Dummy {f00=0x003d, f01=0x0190, f02=» CDP FDP MTP DUT W X ! P Hl T Il W : AmC AmD m. : 00 Amb @` P n @` P n @` P n @` P n @` P n @` P n @ P q o : 07W 15W @ .W @ 4W 22W 13W Am` mL : @` P o @` P o @` P o @` P o
0x0c11f8…0c138c Dummy {f00=0x003d, f01=0x0190, f02=» .W @%B @ 4W Al /0 Am@ AmB nd DW Am@ @l AmB 00 AmD m. : @x @s @s @yzP@ @` Am`P pJ @` Am`P pJ @`| Am`P @ 0P pJ @` Am`P pJ : Amb mL : 01_ @x @s @s @yz @ q @` P> 01 q MD Aq Aq 0 F4 q 1 F5 q 2 F6 q 3 F7
0x0c138c…0c1520 Dummy {f00=0x003d, f01=0x0190, f02=»q 3 F3 q 01 q 0 F0 q 1 F1 q @` q 01 q FD Aq Aq 0 F8 q 1 F9 q 2 FA q 3 FB q : AmB /0 Am@ nd q : q : DATA DWDU01 Aq Aq : EXTRN DWREMU DATA /015 DATA DWREMU : : P A 4 v : : :w8 w
0x0c1520…0c16b4 (0, 245) Dummy {f00=0x003d, f01=0x0190, f02=» Iy Iy AwJ Av Az wL A { > X @D 82P UKP 68 0 @D H{ Z< P _ H{ Aa A{ W. A{ Ay W A{ Ay W A{ zh v Z P As M Ay# | v Z P As y| Ax P AS Aw A Ay# { v Z As x v Z P$ Ay @s T x W x
0x0c16b4…0c1848 Dummy {f00=0x003d, f01=0x0190, f02=» @x P W A { |Z { { @yzP { @x P A B A{ { 0 v tl WX @s @{ @s @x @q @s P0 t 4R(P 9 T Y T Y t 0 _0 :LED Aw Dv P @w _ A y w y B {" @` P {d
0x0c1848…0c19dc Dummy {f00=0x003d, f01=0x0190, f02=» y @y P y y$ y [N d @r A xp ( x| v Z P W^ > x Pv D ( 1 PH !,, D T$ DW @D T Ax DC @D T Ax @D Ax / 1 S Q Q _T x AZt x 8 W^_ :XV
0x0c19dc…0c1b70 Dummy {f00=0x003d, f01=0x0190, f02=»OC MSUBSTTMJOB OINT TASKTOSSIOSYSLDMSYSLDALDTASKDRSW01ST8000 PFTAB LKMAL CTABX TCLASSSCLASSMONTAB @ @s @ @q @s P 4R P 9 T Y T Y 0 _0 :LED A D P DC:TABIN:LT1IN:LT2IN:LT3IN:LT4IN:RT1IN:RT2IN:RT3IN:RT4 S Y S
0x0c1b70…0c1d04 Dummy {f00=0x003d, f01=0x0190, f02=»SYSGEN ENDEDEXTRA MONITOR MODULES : MOV LED DWDC00 DEBUGGER : INC DEBUG,TOSSWORK INC DEBUGM,TOSSWORK KPF /O INC SYSTABINC DEBUG LKE M ASG /02,LP0FSCR CREDIT APPLICATION : DATA MANAGEMENT : FILE MANAGEMENT :
0x0c1d04…0c1e98 Dummy {f00=0x003d, f01=0x0190, f02=»025026027028029030031032033034035036041042043044045046047048049 052053054055056057058059060061062063064065066067057058059060061 MEMORY MANAGEMENT UNIT : !!DL 20 !!DL 51 @a P P P W W A XW @z P z W @a(X : {| z z : {
0x0c1e98…0c202c Dummy {f00=0x003d, f01=0x0190, f02=»BXX EXTRN ITAD DATA ITAD !!IL 50 LED DSKSUB!!CH $$ X:A$$ 1$$ DSKSUB ****!!IL 19 { :TIODMX 050113101200s s$s s>s>s COMPUTER TYPE : SWAPPABLE WORK BLOCK HANDLING : DISC PAGING : L|0 :0102030405060708091011121314151617181920 @s @{ @s @
0x0c202c…0c21c0 Dummy {f00=0x003d, f01=0x0190, f02=» ~ | ~ , @ AD A A~ ~, @~ AD @~ AD ^ ;a B A~ ~, 0 A , } : A} A ,Wn @`|P A A @ 1T A @` A @` A @` P A A @* 1T A B @
0x0c21c0…0c2354 (0, 246) Dummy {f00=0x003d, f01=0x0190, f02=» @ r! B A~ ~, 0 A tl : : L~ R _ L~ ,0 ) $ ) I : :d B 9C :' d !!CH $$ X:A$$ $$ MAX BLOCK SIZE IN BYTES : MAX NUMBER OF DISC BLOCK BUFFERS : MAX NUMBER OF CURRENCY BUFFERS : MAX NUMBER
0x0c2354…0c24e8 Dummy {f00=0x003d, f01=0x0190, f02=» : LED DMBUF LED DFTAB !!CH $$F0F1,/F2F3$$F0F1$$ !!DL 22 DATA MANAGEMENT PARAMETERS LED DMFDB LED DMTASK!!DL 20 @ r! T A j @ * AD @ , AD B A~ ~, @ AD @ AD C A~ ~, D A~ @~ 9A ~, A A~ : : @ r! B A~ ~, @
0x0c24e8…0c267c Dummy {f00=0x003d, f01=0x0190, f02=» 00 A A A A : : A A @ r 1R @ ~ @ " 9a A~ @ @ : D 0 0R Q ; W : TIODMDMTASKDMINITDMOPCL DMBUF DMFDB DFTABDMSUBXADDMODDSUMODMPYMODDIVMODDMSUBR @yzP &
0x0c267c…0c2810 Dummy {f00=0x003d, f01=0x0190, f02=»ILE MANAGEMENT PARAMETERS NUMBER OF FILES FOR ALL TASKS : NUMBER OF FILES/TASK : LED DMOPCLLED FMTASKFMTASK DFTAB @`|P @ 1P @` P @` P @` P @* 1P ' M V M P
0x0c2810…0c29a4 Dummy {f00=0x003d, f01=0x0190, f02=»01010101000000000101010102020202 DATA /0000,/0000,/0000,/0000,/0000,/0000,/0000,/0000,/0000 /0000 DATA /0000,/0000,/0000,/0000,/0000,/0000,/0000,/0000,/0000,/0000 !!IL 29 !!IL 30 022023024025026027 | @D ?0 !NNPF !YY
0x0c29a4…0c2b38 Dummy {f00=0x003d, f01=0x0190, f02=» A : !::T <h !00R !77Q @ T( A @IZ A @ I A A : HD !,,T T> W& !00R4 !FFQ. !99U !AAR" P E B J : @ P A | ?0 @ I :LED CTABX 8-BIT SETTING : !!CH $$X$$
0x0c2b38…0c2ccc Dummy {f00=0x003d, f01=0x0190, f02=»010101010000 : @x P` v Z Y ( v Z Y V 2 " : @x P :PARTITION LENGTH IN BYTES ( HEXA ) : NUMBER OF PARTITIONS : !!CH $$ X:A$$ / $$ !!CH $$ X:B$$ $$ D 0 !00R !FFQ !99U !AAR -
0x0c2ccc…0c2e60 Dummy {f00=0x003d, f01=0x0000, f02=»
0x0c2e60…0c2ff4 (0, 247) Opaque[0x194]
0x0c2ff4…0c3188 # DirEnt {nam=»SUP60M«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x07c0, f03=0x0000}
0x0c2ff4…0c3188 IdxSect {
0x0c2ff4…0c3188 f00 = 0x003e // 0xc2ff4 @0x0
0x0c2ff4…0c3188 f01 = 0x0010 // 0xc2ff6 @0x2
0x0c2ff4…0c3188 gno = [ // 0xc2ff8 @0x4
0x0c2ff4…0c3188 [0x00]: C0x003e.0x0.0
0x0c2ff4…0c3188 [0x01]: C0x003e.0x1.0
0x0c2ff4…0c3188 [0x02]: C0x003e.0x2.0
0x0c2ff4…0c3188 [0x03]: C0x003e.0x3.0
0x0c2ff4…0c3188 [0x04]: C0x003f.0x0.0
0x0c2ff4…0c3188 [0x05]: C0x003f.0x1.0
0x0c2ff4…0c3188 [0x06]: C0x003f.0x2.0
0x0c2ff4…0c3188 [0x07]: C0x003f.0x3.0
0x0c2ff4…0c3188 ]
0x0c2ff4…0c3188 }
0x0c3188…0c331c Dummy {f00=0x003e, f01=0x0190, f02=»T >Zt R : Z | D )v _ H&2& ' ' ' )
0x0c331c…0c34b0 Dummy {f00=0x003e, f01=0x0190, f02=»
0x0c34b0…0c3644 Dummy {f00=0x003e, f01=0x0190, f02=» T $ r > 22V4" C6 !&" ? > 2V BTRY= AS>(AB? & TY J) V jLP + r DK J DK 8 J
0x0c3644…0c37d8 Dummy {f00=0x003e, f01=0x0190, f02=» r * ? ? ? ? ? ? ? , Z f Z f D Z f
0x0c37d8…0c396c Dummy {f00=0x003e, f01=0x0190, f02=» ? ? ? ? ? ? ? Qj ? ? ? ? ? ? ? Qj ? ? ? ? ? ? ? ^ Qj ? ? ? ? ? ? ? Qj V t r r r r 0
0x0c396c…0c3b00 Dummy {f00=0x003e, f01=0x0190, f02=» 6 6 6 6 6
0x0c3b00…0c3c94 (0, 248) Dummy {f00=0x003e, f01=0x0190, f02=» 6 6 6 h
0x0c3c94…0c3e28 Dummy {f00=0x003e, f01=0x0190, f02=»
[…0x4…]
0x0c4478…0c460c Dummy {f00=0x003e, f01=0x0190, f02=» ~
0x0c460c…0c47a0 Dummy {f00=0x003e, f01=0x0190, f02=»
[…0x1…]
0x0c4934…0c4ac8 Dummy {f00=0x003e, f01=0x0190, f02=» X
0x0c4ac8…0c4c5c Dummy {f00=0x003e, f01=0x0190, f02=»
[…0x3…]
0x0c5118…0c52ac Dummy {f00=0x003e, f01=0x0190, f02=» @
0x0c52ac…0c5440 Dummy {f00=0x003e, f01=0x0190, f02=» _ ? ? ? ? ? ? ? A R2 @ A A R$ A A R A A R A @ > > > > > > > > ? ? ? ? ? ? ? U ^ ( H ( P ? _ Q 4&? ?R _ 5 H _ ^ ;j >P @ * Q 9A D *P _ P A
0x0c5440…0c55d4 (0, 250) Dummy {f00=0x003e, f01=0x0190, f02=» E > > a @ E @ ? ? > P P Q P ! P @ @ @ P W $ < A @ 9a:a R0 & Q Q" ?A <P @ ! " _ $ _ _ 0 ! A T @ W @ R (P& P
0x0c55d4…0c5768 Dummy {f00=0x003e, f01=0x0190, f02=» E $ @ ;a=a R @ =a V ;A , P = - - _F @! L ? 0 A @ PR 0=a @ ?a RX @ ?a VN=A 0 ( P>P< , T T 1W 1W T )W )W ( , _ C $ _ 5 H A" A" A" A" A" A" A# A" " # D
0x0c5768…0c58fc Dummy {f00=0x003e, f01=0x0190, f02=» @" _ A" A" A" A" A" A" B A# A" B :a Y B R A" _ @" # W4 @" A" ,Xp _ < @ A# A# A# A# A# A# A# # =a @ >a V _ @ >a Y A# A# 4 T # ( "^ 5 U P" @
0x0c58fc…0c5a90 Dummy {f00=0x003e, f01=0x0190, f02=» A A ^ 9j =Q > > > > > > > > P @ !@ &" @ P @ X0 , &" A _< U` A% @ , L ? ? , L L L L L L ? ? ? ? ? ? ? @ Px @ > > > > > > > ; [ [ [ [ [ [
0x0c5a90…0c5c24 Dummy {f00=0x003e, f01=0x0190, f02=»_ T PT PJV P>V SH? V :!9 V @ P R W ;A [ [ : _4 Pj T Pf V Q UF V Ud Q4P P 9A?A:AV R Z _ P*R R P ;A [ [
0x0c5c24…0c5db8 Dummy {f00=0x003e, f01=0x0190, f02=» Q S W S Q R S P W S _ R _ ;A [ [ : # P| ' PL (T ; R <a V 9A:A ; V ; V V W V < V < V H T P R ;H [ [ : _ T P ; R4 < S ( _ _ W < R $ <A
0x0c5db8…0c5f4c Dummy {f00=0x003e, f01=0x0190, f02=»; RJ P 0 9 T ^ T V T Z U x : R Q ;H [ [ : _J ? ? ? ? ? ? ? Q _ ^ ( H F ) W *x W * X I I R P8 X C P C$T Y Y W x Y Y $ 0T W W /X X ? ? ? ? ? ? ? **
0x0c5f4c…0c60e0 Dummy {f00=0x003e, f01=0x0190, f02=» 0 ? ? ? ? ? ? ? * 0 ? ? ? ? ? ? ? * 0 (@_~ . X R Y _ X D $! TR ? ? ? ? ? ? ? + 1 8 M ? ? ? ? ? ? ? +8 0 % > > > > > > > > ? ? ? ? ? ? ? +d 1 P X 0 0 +| - 8 TRT X . - $ <A
0x0c60e0…0c6274 (0, 251) Dummy {f00=0x003f, f01=0x0190, f02=» 0 X C P C$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 Q Q W W Q Q R P Q 5 Y + ? ? ? ? ? ? ? , 1 Qv , - " PF X Q< X P P ? ? ? ? ? ?
0x0c6274…0c6408 Dummy {f00=0x003f, f01=0x0190, f02=» ? ? - 0 Y Y X X T ? ? ? ? ? ? ? - 0 > > > > > > > > ? @ ? > X B A- B (@ $ X X W W $ # C C P L L m A , DKP L X X L ! X L P L @ _ C C # $ _R _
0x0c6408…0c659c Dummy {f00=0x003f, f01=0x0190, f02=» % Y X R X . ! X Y T T Y Y Y Y Y U U X @ _ X X X X P/x/ / 0*/ P $ Y Y Y Y > - Y 8 TPP" X R 8 TYX WH H/ Y _8 X X: X R X ( _$ _* $ XtRX P Y _
0x0c659c…0c6730 Dummy {f00=0x003f, f01=0x0190, f02=» Y Z(P A0 ZrP Y _8 _< _@ ! - X M A0 T Rf - X X B A0 P X $ /X_" B W B W A W I W J X %?W X %? A1. A12 > > > > > > > 10 V <a W X ' ?A q A1 > > > > >
0x0c6730…0c68c4 Dummy {f00=0x003f, f01=0x0190, f02=» L % T< L P4 M ^ L X 4 _ ? ? ? ? ? ? ? L W L R % _R ^ 1 A M " L '? L U "T 9 WP T 9 WF T 9 2 3X2 2 3X3X2 2 2 2 3X2 2 5n W* 6 W" 5n W 8 L :AR| M W M M 4
0x0c68c4…0c6a58 Dummy {f00=0x003f, f01=0x0190, f02=»: L P L 9JR@ P P T : 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 ' 0 P p Y "(@ P P $ M 3j P ( M P Q P P P W P
0x0c6a58…0c6bec Dummy {f00=0x003f, f01=0x0190, f02=» % ] M (@ L 2 :x T 2R Q @ 2] : > 9C 9C > ^ U 2(@ L T U U U M L M L M M L 4 3j L :x ! :c:A :x L T V P T"W L >F :x L & :x 5n M 4 4 M L M L " P M 5 3j M
0x0c6bec…0c6d80 Dummy {f00=0x003f, f01=0x0190, f02=»! P L ! XfWn L M L M M 6 3j L :c:A L D V D M L ! T*_ L < :x< R M M "W 6 M 4 4 L E M L "! :x L 2 L T L P L D Q 7 M 2 5 L L $:BV W $:AV M " M :b L L $ M 0 D L
0x0c6d80…0c6f14 (0, 252) Dummy {f00=0x003f, f01=0x0190, f02=» (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 : L :x L U 8 M 2 5 L M $ L M & L L I P0% P L
0x0c6f14…0c70a8 Dummy {f00=0x003f, f01=0x0190, f02=»_ M M L . P M . 9 M 2 5 L U 9 M 2 5 L L L & ) L $ I L M L L U M : @ M L M M M W L :x @ M M ( L P0W" M L :x @ M ( L U :& M 2 5 L L ( E L % E L E L E
0x0c70a8…0c723c Dummy {f00=0x003f, f01=0x0190, f02=» U L ( L L ? ? ? ? ? ? ? A A @ 4 R W 7 A Q ; ; ; ; ; @ : 5 ; ( "^ ; ( "^ 5 < $ @< b 4T W b b H bP H d _ A; ; A@ 5 T6 @@ P @ ; ; ; ; ; @@ A@ A; $ 5 4 X
0x0c723c…0c73d0 Dummy {f00=0x003f, f01=0x0190, f02=»_ M M L . P M . 9 M 2 T < 0P < Y _ 1 X 1 < < W8 < < X W* 8 A< T A= = (@( - - : 0 :R - Y PU,DNXX,STAT,RY < U 5 Af ? ; < 1P < Y _ @< RDP A
0x0c73d0…0c7564 Dummy {f00=0x003f, f01=0x0190, f02=» 0!? LT W 1 Q TKP MTT Y P ; Y (@ ; P Q 1 ; . X X ? ? ? ? ? ? ? >& 14_ 5 Af ; @ Q P P T Z ; W P ; $>H $ NOT W0 Af @ p ! $ rT tP Y ; C r C R
0x0c7564…0c76f8 Dummy {f00=0x003f, f01=0x0190, f02=»@ P$ @? = ^ ] ] @? _ A@ $ ? > A _ = A 0 9U A> > T > ( "^ ? = A @ A @ !? A @ _* 5 @@ ; @ A ; 0 A A@ A@ @ ( "^ @ A $ < )v A ~(@ A
0x0c76f8…0c788c Dummy {f00=0x003f, f01=0x0190, f02=» Y Y Y P ABR ( Qh Q P( @ @ @ @ Y Y Y Y " A "; V W # @ A A@ @ ? ? > Q @ ? ? ? ? ? ? ? AX ? P6 $ R, Z R R Q $ :D P $ R ^& : ; R
0x0c788c…0c7a20 Dummy {f00=0x003f, f01=0x0190, f02=» @A @A @A @A @A @A A ? ? ? ? ? ? ? A $ < A B @ 9a:a R @ @BR @ ! #J ! 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 :E
0x0c7a20…0c7bb4 (0, 253) Dummy {f00=0x003f, f01=0x0190, f02=» D I I "R (@(@ ^ :j >Z ^ @ P _ A M (@ 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
0x0c7bb4…0c7d48 Dummy {f00=0x003f, f01=0x0190, f02=» /P :P ;P <P =P >P ?P 1 C* 8 C*Wv EJW C$W EVW C W W ElW Wx 8 MTPp DYPj X T Y $ WZ E WX $ # T $ T Y B W0 %@ R b " Y Y Y Y Y $ X _0 8 TCX< TKXB MTXH DYXN ^
0x0c7d48…0c7edc Dummy {f00=0x003f, f01=0x0190, f02=»% XT <A P X^<a P @ p @ $ XP $^ ? AI AI AI AI AI AI AI I > > > > > > > aI @I E E E E E E I > > aI @I E @I @I @I @I @I @I @I I Q (@ T W@ &_T@ H P
0x0c7edc…0c8070 Dummy {f00=0x003f, f01=0x0190, f02=»W. X P X ` `T 8 P X 8 T T ^ T "<A U U ^ T x U Z T X T Z ? ? U X: V: T T ^ T ` T b T f T h j l n p r t v T d >" HI AI T T ^ T ` T b T f T h j l n p r t v T d AI > ?f' _ 8
0x0c8070…0c8204 Dummy {f00=0x003f, f01=0x0190, f02=»% XT <A P X^<a P @ p @ $ XP $^ ? A A A A A A A > > > > > > > a @ E E E E E E > > a @ E @ @ @ @ @ @ @ Q (@ T W &_T H P
0x0c8204…0c8398 Dummy {f00=0x003f, f01=0x0190, f02=» L LR X P P P P . B . @J P M L 0 AJ I0 !K B !L X X ! P L y !LtW !L L x P !L0 M Q W ! P M L ZZ LR B Y K AJ 1 - B :e L P !L0 M Q !Lf B !L !L L x P2 x X$ M L
0x0c8398…0c852c Dummy {f00=0x003f, f01=0x0190, f02=»T" K L :C* WL WH:a L ! 9A r X L :B* W":a L ! 9A r X L :B L !? B M AI2 L 0 I0 M Y B AI$ I4 Y X P P P P P P8 K !Q AI B T B @I4 ) @I6 I @I8 I K 4 B AI ! T h AI" M !
0x0c852c…0c86c0 Dummy {f00=0x003f, f01=0x0190, f02=» T$ B S @I T !Q @Id AI ! P W K B <b :b ^ AI AI AI R>P AI AI !O| AI"W& !O| AI"R !O| W !O| AI"P AI"V !O| !O| _ P& AI"R Ql !O| Wb !O| !O| WP !O| !O| W> B <e
0x0c86c0…0c8854 (0, 254) Dummy {f00=0x003f, f01=0x0190, f02=» @I ! P W Y AI" & B Y K @I :e L Pv !L0 M Q !Lf !Q, @I ! P L PP !L " T" L @I4P<W !L " T L @J P$ M L Q !Lp_Z M Q K T X $ P@ D R: P @I ! P !P T D $ !QT @I ! T L AJ !P W !P T D R@
0x0c8854…0c89e8 Dummy {f00=0x003f, f01=0x0190, f02=» M L Z2 K 4 !Q" @I ! P !L " T W( !L " P M L 6 K @J L 4 @I L " P $ M 4 @I$ I4 ( = Y 4 @I$ I4 < ) Y 4 X ! J $ <b! L !? P L ! _ @I2 L T !L0 L 9AV$ !L0 M Q A @ M
0x0c89e8…0c8b7c Dummy {f00=0x003f, f01=0x0190, f02=» !LtW !Lt" P M L ZJ K 4 @ _ X X X X $ PR R R S S % P Y Y Y >% X 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
0x0c8b7c…0c8d10 Dummy {f00=0x003f, f01=0x0190, f02=» P V % P Y X XT Q _ R Q R 0DKER UNIT CYLD STAT S T* - T T4W2 T TB X W$ T TN W T ( X = 0 :R # Y ; ; ? 0 :R 9 Y 9 9 : : :
0x0c8d10…0c8ea4 Dummy {f00=0x003f, f01=0x0190, f02=» D D E E ] @ E @ Ur ? ? > ? ? ? ? ? ? ? X C ( "^ @X V U T " P " P @X W C "& # ( "^ | A @X @X @X @X <h @X % @X @X X X f [ [ [ [ [ [ [
0x0c8ea4…0c9038 Dummy {f00=0x003f, f01=0x0190, f02=» > > >WZ | A ^ T " T0 ! P W SY SD AD _ ! P _, J _2 X # C ( "^ P X X X X CCT I T P Q _, AX _V LM X A $ AX X L 9 !? AW AW AW AW AW AW J AW
0x0c9038…0c91cc Dummy {f00=0x003f, f01=0x0190, f02=» T A A A @ ~ Xj A ~ @Xr A ~ @ Zh( : A A "^ @ (@_0 $ ( , 0 4 8 < X T " P " P @ W C "& # ( "^ | A @ @ @ @ <h @ % @ @ f [ [ [ [ [ [ [
0x0c91cc…0c9360 Dummy {f00=0x003f, f01=0x0190, f02=» > > >W | A ^ T " T ! P W SY SD AD _ ! P _, J _2 # C ( "^ P CCT I T DOS - PTS 6000 REL. 10.01 80-09-29 Z< , L 9 !? AW AW AW AW AW AW J AW
0x0c9360…0c94f4 (0, 255) Opaque[0x194]
0x0c94f4…0c9688 # DirEnt {nam=»OBDIR «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x0800, f03=0x0000}
0x0c94f4…0c9688 IdxSect {
0x0c94f4…0c9688 f00 = 0x0040 // 0xc94f4 @0x0
0x0c94f4…0c9688 f01 = 0x0008 // 0xc94f6 @0x2
0x0c94f4…0c9688 gno = [ // 0xc94f8 @0x4
0x0c94f4…0c9688 [0x00]: C0x0040.0x0.0
0x0c94f4…0c9688 [0x01]: C0x0040.0x1.0
0x0c94f4…0c9688 [0x02]: C0x0040.0x2.0
0x0c94f4…0c9688 [0x03]: C0x0040.0x3.0
0x0c94f4…0c9688 ]
0x0c94f4…0c9688 }
0x0c9688…0c981c Dummy {f00=0x0040, f01=0x000c, f02=»800421 P TTB:MT SCTMMPL SCTNPE SCTMMC SCTLAC MMDDIV MOVEN M:REL LDALEN SAVE20 CONVRT SCTSWB~ SAVE25S SAVE260 SAVE27 SAVE28V SAVE12V T T:CLO 800421 T:SETT I:EVA0 I:RT1 T:GETT I:ER1
0x0c981c…0c99b0 Dummy {f00=0x0040, f01=0x0190, f02=» ZFMOVE 800421 FMOVE I:EVA0 I:ERR2 I:EVA5 I:ER18 I:RT1 4 FTYPET 800421 TYPET I:EVA0 I:ERR2 I:RT1 >ICLEAR 800421 ICLEAR I:EVA0 I:RT1 $ >EMPTYT 800421 EMPTYT
0x0c99b0…0c9b44 Dummy {f00=0x0040, f01=0x0190, f02=» I:ERR2 I:MOV T:GRFC T:ROK T:STOU 800421 STROU1 T:STEV T:LOFS I:EVA0 T:LOPS I:ER17 I:ERR2 T:DUPX T:GRFC T:ROK T:RNOK JT:STEV 800421 T:STEV T:GRFC I:EVA0 I:ERR2 <
0x0c9b44…0c9cd8 Dummy {f00=0x0040, f01=0x0190, f02=»:CLR2 T:CLIT T:EKEY T:DYKI 800421 T:DYKI I:EVA7 T:CASP T:CLRD T:EKEY T:RCR T:IOER B T:CLR1 P T:CLR2 ^ T:SCUW T:BELL T:IOWR T:CLIT T:LOFS I:EVA0 T:LOPS T:CLMI T:PM1 @ T:GRFC
0x0c9cd8…0c9e6c Dummy {f00=0x0040, f01=0x0190, f02=» I:MOV T:RCR T:REWR T:RCTS ` T:DUPL 800421 T:DUPL T:GRFC I:EVA0 I:ERR2 T:RNOK T:ROK T:DUPX T:LOFS T:LOPS I:MOV h T:GETC 800421 T:GETC T:GRFC I:ER14 I:EVA0 I:ERR2 I:RT1
0x0c9e6c…0ca000 Dummy {f00=0x0040, f01=0x0190, f02=» T:TSTC T:GRFC I:ER14 T:RTES < T:TFWD 800421 T:TLEF T:TRIG T:TLDO T:TDOW T:TUP T:TFWD T:TBWD T:THOM " T:GRFC T:TABE T:SCR2 T:TABC T:TABN x T:DISP 800421 T:PRIN
0x0ca000…0ca194 (0, 256) Dummy {f00=0x0040, f01=0x0190, f02=»:CLDY T:WRDY T:EDIO v T:GETF 800421 T:GETF I:ER14 T:TABC T:TABN T:GTIT 0 T:GRFC T:GTIP @ I:EVA0 I:EVA2 I:ER15 I:ERR2 T:REWR 800421 T:IOWR T:SCUW T:CLRD * T:REWR 0 T:C
0x0ca194…0ca328 Dummy {f00=0x0040, f01=0x0190, f02=»0 I:EBRI I:EBRB I:EBR I:ECWC I:EXIT I:EFLA T:DNL T:TINP T:TKI T:DSL I:EXPY T:TABC ( T:TABD , T:TABE 0 T:EDWI I:EVT I:EDSK T:GRFC T:ENIN T:LOPS T:EDWF I:ER16 T:SCR2 . T:SCUR T:TABN T:RCR
0x0ca328…0ca4bc Dummy {f00=0x0040, f01=0x0190, f02=» I:EFLA T:PINP T:PKI I:EFIL I:ESKI I:EXPY T:DSL ( T:GRFC T:DNL 6 T:WRDY I:ENL I:ESL I:ECTR I:ER16 T:ENIN T:EINP ) 800421 T:PKI T:PINP T:GRFC I:ETAB I:EVIN I:ECTR T:EVOU T:TINP T
0x0ca4bc…0ca650 Dummy {f00=0x0040, f01=0x0190, f02=»NI T:LOFS I:EGTB T:WRDY I:EVA0 I:EVA1 I:ECPY T:EVOU X I:EVI I:EVA3 I:EPIC `T:SETC 2 800421 T:SETC T:GRFC T:EDWI T:RCTS T:SCUR T:WRDY & ,T:CLMI 3 800421 T:CLMI ( T:AT
0x0ca650…0ca7e4 Dummy {f00=0x0040, f01=0x0190, f02=» @ T:WRDY H T:EDIO T:CLDY l bT:LSEG 6 800421 T:LSEG T:CSEG I:ER1C I:RT1 T:LOFS D T:LOPS P d lT:DC00 8 800421 T:FDS0 DCREAD T:DCR1 DCWRTE T:DCW1 DCEXCH T:DCE1 6T:SWI0
0x0ca7e4…0ca978 Dummy {f00=0x0040, f01=0x0190, f02=» 800421 T:SETT SETTIM T:GETT GETTIM 4T:DEL0 < 800421 T:DELA DELAY 6T:GTI0 = 800421 T:GETI GETTID T:DC > 800421 T:DCRE T:FDSP T:DCR1 T:DCWR T:DCW1 T:E
0x0ca978…0cab0c Dummy {f00=0x0040, f01=0x0190, f02=»21 T:TEST T:FDSP I:RT1 T:ABOR T:KIAA T:KIAC B FT:DEL B 800421 T:DELA I:EVA0 I:ERR I:RT1 $ DT:MSK0 C 800421 MASK I:EVA0 I:RT1 I:ERR ( zT:SCD D 800421 T:ACTV P:BAS
0x0cab0c…0caca0 Dummy {f00=0x0040, f01=0x0190, f02=» P:MTAB T:UERR B I:RT0 H RT:UNUS I 800421 T:UNUS I:ERR4 P:MTAB I:RT1 T:UERR ,T:EXIT K 800421 T:EXIT ZT:GTCW L 800421 T:FDSP GETCW I:EVA0 T:BINB T:GTCW I:RT1 $ FT:
0x0caca0…0cae34 (0, 257) Dummy {f00=0x0040, f01=0x0190, f02=»:CLOS . T:COMM @ I:EVA0 I:RT1 T:RSTA X T:SCW2 T:IO3 j ~T:DMR P 800421 T:DREA T:REAX T:SCW2 T:IO3 T:IREA T:IO2 T:XREA T:IXID I:EVA2 , T:DMW R 800421 T:SWRI T:WRIX T:IO4 T
0x0cae34…0cafc8 Dummy {f00=0x0040, f01=0x0190, f02=»CW2 T:IO3 T:CDIS T:IDIS $ T:WRIX H rT:DMPO U 800421 T:DPOS T:FDSP T:SCW2 T:GTBY T:IO4 T:IPOS T:WRIX T:IXID 2 JT:IO V 800421 T:KI T:NKI T:WRIT T:LWRI T:WRIX " T:WRIO &
0x0cafc8…0cb15c Dummy {f00=0x0040, f01=0x0190, f02=» < T:IO2 @ T:IO3 D T:IO4 H I:ER19 T:IO5 Z T:IORE ^ T:GCW2 T:GTCW I:RT1 T:IOEN T:EDWR I:EDW T:EDWE T:EDWF T:EDWI I:ERR T:EDIO 0 T:KIPR L I:EVA7 I:ERR5 T:FDS0 T:FDSP T:GDSP P:MTAB I:E
0x0cb15c…0cb2f0 Dummy {f00=0x0040, f01=0x0190, f02=»:EVA2 T:SCW0 T:BCDB $ T:GTCW I:ERR2 T:BINB T:KIAA T:KIAC T:GCW2 T:SCW2 T:ADIT b 800421 T:RREA T:FDSP T:RRE1 I:EVA0 T:STCW I:ERR T:IO2 T:RWRI : T:RWR1 > T:IO1 v T:KI
0x0cb2f0…0cb484 Dummy {f00=0x0040, f01=0x0190, f02=»UF g 800421 T:ABUF PWRITEL h 800421 WRITEL T:FDS0 I:EVA0 T:IO2 I:ERR lI:NTP j 800421 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 I
0x0cb484…0cb618 Dummy {f00=0x0040, f01=0x0190, f02=» I:RT1 I:TRB I:RT0 I:TRA0 I:ERR T:BAT T:PAT T:CAT I:EVB U I:EVA p 800421 P:MTAB I:EVA2 I:EVA1 I:EVA3 $ I:EVA6 ( I:EVA5 . I:EVA7 2 I:EVA0 T:LOFS T:LOPS I:ERR9 I:ERRA I:FML I:EVT
0x0cb618…0cb7ac Dummy {f00=0x0040, f01=0x0190, f02=» I:CMP I:ERR1 I:CPA x *I:CPA y 800421 I:CPA | >I:MOV z 800421 I:MOV I:MVC I:ERR8 tI:MUL } 800421 I:MUL I:ERR2 I:ERR1 I:ERR9 I:MOV I:NTFA I:SUB I:ADD I:SH1L z
0x0cb7ac…0cb940 Dummy {f00=0x0040, f01=0x0190, f02=» 6 ,I:NTF 800421 I:NTFA 8 I:EDT 800421 I:EVT B I:EGTD I:EVA2 I:EVA5 I:EVB I:EGTB I:EVI I:EVA3 I:EVA0 I:EVNO I:EPIC I:ESKI I:EBRI I:EBRB I:EBR I:EINH I:EKIH I:EDSK z I:EDT I
0x0cb940…0cbad4 (0, 258) Dummy {f00=0x0040, f01=0x0190, f02=» I:EXPY * I:ECTR < I:ESL F I:ENL P I:EOR f T:EDWF I:ECW p T:EDWE I:ECWC z I:EFIL I:SCB I:ERRD RI:EPIC 800421 I:EPIC I:EVA0 I:ERRD I:SCB I:ERRE I:EDTE 800421 I:EKIH I:E
0x0cbad4…0cbc68 Dummy {f00=0x0040, f01=0x0190, f02=» I:EGTB <I:EDS 800421 I:EDS I:EVS2 I:ED1 & vI:STR 800421 I:DLT I:EVS1 I:MCH " I:INS ~ I:EVS2 I:ERR I:CPY I:XCP I:MVC P TI:EVS 800421 I:EVA0 I:EVS1 I:EVA2
0x0cbc68…0cbdfc Dummy {f00=0x0040, f01=0x0190, f02=»:EVA0 I:HEXW I:TRB I:NTPR I:PRT I:ERR 800421 I:ERR0 I:ERR1 I:ERR2 I:ERR3 I:ERR4 I:ERR5 I:ERR6 I:ERR7 I:ERR8 I:ERR9 $ I:ERRA ( I:ERRB , I:ERRC 0 I:ERRD 4 I:ERRE 8 I
0x0cbdfc…0cbf90 Dummy {f00=0x0040, f01=0x0190, f02=»A h I:ER1B l I:ER1C p I:ERR t I:NTR I:BUF I:HEXB I:ECB I:PRT TC:ERR I:NTPR F BI:HEX 800421 I:HEXB I:HEXW I:HEX " LI:CHK 800421 I:CHK P:BAS P:END TC:CHK I:ERR 8 TRACHK
0x0cbf90…0cc124 Dummy {f00=0x0040, f01=0x0190, f02=»T TC:ABT TB:ABT TC:RDC TB:RDC TC:ERR TT:MSG P:MTAB ~ TRATAB 800421 TT:TON TT:TRP TT:LOP @ TT:TRS B TT:VON TT:VER TT:VMM @ TT:HLT TT:PRC TT:TID TT:SNO TT:MSG
0x0cc124…0cc2b8 Dummy {f00=0x0040, f01=0x0190, f02=»TRS TT:TON TT:LOP TT:HLT I:TRC TT:VER TT:VMM TT:VON SYSLOD 800421 NUMSEG PRGLG1 SYSBAS SYSLODK SCTSFA SCTIPL SCTANO SCTADAL bREL SCTOPT TABBE SCTMSZ| SCTEFA ERROR SAVE09 SAVE0
0x0cc2b8…0cc44c Dummy {f00=0x0040, f01=0x411e, f02=»MEND SCTLAP TTB:MT SCTMMPL SCTNPE SCTMMC SCTLAC MMDDIV MOVEN M:REL LDALEN SAVE20 CONVRT SCTSWB~ SAVE25S SAVE260 SAVE27 SAVE28V SAVE12V T T:CLO 800421 T:SETT I:EVA0 I:RT1 T:GETT I:ER1
0x0cc44c…0cc5e0 Dummy {f00=0x0040, f01=0x0190, f02=» > l : 'rR %~ W n V pT : N V l W H V ]" . nT" % W v % W n V ~P +2 W x % + 'P % _v V d , V % P _ N L % V d V f G G U % G : ' P %~ 'rV ' : % % V ~P
0x0cc5e0…0cd280 (1, 0) DirGranule ((1, 0)) {
0x0cc5e0…0cd280 DirEnt {nam=»INT:PR«, typ=»OD«, f00=0x0000, f01=0x0000, f02=0x0820, f03=0x0000}
0x0cc5e0…0cd280 DirEnt {nam=»/OBJCT«, typ=»OB«, f00=0x019a, f01=0x0196, f02=0x0828, f03=0x0008}
0x0cc5e0…0cd280 }
0x0cd280…0cd414 (1, 1) Opaque[0x194]
0x0cd414…0cd5a8 # DirEnt {nam=»/OBJCT«, typ=»OB«, f00=0x019a, f01=0x0196, f02=0x0828, f03=0x0008}
0x0cd414…0cd5a8 IdxSect {
0x0cd414…0cd5a8 f00 = 0x0041 // 0xcd414 @0x0
0x0cd414…0cd5a8 f01 = 0x002e // 0xcd416 @0x2
0x0cd414…0cd5a8 gno = [ // 0xcd418 @0x4
0x0cd414…0cd5a8 [0x00]: C0x0041.0x1.0
0x0cd414…0cd5a8 [0x01]: C0x0041.0x2.0
0x0cd414…0cd5a8 [0x02]: C0x0041.0x3.0
0x0cd414…0cd5a8 [0x03]: C0x0042.0x0.0
0x0cd414…0cd5a8 [0x04]: C0x0042.0x1.0
0x0cd414…0cd5a8 [0x05]: C0x0042.0x2.0
0x0cd414…0cd5a8 [0x06]: C0x0042.0x3.0
0x0cd414…0cd5a8 [0x07]: C0x0043.0x0.0
0x0cd414…0cd5a8 [0x08]: C0x0043.0x1.0
0x0cd414…0cd5a8 [0x09]: C0x0043.0x2.0
0x0cd414…0cd5a8 [0x0a]: C0x0043.0x3.0
0x0cd414…0cd5a8 [0x0b]: C0x0044.0x0.0
0x0cd414…0cd5a8 [0x0c]: C0x0044.0x1.0
0x0cd414…0cd5a8 [0x0d]: C0x0044.0x2.0
0x0cd414…0cd5a8 [0x0e]: C0x0044.0x3.0
0x0cd414…0cd5a8 [0x0f]: C0x0045.0x0.0
0x0cd414…0cd5a8 [0x10]: C0x0045.0x1.0
0x0cd414…0cd5a8 [0x11]: C0x0045.0x2.0
0x0cd414…0cd5a8 [0x12]: C0x0045.0x3.0
0x0cd414…0cd5a8 [0x13]: C0x0046.0x0.0
0x0cd414…0cd5a8 [0x14]: C0x0046.0x1.0
0x0cd414…0cd5a8 [0x15]: C0x0046.0x2.0
0x0cd414…0cd5a8 [0x16]: C0x0046.0x3.0
0x0cd414…0cd5a8 ]
0x0cd414…0cd5a8 }
0x0cd5a8…0cd73c Dummy {f00=0x0041, f01=0x4110, f02=» > @ IDENT FMOVE P,REL=10.0,800314,870136941000 FMOVE F FMOVE V I:EVA0 h I:EVA5 z , ( B & + P I:RT1 _ P (
0x0cd73c…0cd8d0 Dummy {f00=0x0041, f01=0x40cc, f02=» > @ IDENT TYPET P,REL=10.0,800314,870136941000 TYPET F TYPET V I:EVA0 h I:RT1 z ( $ D ;d # + @ :RT1 RETURN TO INTERPRETER P END @
0x0cd8d0…0cda64 Dummy {f00=0x0041, f01=0x40fc, f02=» > @ IDENT ICLEAR P,REL=10.0,800314,870136941000 ICLEAR F ICLEAR X I:EVA0 l I:RT1 ~ , ( @ #0 0T ' ' _ T $ @
0x0cda64…0cdbf8 Dummy {f00=0x0041, f01=0x411c, f02=» > @ IDENT EMPTYT P,REL=10.0,800314,870136941000 EMPTYT F EMPTYT X I:EVA0 l , ( @ #0 0T & ! T ~ I:RT1 , ( P & ! X T C T T !P
0x0cdbf8…0cdd8c Dummy {f00=0x0041, f01=0x0190, f02=» > @ IDENT T:STIN P,REL=10.0,800314,870136941000 STRIN1 F STRIN1 X T:STEV l , ( @ X x & Y " X R W ~ T:RNOK T:LOFS , ( P _ Y $ I:E
0x0cdd8c…0cdf20 Dummy {f00=0x0041, f01=0x4116, f02=» h , ( u R W V R W V I:MOV 8 T:GRFC H , ( % _ " D $ D Z T:ROK & " @ X $ X y & 8 4 R W 'P [ eP gW2 wR {W V R W V
0x0cdf20…0ce0b4 (1, 2) Dummy {f00=0x0041, f01=0x0190, f02=» > @ IDENT T:STOU P,REL=10.0,800314,870136941000 STROU1 F STROU1 X T:STEV l T:LOFS ~ * & @ X x & Y " I:EVA0 T:LOPS , ( !0P <
0x0ce0b4…0ce248 Dummy {f00=0x0041, f01=0x40fe, f02=»R W V r T:DUPX T:GRFC $ , ( y & Y $ 8 " X X 6 T:ROK f T:RNOK v $ x ( y $ 4 0 1P< ;T( AT GW$ WP cW mW wP R W V, @ !0P <
0x0ce248…0ce3dc Dummy {f00=0x0041, f01=0x40f4, f02=» > @ IDENT T:STEV P,REL=10.0,800314,870136941000 T:STEV F T:STEV X T:GRFC l I:EVA0 ~ , ( H Y Y & ( : & @ P RTN PS P I
0x0ce3dc…0ce570 Dummy {f00=0x0041, f01=0x0190, f02=» > @ IDENT T:EDFL P,REL=10.0,800314,870136941000 T:EDFL F T:EDFL X T:PM1 l T:PM2 | T:CASP , ( I Y ( x P Y * , ( x y W X " T:DUPX
0x0ce570…0ce704 Dummy {f00=0x0041, f01=0x0190, f02=» , ( w V X ( x C T:SCUW 4 , ( ( Y * X Y , X F , ( X C & C C v T:IOER , ( ( B P 9 R 9 X , ( !@P X X * b ) Y *
0x0ce704…0ce898 Dummy {f00=0x0041, f01=0x0190, f02=» B U C Q C D T:CLR1 * T:CLR2 < , ( mP X X * $" ~_> @ Y N , ( X * _R X !@XX y X # ~ , ( x V y X X * P , ( P 1 _ 1 X * X
0x0ce898…0cea2c Dummy {f00=0x0041, f01=0x4148, f02=» X n T:CLIT T:EKEY , ( C $ " P y _ x T 2 , ( a@ X H X X * , )$ b P _ : H D !T P d )Wv 9 T UP m d yV& Ph R^ PP #P =T QU [Q e r g t 4 0 i k m
0x0cea2c…0cebc0 Dummy {f00=0x0041, f01=0x0190, f02=» > @ IDENT T:DYKI P,REL=10.0,800314,870136941000 J F " T:DYKI T:PM1 T:PM2 T:CLR1 T:CLIT T:CLR2 T:IOER T:EKEY T:BELL F T:DYKI I:EVA7 , ( @ ' Y y , ( x C y X
0x0cebc0…0ced54 (1, 3) Dummy {f00=0x0041, f01=0x0190, f02=»:CLRD , ( C Q " T X , ( ! X X ! x Y~ Y > , ( _ X "@P B R y C B n , ( P 9 V _F9 V X ! T X !@ T:EKEY , ( X y C _d y C C X
0x0ced54…0ceee8 Dummy {f00=0x0041, f01=0x0190, f02=» _$ _ y z T:CLR2 ^ T:SCUW . * & Y @_6 x X@ X X # @ , ( u C _. B ]d P C n , ( Q X8_H x XD @ Y c C y , ( XR X x x T:BELL
0x0ceee8…0cf07c Dummy {f00=0x0041, f01=0x0190, f02=» T:LOFS I:EVA0 T:LOPS , , ( @H ( ( > T:CLMI n , ( #H : B C _J + T:PM1 @ T:GRFC , ( ? . X 9 V ! P @ Y T
0x0cf07c…0cf210 Dummy {f00=0x0041, f01=0x409a, f02=» @ v YTf a eR k B uT y Q T , P R P V 8 4 VV T P #Q( S P Q8 , 3 < MV SP H @ C _J + T:PM1 @ T:GRFC , ( ? . X 9 V ! P @ Y T
0x0cf210…0cf3a4 Dummy {f00=0x0041, f01=0x0190, f02=» > @ IDENT T:UPDF P,REL=10.0,800314,870136941000 T:UPDF F T:UPDF X T:GRFC l T:LOFS ~ I:EVA0 , ( @ 2! Y " T:LOPS I:MOV , ( A
0x0cf3a4…0cf538 Dummy {f00=0x0041, f01=0x4032, f02=» =T P @ .870136941000 T:UPDF F T:UPDF X T:GRFC l T:LOFS ~ I:EVA0 , ( @ 2! Y " T:LOPS I:MOV , ( A
0x0cf538…0cf6cc Dummy {f00=0x0041, f01=0x018e, f02=» > @ IDENT T:DUPL P,REL=10.0,800314,870136941000 T:DUPL T:DUPX F T:DUPL ` T:GRFC t I:EVA0 T:RNOK T:ROK T:DUPX , ( HB X T:LOFS
0x0cf6cc…0cf860 Dummy {f00=0x0041, f01=0x4052, f02=» UD : CT OV $ ` <@ N:DUPX F T:DUPL ` T:GRFC t I:EVA0 T:RNOK T:ROK T:DUPX , ( HB X T:LOFS
0x0cf860…0cf9f4 (1, 4) Dummy {f00=0x0042, f01=0x4140, f02=» > @ IDENT T:GETC P,REL=10.0,800314,870136941000 T:GETC F T:GETC X T:GRFC l I:EVA0 ~ , ( @ 2' R P P X I:RT1 , ( ' ' X _ X ' _ X '? ;
0x0cf9f4…0cfb88 Dummy {f00=0x0042, f01=0x4124, f02=» > @ IDENT T:GETA P,REL=10.0,800314,870136941000 T:GETA F T:GETA X T:GRFC l I:EVA0 ~ T:RNOK T:ROK , ( H X ' X ! T:RCR H
0x0cfb88…0cfd1c Dummy {f00=0x0042, f01=0x410e, f02=» > @ IDENT T:TSTC P,REL=10.0,800314,870136941000 T:TSTC F T:TSTC X T:GRFC l , ( @ X " 9b! X :c 2" ~ T:RTES $ H @ % , 4 @
0x0cfd1c…0cfeb0 Dummy {f00=0x0042, f01=0x0190, f02=» > @ IDENT T:TFWD P,REL=10.0,800314,870136941000 D @ T:TLEF T:TRIG T:TLDO T:TDOW T:TUP T:TFWD T:TBWD T:THOM F T:TLEF T:TRIG T:TLDO T:TDOW T:TUP T:TFWD T
0x0cfeb0…0d0044 Dummy {f00=0x0042, f01=0x411a, f02=» Y 4 Y n T:TABE , ( ? 2 Y 69h Q X :h Y 0 W T:SCR2 P T:TABC b T:TABN t * & ] U X Q W Y 0 w 8 4 W W W W W W !W IQ YW ]U eQ kW
0x0d0044…0d01d8 Dummy {f00=0x0042, f01=0x0190, f02=» > @ IDENT T:DISP P,REL=10.0,800314,870136941000 T:PRIN T:DISP T:ERAS F T:PRIN h T:FDSP | T:EDWI T:GRFC T:GTIP , ( D 9H Y * T:DISP
0x0d01d8…0d036c Dummy {f00=0x0042, f01=0x0190, f02=» T:TABD , ( U P P Y +W Y + , ( u@ W T W Q W @ , ( Y + U Q P p T:TABC , ( BW W Y ( C T:RNOK I:RT1 * &
0x0d036c…0d0500 Dummy {f00=0x0042, f01=0x411c, f02=» 2] X 8 Y 0 : X 0 :H* , ( ' : X 2T Y 2 : C 1 & T:EDIO V E B ] : h H D ! W !W GP2 KR UP [P cW^ g 8 s * yWL }T * W> Q W , ( U Q P W W P /T
0x0d0500…0d0694 (1, 5) Dummy {f00=0x0042, f01=0x0190, f02=» > @ IDENT T:GETF P,REL=10.0,800314,870136941000 T:GETF T:GTIT T:GTIP F T:GETF h T:TABC | * & X +! U 9K Y ( Y + T:TABN T:GTIT $ T:GRFC T:GTIP 4 , (
0x0d0694…0d0828 Dummy {f00=0x0042, f01=0x4040, f02=» U 6 2 : $ U ^ *@ < T:GETF T:GTIT T:GTIP F T:GETF h T:TABC | * & X +! U 9K Y ( Y + T:TABN T:GTIT $ T:GRFC T:GTIP 4 , (
0x0d0828…0d09bc Dummy {f00=0x0042, f01=0x0190, f02=» > @ IDENT T:REWR P,REL=10.0,800314,870136941000 . * T:REWR T:SCUW T:CLRD T:IOWR T:CASP F T:IOWR x T:SCUW , ( C ( C : T:CLRD * T:REWR 0 , ( ! C B
0x0d09bc…0d0b50 Dummy {f00=0x0042, f01=0x4148, f02=» D : K + Q | I:EVA3 ! I:EPIC ! . , ( } 2 P P ! @ T:LOPS ! p , ( ( B X # V : ! I:EVA0 ! I:ECPY ! I:EVI ! ( $ $ _0
0x0d0b50…0d0ce4 Dummy {f00=0x0042, f01=0x0190, f02=» > @ IDENT T:DEDT P,REL=10.0,800314,870136941000 " . * T:TABC T:TABD T:TABE T:TABN T:SCR2 " F I:EVNO " x I:ESKI " I:EVA0 " I:EBRI " I:EBRB " I:EBR " , (
0x0d0ce4…0d0e78 Dummy {f00=0x0042, f01=0x0190, f02=» " z T:DSL # I:EXPY # * T:TABC ( # < T:TABD , # P T:TABE 0 # d , ( ! W W X 0Q # x T:EDWI # I:EVT # , ( 9 Y ( Y *P # I:EDSK #
0x0d0e78…0d100c Dummy {f00=0x0042, f01=0x0190, f02=» T:LOPS # , ( V _` " P T & $ , ( (W " P Y 0] Y (_t $ B T:EDWF $ r * ( " X _. * X *# P B $ , ( 1 *W " P X X$ C $ T:SCR2 $ T:SCUR $ * &
0x0d100c…0d11a0 Dummy {f00=0x0042, f01=0x40a0, f02=» Y ( : X (;n . $ H D ! +W /W 7Q ; ? KP Qp P P: Vp P4 T WT P P W % P P +W 3T 7W % j T % @ % P B $ , ( 1 *W " P X X$ C $ T:SCR2 $ T:SCUR $ * &
0x0d11a0…0d1334 (1, 6) Dummy {f00=0x0042, f01=0x0190, f02=» > @ IDENT T:ENLI P,REL=10.0,800314,870136941000 & T:DNL T:DSL & F I:EVNO & I:ECPY & n I:EPIC & I:ETXT & I:ETAB & I:EBRI & I:EBRB & I:EBR & * &
0x0d1334…0d14c8 Dummy {f00=0x0042, f01=0x0190, f02=» & I:ESKI ' . I:EXPY ' @ T:DSL ( ' R T:GRFC ' d T:DNL 6 ' v , ( ! " $ Y . Y ,W ' , ( 9 $ Y . X ( X ." P X 0R T ' T:WRDY ' , ( W Y *P
0x0d14c8…0d165c Dummy {f00=0x0042, f01=0x4166, f02=» Q Y *T , : " P X 0U ' , ( X *# P P T " T : ( , T:ENIN ( , ( Y . . Y ( $ ( n , ( Y *T " T ! 1 W ! ) , ( : ( H D ! 6 # ( 5W KPV QRz ST$ [P aU
0x0d165c…0d17f0 Dummy {f00=0x0042, f01=0x0190, f02=» > @ IDENT T:EINP P,REL=10.0,800314,870136941000 ) " T:PKI T:PINP T:TKI T:TINP ) F T:PKI ) l T:PINP ) ~ T:GRFC ) I:ETAB ) I:EVIN ) , ( I P & ) , ( Y *T
0x0d17f0…0d1984 Dummy {f00=0x0042, f01=0x018e, f02=» & V D ! P $ ) | T:TINP * T:TKI * 0 , ( u ! P %_ : V * B , ( Y " X .9H $ P * r , ( & X ( " Q Y +Q R " P W * , ( " U Y , " Q X . X 0R P * , (
0x0d1984…0d1b18 Dummy {f00=0x0042, f01=0x0190, f02=» , ( O X # :! R W T @ Y + T:ENIN + 4 T:ENI + F I:EXIT + V , ( o (W Y , W Y ( + h , ( @ : X *:h X (! # P X & V + , ( L T W X , X 0P T + , ( X *:h
0x0d1b18…0d1cac Dummy {f00=0x0042, f01=0x0190, f02=»Y + , ( ) Y 8 & X 8 X $ W _ , , ( G " P X ( T X & V H "@T , : * & g P V Y X (P , j T:CLMI , , ( X (P , , ( 8 Y 0 X 2P X 0V _z ,
0x0d1cac…0d1e40 Dummy {f00=0x0042, f01=0x0190, f02=» : : "0 , | , ( P $ T W %T : : - , ( = Y ( X $ Y X " Y X & Y X < - L , ( ] Y @ : Y : X : X ( - | , ( { T X & V H " V Y : X - T:CLDY - ! $ X :
0x0d1e40…0d1fd4 (1, 7) Dummy {f00=0x0042, f01=0x4108, f02=»P %P ) -P< 1 : - ^ H D ! 3WZ CP< EQ MP2 [R$ ]W a : e iT$ qW W P Tb W P@ . H D !$ T, T : P P* # 'P| CWh KP UT eTF i mP6 P b P . f < 8 P V T P P P #T 'W +T }T V . . @ .
0x0d1fd4…0d2168 Dummy {f00=0x0042, f01=0x0190, f02=» > @ IDENT T:ENIN P,REL=10.0,800314,870136941000 / T:ENIN T:ENI T:EVOU / F T:ENIN / f T:ENI / z , ( X Y " X Y $ X Y & X @W X / T:LOFS / , ( ! < Y = " / I:EGTB
0x0d2168…0d22fc Dummy {f00=0x0042, f01=0x0190, f02=» X (P / n T:WRDY 0 , ( W X & V D ! P @ W X 0 , ( W Y ( : X , Y X $ Y 0 P , ( X &T Y Y Y W V $ 0 , ( :H D Y D :H Y ! P V 0 I:EVA0 0 I:EVA1 0 , (
0x0d22fc…0d2490 Dummy {f00=0x0042, f01=0x411a, f02=» 0 , ( Q : 2' " P T 1 I:EVA3 1 8 I:EPIC 1 J , ( mD W : N : 1 H D ! W CT IW SP a mT" }T W4 W, P W" P W W T WD 1 ( $ P W )P /W A X aP gT qW 1
0x0d2490…0d2624 Dummy {f00=0x0042, f01=0x4144, f02=» > @ IDENT T:SETC P,REL=10.0,800314,870136941000 2 T:SETC T:SCUR 2 F T:SETC 2 ` T:GRFC 2 t T:EDWI 2 T:RCTS 2 T:SCUR 2 , ( A C 2 T:WRDY 2
0x0d2624…0d27b8 Dummy {f00=0x0042, f01=0x40e2, f02=» > @ IDENT T:CLMI P,REL=10.0,800314,870136941000 3 T:CLMI 3 F T:CLMI 3 X , ( "0P ' Q W ' 3 l ! Y : 3 P Q W 3 ( 3 @ 3 A2,0 PCLRM20 EQU * P SCR
0x0d27b8…0d294c Dummy {f00=0x0042, f01=0x0190, f02=» > @ IDENT T:ATTF P,REL=10.0,800314,870136941000 4 J F " T:ATTF T:DETF T:ROK T:RNOK T:RCR T:RCTS T:RTES T:GRFC T:WRDY 4 F T:CLDY 4 T:DETF 4 T:ATTF 4 I:EVA6 4 I:FFSN 4 , ( W
0x0d294c…0d2ae0 Dummy {f00=0x0042, f01=0x4100, f02=» < V E B 4 ~ T:RNOK < 5 T:GRFC @ 5 2 T:WRDY H 5 F T:EDIO 5 Z * & ; X _ v : C C 5 l T:CLDY 5 $ Y @ : C : 5 @ W @ 5 l 5 @ 5 W
0x0d2ae0…0d2c74 (1, 8) Dummy {f00=0x0043, f01=0x0190, f02=» > @ IDENT T:LSEG P,REL=10.0,800314,870136941000 6 & " T:LOFS T:LOPS T:LSEG T:CSEG 6 F T:LSEG 6 p T:CSEG 6 , ( ( R : V E V D ' 6 , ( ! $ T ( W P 6 I:RT1 6
0x0d2c74…0d2e08 Dummy {f00=0x0043, f01=0x401a, f02=» f 7 @ 7 G P,REL=10.0,800314,870136941000 6 & " T:LOFS T:LOPS T:LSEG T:CSEG 6 F T:LSEG 6 p T:CSEG 6 , ( ( R : V E V D ' 6 , ( ! $ T ( W P 6 I:RT1 6
0x0d2e08…0d2f9c Dummy {f00=0x0043, f01=0x4146, f02=» > @ IDENT T:DC00 P,REL=10.0,800314,870136941000 8 DCREAD DCWRTE DCEXCH 8 F T:FDS0 8 h DCREAD 8 z T:DCR1 8 DCWRTE 8 T:DCW1 8 DCEXCH 8 T:DCE1 8 , ( I$
0x0d2f9c…0d3130 Dummy {f00=0x0043, f01=0x40aa, f02=» > @ IDENT T:SWI0 P,REL=10.0,800314,870136941000 9 SWITCH 9 F T:SWIT 9 X SWITCH 9 j @ 9 ~ 9 @ 9 ~ . P* CREDIT ASSEMBLER SUBROUTINE ENTRIES * . P*
0x0d3130…0d32c4 Dummy {f00=0x0043, f01=0x40da, f02=» > @ IDENT T:TEI0 P,REL=10.0,800314,870136941000 : TESTIO ABORT : F T:TEST : ^ TESTIO : p T:ABOR : ABORT : H : : @ : . P*
0x0d32c4…0d3458 Dummy {f00=0x0043, f01=0x40de, f02=» > @ IDENT T:CLO0 P,REL=10.0,800314,870136941000 ; SETTIM GETTIM ; F T:SETT ; ` SETTIM ; r T:GETT ; GETTIM ; H ; ; @ ; . P*
0x0d3458…0d35ec Dummy {f00=0x0043, f01=0x40a6, f02=» > @ IDENT T:DEL0 P,REL=10.0,800314,870136941000 < DELAY < F T:DELA < V DELAY < h @ < z < @ < * ~ . P* CREDIT ASSEMBLER SUBROUTINE ENTRIES * . P*
0x0d35ec…0d3780 Dummy {f00=0x0043, f01=0x40aa, f02=» > @ IDENT T:GTI0 P,REL=10.0,800314,870136941000 = GETTID = F T:GETI = X GETTID = j @ = ~ = @ = ~ . P* CREDIT ASSEMBLER SUBROUTINE ENTRIES * . P*
0x0d3780…0d3914 (1, 9) Dummy {f00=0x0043, f01=0x0190, f02=» > @ IDENT T:DC P,REL=10.0,800314,870136941000 > 6 2 T:DCRE T:DCR1 T:DCWR T:DCW1 T:DCEX T:DCE1 > F T:DCRE > T:FDSP > T:DCR1 > T:DCWR > T:DCW1 > T:EDIO > , ( @@ /
0x0d3914…0d3aa8 Dummy {f00=0x0043, f01=0x40ca, f02=»:EVA0 > , ( 7 ' / C ? , ( Q$ C ? > & " k &P C & C : ? n V W V 1 V ? ? @ ? T:DCW1 > T:EDIO > , ( @@ /
0x0d3aa8…0d3c3c Dummy {f00=0x0043, f01=0x40b6, f02=» > @ IDENT T:SWI P,REL=10.0,800314,870136941000 @ T:SWIT @ F T:SWIT @ X I:RT1 @ l ( @ | @ @ @ E LEVEL P* PT:SWIT EQU * P LDK A7,0 " P SU PP,CSB,TCA GET
0x0d3c3c…0d3dd0 Dummy {f00=0x0043, f01=0x4174, f02=» > @ IDENT T:TEI P,REL=10.0,800314,870136941000 A T:TEST T:ABOR A F T:TEST A ` T:FDSP A t I:RT1 A T:ABOR A * & @ "R V I A T:KIAA A , ( ( T
0x0d3dd0…0d3f64 Dummy {f00=0x0043, f01=0x40d0, f02=» > @ IDENT T:DEL P,REL=10.0,800314,870136941000 C T:DELA C F T:DELA C X I:EVA0 C l I:RT1 C ~ ( $ @ ( C C @ C RY * P LDK WK1,2 NOT BINARY; SET ERROR CODE P
0x0d3f64…0d40f8 Dummy {f00=0x0043, f01=0x40cc, f02=» > @ IDENT T:MSK0 P,REL=10.0,800314,870136941000 D MASK D F MASK D V I:EVA0 D h I:RT1 D z ( $ D V D D @ D TYPE? P RF(NZ) MSK010 NOT BINARY P XIF P
0x0d40f8…0d428c Dummy {f00=0x0043, f01=0x0190, f02=» > @ IDENT T:SCD P,REL=10.0,800314,870136941000 E T:ACTV T:PAUS T:RSTR E F T:ACTV E h , ( 2 ;B P J E | P:BAS E I:NTPB E , ( ! T ( E T:BAT E
0x0d428c…0d4420 Dummy {f00=0x0043, f01=0x4074, f02=» & F : ( E w F & ( P0 #T + X ?W4 I X WW F : x F ^@ F p
0x0d4420…0d45b4 (1, 10) Dummy {f00=0x0043, f01=0x0190, f02=» > @ IDENT T:USE P,REL=10.0,800314,870136941000 G T:USE T:UERR G F T:USE G ^ I:EVA0 G p * & 2 & >A >A 2 $ G P:MTAB G , ( & V D 9a 9 V G , ( =D @ W @ (
0x0d45b4…0d4748 Dummy {f00=0x0043, f01=0x4186, f02=» ( 9 8 G , ( ? X Q , V H " , ( ( - 4T H R , ( V 5 ( W V P H , ( W U V X 9T I H T:UERR > H I:RT0 H
0x0d4748…0d48dc Dummy {f00=0x0043, f01=0x0190, f02=» > @ IDENT T:UNUS P,REL=10.0,800314,870136941000 I T:UNUS I F T:UNUS I X , ( 2 ' >A >A 2 $ V I l P:MTAB I , ( ! L ;a ; R @ ( 8 ? I , ( ? X Q ( V )<B I
0x0d48dc…0d4a70 Dummy {f00=0x0043, f01=0x4012, f02=» I @ J T:UNUS P,REL=10.0,800314,870136941000 I T:UNUS I F T:UNUS I X , ( 2 ' >A >A 2 $ V I l P:MTAB I , ( ! L ;a ; R @ ( 8 ? I , ( ? X Q ( V )<B I
0x0d4a70…0d4c04 Dummy {f00=0x0043, f01=0x4096, f02=» > @ IDENT T:EXIT P,REL=10.0,800314,870136941000 K T:EXIT K F T:EXIT K X ( K l K @ K KM P DATA 3 P* P END @ LDKL A6,-1 P ABL T:UERR END @ P ADR
0x0d4c04…0d4d98 Dummy {f00=0x0043, f01=0x4138, f02=» > @ IDENT T:GTCW P,REL=10.0,800314,870136941000 L GETCW L F T:FDSP L V GETCW L h I:EVA0 L z T:BINB L , ( H "$ P B B L T:GTCW L I:RT1 L $ W L
0x0d4d98…0d4f2c Dummy {f00=0x0043, f01=0x40cc, f02=» > @ IDENT T:GTID P,REL=10.0,800314,870136941000 M T:GETI M F T:GETI M X I:EVA0 M l I:RT1 M ~ $ @ V G 9h ' M M @ M VALUE " P SC WK1,1,OP2A STORE FOR USER P SRL WK1
0x0d4f2c…0d50c0 Dummy {f00=0x0043, f01=0x018e, f02=» > @ IDENT T:DM P,REL=10.0,800314,870136941000 N & " T:OPEN T:CLOS T:COMM T:RSTA N F T:OPEN N p T:FDSP N , ( @ # 9 2! P T N T:WRIO N T:IO2 N T:CLOS . N , (
0x0d50c0…0d5254 (1, 11) Dummy {f00=0x0043, f01=0x4090, f02=» T:RSTA X O T:SCW2 O T:IO3 O * ( $ W C O : P T O f j O z@ O , ( @ # 9 2! P T N T:WRIO N T:IO2 N T:CLOS . N , (
0x0d5254…0d53e8 Dummy {f00=0x0043, f01=0x018c, f02=» > @ IDENT T:DMR P,REL=10.0,800314,870136941000 P & " T:DREA T:IREA T:XREA T:IXID P F T:DREA P p T:REAX P T:SCW2 P T:IO3 P T:IREA P T:IO2 P , ( $ P
0x0d53e8…0d557c Dummy {f00=0x0043, f01=0x4008, f02=»@ Q IDENT T:DMR P,REL=10.0,800314,870136941000 P & " T:DREA T:IREA T:XREA T:IXID P F T:DREA P p T:REAX P T:SCW2 P T:IO3 P T:IREA P T:IO2 P , ( $ P
0x0d557c…0d5710 Dummy {f00=0x0043, f01=0x0190, f02=» > @ IDENT T:DMW P,REL=10.0,800314,870136941000 R 6 2 T:SWRI T:DWRI T:IWRI T:DREW T:CREW T:IREW R F T:SWRI R T:WRIX R T:IO4 R T:DWRI R T:SCW2 R , ( / / R
0x0d5710…0d58a4 Dummy {f00=0x0043, f01=0x40fc, f02=» 5D / C R , ( O ( B B @ C S , , ( o ( ( B B S , ( C C ( C S T:IO5 S C S S @ S / R
0x0d58a4…0d5a38 Dummy {f00=0x0043, f01=0x4182, f02=» > @ IDENT T:DMDI P,REL=10.0,800314,870136941000 T T:DDIS T:CDIS T:IDIS T F T:DDIS T h T:FDSP T | T:SCW2 T T:IO3 T T:CDIS T , ( $ C <H / T T:IDIS $ T
0x0d5a38…0d5bcc Dummy {f00=0x0043, f01=0x4168, f02=» > @ IDENT T:DMPO P,REL=10.0,800314,870136941000 U T:DPOS T:IPOS U F T:DPOS U ` T:FDSP U t T:SCW2 U T:GTBY U T:IO4 U , ( H@ C <H / U T:IPOS U T:WRIX
0x0d5bcc…0d5d60 Dummy {f00=0x0043, f01=0x0190, f02=» > @ IDENT T:IO P,REL=10.0,800314,870136941000 V J F " T:WRIT T:READ T:SREA T:KI T:NKI T:EDWR T:DSC0 T:DSC1 T:DSC2 V F H D ! T:EDWE T:EDWF T:EDWI T:EDIO T:XSTA T:WAIT T:IO1 T:IO2 T:IO3 V J F " T:IO4 T:IO5 T:FDS0 T:FDSP T:GDSP T
0x0d5d60…0d5ef4 (1, 12) Dummy {f00=0x0044, f01=0x0190, f02=»:WRIT V T:LWRI W , ( W / W $ T:WRIX " W T T:WRIO & W h I:EVA0 W | , ( ! _ P <H W T:SREA B W T:READ B W T:REAX J W , ( ? :
0x0d5ef4…0d6088 Dummy {f00=0x0044, f01=0x018e, f02=» C C J ' W 781" W T:DSC2 X " , ( &$ 39#$;< '()*+,-! X 6 T:XSTA X f , ( P _D B X z T:WAIT X T:MWAI X * & @ 'W ( W X , (
0x0d6088…0d621c Dummy {f00=0x0044, f01=0x0190, f02=» X T:IO4 @ Y T:IO5 L Y T:IORE P Y , , ( 5 C C C ( ' P Y @ T:GCW2 Y p , ( U P "! P W B % P Y T:GTCW Y I:RT1 Y T:IOEN Y , ( s C +
0x0d621c…0d63b0 Dummy {f00=0x0044, f01=0x0190, f02=»:EDW Y T:EDWE Z T:EDWF Z , ( C ~ C B Z 4 T:EDWI Z d , ( B P C : V I C Z x T:EDIO Z , ( B : ( ' P Z T:KIPR 2 Z I:EVA
0x0d63b0…0d6544 Dummy {f00=0x0044, f01=0x018e, f02=» T Z r T:FDS0 [ , ( T T V : 2 ' [ & T:FDSP [ V T:GDSP [ j P:MTAB [ ~ I:EVTO [ , ( W 2 6 2 @ & " T # ' ?D W [ I:FML [ , ( ' #? ;D:B "
0x0d6544…0d66d8 Dummy {f00=0x0044, f01=0x0190, f02=» [ h T:DSCX I:EVA2 , ( : P C W $0 . T:SCW0 ^ , ( 9 P C : C "!@P " p $ W ) # B C B % C : H D ! Y W 2 < " @ % ) J - 1P G J IW M Q ]P cV
0x0d66d8…0d686c Dummy {f00=0x0044, f01=0x4092, f02=» P P ` H D ! %P ) v 5 9 _R eV T T T W T W" P )P /W ] 9P SP ] h n ] |@ ] !@P " p $ W ) # B C B % C : H D ! Y W 2 < " @ % ) J - 1P G J IW M Q ]P cV
0x0d686c…0d6a00 Dummy {f00=0x0044, f01=0x0190, f02=» > @ IDENT T:KIA P,REL=10.0,800314,870136941000 d T:KIA T:NKIA d F T:KIA d ^ T:NKIA d p T:ABUF d T:KIPR d , ( W 6 V :a d , ( ' ( ( d
0x0d6a00…0d6b94 (1, 13) Dummy {f00=0x0044, f01=0x0190, f02=» y K V K V 6V ( - d , ( _ : J 7 J V W J e , , ( :A V 6V $ - _ * e , ( + : D T E D :A D e , ( ;A 9A Q 5 U _ 5 e T:KIAA e T:KIAC
0x0d6b94…0d6d28 Dummy {f00=0x0044, f01=0x40c8, f02=» D V e p , ( @ m D V ( 2 C C f _, f @ H D !r W ^ - 2 IT MP Y V V T> Q U ! R /P 7P ?W f R [R ]P f f @ f
0x0d6d28…0d6ebc Dummy {f00=0x0044, f01=0x4098, f02=» > @ IDENT T:ABUF P,REL=10.0,800314,870136941000 g T:ABUF g F M g X T:ABUF g n g @ g IN T:ABUF f & !T:ABUF RES SIZE KIA/NKIA SAVEAREA P EJECT T:ABUF END @
0x0d6ebc…0d7050 Dummy {f00=0x0044, f01=0x410e, f02=» > @ IDENT WRITEL P,REL=10.0,800314,870136941000 h WRITEL h F WRITEL h X T:FDS0 h l I:EVA0 h ~ , ( D / C h $ &P C & C h !P h 0 h @
0x0d7050…0d71e4 Dummy {f00=0x0044, f01=0x018e, f02=» > @ IDENT I:NTP P,REL=10.0,800314,870136941000 i B > I:TRC I:NTP I:NTPA I:NTPB I:NTPR I:RST I:RT0 I:RT1 I:RT2 i F I:MOV i I:ADD i I:SUB i I:CMP i I:MUL i * & T i
0x0d71e4…0d7378 Dummy {f00=0x0044, f01=0x0190, f02=» i I:XCP j I:EDS j , ( - j ( I:TRC j X I:RST B j j T:CSEG j | I:NTPA F j I:NTPB J j P:MTAB j , ( ? W V 7 @ " j T:LSEG j
0x0d7378…0d750c Dummy {f00=0x0044, f01=0x0190, f02=» " j r I:EVA2 k , ( @ $ Q W :a k $ I:RT2 k T I:RT1 k f I:RT0 k x , ( W _B( 2 P V k T:BAT k , ( W _ 2 # ;B V T &W k , ( V P
0x0d750c…0d76a0 Dummy {f00=0x0044, f01=0x0190, f02=»AT k , ( O @ 2 ! 9B V T (W V P l , ( m D $ V 6 V % V E l : , ( @ & ' T 2 % 7_ l j T:CAT l , ( @ 2 # L * " 2" l , ( &] Y $! 6P Q $ T 9B l ,
0x0d76a0…0d7834 (1, 14) Dummy {f00=0x0044, f01=0x4130, f02=» , V & l z $ ( A H J 'W 'W '_6 m H D ! B . & ! # % ' ) + ; N m B H D ! = J ? T A V ]P gP s t N Q W W P W8 T W P P m < 8 !R %T +P ]T cW T P Q T T
0x0d7834…0d79c8 Dummy {f00=0x0044, f01=0x018e, f02=» > @ IDENT I:EVA P,REL=10.0,800314,870136941000 n J F " I:EVA0 I:EVA1 I:EVA2 I:EVA3 I:EVA5 I:EVA6 I:EVA7 I:EVB I:EVI n F I:FML I:EVTO n P:MTAB n , ( :l:d:h n I:EVA2 n I:E
0x0d79c8…0d7b5c Dummy {f00=0x0044, f01=0x0190, f02=» n f , ( 9 # W @ $ E " T ; [ o , ( W # :H 2 T Z L o 8 , ( @ w L D V W # o h , ( L E V $ W D V o I:EVA0 o , ( @ L , W 6 2 W " o
0x0d7b5c…0d7cf0 Dummy {f00=0x0044, f01=0x0190, f02=» Z Z o , ( 3 : R ; p 0 , ( S 6 : F _v :B , p ` , ( s (V ; H [ [ [ p , ( z ;AV Z H # p , ( ; :
0x0d7cf0…0d7e84 Dummy {f00=0x0044, f01=0x0190, f02=» ! P [ 6 [ p , ( 1 Z 7 . Z 7 q I:FML R q P I:EVTO h q b , ( Q : ( :A ( @ & " q v , ( o P ! P [ :;H 2 q , ( D :;h : ; V q
0x0d7e84…0d8018 Dummy {f00=0x0044, f01=0x40c0, f02=» : ;f" #?_" q H D ! #W 'W -P 1W = h ?W4 KT> [ R kT V, W R V W W r @ < h W$ P& Pd R Wv yVr V$ P oP uP W& r f r @ r 2 q , ( D :;h : ; V q
0x0d8018…0d81ac Dummy {f00=0x0044, f01=0x0190, f02=» > @ IDENT I:ADS P,REL=10.0,800314,870136941000 s I:ADD I:SUB s F I:ADD s I:SUB s n , ( W " T & T + : s I:CPA s , ( ! * & !@P `1` P Q s " ? [
0x0d81ac…0d8340 Dummy {f00=0x0044, f01=0x0190, f02=» $ P T s v , ( R R ` ; <( t , ( Q P # W " <! =# T W = Z t F , ( P _ V ^< `_@ t v , ( R Q <# =_ P :" P * U t , ( 5 P 1`! T "# 9e! # K t
0x0d8340…0d84d4 (1, 15) Dummy {f00=0x0044, f01=0x4008, f02=»@ u T s v , ( R R ` ; <( t , ( Q P # W " <! =# T W = Z t F , ( P _ V ^< `_@ t v , ( R Q <# =_ P :" P * U t , ( 5 P 1`! T "# 9e! # K t
0x0d84d4…0d8668 Dummy {f00=0x0044, f01=0x4166, f02=» > @ IDENT I:CMP P,REL=10.0,800314,870136941000 v I:CMP v F I:CMP v V , ( P " T * & : * & v h I:CPA v , ( ! !`P :J +_ +Q v , ( A _0 , T T XD W 1 v
0x0d8668…0d87fc Dummy {f00=0x0044, f01=0x4172, f02=» > @ IDENT I:CPA P,REL=10.0,800314,870136941000 w I:CPA w F I:CPA w V * & R W w h , ( ( V W Q P W ! W V w , ( ? P , V W Q P W $ W V w * & _ P
0x0d87fc…0d8990 Dummy {f00=0x0044, f01=0x0190, f02=» > @ IDENT I:MOV P,REL=10.0,800314,870136941000 x I:MOV I:MVC x F I:MOV x I:MVC x n , ( $0#0;b P P P P x , ( ! 0 - P _ 4 V x , ( A W Q P ) P 9_ &" ! 9 :
0x0d8990…0d8b24 Dummy {f00=0x0044, f01=0x0190, f02=»V x p , ( 4! P < X 4 y , ( 9d $ & ! R + : y @ , ( V W R 4 0R Y 7 Y& y p , ( ! P Z,;D 9_8 8 _< V y , ( A W YL T 9 : &9d! + y , ( a
0x0d8b24…0d8cb8 Dummy {f00=0x0044, f01=0x40d2, f02=» 9d! )0 + P 7 Y Z $ y _ : z 0 H D ! T P P PF P -P0 EQ GP OP gP kQ s R R R z H $ #P eP( {T WJ V P. P z z @ z A W YL T 9 : &9d! + y , ( a
0x0d8cb8…0d8e4c Dummy {f00=0x0044, f01=0x0190, f02=» > @ IDENT I:MUL P,REL=10.0,800314,870136941000 { I:MUL I:SH1L { F I:MUL { ^ , ( V ) " T *V &V { p , ( ! : V S W P 9 S W _ { , ( A V P W T V E + { , ( a
0x0d8e4c…0d8fe0 Dummy {f00=0x0044, f01=0x0190, f02=» [ { , ( P Z P [ 9a Z | ( , ( $" T 9d! P P [ Z w | X I:ADD | , ( [ P V H )_ | , ( _X z R z ! P 1` { | , ( / V (9h
0x0d8fe0…0d9174 (1, 16) Dummy {f00=0x0045, f01=0x4066, f02=» | l D @ @ TV %V 3P CV OW PP P6 P( P X R 'P aP oP sP } } P@ } b9d! P P [ Z w | X I:ADD | , ( [ P V H )_ | , ( _X z R z ! P 1` { | , ( / V (9h
0x0d9174…0d9308 Dummy {f00=0x0045, f01=0x0190, f02=» > @ IDENT I:DIV P,REL=10.0,800314,870136941000 ~ I:DIV I:SH1R ~ F I:DIV ~ ^ , ( " T *V &V ~ p ! P = ~ , ( ' ;@ R P W ;a ~ , ( G =a P " R & R
0x0d9308…0d949c Dummy {f00=0x0045, f01=0x0190, f02=» [ [ ~ x I:MOV I:NTFA , ( &! P 0 I:SUB ` , ( z " ! ! p , ( R 2` { z " P ! R 2` { 1 I:CPA , ( ! { [ Z
0x0d949c…0d9630 Dummy {f00=0x0045, f01=0x0190, f02=» { R [ _ , ( Z ! Z $ & * & P Z %_N [ Q V * & R [ Z { , ( z 9e! W Z I:SH1R , ( : V I
0x0d9630…0d97c4 Dummy {f00=0x0045, f01=0x4040, f02=» 7Q CP W _Q@ sR Q* R W *@ < Z ! Z $ & * & P Z %_N [ Q V * & R [ Z { , ( z 9e! W Z I:SH1R , ( : V I
0x0d97c4…0d9958 Dummy {f00=0x0045, f01=0x40da, f02=» > @ IDENT I:NTF P,REL=10.0,800314,870136941000 I:NTFA F I:NTFA X , ( Z H D & H l $ ! D % [ ( 8 @ P ABR* WK2 P P END ,PS
0x0d9958…0d9aec Dummy {f00=0x0045, f01=0x0190, f02=» > @ IDENT I:EDT P,REL=10.0,800314,870136941000 F B I:EDT I:EDW I:ED1 I:EDSK I:EVT I:ETAB I:EXIT I:ETXT I:ECPY F D @ I:ECTR I:ESL I:ENL I:EOR I:ECW I:ECWC I:EFIL I:EFLA I:SCB I:FFSN I:EXPY , ( !!
0x0d9aec…0d9c80 Dummy {f00=0x0045, f01=0x0190, f02=»5 I:EVB I:EGTB I:EVI , I:EVA3 < I:EVA0 N * & AUT ` I:EVNO I:EPIC I:ESKI I:EBRI I:EBRB I:EBR * & Q T
0x0d9c80…0d9e14 (1, 17) Dummy {f00=0x0045, f01=0x0190, f02=» { 6 K K I:EDT . I:ED1 @ I:EDW R , ( K K V K : d I:EVA6 , ( * R B " V , ( V Z P 2 " T W , (
0x0d9e14…0d9fa8 Dummy {f00=0x0045, f01=0x0190, f02=» 7 [ Z P I:EXIT n * , ( U $ [ V 7_ > P:MTAB n , ( s Z @ " &! P $ Z 7 , ( Z Z P $ I:FFSN , ( : V
0x0d9fa8…0da13c Dummy {f00=0x0045, f01=0x0190, f02=»:ECPY , ( I < : J Q : I:EXPY @ , ( P 4 ! T _ T I:ECTR 0 I:ESL : I:ENL D , ( ) P 4 W K W W +_ I:EOR Z T:EDWF
0x0da13c…0da2d0 Dummy {f00=0x0045, f01=0x413a, f02=»:SCB , ( g X & , J K : V : 1 > H D ! U Y [ e Z g n i d k 4 m D s x u : y < < T H D ! P T W T W ; QP { P P R Q P Qx Pn Th 4 0 + )PX /WT 7 9WJ = @ ?W
0x0da2d0…0da464 Dummy {f00=0x0045, f01=0x0190, f02=» > @ IDENT I:EPIC P,REL=10.0,800314,870136941000 I:EPIC F I:EPIC X I:EVA0 l : + ~ [ [ < , ( ! !AAP !TTT W !**T * [ R A
0x0da464…0da5f8 Dummy {f00=0x0045, f01=0x0190, f02=»T j , ( *W FP . :T Z ! XBW *X& I:SCB : * & @ W :P # U 1 p !00T ; J , ( _ 9P F " X6# ; W x )0_: , ( J R Z R 4! P ;)0 , ( 9U ? Z
0x0da5f8…0da78c Dummy {f00=0x0045, f01=0x4122, f02=» } ++P !-- z ;$# + ^" _( " T tX. PT*AXYZ9 . H D ! ` %P +T /W 5T ?R EP KT OW S P Wn W8 Wf T H D ! T& W, P T W F W@ P U T P W R( R P U ; ?U mW qW
0x0da78c…0da920 Dummy {f00=0x0045, f01=0x0190, f02=» > @ IDENT I:EDTE P,REL=10.0,800314,870136941000 D @ I:EKIH I:EINH I:EVIN I:EBRI I:EBRB I:EBR I:ESKI I:EVNO F I:EGTD I:EGTB I:EKIH I:EINH I:ETAB I:EVIN , ( @
0x0da920…0daab4 (1, 18) Dummy {f00=0x0045, f01=0x414e, f02=» ; W : ! )P9H # T &W I:EBR j , I:EBRB n > , ( Y &" :I : : P & R I:ESKI I:EVNO I:EGTD I:EGTB & " y _ &X _ : : : : 8 4 P
0x0daab4…0dac48 Dummy {f00=0x0045, f01=0x40ea, f02=» > @ IDENT I:EDS P,REL=10.0,800314,870136941000 I:EDS F I:EDS V I:EVS2 h I:ED1 z , ( : { : & @ P2E,OP1E END OF MAIN STRING
0x0dac48…0daddc Dummy {f00=0x0045, f01=0x0190, f02=» > @ IDENT I:STR P,REL=10.0,800314,870136941000 $ I:INS I:DLT I:MCH I:CPY I:XCP F I:DLT n I:EVS1 I:MCH , ( @ P 9 _ , ( @ [ , (
0x0daddc…0daf70 Dummy {f00=0x0045, f01=0x0190, f02=» R # P W ) v I:EVS2 , ( V E ( I:CPY X I:XCP j , ( W [ : | , ( Z !0P R 4 R :d" 8 R ! , ( :DW ! 9 R R _. :
0x0daf70…0db104 Dummy {f00=0x0045, f01=0x400e, f02=» @ v I:EVS2 , ( V E ( I:CPY X I:XCP j , ( W [ : | , ( Z !0P R 4 R :d" 8 R ! , ( :DW ! 9 R R _. :
0x0db104…0db298 Dummy {f00=0x0045, f01=0x4152, f02=» > @ IDENT I:EVS P,REL=10.0,800314,870136941000 I:EVS1 I:EVS2 F I:EVA0 ` , ( A jP kT r I:EVS1 8 , ( T : & 9! " : $ : I:EVA2 I:EVS2
0x0db298…0db42c Dummy {f00=0x0045, f01=0x0190, f02=» > @ IDENT T:ADIT P,REL=10.0,800314,870136941000 b & " T:RREA T:RRE1 T:RWRI T:RWR1 b F T:RREA b p T:FDSP b T:RRE1 b I:EVA0 b T:STCW b , ( A &P C b T:IO2 b
0x0db42c…0db5c0 Dummy {f00=0x0045, f01=0x4036, f02=» : b v 6 + 6 c F c @ c 236941000 b & " T:RREA T:RRE1 T:RWRI T:RWR1 b F T:RREA b p T:FDSP b T:RRE1 b I:EVA0 b T:STCW b , ( A &P C b T:IO2 b
0x0db5c0…0db754 (1, 19) Dummy {f00=0x0045, f01=0x0190, f02=» > @ IDENT T:CW P,REL=10.0,800314,870136941000 ^ F B T:GCW2 T:GTCW T:SCW2 T:STCW T:SCW0 T:BCDB T:BINB T:KIAA ^ F T:KIAC ^ T:STCW ^ I:EVA2 ^ T:SCW0 ^ , ( @ #0 T & C C : C ^
0x0db754…0db8e8 Dummy {f00=0x0045, f01=0x0190, f02=» X R _ V ^ T:GTCW _ , ( 4 _P :#0 T B 'W B B " _ 4 T:BINB _ d , ( : P _ x , ( P L R R _ , ( _ R _ # Q R _ , (
0x0db8e8…0dba7c Dummy {f00=0x0045, f01=0x0190, f02=» _ h , ( _ ' d w5 1 ` T:KIAA ~ ` 8 T:KIAC ` L T:GCW2 ` ` , ( #0 T B ' : ` t T:SCW2 ` , ( B B : P C ` , ( #0 T & C C : $
0x0dba7c…0dbc10 Dummy {f00=0x0045, f01=0x4038, f02=»P 3P CR } ~ T P T ` v a "@ a 4 T:KIAA ~ ` 8 T:KIAC ` L T:GCW2 ` ` , ( #0 T B ' : ` t T:SCW2 ` , ( B B : P C ` , ( #0 T & C C : $
0x0dbc10…0dbda4 Dummy {f00=0x0045, f01=0x4114, f02=» > @ IDENT T:CLO P,REL=10.0,800314,870136941000 T:SETT T:GETT F T:SETT ` I:EVA0 t I:RT1 T:GETT * & @ ( " ( _ .
0x0dbda4…0dbf38 Dummy {f00=0x0045, f01=0x2008, f02=» L = REL 10.0,5.0 DATE = 80 01 22 1216PACK NBR = 0001 0 ?
0x0dbf38…0dc0cc Dummy {f00=0x0045, f01=0x40cc, f02=» > @ IDENT T:GTID P,PRR=5.0,791206,870136940500 N T:GETI N F T:GETI N X I:EVA0 N l I:RT1 N ~ $ @ V G 9h ' N N @ N RE FOR USER P SRL WK1,8 P SCR WK1,OP2A P
0x0dc0cc…0dc260 Dummy {f00=0x0045, f01=0x0190, f02=» > @ IDENT T:DM P,PRR=5.0,800214,870136940500 & " T:OPEN T:CLOS T:COMM T:RSTA F T:OPEN p T:FDSP T:WRIO T:IO2 * & @ # 9 / T:CLOS T:COMM .
0x0dc260…0dc3f4 (1, 20) Dummy {f00=0x0046, f01=0x4068, f02=» ' T:IO3 & O C 6 X R@ d F T:OPEN p T:FDSP T:WRIO T:IO2 * & @ # 9 / T:CLOS T:COMM .
0x0dc3f4…0dc588 Dummy {f00=0x0046, f01=0x0190, f02=» > @ IDENT T:DMR P,PRR=5.0,800214,870136940500 > : T:SREA T:DREA T:IREA T:XREA T:IXID T:GCW2 T:SCW2 F T:SREA T:REAX T:IO2 T:DREA T:IO3 T:IREA , ( $B
0x0dc588…0dc71c Dummy {f00=0x0046, f01=0x4128, f02=» T:GCW2 6 , ( 3 : #0 T B ' : T:BINB D T:SCW2 ^ V , ( Q B B : P j T:BCDB , ( m C #0 T & C C : C C : ^ ! * GT kP u
0x0dc71c…0dc8b0 Dummy {f00=0x0046, f01=0x0190, f02=» > @ IDENT T:DMW P,PRR=5.0,800214,870136940500 6 2 T:SWRI T:DWRI T:IWRI T:DREW T:CREW T:IREW F T:SWRI T:WRIX T:IO4 T:DWRI T:SCW2 , ( / /
0x0dc8b0…0dca44 Dummy {f00=0x0046, f01=0x40fc, f02=» 5D / C , ( O ( B B @ C , , ( o ( ( B B , ( C C ( C T:IO5 C @ /
0x0dca44…0dcbd8 Dummy {f00=0x0046, f01=0x4182, f02=» > @ IDENT T:DMDI P,PRR=5.0,800211,870136940500 T:DDIS T:CDIS T:IDIS F T:DDIS h T:FDSP | T:SCW2 T:IO3 T:CDIS , ( $ C <H / T:IDIS $
0x0dcbd8…0dcd6c Dummy {f00=0x0046, f01=0x4168, f02=» > @ IDENT T:DMPO P,PRR=5.0,800211,870136940500 T:DPOS T:IPOS F T:DPOS ` T:FDSP t T:SCW2 T:GTBY T:IO4 , ( H@ C <H / T:IPOS T:WRIX
0x0dcd6c…0dcf00 Dummy {f00=0x0046, f01=0x0190, f02=» > @ IDENT T:IO P,PRR=5.0,800214,870136940500 J F " T:WRIT T:READ T:KI T:NKI T:EDWR T:DSC0 T:DSC1 T:DSC2 T:EDWE F F B T:EDWF T:EDWI T:EDIO T:XSTA T:WAIT T:IO1 T:IO2 T:IO3 T:IO4 D @ T:IO5 T:FDS0 T:FDSP T:STCW T:GDSP T
0x0dcf00…0dd094 (1, 21) Dummy {f00=0x0046, f01=0x0190, f02=»B p T:KI T:NKI T:WRIT . T:LWRI B , ( W / V T:WRIX " T:WRIO & I:EVA0 , ( ! _ P <H T:READ B T
0x0dd094…0dd228 Dummy {f00=0x0046, f01=0x0190, f02=» C p , ( } C J ' W 781"&$ 39#$;< ' T:DSC2 @ , ( ()*+,-! T T:XSTA T:WAIT , ( P _D B 'W T:MWAI , ( ( W
0x0dd228…0dd3bc Dummy {f00=0x0046, f01=0x0190, f02=» , ( 1W C C C T:IO5 > 8 T:IORE B J T:GCW2 ^ * & 7 ( ' P P "! P p I:RT1 , ( U W B % P C + T:IOEN t , ( s I
0x0dd3bc…0dd550 Dummy {f00=0x0046, f01=0x0190, f02=» C v T:EDWE T:EDWF * , ( p C B B P C > T:EDWI n T:EDIO , ( : V I C B : ( T:KIPR $ , ( ' P I :
0x0dd550…0dd6e4 Dummy {f00=0x0046, f01=0x0190, f02=»T T T | T:FDS0 T:FDSP 0 T:GDSP D P:MTAB X , ( V : 2 ' W 2 6 2 @ & " j I:EVTO I:FML , ( T # ' ?D W ' #? , ( ;D:B " :
0x0dd6e4…0dd878 Dummy {f00=0x0046, f01=0x0190, f02=» , ( "! P : P , ( C W $0 P C : 8 , ( = C "!@P ") # B C B % C h T:STCW ` , ( ] : #0 T & C C : T:BCDB , ( { C C :
0x0dd878…0dda0c Dummy {f00=0x0046, f01=0x0190, f02=» , ( 4 _P :#0 T B 'W B B T:BINB 4 , ( " : H , ( P P L R R x , ( ; _ R _ # Q R , ( [ V > _V X^ ' h , (
0x0dda0c…0ddba0 Dummy {f00=0x0046, f01=0x0190, f02=» h T:KIAA T:KIAC 0 H D ! ^ W $ . " 2 % ) < - 1P G J IW M Q e i sW H H D ! Y w W @ P W W %W AP. E t H D ! KP$ QP WW aP o w h P P& P
0x0ddba0…0ddd34 (1, 22) Dummy {f00=0x0046, f01=0x4082, f02=» P V P P* V R V T W x 4 0 ! #PR / 3R 7R UQ {P P P R 4 l@ ~ i sW H H D ! Y w W @ P W W %W AP. E t H D ! KP$ QP WW aP o w h P P& P
0x0ddd34…0ddec8 Dummy {f00=0x0046, f01=0x0190, f02=» > @ IDENT T:KIA P,PRR=5.0,791206,870136940500 b T:KIA T:NKIA b F T:KIA b ^ T:NKIA b p T:ABUF b T:KIPR b , ( W 6 V :a b , ( ' ( ( b
0x0ddec8…0de05c Dummy {f00=0x0046, f01=0x0190, f02=» y K V K V 6V ( - b , ( _ : J 7 J V W J c , , ( :A V 6V $ - _ * c , ( + : D T E D :A D c , ( ;A 9A Q 5 U _ 5 c T:KIAA c T:KIAC
0x0de05c…0de1f0 Dummy {f00=0x0046, f01=0x40c8, f02=» D V c p , ( @ m D V ( 2 C C d _, d @ H D !r W ^ - 2 IT MP Y V V T> Q U ! R /P 7P ?W d R [R ]P d d @ d 9A Q 5 U _ 5 c T:KIAA c T:KIAC
0x0de1f0…0de384 Dummy {f00=0x0046, f01=0x4098, f02=» > @ IDENT T:ABUF P,PRR=5.0,791206,870136940500 e T:ABUF e F M e X T:ABUF e n e @ e A x EJECT END @
0x0de384…0de518 Dummy {f00=0x0046, f01=0x410e, f02=» > @ IDENT WRITEL P,PRR=5.0,791206,870136940500 f WRITEL f F WRITEL f X T:FDS0 f l I:EVA0 f ~ , ( D / C f $ &P C & C f !P f 0 f @
0x0de518…0de6ac Dummy {f00=0x0046, f01=0x018e, f02=» > @ IDENT I:NTP P,PRR=5.0,800102,870136940500 B > I:TRC I:NTP I:NTPA I:NTPB I:NTPR I:RST I:RT0 I:RT1 I:RT2 F I:MOV I:ADD I:SUB I:CMP I:MUL * & T
0x0de6ac…0de840 Dummy {f00=0x0046, f01=0x4026, f02=»C LL4 L P @ "
0x0de840…0de9d4 (1, 23) Dummy {f00=0x0046, f01=0x0190, f02=» L H IDENT STROUT TRA 5.0 80-03-11 F2 O2222 REL=10.0,800314,870138041000 STROUT T $$$TRAR f STROUT x STROU1R T:GETFA T:SWIT0 , 1 J F " D $
0x0de9d4…0deb68 Dummy {f00=0x0046, f01=0x4026, f02=»C LL4 L P @ "2 O2222 REL=10.0,800314,870138041000 STROUT T $$$TRAR f STROUT x STROU1R T:GETFA T:SWIT0 , 1 J F " D $
0x0deb68…0decfc Dummy {f00=0x0046, f01=0x0190, f02=» J H IDENT T:AT10 TRA 5.0 80-03-11 F2 O2222 REQUIRED VARIABLES REL 10.0 T:AT10 R T:AT10A d T:DT10 D:TB10 Z:TB10 x * & * & * & = 0
0x0decfc…0dee90 Dummy {f00=0x0046, f01=0x401a, f02=» y @ 80-03-11 F2 O2222 REQUIRED VARIABLES REL 10.0 T:AT10 R T:AT10A d T:DT10 D:TB10 Z:TB10 x * & * & * & = 0
0x0dee90…0df024 Dummy {f00=0x0046, f01=0x40cc, f02=» J H IDENT T:DT10 TRA 5.0 80-03-11 F2 O2222 REQUIRED VARIABLES REL 10.0 T:DT10 R T:DT10D d START x * & tT1 * @ * & = 0
0x0df024…0df1b8 Dummy {f00=0x0046, f01=0x40b6, f02=» J H IDENT T:ATAB TRA 5.0 80-03-11 F2 O2222 REQUIRED VARIABLES REL 10.0 T:ATAB R T:ATABA d T:AT10 x @ :A @ @ * & = 0
0x0df1b8…0df34c Dummy {f00=0x0046, f01=0x40a0, f02=» J H IDENT U:BTAB TRA 5.0 80-03-11 F2 O2222 REQUIRED VARIABLES REL 10.0 U:BTAB R U:BTABB d x :B @ :A @ @ * & = 0
0x0df34c…0df4e0 Dummy {f00=0x0046, f01=0x0000, f02=»
0x0df4e0…0e0180 (2, 0) DirGranule ((2, 0)) {
0x0df4e0…0e0180 DirEnt {nam=»SCREEN«, typ=» «, f00=0x0000, f01=0x0000, f02=0x08e0, f03=0x0000}
0x0df4e0…0e0180 DirEnt {nam=»SCREEN«, typ=»SC«, f00=0x019a, f01=0x0196, f02=0x08e8, f03=0x0008}
0x0df4e0…0e0180 DirEnt {nam=»STRINP«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0910, f03=0x0000}
0x0df4e0…0e0180 DirEnt {nam=»STROUT«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0920, f03=0x0000}
0x0df4e0…0e0180 DirEnt {nam=»SPDDIV«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0930, f03=0x0000}
0x0df4e0…0e0180 DirEnt {nam=»SPLITT«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0938, f03=0x0000}
0x0df4e0…0e0180 }
0x0e0180…0e0314 (2, 1) Opaque[0x194]
0x0e0314…0e04a8 # DirEnt {nam=»SCREEN«, typ=»SC«, f00=0x019a, f01=0x0196, f02=0x08e8, f03=0x0008}
0x0e0314…0e04a8 IdxSect {
0x0e0314…0e04a8 f00 = 0x0047 // 0xe0314 @0x0
0x0e0314…0e04a8 f01 = 0x000a // 0xe0316 @0x2
0x0e0314…0e04a8 gno = [ // 0xe0318 @0x4
0x0e0314…0e04a8 [0x00]: C0x0047.0x1.0
0x0e0314…0e04a8 [0x01]: C0x0047.0x2.0
0x0e0314…0e04a8 [0x02]: C0x0047.0x3.0
0x0e0314…0e04a8 [0x03]: C0x0048.0x0.0
0x0e0314…0e04a8 [0x04]: C0x0048.0x1.0
0x0e0314…0e04a8 ]
0x0e0314…0e04a8 }
0x0e04a8…0e063c Dummy {f00=0x0047, f01=0x0190, f02=» . P IDENT SCREEN REL=10.0,800314,870138041000 P* 6 , P* A STANDARD PROGRAM PACKAGE HANDLING @ 0 P* A COMPLETE PICTURE ON A DISPLAY SCREEN p P* ( P* RUNNING UNDER: CREDIT REL 10.0 ( P* TOSS REL 10.0 P*
0x0e063c…0e07d0 Dummy {f00=0x0047, f01=0x0190, f02=»ELDS l * P ENTRY SPCLRN CLEAR NO VARIABLE FIELDS . P ENTRY SPERR DISPLAY ERROR MESSAGE, UPDATE : ( P .. CURRENT FIELD & CONTINUE IN .. l P .. FORMAT. 0 P ENTRY SPERR2 DISPLAY ERROR MESSAGE, UPDATE " P .. CURRENT FIELD & RETURN. P
0x0e07d0…0e0964 Dummy {f00=0x0047, f01=0x0190, f02=»D CHECK ROUTINE NO. 3 z 0 P EXPROC SPCHK4 STANDARD CHECK ROUTINE NO. 4 . P EXPROC SPCHK5 STANDARD CHECK ROUTINE NO.5 R 0 P EXPROC SPCHK6 STANDARD CHECK ROUTINE NO. 6 0 P EXPROC SPCHK7 STANDARD CHECK ROUTINE NO. 7 * P EXPROC SPAPPL USER ROUTINE
0x0e0964…0e0af8 Dummy {f00=0x0047, f01=0x0190, f02=» P CONDITIONAL TABULATION P* * . P EXT EMPTYT ASSEMBLY SUBROUTINE EMPTYT - 4 " P TEST IF DATA ITEM IS EMPTY f P* P EJECT P INCLUDE SPLITT,LIST P EJECT P* > P* CLEAR ALL VARIABLE FIELD BEFORE HANDLING TH
0x0e0af8…0e0c8c Dummy {f00=0x0047, f01=0x0190, f02=»IELDS BEFORE HANDLING THE PICTURE v P* * PSPCLRS PROC 4 P PERF SCREEN,=W'2' H P RET b P PEND n P* | > P* CLEAR NO VARIABLE FIELDS BEFORE HANDLING THE PICTURE P* PSPCLRN PROC P PERF SCREEN,=W'3' P RET
0x0e0c8c…0e0e20 Dummy {f00=0x0047, f01=0x0190, f02=» WITHOUT DIRECT RETURN x P RET P PEND * P* 8 PSPERR2 PROC B & P SET SPERCALL INDICATE SPERR CALL V 0 P PERF SCREEN,=W'0' SPERR WITH DIRECT RETURN P CLEAR SPERCALL P RET P PEND P* P EJECT PSCREEN PRO
0x0e0e20…0e0fb4 (2, 2) Dummy {f00=0x0047, f01=0x0190, f02=»IB t $ P CMP SPBINW2,='0' "SPERR" CALL? P BE ERRPRINT YES! 2 P L ( P MOVE SPBINW1,='1' SET INITIAL VALUE T . P TBT SPPROMPT,ENTIRE JUMP IF ENTIRE FORMAT P SHOULD BE DISPLAYED P* P* ONLY VARIABLE FIELDS P* 8 P I
0x0e0fb4…0e1148 Dummy {f00=0x0047, f01=0x0190, f02=» B CONT P* PCLEARS 2 P ERASE 5,SPBINW1,='0' ERASE NOT-"NCLR" FIELDS ( P FROM 1 AND UP ^ P B CONT v P EJECT P* P* DISPLAY ENTIRE FORMAT P* PENTIRE 8 P IB SPBINW2,ECLRA,ECLRS,ECLRN JUMP ON ROUTINE IN
0x0e1148…0e12dc Dummy {f00=0x0047, f01=0x0190, f02=»N MEMORY P B ECLRN CONTINUE P* * 4 P* CLEAR VARIABLES WITHOUT THE "NCLR" FLAG SET 4 P* l PECLRS v 2 P ERASE 6,SPBINW1,='0' CLEAR NOT-"NCLR" FIELDS P IN MEMORY P* & P* CLEAR NO VARIABLES IN MEMORY P*
0x0e12dc…0e1470 Dummy {f00=0x0047, f01=0x0190, f02=»DEX r ( P BL KTHOME JUMP IF NO CURRENT FIELD PCONT5 8 6 P GETFLD 0,SPBINW4,SPBINW3 SEARCH CURRENT POSITION F P BZ SETCREAD JUMP IF FOUND " P BL KTHOME POSITION NOT FOUND P* P* COMPULSORY FIELD FOUND P* & P MOVE SP
0x0e1470…0e1604 Dummy {f00=0x0047, f01=0x0190, f02=» P* PSETCREAD ( P SETCUR SET CURSOR ON CURRENT FIELD P J P* R * P* READ TO CURRENT FIELD ON DISPLAY P* PREADIN . P DYKI SPINPUT,SPKTAB1,SPKTAB2,SPBINW1, C P SPBINW2,SPBINW4 P BL ERRPRT ERROR 2 P C
0x0e1604…0e1798 Dummy {f00=0x0047, f01=0x018e, f02=» b , P CMP SPBINW1,='0' ... POSITION > 0, ... P BNE KEDBWD ... START EDIT 8 PDYK100 Z ( P IB SPBINW2,UPD300,CLEA20 JUMP ON C h P UPDATE,CANC,CANC, C . P UPDATE,UPDATE,UPDATE,UPDATE CONVERTED C 4 P UPDATE,UPDATE,UPDATE,UPDATE END-OF
0x0e1798…0e192c Dummy {f00=0x0047, f01=0x0190, f02=» PUPDATE 0 P CBE SPBINW1,='0',UPD350 JUMP IF LENGTH = 0 & P GETCTL 3,SPBINW4 GET SCHK-NUMBER F 8 P CBE SPBINW4,='0',UPD050 JUMP IF NOT STANDARD CHECK p P* * P PERFI SPBINW4,SPCHK1,SPCHK2,SPCHK3 C " P SPCHK4,SPCHK5,SPCHK6,SPCHK7 &
0x0e192c…0e1ac0 Dummy {f00=0x0047, f01=0x0190, f02=»ICATE COND. DISPL z P B UPD200 PUPD070 , $ P GETCTL 0,SPBINW3 GET APPL-VALUE : 0 P CBNE SPBINW3,='0',UPD210 JUMP IF APPL VALUE b P B SETCREAD P* " P* UNCONDITIONAL DISPLAYING P* PUPD100 6 P MOVE SPBINW4,='2' IND
0x0e1ac0…0e1c54 (2, 3) Dummy {f00=0x0047, f01=0x0190, f02=» b P* ( P* APPL-VALUE DIFFERENT FROM ZERO P* > PUPD210 H P PERF SPAPPL V ( P IB SPBINW3,UPD260,SETCREAD,ERRPRINT j P B UPD400 P* P* OK AFTER APPL CONTROL " P* UNCONDITIONAL DISPLAYING P* & PUPD2
0x0e1c54…0e1de8 Dummy {f00=0x0047, f01=0x0190, f02=»UPD350 4 P CBE SPBINW2,=X'E',KCOPY TO ALLOW "COPY"-KEY ... P ... IN "SPERR2"-CALL F 0 P TBT SPERCALL,RETUR RETURN IF "SPERR2"-CALL f P* $ P* JUMP ON FUNCTION KEY INDEX P* P IB SPBINW2,READIN,DUMMY, C P KEOI,DUMMY,D
0x0e1de8…0e1f7c Dummy {f00=0x0047, f01=0x0190, f02=»' ADJUST EOI-KEY INDEX ~ PDUMMY PRETUR , P RET : P* F P EJECT P PUPD400 ^ 8 P CBE SPBINW4,='2',UPD260 JUMP IF UNCONDITIONAL DISPL l 0 P UPDFLD 0,SPINPUT UPDATE FIELD DISPL. COND. P B UPD300 P* P EJECT " PKE
0x0e1f7c…0e2110 Dummy {f00=0x0047, f01=0x0190, f02=» p P TBWD P B TSTTAB " PKTHOME TAB. TO HOME POSITION ( P THOME N P B TSTTAB ( PKTLDOWN TAB. TO FIRST ON NEXT LINE n P TLDOWN P B TSTTAB PKTLEFT TAB. TO LEFTMOST P TLEFT P B TSTTAB PKTRIGHT
0x0e2110…0e22a4 Dummy {f00=0x0047, f01=0x0190, f02=» P TUP P PTSTTAB TEST TAB OUTPUT P BE READIN OK < P BL SETCREAD NOT FOUND R * P BOFL SETCREAD EMPTY COMPULSORY FIELD p P* P* CONDITIONAL TABULATION P* P PERF SPTCHK P CBE SPBINW3,='0',SETCREAD
0x0e22a4…0e2438 Dummy {f00=0x0047, f01=0x0190, f02=» | < P* BRANCH LIST EXHAUSTED - SPBINW2 CLOBBERED BY SPTCHK P* H P B SETCREAD R P f P n P EJECT v PKCOPY HARD COPY P MOVE SPBINW3,='1' P PRINT SPDSPRT,SPBINW3,='0' . P TBT SPERCALL,RETUR RETURN IF "SPERR"-CALL
0x0e2438…0e25cc Dummy {f00=0x0047, f01=0x0190, f02=»UPL SPINPUT DUPLICATION P BZ UPD260 DUPL ALLOWED 0 P MOVE SPBINW4,='4' INDICATE ILLEGAL EOI-KEY @ P B ERRPRINT DUPL NOT ALLOWED t P EJECT P* P* EDIT FIELD P* PKEDERR EDIT AFTER ERROR P CBE SPBINW1,='0',KE
0x0e25cc…0e2760 Dummy {f00=0x0047, f01=0x018e, f02=»E SPBINW3,='0',KED100 ( P EDWRT SPDSSCRN,BELL ACOUSTIC ALARM P B SETCREAD J PKED100 ^ & P EDFLD SPINPUT,SPKTAB3,SPBINW1, C l P SPBINW2,SPBINW4 P BL ERRPRT ERROR 8 P CBNG SPBINW2,='0',POWEROFF POWER OFF OR KEY SWITCH . P CBN
0x0e2760…0e28f4 (2, 4) Dummy {f00=0x0048, f01=0x0190, f02=» p P EJECT P* P* ENTER KEY P* 6 PKENTER @ 0 P MOVE SPBINW4,='5' INDICATE COMP.FIELD FOUND N , P MOVE SPBINW1,='0' INDICATE NO CLEARING . P MOVE SPBINW2,='0' SET INDEX TO LAST FIELD P IN FORMAT < P GETFLD 0,SPBINW
0x0e28f4…0e2a88 Dummy {f00=0x0048, f01=0x0190, f02=»KENT05 NO! P CALL EMPTYT,:FMTITEM EMPTY? P BP KENT10 YES! 6 PKENT05 N 4 P MOVE SPBINW2,='3' INDICATE ENTER KEY DEPRESSED P RET P* & P* EMPTY COMPULSORY FIELD FOUND P* PKENT10 6 P GETFLD 0,SPBINW3,SPBINW2 GE
0x0e2a88…0e2c1c Dummy {f00=0x0048, f01=0x0190, f02=»UMP IF EDIT v * P CBE SPBINW2,='4',CANC JUMP IF CANCEL1 * P CBE SPBINW2,='5',CANC JUMP IF CANCEL2 B * P CBE SPBINW2,='7',KEDBWD JUMP IF TBWD p P* P* ERROR HANDLING P* PERRPRINT P CMP SPBINW4,='0' $ P BE SETCREAD JUM
0x0e2c1c…0e2db0 Dummy {f00=0x0048, f01=0x0190, f02=» SET CURSOR ON LAST ROW x & P EDWRT SPDSSCRN,SPFTBERR(SPBINW4) P* J P* READ AFTER ERROR T P* r PERREAD | ( P SETCUR SET CURSOR AT THE BEGINNING P OF THE CURRENT FIELD PERR100 ( P MOVE SPBINW3,='1' REQUESTED LENGTH
0x0e2db0…0e2f44 Dummy {f00=0x0048, f01=0x0190, f02=» JUMP IF POWER OFF v " P IB SPBINW2,ERR100,ERRCONT C $ P ERRCONT,ERR100,ERRCONT,ERRCONT @ : P CBNE SPBINW2,='17',ERR100 TRY AGAIN IF NOT EDIT KEY! h P* P* CLEAR ERROR PRINTOUT P* PERRCONT * P MOVE SPBINW3,='24' INDICATE
0x0e2f44…0e30d8 Dummy {f00=0x0048, f01=0x0190, f02=» INDEX t PCANC 0 P CBE SPBINW1,='0',ERRC10 JUMP IF LENGTH = 0 0 P MOVE SPINPUT,:FMTITEM SAVE CURRENT CONTENTS N P MOVE SPSTRGW1,=X'3100' 6 P MOVE :FMTITEM,SPSTRGW1 PUT SOMETHING IN THE FIELD & P GETABX SPBINW4 GET CURRENT INDEX * P E
0x0e30d8…0e326c Dummy {f00=0x0048, f01=0x0190, f02=»ANCEL2 j P RET PCLEAR1 0 P CBE SPBINW1,='0',ERRC20 JUMP IF LENGTH = 0 ( ( P SET SPCHANGE INDICATE CHANGED FIELD PERRC20 P B SETCREAD CONTINUE P* PCLEAR2 . P CBE SPBINW1,='0',CLEA20 JUMP IF LENGTH 0 4 P MOVE :FMTIT
0x0e326c…0e3400 Dummy {f00=0x0048, f01=0x409e, f02=»AY FIELD p P B SETCREAD P* $ PBELL FRMT . P FSL @ P FILLR X'07',1 L P FMEND b P p P PEND x P P END @ EAD CONTINUE P* PCLEAR2 . P CBE SPBINW1,='0',CLEA20 JUMP IF LENGTH 0 4 P MOVE :FMTIT
0x0e3400…0e3594 (2, 5) Dummy {f00=0x0048, f01=0x2008, f02=»
0x0e3594…0e3728 Dummy {f00=0x0048, f01=0x0190, f02=» LDR OP2T,WK2 6 $ P SUKL OP2T,/100 START FROM ZERO 7 P RB GDSET1 7 > L P EJECT T:IO T:IO T:IO T:IO T:IO T:IO T:IO T:IO 7 P P 7 P* 7 8 P* STBARL STORE BUFFER ADDRESS AND REQ LENGTH IN ECB 7 P* 7 P 7 6 PSTBARL C
0x0e3728…0e38bc Dummy {f00=0x0048, f01=0x0190, f02=»CBRL,A8 7 P RTN PS 8 P EJECT T:IO T:IO 8 P* 8 > ( P* GTBYTE - GET V-CONSTANT IN OP1A 8 H P* 8 t PT:GTBY EQU * 8 ~ PGTBYTE LCR OP1A,PP 8 P ADKL PP,1 STEP PP 8 " P ANKL OP1A,X'FF' ISOLATE BYTE 8 P RTN PS 8 P EJECT 8
0x0e38bc…0e3a50 Dummy {f00=0x0048, f01=0x0190, f02=» 8 h " P* 4. PREPARE DSCBIX 9 P* 9 . PDSC EQU * 9 8 & P CF PS,GTWEDS GET WAITBIT AND DSET 9 J " P CF PS,GTBYTE GET CONTROL CODE 9 t & P LCR A1,A8 CHECK IF FILE-CTRL-MODE 9 P ANK A1,/02 9 P RF(Z) T:DSCX 9 P CF PS,T:SCW2 9 P RTN
0x0e3a50…0e3be4 Dummy {f00=0x0048, f01=0x0190, f02=»CBIX,A8 CLEAR INDEX ITEM 9 P RF DSC03 : " PDSC01 LDR OP1T,OP2T SAVE TYPE : 2 $ P LDR OP1E,OP2E SAVE END ADDRESS : X ( P ANK OP1T,ARITHB+NUMBIT ISOLATE TYPE : P SUK OP1T,NUMBIT BINARY? : P RF(Z) DSC02 YES! : P IFT PARM=TEST : P SUK OP1T,AR
0x0e3be4…0e3d78 Dummy {f00=0x0048, f01=0x0190, f02=»RE LENGTH : z 4 PDSC02 ST OP2A,DSCBIX,A8 STORE INDEX ITEM ADDRESS ; P CF PS,T:SCW0 ; J P RTN PS ; ` P EJECT T:IO T:IO ; p P* ; * P* SAVFBA - SAVE FIX BUFFER ADDRESS ; P* ; P* ; 2 P* ADDR. OF DSET-BUFFER IS SAVED IN DSCBRI
0x0e3d78…0e3f0c Dummy {f00=0x0048, f01=0x0190, f02=»VFBA EQU * ; P CM DSCBIX,A8 < PSAVFB2 LCR WK1,A8 < ( P ANK WK1,BUFBIT ANY BUFFER ? < B P RF(Z) SAVF90 NO < f P < ~ P LCR WK1,A8 < P ORK WK1,BFSBIT < P SCR WK1,A8 SET INDICATOR < P < P LD WK1,ECBBA,A8 < P ST WK1,DSCBRI,A8 <
0x0e3f0c…0e40a0 Dummy {f00=0x0048, f01=0x401c, f02=» PS < P END = @ = ,A8 < PSAVFB2 LCR WK1,A8 < ( P ANK WK1,BUFBIT ANY BUFFER ? < B P RF(Z) SAVF90 NO < f P < ~ P LCR WK1,A8 < P ORK WK1,BFSBIT < P SCR WK1,A8 SET INDICATOR < P < P LD WK1,ECBBA,A8 < P ST WK1,DSCBRI,A8 <
0x0e40a0…0e4234 (2, 6) Opaque[0x194]
0x0e4234…0e43c8 # DirEnt {nam=»STRINP«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0910, f03=0x0000}
0x0e4234…0e43c8 IdxSect {
0x0e4234…0e43c8 f00 = 0x0048 // 0xe4234 @0x0
0x0e4234…0e43c8 f01 = 0x0004 // 0xe4236 @0x2
0x0e4234…0e43c8 gno = [ // 0xe4238 @0x4
0x0e4234…0e43c8 [0x00]: C0x0048.0x2.0
0x0e4234…0e43c8 [0x01]: C0x0048.0x3.0
0x0e4234…0e43c8 ]
0x0e4234…0e43c8 }
0x0e43c8…0e455c Dummy {f00=0x0048, f01=0x0190, f02=» . P IDENT STRINP REL=10.0,800314,870138041000 H P******************************************************************** 6 P* & P* DISPLAY MANAGEMENT IN CREDIT P* " P* RUNNING UNDER CREDIT 10.0 P* TOSS 10.0
0x0e455c…0e46f0 Dummy {f00=0x0048, f01=0x0190, f02=» P* D P* INPUT FROM A STRING TO THE VARIABLE FIELDS OF A COMPLETE OR " P* A PART OF A DISPLAY FORMAT V P* | P* PARAMETERS: L P* <TYPE> BINARY ITEM HOLDING FIELD TYPE 0=FKI 1=FINP 2=F . P* <INPUT STRING> T
0x0e46f0…0e4884 Dummy {f00=0x0048, f01=0x0190, f02=»OSITION COUNT 0 p L P* AT RETURN INPUT START POINTS WHERE MOVE WAS END L P* <UNIT SEPARATOR> STRING THAT HOLDS A CHARACTER WHICH SEPARATES E h 6 P* FIELD IN THE INPUT STRING L P* <INDEX1>
0x0e4884…0e4a18 Dummy {f00=0x0048, f01=0x0190, f02=»RN <INDEX1> HOLDS THE FIELD INDEX TO p 2 P* THE LAST MOVED FIELD , L P* <INDEX2> BINARY ITEM HOLDING THE LAST VARIABLE FIELD IND b * P* MUST NOT BE 0 H P* <RETURN CODE> BINARY ITEM HOL
0x0e4a18…0e4bac Dummy {f00=0x0048, f01=0x0190, f02=»****************** Z P DDUM SPDDIV P PDIV . . P ENTRY STRINP INPUT FROM STRING TO FORMAT < P* n P EXT STRIN1 MOVE TO FORMAT x P* & P* DESCRIPTION OF ROUTINE STRIN1: @ P**********************************************************
0x0e4bac…0e4d40 Dummy {f00=0x0048, f01=0x0190, f02=»CALLED FROM CREDIT STANDARD MODULE 'S T R I N P' P* 8 . P* THE UNIT SEPARATOR IS FIRST SEARCHED. B @ P* SEARCH STARTS AT GIVEN STARTPOSITION WITHIN THE STRING. t < P* WHEN THE UNIT SEPARATOR IS FOUND THE SUBSTRING TO BE P* MOVED IS IDE
0x0e4d40…0e4ed4 (2, 7) Dummy {f00=0x0048, f01=0x0190, f02=» ITEM IS SHORTER THE REST WILL BE FILLED WITH X'00' P* D B P* CALL STRIN1,<INPUT STRING>,<INPUT START>,<UNIT SEPARATOR> N P* WHERE . P* <INPUT STRING> STRING TO HOLD INPUT @ P* <INPUT START> BINARY ITEM WITH START POS
0x0e4ed4…0e5068 Dummy {f00=0x0048, f01=0x0190, f02=»TS WHERE MOVE ENDED ` D P* <UNIT SEPARATOR> STRING TO HOLD A CHARACTER THAT SEPARATES 6 P* THE FIELDS IN <INPUT STRING> d P* @ P************************************************************ P EJECT P* > PSTRI
0x0e5068…0e51fc Dummy {f00=0x0048, f01=0x0190, f02=»* P CBL INDEX2,INDEX1,SINERR PSIN010 , P IB TYPE,SIN100,SIN200 : , P GETFLD 0,INDEX1,RETCOD ONLY FKI FIELDS X P B SIN300 PSIN100 , P GETFLD 1,INDEX1,RETCOD ONLY FINP FIELDS P B SIN300 PSIN200 4 P GETFLD 2,INDEX1
0x0e51fc…0e5390 Dummy {f00=0x0048, f01=0x018e, f02=»IELD EARILIER FOUND PSINERR * P MOVE RETCOD,=W'3' RETURN ERROR CODE 3 * P B SINRET X P EJECT j P* x @ P* PERFORM MOVE FROM INPUT STRING TO CURRENT VARIABLE FIELD P* PSIN350 $ P CALL STRIN1,INPSTR,INPSTA,INPUS P*
0x0e5390…0e5524 Dummy {f00=0x0048, f01=0x4096, f02=» | P SWITCH P B SIN010 PSIN400 * P MOVE RETCOD,=W'0' 8 PSINRET RET R P PEND d P* r P* | P END @ M INPUT STRING TO CURRENT VARIABLE FIELD P* PSIN350 $ P CALL STRIN1,INPSTR,INPSTA,INPUS P*
0x0e5524…0e56b8 Dummy {f00=0x0048, f01=0x2008, f02=» PSINRET RET P PEND P* * P* 4 P END >@ JROM INPUT STRING TO CURRENT VARIABLE FIELD < P* PSIN350 $ P CALL STRIN1,INPSTR,INPSTA,INPUS P* , P BNZ SINERR UNSUCESSFUL MOVE FROM STRING 8 P CBNL INDEX1,I
0x0e56b8…0e584c Dummy {f00=0x0048, f01=0x0190, f02=»LENGTH p P SU PP,CSB,TCA REL PP P LKM , P DATA 1 8 P AD PP,CSB,TCA LOG PP H < P EJECT T:EDFL T:EDFL T:EDFL T:EDFL T:EDFL f P* & P LD A8,FCBKB,BFCB GET ECB ADDRESS $ P LD A1,ECBRC,A8 GET RETURN CODE P RF(Z)
0x0e584c…0e59e0 Dummy {f00=0x0048, f01=0x0190, f02=» p < P EJECT T:EDFL T:EDFL T:EDFL T:EDFL T:EDFL P* H P* INCORRECT LENGTH R P* l P LD A1,ORDER,BFCB v P ANK A1,/40 * P RF(Z) UNDEF JUMP IF READ IN LAST POS. ( P LD A2,BUFFST,BFCB GET BUFFER START , P AD A2,REL
0x0e59e0…0e5b74 (2, 8) Opaque[0x194]
0x0e5b74…0e5d08 # DirEnt {nam=»STROUT«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0920, f03=0x0000}
0x0e5b74…0e5d08 IdxSect {
0x0e5b74…0e5d08 f00 = 0x0049 // 0xe5b74 @0x0
0x0e5b74…0e5d08 f01 = 0x0004 // 0xe5b76 @0x2
0x0e5b74…0e5d08 gno = [ // 0xe5b78 @0x4
0x0e5b74…0e5d08 [0x00]: C0x0049.0x0.0
0x0e5b74…0e5d08 [0x01]: C0x0049.0x1.0
0x0e5b74…0e5d08 ]
0x0e5b74…0e5d08 }
0x0e5d08…0e5e9c Dummy {f00=0x0049, f01=0x0190, f02=» . P IDENT STROUT REL=10.0,800314,870138041000 H P******************************************************************** 6 P* & P* DISPLAY MANAGEMENT IN CREDIT P* " P* RUNNING UNDER CREDIT 10.0 P* TOSS 10.0
0x0e5e9c…0e6030 Dummy {f00=0x0049, f01=0x0190, f02=» P* D P* OUTPUT TO A STRING FROM THE VARIABLE FIELDS OF A COMPLETE OR " P* A PART OF A DISPLAY FORMAT V P* | P* PARAMETERS: L P* <TYPE> BINARY ITEM HOLDING FIELD TYPE 0=FKI 1=FINP 2=F . P* <OUTPUT STRING> T
0x0e6030…0e61c4 Dummy {f00=0x0049, f01=0x0190, f02=»OSITION COUNT 0 p L P* AT RETURN <OUTPUT START> POINTS WHERE MOVE WAS L P* <UNIT SEPARATOR> STRING THAT HOLDS A CHARACTER WHICH SEPARATES E h 8 P* FIELD IN THE OUTPUT STRING L P* <INDEX1>
0x0e61c4…0e6358 Dummy {f00=0x0049, f01=0x0190, f02=»TURN <INDEX1> HOLDS THE FIELD INDEX TO r 2 P* THE LAST MOVED FIELD . L P* <INDEX2> BINARY ITEM HOLDING THE LAST VARIABLE FIELD IND d * P* MUST NOT BE 0 H P* <RETURN CODE> BINARY ITEM H
0x0e6358…0e64ec Dummy {f00=0x0049, f01=0x0190, f02=»************* P DDUM SPDDIV P PDIV * . P ENTRY STROUT OUTPUT FROM FORMAT TO STRING 8 P* j & P EXT STROU1 MOVE TO OUTPUT STRING t P* & P* DESCRIPTION OF ROUTINE STROU1* @ P******************************************************
0x0e64ec…0e6680 Dummy {f00=0x0049, f01=0x018e, f02=» 8 P* CALLED FORM CREDIT STANDARD MODULE 'S T R O U T' P* D F P* A CHECK THAT OUTPUT STRING IS LARGE ENOUGH IS PERFORMED FIRST. N H P* MOVE ROUTINE T:DUPX USED BY T:DUPL FUNCTION IS USED, NOT NEEDED 4 P* BYTES IN OUTPUT STRING ARE FILLE
0x0e6680…0e6814 (2, 9) Dummy {f00=0x0049, f01=0x0190, f02=» D P* CALL STROU1,<OUTPUT STRING>,<OUTPUT START>,<UNIT SEPARATOR> P* WHERE P 0 P* <OUTPUT STRING> STRING TO HOLD OUTPUT b B P* <OUTPUT START> BINARY ITEM WITH START POSITION WITHIN B P* <OUTPUT STRING> FIRST
0x0e6814…0e69a8 Dummy {f00=0x0049, f01=0x0190, f02=» HOLD A CHARACTER THAT SEPARATES p 8 P* THE FIELDS IN <OUTPUT STRING> ( P* d @ P************************************************************ n P EJECT P* > PSTROUT PROC TYPE,OUTSTR,OUTSTA,OUTUS,INDEX1,INDEX2,RETCOD
0x0e69a8…0e6b3c Dummy {f00=0x0049, f01=0x0190, f02=» IB TYPE,SOU100,SOU200 , P GETFLD 0,INDEX1,RETCOD ONLY FKI FIELDS P B SOU300 N PSOU100 ` , P GETFLD 1,INDEX1,RETCOD ONLY FINP FIELDS n P B SOU300 PSOU200 4 P GETFLD 2,INDEX1,RETCOD BOTH FKI AND FINP FIELDS PSOU300 P BZ
0x0e6b3c…0e6cd0 Dummy {f00=0x0049, f01=0x018e, f02=» RETURN ERROR CODE 3 ~ P B SOURET P EJECT . P* < B P* PERFORM MOVE TO OUTPUT STRING FROM CURRENT VARIABLE FIELD F P* PSOU350 $ P CALL STROU1,OUTSTR,OUTSTA,OUTUS P BNZ SOUERR MOVE NOT OK P CBNL INDEX1,INDEX2,SOU400
0x0e6cd0…0e6e64 Dummy {f00=0x0049, f01=0x4014, f02=» P END @ ~ P B SOURET P EJECT . P* < B P* PERFORM MOVE TO OUTPUT STRING FROM CURRENT VARIABLE FIELD F P* PSOU350 $ P CALL STROU1,OUTSTR,OUTSTA,OUTUS P BNZ SOUERR MOVE NOT OK P CBNL INDEX1,INDEX2,SOU400
0x0e6e64…0e6ff8 Dummy {f00=0x0049, f01=0x2008, f02=» PERFORM MOVE TO OUTPUT STRING FROM CURRENT VARIABLE FIELD P* J PSOU350 T $ P CALL STROU1,OUTSTR,OUTSTA,OUTUS b P BNZ SOUERR MOVE NOT OK P CBNL INDEX1,INDEX2,SOU400 P ADD INDEX1,=W'1' P SWITCH P B SOU010 P
0x0e6ff8…0e718c Dummy {f00=0x0049, f01=0x0190, f02=» & P* DISPLAY BUFFER. MOVING IS ENDED P* WHEN X'00' IS DETECTED . , P* OUTPUT: A1=NUMBER OF MOVED CHARACTERS N P* ~ PMOVOUT EQU * P LDK A1,0 CLEAR COUNTER P LD A2,FCBDY,BFCB P LD A2,ECBBA,A2 & P ADK A2,2 GET DISPLAY BUFF
0x0e718c…0e7320 Dummy {f00=0x0049, f01=0x4152, f02=» A4,A3 GET CHR FROM USER BUFFER & P SCR A4,A2 STORE IN DISPLAY BUFFER ( P ANK A4,/FF R " P RF(Z) MOV200 JUMP IF FINISHED f P ADK A1,1 INCREMENT COUNTER P ADK A2,1 INCREMENT POINTER P ADK A3,1 INCREMENT POINTER P RB MOV100 CONTI
0x0e7320…0e74b4 (2, 10) Opaque[0x194]
0x0e74b4…0e7648 # DirEnt {nam=»SPDDIV«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0930, f03=0x0000}
0x0e74b4…0e7648 IdxSect {
0x0e74b4…0e7648 f00 = 0x0049 // 0xe74b4 @0x0
0x0e74b4…0e7648 f01 = 0x0002 // 0xe74b6 @0x2
0x0e74b4…0e7648 gno = [ // 0xe74b8 @0x4
0x0e74b4…0e7648 [0x00]: C0x0049.0x2.0
0x0e74b4…0e7648 ]
0x0e74b4…0e7648 }
0x0e7648…0e77dc Dummy {f00=0x0049, f01=0x0190, f02=» . P IDENT SPDDIV REQUIRED VARIABLES REL 10.0 P* 6 , P* MINI DATA DIVISION FOR DISPLAY TASKS @ P* p P DDIV z 0 P OPTNS ADRMOD=2 2-BYTE ADDRESSING EVERYWHERE P* P TERM T1 P TWB TB1 P START START P STACK 64
0x0e77dc…0e7970 Dummy {f00=0x0049, f01=0x4136, f02=»OUTDS=SPDSSCRN z P EJECT P* $ PTB1 BLK . PSPPROMPT BOOL > PSPCHANGE BOOL T PSPERCALL BOOL j PSPBINW1 BIN PSPBINW2 BIN PSPBINW3 BIN PSPBINW4 BIN PSPSTRGW1 STRG 2 PSPINPUT STRG 62 P*
0x0e7970…0e7b04 Dummy {f00=0x0049, f01=0x2008, f02=» r P EJECT P* PTB1 BLK & PSPPROMPT BOOL 6 PSPCHANGE BOOL L PSPERCALL BOOL b PSPBINW1 BIN x PSPBINW2 BIN PSPBINW3 BIN PSPBINW4 BIN PSPSTRGW1 STRG 2 PSPINPUT STRG 62 P* P PDIV
0x0e7b04…0e7c98 Dummy {f00=0x0049, f01=0x411c, f02=» > @ IDENT EMPTYT T,REL=10.0,800314,870137141000 EMPTYT F EMPTYT X I:EVA0 l , ( @ #0 0T & ! T ~ I:RT1 , ( P & ! X T C T T !P
0x0e7c98…0e7e2c Dummy {f00=0x0049, f01=0x0190, f02=» > @ IDENT T:STIN T,REL=10.0,800314,870137141000 STRIN1 F STRIN1 X T:STEV l , ( @ X x & Y " X R W ~ T:RNOK T:LOFS , ( P _ Y $ I:E
0x0e7e2c…0e7fc0 Dummy {f00=0x0049, f01=0x416a, f02=» ! P " P z I:ERR2 , ( s W " P X $ X " R W , , ( V R W V % _ I:MOV T:GRFC , ( $ " D $ D X T:ROK $ X y &
0x0e7fc0…0e8154 (2, 11) Opaque[0x194]
0x0e8154…0e82e8 # DirEnt {nam=»SPLITT«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0938, f03=0x0000}
0x0e8154…0e82e8 IdxSect {
0x0e8154…0e82e8 f00 = 0x0049 // 0xe8154 @0x0
0x0e8154…0e82e8 f01 = 0x0004 // 0xe8156 @0x2
0x0e8154…0e82e8 gno = [ // 0xe8158 @0x4
0x0e8154…0e82e8 [0x00]: C0x0049.0x3.0
0x0e8154…0e82e8 [0x01]: C0x004a.0x0.0
0x0e8154…0e82e8 ]
0x0e8154…0e82e8 }
0x0e82e8…0e847c Dummy {f00=0x0049, f01=0x0190, f02=» P* $ P******************************** $ P* S P L I T T 79-12-10 * 6 $ P******************************** ^ P* 0 P* THIS MODULE IS USED BY SCREEN PACKAGE. 2 P* IT CONTAINS KEYTABLES AND ERROR PRINTOUTS 0 P* USED IN C
0x0e847c…0e8610 Dummy {f00=0x0049, f01=0x0190, f02=» AT THE VERY h , P* FIRST POSITION IN THE CURRENT FIELD P* D 2 PSPKTAB1 KTAB BSP,CLR1,CLR2,EOI,CANC1,CANC2, C N P FWD,BWD,HOME,LDOWN, C " P LEFT,RIGHT,DOWN,UP,HCOPY, C P DUP,EDIT,ENT P* 4 P* KEYTABLE USED WHEN CURSOR
0x0e8610…0e87a4 Dummy {f00=0x0049, f01=0x0190, f02=»ANC2, C j P FWD,BWD,HOME,LDOWN, C " P LEFT,RIGHT,DOWN,UP,HCOPY, C 0 P DUP,EDIT,ENT V P* l $ P* KEYTABLE USED IN EDIT MODE v P* , PSPKTAB3 KTAB CFWD,CBWD,INS,DEL,CLR1, C $ P CLR2,CLR3,EOI,CANC1,CANC2, C P FWD,BW
0x0e87a4…0e8938 Dummy {f00=0x0049, f01=0x0190, f02=» ERROR PRINTOUTS t P* > PSPFTBERR FTABLE ERFM01,ERFM02,ERFM03,ERFM04,ERFM05,ERFM06 " P* d PERFM01 FRMT n P FSL & P FTEXT 'TOO FEW INPUT CHARACTERS' P FMEND P* PERFM02 FRMT P FSL P FTEXT 'UNDEFINED ERROR'
0x0e8938…0e8acc Dummy {f00=0x0049, f01=0x0190, f02=»SL $ P FTEXT 'ILLEGAL END-OF-ITEM KEY' P FMEND 2 P* @ PERFM05 FRMT J P FSL ^ ( P FTEXT 'COMPULSORY FIELD NOT FILLED' j P FMEND PERFM06 FRMT P FSL P FTEXT 'ILLEGAL TYPE' P FMEND P EJECT P* 6 P
0x0e8acc…0e8c60 Dummy {f00=0x0049, f01=0x018e, f02=»I EQU X'0C' PCANC1 EQU X'65' PCANC2 EQU X'66' , PFWD EQU X'09' D PBWD EQU X'07' Z PHOME EQU X'05' p PLDOWN EQU X'01' PLEFT EQU X'04' PRIGHT EQU X'06' PDOWN EQU X'02' PUP EQU X'08' PHCOPY EQU X'0E'
0x0e8c60…0e8df4 (2, 12) Dummy {f00=0x004a, f01=0x4034, f02=» PDEL EQU X'1D' PCLR3 EQU X'64' @ 0
0x0e8df4…0e8f88 Dummy {f00=0x004a, f01=0x2008, f02=» ERRFMT FRMT FSL FHIGH * FTEXT 'ERROR NUMBER ' 8 FTEXT X'7' BELL V FMEL '9',BCDWK ERROR NUMBER n FMEND @ . )* FORMAT TABLE CONTAINING ERROR PRINTOUTS * * * SPFTBERR TO BE SUP
0x0e8f88…0e911c Dummy {f00=0x004a, f01=0x4158, f02=» h , ( s ?A W ?AW <! P , ( X " X R W V y 8 T:DUPX h T:GRFC z , ( & Y $ 8 " X X T:ROK T:RNOK x ( y $ < 8 9
0x0e911c…0e92b0 Dummy {f00=0x004a, f01=0x414c, f02=» @ @ IDENT T:STEV T,REL=4.1,79-05-23,870137140410 T:STEV H T:STEV Z T:GRFC n I:EVA0 * & H #0T Y Y , ( ! T # P & #0T ( I:ERR2 7
0x0e92b0…0e9444 Dummy {f00=0x004a, f01=0x018e, f02=» @ @ IDENT T:EDFL T,REL=4.1,79-05-23,870137140410 T:EDFL H T:EDFL Z T:PM1 n T:PM2 ~ T:CASP , ( I Y ( x P Y * , ( x y W X " T:DUP
0x0e9444…0e95d8 Dummy {f00=0x004a, f01=0x0190, f02=» , ( w V X ( x C T:CSEG 8 T:SCUW J , ( ( Y * X Y , , ( X X C & C C , ( ( B P 9 T:IOER , ( R
0x0e95d8…0e976c Dummy {f00=0x004a, f01=0x0190, f02=» T:BELL , ( K _ _ B U C Q C T:CLR1 @ T:CLR2 R , ( i @ D X X * d , ( $" ~_> @ Y X * _R X !@ , ( XX y X # x V y X X , ( * P
0x0e976c…0e9900 Dummy {f00=0x004a, f01=0x416a, f02=» y X 1 1 X , ( ? !@T X $ " P y _ $ T:CLIT T T:EKEY f , ( _ x T X H X x $ { X * , )$ P _ : H D !T P l )Wz 9 UP m l yV* Ph R^ PP +P ET YU
0x0e9900…0ea5a0 (3, 0) DirGranule ((3, 0)) {
0x0e9900…0ea5a0 DirEnt {nam=»TOSSUT«, typ=»IL«, f00=0x0000, f01=0x0000, f02=0x0948, f03=0x0000}
0x0e9900…0ea5a0 DirEnt {nam=»UTIL05«, typ=»LM«, f00=0x019a, f01=0x0196, f02=0x0950, f03=0x0008}
0x0e9900…0ea5a0 DirEnt {nam=»UTIL01«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0a00, f03=0x0000}
0x0e9900…0ea5a0 DirEnt {nam=»UTIL02«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0a50, f03=0x0000}
0x0e9900…0ea5a0 DirEnt {nam=»UTIL03«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0aa8, f03=0x0000}
0x0e9900…0ea5a0 DirEnt {nam=»UTIL04«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0b00, f03=0x0000}
0x0e9900…0ea5a0 DirEnt {nam=»UTIL06«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0b58, f03=0x0000}
0x0e9900…0ea5a0 DirEnt {nam=»MON01 «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0ba8, f03=0x0000}
0x0e9900…0ea5a0 DirEnt {nam=»CONF01«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x0c10, f03=0x0000}
0x0e9900…0ea5a0 DirEnt {nam=»OBDIR «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x0c18, f03=0x0000}
0x0e9900…0ea5a0 DirEnt {nam=»UTIL01«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x0c38, f03=0x0000}
0x0e9900…0ea5a0 DirEnt {nam=»UTIL02«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x0c40, f03=0x0000}
0x0e9900…0ea5a0 DirEnt {nam=»UTIL03«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x0c48, f03=0x0000}
0x0e9900…0ea5a0 DirEnt {nam=»UTIL04«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x0c50, f03=0x0000}
0x0e9900…0ea5a0 DirEnt {nam=»UTIL06«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x0c58, f03=0x0000}
0x0e9900…0ea5a0 DirEnt {nam=»DUMENT«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0c60, f03=0x0000}
0x0e9900…0ea5a0 DirEnt {nam=»UTIL05«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x0c68, f03=0x0000}
0x0e9900…0ea5a0 DirEnt {nam=»MON02 «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0c70, f03=0x0000}
0x0e9900…0ea5a0 DirEnt {nam=»/OBJCT«, typ=»OB«, f00=0x0000, f01=0x0000, f02=0x0ce0, f03=0x0000}
0x0e9900…0ea5a0 DirEnt {nam=»FLXMON«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0e40, f03=0x0000}
0x0e9900…0ea5a0 DirEnt {nam=»MONCOP«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0e68, f03=0x0000}
0x0e9900…0ea5a0 DirEnt {nam=»CASCOP«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0e90, f03=0x0000}
0x0e9900…0ea5a0 DirEnt {nam=»CASCON«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x0e98, f03=0x0000}
0x0e9900…0ea5a0 DirEnt {nam=»FLXCON«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x0ea0, f03=0x0000}
0x0e9900…0ea5a0 DirEnt {nam=»FLXCOP«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0ea8, f03=0x0000}
0x0e9900…0ea5a0 }
0x0ea5a0…0ea734 (3, 1) Opaque[0x194]
0x0ea734…0ea8c8 # DirEnt {nam=»UTIL05«, typ=»LM«, f00=0x019a, f01=0x0196, f02=0x0950, f03=0x0008}
0x0ea734…0ea8c8 IdxSect {
0x0ea734…0ea8c8 f00 = 0x004a // 0xea734 @0x0
0x0ea734…0ea8c8 f01 = 0x002c // 0xea736 @0x2
0x0ea734…0ea8c8 gno = [ // 0xea738 @0x4
0x0ea734…0ea8c8 [0x00]: C0x004a.0x2.0
0x0ea734…0ea8c8 [0x01]: C0x004a.0x3.0
0x0ea734…0ea8c8 [0x02]: C0x004b.0x0.0
0x0ea734…0ea8c8 [0x03]: C0x004b.0x1.0
0x0ea734…0ea8c8 [0x04]: C0x004b.0x2.0
0x0ea734…0ea8c8 [0x05]: C0x004b.0x3.0
0x0ea734…0ea8c8 [0x06]: C0x004c.0x0.0
0x0ea734…0ea8c8 [0x07]: C0x004c.0x1.0
0x0ea734…0ea8c8 [0x08]: C0x004c.0x2.0
0x0ea734…0ea8c8 [0x09]: C0x004c.0x3.0
0x0ea734…0ea8c8 [0x0a]: C0x004d.0x0.0
0x0ea734…0ea8c8 [0x0b]: C0x004d.0x1.0
0x0ea734…0ea8c8 [0x0c]: C0x004d.0x2.0
0x0ea734…0ea8c8 [0x0d]: C0x004d.0x3.0
0x0ea734…0ea8c8 [0x0e]: C0x004e.0x0.0
0x0ea734…0ea8c8 [0x0f]: C0x004e.0x1.0
0x0ea734…0ea8c8 [0x10]: C0x004e.0x2.0
0x0ea734…0ea8c8 [0x11]: C0x004e.0x3.0
0x0ea734…0ea8c8 [0x12]: C0x004f.0x0.0
0x0ea734…0ea8c8 [0x13]: C0x004f.0x1.0
0x0ea734…0ea8c8 [0x14]: C0x004f.0x2.0
0x0ea734…0ea8c8 [0x15]: C0x004f.0x3.0
0x0ea734…0ea8c8 ]
0x0ea734…0ea8c8 }
0x0ea8c8…0eaa5c Dummy {f00=0x004a, f01=0x0190, f02=»D 8 ? 8 fY%w x b # g $ ^ : 9 i $ 7 f w |4r tV u 3 qC 5 * zuqV $ ' > P ZD o c r P| sV i % 9Zj Q > - D $ 4` 1P -8 T r tB l`Tg t z ^ lFZF H 2 Z j z
0x0eaa5c…0eabf0 Dummy {f00=0x004a, f01=0x0190, f02=» 4c @]u N d 2Z $"z y L / y N Dl` n $ @ 4Z wL a [ ? d d% L & "~ T &b CCn 1 d J < R:R: ` T l` % l`zF :| Fb fvzn : v ` ^* D3bH P D' >~ `" f >~ $' d p 4d @ B
0x0eabf0…0ead84 Dummy {f00=0x004a, f01=0x0190, f02=» ^F < ? 8 fY%w x b # g $ ^ : 9 i $ 7 f w |4r tV u 3 qC 5 * zuqV $ ' > P ZD o c r P| sV i % 9Zj Q > - D $ 4` 1P -8 T r tB l`Tg t z ^ lFZF H 2 Z j z
0x0ead84…0eaf18 Dummy {f00=0x004a, f01=0x0190, f02=» 4c @]u N d 2Z $"z y L / y N Dl` n $ @ 4Z wL a [ ? d d% L & "~ T &b CCn 1 d J < R:R: ` T l` % l`zF :| Fb fvzn : v ` ^* D3bH P D' >~ `" f >~ $' d p 4d @ B
0x0eaf18…0eb0ac Dummy {f00=0x004a, f01=0x0190, f02=» ^F < ? 8 fY%w x b # g $ ^ : 9 i $ 7 f w |4r tV u 3 qC 5 * zuqV $ ' > P ZD o c r P| sV i % 9Zj Q > - D $ 4` 1P -8 T r tB l`Tg t z ^ lFZF H 2 Z j z
0x0eb0ac…0eb240 Dummy {f00=0x004a, f01=0x0190, f02=» 4c @]u N d 2Z $"z y L / y N Dl` n $ @ 4Z wL a [ ? d d% L & "~ T &b CCn 1 d J < R:R: ` T l` % l`zF :| Fb fvzn : v ` ^* D3bH P D' >~ `" f >~ $' d p 4d @ B
0x0eb240…0eb3d4 (3, 2) Dummy {f00=0x004a, f01=0x0190, f02=» ^F < ? 8 fY%w x b # g $ ^ : 9 i $ 7 f w |4r tV u 3 qC 5 * zuqV $ ' > P ZD o c r P| sV i % 9Zj Q > - D $ 4` 1P -8 T r tB l`Tg t z ^ lFZF H 2 Z j z
0x0eb3d4…0eb568 Dummy {f00=0x004a, f01=0x0190, f02=» 4c @]u N d 2Z $"z y L / y N Dl` n $ @ 4Z wL a [ ? d d% L & "~ T &b CCn 1 d J < R:R: ` T l` % l`zF :| Fb fvzn : v ` ^* D3bH P D' >~ `" f >~ $' d p 4d @ B
0x0eb568…0eb6fc Dummy {f00=0x004a, f01=0x0190, f02=» ^F < ? 8 fY%w x b # g $ ^ : 9 i $ 7 f w |4r tV u 3 qC 5 * zuqV $ ' > P ZD o c r P| sV i % 9Zj Q > - D $ 4` 1P -8 T r tB l`Tg t z ^ lFZF H 2 Z j z
0x0eb6fc…0eb890 Dummy {f00=0x004a, f01=0x0190, f02=» 4c @]u N d 2Z $"z y L / y N Dl` n $ @ 4Z wL a [ ? d d% L & "~ T &b CCn 1 d J < R:R: ` T l` % l`zF :| Fb fvzn : v ` ^* D3bH P D' >~ `" f >~ $' d p 4d @ B
0x0eb890…0eba24 Dummy {f00=0x004a, f01=0x0190, f02=» ^F < ? 8 fY%w x b # g $ ^ : 9 i $ 7 f w |4r tV u 3 qC 5 * zuqV $ ' > P ZD o c r P| sV i % 9Zj Q > - D $ 4` 1P -8 T r tB l`Tg t z ^ lFZF H 2 Z j z
0x0eba24…0ebbb8 Dummy {f00=0x004a, f01=0x0190, f02=» 4c @]u N d 2Z $"z y L / y N Dl` n $ @ 4Z wL a [ ? d d% L & "~ T &b CCn 1 d J < R:R: ` T l` % l`zF :| Fb fvzn : v ` ^* D3bH P D' >~ `" f >~ $' d p 4d @ B
0x0ebbb8…0ebd4c Dummy {f00=0x004a, f01=0x0190, f02=» ^F < ? 8 fY%w x b # g $ ^ : 9 i $ 7 f w |4r tV u 3 qC 5 * zuqV $ ' > P ZD o c r P| sV i % 9Zj Q > - D $ 4` 1P -8 T r tB l`Tg t z ^ lFZF H 2 Z j z
0x0ebd4c…0ebee0 Dummy {f00=0x004a, f01=0x0190, f02=» 4c @]u N d 2Z $"z y L / y N Dl` n $ @ 4Z wL a [ ? d d% L & "~ T &b CCn 1 d J < R:R: ` T l` % l`zF :| Fb fvzn : v ` ^* D3bH P D' >~ `" f >~ $' d p 4d @ B
0x0ebee0…0ec074 (3, 3) Dummy {f00=0x004b, f01=0x0190, f02=» ^F < ? 8 fY%w x b # g $ ^ : 9 i $ 7 f w |4r tV u 3 qC 5 * zuqV $ ' > P ZD o c r P| sV i % 9Zj Q > - D $ 4` 1P -8 T r tB l`Tg t z ^ lFZF H 2 Z j z
0x0ec074…0ec208 Dummy {f00=0x004b, f01=0x0190, f02=» 4c @]u N d 2Z $"z y L / y N Dl` n $ @ 4Z wL a [ ? d d% L & "~ T &b CCn 1 d J < R:R: ` T l` % l`zF :| Fb fvzn : v ` ^* D3bH P D' >~ `" f >~ $' d p 4d @ B
0x0ec208…0ec39c Dummy {f00=0x004b, f01=0x0190, f02=» ^F < ? 8 fY%w x b # g $ ^ : 9 i $ 7 f w |4r tV u 3 qC 5 * zuqV $ ' > P ZD o c r P| sV i % 9Zj Q > - D $ 4` 1P -8 T r tB l`Tg t z ^ lFZF H 2 Z j z
0x0ec39c…0ec530 Dummy {f00=0x004b, f01=0x0190, f02=» 4c @]u N d 2Z $"z y L / y N Dl` n $ @ 4Z wL a [ ? d d% L & "~ T &b CCn 1 d J < R:R: ` T l` % l`zF :| Fb fvzn : v ` ^* D3bH P D' >~ `" f >~ $' d p 4d @ B
0x0ec530…0ec6c4 Dummy {f00=0x004b, f01=0x0190, f02=» ^F < ? 8 fY%w x b # g $ ^ : 9 i $ 7 f w |4r tV u 3 qC 5 * zuqV $ ' > P ZD o c r P| sV i % 9Zj Q > - D $ 4` 1P -8 T r tB l`Tg t z ^ lFZF H 2 Z j z
0x0ec6c4…0ec858 Dummy {f00=0x004b, f01=0x0190, f02=» 4c @]u N d 2Z $"z y L / y N Dl` n $ @ 4Z wL a [ ? d d% L & "~ T &b CCn 1 d J < R:R: ` T l` % l`zF :| Fb fvzn : v ` ^* D3bH P D' >~ `" f >~ $' d p 4d @ B
0x0ec858…0ec9ec Dummy {f00=0x004b, f01=0x0190, f02=» ^F < ? 8 fY%w x b # g $ ^ : 9 i $ 7 f w |4r tV u 3 qC 5 * zuqV $ ' > P ZD o c r P| sV i % 9Zj Q > - D $ 4` 1P -8 T r tB l`Tg t z ^ lFZF H 2 Z j z
0x0ec9ec…0ecb80 Dummy {f00=0x004b, f01=0x0190, f02=» 4c @]u N d 2Z $"z y L / y N Dl` n $ @ 4Z wL a [ ? d d% L & "~ T &b CCn 1 d J < R:R: ` T l` % l`zF :| Fb fvzn : v ` ^* D3bH P D' >~ `" f >~ $' d p 4d @ B
0x0ecb80…0ecd14 (3, 4) Dummy {f00=0x004b, f01=0x0190, f02=» ^F < ? 8 fY%w x b # g $ ^ : 9 i $ 7 f w |4r tV u 3 qC 5 * zuqV $ ' > P ZD o c r P| sV i % 9Zj Q > - D $ 4` 1P -8 T r tB l`Tg t z ^ lFZF H 2 Z j z
0x0ecd14…0ecea8 Dummy {f00=0x004b, f01=0x0190, f02=» 4c @]u N d 2Z $"z y L / y N Dl` n $ @ 4Z wL a [ ? d d% L & "~ T &b CCn 1 d J < R:R: ` T l` % l`zF :| Fb fvzn : v ` ^* D3bH P D' >~ `" f >~ $' d p 4d @ B
0x0ecea8…0ed03c Dummy {f00=0x004b, f01=0x0190, f02=» ^F < ? 8 fY%w x b # g $ ^ : 9 i $ 7 f w |4r tV u 3 qC 5 * zuqV $ ' > P ZD o c r P| sV i % 9Zj Q > - D $ 4` 1P -8 T r tB l`Tg t z ^ lFZF H 2 Z j z
0x0ed03c…0ed1d0 Dummy {f00=0x004b, f01=0x0190, f02=» 4c @]u N d 2Z $"z y L / y N Dl` n $ @ 4Z wL a [ ? d d% L & "~ T &b CCn 1 d J < R:R: ` T l` % l`zF :| Fb fvzn : v ` ^* D3bH P D' >~ `" f >~ $' d p 4d @ B
0x0ed1d0…0ed364 Dummy {f00=0x004b, f01=0x0190, f02=» ^F < ? 8 fY%w x b # g $ ^ : 9 i $ 7 f w |4r tV u 3 qC 5 * zuqV $ ' > P ZD o c r P| sV i % 9Zj Q > - D $ 4` 1P -8 T r tB l`Tg t z ^ lFZF H 2 Z j z
0x0ed364…0ed4f8 Dummy {f00=0x004b, f01=0x0190, f02=» 4c @]u N d 2Z $"z y L / y N Dl` n $ @ 4Z wL a [ ? d d% L & "~ T &b CCn 1 d J < R:R: ` T l` % l`zF :| Fb fvzn : v ` ^* D3bH P D' >~ `" f >~ $' d p 4d @ B
0x0ed4f8…0ed68c Dummy {f00=0x004b, f01=0x0190, f02=» ^F < ? 8 fY%w x b # g $ ^ : 9 i $ 7 f w |4r tV u 3 qC 5 * zuqV $ ' > P ZD o c r P| sV i % 9Zj Q > - D $ 4` 1P -8 T r tB l`Tg t z ^ lFZF H 2 Z j z
0x0ed68c…0ed820 Dummy {f00=0x004b, f01=0x0190, f02=» 4c @]u N d 2Z $"z y L / y N Dl` n $ @ 4Z wL a [ ? d d% L & "~ T &b CCn 1 d J < R:R: ` T l` % l`zF :| Fb fvzn : v ` ^* D3bH P D' >~ `" f >~ $' d p 4d @ B
0x0ed820…0ed9b4 (3, 5) Dummy {f00=0x004b, f01=0x0190, f02=» ^F < ? 8 fY%w x b # g $ ^ : 9 i $ 7 f w |4r tV u 3 qC 5 * zuqV $ ' > P ZD o c r P| sV i % 9Zj Q > - D $ 4` 1P -8 T r tB l`Tg t z ^ lFZF H 2 Z j z
0x0ed9b4…0edb48 Dummy {f00=0x004b, f01=0x0190, f02=» 4c @]u N d 2Z $"z y L / y N Dl` n $ @ 4Z wL a [ ? d d% L & "~ T &b CCn 1 d J < R:R: ` T l` % l`zF :| Fb fvzn : v ` ^* D3bH P D' >~ `" f >~ $' d p 4d @ B
0x0edb48…0edcdc Dummy {f00=0x004b, f01=0x0190, f02=» ^F < ? 8 fY%w x b # g $ ^ : 9 i $ 7 f w |4r tV u 3 qC 5 * zuqV $ ' > P ZD o c r P| sV i % 9Zj Q > - D $ 4` 1P -8 T r tB l`Tg t z ^ lFZF H 2 Z j z
0x0edcdc…0ede70 Dummy {f00=0x004b, f01=0x0190, f02=» 4c @]u N d 2Z $"z y L / y N Dl` n $ @ 4Z wL a [ ? d d% L & "~ T &b CCn 1 d J < R:R: ` T l` % l`zF :| Fb fvzn : v ` ^* D3bH P D' >~ `" f >~ $' d p 4d @ B
0x0ede70…0ee004 Dummy {f00=0x004b, f01=0x0190, f02=» ^F < ? 8 fY%w x b # g $ ^ : 9 i $ 7 f w |4r tV u 3 qC 5 * zuqV $ ' > P ZD o c r P| sV i % 9Zj Q > - D $ 4` 1P -8 T r tB l`Tg t z ^ lFZF H 2 Z j z
0x0ee004…0ee198 Dummy {f00=0x004b, f01=0x0190, f02=» 4c @]u N d 2Z $"z y L / y N Dl` n $ @ 4Z wL a [ ? d d% L & "~ T &b CCn 1 d J < R:R: ` T l` % l`zF :| Fb fvzn : v ` ^* D3bH P D' >~ `" f >~ $' d p 4d @ B
0x0ee198…0ee32c Dummy {f00=0x004b, f01=0x0190, f02=» ^F < ? 8 fY%w x b # g $ ^ : 9 i $ 7 f w |4r tV u 3 qC 5 * zuqV $ ' > P ZD o c r P| sV i % 9Zj Q > - D $ 4` 1P -8 T r tB l`Tg t z ^ lFZF H 2 Z j z
0x0ee32c…0ee4c0 Dummy {f00=0x004b, f01=0x0190, f02=» 4c @]u N d 2Z $"z y L / y N Dl` n $ @ 4Z wL a [ ? d d% L & "~ T &b CCn 1 d J < R:R: ` T l` % l`zF :| Fb fvzn : v ` ^* D3bH P D' >~ `" f >~ $' d p 4d @ B
0x0ee4c0…0ee654 (3, 6) Dummy {f00=0x004b, f01=0x0190, f02=» ^F < ? 8 fY%w x b # g $ ^ : 9 i $ 7 f w |4r tV u 3 qC 5 * zuqV $ ' > P ZD o c r P| sV i % 9Zj Q > - D $ 4` 1P -8 T r tB l`Tg t z ^ lFZF H 2 Z j z
0x0ee654…0ee7e8 Dummy {f00=0x004b, f01=0x0190, f02=» 4c @]u N d 2Z $"z y L / y N Dl` n $ @ 4Z wL a [ ? d d% L & "~ T &b CCn 1 d J < R:R: ` T l` % l`zF :| Fb fvzn : v ` ^* D3bH P D' >~ `" f >~ $' d p 4d @ B
0x0ee7e8…0ee97c Dummy {f00=0x004b, f01=0x0190, f02=» ^F < ? 8 fY%w x b # g $ ^ : 9 i $ 7 f w |4r tV u 3 qC 5 * zuqV $ ' > P ZD o c r P| sV i % 9Zj Q > - D $ 4` 1P -8 T r tB l`Tg t z ^ lFZF H 2 Z j z
0x0ee97c…0eeb10 Dummy {f00=0x004b, f01=0x0190, f02=» 4c @]u N d 2Z $"z y L / y N Dl` n $ @ 4Z wL a [ ? d d% L & "~ T &b CCn 1 d J < R:R: ` T l` % l`zF :| Fb fvzn : v ` ^* D3bH P D' >~ `" f >~ $' d p 4d @ B
0x0eeb10…0eeca4 Dummy {f00=0x004b, f01=0x0190, f02=» ^F < ? 8 fY%w x b # g $ ^ : 9 i $ 7 f w |4r tV u 3 qC 5 * zuqV $ ' > P ZD o c r P| sV i % 9Zj Q > - D $ 4` 1P -8 T r tB l`Tg t z ^ lFZF H 2 Z j z
0x0eeca4…0eee38 Dummy {f00=0x004b, f01=0x0190, f02=»?t 0 ]u N d 2Z $"z y L / y N Dl` n $ @ 4Z wL a [ ? d d% L & "~ T &b CCn 1 d J < R:R: ` T l` % l`zF :| Fb fvzn : v ` ^* D3bH ,* # + RC: 0 >~ $' d p 4d @ B
0x0eee38…0eefcc Dummy {f00=0x004b, f01=0x0190, f02=»PERATOR; TI? TH > R > V W ?& C ? C ( B P AB_ B Z T ? A. ?& B U [ B : $ !; P I?6 =Z I?6 ?4 ? C C ( : [ F A. Z : [ [ [ [ QxP~ , 0 S* P. 9A<AV
0x0eefcc…0ef160 Dummy {f00=0x004b, f01=0x0190, f02=» Y$R Y6 _ [ [ Q. , 0R" 9U AR FQ 0 P =D _, [ Z Z : = ! U 9 - Y : [ [ [ [ [ [ [ RZ 0=A H T R !LLT TL ! A@| TH R TL A XF
0x0ef160…0ef2f4 (3, 7) Dummy {f00=0x004c, f01=0x0190, f02=»V* Ah P P~ >Px Pr PlW _ A@x TH >FV :A HI @@xY HI @@xZ >AV KZW _ _ @@x @@| >BV -Wp>AV -Wh>AVd B ?t RV _ @@| T T S S S S >T T S S S S @@z - - TL A@| ?& B C R& TH > R > @@v
0x0ef2f4…0ef488 Dummy {f00=0x004c, f01=0x0190, f02=» LHt# AEJ AEL P AEL TH E< #( W0 @ELP E< #( : d M@ ^ R _ G* @ B W EN_ @ ?4 A. @EJP8 P2 R " R Q E< #( @EJ T R AEJ_. @@v L EN P^Q0 T$ F W2FUNCTION
0x0ef488…0ef61c Dummy {f00=0x004c, f01=0x0190, f02=» D TOSS UTILITIES REL 10.0 DATE: 80-03-14 12NC=870136641000 ; 0CC: WHAT?? ZCRV CRF DLF PVC PDS UDS CDD CFF CFT CTF PRF SCT LFD ULD CIT CTI WIL PIT BIX RIX CCF SRT XEY , 9:)*+ W
0x0ef61c…0ef7b0 Dummy {f00=0x004c, f01=0x0190, f02=» 67 - 4.5/0123 - <= 8 GHF@ 8J KLMVQRSTO 8 NP B AI A A V! VAW!T T"V"$, B A A A A A A AVAVA T A A A A V!VAVA A A E E AV!E A VAV!
0x0ef7b0…0ef944 Dummy {f00=0x004c, f01=0x0190, f02=» ' |
0x0ef944…0efad8 Dummy {f00=0x004c, f01=0x0190, f02=» d n v v n v ^ b X n
0x0efad8…0efc6c Dummy {f00=0x004c, f01=0x0190, f02=»7 4 5 " ( . 5 6 4 * H J{ r] n r V 8 ( ,a f X dO O.O4OPO^OjO O O O O O O P P O OBP P4 PLR PRPbPbPrP P P P P P P Q Q"O Q2QBQRQhO.Q Q Q O Q Q Q O Q PL Q R R R
0x0efc6c…0efe00 Dummy {f00=0x004c, f01=0x0190, f02=»S VXT T*TFT T V T S VXV TjV S~S S T S~S S W S~S V W X UjUVVXT T T T V X S~S T T U W UVUjU~U U U U V V V6V T S~S S W S~S V S~S V U,T S~S T T U W VRS~S T T U W VlV S~S VXV V W~S~S S W UjUVTFW.WDW T T U UjUVTFW.WDWTT T U WjW UjUVW T U T S~UjUVTFW.WDW T T W UH
0x0efe00…0eff94 (3, 8) Dummy {f00=0x004c, f01=0x0190, f02=»VOLUME NAMES:;FILE NAME:; NUMBER OF VTOC ENTRIES:;CREATION DATE:; RETENTION PERIOD:;BLOCKING FACTOR:; EFFECTIVE RECORD LENGTH:; MAXIMUM NUMBER OF RECORDS:; SECTOR NUMBER:; POSITION:;HEX.VALUE:; FILE ORG:;***INPUT DEFINITION***; ***OUTPUT DEFINITION***;PACK:;OUTPUT
0x0eff94…0f0128 Dummy {f00=0x004c, f01=0x0190, f02=»OR OUTPUT TAPE:;TAPE VOLUME ID:;RECORD LIMITS:; PRINT FORMAT:;RECORD NUMBERS IN LISTING:; CHARACTER CODE:;PROGRAM LENGTH:;MONITOR NUMBER:;START SWITCH ON SOP:; MORE THAN ONE APPLICATION :;DATA SET NAME:; BOE-SECTOR:;EOE-SECTOR:;EXPIRATION DATE:; VOLUME INITIALIZAT
0x0f0128…0f02bc Dummy {f00=0x004c, f01=0x0190, f02=»D:; RECORD LENGTH INPUT TAPE:;LOAD FACTOR:; INDEX FILE NAME:; MASTER INDEX FILE NAME:;INPUT DEVICE:;PTS 6876 DISC :;MAX NO OF RECORDS ON OUTPUT INDEX FILE:;SUB-KEY ADDRESSES IN RECORD:; SUB-KEY LENGTHS IN RECORD:; ***WORK FILE DEFINITION***; WORK FILE NAME:;SORTIN
0x0f02bc…0f0450 Dummy {f00=0x004c, f01=0x0190, f02=»RE THAN 18 BADSPOTS.DISC NOT USABLE;DISC I/O ERROR.;PRINTER NOT OPERABLE; TOO MANY SECTORS IN FILE; DISC OVERFLOW;MORE THAN 4 EXTENTS NEEDED; ILLEGAL BLOCK LENGTH; VTOC OVERFLOW;NO FREE SPACE ENTRY AVAILABLE;FILE NAME ALREADY USED; NO TOSS DISC FORMAT;TAPE UNIT NO
0x0f0450…0f05e4 Dummy {f00=0x004c, f01=0x0190, f02=» UNIT NOT LOCKED/LOADED;INCORRECT TNR;OUTPUT I/O ERROR, ;INPUT I/O ERROR, ; BLOCK FACTOR ON OUTPUT TOO LARGE; TAPE MARK MISSING;TAPE MARK MISSING AFTER LABEL RECORD; LABEL RECORD MISSING; UNEXPECTED TAPE MARK; LABEL RECORD ERROR; ILLEGAL BLOCK LENGTH ON INPUT;EO
0x0f05e4…0f0778 Dummy {f00=0x004c, f01=0x0190, f02=»EADY LOCKED;FLEX. DISC NOT LOCKED;FLEX. DISC WRITE PROTECTED; DATA SET NAME ALREADY USED; DATA SET NAME NOT FOUND;NO IBM DISC FORMAT; BLOCK SEQUENCE ERROR; KEY DEF. ERROR; LOAD FACTOR TOO SMALL;KEY SEQUENCE ERROR; DATA SET DEF. ERROR;ILLEGAL SECTOR NUMBER;CARD REA
0x0f0778…0f090c Dummy {f00=0x004c, f01=0x0190, f02=»NOT ALLOWED TO MIX DISCSIZES; NOT ENOUGH CORE;OVERFLOW; WRONG FD PARAMETER; ILLEGAL FILE-CODE;ILLEGAL ECB PARAMETER;UNKNOWN FILE; ILLEGAL VOLUME/FILE NAME; :RD; LABEL RECORD MISSING; UNEXPECTED TAPE X 2 AX AX R AX R AX AX 9h AX AX X Z D
0x0f090c…0f0aa0 Dummy {f00=0x004c, f01=0x0190, f02=»R ;BZ ;FZ W AX AX _. 2 R R R $ - - @X - @X - - X ( @X @T @X # X ;JZ " TFW Z _4 @X AX @X AX X ( @X T ( @X T : W W W W W W W W X ( X ( X : AX _$
0x0f0aa0…0f0c34 (3, 9) Dummy {f00=0x004c, f01=0x0190, f02=» DISC: 0FREE SPACE TABLE 0EXT BASE EXT LENGTH OF ENTRIES USED 0VOLUME TABLE OF CONTENTS 0FILE FILE FILE FILE RECORD BLOCK LAST FILE FILE CREATION RET INDEX KEY
0x0f0c34…0f0dc8 Dummy {f00=0x004c, f01=0x0190, f02=»ESS NO NO/SOP 0NUMBER OF FREE ENTRIES IN VTOC = ( - : C ( B a, : 2 A A[4 A R A R A P p A[ P r A[ AZ "' R$ Q ( B ' a0 AZ a4 A C C
0x0f0dc8…0f0f5c Dummy {f00=0x004c, f01=0x0190, f02=» , A[@ , A[8 , A[: " , A[< @[< A >c A[> C ( B . a& B & a0 A Z [B [V 2 [> 4P 4W 4P4 A[4 [| 4 4 [r [n YBW YL @[4 [ @[> [ [ Z
0x0f0f5c…0f10f0 Dummy {f00=0x004c, f01=0x0190, f02=»[: [:]B *% ` R p [: R 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 J " J " ) E "
0x0f10f0…0f1284 Dummy {f00=0x004c, f01=0x0190, f02=» _v @ Z & Z W W W W : . A ERMAPVOL1 080 01001 7302601001080 74001 7302674001DDR1 DATA HDR1 DATA VOL1 0-CREATING THE DATA SET 0NUMBER OF RETRIES: ab 2 Aa@ R AaN R
0x0f1284…0f1418 Dummy {f00=0x004c, f01=0x0190, f02=» dj C D Aa@ Aa@ d a> e dh dr AaBW Aa R 5$ P0 B L ( Aa ( Aa C D d a> 2 C WJ 2 8 ) d dj d 4 )T R d W ],W d Aa` dh dj ad d dj d d W E 5 @
0x0f1418…0f15ac Dummy {f00=0x004c, f01=0x0190, f02=»aJY4W Aa` eJ R dj d d d d d d d d R dh @a P dr @a` a a e4 Wf 10_ 20_ C C ( P$ P Aa` P T T : W W W W W ab : 2 ( 5 : 2 P e 0
0x0f15ac…0f1740 Dummy {f00=0x004c, f01=0x0190, f02=» AaX h @aXZ AaZ h Aa^ 2 e @a^P e a e4 a> @aX dh @aZ] Aa : Aa C 1VOLUME NAME: DISC: 0INDEX TRACK: 0DSL DATA RECORD BOE EOE EOD CREATION EXPIRATION SECTOR SET NAME LENGTH TTO
0x0f1740…0f18d4 (3, 10) Dummy {f00=0x004c, f01=0x0190, f02=»L1 g e h( h( h( F p 5 F r U # g h6 L h6 F h6 Ae g H hF @e @e 0:Px 1:Px Ae 5 h( h( h( h( h( h( h( H @e T 0 ae Ae g Ae @e Y W 10_x 20_~ W W W
0x0f18d4…0f1a68 Dummy {f00=0x004c, f01=0x0190, f02=» 5 : # ( B PH C C C ( B P B " T B 4 9T : b : h i <F <E :B : h ;D ;C <A h : i i <C : 4$ :
0x0f1a68…0f1bfc Dummy {f00=0x004c, f01=0x0190, f02=» i i 0READ ERROR SECTOR NO: TO FILE NAME: DESTROYED RECORDS: TO 0INPUT DISC 0OUTPUT DISC @i i @ib nl T4 % n _, R ) ) (' P Y
0x0f1bfc…0f1d90 Dummy {f00=0x004c, f01=0x0190, f02=» : ) @iB ) @iD ) @i> ) @i@ ) ) @i( ) : @id<E { H AiJ ( AiL H AiF ( AiH @iJ @iVZ0Q @iL @iXZ< : jt Ajv Ajx ( : i6 i: i8 i< ih i i @in ; [ [ i i^ i i` i ( i ! z @i^ @i` m i^ iR i` iT Ai
0x0f1d90…0f1f24 Dummy {f00=0x004c, f01=0x0190, f02=» Aip Air_6 @ip @irW P @it @iv _ n4 jD @i jP @iR @iT j @iR @iT @ij j i k i " k j k j0 ( k 2 @i @i % Y @i @iR @iT @ij Ai^ Ai` @i6 @i8 @ij Ai6 Ai8U @ij
0x0f1f24…0f20b8 Dummy {f00=0x004c, f01=0x0190, f02=» Z : : l i C ( B ' z : i _* n> 2 ) $ T : * Y ]0 : nf R ) ( P Y ], : i Ai i ( i / z : i i^ i` ( B B / z : i _>
0x0f20b8…0f224c Dummy {f00=0x004c, f01=0x0190, f02=» z z : i i i i i @j Ai Ai ( @i @i Ai Ai @i P o : B Ai P P B _p B PZ Ai~ B PP jf k i k @i @i j @i @i @i~ j i " k : jZ _R i @i Ai @i Ai ( @i " @i Ai @i
0x0f224c…0f23e0 Dummy {f00=0x004c, f01=0x0190, f02=»( C WL i Ai ( B ' z i : i ( B q& C D {$ R ! D p R # L p P { i 2 D 0 D 1 C ( i B , % Y 2 $ 2 , Y Ai @i Y Ai^ Ai` 2 Ai A
0x0f23e0…0f2574 (3, 11) Dummy {f00=0x004d, f01=0x0190, f02=» Aj o pz W Aj o pz i ( i z {$ i0 2 Ai Ai R Ai Ai R Aju R Ai Ai R Ai Ai Ai oT n> 2 , $ { Y $ TO { R % qH nf R , ( { Y ( TO { $ Ai ( $ Aib $ $ Ai ( Ai ( Ai
0x0f2574…0f2708 Dummy {f00=0x004d, f01=0x0190, f02=» AiZ Ai i Ai @i ) i @ib nl z B $ T z Ai" $ Ai $ Ai $ AiV $ AiX $ Ai i Ai $ Ij& ^ ) R4 ) ) B ( P @i" P _( $ (TN Y WV i v i Ai i ( i i
0x0f2708…0f289c Dummy {f00=0x004d, f01=0x0190, f02=» PJ P" @i Q Ai i Ai W Ai i i @i Q Ai i Ai W: Ai i i @i Q Ai i Ai W Ai Ai i i i Ai @i P t Ai AiD @iV AiN @iX AiP @iZ { R @i { Aiz @iZ @i AiZ Ai @iz Ai. o. i6 i8 i2 i^ i4 i`
0x0f289c…0f2a30 Dummy {f00=0x004d, f01=0x0190, f02=» k i Ai* @id<H Ai nf Ai j H AiF ( AiH Aiz @i R @iJ @iVQ R @iL @iXV kn Aiz @iF Ai> @iH Ai@ @in iF i^ iH i` @ih Ai o( Ai @iB @iD @ij AiB AiD @iV @iX @ij AiV AiX t T @ijR @iF @iH @ij AiF AiH @iJ @iL @ij
0x0f2a30…0f2bc4 Dummy {f00=0x004d, f01=0x0190, f02=» i^ i4 i` k @in wl @i2 @i4 @ij Ai2 Ai4 @i6 @i8 @ij Ai6 Ai8 @iF @iH @ij AiF AiH @iJ @iL @ij AiJ AiL Q @ijR @iz @iF I @iH )W @i. o. ) % n @i. Ai. o. i6 i8 i2 i4_ @i6 @i8 @ij Ai6 Ai8 @i2 @i4 @
0x0f2bc4…0f2d58 Dummy {f00=0x004d, f01=0x0190, f02=» AiF ( AiH @i R @iJ @iVQ R @iL @iXV kn Aiz @i. o. i @i id nf j k, @i @i& k: k, @i*T % Ai^ i` n i i` n AiB AiD i6T i8P i2 i^ i4 i` k @in v Ai. @iVT @iXP* @i. o. i6 i8 i2 i4_X t j W6
0x0f2d58…0f2eec Dummy {f00=0x004d, f01=0x0190, f02=» A{F A{, A{4 A{H A{> A{J { P A{B @{,P @{B : R !LLP< R 1 R 2 Y A{ A{ A{ Y A{ A{ @{ W S 1 A{ S 2 A{ A{, |@ ~ : {~ {| # A{L R Q
0x0f2eec…0f3080 Dummy {f00=0x004d, f01=0x0190, f02=» @{F ~2 R 0 $' R T W $ T A{x R !LLP @{,T A{Z A{ R 1 R 8 A{l R 6! A{jPJ A{p A{r @{Z @{ A{Z A{ S$ @{p @{r Y4 @{Z A{j @{ A{lW : A{. A{0 @{. @{0 @{ A{. A{0 @{j @{l A{j A{lY4W R 6:B A{. A{0 @{xPZ @{. A{j
0x0f3080…0f3214 (3, 12) Dummy {f00=0x004d, f01=0x0190, f02=» . A{ 9H A{ A{ A{: A{< A{6 @{HP A{> A{H B A~ ( B T @~ C C @{ C ( C B / H : @{ :c A{ A{^ A{` A{b A{d @{. A{V @{0 A{X A{p @{V @{X A{V A{X @{p R b 0 A{Z 0 A{ @{ZT @{ X" @{Z @{^R Q @{ @{`R
0x0f3214…0f33a8 Dummy {f00=0x004d, f01=0x0190, f02=» A{^ @{ A{` @{. A{Z @{0 A{ W 2 T^ Q 1 Q Q {| R A{~ @{: A{ A{ @{ C ( C @{ /T @{ T 0 A{ : W W : _ @{FT _ _ R @{. A{Z @{0 A{ !LLPJ @{^ T @{` @{ ^ P A{f P A{h @{^ @{` @{Z @{ A{^ A{`RnX W4 @{^ @{` @
0x0f33a8…0f353c Dummy {f00=0x004d, f01=0x0190, f02=» A{Z A{ @{ A{Z A{ @{Z @{ @{ A{Z A{ @{^ @{` @{ A{^ A{`^6 @{Z @{ P P Q Q P A{^ 0 A{` @{^ @{Z @{ A{^ A{`T Q Q @{^ Q @{` 1 @{. @{0 @{Z @{ A{. A{0 A{^ A{` @{xP @{j @{l @{Z @{ A{j A{l 2 L L
0x0f353c…0f36d0 Dummy {f00=0x004d, f01=0x0190, f02=»{ A{< 2 C A{< @{< @{6 P A{ A{ ( @{ / H {~ 6 P J S T $ 1T P _ {8 X`_2 A{D : @{,T @{@ HQ : {N @{@ @{> K @{2 K @{Z K @{ K @{f K @{h K K K R 2 K R 1:H R K R !
0x0f36d0…0f3864 Dummy {f00=0x004d, f01=0x0190, f02=» : @{,T @{@ HQ : {N @{@ A{D 2 A{~ @{ % @{~ R 2 R 1 % Y @{Z A{p @{ A{r @{f @{h A{t A{v A{Z A{ {| @{ C @{t A{ @{v A{ ( C @{t @{v @{ @{xP @{z A{t A{v @{Z @{tYXR @{ @{vYd @{f A{t @{h A
0x0f3864…0f39f8 Dummy {f00=0x004d, f01=0x0190, f02=» @{p A{Z @{r A{ : A{@ @{,Q6 A{, A ( 9 A ( F @{2 0 A ^ @{f @{h g @{Z @{ w {N } @{FT 8 A A < ( {| @{@ : A{J T @{DT : A{, A{F |@ A{D T> @{@ P.
0x0f39f8…0f3b8c Dummy {f00=0x004d, f01=0x0190, f02=» J A{f J A{h R @{ 9c A{ @{ 0 A n 0 A p @ nT @ p P @{fT P @{h A{p A{r A l @ n @ p P P A n A p @{p @{r @ l @{f @ nTr @{h @ pTh P A{f P A{h A{p A{r A l P 0 @{Z @{ Q 1 P A{Z 0 A{ @{p @{r @ l T _ ]
0x0f3b8c…0f3d20 Dummy {f00=0x004d, f01=0x0190, f02=» L Z @{Z I @{ ) @{f I @{h I ( - : FILE 9 VOLUME NAME FILE EXT.NO EXTENT BASE EXTENT LENGTH D A DELETED [
0x0f3d20…0f3eb4 (3, 13) Dummy {f00=0x004d, f01=0x0190, f02=»S _ R _ ;A [ : . A{ @{ 0 A n 0 A p @ nT @ p P @{fT P @{h A x A{r A l @ n @ p P P A n A p @{p @{r @ l @{f @ nT @{h @ pT P {f P A{h A{p A{r A l P 0 @{Z @{ Q 1 P A{Z 0 A{ @{p @{r @ l T _ ]
0x0f3eb4…0f4048 Dummy {f00=0x004d, f01=0x0190, f02=» NUMBER OF BADSPOTS = -WRITING THE SECTORS -FORMATTING THE DISC -CHECKING THE SECTORS TOSS REL 10.0 Z $ A D A D A D A D A [ : Z $ A D A D A D A D A [ : Z $ A
0x0f4048…0f41dc Dummy {f00=0x004d, f01=0x0190, f02=» : j 2 C C ( B & B .P " T : A @ A n A ` T R ' P P & & & " M " [+ [h 4 T[4 4 P , , , " rS S E Tq+ W R " &?
0x0f41dc…0f4370 Dummy {f00=0x004d, f01=0x0190, f02=»L L P@ ~ ~ ~ " 1g 1h P z z z " L L W 2 A l A ^ $ A y $ A ] A k R ! T j A ( B " P C C ( C D j 2 C I I " C ( ( C
0x0f4370…0f4504 Dummy {f00=0x004d, f01=0x0190, f02=» R C ' P ( C ( B R % R E R E B N % Z R R E ( ( ( A A A Z . A . x A x A A 2 j A n A 2 T
0x0f4504…0f4698 Dummy {f00=0x004d, f01=0x0190, f02=» A n Y A n_ A A n_ A n A ` ( $ A l j ( B & B P Wl @ ` Y 2 P W T T P W( $ Y P _2 W& T
0x0f4698…0f482c Dummy {f00=0x004d, f01=0x0190, f02=» B & B P W @ n Y , P W T T P W $ Y P _2 @ TP @ U| QB A n Q4 A nW* T P6 @ . xV. A . ( j( W W W
0x0f482c…0f49c0 Dummy {f00=0x004d, f01=0x0190, f02=» Z^| - ( M _ @ .Q> Z^ ( M H - _" @ xQ Z^ $ M D - _" A Z @ QT @ 4 T 1 Q @ Q4 4 T 1 Q @ Q _* @ W @ @ Q 1 Q A @
0x0f49c0…0f4b54 (3, 14) Dummy {f00=0x004d, f01=0x0190, f02=» Y 2 T T 4 R _ T 4 U 5 A n B A @ Q U( _ 2 % 2 * % Y : B 2 * @ Q Pl * BA % DS % PO % T % 5 Y 5 Y % % , %
0x0f4b54…0f4ce8 Dummy {f00=0x004d, f01=0x0190, f02=» @ R V 2 U A ]D 2 2 @ % % ) % % Z @ % @ % @ % ( % Y 2 % @ O . R O 1 R O 0 ( @ d $ : @ T : Q 1 Q A
0x0f4ce8…0f4e7c Dummy {f00=0x004d, f01=0x0190, f02=»LE NAME: P J A O N( J : A J J < A L 4 J C R ! C R C R ! C R C R ! 9 C R C r 2 4( : _ _ _ _$ % 6 ( B f b n (> B @ J
0x0f4e7c…0f5010 Dummy {f00=0x004d, f01=0x0190, f02=» N U0 P REC.NO: N N W N N N : 2 V Y S X X X X W Y Y _( : ~ B r A t 2 I R A A A R( Q" A ( B T:
0x0f5010…0f51a4 Dummy {f00=0x004d, f01=0x0190, f02=» & B .TT& TD R R 2 $ 1 P Y ( B .T & T W W W W W : R C 2 4( : _ _ _ _$ % 6 ( 1VOLUME NAME: 0SECTOR NO:
0x0f51a4…0f5338 Dummy {f00=0x004d, f01=0x0190, f02=» 2 5 5 D : @ 5 Y : 5 Y : A t r 2 A " R A R A A R Q A ( B @ A A A A $ A * A ,( B ! v 2 ( - Y R A * R A , (
0x0f5338…0f54cc Dummy {f00=0x004d, f01=0x0190, f02=» P 0 ! R !__Q 5 W @ _" ._ P@ 0 . _X R @ *P Q W R @ ,U A ,S W. A * A ,W$ _ @ 5 Y 0 . _N & P A $ & A A A A , ( B " 2 @ ( P P 6 .P
0x0f54cc…0f5660 Dummy {f00=0x004d, f01=0x0190, f02=» 2 5 5 D : @ 5 Y : 5 Y : A 2 A " R A R A A R Q A ( B A A A A $ A * A ,( B ! 2 ( - 0NUMBER O
0x0f5660…0f57f4 (3, 15) Dummy {f00=0x004e, f01=0x0190, f02=» R A R A R A A A R A D @ A A A D # A A @ D D # A D A . A A 2 @ @ 2 @ @ @ @ - @ T @ A @ A A @ @
0x0f57f4…0f5988 Dummy {f00=0x004e, f01=0x0190, f02=» A A A : P2 @ @ @ @ b @ P | @ 8 P A > ' W& W$ W W W W W W W W ( ( ( : A S ( @ P ; Z ; Z " p : A A _( ( B P
0x0f5988…0f5b1c Dummy {f00=0x004e, f01=0x0190, f02=» A > A : B C ( B ~ B " P C D # ( # D !SS : $ ) : @ @ ) : R @ dU _ A @ A : @ @ R ! R P @ V @ W @ Y A f > . f
0x0f5b1c…0f5cb0 Dummy {f00=0x004e, f01=0x0190, f02=» A A A : P @AECSHN ~ BF B R P L O X n R ! A R ! A A A : ( B o 9C P4 1P A A WL V @ Z A : H A W0 A W& V A @ YB: @ I A W A Pd @ ? V *TM* @ ? V
0x0f5cb0…0f5e44 Dummy {f00=0x004e, f01=0x0190, f02=» A R A ! Q W A 2 A A j * 4Z A M M Y 4R P P Z W Q _ Q ^, I _4 I R A :_d R A A A jP T A V _ A @ @ R @ @ P BLK.NO:
0x0f5e44…0f5fd8 Dummy {f00=0x004e, f01=0x0190, f02=»P T A Z W A Z : jX ? V Y : j @ R A @ R A W $ H $" P. M P ^ W Q R A W Q ; A _4 : j g : W V @ Z A : H A W A W V A YB 0NUMBER OF READ CARDS: 2 A ~ A R A A
0x0f5fd8…0f616c Dummy {f00=0x004e, f01=0x0190, f02=» PU 2 R D P A A A 2 P |( @ P p R P ( ( A ( @ P p ( @ P ( | 2 P ( ( @ P |( A _ W W W W W W ( : _ ( B
0x0f616c…0f6300 Dummy {f00=0x004e, f01=0x0190, f02=» P P - : X ? V Y : A @ R A 2 A A R A & A A $ hR X 2 4 9 $ A h h h A " R A A B A 2 T T A A T $ A
0x0f6300…0f6494 (3, 16) Dummy {f00=0x004e, f01=0x0190, f02=»_ _& A W ( T @ A A @ P T P " T W" @ $T : W W W W W W ( ( & : ( @ # @ P P " @ T _ : _@ 2 5 : T: @ @ "Q0 @ $T A $
0x0f6494…0f6628 Dummy {f00=0x004e, f01=0x0190, f02=» ( B # P _$ : A P P 2 A A A hR @ A 6 2 4 9 ( A h h h A ' h R A B A
0x0f6628…0f67bc Dummy {f00=0x004e, f01=0x0190, f02=»P T 4 6 `_ 4_( A S W A A _ A *_ ( @ *P" A * B @ &Q R B @ (U C @ 0# P @ T T T:W4 @ T : A 6_ W W W W W W W ( ( : ( @
0x0f67bc…0f6950 Dummy {f00=0x004e, f01=0x0190, f02=» P 5 : 8 : % 6 W R W B W ( B J W R " R, ^ R $ R MP W W J ' # B P C ( C R ' # > R ( B T Y W:9 R*9 R B
0x0f6950…0f6ae4 Dummy {f00=0x004e, f01=0x0190, f02=» C W& C W " V " _0 V Q V R $ W V ] < > % 6 B W R W ( B J W W R # Y W R !MMP 0 ( ( @W W8 V P W V P (
0x0f6ae4…0f6c78 Dummy {f00=0x004e, f01=0x0190, f02=»W( W" W W W W W W W W R ! T W ( : ( B P & B ~ @ B ^ : : _ P $ R # B Q.P* A C ( _ B A @ V Z" C : [ : A I
0x0f6c78…0f6e0c Dummy {f00=0x004e, f01=0x0190, f02=» @ n A A < A U ( @ @ A A ( B ' P $ A j : U tW @ #U. A @ > A p @ A : ; [ [ [ Z Z Z : : < , = = $ - Y : -
0x0f6e0c…0f6fa0 Dummy {f00=0x004e, f01=0x0190, f02=» A R $_ : > A : D : f C C ( @ A B ' j : M : $ : _ P $ R # B Q.P* A C ( _ B A @ V Z" C : [ : A 1 I
0x0f6fa0…0f7134 (3, 17) Dummy {f00=0x004e, f01=0x0190, f02=» @ n A A A U ( @ @ A A ( B ' P A j : U ( * U Y _ : & P$ U ?V W _ W W $UN # * : Pj T Pf V Q UF V
0x0f7134…0f72c8 Dummy {f00=0x004e, f01=0x0190, f02=» L _P! R ?U W W ! @R @R @R L # : : .<(+?& !$*); ??? &%->? :#@'=" ABCDEFGHI JKLMNOPQR STUVWXYZ 0123456789 A U< " T " T * * * @ # T . 5
0x0f72c8…0f745c Dummy {f00=0x004e, f01=0x0190, f02=»UT VOLUME NAME: C C R A " P A ( : : B $ ) Y A ( ` YP $ : R _ P 0 - : ; [ V - - ' d Z : : ;
0x0f745c…0f75f0 Dummy {f00=0x004e, f01=0x0190, f02=» [ B@ : : ' : : d : : P Z Z Z Z : : ; f : V *W R - _ 1 T R P - _ : W ; [ [ [ [ A V W - A R@
0x0f75f0…0f7784 Dummy {f00=0x004e, f01=0x0190, f02=»UT VOLUME NAME: C C R A " P A ( : : B $ ) Y A ( ` YP $ : R _ P 0 - : ; [ V - - ' # +: +? + *CAN*
0x0f7784…0f7918 Dummy {f00=0x004e, f01=0x0190, f02=»MTAB OVFL* + *TOO LONG* + *STRTAB OVFL* + *NUM OVFL* ,* . '/ ' 6 : D a A W A A ( : A ( B P ! ` A % W. @ P~ @ ^ A W 0R U0 R U, R. I W" A P" A W R E
0x0f7918…0f7aac Dummy {f00=0x004e, f01=0x0190, f02=» ZP W fX @ 8 W& $P %P _ A A P Q S fX W ZP8W _. % < S S X S _@ ZT A W ZP V 9 _ ZX 8Vz @ P U 9 VZ_ ?QH <H 6 _ !..T
0x0f7aac…0f7c40 Dummy {f00=0x004e, f01=0x0190, f02=» z @ 0 @ P1@@@P@ ` A : A : a A W A A ( : A ( B
0x0f7c40…0f7dd4 (3, 18) Dummy {f00=0x004e, f01=0x0190, f02=» TNR j S M LPP LDP DMP NPP NL IL IP LPM LDM DMM NM BI B IM NP UTILITY SORTF. NUMBER OF PASSES IN MERGE PHASE = PARAMETERS : PRESORT PHASE STARTED
0x0f7dd4…0f7f68 Dummy {f00=0x004e, f01=0x0190, f02=» R A 4 ( R : R A | 6 R A A R A R A A A J D !SS ^ D # A D ; A f D < A h D A 4 N D !SS ^ D # A D A N D !SS ^ D # A R D A . D A
0x0f7f68…0f80fc Dummy {f00=0x004e, f01=0x0190, f02=» R A l v j T j f R T @ V A 9 V A @ 4 R T A 9 V A @ P 4 R " T A @ @ P T R @ A Y @ Y Z v j P v j Q2 b C C @ P A l :W @ @ @ Q @ Q @
0x0f80fc…0f8290 Dummy {f00=0x004e, f01=0x0190, f02=» | @ @ 0 f J @ E $ @ P @ @ V A A A A A A A A A A v P @ : A l R ^ @ A @ @ A @ A f N @ P P T
0x0f8290…0f8424 Dummy {f00=0x004e, f01=0x0190, f02=» _4 @ X : @ A A F @ A H A @ A : @ K O A @ 9 R @ @ : @ FT @ HU @ H @ @ : N ^ A Z t 9! A F & v
0x0f8424…0f85b8 Dummy {f00=0x004e, f01=0x0190, f02=» @ X$ ( & @ t9! A @ zT @ A * A ~ P " ~ B ~ $T X , " @ # x @ * x " @ t $P _T & ( v T #_& @ X0 R @ XN ( &_X X @ Qf v t ( > ( & >
0x0f85b8…0f874c Dummy {f00=0x004e, f01=0x0190, f02=»U( J @ f _. @ Q6 v b jQ, ` C J f_v v J j l v R j l : J b j @ T R v R JPN B @ @ @ U @ ? V ? = l T J b _X v J P
0x0f874c…0f88e0 Dummy {f00=0x004e, f01=0x0190, f02=» J V _b j R @ D $ Tr D Tl b j B C ( B A A ( ( ( B @ b E : @ d E < ( @ @ j E @ l E : @ h & 6 @ P 6 @ : 6 @ P : @
0x0f88e0…0f8a74 (3, 19) Dummy {f00=0x004f, f01=0x0190, f02=» : W C C : C @ 2R @ 2 C : C C B @ . : C C : W $ ) : W : @ @ A A V V V A : @ @ P @ _6 @ t ` , $ @ z @ * 1 : A @ A N V j R :
0x0f8a74…0f8c08 Dummy {f00=0x004f, f01=0x0190, f02=» T @ @ : A A A @ A @ A @ A d @ X. : 4 ! P :hP P W T _ : A A A R v V _ : @ A @ : @ A d @ T 9C;B :W : =D;B
0x0f8c08…0f8d9c Dummy {f00=0x004f, f01=0x0190, f02=» A A 9B ;A @ @ T @ ;BW ;C:A A @ @ @ R @ A @ R @ V A : A _ @ P : z_ @ @ @ P 9 R A A A A W A A A A @ A A A : @ P A @ A @ 9A A @ @ T A " :
0x0f8d9c…0f8f30 Dummy {f00=0x004f, f01=0x0190, f02=» P ;a %_ : t @ * P @ 9_ : @ >A ` , P 1 _ @ >A P 1 _ @ 9A P _ >a : @ t @ 9A ; R P =a _ : [ [ @ , $ :a P> P& @ Q Q W *
0x0f8f30…0f90c4 Dummy {f00=0x004f, f01=0x0190, f02=»<A : @ _ W : @ :a @ : A z A n b N b N @ A N b : A n A z b ^ ^ b : b & V ( V A z @ @ t:! @ ` , @ t % A & b : @ ~P, b ^ V Z A
0x0f90c4…0f9258 Dummy {f00=0x004f, f01=0x0190, f02=» b : v : Q A : B : B A 8 @ A v B R W" D 8T @ P v b VQ *_ P@ @ n A p @ z A | f b @ p A n @ | A z b f A . Q P$ T @ P _8 Y Z @ Y
0x0f9258…0f93ec Dummy {f00=0x004f, f01=0x0190, f02=» @ P. @ T R B @ @ W @ P JWX @ Q @ n @ " A n $W @ z @ " C <W. @ A C C < @ C @ A : @ Q A n : V A 4 A @ @ 4 P A z 4 b : v b VP* P T @ T @ 4P T
0x0f93ec…0f9580 Dummy {f00=0x004f, f01=0x0190, f02=»PpWr B 9 V Tl @ PnWd A 9 V A : P: f b A f @ f @ h C C ( ^: : W, W( W" W W W W W W W : _ B C ( B B A A ( : P P (
0x0f9580…0f9714 (3, 20) Dummy {f00=0x004f, f01=0x0190, f02=» @ ZT : [ [ @ @ * @ P $ $ @ Q $ T Y$ Z Z : @ Z _ , )Q R Y : _ _ . " @ @ * $ $ 4 Y @ f = @ h = B f v f NZX : ( - Y : R $ -
0x0f9714…0f98a8 Dummy {f00=0x004f, f01=0x0190, f02=» 00 R =A U =B _ A ( ( : : @ A T A T A T 4P&R ( hW ( H ( _D : V : C ( B B A A ( : (
0x0f98a8…0f9a3c Dummy {f00=0x004f, f01=0x0190, f02=»UU H 3 2P _ , ) 0 R _ <d?d U ?e R P S ?C/ G O % R ' P % =B S t w E M % t R.Q& @ Q R %| _B _& : T G.G K. A ;A; G.
0x0f9a3c…0f9bd0 Dummy {f00=0x004f, f01=0x0190, f02=» R P #P & B. T P ' " P : P S P S P " ^_" F t v @0 UU 3 2P _ 4 , ) T G.G K. A ;A; G. ] $ ] S <% T V S @- S
0x0f9bd0…0f9d64 Dummy {f00=0x004f, f01=0x0190, f02=»_ R R <" R R L " P #P ( B. T P ' " P : P S P S P " `_" =D @ t w E M T 1 E _ M @ p : 6 "? UU t 3 2P _ 4 , 5 T G.G K. A ;A;
0x0f9d64…0f9ef8 Dummy {f00=0x004f, f01=0x0190, f02=» & N S W P X _ R R "? R R h:B* S R P S B J 4R 4 :B 4 R : V V 49B R 4R @ t w A I ! j : j P #P ( B. T P ' " P
0x0f9ef8…0fa08c Dummy {f00=0x004f, f01=0x0190, f02=» A _ @ A @ A : ( P : B : A S ( @ ' P : A A _( ( @ ' P : A S< ( @ ' T @ @P _" P @ : A A _J 2 - Y : A S W A A @ @
0x0fa08c…0fa220 Dummy {f00=0x004f, f01=0x0190, f02=» ( B P C C : 2 A A R A R A A A D A A P A ( D : A D < A T D : 2 H H A A ( H <T H : A A A
0x0fa220…0fa3b4 (3, 21) Dummy {f00=0x004f, f01=0x0190, f02=»_d , lW f @ T> T, @ : R _( A S _0 A A _> @ : ZF h_L > W W W W W W R A R ( W @ A ] : ] < ( R A R ( W @ A ] : @ ] < ( : A
0x0fa3b4…0fa548 Dummy {f00=0x004f, f01=0x0190, f02=» @ ( P B B @ A @ A W< @ A A ( B ' P & @ A A A ( B ' P LPOP 0XLS TK1 TK2 MT1 MT2 pqCSH @?t !NNP !YYP A@x : @?t! P P A@x
0x0fa548…0fa6dc Dummy {f00=0x004f, f01=0x0190, f02=» @?t FDX H p @?tT H r A?vT W 8 A@x @?t CDP FDP MDP DUT : W W S : , @?t $P 0 Wj ,9a D 0 A@x : @?t I 2P ^ WF : R I?t W6 : R !LLT : @?t! YT A@x @@v &T : X A TW* A R A T A N A P
0x0fa6dc…0fa870 Dummy {f00=0x004f, f01=0x0190, f02=» H P P _ @ RT A@ A iW @ PP A@ _ A@ _ @@v ] ( = ( = P P P P _* _0 ] @ @ i h A j ( B ( @ LP ] : ] < ( A i @ i
0x0fa870…0faa04 Dummy {f00=0x004f, f01=0x0190, f02=» ( = P P P P _& _, @@v *T @@v *T B C W @ RP B C @@v *T T" B A l A j h : ( B T @ : ! P 8 F:' P< ( @ r P W h ( Q
0x0faa04…0fab98 Dummy {f00=0x004f, f01=0x0190, f02=» @?t DKTj A@ : @?t DKP WX A@ : @?t DKX. W6 S DK A@ H H@ P Y S ( S : W 6 D@ ! P !TTP > P NW0 P FW& P F E@ P A@ W A@ @x : @?t @?v "P ^ Wp C
0x0fab98…0fad2c Dummy {f00=0x004f, f01=0x0190, f02=» : W A R W AB @ _ A RW< h @@x # ( B # TlW IBM LABEL;TOSS LABEL; A RW h ( B ' @@x #( B RP R P $ T W T # P :' P P "W , A _ ?t Z rQ0 , 0 Z %U : ,!
0x0fad2c…0faec0 Dummy {f00=0x004f, f01=0x0190, f02=» (Y : : : _ _ S : W @ A@x : &P P @W W < ) < ) P P P P _& _, : &PV T * ^T@ @@ A@ W2 J ^T @@ A@ W * J ^T @@ A@ W :
0x0faec0…0fb054 (3, 22) Dummy {f00=0x004f, f01=0x0190, f02=» S PWp [g PWb PWT %s PWF O PW8 &? PW* J PW 1g PW L PW : R Q R @ tT R Q R : r : %? v S : S f S 6 S b% =A S ^ S ` x UU 3 2P _
0x0fb054…0fb1e8 Dummy {f00=0x004f, f01=0x0190, f02=» S t w E M % n : T G.G K. A ;A; G. x ] S z | . N 0 N S W P X _ R z R 6"( R ~ | P #P & B. T P ' " P
0x0fb1e8…0fb37c Dummy {f00=0x004f, f01=0x0190, f02=» B > R > Z$W4 R & P2 W W b 7P P ) 6 2_Z [ : ( B X > Z 01 W (W ( W R W R " R MP W C C ( B P ( B a R WL! 1 /TD R P D
0x0fb37c…0fb510 Dummy {f00=0x004f, f01=0x0190, f02=» R " P8 # D ! r $P" # " C C ( B Y _& [ : R C * C C C ( B Y B Y| 8W GOX ABX 2 HDR LABEL CHECK: ERR +VOLUME +LABEL +IDENTIFIER LABEL RECORD: ' #P & B. ' ENTER CO
0x0fb510…0fb6a4 Dummy {f00=0x004f, f01=0x0190, f02=»00 B 00000000W 9 $ R ! P A W : W ( B 2 : ( :( B P 9 2 7 ( _* W $ I ^ K $ ! P $ I ^ N $ I ^ PW W 1 A ! $ I ^
0x0fb6a4…0fb838 Dummy {f00=0x004f, f01=0x0190, f02=» : $# 9P : % : 0 % ^ : 0 % ^ : P R 9A [ [ : , )Q R Y : _ _ ( % ( % : W @ t $ P W @ t ( : W W W W W W W W.
0x0fb838…0fb9cc Dummy {f00=0x004f, f01=0x0190, f02=» Z Z W H ; [ ( D $ : Z - M Z Z [ [ : A A A A A A P [ [ 9O @ W2 A A A A A ;o @ @ @ @ @ : W Z [ < :
0x0fb9cc…0fbb60 Dummy {f00=0x004f, f01=0x0190, f02=»W ;A [ [ : _4 ^ : 0 % ^ : P R 9A [ [ : , )Q R Y : _ _ ( % ( % : W @ t $ P W @ t ( : W W W W W W W W
0x0fbb60…0fbcf4 (3, 23) Opaque[0x194]
0x0fbcf4…0fbe88 # DirEnt {nam=»UTIL01«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0a00, f03=0x0000}
0x0fbcf4…0fbe88 IdxSect {
0x0fbcf4…0fbe88 f00 = 0x0050 // 0xfbcf4 @0x0
0x0fbcf4…0fbe88 f01 = 0x0014 // 0xfbcf6 @0x2
0x0fbcf4…0fbe88 gno = [ // 0xfbcf8 @0x4
0x0fbcf4…0fbe88 [0x00]: C0x0050.0x0.0
0x0fbcf4…0fbe88 [0x01]: C0x0050.0x1.0
0x0fbcf4…0fbe88 [0x02]: C0x0050.0x2.0
0x0fbcf4…0fbe88 [0x03]: C0x0050.0x3.0
0x0fbcf4…0fbe88 [0x04]: C0x0051.0x0.0
0x0fbcf4…0fbe88 [0x05]: C0x0051.0x1.0
0x0fbcf4…0fbe88 [0x06]: C0x0051.0x2.0
0x0fbcf4…0fbe88 [0x07]: C0x0051.0x3.0
0x0fbcf4…0fbe88 [0x08]: C0x0052.0x0.0
0x0fbcf4…0fbe88 [0x09]: C0x0052.0x1.0
0x0fbcf4…0fbe88 ]
0x0fbcf4…0fbe88 }
0x0fbe88…0fc01c Dummy {f00=0x0050, f01=0x0190, f02=» Lo. : 0 j 0 $ ^ : 9 i $ 7 f w |4r tV u 3 qC 5 * zuqV $ ' > P ZD o c r P| sV i % 9Zj Q > - D $ 4` 1P -8 T r tB l`Tg t z ^ ,* # + RC: | | 0 z
0x0fc01c…0fc1b0 Dummy {f00=0x0050, f01=0x0190, f02=»D OF ;PROGRAM ABORTED BY OPERATOR; T+} T* > R > V W C C ( B P 8_ B Z T $ B U [ B : $ !; P I , =Z I , * C C ( : [ ) $ Z : [ [ [ [ QxP~
0x0fc1b0…0fc344 Dummy {f00=0x0050, f01=0x0190, f02=» [ _ '0 Y R '0 Y$R '0 '8 Y6 _ [ [ Q. , 0R" 9U AR FQ 0 P =D _, [ Z Z : = ! U 9 - Y : [ [ [ [ [ [ [ RZ 0=A * T R !LLT
0x0fc344…0fc4d8 Dummy {f00=0x0050, f01=0x0190, f02=» U+|ZN j T* >BV ,W,_d>AV* ^ P P~ >Px Pr PlW _ A n T* >FV :A H,0 @ nY H,2 @ nZ >AV - W _ _ @ n @ r >BV -Wp>AV -Wh>AVd B j RV _ @ r T T S S S S >T T S S S S @ p - - T.M A r
0x0fc4d8…0fc66c Dummy {f00=0x0050, f01=0x0190, f02=»P X _ @ l I) :a A l ;a L* # A @ A B P A B TH 2 #( W0 @ BP 2 #( : d M ^ R _ )h W D_ * $ @ @P8 P2 R " R Q 2 #( @ @ T R A @_. @ l /
0x0fc66c…0fc800 Dummy {f00=0x0050, f01=0x0190, f02=» A ~ H) A v ( $ P P >P P P W _ A n T >FV :A H @ nY H @ nZ >AV W _ _ @ n @ r >BV -W >AV -W >AV B j R _ @ r T T S S S S >T T S S S S @ p - - T A r
0x0fc800…0fc994 (3, 24) Dummy {f00=0x0050, f01=0x0190, f02=»P X _ @ l I :a A l ;a L # A A P A T #( W @ BP 2 #( : d M ^ R _ W D_ * $ @ @P P R " R Q 2 #( @ @ T R A @_. @ l
0x0fc994…0fcb28 Dummy {f00=0x0050, f01=0x0190, f02=» A ~ H A v ( $ P P >P P P W _ A n T >FV :A H @ nY H @ nZ >AV W _ _ @ n @ r >BV -W >AV -W >AV B j R _ @ r T T S S S S >T T S S S S @ p - - T A r
0x0fcb28…0fccbc Dummy {f00=0x0050, f01=0x0190, f02=»P X _ @ l I :a A l ;a L # A A P A T #( W @ BP 2 #( : d M ^ R _ W D_ * $ @ @P P R " R Q 2 #( @ @ T R A @_. @ l
0x0fccbc…0fce50 Dummy {f00=0x0050, f01=0x0190, f02=» A ~ H A v ( $ P P >P P P W _ A n T >FV :A H @ nY H @ nZ >AV W _ _ @ n @ r >BV -W >AV -W >AV B j R _ @ r T T S S S S >T T S S S S @ p - - T A r
0x0fce50…0fcfe4 Dummy {f00=0x0050, f01=0x0190, f02=»P X _ @ l I :a A l ;a L # A A P A T #( W @ BP 2 #( : d M ^ R _ W D_ * $ @ @P P R " R Q 2 #( @ @ T R A @_. @ l
0x0fcfe4…0fd178 Dummy {f00=0x0050, f01=0x0190, f02=» A ~ H A v ( $ P P >P P P W _ A n T >FV :A H @ nY H @ nZ >AV W _ _ @ n @ r >BV -W >AV -W >AV B j R _ @ r T T S S S S >T T S S S S @ p - - T A r
0x0fd178…0fd30c Dummy {f00=0x0050, f01=0x0190, f02=»P X _ @ l I :a A l ;a L # A A P A T #( W @ BP 2 #( : d M ^ R _ W D_ * $ @ @P P R " R Q 2 #( @ @ T R A @_. @ l
0x0fd30c…0fd4a0 Dummy {f00=0x0050, f01=0x0190, f02=» A ~ H A v ( $ P P >P P P W _ A n T >FV :A H @ nY H @ nZ >AV W _ _ @ n @ r >BV -W >AV -W >AV B j R _ @ r T T S S S S >T T S S S S @ p - - T A r
0x0fd4a0…0fd634 (3, 25) Dummy {f00=0x0050, f01=0x0190, f02=»P X _ @ l I :a A l ;a L # A A P A T #( W @ BP 2 #( : d M ^ R _ W D_ * $ @ @P P R " R Q 2 #( @ @ T R A @_. @ l
0x0fd634…0fd7c8 Dummy {f00=0x0050, f01=0x0190, f02=» A ~ H A v ( $ P P >P P P W _ A n T >FV :A H @ nY H @ nZ >AV W _ _ @ n @ r >BV -W >AV -W >AV B j R _ @ r T T S S S S >T T S S S S @ p - - T A r
0x0fd7c8…0fd95c Dummy {f00=0x0050, f01=0x0190, f02=»P X _ @ l I :a A l ;a L # A A P A T #( W @ BP 2 #( : d M ^ R _ W D_ * $ @ @P P R " R Q 2 #( @ @ T R A @_. @ l
0x0fd95c…0fdaf0 Dummy {f00=0x0050, f01=0x0190, f02=» A ~ H A v ( $ P P >P P P W _ A n T >FV :A H @ nY H @ nZ >AV W _ _ @ n @ r >BV -W >AV -W >AV B j R _ @ r T T S S S S >T T S S S S @ p - - T A r
0x0fdaf0…0fdc84 Dummy {f00=0x0050, f01=0x0190, f02=»P X _ @ l I :a A l ;a L # A A P A T #( W @ BP 2 #( : d M ^ R _ W D_ * $ @ @P P R " R Q 2 #( @ @ T R A @_. @ l
0x0fdc84…0fde18 Dummy {f00=0x0050, f01=0x0190, f02=» A ~ H A v ( $ P P >P P P W _ A n T >FV :A H @ nY H @ nZ >AV W _ _ @ n @ r >BV -W >AV -W >AV B j R _ @ r T T S S S S >T T S S S S @ p - - T A r
0x0fde18…0fdfac Dummy {f00=0x0050, f01=0x0190, f02=»P X _ @ l I :a A l ;a L # A A P A T #( W @ BP 2 #( : d M ^ R _ W D_ * $ @ @P P R " R Q 2 #( @ @ T R A @_. @ l
0x0fdfac…0fe140 Dummy {f00=0x0050, f01=0x0190, f02=» A ~ H A v ( $ P P >P P P W _ A n T >FV :A H @ nY H @ nZ >AV W _ _ @ n @ r >BV -W >AV -W >AV B j R LPOP 0XLS TK1 TK2 MT1 MT2 pqCSH @ j !NNP !YYP !> A n : @ j! P P !> A n
0x0fe140…0fe2d4 (3, 26) Dummy {f00=0x0050, f01=0x0190, f02=» @ j FDX !> H: @ jT H: A lT W 8 !> A n @ j CDP FDP MDP DUT : W W S : | @ j $P Wj |9a D A n : @ j I P ^ WF : R I j W6 : R !LLT : @ j! YT A n @ l &T : X &, A W* A A A A
0x0fe2d4…0fe468 Dummy {f00=0x0050, f01=0x0190, f02=» H | P P _ @ T A A$ W @ P A _ A _ @ l # D ] | ( = V | ( = P P P P _* _0 D ] @ @$ $ A$ ( B " ( @ G LP D ] : ] < ( A$ # @$
0x0fe468…0fe5fc Dummy {f00=0x0050, f01=0x0190, f02=» D | ( = P P P P _& _, @ l *T ' @ l *T D B C W @ P D B C @ l *T (N T" B A$ D A$ $ : ( B T : ! P $ 0' P< ( @$ P W $ ( " Q
0x0fe5fc…0fe790 Dummy {f00=0x0050, f01=0x0190, f02=» @ j DKTj A : @ j DKP WX A : @ j DKX. W6 S DK $ A H H P Y S ( d S : W D ! P !TTP % W0 % W& % E P % A W % A n : @ j @ l "P ^ Wp C
0x0fe790…0fe924 Dummy {f00=0x0050, f01=0x0190, f02=» : W A %:W 8 _ A W< $ @ n # ( B # TlW IBM LABEL;TOSS LABEL; A W $ ( B ' @ n #( B P R P $ T W T # P :' P P &rW &| _ j '0 Z rQ0 , 0 '0 Z %U &, : ,!
0x0fe924…0feab8 Dummy {f00=0x0050, f01=0x0190, f02=» (Y : : : ! _ _ S : |W @ z A n : | &P P @W W D < ) D < ) P P P P _& _, : &PV T | ( T@ @ A W2 | ( T @ A W ( T @ A W :
0x0feab8…0fec4c Dummy {f00=0x0050, f01=0x0190, f02=»PDS UDS CDD CFF CFT CTF PRF SCT LFD ULD CIT CTI WIL PIT BIX RIX CCF SRT XEY , 9:)*+ W 8 8 # ! # " - D
0x0fec4c…0fede0 Dummy {f00=0x0050, f01=0x0190, f02=»TO 8 NP B AI A A V! VAW!T T"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 AWA
0x0fede0…0fef74 (3, 27) Dummy {f00=0x0051, f01=0x0190, f02=» ' | c
0x0fef74…0ff108 Dummy {f00=0x0051, f01=0x0190, f02=» ! !H! %:%@% % ! ! % ! & ! ' ' ! ' ! !n $ ' $ ' $ !d!Z ' !B % ' ' ! ' ! J ( . 1 2 7
0x0ff108…0ff29c Dummy {f00=0x0051, f01=0x0190, f02=»S A L =Ja ^ & &4 1P1l1r1 1 1 1 1 1 1 2 2*2:2D2P1^1 2Z2r 2 4 2 2 2 2 2 2 2 3 3 3&363D3`1P 3p3 3 3 1l3 3 3 1 3 3 4 1 3 2 4.4F4 4F4f4 2 4 4 4 4 4 4 4 1r 5 582 5T 5p4 5 5 5 2 1 5 1l5 0 0 0(020:0B0L0^0j0j0 0 0 0 0 0 0 0 0 0
0x0ff29c…0ff430 Dummy {f00=0x0051, f01=0x0190, f02=»8B8V8t8B765 6 6*:$5 6 8 5 6 8 7j6 5 6 7 767T9@8 5 6 7 767T9@8 9 5 6 8 9$9 9 5 6 6*9X7 7 6 9l9 : 7 767T7 7 6 9l9 9 7 767T 9 : 7 7 9 767T 7 5 7 7 6 9l9 : 7 76: 7 :| : : : : : : 5 PRINT DEVICE:;OLD RESP. NEW DISC:;VOLUME NAME:;
0x0ff430…0ff5c4 Dummy {f00=0x0051, f01=0x0190, f02=»R:; EFFECTIVE RECORD LENGTH:; 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 TAP
0x0ff5c4…0ff758 Dummy {f00=0x0051, f01=0x0190, f02=»R CODE:;PROGRAM LENGTH:;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
0x0ff758…0ff8ec Dummy {f00=0x0051, f01=0x0190, f02=»:;PTS 6876 DISC :;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 VERSION:;DISC NOT OPERABLE;BADSPOT ON TRACK ZERO.DISC
0x0ff8ec…0ffa80 Dummy {f00=0x0051, f01=0x0190, f02=»; DISC OVERFLOW;MORE THAN 4 EXTENTS 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
0x0ffa80…0ffc14 (3, 28) Dummy {f00=0x0051, f01=0x0190, f02=»UT TOO LARGE; TAPE MARK MISSING;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;
0x0ffc14…0ffda8 Dummy {f00=0x0051, f01=0x0190, f02=» NAME NOT FOUND;NO IBM DISC FORMAT; BLOCK SEQUENCE ERROR; KEY DEF. ERROR; LOAD FACTOR TOO SMALL;KEY SEQUENCE ERROR; DATA SET DEF. ERROR;ILLEGAL SECTOR NUMBER;CARD READER NOT OPERABLE; FILE ORG. ERROR;CORE AREA TOO SMALL;RECORD NOT IN FILE-END OF MEDIUM; ILLEGAL PO
0x0ffda8…0fff3c Dummy {f00=0x0051, f01=0x0190, f02=»GAL ECB PARAMETER;UNKNOWN FILE; ILLEGAL VOLUME/FILE NAME; DU2 DU1 DU4 DU3 MD1 MD2 MD3 MD4 FD1 FD2 FD3 FD4 CD1 CD2 1 0 0VOLUME NAME: DISC: 0FREE SPACE TABLE 0EXT BASE EXT LENGTH
0x0fff3c…1000d0 Dummy {f00=0x0051, f01=0x0190, f02=» FILE 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 = ( - : = C (
0x1000d0…100264 Dummy {f00=0x0051, f01=0x0190, f02=»;2 At A= = C C ( B & B & Ap B Af 2 ;L , 9 TO 4 At 4 I;d Y ;4 =. ;< $ =. ;b =. , A; , A;x , A;z " , A;| @;| A= >c A;~ = C ( B . Af B & Ap A= ;8 =. ;
0x100264…1003f8 Dummy {f00=0x0051, f01=0x0190, f02=» ; d ; =. ;8 =. ; =. ; n =. <l n =. ; ;x ;v ;| ;v A6 = ( B . Af B & Ap ;z ;z]B *% A* R p ;z R = J U !LLT2 J " c d J " k d - U 8 U T U ZW
0x1003f8…10058c Dummy {f00=0x0051, f01=0x0190, f02=»" ) d E = " N = J !SST J % T d J & X d ;z R p $ ! R !__Q Y . % Y p =. W A< ? @< < d ;8 =. < & =. ;8 =. W W W W = :
0x10058c…100720 Dummy {f00=0x0051, f01=0x0190, f02=» @A : R !LLP< R 1 R 2 Y AA AA AA Y AA AA @A W S 1 AA S 2 AA AA~ B E : A A # AA R Q ( B TH ( B T< C C ( B P ! W B Q ( , X "' F
0x100720…1008b4 (3, 29) Dummy {f00=0x0051, f01=0x0190, f02=» AA @A @A O AA AA S$ @A @A P*Y4 @A AA @A AA W : AA AA @A @A @A O AA AA @A @A P* AA AA Y4W R 6:B AA AA @A PZ @A AA @A AA @A AA @A Y P8 @A AA @A @A @A P*P Y @A @A P* AA AA AA R AA
0x1008b4…100a48 Dummy {f00=0x0051, f01=0x0190, f02=» C B / F : @A :c AA AA AA AA AA @A AA @A AA AA @A @A O AA AA @A R F 0 AA 0 AA @A T @A X" @A @A R Q @A @A R @A AA @A AA @A @A ZTQ @A @A Z` @A @A R:Q @A @A U. @A @A Y R @A @A Y AA @A AA @A
0x100a48…100bdc Dummy {f00=0x0051, f01=0x0190, f02=» /T @A T I AA : W W : _ @A T _ _ R @A AA @A AA !LLPJ @A T @A @A H P AA P AA @A @A @A @A P* AA AA RnX W4 @A @A @A @A P* AA AA H @A P AA P AA @A @A P P O Q Q @A Q @A 1 J FN P A
0x100bdc…100d70 Dummy {f00=0x0051, f01=0x0190, f02=»O Q Q P AA 0 AA @A @A @A P* AA AA T Q Q @A Q @A 1 @A @A @A @A P* AA AA AA AA @A P @A @A @A @A P* AA AA J F FN F AA AA @A E : AA FN F : P2 . P* @A P @A AA @A AA @A AA B E : :
0x100d70…100f04 Dummy {f00=0x0051, f01=0x0190, f02=» A X`_2 AA : @A~T I @A F Q : A I @A O @A K @A K @A K @A K @A K @A K K K R 2 K R 1:H R K R !LLT R 4:H R 5 K K $ K & AA ( O . " O R !LLP R 6 K % R 4 K & K ( K ) ( @
0x100f04…101098 Dummy {f00=0x0051, f01=0x0190, f02=» Y @A AA @A AA @A @A AA AA O AA AA A @A C @A AA @A AA ( C @A @A @A @A P @A O AA AA @A @A YXR @A @A Yd @A AA @A AA @A C @A AA @A AA ( C @A / F @A @A @A @A P @A O AA AA @A @A Y`R @
0x101098…10122c Dummy {f00=0x0051, f01=0x0190, f02=» 0 AO @A @A O e @A @A O e A O @A T O O O A AO ( A @A : AA L T @A T : AA~ AA B AA T> I @A P. T& AA FN : P . P B _> : A O @A - ( @A / F J AA J A
0x10122c…1013c0 Dummy {f00=0x0051, f01=0x0190, f02=» AA AA AL @L @L P P O AL AL @A @A @L @A @L Tr @A @L Th P AA P AA AA AA AL P 0 @A @A O Q 1 P AA 0 AA @A @A @L T _ ] = ] ] L AA AA AL P P @A @A P* AL AL @A @A @L @A @L M @A @L M @A Q @A
0x1013c0…101554 (3, 30) Dummy {f00=0x0051, f01=0x0190, f02=» VOLUME NAME FILE EXT.NO EXTENT BASE EXTENT LENGTH O A DELETED [ S Q"R S P W S _ R Q _ ;A [ : [ Q S W S Q R S
0x101554…1016e8 Dummy {f00=0x0051, f01=0x0190, f02=» AP AA AL @L @L P P AL AL @A @A @L @A @L T @A @L T P Q A P AA AA AA AL P 0 @A @A Q 1 P AA 0 AA @A @A @L T Qb_ ] = ] ] L AA AA AL P P @A @A AL AL @A @A @L @A
0x1016e8…10187c Dummy {f00=0x0051, f01=0x0190, f02=»TOSS REL 10.0 Z $ ARN D ARP D AR^ D ART D AR` [ : Z $ ARX D AR D ARR D ARV D ARZ [ : Z $ ARb D ARd D ARf D ARj D ARh [ : Q C C ( : S : : V : S S
0x10187c…101a10 Dummy {f00=0x0051, f01=0x0190, f02=» R ' P P R h h i Rt M U R jLkLlL Rt [+ [h 4 R [4 4 P R l0l0l0 Rt rS S E R q+ W R Rt &? &@ R l0l0l0 P R m<n<o< Rt P R e f g Rt &? &@ Wf R R l0l0l0
0x101a10…101ba4 Dummy {f00=0x0051, f01=0x0190, f02=» AQ AQ R ! T Q ARl ( B Z: " Z6 P C C ( U C c Z> Q 2 C I I " C ( U ( U C W B 9 R ! T : Z6 ZB Q C C C ( B ! : Z6 C c AQ AQ Z>
0x101ba4…101d38 Dummy {f00=0x0051, f01=0x0190, f02=»( ( ( AQ AQ AQ P AP P AP Q AQ Qb AQb 2 Q S Q AQ ARr 2 S RrT S ( RrTv B & Z6 B Z6 P& T Z. @P Q Z2 ) I AP S @RV @RT
0x101d38…101ecc Dummy {f00=0x0051, f01=0x0190, f02=» ( SL Q B & Z6 B P Wl @Q Y 2 Rn Rp P W T S T P Rn RpW( $ Y P S _2 Rn RpW& T Z. @P P Z2 AP S> S> @RV T& @RT Z" Q AQ Q @ AQ Q ( Q (
0x101ecc…102060 Dummy {f00=0x0051, f01=0x0190, f02=» $ Y P S _2 Rn Rp S> S> @RV TP @RT U| QB AQ Q4 AQ W* T P6 @P P V. AP S> S> Q ( X Q ( Y* W W W W W ^v : AQ AQ @Qb P P @P Qv @P QN $ (Q*R D H R Q W Q ^` - $ M
0x102060…1021f4 (3, 31) Dummy {f00=0x0052, f01=0x0190, f02=» d Q S Q Qd @QbQT @Q 4 T S> P* 1 Q @QbQ4 4 T P* S> 1 Q @QbQ _* @Q W @RV @RT P*Q 1 Q AQ @Rh AQ Q Q` 2 P T 0P( 0 % % @QbQ S>_4 _ % Q R
0x1021f4…102388 Dummy {f00=0x0052, f01=0x0190, f02=»Q U( _ 2 % 2 * % Y : Qd 2 * @QbQ Pl * BA % DS % PO % T % 5 Y 5 Y % % , % , % B % % (_x SZ ^ W SZ Y ARn R " T `Rb ARn 9A DRb 2
0x102388…10251c Dummy {f00=0x0052, f01=0x0190, f02=»Z @RN % @R^ % @R` % R@ ( % Y 2 % @Rh O . R O 1 R O 0 SZ Q ( @Q Z6 ^v : @RlT Q : l0 Al2 ^ 2 I R A^ A^ A^ R( Q" A^ ^ ( B _ T: ^ A^ C C ( B &
0x10251c…1026b0 Dummy {f00=0x0052, f01=0x0190, f02=» R 2 $ 1 P Y ^ ( B .T & T W W W W W : % T % 5 Y 5 Y % % , % , % B % % (_x 1VOLUME NAME: 0SECTOR NO: `f
0x1026b0…102844 Dummy {f00=0x0052, f01=0x0190, f02=» @`t 5 Y : d 5 Y : Al2 l0 2 A_ R A`f R A_ A`z R Q A`z _ ( B b A`t A`v A`x _ A_ A_ A_ ( B ! c4 l4 2 `J ( - Y `: `| R A_ R A_ _ ( c4W l0 : `R A`h @_
0x102844…1029d8 Dummy {f00=0x0052, f01=0x0190, f02=» W @`v _" ._ P@ _ _ `|_X R @_ P Q W R @_ U A_ S W. A_ A_ W$ _ @`x 5 Y _ _ `|_N `: `| a m A_ & A`t A`v A`x A_ ( B " c4 2 a @_ P P a .P _ : ct `f
0x1029d8…102b6c Dummy {f00=0x0052, f01=0x0190, f02=» c~ c cx c Acf c ( `c^ YP $ : R _ P 0 - : ; [ V - - ' d, d, d d, d, d8 Z : : ; d dF : V *W R - _ 1 T R Pd - _ : P*R
0x102b6c…102d00 Dummy {f00=0x0052, f01=0x0190, f02=»d d d Z Z Z Z : : ; e e : V *W R - _ 1 T R Pe - _ : a A_ & A`t A`v A`x A_ ( B " c4 2 a @_ P P a .P _ :
0x102d00…102e94 (3, 32) Dummy {f00=0x0052, f01=0x0190, f02=» 0 R _ <d?d U ?e R P S ?C/ G O % R ' P % =B S t w E M % t R.Q& @ Q R %| _B _& : T G.G K. A ;A; G. T ] S . N 0
0x102e94…103028 Dummy {f00=0x0052, f01=0x0190, f02=» & B. T P ' " P : P S P S P " ^_" F t v @0 UU 3 2P _ 4 , ) T G.G K. A ;A; G. ] $ ] S <% T V S @- S S < M % T S " .
0x103028…1031bc Dummy {f00=0x0052, f01=0x0190, f02=» P #P ( B. T P ' " P : P S P S P " `_"j =D @ t w E M T 1 E _ M @ p : 6 "? UU t 3 2P _ 4 , 5 T G.G K. A ;A; G. ( ] ] S S S
0x1031bc…103350 Dummy {f00=0x0052, f01=0x0190, f02=» P X _ R R "? R R k^ h:B* S R P S B J 4R 4 :B 4 R : V V 49B R 4R @ t w A I ! j :k P #P ( B. T P ' " P : P S P S P % `_" 2 D TOTN
0x103350…1034e4 Dummy {f00=0x0052, f01=0x0190, f02=» m WT %s m WF O m W8 &? m W* J m W 1g m W L m W : R Q R @l2T R Q R : l0 : %? v S : S f S 6 S b% =A S ^ S ` x UU 3 2P _ | , ) p
0x1034e4…103678 Dummy {f00=0x0052, f01=0x0190, f02=»T G.G K. A ;A; G. x ] S z | . N 0 N S W P X _ R z R 6"( R ~ | n P #P & B. T P ' " P : P S | P S ~ P " ^_"T
0x103678…10380c Dummy {f00=0x0052, f01=0x0190, f02=»S S A G E S c ~ P* d 2 P* LAST CHARACTER IN TEXT STRING SHOULD BE = ; d P* d T $ PETXT00 DATA 'DISC NOT OPERABLE;' d ^ ( PETXT01 DATA 'BADSPOT ON TRACK ZERO.' d P DATA 'DISC NOT USABLE;' d ( PETXT02 DATA 'MORE THAN 18 BADSPOTS.' d P DATA 'DIS
0x10380c…1039a0 Dummy {f00=0x0052, f01=0x0190, f02=» FILE;' d p PETXT06 DATA 'DISC OVERFLOW;' e . PETXT07 DATA 'MORE THAN 4 EXTENTS NEEDED;' e 4 ( PETXT08 DATA 'ILLEGAL BLOCK LENGTH;' e f PETXT09 DATA 'VTOC OVERFLOW;' e 0 PETXT11 DATA 'NO FREE SPACE ENTRY AVAILABLE;' e * PETXT12 DATA 'FILE NAME ALREADY
0x1039a0…103b34 (3, 33) Opaque[0x194]
0x103b34…103cc8 # DirEnt {nam=»UTIL02«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0a50, f03=0x0000}
0x103b34…103cc8 IdxSect {
0x103b34…103cc8 f00 = 0x0052 // 0x103b34 @0x0
0x103b34…103cc8 f01 = 0x0016 // 0x103b36 @0x2
0x103b34…103cc8 gno = [ // 0x103b38 @0x4
0x103b34…103cc8 [0x00]: C0x0052.0x2.0
0x103b34…103cc8 [0x01]: C0x0052.0x3.0
0x103b34…103cc8 [0x02]: C0x0053.0x0.0
0x103b34…103cc8 [0x03]: C0x0053.0x1.0
0x103b34…103cc8 [0x04]: C0x0053.0x2.0
0x103b34…103cc8 [0x05]: C0x0053.0x3.0
0x103b34…103cc8 [0x06]: C0x0054.0x0.0
0x103b34…103cc8 [0x07]: C0x0054.0x1.0
0x103b34…103cc8 [0x08]: C0x0054.0x2.0
0x103b34…103cc8 [0x09]: C0x0054.0x3.0
0x103b34…103cc8 [0x0a]: C0x0055.0x0.0
0x103b34…103cc8 ]
0x103b34…103cc8 }
0x103cc8…103e5c Dummy {f00=0x0052, f01=0x0190, f02=» Or : 0 j 0 $ ^ : 9 i $ 7 f w |4r tV u 3 qC 5 * zuqV $ ' > P ZD o c r P| sV i % 9Zj Q > - D $ 4` 1P -8 T r tB l`Tg t z ^ ,* # + RC: | | 0 z
0x103e5c…103ff0 Dummy {f00=0x0052, f01=0x0190, f02=»D OF ;PROGRAM ABORTED BY OPERATOR; T+} T* > R > V W C C ( B P 8_ B Z T $ B U [ B : $ !; P I , =Z I , * C C ( : [ ) $ Z : [ [ [ [ QxP~
0x103ff0…104184 Dummy {f00=0x0052, f01=0x0190, f02=» [ _ '0 Y R '0 Y$R '0 '8 Y6 _ [ [ Q. , 0R" 9U AR FQ 0 P =D _, [ Z Z : = ! U 9 - Y : [ [ [ [ [ [ [ RZ 0=A * T R !LLT
0x104184…104318 Dummy {f00=0x0052, f01=0x0190, f02=» U+|ZN j T* >BV ,W,_d>AV* ^ P P~ >Px Pr PlW _ A n T* >FV :A H,0 @ nY H,2 @ nZ >AV - W _ _ @ n @ r >BV -Wp>AV -Wh>AVd B j RV _ @ r T T S S S S >T T S S S S @ p - - T.M A r
0x104318…1044ac Dummy {f00=0x0052, f01=0x0190, f02=»P X _ @ l I) :a A l ;a L* # A @ A B P A B TH 2 #( W0 @ BP 2 #( : d M ^ R _ )h W D_ * $ @ @P8 P2 R " R Q 2 #( @ @ T R A @_. @ l /
0x1044ac…104640 Dummy {f00=0x0052, f01=0x0190, f02=» A ~ H) A v ( $ P P >P P P W _ A n T >FV :A H @ nY H @ nZ >AV W _ _ @ n @ r >BV -W >AV -W >AV B j R _ @ r T T S S S S >T T S S S S @ p - - T A r
0x104640…1047d4 (3, 34) Dummy {f00=0x0052, f01=0x0190, f02=»P X _ @ l I :a A l ;a L # A A P A T #( W @ BP 2 #( : d M ^ R _ W D_ * $ @ @P P R " R Q 2 #( @ @ T R A @_. @ l
0x1047d4…104968 Dummy {f00=0x0052, f01=0x0190, f02=» A ~ H A v ( $ P P >P P P W _ A n T >FV :A H @ nY H @ nZ >AV W _ _ @ n @ r >BV -W >AV -W >AV B j R _ @ r T T S S S S >T T S S S S @ p - - T A r
0x104968…104afc Dummy {f00=0x0052, f01=0x0190, f02=»P X _ @ l I :a A l ;a L # A A P A T #( W @ BP 2 #( : d M ^ R _ W D_ * $ @ @P P R " R Q 2 #( @ @ T R A @_. @ l
0x104afc…104c90 Dummy {f00=0x0052, f01=0x0190, f02=» A ~ H A v ( $ P P >P P P W _ A n T >FV :A H @ nY H @ nZ >AV W _ _ @ n @ r >BV -W >AV -W >AV B j R _ @ r T T S S S S >T T S S S S @ p - - T A r
0x104c90…104e24 Dummy {f00=0x0052, f01=0x0190, f02=»P X _ @ l I :a A l ;a L # A A P A T #( W @ BP 2 #( : d M ^ R _ W D_ * $ @ @P P R " R Q 2 #( @ @ T R A @_. @ l
0x104e24…104fb8 Dummy {f00=0x0052, f01=0x0190, f02=» A ~ H A v ( $ P P >P P P W _ A n T >FV :A H @ nY H @ nZ >AV W _ _ @ n @ r >BV -W >AV -W >AV B j R _ @ r T T S S S S >T T S S S S @ p - - T A r
0x104fb8…10514c Dummy {f00=0x0052, f01=0x0190, f02=»P X _ @ l I :a A l ;a L # A A P A T #( W @ BP 2 #( : d M ^ R _ W D_ * $ @ @P P R " R Q 2 #( @ @ T R A @_. @ l
0x10514c…1052e0 Dummy {f00=0x0052, f01=0x0190, f02=» A ~ H A v ( $ P P >P P P W _ A n T >FV :A H @ nY H @ nZ >AV W _ _ @ n @ r >BV -W >AV -W >AV B j R _ @ r T T S S S S >T T S S S S @ p - - T A r
0x1052e0…105474 (3, 35) Dummy {f00=0x0053, f01=0x0190, f02=»P X _ @ l I :a A l ;a L # A A P A T #( W @ BP 2 #( : d M ^ R _ W D_ * $ @ @P P R " R Q 2 #( @ @ T R A @_. @ l
0x105474…105608 Dummy {f00=0x0053, f01=0x0190, f02=» A ~ H A v ( $ P P >P P P W _ A n T >FV :A H @ nY H @ nZ >AV W _ _ @ n @ r >BV -W >AV -W >AV B j R _ @ r T T S S S S >T T S S S S @ p - - T A r
0x105608…10579c Dummy {f00=0x0053, f01=0x0190, f02=»P X _ @ l I :a A l ;a L # A A P A T #( W @ BP 2 #( : d M ^ R _ W D_ * $ @ @P P R " R Q 2 #( @ @ T R A @_. @ l
0x10579c…105930 Dummy {f00=0x0053, f01=0x0190, f02=» A ~ H A v ( $ P P >P P P W _ A n T >FV :A H @ nY H @ nZ >AV W _ _ @ n @ r >BV -W >AV -W >AV B j R _ @ r T T S S S S >T T S S S S @ p - - T A r
0x105930…105ac4 Dummy {f00=0x0053, f01=0x0190, f02=»P X _ @ l I :a A l ;a L # A A P A T #( W @ BP 2 #( : d M ^ R _ W D_ * $ @ @P P R " R Q 2 #( @ @ T R A @_. @ l
0x105ac4…105c58 Dummy {f00=0x0053, f01=0x0190, f02=» A ~ H A v ( $ P P >P P P W _ A n T >FV :A H @ nY H @ nZ >AV W _ _ @ n @ r >BV -W >AV -W >AV B j R _ @ r T T S S S S >T T S S S S @ p - - T A r
0x105c58…105dec Dummy {f00=0x0053, f01=0x0190, f02=»P X _ @ l I :a A l ;a L # A A P A T #( W @ BP 2 #( : d M ^ R _ W D_ * $ @ @P P R " R Q 2 #( @ @ T R A @_. @ l
0x105dec…105f80 Dummy {f00=0x0053, f01=0x0190, f02=» A ~ H A v ( $ P P >P P P W _ A n T >FV :A H @ nY H @ nZ >AV W _ _ @ n @ r >BV -W >AV -W >AV B j R LPOP 0XLS TK1 TK2 MT1 MT2 pqCSH @ j !NNP !YYP !> A n : @ j! P P !> A n
0x105f80…106114 (3, 36) Dummy {f00=0x0053, f01=0x0190, f02=» @ j FDX !> H: @ jT H: A lT W 8 !> A n @ j CDP FDP MDP DUT : W W S : | @ j $P Wj |9a D A n : @ j I P ^ WF : R I j W6 : R !LLT : @ j! YT A n @ l &T : X &, A W* A A A A
0x106114…1062a8 Dummy {f00=0x0053, f01=0x0190, f02=» H | P P _ @ T A A$ W @ P A _ A _ @ l # D ] | ( = V | ( = P P P P _* _0 D ] @ @$ $ A$ ( B " ( @ G LP D ] : ] < ( A$ # @$
0x1062a8…10643c Dummy {f00=0x0053, f01=0x0190, f02=» D | ( = P P P P _& _, @ l *T ' @ l *T D B C W @ P D B C @ l *T (N T" B A$ D A$ $ : ( B T : ! P $ 0' P< ( @$ P W $ ( " Q
0x10643c…1065d0 Dummy {f00=0x0053, f01=0x0190, f02=» @ j DKTj A : @ j DKP WX A : @ j DKX. W6 S DK $ A H H P Y S ( f: S : W D ! P !TTP % W0 % W& % E P % A W % A n : @ j @ l "P ^ Wp C
0x1065d0…106764 Dummy {f00=0x0053, f01=0x0190, f02=» : W A %:W 8 _ A W< $ @ n # ( B # TlW IBM LABEL;TOSS LABEL; A W $ ( B ' @ n #( B P R P $ T W T # P :' P P &rW &| _ j '0 Z rQ0 , 0 '0 Z %U &, : ,!
0x106764…1068f8 Dummy {f00=0x0053, f01=0x0190, f02=» (Y : : : ! _ _ S : |W @ z A n : | &P P @W W D < ) D < ) P P P P _& _, : &PV T | ( T@ @ A W2 | ( T @ A W ( T @ A W :
0x1068f8…106a8c Dummy {f00=0x0053, f01=0x0190, f02=»PDS UDS CDD CFF CFT CTF PRF SCT LFD ULD CIT CTI WIL PIT BIX RIX CCF SRT XEY , 9:)*+ W 8 8 # ! # " - D
0x106a8c…106c20 Dummy {f00=0x0053, f01=0x0190, f02=»TO 8 NP B AI A A V! VAW!T T"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 AWA
0x106c20…106db4 (3, 37) Dummy {f00=0x0053, f01=0x0190, f02=» ' | c
0x106db4…106f48 Dummy {f00=0x0053, f01=0x0190, f02=» ! !H! %:%@% % ! ! % ! & ! ' ' ! ' ! !n $ ' $ ' $ !d!Z ' !B % ' ' ! ' ! J ( . 1 2 7
0x106f48…1070dc Dummy {f00=0x0053, f01=0x0190, f02=» D N ?x j [t]<R & &4 ;`W* 1P1l1r1 1 1 1 1 1 1 2 2*2:2D2P1^1 2Z2r 2 4 2 2 2 2 2 2 2 3 3 3&363D3`1P 3p3 3 3 1l3 3 3 1 3 3 4 1 3 2 4.4F4 4F4f4 2 4 4 4 4 4 4 4 1r 5 582 5T 5p4 5 5 5 2 1 5 1l5 0 0 0(020:0B0L0^0j0j0 0 0 0 0 0 0 0 0 0
0x1070dc…107270 Dummy {f00=0x0053, f01=0x0190, f02=»8B8V8t8B765 6 6*:$5 6 8 5 6 8 7j6 5 6 7 767T9@8 5 6 7 767T9@8 9 5 6 8 9$9 9 5 6 6*9X7 7 6 9l9 : 7 767T7 7 6 9l9 9 7 767T 9 : 7 7 9 767T 7 5 7 7 6 9l9 : 7 76: 7 :| : : : : : : 5 PRINT DEVICE:;OLD RESP. NEW DISC:;VOLUME NAME:;
0x107270…107404 Dummy {f00=0x0053, f01=0x0190, f02=»R:; EFFECTIVE RECORD LENGTH:; 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 TAP
0x107404…107598 Dummy {f00=0x0053, f01=0x0190, f02=»R CODE:;PROGRAM LENGTH:;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
0x107598…10772c Dummy {f00=0x0053, f01=0x0190, f02=»:;PTS 6876 DISC :;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 VERSION:;DISC NOT OPERABLE;BADSPOT ON TRACK ZERO.DISC
0x10772c…1078c0 Dummy {f00=0x0053, f01=0x0190, f02=»; DISC OVERFLOW;MORE THAN 4 EXTENTS 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
0x1078c0…107a54 (3, 38) Dummy {f00=0x0053, f01=0x0190, f02=»UT TOO LARGE; TAPE MARK MISSING;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;
0x107a54…107be8 Dummy {f00=0x0053, f01=0x0190, f02=» NAME NOT FOUND;NO IBM DISC FORMAT; BLOCK SEQUENCE ERROR; KEY DEF. ERROR; LOAD FACTOR TOO SMALL;KEY SEQUENCE ERROR; DATA SET DEF. ERROR;ILLEGAL SECTOR NUMBER;CARD READER NOT OPERABLE; FILE ORG. ERROR;CORE AREA TOO SMALL;RECORD NOT IN FILE-END OF MEDIUM; ILLEGAL PO
0x107be8…107d7c Dummy {f00=0x0053, f01=0x0190, f02=»GAL ECB PARAMETER;UNKNOWN FILE; ILLEGAL VOLUME/FILE NAME; DU2 DU1 DU4 DU3 MD1 MD2 MD3 MD4 FD1 FD2 FD3 FD4 CD1 CD2 LABEL RECORD ERROR; ILLEGAL BLOCK LENGTH O ;^ 2 A;4 A;P R A;B R A;@ A;N9h A;2 A; ;2 = D R R < A;6 ;@ = D :T D < < R D
0x107d7c…107f10 Dummy {f00=0x0053, f01=0x0190, f02=» - @;= - @;> - - ;@( @;H @T @;H # X ;JZ " TFW < _4 @;J A;X @;L A;Z ;N( @;V T ( @;V T : W W W W W W W W ;@ ( ;2( ;^ : A; _$ B C ( B f B " D # P C
0x107f10…1080a4 Dummy {f00=0x0053, f01=0x0190, f02=» 0FREE SPACE TABLE 0EXT BASE EXT LENGTH OF ENTRIES USED 0VOLUME TABLE OF CONTENTS 0FILE FILE FILE FILE RECORD BLOCK LAST FILE FILE CREATION RET INDEX KEY MONITOR SWITCH NAME EXT BASE EXT LEN OR
0x1080a4…108238 Dummy {f00=0x0053, f01=0x0190, f02=»OC = ( - : ?@ C ( B C : ?L 2 A?4 A= A?, R A?A R A?3 P: A= P: A= A=` ?2 "' R$ Q ( B ' C A=` C A?6 ?2 C C ( B & B & C B C 2 =z , 9
0x108238…1083cc Dummy {f00=0x0053, f01=0x0190, f02=»?6>c A= ?2 C ( B . C B & C A?6 =f ? = ? = ? 2 = 4P 4W 4P4 A= = g 4 4 = g = ? YBW YL @= = f @= = f = ? =f ? > ? >* n ? > n ? = = = =
0x1083cc…108560 Dummy {f00=0x0053, f01=0x0190, f02=» ?N J U !LLT2 J " c f J " k f - U 8 U T U ZW - U d U l J 8 f J ? f J J g J J g . J J g J " f J " ) f E ?N " N ?N J !SST J % T f J & X f
0x108560…1086f4 (3, 39) Dummy {f00=0x0054, f01=0x0190, f02=» W W W W ?L : AC AC AC AC AC AC DN P AC @C P O @C : R !LLP< R 1 R 2 Y AD AD AD Y AD AD @D W S
0x1086f4…108888 Dummy {f00=0x0054, f01=0x0190, f02=» C ( B P ! W B Q ( , X "' H _z "' AC @C F R 0 $' R T W $ T AC R !LLP @C T AC AC R 1 R 8 AC R 6! AC PJ AC AC @C @C R AC AC S$ @C @C RXY4 @C AC @C AC W : AC AC @
0x108888…108a1c Dummy {f00=0x0054, f01=0x0190, f02=» AD @C @C @D RXP Y @C @C RX AC AC AC R AC AC AC . AD 9H AD AD AC AC AC @C P AC AC B AGJ ( B H @GJ C C @D C ( C B / H : @D :c AD AC AC AC AC @C AC @C AC AC @C @C
0x108a1c…108bb0 Dummy {f00=0x0054, f01=0x0190, f02=»C @C Z` @C @C R:Q @C @C U. @C @C Y R @C @C Y AC @C AC @C AC _ @C AC @C AC @C AC @C AC W L T^ Q 1 Q Q C R AC @C AD AD @D C ( C @D /T @D T K AD : W W : _ @C T _ _ R @C AC @C AC !LLPJ @C
0x108bb0…108d44 Dummy {f00=0x0054, f01=0x0190, f02=»C P AC @C @C P P R Q Q @C Q @C 1 L H| P AC 0 AC AC AC @D RX AC AC @C @C @D R AC AC @C @C @D RX AC AC ^6 @C @C P P R Q Q P AC 0 AC @C @C @C RX AC AC T Q Q @C Q @C 1 @C @C @
0x108d44…108ed8 Dummy {f00=0x0054, f01=0x0190, f02=» H : P2 . P* @C P @C AC @C AC @C AD D GL : : AC @C @D AC 2 C AC @C @C H AD AD ( @D / H C 6 P J S T $ 1T P _ C X`_2 AC : @C T K. @C H Q : C K. @C QH @C
0x108ed8…10906c Dummy {f00=0x0054, f01=0x0190, f02=» ( QH . " QH R !LLP R 6 K % R 4 K & K ( K ) ( @D / H : @C T K. @C H Q : C K. @C K, AC N: 2 AC @D % @C R 2 R 1 % Y @C AC @C AC @C @C AC AC R AC AC C @D C @C AD @C AD (
0x10906c…109200 Dummy {f00=0x0054, f01=0x0190, f02=» C @D / H @C @C @D @C P @C R AC AC @C @C Y`R @C @C Yl @C AC @C AC : AC @C Q6 AC QV Qj QH AQZ ( Qr 9 AQv ( Q QH @C 0 AQ @C @C Q g @C @C Q g C Q @C T R QH Q A AQ (
0x109200…109394 (3, 40) Dummy {f00=0x0054, f01=0x0190, f02=»P D _> : C QH @C - ( @D / H J AC J AC J AC J AC J AC N: R @D 9c AD @D Q 0 AN 0 AN @N T @N Q P @C T P @C O AC AC AN @N @N P P R AN AN @C @C @N @C @N Tr @C @N Th P AC P
0x109394…109528 Dummy {f00=0x0054, f01=0x0190, f02=» @C @C RX AN AN @C @C @N @C @N O @C @N O @C Q @C Q _ O O J @C I @C ) @C I @C I O ( - : Qb FILE Q~ 9 VOLUME NAME FILE EXT.NO EXTENT BASE EXTENT LENGTH Q A
0x109528…1096bc Dummy {f00=0x0054, f01=0x0190, f02=» Q _ ;A [ : [ Q S W S Q R S P W S _ R _ ;A [ : AD @D 0 P P R R Aa R R # B C ( B T " T B SD $ ) _ 1FILE NAME:
0x1096bc…109850 Dummy {f00=0x0054, f01=0x0190, f02=» R C S R R ( : _ _ _ _$ % 6 ( B S S S (> B @R Q RJ B @R U@ V T: W _ 2 FOLLOWING RECORDS ARE BEHIND LAST RECORD NUMBER > V^ T ` NO DATA _ W^ N N U0
0x109850…1099e4 Dummy {f00=0x0054, f01=0x0190, f02=» Y Y _( :_Lc*d Q S W S Q R S P W U S _ R V _ ;A [ : AD @D 0 R R A R R # C ( B T " T B $ ) 1FILE NAME:
0x1099e4…109b78 Dummy {f00=0x0054, f01=0x0190, f02=» 0NUMBER OF MASTER INDEX ENTRIES: 0NUMBER OF INDEX RECORDS PER PARTITION: 0-REORGANIZING THE FILES V 2 AU^ R AUl R AUQ R AUk AU AU] R AUy Xd Uj X D Y6 @V Y6 AV AV AV D # AV AU Ux X @V D
0x109b78…109d0c Dummy {f00=0x0054, f01=0x0190, f02=» @Ut AV @Uv AV AV @V @V ZZ Z @V @V Zh X _n Uj Y AV AV : U Z6 D R AV AU` AUf AUh Wb Z6 D :T D <T : Ux @Uz @V V Z Y AV AV AV : P2 XR @Ul @V Z @V @V Z @V P Z X @U V f P AU Y V ' [6 W& W$
0x109d0c…109ea0 Dummy {f00=0x0054, f01=0x0190, f02=» AUh_( ( B P # @ : W U ( @U " : B AU B AU " AU Y Y : @Ul @Uz @V Z Z @V P Y AV Y AV : B C ( B Y" B " P C D # ( # D !SS YF : $ ) : @Ul @V )
0x109ea0…10a034 (3, 41) Dummy {f00=0x0054, f01=0x0190, f02=» f V . [6 f YH W [6 : AUT AUR UP( : , ! P )Q R V _ W W : 8 : % 6 W R W B W ( B ^N J W R " R, ^ R $ R MP W W ^V J ' # B P C
0x10a034…10a1c8 Dummy {f00=0x0054, f01=0x0190, f02=» C _B W 0P W U V R qn $ C R # MMT W Q C W& C W " qf qn V " _0 V Q qf V R $ W qn V ] qn q& ^F < > % 6 B W R W ( B ^J J W
0x10a1c8…10a35c Dummy {f00=0x0054, f01=0x0190, f02=» B W V Y ^n V P ( ^ V P _| ( _ W W2 W B W( W" W W W W W W W W R ! T W ( : ( B P & B ~ @ B ^ : : n _ P $ R
0x10a35c…10a4f0 Dummy {f00=0x0054, f01=0x0190, f02=» P Y" _ _2 P ` %%% _ :d@dR < $" = @b Ab Ab _ Ab : Ab W @b@ n Ab Ab@ _ ` AbDU `R ` a ( @b @b b Aa Aa ` ( B ' P a Ab S : bH U ` b a W @bD #U. b AbB @bB h AbD bF p @b _ _ Ab
0x10a4f0…10a684 Dummy {f00=0x0054, f01=0x0190, f02=»` - :0123456789ABCDEF aB Aa 9h ` _@ aB - Y : @b@ nY : @bDU `R : @b@ Ab@R _ _ b@ : aB h Ab@ : aB h : g, C C ( @b@ Ab@ B ' S : aB M g : a : _ P $ R
0x10a684…10a818 Dummy {f00=0x0054, f01=0x0190, f02=» P Y" _2 P %%% : < $" = @ A A PAGE: a W @ n A A A U ( @ @ A A ( B ' P A S : U ( * cL U Y _ _ _ : c & P$ U ?V W _ ` W cv
0x10a818…10a9ac Dummy {f00=0x0054, f01=0x0190, f02=» R Z _ P*R R P ;A [ [ : V X"Z(_( L _P! R ?U W W ! @R @R @R Ld # : : .<(+?& !$*); ??? &%->? :#@'=" ABCDEFGHI JKLMNOPQR STUVWXYZ 0123456789
0x10a9ac…10ab40 Dummy {f00=0x0054, f01=0x0190, f02=»` " ` _ Yv _ : %%% : d@dR e " = @ A A PAGE 0OK? 0OUTPUT VOLUME NAME: e C C R Ae " P Ae ( : : B e $ ) Y e e e e Ae e ( `e YP $ : R _ P
0x10ab40…10acd4 (3, 42) Dummy {f00=0x0054, f01=0x0190, f02=» V *W R - _ 1 T R Pf - _ : RXR _ P 0 / R : ; [ [ [ [ B@ g g ' g g d g g g Z Z Z Z : : ; g g, :
0x10acd4…10ae68 Dummy {f00=0x0054, f01=0x0190, f02=»h R Xh _ Ah P Q T Z& - _. Ah @h R - 0 - _F Z Z Z Z : :** d ' i Ah S : Ah Ah _ @h Ah @h Ah : h ( i. : B l^ lb : Ah S
0x10ae68…10affc Dummy {f00=0x0054, f01=0x0190, f02=» @h lj : Ah Ah _J 2 - Y : Ah S W Ah Ah @h @h @h Q R @h @h U h C i. : h ( @h ' i. : h ( B ' i. B lj : B C ( B i. C C : h 2 Ah Ah R Ah R Ah Ah Ah
0x10affc…10b190 Dummy {f00=0x0054, f01=0x0190, f02=» 2 H H Ah Ah h ( H <T H : ln lr lf Ah Ah Ah Ah Ah PxW, iD @h : RX: R" jF @h @P i ir i _ i _. 6 i jF @h @P i ir i _ i ir i _d i ir i iJW iD @h T> T, @h : R h ir i _( Ah S _0 Ah Ah _>
0x10b190…10b324 Dummy {f00=0x0054, f01=0x0190, f02=»( R Ah R h ( W @h Ah ] : @h ] < h ( : Ah 0 Ah Ah Ah Ah Ah Ah Ah Ah h ( i. h B B n h h @h @h Ah ( Ah @h lj h ( i. h B B ln @h Ah @h Ah W< @h Ah Ah h
0x10b324…10b4b8 Dummy {f00=0x0054, f01=0x0190, f02=» B > R > Z$W4 R & P2 nrW W ^f b 7P P ^j ) r n _Z [ : ( B X > Z ^N 01 W (W ( W ^F R W R " R MP W C C ( B P ( B a ^N R nrWL! ^Z 1 /TD R P D M T*
0x10b4b8…10b64c Dummy {f00=0x0054, f01=0x0190, f02=»P8 # Dp ! p $P" # p." C C ( B Y _& [ : R C * C C p C ( B Y B Y| o W GOX ABX n HDR LABEL CHECK: ERR +VOLUME +LABEL +IDENTIFIER LABEL RECORD: 'h B B ln @h Ah @h Ah W<' ENTER COMMAND
0x10b64c…10b7e0 Dummy {f00=0x0054, f01=0x0190, f02=» B 00000000W 9 $ R ! P qR Aq qNW qR : W ( B r : ( :( B P 9 r 7 q( ( q qf_* q W $ Iq ^ K $ ! P $ Iq ^ N $ Iq ^ q r W W ^F 1 Aq ! $ Iq ^ q#
0x10b7e0…10b974 (3, 43) Dummy {f00=0x0055, f01=0x0190, f02=» : ^J $# 9P : % : 0 % ^ : 0 % ^ :Y _& [ : R C * C C p C ( B Y B Y| o W GOX ABX n HDR LABEL CHECK: ERR +VOLUME +LABEL +IDENTIFIER LABEL RECORD: 'h B B ln @h Ah @h Ah W<' ENTER COMMAND
0x10b974…10bb08 Dummy {f00=0x0055, f01=0x0190, f02=»2 ~ P RTN A14 P* P EJECT COPFIL $ P* < P* **************** F P* * ENTRY COPFIL * ` P* **************** z P* PCOPFIL EQU * & P ST A14,STACKP STORE STACKPOINTER " P LDR* A1,A12 GET BUF1 ADDRESS ( P ST A1
0x10bb08…10bc9c Dummy {f00=0x0055, f01=0x0190, f02=»2+2 BUF2 ADDRESS TO ECB2 P* . P LD A3,QFC,A12 GET FILE CODES INPUT/OUTPUT * P ECR A2,A3 0 P SC A2,ECBIN+1 FILE CODE INPUT DISC TO ECBIN n 4 P SC A3,ECBOUT+1 FILE CODE OUTPUT DISC TO ECBOUT 0 P SC A3,ECB2+1 FILE CODE OUTPUT DISC TO ECB2
0x10bc9c…10be30 Dummy {f00=0x0055, f01=0x0190, f02=»FF P ANKL A2,/FF P CWK A2,/A0 P ABL(L) L1 2 P CWK A3,/A0 D P ABL(L) RTN:06 TYPE ERROR X P ABL L2 OK,BOTH ARE S-FILES z PL1 EQU * P CWK A3,/A0 P ABL(NL) RTN:06 TYPE ERROR " P ABL COPYL OK,BOTH ARE L-FILES
0x10be30…10bfc4 Dummy {f00=0x0055, f01=0x0190, f02=»* P LDKL A8,ECBIN & P CF A14,VTOC READ VTOC INPUT DISC P* =4 START J ( P LD A10,FDRLEN,A1 RECORD LENGTH=A10 P* P LC A6,FDFNR,A1 FILENR P SC A6,ECBFM+1 IN FM ECB P ST A1,ECBFM+2 P LDKL A6,FMLEN P ST A6,ECBFM
0x10bfc4…10c158 Dummy {f00=0x0055, f01=0x0190, f02=» P LD A6,FMREC1,A1 =4 P ST A6,FREC1 =4 & P LD A6,FMREC2,A1 LAST RECNR PART 2 8 P ST A6,FREC2 =4 b P RF(NZ) A006 z & P LD A6,FMREC1,A1 LAST RECNR PART 1 P* =4 END P* P EJECT COPFIL P* P* PA006 EQU *
0x10c158…10c2ec Dummy {f00=0x0055, f01=0x0190, f02=»,FDRLEN,A2 RECORD LENGTH=A4 P LC A5,FDFNR,A2 FILE NR $ P SC A5,ECBFM+1 D P ST A2,ECBFM+2 Z P LDKL A7,FMORD p 2 P LDKL A8,ECBFM READ FILE PARM BLOCK OUTPUTFILE P LKM P DATA 15 P LD A5,FMREC2,A2 LRN PART 2 & P RF(NZ) A007
0x10c2ec…10c480 Dummy {f00=0x0055, f01=0x0190, f02=»CT COPFIL P* P* 2 P CC A11,FMORG,A2 COMPARE FILE ORGANIZATIONS =4 ( . P ABL(NE) RTN:06 JUMP TO ERROR IF NOT EQUAL ^ P* 2 P CWR A4,A10 COMPARE INPUT/OUTPUT RECORD LENGTH * P ABL(NE) RTN:03 FAULTY RECORD LENGTHS? P ST A4,ECB
0x10c480…10c614 (3, 44) Opaque[0x194]
0x10c614…10c7a8 # DirEnt {nam=»UTIL03«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0aa8, f03=0x0000}
0x10c614…10c7a8 IdxSect {
0x10c614…10c7a8 f00 = 0x0055 // 0x10c614 @0x0
0x10c614…10c7a8 f01 = 0x0016 // 0x10c616 @0x2
0x10c614…10c7a8 gno = [ // 0x10c618 @0x4
0x10c614…10c7a8 [0x00]: C0x0055.0x1.0
0x10c614…10c7a8 [0x01]: C0x0055.0x2.0
0x10c614…10c7a8 [0x02]: C0x0055.0x3.0
0x10c614…10c7a8 [0x03]: C0x0056.0x0.0
0x10c614…10c7a8 [0x04]: C0x0056.0x1.0
0x10c614…10c7a8 [0x05]: C0x0056.0x2.0
0x10c614…10c7a8 [0x06]: C0x0056.0x3.0
0x10c614…10c7a8 [0x07]: C0x0057.0x0.0
0x10c614…10c7a8 [0x08]: C0x0057.0x1.0
0x10c614…10c7a8 [0x09]: C0x0057.0x2.0
0x10c614…10c7a8 [0x0a]: C0x0057.0x3.0
0x10c614…10c7a8 ]
0x10c614…10c7a8 }
0x10c7a8…10c93c Dummy {f00=0x0055, f01=0x0190, f02=» Or : 0 j 0 $ ^ : 9 i $ 7 f w |4r tV u 3 qC 5 * zuqV $ ' > P ZD o c r P| sV i % 9Zj Q > - D $ 4` 1P -8 T r tB l`Tg t z ^ ,* # + RC: | | 0 z
0x10c93c…10cad0 Dummy {f00=0x0055, f01=0x0190, f02=»D OF ;PROGRAM ABORTED BY OPERATOR; T+} T* > R > V W C C ( B P 8_ B Z T $ B U [ B : $ !; P I , =Z I , * C C ( : [ ) $ Z : [ [ [ [ QxP~
0x10cad0…10cc64 Dummy {f00=0x0055, f01=0x0190, f02=» [ _ '0 Y R '0 Y$R '0 '8 Y6 _ [ [ Q. , 0R" 9U AR FQ 0 P =D _, [ Z Z : = ! U 9 - Y : [ [ [ [ [ [ [ RZ 0=A * T R !LLT
0x10cc64…10cdf8 Dummy {f00=0x0055, f01=0x0190, f02=» U+|ZN j T* >BV ,W,_d>AV* ^ P P~ >Px Pr PlW _ A n T* >FV :A H,0 @ nY H,2 @ nZ >AV - W _ _ @ n @ r >BV -Wp>AV -Wh>AVd B j RV _ @ r T T S S S S >T T S S S S @ p - - T.M A r
0x10cdf8…10cf8c Dummy {f00=0x0055, f01=0x0190, f02=»P X _ @ l I) :a A l ;a L* # A @ A B P A B TH 2 #( W0 @ BP 2 #( : d M ^ R _ )h W D_ * $ @ @P8 P2 R " R Q 2 #( @ @ T R A @_. @ l /
0x10cf8c…10d120 Dummy {f00=0x0055, f01=0x0190, f02=» A ~ H) A v ( $ P P >P P P W _ A n T >FV :A H @ nY H @ nZ >AV W _ _ @ n @ r >BV -W >AV -W >AV B j R _ @ r T T S S S S >T T S S S S @ p - - T A r
0x10d120…10d2b4 (3, 45) Dummy {f00=0x0055, f01=0x0190, f02=»P X _ @ l I :a A l ;a L # A A P A T #( W @ BP 2 #( : d M ^ R _ W D_ * $ @ @P P R " R Q 2 #( @ @ T R A @_. @ l
0x10d2b4…10d448 Dummy {f00=0x0055, f01=0x0190, f02=» A ~ H A v ( $ P P >P P P W _ A n T >FV :A H @ nY H @ nZ >AV W _ _ @ n @ r >BV -W >AV -W >AV B j R _ @ r T T S S S S >T T S S S S @ p - - T A r
0x10d448…10d5dc Dummy {f00=0x0055, f01=0x0190, f02=»P X _ @ l I :a A l ;a L # A A P A T #( W @ BP 2 #( : d M ^ R _ W D_ * $ @ @P P R " R Q 2 #( @ @ T R A @_. @ l
0x10d5dc…10d770 Dummy {f00=0x0055, f01=0x0190, f02=» A ~ H A v ( $ P P >P P P W _ A n T >FV :A H @ nY H @ nZ >AV W _ _ @ n @ r >BV -W >AV -W >AV B j R _ @ r T T S S S S >T T S S S S @ p - - T A r
0x10d770…10d904 Dummy {f00=0x0055, f01=0x0190, f02=»P X _ @ l I :a A l ;a L # A A P A T #( W @ BP 2 #( : d M ^ R _ W D_ * $ @ @P P R " R Q 2 #( @ @ T R A @_. @ l
0x10d904…10da98 Dummy {f00=0x0055, f01=0x0190, f02=» A ~ H A v ( $ P P >P P P W _ A n T >FV :A H @ nY H @ nZ >AV W _ _ @ n @ r >BV -W >AV -W >AV B j R _ @ r T T S S S S >T T S S S S @ p - - T A r
0x10da98…10dc2c Dummy {f00=0x0055, f01=0x0190, f02=»P X _ @ l I :a A l ;a L # A A P A T #( W @ BP 2 #( : d M ^ R _ W D_ * $ @ @P P R " R Q 2 #( @ @ T R A @_. @ l
0x10dc2c…10ddc0 Dummy {f00=0x0055, f01=0x0190, f02=» A ~ H A v ( $ P P >P P P W _ A n T >FV :A H @ nY H @ nZ >AV W _ _ @ n @ r >BV -W >AV -W >AV B j R _ @ r T T S S S S >T T S S S S @ p - - T A r
0x10ddc0…10df54 (3, 46) Dummy {f00=0x0055, f01=0x0190, f02=»P X _ @ l I :a A l ;a L # A A P A T #( W @ BP 2 #( : d M ^ R _ W D_ * $ @ @P P R " R Q 2 #( @ @ T R A @_. @ l
0x10df54…10e0e8 Dummy {f00=0x0055, f01=0x0190, f02=» A ~ H A v ( $ P P >P P P W _ A n T >FV :A H @ nY H @ nZ >AV W _ _ @ n @ r >BV -W >AV -W >AV B j R _ @ r T T S S S S >T T S S S S @ p - - T A r
0x10e0e8…10e27c Dummy {f00=0x0055, f01=0x0190, f02=»P X _ @ l I :a A l ;a L # A A P A T #( W @ BP 2 #( : d M ^ R _ W D_ * $ @ @P P R " R Q 2 #( @ @ T R A @_. @ l
0x10e27c…10e410 Dummy {f00=0x0055, f01=0x0190, f02=» A ~ H A v ( $ P P >P P P W _ A n T >FV :A H @ nY H @ nZ >AV W _ _ @ n @ r >BV -W >AV -W >AV B j R _ @ r T T S S S S >T T S S S S @ p - - T A r
0x10e410…10e5a4 Dummy {f00=0x0055, f01=0x0190, f02=»P X _ @ l I :a A l ;a L # A A P A T #( W @ BP 2 #( : d M ^ R _ W D_ * $ @ @P P R " R Q 2 #( @ @ T R A @_. @ l
0x10e5a4…10e738 Dummy {f00=0x0055, f01=0x0190, f02=» A ~ H A v ( $ P P >P P P W _ A n T >FV :A H @ nY H @ nZ >AV W _ _ @ n @ r >BV -W >AV -W >AV B j R _ @ r T T S S S S >T T S S S S @ p - - T A r
0x10e738…10e8cc Dummy {f00=0x0055, f01=0x0190, f02=»P X _ @ l I :a A l ;a L # A A P A T #( W @ BP 2 #( : d M ^ R _ W D_ * $ @ @P P R " R Q 2 #( @ @ T R A @_. @ l
0x10e8cc…10ea60 Dummy {f00=0x0055, f01=0x0190, f02=» A ~ H A v ( $ P P >P P P W _ A n T >FV :A H @ nY H @ nZ >AV W _ _ @ n @ r >BV -W >AV -W >AV B j R LPOP 0XLS TK1 TK2 MT1 MT2 pqCSH @ j !NNP !YYP !> A n : @ j! P P !> A n
0x10ea60…10ebf4 (3, 47) Dummy {f00=0x0056, f01=0x0190, f02=» @ j FDX !> H: @ jT H: A lT W 8 !> A n @ j CDP FDP MDP DUT : W W S : | @ j $P Wj |9a D A n : @ j I P ^ WF : R I j W6 : R !LLT : @ j! YT A n @ l &T : X &, A W* A A A A
0x10ebf4…10ed88 Dummy {f00=0x0056, f01=0x0190, f02=» H | P P _ @ T A A$ W @ P A _ A _ @ l # D ] | ( = V | ( = P P P P _* _0 D ] @ @$ $ A$ ( B " ( @ G LP D ] : ] < ( A$ # @$
0x10ed88…10ef1c Dummy {f00=0x0056, f01=0x0190, f02=» D | ( = P P P P _& _, @ l *T ' @ l *T D B C W @ P D B C @ l *T (N T" B A$ D A$ $ : ( B T : ! P $ 0' P< ( @$ P W $ ( " Q
0x10ef1c…10f0b0 Dummy {f00=0x0056, f01=0x0190, f02=» @ j DKTj A : @ j DKP WX A : @ j DKX. W6 S DK $ A H H P Y S ( j S : W D ! P !TTP % W0 % W& % E P % A W % A n : @ j @ l "P ^ Wp C
0x10f0b0…10f244 Dummy {f00=0x0056, f01=0x0190, f02=» : W A %:W 8 _ A W< $ @ n # ( B # TlW IBM LABEL;TOSS LABEL; A W $ ( B ' @ n #( B P R P $ T W T # P :' P P &rW &| _ j '0 Z rQ0 , 0 '0 Z %U &, : ,!
0x10f244…10f3d8 Dummy {f00=0x0056, f01=0x0190, f02=» (Y : : : ! _ _ S : |W @ z A n : | &P P @W W D < ) D < ) P P P P _& _, : &PV T | ( T@ @ A W2 | ( T @ A W ( T @ A W :
0x10f3d8…10f56c Dummy {f00=0x0056, f01=0x0190, f02=»PDS UDS CDD CFF CFT CTF PRF SCT LFD ULD CIT CTI WIL PIT BIX RIX CCF SRT XEY , 9:)*+ W 8 8 # ! # " - D
0x10f56c…10f700 Dummy {f00=0x0056, f01=0x0190, f02=»TO 8 NP B AI A A V! VAW!T T"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 AWA
0x10f700…10f894 (3, 48) Dummy {f00=0x0056, f01=0x0190, f02=» ' | c
0x10f894…10fa28 Dummy {f00=0x0056, f01=0x0190, f02=» ! !H! %:%@% % ! ! % ! & ! ' ' ! ' ! !n $ ' $ ' $ !d!Z ' !B % ' ' ! ' ! J ( . 1 2 7
0x10fa28…10fbbc Dummy {f00=0x0056, f01=0x0190, f02=» L U Y & &4^ a ; @x j 1P1l1r1 1 1 1 1 1 1 2 2*2:2D2P1^1 2Z2r 2 4 2 2 2 2 2 2 2 3 3 3&363D3`1P 3p3 3 3 1l3 3 3 1 3 3 4 1 3 2 4.4F4 4F4f4 2 4 4 4 4 4 4 4 1r 5 582 5T 5p4 5 5 5 2 1 5 1l5 0 0 0(020:0B0L0^0j0j0 0 0 0 0 0 0 0 0 0
0x10fbbc…10fd50 Dummy {f00=0x0056, f01=0x0190, f02=»8B8V8t8B765 6 6*:$5 6 8 5 6 8 7j6 5 6 7 767T9@8 5 6 7 767T9@8 9 5 6 8 9$9 9 5 6 6*9X7 7 6 9l9 : 7 767T7 7 6 9l9 9 7 767T 9 : 7 7 9 767T 7 5 7 7 6 9l9 : 7 76: 7 :| : : : : : : 5 PRINT DEVICE:;OLD RESP. NEW DISC:;VOLUME NAME:;
0x10fd50…10fee4 Dummy {f00=0x0056, f01=0x0190, f02=»R:; EFFECTIVE RECORD LENGTH:; 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 TAP
0x10fee4…110078 Dummy {f00=0x0056, f01=0x0190, f02=»R CODE:;PROGRAM LENGTH:;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
0x110078…11020c Dummy {f00=0x0056, f01=0x0190, f02=»:;PTS 6876 DISC :;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 VERSION:;DISC NOT OPERABLE;BADSPOT ON TRACK ZERO.DISC
0x11020c…1103a0 Dummy {f00=0x0056, f01=0x0190, f02=»; DISC OVERFLOW;MORE THAN 4 EXTENTS 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
0x1103a0…110534 (3, 49) Dummy {f00=0x0056, f01=0x0190, f02=»UT TOO LARGE; TAPE MARK MISSING;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;
0x110534…1106c8 Dummy {f00=0x0056, f01=0x0190, f02=» NAME NOT FOUND;NO IBM DISC FORMAT; BLOCK SEQUENCE ERROR; KEY DEF. ERROR; LOAD FACTOR TOO SMALL;KEY SEQUENCE ERROR; DATA SET DEF. ERROR;ILLEGAL SECTOR NUMBER;CARD READER NOT OPERABLE; FILE ORG. ERROR;CORE AREA TOO SMALL;RECORD NOT IN FILE-END OF MEDIUM; ILLEGAL PO
0x1106c8…11085c Dummy {f00=0x0056, f01=0x0190, f02=»GAL ECB PARAMETER;UNKNOWN FILE; ILLEGAL VOLUME/FILE NAME; DU2 DU1 DU4 DU3 MD1 MD2 MD3 MD4 FD1 FD2 FD3 FD4 CD1 CD2 LABE RROR ILLEGA ERMAPVOL1 080 01001 7302601001080 74001 7302674001DDR1 DATA HDR1 DATA VOL1 0-CREATING THE DATA SET 0NUMBER O
0x11085c…1109f0 Dummy {f00=0x0056, f01=0x0190, f02=» Y WT A; R 5$ > A;6 >^ C jR A;4 A;4 > ;2 > > >f A;6W A; R 5$ P0 B L ( A; ( A; C jR > ;2 2 C WJ 2 8 ) > >^ > 4 )T R > W ],W > A;T > >^
0x1109f0…110b84 Dummy {f00=0x0056, f01=0x0190, f02=» 0:P 1:P ;v ? @;>Y4W A;T ?> R >^ > > > > > > > > R > @;PP >f @;T ; k ; ?( Wf 10_ 20_ C C ( P$ P A;T P T T : W W W W W
0x110b84…110d18 Dummy {f00=0x0056, f01=0x0190, f02=» @;B > ;@( : B PP A;L B @;LZ A;N B A;R 2 > @;RP > ; ?( ;2 @;L > @;N] A;P : A; C 1VOLUME NAME: DISC: 0INDEX TRACK: 0DSL DATA RECORD BOE EOE EOD CREATION EXPIRATI
0x110d18…110eac Dummy {f00=0x0056, f01=0x0190, f02=»? ? A? A 0 VO A 0 L1 A ? B B B F: 5 F: U # A B* L B* F B* A? A H B: @? @? 0:Px 1:Px A? 5 B B B B B B B H @? T 0 a? A? A A?
0x110eac…111040 Dummy {f00=0x0056, f01=0x0190, f02=»? : : @? B A : 5 : # ( B PH C C C ( B P B " T B 4 9T : b : B B <F <E :B : B ;D ;C <A B : B B <C : 4$ :
0x111040…1111d4 (3, 50) Dummy {f00=0x0056, f01=0x0190, f02=» C C 0READ ERROR SECTOR NO: TO FILE NAME: DESTROYED RECORDS: TO 0INPUT DISC 0OUTPUT DISC @C C @CV H` T4
0x1111d4…111368 Dummy {f00=0x0056, f01=0x0190, f02=»C> @ @C@ @C^^J YB U $ ) Y : ) @C6 ) @C8 ) @C2 ) @C4 ) ) @C ) : @CX<E U H AC> ( AC@ H AC: ( AC< @C> @CJZ0Q @C@ @CLZ< : Dh ADj ADl ( : C* C. C, C0 C C C @Cb ; [ [ C CR C CT C ( C ! T
0x111368…1114fc Dummy {f00=0x0056, f01=0x0190, f02=» @Ch @Cj @C^ Uj ACh ACjR @Cd @Cf U ACd ACf_6 @Cd @CfW P @Ch @Cj U _ H( D8 l$ @C U DD l$ @CF @CH C l$ @CF @CH @C^ U D l$ C E C " E D E D$ ( E 2 @C @C % Y @C @CF @CH @C^ U ACR
0x1114fc…111690 Dummy {f00=0x0056, f01=0x0190, f02=»C* C0 C, 2 AC AC AC AC Z Z : : F C C ( B ' T : C _* H2 2 ) $ T : * Y ]0 : HZ R ) ( P Y ], : C AC C ( C / T : C CR CT
0x111690…111824 Dummy {f00=0x0056, f01=0x0190, f02=»T W " T U AC T C _> T T : C Ct C Cv C @Dt AC AC ( @Ct @Cv U AC AC @C P I : B AC P P B _p B PZ ACr B PP DZ E C E @Ct @Cv C l$ @Ct @Cv @Cr U D l$ C " E : DN _R C @Ct A
0x111824…1119b8 Dummy {f00=0x0056, f01=0x0190, f02=» I I " C C C ( ( C WL C AC ( B ' T C : C ( B K C jR U R ! D: R # L: P U C 2 D 0 D 1 C ( C B , % Y 2 $ 2 , Y AC~ @C~
0x1119b8…111b4c Dummy {f00=0x0056, f01=0x0190, f02=»T V P P$W8 I _: ADt I Jn W ADt I Jn C ( C T U C$ 2 AC AC R AC AC R ADi R AC AC R AC AC AC IH H2 2 , $ T Y $ TO U R % K< HZ R , ( T Y ( TO U $ AC
0x111b4c…111ce0 Dummy {f00=0x0056, f01=0x0190, f02=» @CX<E J * U Y ACN ACP C AC @C ) C @CV H` T B $ T T AC $ AC $ AC $ ACJ $ ACL $ AC C AC $ ID ^ ) R4 ) ) B ( P @C P _( $ (TN Y WV C P
0x111ce0…111e74 (3, 51) Dummy {f00=0x0057, f01=0x0190, f02=» @CL U ACJ ACL @Cl @Cn @Cp @Cz ( PJ P" @C Q AC C AC W AC C C @C Q AC C AC W: AC C C @C Q AC C AC W AC AC C C C AC @C P N AC AC8 @CJ ACB @CL ACD @CN U R @CP U ACn @CN @CP Uj ACN ACP @Cn AC" I"
0x111e74…112008 Dummy {f00=0x0057, f01=0x0190, f02=» Y AC AC^ @C @C^ @C ^ ACb E C AC @CX<H AC HZ AC D H AC: ( AC< ACn @C R @C> @CJQ R @C@ @CLV Eb ACn @C: AC2 @C< AC4 @Cb C: CR C< CT @C AC I AC @C6 @C8 @C^ U AC6 AC8 @CJ @CL @C^ Uj ACJ ACL N T @C^R @C: @C<
0x112008…11219c Dummy {f00=0x0057, f01=0x0190, f02=» T @C^R @C^P @C AC _ 2 AC C& CR C( CT E @Cb Q` @C& @C( @C^ U AC& AC( @C* @C, @C^ Uj AC* AC, @C: @C< @C^ U AC: AC< @C> @C@ @C^ Uj AC> AC@ Q @C^R @Cn @C: I @C< )W @C" I" ) % H @C" AC" I" C* C, C& C(_ @
0x11219c…112330 Dummy {f00=0x0057, f01=0x0190, f02=» AC AC @CJT @CLP> D ACn H AC: ( AC< @C R @C> @CJQ R @C@ @CLV Eb ACn @C" I" C @C CX HZ D E @C @C E. E @C T % ACR CT H C CT H AC6 AC8 C*T C,P C& CR C( CT E @Cb P AC" @CJT @CLP* @C" I" C*
0x112330…1124c4 Dummy {f00=0x0057, f01=0x0190, f02=» S Q"R S P W S _ R Q _ ;A [ : [ Q S W S Q R S P W S _ R _ ;A [ : @C^ AC> AC@ P P U R Af U R # B C ( B T " T B VV
0x1124c4…112658 Dummy {f00=0x0057, f01=0x0190, f02=» R ! C R C R ! 9 C R C W U U ( : _ _ _ _$ % 6 ( B V V V (> B @U Q RJ B @U U@ V T: W d 2 FOLLOWING RECORDS ARE BEHIND LAST RECORD NUMBER > V^ W e
0x112658…1127ec Dummy {f00=0x0057, f01=0x0190, f02=» Y S X X W X X W W Y Y _( :dZh8iP Q S W S Q R S P W S _ R _ ;A [ :AECSHNdZh8iPF B R P L O X [X[ [ Z Z [ R ! AXv R ! AXx AXr AXt : Xb( B o 9C P4 1P AX AX WL V @
0x1127ec…112980 Dummy {f00=0x0057, f01=0x0190, f02=»ATA* @Xj?BV e *BOT/EOT* @Xj P e RC: @Xj f d @Xj Z [ : X q R Am Af Am R AXc! Q W AXf 2 AXd d AXl X X o m 4Z AXz MXl MXl Y 4R PXrP Z W QXr_ Q ^, IXz _4 IXz R A
0x112980…112b14 (3, 52) Dummy {f00=0x0057, f01=0x0190, f02=»ff . e @X ff P e , SIZE: @Xh ff d @Xx X AXnZ d : W @Xz !FFP(W AXn AXp X P T AXpZ W AXnZ : X X ? V Y : X Xz @XnR AXr @XpR AXtW $ X $" P. MX P ^ W Q R AXxW Q ; AXv _4 : X g :X W V @
0x112b14…112ca8 Dummy {f00=0x0057, f01=0x0190, f02=» A ? R A # A 1 A A B A & "( @ * T 2 " D # # P C ( # D <T D :T D PU 2 ^j R D ^j P A A A J 2 P ^n ( @ P ^ R P ^n( "( A J ( @ P ^ "( @ *P ^ 0(
0x112ca8…112e3c Dummy {f00=0x0057, f01=0x0190, f02=» : F T F 2 : P ( B _ @ z z " x : @ J d k >( : P P - : X ? V Y : AXr @XpR AXt 2 A^| A^ R A^ ^ A^~ A^ ^z BF `H `L _ 2
0x112e3c…112fd0 Dummy {f00=0x0057, f01=0x0190, f02=» A^ ^ ( T :T T <T ^~ `F _ @^ _ " T A^ A^ ^ _ P ` ` aH aB_ ` _& ^~ A^ W ^z( T @`F A^~ A^~ @^ P T P " T W" @^ T : W W W W W W ^z( ^ ( ^ :
0x112fd0…113164 Dummy {f00=0x0057, f01=0x0190, f02=»P ` a aH aBW a _ _ A^ S ^ a` @PZ aH aB_ A^ A^ _* W @^ A^ @^ A^ ^ ( B # P `T `,_$ : AXr P P 2 Aa Aa a Aa a BF c @a c
0x113164…1132f8 Dummy {f00=0x0057, f01=0x0190, f02=» c Aa T Aa Aa a ( T : Aa T < Aa Aa d> c @a Aa c T Aa Aa a c P T d> c c b _ c _( Aa S W Aa Aa _ Aa _ a ( @a P" Aa B @a Q R B @a U C @a 0# P @ T T T:W4 @
0x1132f8…11348c Dummy {f00=0x0057, f01=0x0190, f02=» X @a R_F @a @a Y Aa _: @a T Aa b T P d> c c W c b c _ 2 dP P 5 : Adt I f: * d T . e P Y" d _2 P e %%% d :h h < $" = @g Ag Ag d Ag : Ag W @gN n Ag
0x11348c…113620 Dummy {f00=0x0057, f01=0x0190, f02=» @gR #U. g AgP @gP lf AgR gT p @g d d Ag : ; [ [ [ Z Z Z : : < , = = fP $ - Y : fP - : fP " :d Hf - " Hf - :0123456789ABCDEF fP Af%9h e _@ fP - Y : @gN nY : @gRU e` : @gN AgNR d _
0x113620…1137b4 (3, 53) Dummy {f00=0x0057, f01=0x0190, f02=» : f a @a Y Aa _: @a T Aa b T P d> c c W c b c _ 2 dP P 5 : Adt 1 I * d T . P Y" _2 P %%% : < $" = @ A A PAGE: f W @ n A
0x1137b4…113948 Dummy {f00=0x0057, f01=0x0190, f02=»U Y d _ d : h & P$ U ?V W _ e W h e W $UN # e e e :h h ! R ?U W W ! @R @R @R Li # : : .<(+?& !$*); ??? &%->? :#@'=" ABCDEFGHI JKLMNOPQR STUVWXYZ 0123456789
0x113948…113adc Dummy {f00=0x0057, f01=0x0190, f02=»e d Yv d :a @a Y Aa _:h h T i b T P d> c 0OK? 0OUTPUT VOLUME NAME: i C C R Ai " P Ai ( : : B j $ ) Y j j$ j j$ Ai i ( `i YP $ : R _ P 0 -
0x113adc…113c70 Dummy {f00=0x0057, f01=0x0190, f02=» *W R - _ 1 T R Pk - _ : UjR _ P 0 / U : ; [ [ [ [ B@ kb kb ' kb kb d kb kb kx Z Z Z Z : : ; l k : V *
0x113c70…113e04 Dummy {f00=0x0057, f01=0x0190, f02=» Xm _ Am P Q T Z& - _. Am @m R - 0 - _F Z Z Z Z : :** d ' i C C R Ai " P Ai ( : : B j $ ) Y j j$ j j$ Ai i ( `i YP $ : R _ P 0 -
0x113e04…113f98 Dummy {f00=0x0057, f01=0x0190, f02=» *W R - _ 1 T R Pk - _ : UjR _ P 0 / U : ; m n n + *COMTAB OVFL* + *TOO LONG* + *STRTAB OVFL* + *NUM OVFL* ,* . '/ ' m^ q& : D am Am W Am Am m ( : m Am m ( B P ! q* `m Am %
0x113f98…11412c Dummy {f00=0x0057, f01=0x0190, f02=» W W 9 Z [ : Am Am : m m^ m n Am n n n @m An Am n n o P R o P W o X @m n o` o W& $P %P _ n Am o Am o P Q S o X W o P8W n _. % < S S o X S n _@ o T Am W o o P m
0x11412c…1142c0 Dummy {f00=0x0057, f01=0x0190, f02=» : W W W W W W W W Lq :kP Hqt Hq~ n Lq :g" P q Lq :c" Hqhp~o p@o<o p n n n n n n q q @ 0 @ P1@@@P@ ` Am : n n Am : 2 D TOTN 0 $' $& PL P P P, PBW$ PH PP PX P` Ph Pp S
0x1142c0…114454 (3, 54) Dummy {f00=0x0057, f01=0x0190, f02=» r W : R Q R @q T R Q R : q : Am n n n @m An Am n n o P R o P W o X @m n o` o W $P %P _ n Am o Am o P Q S o X W o P W n _. % < S S o X S n _@ o T Am W o o P m
0x114454…1145e8 Dummy {f00=0x0057, f01=0x018e, f02=» n PLOC:10 EQU * P =20 P* , P EJECT PRVTOC 6 P* N P* ****** X P* * VL * h P* ****** x P* P* READ VL TO BUF1 P* P LDKL A7,BUFLEN =1 P ST A7,ECBR+4 =1 P LDKL A8,ECBR P CM EC
0x1145e8…11477c Dummy {f00=0x0057, f01=0x0190, f02=» x $ P LD A6,ECBRC,A8 GET RETURN CODE P =20 0 P ANK A6,/20 (WAS 80) =3 @ " P RB(NZ) VL01 NEW VOLUME LOADED ` P LD A6,ECBRC,A8 P ANK A6,/1 $ P ABL(NZ) RTNNO DISC NOT OPERABLE P LD A6,ECBRC,A8 P ANKL A6,/820E P
0x11477c…114910 Dummy {f00=0x0057, f01=0x0190, f02=» " P LDR* A3,A12 GET BUF1 ADDRESS P* =1 DEL * P LDKL A6,VLNAME : P LDK A2,3 R P* d . PVL03 LDR* A1,A3 MOVE VOLUME NAME TO VLNAME n P STR A1,A6 P ADK A3,2 P ADK A6,2 P SUK A2,1 P RB(NZ) VL03 P* $ P L
0x114910…114aa4 Dummy {f00=0x0057, f01=0x0190, f02=»SC FORMAT x P* P LDK A7,7 PVL05 LDR* A1,A5 . P ST A1,TOSREL,A2 F P ADK A2,2 ^ P ADK A5,2 p P SUK A7,1 COUNTER P RB(P) VL05 NEXT P* P EJECT PRVTOC P* P* WRITE VOLUME NAME P* P L
0x114aa4…114c38 Dummy {f00=0x0057, f01=0x0190, f02=» P* P LDKL A9,TOSSRL P LDK A7,QTOSRL & P CF A14,PRINT < P* R " P LDR* A2,A3 VTOC LENGTH TO A2 P ST A2,VTCLEN P ADK A3,4 P LDR* A1,A3 VTOC BASE TO A1 P ST A1,VTCBAS P ADK A3,2 ( P LDR* A2,A3 VTOC R
0x114c38…114dcc Dummy {f00=0x0057, f01=0x0190, f02=» P* P EJECT PRVTOC P* & P* *********** 0 P* *VTOC FSAT* F P* *********** P* r 8 P* READ SECTORS WITH VTOC BASE CONTAINING FREE SPACE | P* ADMINISTRATING TABLE FSAT P* P* =1 START P LD A7,NRFST
0x114dcc…114f60 Dummy {f00=0x0057, f01=0x0190, f02=»T A6,NRFSAT P* =1 END P LDKL A8,ECBR $ P =20 : P LDK A7,/91 J & P ST A1,ECBCW2,A8 SECTOR NO TO ECBR ^ P* PLINK1 LKM P DATA 1 P* TEST OF RETURN CODE $ P LD A6,ECBRC,A8 GET RETURN CODE P =20
0x114f60…1150f4 (3, 55) Opaque[0x194]
0x1150f4…115288 # DirEnt {nam=»UTIL04«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0b00, f03=0x0000}
0x1150f4…115288 IdxSect {
0x1150f4…115288 f00 = 0x0058 // 0x1150f4 @0x0
0x1150f4…115288 f01 = 0x0016 // 0x1150f6 @0x2
0x1150f4…115288 gno = [ // 0x1150f8 @0x4
0x1150f4…115288 [0x00]: C0x0058.0x0.0
0x1150f4…115288 [0x01]: C0x0058.0x1.0
0x1150f4…115288 [0x02]: C0x0058.0x2.0
0x1150f4…115288 [0x03]: C0x0058.0x3.0
0x1150f4…115288 [0x04]: C0x0059.0x0.0
0x1150f4…115288 [0x05]: C0x0059.0x1.0
0x1150f4…115288 [0x06]: C0x0059.0x2.0
0x1150f4…115288 [0x07]: C0x0059.0x3.0
0x1150f4…115288 [0x08]: C0x005a.0x0.0
0x1150f4…115288 [0x09]: C0x005a.0x1.0
0x1150f4…115288 [0x0a]: C0x005a.0x2.0
0x1150f4…115288 ]
0x1150f4…115288 }
0x115288…11541c Dummy {f00=0x0058, f01=0x0190, f02=»4v Or . 8 fY%w x b # g $ ^ : 9 i $ 7 f w |4r tV u 3 qC 5 * zuqV $ ' > P ZD o c r P| sV i % 9Zj Q > - D $ 4` 1P -8 T r tB l`Tg t z ^ lFZF H 2 Z j z
0x11541c…1155b0 Dummy {f00=0x0058, f01=0x0190, f02=» 4c @]u N d 2Z $"z y L / y N Dl` n $ @ 4Z wL a [ ? d d% L & "~ T &b CCn 1 d J < R:R: ` T l` % l`zF :| Fb fvzn : v ` ^* D3bH P D' >~ `" f >~ $' d p 4d @ B
0x1155b0…115744 Dummy {f00=0x0058, f01=0x0190, f02=» ^F < . 8 fY%w x b # g $ ^ : 9 i $ 7 f w |4r tV u 3 qC 5 * zuqV $ ' > P ZD o c r P| sV i % 9Zj Q > - D $ 4` 1P -8 T r tB l`Tg t z ^ lFZF H 2 Z j z
0x115744…1158d8 Dummy {f00=0x0058, f01=0x0190, f02=» 4c @]u N d 2Z $"z y L / y N Dl` n $ @ 4Z wL a [ ? d d% L & "~ T &b CCn 1 d J < R:R: ` T l` % l`zF :| Fb fvzn : v ` ^* D3bH P D' >~ `" f >~ $' d p 4d @ B
0x1158d8…115a6c Dummy {f00=0x0058, f01=0x0190, f02=» ^F < . 8 fY%w x b # g $ ^ : 9 i $ 7 f w |4r tV u 3 qC 5 * zuqV $ ' > P ZD o c r P| sV i % 9Zj Q > - D $ 4` 1P -8 T r tB l`Tg t z ^ lFZF H 2 Z j z
0x115a6c…115c00 Dummy {f00=0x0058, f01=0x0190, f02=» 4c @]u N d 2Z $"z y L / y N Dl` n $ @ 4Z wL a [ ? d d% L & "~ T &b CCn 1 d J < R:R: ` T l` % l`zF :| Fb fvzn : v ` ^* D3bH P D' >~ `" f >~ $' d p 4d @ B
0x115c00…115d94 (3, 56) Dummy {f00=0x0058, f01=0x0190, f02=» ^F < . 8 fY%w x b # g $ ^ : 9 i $ 7 f w |4r tV u 3 qC 5 * zuqV $ ' > P ZD o c r P| sV i % 9Zj Q > - D $ 4` 1P -8 T r tB l`Tg t z ^ lFZF H 2 Z j z
0x115d94…115f28 Dummy {f00=0x0058, f01=0x0190, f02=» 4c @]u N d 2Z $"z y L / y N Dl` n $ @ 4Z wL a [ ? d d% L & "~ T &b CCn 1 d J < R:R: ` T l` % l`zF :| Fb fvzn : v ` ^* D3bH P D' >~ `" f >~ $' d p 4d @ B
0x115f28…1160bc Dummy {f00=0x0058, f01=0x0190, f02=» ^F < . 8 fY%w x b # g $ ^ : 9 i $ 7 f w |4r tV u 3 qC 5 * zuqV $ ' > P ZD o c r P| sV i % 9Zj Q > - D $ 4` 1P -8 T r tB l`Tg t z ^ lFZF H 2 Z j z
0x1160bc…116250 Dummy {f00=0x0058, f01=0x0190, f02=» 4c @]u N d 2Z $"z y L / y N Dl` n $ @ 4Z wL a [ ? d d% L & "~ T &b CCn 1 d J < R:R: ` T l` % l`zF :| Fb fvzn : v ` ^* D3bH P D' >~ `" f >~ $' d p 4d @ B
0x116250…1163e4 Dummy {f00=0x0058, f01=0x0190, f02=» ^F < . 8 fY%w x b # g $ ^ : 9 i $ 7 f w |4r tV u 3 qC 5 * zuqV $ ' > P ZD o c r P| sV i % 9Zj Q > - D $ 4` 1P -8 T r tB l`Tg t z ^ lFZF H 2 Z j z
0x1163e4…116578 Dummy {f00=0x0058, f01=0x0190, f02=» 4c @]u N d 2Z $"z y L / y N Dl` n $ @ 4Z wL a [ ? d d% L & "~ T &b CCn 1 d J < R:R: ` T l` % l`zF :| Fb fvzn : v ` ^* D3bH P D' >~ `" f >~ $' d p 4d @ B
0x116578…11670c Dummy {f00=0x0058, f01=0x0190, f02=» ^F < . 8 fY%w x b # g $ ^ : 9 i $ 7 f w |4r tV u 3 qC 5 * zuqV $ ' > P ZD o c r P| sV i % 9Zj Q > - D $ 4` 1P -8 T r tB l`Tg t z ^ lFZF H 2 Z j z
0x11670c…1168a0 Dummy {f00=0x0058, f01=0x0190, f02=» 4c @]u N d 2Z $"z y L / y N Dl` n $ @ 4Z wL a [ ? d d% L & "~ T &b CCn 1 d J < R:R: ` T l` % l`zF :| Fb fvzn : v ` ^* D3bH P D' >~ `" f >~ $' d p 4d @ B
0x1168a0…116a34 (3, 57) Dummy {f00=0x0058, f01=0x0190, f02=» ^F < . 8 fY%w x b # g $ ^ : 9 i $ 7 f w |4r tV u 3 qC 5 * zuqV $ ' > P ZD o c r P| sV i % 9Zj Q > - D $ 4` 1P -8 T r tB l`Tg t z ^ lFZF H 2 Z j z
0x116a34…116bc8 Dummy {f00=0x0058, f01=0x0190, f02=» 4c @]u N d 2Z $"z y L / y N Dl` n $ @ 4Z wL a [ ? d d% L & "~ T &b CCn 1 d J < R:R: ` T l` % l`zF :| Fb fvzn : v ` ^* D3bH P D' >~ `" f >~ $' d p 4d @ B
0x116bc8…116d5c Dummy {f00=0x0058, f01=0x0190, f02=» ^F < . 8 fY%w x b # g $ ^ : 9 i $ 7 f w |4r tV u 3 qC 5 * zuqV $ ' > P ZD o c r P| sV i % 9Zj Q > - D $ 4` 1P -8 T r tB l`Tg t z ^ lFZF H 2 Z j z
0x116d5c…116ef0 Dummy {f00=0x0058, f01=0x0190, f02=» 4c @]u N d 2Z $"z y L / y N Dl` n $ @ 4Z wL a [ ? d d% L & "~ T &b CCn 1 d J < R:R: ` T l` % l`zF :| Fb fvzn : v ` ^* D3bH P D' >~ `" f >~ $' d p 4d @ B
0x116ef0…117084 Dummy {f00=0x0058, f01=0x0190, f02=» ^F < . 8 fY%w x b # g $ ^ : 9 i $ 7 f w |4r tV u 3 qC 5 * zuqV $ ' > P ZD o c r P| sV i % 9Zj Q > - D $ 4` 1P -8 T r tB l`Tg t z ^ lFZF H 2 Z j z
0x117084…117218 Dummy {f00=0x0058, f01=0x0190, f02=» 4c @]u N d 2Z $"z y L / y N Dl` n $ @ 4Z wL a [ ? d d% L & "~ T &b CCn 1 d J < R:R: ` T l` % l`zF :| Fb fvzn : v ` ^* D3bH P D' >~ `" f >~ $' d p 4d @ B
0x117218…1173ac Dummy {f00=0x0058, f01=0x0190, f02=» ^F < . 8 fY%w x b # g $ ^ : 9 i $ 7 f w |4r tV u 3 qC 5 * zuqV $ ' > P ZD o c r P| sV i % 9Zj Q > - D $ 4` 1P -8 T r tB l`Tg t z ^ lFZF H 2 Z j z
0x1173ac…117540 Dummy {f00=0x0058, f01=0x0190, f02=» 4c @]u N d 2Z $"z y L / y N Dl` n $ @ 4Z wL a [ ? d d% L & "~ T &b CCn 1 d J < R:R: ` T l` % l`zF :| Fb fvzn : v ` ^* D3bH P D' >~ `" f >~ $' d p 4d @ B
0x117540…1176d4 (3, 58) Dummy {f00=0x0058, f01=0x0190, f02=» ^F < . 8 fY%w x b # g $ ^ : 9 i $ 7 f w |4r tV u 3 qC 5 * zuqV $ ' > P ZD o c r P| sV i % 9Zj Q > - D $ 4` 1P -8 T r tB l`Tg t z ^ lFZF H 2 Z j z
0x1176d4…117868 Dummy {f00=0x0058, f01=0x0190, f02=» 4c @]u N d 2Z $"z y L / y N Dl` n $ @ 4Z wL a [ ? d d% L & "~ T &b CCn 1 d J < R:R: ` T l` % l`zF :| Fb fvzn : v ` ^* D3bH P D' >~ `" f >~ $' d p 4d @ B
0x117868…1179fc Dummy {f00=0x0058, f01=0x0190, f02=» ^F < . 8 fY%w x b # g $ ^ : 9 i $ 7 f w |4r tV u 3 qC 5 * zuqV $ ' > P ZD o c r P| sV i % 9Zj Q > - D $ 4` 1P -8 T r tB l`Tg t z ^ lFZF H 2 Z j z
0x1179fc…117b90 Dummy {f00=0x0058, f01=0x0190, f02=» 4c @]u N d 2Z $"z y L / y N Dl` n $ @ 4Z wL a [ ? d d% L & "~ T &b CCn 1 d J < R:R: ` T l` % l`zF :| Fb fvzn : v ` ^* D3bH P D' >~ `" f >~ $' d p 4d @ B
0x117b90…117d24 Dummy {f00=0x0058, f01=0x0190, f02=» ^F < . 8 fY%w x b # g $ ^ : 9 i $ 7 f w |4r tV u 3 qC 5 * zuqV $ ' > P ZD o c r P| sV i % 9Zj Q > - D $ 4` 1P -8 T r tB l`Tg t z ^ lFZF H 2 Z j z
0x117d24…117eb8 Dummy {f00=0x0058, f01=0x0190, f02=» 4c @]u N d 2Z $"z y L / y N Dl` n $ @ 4Z wL a [ ? d d% L & "~ T &b CCn 1 d J < R:R: ` T l` % l`zF :| Fb fvzn : v ` ^* D3bH P D' >~ `" f >~ $' d p 4d @ B
0x117eb8…11804c Dummy {f00=0x0058, f01=0x0190, f02=» ^F < . 8 fY%w x b # g $ ^ : 9 i $ 7 f w |4r tV u 3 qC 5 * zuqV $ ' > P ZD o c r P| sV i % 9Zj Q > - D $ 4` 1P -8 T r tB l`Tg t z ^ lFZF H 2 Z j z
0x11804c…1181e0 Dummy {f00=0x0058, f01=0x0190, f02=» 4c @]u N d 2Z $"z y L / y N Dl` n $ @ 4Z wL a [ ? d d% L & "~ T &b CCn 1 d J < R:R: ` T l` % l`zF :| Fb fvzn : v ` ^* D3bH P D' >~ `" f >~ $' d p 4d @ B
0x1181e0…118374 (3, 59) Dummy {f00=0x0059, f01=0x0190, f02=» ^F < . 8 fY%w x b # g $ ^ : 9 i $ 7 f w |4r tV u 3 qC 5 * zuqV $ ' > P ZD o c r P| sV i % 9Zj Q > - D $ 4` 1P -8 T r tB l`Tg t z ^ lFZF H 2 Z j z
0x118374…118508 Dummy {f00=0x0059, f01=0x0190, f02=» 4c @]u N d 2Z $"z y L / y N Dl` n $ @ 4Z wL a [ ? d d% L & "~ T &b CCn 1 d J < R:R: ` T l` % l`zF :| Fb fvzn : v ` ^* D3bH P D' >~ `" f >~ $' d p 4d @ B
0x118508…11869c Dummy {f00=0x0059, f01=0x0190, f02=» ^F < . 8 fY%w x b # g $ ^ : 9 i $ 7 f w |4r tV u 3 qC 5 * zuqV $ ' > P ZD o c r P| sV i % 9Zj Q > - D $ ,* # + RC: 0 r tB l`Tg t z ^ lFZF H 2 Z j z
0x11869c…118830 Dummy {f00=0x0059, f01=0x0190, f02=» > V W . C / C ( B P 1 _ B Z T / 0 . B U [ B : $ !; P I. =Z I. . . C C ( : [ ? 0 Z : [ [ [ [ QxP~ , 0 S* P. 9A<AV S _0
0x118830…1189c4 Dummy {f00=0x0059, f01=0x0190, f02=» Y6 _ [ [ Q. , 0R" 9U AR FQ 0 P =D _, [ Z Z : = ! U 9 - Y : [ [ [ [ [ [ [ RZ 0=A A T R !LLT TE ! A0@ TA R TE 0 XF V 1 _D 1 0lW6
0x1189c4…118b58 Dummy {f00=0x0059, f01=0x0190, f02=» >Px Pr PlW _ A0< TA >FV :A HB @0<Y HB @0<Z >AV DdW _ _ @0< @0@ >BV -Wp>AV -Wh>AVd B /8 RV _ @0@ T T S S S S >T T S S S S @0> - - TE A0@ . B 2 R& TA > R > @0: T T W
0x118b58…118cec Dummy {f00=0x0059, f01=0x0190, f02=»5 TH 5 #( W0 @5 P 5 #( : d M/ ^ R _ @4 / 2jW 5 _ / . 0 @5 P8 P2 R " R Q 5 #( @5 T R A5 _. @0: E 5 P^Q0 T$ 5 W2FUNCTION NOT IN THIS PACKAGE
0x118cec…118e80 Dummy {f00=0x0059, f01=0x0190, f02=»2 MT1 MT2 pqCSH @/8 !NNP !YYP 8 A0< : @/8! P P 8 A0< : @E(" ( " R @0< ] 8 : W @/8 FDX 8 HQ @/8T HQ A/:T W 8 8 A0< : W @/8 FDX 8 HQ @/8T HQ A/:T W 8 8 A0< @/8 CDP
0x118e80…119014 (3, 60) Dummy {f00=0x0059, f01=0x0190, f02=» W6 : R !LLT : @/8! YT A0< @0: &T : X < A6pW* A6n A6p A6j A6lW$ A6l A6pW A6j A6pW A6p A6j A6l A6n ;d @6lP AxW @6jP AzW @6pP At A6lW Ap 2jW [ : H P P _ @6nT A/ A; W @6lP A/ _ A/ _ @0:
0x119014…1191a8 Dummy {f00=0x0059, f01=0x0190, f02=» ] @ @; ; A; ( B 9 ( @ LP ] : ] < ( A; 9 @; @6nT A/ W A/ / : P P ;> 5 9 DG 5 @ ] ^ ( = ( = P P P P _& _,
0x1191a8…11933c Dummy {f00=0x0059, f01=0x0190, f02=» B T / : ! P ;T 5 ' P< ( @; P W ; ( 8 Q 9A DG T ;( 5 FATAL DM OPEN ERROR ; FATAL FM OPEN ERROR ; DISC I/O ERROR; T @6lT "] : @/8 DKTj A/ : @/8 DKP WX A/ : @/8
0x11933c…1194d0 Dummy {f00=0x0059, f01=0x0190, f02=» 6bW& <l 6b E/ P < A/ W < A/ 0< : @/8 @/: "P ^ Wp C ;b : @/8! YT A0< : P WL _ AhW Al 2jW W2 : @/8 R& I6f : W @/8! P !P T A0< : [ : 6 W A6n < W 1 0l_ A6nW< ; @0< # ( B # TlW IB
0x1194d0…119664 Dummy {f00=0x0059, f01=0x0190, f02=» :' P P =>W =H 0 _ /8 = Z rQ0 , 0 = Z %U < : ,! 9D ," : , 0 & = 0_. `0B /; /8^ /7 00 /8R _ a0B /8 = > ]| (Y : : : 7 _ _ S : W @ A0< : &P P
0x119664…1197f8 Dummy {f00=0x0059, f01=0x0190, f02=» * ?zT@ @/ A/ W2 J ?zT @/ A/ W * J ?zT @/ A/ W : $ ) : Y :TOSS UTILITIES REL 10.0 DATE: 80-03-14 12NC=870136641000 ; 0CC: WHAT?? ZCRV CRF DLF PVC PDS UDS CDD CFF CFT CTF PRF SCT LFD ULD CIT CTI WIL PIT BIX RIX CCF
0x1197f8…11998c Dummy {f00=0x0059, f01=0x0190, f02=» 8 # ! # " - D 6 87 67 - 4.5/0123 - <= 8 GHF@ 8J KLMVQRSTO 8 NP B AI A A V! VAW!
0x11998c…119b20 Dummy {f00=0x0059, f01=0x0190, f02=» A AT V/V/T @ ! AV! A AWA
0x119b20…119cb4 (3, 61) Dummy {f00=0x0059, f01=0x0190, f02=» c d 7 6 7 7 7 7 6 7 6 7 8 7 < < < < 7
0x119cb4…119e48 Dummy {f00=0x0059, f01=0x0190, f02=»> > 7 > 7 7 6 ( . 1 2 7 7 4 5 " ( . 5 6 4 * H . . . . . . . . . . . . =T= . . . . . . . T H H8H>HZHhHtH H H H H H
0x119e48…119fdc Dummy {f00=0x0059, f01=0x0190, f02=»K K K H> K L H L L<K LLLLLLI H LhH8LzF F F F G G G G*G6G6GNGNGVG GfGtG G G G G G L L L L O L ObM&M4MPMfM O M L ObO MtO L L L M L L L P L L O P Q NtN`ObM MfM&M O Q*L L M N N P N`NtN N N N N O O"O@O N L L L P L L O L L O N6M L L M N N P O L L M N N P OvO L L
0x119fdc…11a170 Dummy {f00=0x0059, f01=0x0190, f02=»Q Q Q L PRINT DEVICE:;OLD RESP. NEW DISC:;VOLUME NAME:; OLD RESP. NEW VOLUME NAMES:;FILE NAME:; NUMBER OF VTOC ENTRIES:;CREATION DATE:; RETENTION PERIOD:;BLOCKING FACTOR:; EFFECTIVE RECORD LENGTH:; MAXIMUM NUMBER OF RECORDS:; SECTOR NUM
0x11a170…11a304 Dummy {f00=0x0059, f01=0x0190, f02=»LLED TAPE:; SEQ. NUMBER INPUT TAPE:;SEQ. NUMBER OUTPUT TAPE:; BLOCK FACTOR INPUT TAPE:; BLOCK FACTOR OUTPUT TAPE:;TAPE VOLUME ID:;RECORD LIMITS:; PRINT FORMAT:;RECORD NUMBERS IN LISTING:; CHARACTER CODE:;PROGRAM LENGTH:;MONITOR NUMBER:;START SWITCH ON SOP:; MORE T
0x11a304…11a498 Dummy {f00=0x0059, f01=0x0190, f02=»F DATA SET LABEL:;NUMBER OF INDEX FILES:; KEY ADDRESS WITHIN DATA RECORD:;KEY LENGTH IN DATA RECORD:; RECORD LENGTH INPUT TAPE:;LOAD FACTOR:; INDEX FILE NAME:; MASTER INDEX FILE NAME:;INPUT DEVICE:;PTS 6876 DISC :;MAX NO OF RECORDS ON OUTPUT INDEX FILE:;SUB-KEY AD
0x11a498…11a62c Dummy {f00=0x0059, f01=0x0190, f02=» ORDER:;REORGANIZE DISC:; DISC VERSION:;DISC NOT OPERABLE;BADSPOT ON TRACK ZERO.DISC NOT USABLE;MORE THAN 18 BADSPOTS.DISC NOT USABLE;DISC I/O ERROR.;PRINTER NOT OPERABLE; TOO MANY SECTORS IN FILE; DISC OVERFLOW;MORE THAN 4 EXTENTS NEEDED; ILLEGAL BLOCK LENGTH; VT
0x11a62c…11a7c0 Dummy {f00=0x0059, f01=0x0190, f02=»TPUT DISC NOT EMPTY;FAULTY RECORD LENGTH; OUTPUT FILE NOT LARGE ENOUGH; OUTPUT FILE NOT EMPTY;TAPE UNIT NOT LOCKED/LOADED;INCORRECT TNR;OUTPUT I/O ERROR, ;INPUT I/O ERROR, ; BLOCK FACTOR ON OUTPUT TOO LARGE; TAPE MARK MISSING;TAPE MARK MISSING AFTER LABEL RECORD
0x11a7c0…11a954 (3, 62) Dummy {f00=0x0059, f01=0x0190, f02=»TED RECORD; INPUT VOLUME NAME UNKNOWN;OUTPUT VOLUME NAME UNKNOWN; FILE NAME UNKNOWN;FLEX. DISC ALREADY LOCKED;FLEX. DISC NOT LOCKED;FLEX. DISC WRITE PROTECTED; DATA SET NAME ALREADY USED; DATA SET NAME NOT FOUND;NO IBM DISC FORMAT; BLOCK SEQUENCE ERROR; KEY DEF. E
0x11a954…11aae8 Dummy {f00=0x0059, f01=0x0190, f02=»LE; FILE ORG. ERROR;CORE AREA TOO SMALL;RECORD NOT IN FILE-END OF MEDIUM; ILLEGAL POSITION NUMBER;NOT ALLOWED TO MIX DISCSIZES; NOT ENOUGH CORE;OVERFLOW; WRONG FD PARAMETER; ILLEGAL FILE-CODE;ILLEGAL ECB PARAMETER;UNKNOWN FILE; ILLEGAL VOLUME/FILE NAME; DU2 DU1 DU
0x11aae8…11ac7c Dummy {f00=0x0059, f01=0x0190, f02=»TED RECORD; INPUT VOLUME NAME UNKNOWN;OUTP E NOT FO
0x11ac7c…11ae10 Dummy {f00=0x0059, f01=0x0190, f02=» NPPSJ NL S6 IL S4 IP SD LPMSL LDMSN DMMS& NM SV BI S2 B S0 IM SP NP S8 UTILITY SORTF. NUMBER OF PASSES IN MERGE PHASE = PARAMETERS : PRESORT PHASE STARTED MERGE PHASE, PASS STARTED CHECK PHASE STARTED SORT ENDED NUMBER OF RECORDS: *
0x11ae10…11afa4 Dummy {f00=0x0059, f01=0x0190, f02=»R4 j i D !SS i D # AR D ; AR D < AR D AR& T RB j i D !SS i D # AR D AR( RP j i D !SS i D # AR$ R D AR D AR D AS D AS D AS" R # P AR| R # P @R U @R W AR R # Ap R 9a R :a i 9A
0x11afa4…11b138 Dummy {f00=0x0059, f01=0x0190, f02=» R " T AS @S @S P T i @R. AS Y @R.Y Z n R S P n R S Q2 n R S S R4 C C i @R P AR ] W @R$ @R @R Q @R Q @R$ p~ p~ P _ AR0 @S P @R @R$ Q @R p~ P _ AS W ^P R m i ^
0x11b138…11b2cc Dummy {f00=0x0059, f01=0x0190, f02=» ASP ASR AST ASV AS& AS2 AS0 n S<S P _ `| b : _ ARz R _ n R S n R S @S AR @R @Sb _ R4 ARj @Rn ARl n R R e( @S P k S R P S4T S R R0 R2 @R R P @S:T @R %:! jz _6 c R P0 < / d `R $ @R ,
0x11b2cc…11b460 Dummy {f00=0x0059, f01=0x0190, f02=»R R Rn @S2 @R* p~ @R T @R U @R _ @S0 @R* p~ _ Rj Rl n R S n R S AR n R S S R 9! AS n S R oPS S oDS S o R S n S R U oDS R o R S ]V n R R oPR S c R R oDR R AR @R @R P> AR
0x11b460…11b5f4 (3, 63) Dummy {f00=0x005a, f01=0x0190, f02=» @R* # R @R R " @R $P d _T o*S R o*S R n S S T #_& e @R X0 _ @R XN o R R _X e @R Qf S R R o*S R oDS R o R S o*S R oDS R oJS R o R S n S R U R ]X Zt n R R : _ ARz RB @Rl i ARj R _ n R S
0x11b5f4…11b788 Dummy {f00=0x005a, f01=0x0190, f02=»i _v n R R i n R R i : RB Rj n R S n R R @S"T n R S n R R PN i B @R* @R| @R(U @R( ? V ? = k T i oDR S oJR S _X n R S P n R R oJR R oJR R oDR S n R R n R S PX oDR S i @R n S R n R R i
0x11b788…11b91c Dummy {f00=0x005a, f01=0x0190, f02=» jN( ( jN ( B @R E : @R E < ( @R @R E @R E : @S8 T6 l T & ^ @S P T8 ^ S @R_ l : TF ^ @S P lD : @R Tr l T^ W T| AR` ARb R^ ( : @S P @R_ lD T ^ @R @R T nx T _F @S P
0x11b91c…11bab0 Dummy {f00=0x005a, f01=0x0190, f02=» ) : S@W SL SX _v : @R. @R0 AR* AR2 p< i i i AR, : @S @R.P @S _6 @R `R $ @S @R 1 : _ AR @Sb _ ARx n R S n R R b : ARx @R R ;B @R i aR @S& AS( n S<R oVS<SJ AS6 P oDS<S @S6 @R2 p~ P AS4<A AS: : A
0x11bab0…11bc44 Dummy {f00=0x005a, f01=0x0190, f02=»P :hP P W T _ p~ AS* AS. AS, R n S,S<V oPS,S* _ : @R AS& @R, p~ @R2 p< ASb d @RxT 9C;B p~W p~ =D;B ASX @R R i @R @SX @R, p~ p< ASZ @R* p~ ASb @R2 p~ @RxP AS P
0x11bc44…11bdd8 Dummy {f00=0x005a, f01=0x0190, f02=» : AS& bx_ @RxP e : e _ RP RB @R @R$ @S8P 9 R ARp AR" ARn AR W ARn ARp AR" AR @R* AR8 ARF ART : @R P AR @SX AR @R29A AR @S p< @R d AR : @R P @SX AR AR @S 9B AR d @S @R p< @R AR @S0 @R* AR : c @S @S`>A @R aR
0x11bdd8…11bf6c Dummy {f00=0x005a, f01=0x0190, f02=» _ @S` 9A d0 P _ >a : @R @S` 9A ; R d0 P =a _ : [ [ @R $ :a P> P& R R @RxQ j R R Q W * Z Z : _ d @R $ @R $ P P =A _ P =A _& AR : AR @S :A A
0x11bf6c…11c100 Dummy {f00=0x005a, f01=0x0190, f02=» AR n R R : Rl _l AR AS n R R f n R R : Rj _f o*R R o*R R oJR S AS @R @R :! p< @R `R @R % AR f o R R : @S P, Rl _l n R R n R R AS f AS n R R : AR AR n S R oJS R oDS S @S AS n S S Q n R R R AR AR n R R
0x11c100…11c294 (3, 64) Dummy {f00=0x005a, f01=0x0190, f02=»R P n R R Q g _ RjP@ R~ @R AR @S AS n R R g| @R AR @S AS n R R AR~ S R Q S g| P$ T @S P p< hv_8 Y Z @R Y S _ : R R P AR g @R @R P AR hv_. : @R~Q RjT` @R @S C h @RxQ: B @
0x11c294…11c428 Dummy {f00=0x005a, f01=0x0190, f02=»Rj ARr Rj C S C h @R* C @Rr ARj : @RxQ AR h : oD V oJ Ah AS @R* p< @h oDP AS h R S : n R R P* P T @S T @R P RjT W W RjT W i @R* AS oDR S : W @R C @R C ( B #T B @P T
0x11c428…11c5bc Dummy {f00=0x005a, f01=0x0190, f02=» ( ^: : W, W( W" W W W W W W W j R R : _ B C ( B B AjP AjO jN( : P P R4( RB( RP( : Pb P ?A ARt R R j U P _ AR AR P
0x11c5bc…11c750 Dummy {f00=0x005a, f01=0x0190, f02=»R|Z _ , )Q R Y : _ _ R . R @Rv @R * p $ $ k Y @R = @R = S k oDR S n R R ZX : ( - Y : p R $ - _ : p R % _ : p R $T _ :R S : l * ELAPSED TIME : HRS, MIN, SEC
0x11c750…11c8e4 Dummy {f00=0x005a, f01=0x0190, f02=» Al T Al T 4P&R ( l W ( H nx l ( _D : V nx :_ m C ( B 0OK? 0OUTPUT VOLUME NAME: m C C R Am " P Am ( : : B m8 $ ) Y m" m> m m> Am m ( `m YP $ :
0x11c8e4…11ca78 Dummy {f00=0x005a, f01=0x0190, f02=» m d m m m Z Z Z Z : : ; np m : V *W R - _ 1 T R Pnp - _ : p n P R 9A [ [ : , )Q R Y : _ _ p ( % ( % : W p @R $ P W p @
0x11ca78…11cc0c Dummy {f00=0x005a, f01=0x0190, f02=»Wp [ q [ Z q [ p Z q Z p Z p W H ; [ ( D $ : Z - M Z Z [ [ p : AR AR AR AR AR AR rJ P [ [ 9O @R W2 AR AR AR AR AR R ;o
0x11cc0c…11cda0 Dummy {f00=0x005a, f01=0x0190, f02=»R S P W S _ R Q _ ;A [ : [ Q S W S Q R S P W S _ R _ ;A [ : Pj T Pf V Q UF V Ud Q4P P 9A?A:AV R Z _ P*R R P ;A
0x11cda0…11cf34 (3, 65) Dummy {f00=0x005a, f01=0x0190, f02=» P R W ;A [ [ : _4 Z Z W H ; [ ( D $ : Z - M Z Z [ [ p : AR AR AR AR AR AR P [ [ 9O @R W2 AR AR AR AR AR R ;o
0x11cf34…11d0c8 Dummy {f00=0x005a, f01=0x0190, f02=»2 RESTORE n P* =4 END o P LDK A7,2 o " ( P ST A7,SECNO OFFSET IN SECREC TABLE o 4 ( P CF A14,VTOSEC A1 POINT TO RECORD NO o ` B P* FILE ENTRY:TAKE FILE EXTENT LENGTH, BASE AND LAST RECORD NO o PCOPY12 ADK A1,14 o P* =4 START o P LD A10,-2,A
0x11d0c8…11d25c Dummy {f00=0x005a, f01=0x0190, f02=»A11,FILBA1 FILE EXTENT BASE o P ST A11,SECNR1 p $ P LDR* A11,A1 p : P ST A11,FILBA2 p N " P ST A11,SECNR2 SECNR := FILBA p d P* =4 END p P ADK A1,2 p & P LDR* A3,A1 LAST RECORD NO PART 1 p P ST A3,LSTRN1 p P ADK A1,2 p & P LDR* A3,A
0x11d25c…11d3f0 Dummy {f00=0x005a, f01=0x018e, f02=» p P ST A3,RECLEN q P LDK A3,0 q P LC A3,4,A1 BLOCKING FACTOR q 0 P LDK A5,0 q T P ST A5,BLKSLE q f P CM LIBFIL q | P LDK A7,0 q & P LC A7,5,A1 GET FILE ORGANIZATION q P CCK A7,'LL' q P RF(NE) COP:12 NO L-FILE q P IM LIBFIL
0x11d3f0…11d584 Dummy {f00=0x005a, f01=0x0190, f02=» q x P ADK A7,1 r P SUKL A5,SECLEN r P RB(P) COP:13 r 2 PCOP:15 ST A3,BLKLEN r H P ST A7,BLKSLE r d P LDKL A3,MAXBLK =5 r z P SU A3,BLKLEN =5 r P LDK A5,0 r PCOP:16 AD A5,BLKSLE r P SU A3,BLKLEN =5 r P RB(NN) COP:16 r
0x11d584…11d718 Dummy {f00=0x005a, f01=0x0190, f02=»D A4,FSATL2 =4 r P SLL A4,8 =4 s " P ST A4,ECB2+4 MULTIPLE I/O =4 s . P CF A14,READ2 s T P LDKL A4,SECLEN =4 s j & P ST A4,ECB2+4 RESET REQ. LENGTH =4 s & P CF A14,FSAT2 FREE EXTENT IN VTOC2 s P* =4 s P ADK A2,4 s P LD A4,-2,A2
0x11d718…11d8ac Dummy {f00=0x005a, f01=0x0190, f02=»2 s P SUK A7,2 t P RF(N) COPY18 t P* =4 START t 2 P LD A3,FRELE1 t D P CW A3,TFILE1 t Z P RF(G) COPY18 t p P RF(L) COP:17 t P LD A3,FRELE2 t P CW A3,TFILE2 t P RF(NL) COPY18 t PCOP:17 CF A14,NXTFRE t P ST A2,ADR2 =
0x11d8ac…11da40 Dummy {f00=0x005a, f01=0x018e, f02=» t P LD A5,NRSEBU u P* =4 END u P* WRITE BUF1 ON FREBAS DISC2 u . P* =4 START u R PCOPY20 LD A9,FREBA1 u d P ST A9,SECNR1 u P LD A9,FREBA2 u P ST A9,SECNR2 u P LD A7,BLKLEN u " P ST A7,ECB4+4 SET REQ. LENGTH u P* =4 END u
0x11da40…11dbd4 (3, 66) Opaque[0x194]
0x11dbd4…11dd68 # DirEnt {nam=»UTIL06«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0b58, f03=0x0000}
0x11dbd4…11dd68 IdxSect {
0x11dbd4…11dd68 f00 = 0x005a // 0x11dbd4 @0x0
0x11dbd4…11dd68 f01 = 0x0014 // 0x11dbd6 @0x2
0x11dbd4…11dd68 gno = [ // 0x11dbd8 @0x4
0x11dbd4…11dd68 [0x00]: C0x005a.0x3.0
0x11dbd4…11dd68 [0x01]: C0x005b.0x0.0
0x11dbd4…11dd68 [0x02]: C0x005b.0x1.0
0x11dbd4…11dd68 [0x03]: C0x005b.0x2.0
0x11dbd4…11dd68 [0x04]: C0x005b.0x3.0
0x11dbd4…11dd68 [0x05]: C0x005c.0x0.0
0x11dbd4…11dd68 [0x06]: C0x005c.0x1.0
0x11dbd4…11dd68 [0x07]: C0x005c.0x2.0
0x11dbd4…11dd68 [0x08]: C0x005c.0x3.0
0x11dbd4…11dd68 [0x09]: C0x005d.0x0.0
0x11dbd4…11dd68 ]
0x11dbd4…11dd68 }
0x11dd68…11defc Dummy {f00=0x005a, f01=0x0190, f02=» LnF 9 i $ 7 f w |4r tV u 3 qC 5
0x11defc…11e090 Dummy {f00=0x005a, f01=0x0190, f02=» TNR S F M LPP J LDP L DMP 2 NPP T NL @ IL > IP N LPM V LDM X DMM 0 NM ` BI < B : IM Z NP B UTILITY SORTF. NUMBER OF PASSES IN MERGE PHASE = PARAMETERS : PRESORT PHASE STARTED MERGE PHASE, PASS S
0x11e090…11e224 Dummy {f00=0x005a, f01=0x0190, f02=» : $ " R A i R A M A ? R A [ R A @ A N A > D !SS D # A & D ; A D < A D A 0 L D !SS D # A ( D A 2 Z D !SS D # A . R D A D A D A ( D A * D A
0x11e224…11e3b8 Dummy {f00=0x005a, f01=0x0190, f02=» R T @ 0 V A 89 V A 8 @ 8 R T A "9 V A " @ "P R " T A $ @ " @ $P T @ 8 A " Y @ 8Y Z P Q2 > C C & @ P A W @ . @ & @ ( Q @ ( Q @ . P _
0x11e3b8…11e54c Dummy {f00=0x005a, f01=0x0190, f02=» @ $ : E $ ( @ $P @ T @ " A B A V A X A Z A A ^ A ` A 0 A < A : F P : A & @ f A @ * @ l & > A t @ x A v 2 @ $P f f P >T f R0 < @
0x11e54c…11e6e0 Dummy {f00=0x005a, f01=0x0190, f02=» A A @ T A A @ < A : * , x z @ 4 K O A @ 9 R * x @ < @ 4 @ T @ U @ " @ : @ 4 & t v A f 9! A n b 2 U b
0x11e6e0…11e874 (3, 67) Dummy {f00=0x005b, f01=0x0190, f02=» @ T @ A A P 4 T " @ 4 # @ " @ $P _T H H T #_& @ X0 @ XN . _X @ Qf f H b 2 H b h 2 U
0x11e874…11ea08 Dummy {f00=0x005b, f01=0x0190, f02=» _. @ Q6 Q, ` t C & b _v : L t @ ,T PN & B @ 4 @ @ 2U @ 2 ? V ? = T & b h _X P h h
0x11ea08…11eb9c Dummy {f00=0x005b, f01=0x0190, f02=»_b h @ $ D $ Tr D Tl B C ( B A Y A Z X( ( X ( B @ E : @ E < ( @ $ @ E @ E : @ B @ & @ (P B @ i : P @ *P N : @ | h W A
0x11eb9c…11ed30 Dummy {f00=0x005b, f01=0x0190, f02=» C r @ R @ C t C v C x B p @ C z C | : nW ~ $ ) : JW V b : @ 8 @ : A 4 A < Z A 6 : @ " @ 8P @ &_6 @ ` $ @ @ 1 : A @ l " A : A @ R ;B @
0x11ed30…11eec4 Dummy {f00=0x005b, f01=0x0190, f02=» A < A : A B @ 4 A Z @ 6 Z A < @ 6 Z A : @ BX. : 4 ! P :hP P W T _ A 4 A 8 A 6 R 6 FV n 6 4 _ : @ A 0 @ 6 @ < Z A l d @ T 9C;B W =D;B A b @ R @ @
0x11eec4…11f058 Dummy {f00=0x005b, f01=0x0190, f02=» f @ T @ l;BW ;C:A A b @ @ d @ bR @ b A . @ 6R @ 0V A 0 : A 0 _ @ P : _ Z L @ ( @ . @ BP 9 R A z A , A x A *W A x A z A , A * @ 4 A B A P A ^ : @ $ P A @ b A @ <9A A @ f Z @ A : @ $ P @ b A A @
0x11f058…11f1ec Dummy {f00=0x005b, f01=0x0190, f02=» @ P @ 9_ : @ >A ` P 1 _ @ h >A P 1 _ @ j 9A : P _ >a : @ @ j 9A ; R : P =a _ : [ [ @ $ :a P> P& @ Q Q W * Z Z : _
0x11f1ec…11f380 Dummy {f00=0x005b, f01=0x0190, f02=» : @ :a Z @ : t p A A h @ A : v v A A : t p H H h A @ @ :! Z @ ` @ % A 2 : @ P, v v A A : A
0x11f380…11f514 (3, 68) Dummy {f00=0x005b, f01=0x0190, f02=» t t A @ A R W" T @ P Q _ tP@ @ A @ A @ A @ A A Q P$ T @ P Z _8 Y Z @ Y _ : P A
0x11f514…11f6a8 Dummy {f00=0x005b, f01=0x0190, f02=» @ 4 @ W @ P WX @ Q @ @ A $W @ @ C W. @ t A | t C C @ 4 C @ | A t : @ Q A : b V h A A @ 4 Z @ bP A : P* P T @ T @ P tT W W tT W
0x11f6a8…11f83c Dummy {f00=0x005b, f01=0x0190, f02=» PnWd A 9 V A : P: Z A h @ @ C C ( ^: : W, W( W" W W W W W W W f " : _ B C ( B B A Z A Y X( : P P >( L( Z( : Pb
0x11f83c…11f9d0 Dummy {f00=0x005b, f01=0x0190, f02=» @ @ $ * @ $P $ $ @ $Q $ J T Y$ Z Z : @ Z _ , )Q R Y : _ _ . @ @ $ * $ $ Y @ = @ = " b ZX : ( - Y : R $ - _ : R % _ :
0x11f9d0…11fb64 Dummy {f00=0x005b, f01=0x0190, f02=» 4_ A ( ( : : @ A T A T A T 4P&R ( W ( H ( _D : V : [ S Q"R S P W S _ R Q _ ;A [ : [ Q S W S
0x11fb64…11fcf8 Dummy {f00=0x005b, f01=0x0190, f02=» @ P R W ;A [ [ : _4 Pj T Pf V Q UF V Ud Q4P P 9A?A:AV R Z _ P*R R P ;A [ [ : V X"Z(_( L _P TR _ P 0 /
0x11fcf8…11fe8c Dummy {f00=0x005b, f01=0x0190, f02=» Z Z Z Z : : ; : V *W R - _ 1 T R P - _ : P R 9A [ [ : , )Q R Y : _ _ ( % ( % : W @ $ P W @ ( : W
0x11fe8c…120020 Dummy {f00=0x005b, f01=0x0190, f02=» Z ( [ Z ( Z Z W H ; [ ( D $ : Z - M Z Z [ [ : A A A A A A P [ [ 9O @ W2 A A A A A ;o ( @ @ @ @
0x120020…1201b4 (3, 69) Dummy {f00=0x005b, f01=0x0190, f02=»ME: ( C C R A ) " P A ( : : B T $ ) Y > Z 8 Z A & ( ` YP $ : &h % %8 %L N'XP A% % $ % %8_" %L % %8 %t A%f A%` % ( @%fZ( @%dP % %8_: H!L! ! "N$b !<
0x1201b4…120348 Dummy {f00=0x005b, f01=0x0190, f02=» ) Z %^ 'Z ' U _ R& "% 0Z U Z Y <D _, P + ! + ! ' CREATE ? "D %8 A%f % ( @%fZ @%d $ `%^ N ! Y 6 & # $ "2& @"2! A"2 "6 "."( b"."* B @". M - @"0
0x120348…1204dc Dummy {f00=0x005b, f01=0x0190, f02=» 'B( @"@ @"B "6( 'B( & ] : ] < ( ! B A%X %X % % % %8 "6( ! A'P A'R A'T 'V @ E& ^ E& ^ & ( = & ( = B A'5 & E '4( :
0x1204dc…120670 Dummy {f00=0x005b, f01=0x0190, f02=» A%X A%Z %X % % %Z % % % %8 ! 'Z ' Q % W : T ":HW " 9l Q 0W 7 + :D : A%j A%l %h ( : % %8 : Z % 0 / =!? * * "2 0SORT-AID REL 10.0 = "* B @ + -
0x120670…120804 Dummy {f00=0x005b, f01=0x0190, f02=» ( @"@ @"B "6( ( ] : ] < 0 DD' FP P "6( ! A A A a IN SORT a OUT FIX2 a WK FIX2 ( = B A E ( &
0x120804…120998 Dummy {f00=0x005b, f01=0x0190, f02=»& SR& SK& KA& KL& C FR IF& IV& OF& OV& WF& WV& : T ":HW " 9l Q 0W 7 + :D : A A ( : %8 : Z 0 / =!? * * "2 0SORT-AID REL 10.0 = "* B @ + -
0x120998…120b2c Dummy {f00=0x005b, f01=0x0190, f02=» ( @"@ @"B "6( ( ] : ] < 0 DD FP P "6( ! A A A a IN SORT a OUT FIX2 a WK FIX2 ( = B A E ( &
0x120b2c…120cc0 Dummy {f00=0x005b, f01=0x0190, f02=»& SR& SK& KA& KL& C FR IF& IV& OF& OV& WF& WV& : T ":HW " 9l Q 0W 7 + :D : A A ( : %8 : Z 0 / =!? * * "2 0SORT-AID REL 10.0 = "* B @ + -
0x120cc0…120e54 (3, 70) Dummy {f00=0x005b, f01=0x0190, f02=» ( @"@ @"B "6( ( ] : ] < 0 DD FP P "6( ! A A A a IN SORT a OUT FIX2 a WK FIX2 ( = B A E ( &
0x120e54…120fe8 Dummy {f00=0x005b, f01=0x0190, f02=»& SR& SK& KA& KL& C FR IF& IV& OF& OV& WF& WV& : T ":HW " 9l Q 0W 7 + :D : A A ( : %8 : Z 0 / =!? * * "2 0SORT-AID REL 10.0 = "* B @ + -
0x120fe8…12117c Dummy {f00=0x005b, f01=0x0190, f02=» ( @"@ @"B "6( ( ] : ] < 0 DD FP P "6( ! A A A a IN SORT a OUT FIX2 a WK FIX2 ( = B A E ( &
0x12117c…121310 Dummy {f00=0x005b, f01=0x0190, f02=»& SR& SK& KA& KL& C FR IF& IV& OF& OV& WF& WV& : T ":HW " 9l Q 0W 7 + :D : A A ( : %8 : Z 0 / =!? * * "2 0SORT-AID REL 10.0 = "* B @ + -
0x121310…1214a4 Dummy {f00=0x005b, f01=0x0190, f02=» ( @"@ @"B "6( ( ] : ] < 0 DD FP P "6( ! A A A a IN SORT a OUT FIX2 a WK FIX2 ( = B A E ( &
0x1214a4…121638 Dummy {f00=0x005b, f01=0x0190, f02=»& SR& SK& KA& KL& C FR IF& IV& OF& OV& WF& WV& : T ":HW " 9l Q 0W 7 + :D : A A ( : %8 : Z 0 / =!? * * "2 0SORT-AID REL 10.0 = "* B @ + -
0x121638…1217cc Dummy {f00=0x005b, f01=0x0190, f02=» ( @"@ @"B "6( ( ] : ] < 0 DD FP P "6( ! A A A a IN SORT a OUT FIX2 a WK FIX2 ( = B A E ( &
0x1217cc…121960 Dummy {f00=0x005b, f01=0x0190, f02=»& SR& SK& KA& KL& C FR IF& IV& OF& OV& WF& WV& : T ":HW " 9l Q 0W 7 + :D : A A ( : %8 : Z 0 / =!? * * "2 0SORT-AID REL 10.0 = "* B @ + -
0x121960…121af4 (3, 71) Dummy {f00=0x005c, f01=0x0190, f02=» ( @"@ @"B "6( ( ] : ] < 0 DD FP P "6( ! A A A a IN SORT a OUT FIX2 a WK FIX2 ( = B A E ( &
0x121af4…121c88 Dummy {f00=0x005c, f01=0x0190, f02=»& SR& SK& KA& KL& C FR IF& IV& OF& OV& WF& WV& : T ":HW " 9l Q 0W 7 + :D : A A ( : %8 : Z 0 / =!? * * "2 0SORT-AID REL 10.0 = "* B @ + -
0x121c88…121e1c Dummy {f00=0x005c, f01=0x0190, f02=» ( @"@ @"B "6( ( ] : ] < 0 DD FP P "6( ! A A A a IN SORT a OUT FIX2 a WK FIX2 ( = B A E ( &
0x121e1c…121fb0 Dummy {f00=0x005c, f01=0x0190, f02=»& SR& SK& KA& KL& C FR IF& IV& OF& OV& WF& WV& : T ":HW " 9l Q 0W 7 + :D : A A ( : %8 : Z 0 / =!? * * "2 0SORT-AID REL 10.0 = "* B @ + -
0x121fb0…122144 Dummy {f00=0x005c, f01=0x0190, f02=» ( @"@ @"B "6( ( ] : ] < 0 DD FP P "6( ! A A A a IN SORT a OUT FIX2 a WK FIX2 ( = B A E ( &
0x122144…1222d8 Dummy {f00=0x005c, f01=0x0190, f02=»& SR& SK& KA& KL& C FR IF& IV& OF& OV& WF& WV& : T ":HW " 9l Q 0W 7 + :D : A A ( : %8 : Z 0 / =!? * * "2 0SORT-AID REL 10.0 = "* B @ + -
0x1222d8…12246c Dummy {f00=0x005c, f01=0x0190, f02=» ( @"@ @"B "6( ( ] : ] < 0 DD FP P "6( ! A A A a IN SORT a OUT FIX2 a WK FIX2 ( = B A E ( &
0x12246c…122600 Dummy {f00=0x005c, f01=0x0190, f02=»& SR& SK& KA& KL& C FR IF& IV& OF& OV& WF& WV& : T ":HW " 9l Q 0W 7 + :D : A A ( : %8 : Z 0 / =!? * * "2 0SORT-AID REL 10.0 = "* B @ + -
0x122600…122794 (3, 72) Dummy {f00=0x005c, f01=0x0190, f02=» ( @"@ @"B "6( ( ] : ] < 0 DD FP P "6( ! A A A a IN SORT a OUT FIX2 a WK FIX2 ( = B A E ( &
0x122794…122928 Dummy {f00=0x005c, f01=0x0190, f02=»& SR& SK& KA& KL& C FR IF& IV& OF& OV& WF& WV& : T ":HW " 9l Q 0W 7 + :D : A A ( : %8 : Z 0 / =!? * * "2 0SORT-AID REL 10.0 = "* B @ + -
0x122928…122abc Dummy {f00=0x005c, f01=0x0190, f02=» ( @"@ @"B "6( ( ] : ] < 0 DD FP P "6( ! A A A a IN SORT a OUT FIX2 a WK FIX2 ( = B A E ( &
0x122abc…122c50 Dummy {f00=0x005c, f01=0x0190, f02=»& SR& SK& KA& KL& C FR IF& IV& OF& OV& WF& WV& : T ":HW " 9l Q 0W 7 + :D : A A ( : %8 : Z 0 / =!? * * "2 0SORT-AID REL 10.0 = "* B @ + -
0x122c50…122de4 Dummy {f00=0x005c, f01=0x0190, f02=» ( @"@ @"B "6( ( ] : ] < 0 DD FP P "6( ! A A A a IN SORT a OUT FIX2 a WK FIX2 ( = B A E ( &
0x122de4…122f78 Dummy {f00=0x005c, f01=0x0190, f02=»& SR& SK& KA& KL& C FR IF& IV& OF& OV& WF& WV& : T ":HW " 9l Q 0W 7 + :D : A A ( : %8 : Z 0 / =!? * * "2 0SORT-AID REL 10.0 = "* B @ + -
0x122f78…12310c Dummy {f00=0x005c, f01=0x0190, f02=» ( @"@ @"B "6( ( ] : ] < 0 DD FP P "6( ! A A A a IN SORT a OUT FIX2 a WK FIX2 ( = B A E ( &
0x12310c…1232a0 Dummy {f00=0x005c, f01=0x0190, f02=»& SR& SK& KA& KL& C FR IF& IV& OF& OV& WF& WV& : T ":HW " 9l Q 0W 7 + :D : A A ( : %8 : Z 0 / =!? * * "2 0SORT-AID REL 10.0 = "* B @ + -
0x1232a0…123434 (3, 73) Dummy {f00=0x005c, f01=0x0190, f02=» ( @"@ @"B "6( ( ] : ] < 0 DD FP P "6( ! A A A a IN SORT a OUT FIX2 a WK FIX2 ( = B A E ( &
0x123434…1235c8 Dummy {f00=0x005c, f01=0x0190, f02=»& SR& SK& KA& KL& C FR IF& IV& OF& OV& WF& WV& : T ":HW " 9l Q 0W 7 + :D : A A ( : %8 : Z 0 / =!? * * "2 0SORT-AID REL 10.0 = "* B @ + -
0x1235c8…12375c Dummy {f00=0x005c, f01=0x0190, f02=» ( @"@ @"B "6( ( ] : ] < 0 DD FP P "6( ! A A A a IN SORT a OUT FIX2 a WK FIX2 ( = B A E ( &
0x12375c…1238f0 Dummy {f00=0x005c, f01=0x0190, f02=»& SR& SK& KA& KL& C FR IF& IV& OF& OV& WF& WV& : T ":HW " 9l Q 0W 7 + :D : A A ( : %8 : Z 0 / =!? * * "2 0SORT-AID REL 10.0 = "* B @ + -
0x1238f0…123a84 Dummy {f00=0x005c, f01=0x0190, f02=» ( @"@ @"B "6( ( ] : ] < 0 DD FP P "6( ! A A A a IN SORT a OUT FIX2 a WK FIX2 ( = B A E ( &
0x123a84…123c18 Dummy {f00=0x005c, f01=0x0190, f02=»& SR& SK& KA& KL& C FR IF& IV& OF& OV& WF& WV& : T ":HW " 9l Q 0W 7 + :D : A A ( : %8 : Z 0 / =!? * * "2 0SORT-AID REL 10.0 = "* B @ + -
0x123c18…123dac Dummy {f00=0x005c, f01=0x0190, f02=» ( @"@ @"B "6( ( ] : ] < 0 DD FP P "6( ! A A A a IN SORT a OUT FIX2 a WK FIX2 ( = B A E ( &
0x123dac…123f40 Dummy {f00=0x005c, f01=0x0190, f02=»& SR& SK& KA& KL& C FR IF& IV& OF& OV& WF& WV& : T ":HW " 9l Q 0W 7 + :D : A A ( : %8 : Z 0 / =!? * * "2 0SORT-AID REL 10.0 = "* B @ + -
0x123f40…1240d4 (3, 74) Dummy {f00=0x005c, f01=0x0190, f02=» ( @"@ @"B "6( ( ] : ] < 0 DD FP P "6( ! A A A a IN SORT a OUT FIX2 a WK FIX2 ( = B A E ( &
0x1240d4…124268 Dummy {f00=0x005c, f01=0x0190, f02=»& SR& SK& KA& KL& C FR IF& IV& OF& OV& WF& WV& : T ":HW " 9l Q 0W 7 + :D : A A ( : %8 : Z 0 / =!? * * "2 0SORT-AID REL 10.0 = "* B @ + -
0x124268…1243fc Dummy {f00=0x005c, f01=0x0190, f02=» ( @"@ @"B "6( ( ] : ] < 0 DD FP P "6( ! A A A a IN SORT a OUT FIX2 a WK FIX2 ( = B A E ( &
0x1243fc…124590 Dummy {f00=0x005c, f01=0x0190, f02=»& SR& SK& KA& KL& C FR IF& IV& OF& OV& WF& WV& : T ":HW " 9l Q 0W 7 + :D : A A ( : %8 : Z 0 / =!? * * "2 0SORT-AID REL 10.0 = "* B @ + -
0x124590…124724 Dummy {f00=0x005c, f01=0x0190, f02=» ( @"@ @"B "6( ( ] : ] < 0 DD FP P "6( ! A A A a IN SORT a OUT FIX2 a WK FIX2 ( = B A E ( &
0x124724…1248b8 Dummy {f00=0x005c, f01=0x0190, f02=»& SR& SK& KA& KL& C FR IF& IV& OF& OV& WF& WV& : T ":HW " 9l Q 0W 7 + :D : A A ( : %8 : Z 0 / =!? * * "2 0SORT-AID REL 10.0 = "* B @ + -
0x1248b8…124a4c Dummy {f00=0x005c, f01=0x0190, f02=» ( @"@ @"B "6( ( ] : ] < 0 DD FP P "6( ! A A A a IN SORT a OUT FIX2 a WK FIX2 ( = B A E ( &
0x124a4c…124be0 Dummy {f00=0x005c, f01=0x0190, f02=»& SR& SK& KA& KL& C FR IF& IV& OF& OV& WF& WV& : T ":HW " 9l Q 0W 7 + :D : A A ( : %8 : Z 0 / =!? * * "2 0SORT-AID REL 10.0 = "* B @ + -
0x124be0…124d74 (3, 75) Dummy {f00=0x005d, f01=0x0190, f02=» ( @"@ @"B "6( ( ] : ] < 0 DD FP P "6( ! A A A a IN SORT a OUT FIX2 a WK FIX2 ( = B A E ( &
0x124d74…124f08 Dummy {f00=0x005d, f01=0x0190, f02=»& SR& SK& KA& KL& C FR IF& IV& OF& OV& WF& WV& : T ":HW " 9l Q 0W 7 + :D : A A ( : %8 : Z 0 / =!? * * "2 0SORT-AID REL 10.0 = "* B @ + -
0x124f08…12509c Dummy {f00=0x005d, f01=0x0190, f02=» ( @"@ @"B "6( ( ] : ] < 0 DD FP P "6( ! A A A a IN SORT a OUT FIX2 a WK FIX2 ( = B A E ( &
0x12509c…125230 Dummy {f00=0x005d, f01=0x0190, f02=»& SR& SK& KA& KL& C FR IF& IV& OF& OV& WF& WV& : T ":HW " 9l Q 0W 7 + :D : A A ( : %8 : Z 0 / =!? * * "2 0SORT-AID REL 10.0 = "* B @ + -
0x125230…1253c4 Dummy {f00=0x005d, f01=0x0190, f02=» ( @"@ @"B "6( ( ] : ] < 0 DD FP P "6( ! A A A a IN SORT a OUT FIX2 a WK FIX2 ( = B A E ( &
0x1253c4…125558 Dummy {f00=0x005d, f01=0x0190, f02=»& SR& SK& KA& KL& C FR IF& IV& OF& OV& WF& WV& : T ":HW " 9l Q 0W 7 + :D : A A ( : %8 : Z 0 / =!? * * "2 0SORT-AID REL 10.0 = "* B @ + -
0x125558…1256ec Dummy {f00=0x005d, f01=0x0190, f02=»P X _ @ l I :a A l ;a L # A A P A T #( W @ BP 2 #( : d M ^ R _ W D_ * $ @ @P P R " R Q 2 #( @ @ T R A @_. @ l
0x1256ec…125880 Dummy {f00=0x005d, f01=0x0190, f02=» A ~ H A v ( $ P P >P P P W _ A n T >FV :A H @ nY H @ nZ >AV W _ _ @ n @ r >BV -W >AV -W >AV B j R _ @ r T T S S S S >T T S S S S @ p - - T A r
0x125880…125a14 (3, 76) Opaque[0x194]
0x125a14…125ba8 # DirEnt {nam=»MON01 «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0ba8, f03=0x0000}
0x125a14…125ba8 IdxSect {
0x125a14…125ba8 f00 = 0x005d // 0x125a14 @0x0
0x125a14…125ba8 f01 = 0x001a // 0x125a16 @0x2
0x125a14…125ba8 gno = [ // 0x125a18 @0x4
0x125a14…125ba8 [0x00]: C0x005d.0x1.0
0x125a14…125ba8 [0x01]: C0x005d.0x2.0
0x125a14…125ba8 [0x02]: C0x005d.0x3.0
0x125a14…125ba8 [0x03]: C0x005e.0x0.0
0x125a14…125ba8 [0x04]: C0x005e.0x1.0
0x125a14…125ba8 [0x05]: C0x005e.0x2.0
0x125a14…125ba8 [0x06]: C0x005e.0x3.0
0x125a14…125ba8 [0x07]: C0x005f.0x0.0
0x125a14…125ba8 [0x08]: C0x005f.0x1.0
0x125a14…125ba8 [0x09]: C0x005f.0x2.0
0x125a14…125ba8 [0x0a]: C0x005f.0x3.0
0x125a14…125ba8 [0x0b]: C0x0060.0x0.0
0x125a14…125ba8 [0x0c]: C0x0060.0x1.0
0x125a14…125ba8 ]
0x125a14…125ba8 }
0x125ba8…125d3c Dummy {f00=0x005d, f01=0x0190, f02=»n _ | | | | n | | | H |' | | | | | | | | | | | | | |' | | | H | | | |!`!` | | | | |2 | | | | | | | | | | | | | | c @ p z ^ N l8Z8 H N2 Z jq z
0x125d3c…125ed0 Dummy {f00=0x005d, f01=0x0190, f02=» 4c r @]g N x d 2Z $"z y wL / y N DlR m 2 &Z iL a [ ? d V% L % "~ T &b 5Cn 1 d _ A x > ], & ? ? ? ? ? ? ? @], > > U H ( ( P c P W. A], T V ( U P @
0x125ed0…126064 Dummy {f00=0x005d, f01=0x0190, f02=»XV ) A]* A _b A A < A],_t A x A Q > A l A jQ b_ A j < Q d P d Q d Z Y _ 8 ]D Q Z P 0 9 _ T _, _ P H H ? ? ? ? ? ^ A _ _ ^ ? ? ? ]* $P T I
0x126064…1261f8 Dummy {f00=0x005d, f01=0x0190, f02=» U T P 0 U _n ? @] T 0 A] 1 Q Q >W 0 @] 1 A] P P Wp " ? * X R Y P _ ? @ 8 R Y P _ W6 8 X W. ? ` @ @ P $ H W W > > > > > > > > @ V ? > _ > ? _ > > ? ^ ! Y ^
0x1261f8…12638c Dummy {f00=0x005d, f01=0x0190, f02=»7 2J "_ ^F]N^Z]b5 ^t 6"6^ 6 T2 " 1"78 &3$ Q P ^ ]Z A B X T " T A 7T B # Y B A P T YF ZJ X T X M A z b H X . $ @ r P ^ @ ]b 4 ` 8 ` Px X XZ
0x12638c…126520 Dummy {f00=0x005d, f01=0x0190, f02=» A P8 P )@:b P ) :a P :a P X '? R Q )@ b 8 ` 8 b ]^ A X T " P: A X P W Y @ T* ] D W @ :C _L) @ _ P _ Y ;g# + _ Y _ Y _
0x126520…1266b4 (3, 77) Dummy {f00=0x005d, f01=0x0190, f02=» A x ?M P: A HPdQ* ? A @ T M -W ,E A ( A > > >M A (_ A 4 > ;I C X "A _@ A A $ A ( A , 0 ]b z# X& T X T :EV W X T Y :DV X Qx :EVp W " P Y WD X $ QB R
0x1266b4…126848 Dummy {f00=0x005d, f01=0x0190, f02=» Q ?P ]Z J A r X " :B RV B H R <aX4<k 8 B 8P ! A ` r X ' ! ! |P ! _ = H } ( 5T 5P ) W H R ( C C ! P Q ! ! R ! A _ ! Q ; V )Wv ! ! Rj! A _$ B 9 I
0x126848…1269dc Dummy {f00=0x005d, f01=0x0190, f02=» I A r P: P )@ P :b P ) :b P X ' R Q )@ ]^? A x A t 5 ( ]b @ x @ t A _r A ! 9 R 9 4 A X A v 5 h ]b @ t @ v @ x A _< s t W4 @ _ W( W$ AW QW @W !W W _4 ` 9 @ T"A P S
0x1269dc…126b70 Dummy {f00=0x005d, f01=0x0190, f02=» t B H R B @ x 4 b Y 9 @ P 1 A @ T 5 1 ]b A b H 9 R ! @ r ]^ f ?b ! H R` ! ( 8 ( ! ! 9 Z 9 V A ! T8 @ ( )T Q R ! _ R ! _ ! T 9 V H ; R @ (
0x126b70…126d04 Dummy {f00=0x005d, f01=0x0190, f02=» B U P R U ]Z ! ! W ! Q ! B Z P C ! B P $$ R % C ! _, Y &X Y $P. Y %P( $ P 0R Q W R ?U C ! _f Y $P Y % _ ^ _ ! P: B L # +P Y ( ! U _ X T _ W ! Y
0x126d04…126e98 Dummy {f00=0x005d, f01=0x0190, f02=» T X R X X ' P ! X ( _X ]^ A x T X R> 8 J P X ' Q 8 J " W~ C U X Y ( Y ]^ 8 J P: 8 B W0 B W B W B @ T 8 T Y Y Y Y ]b Y * ! X *_B B 1 4 X X X X
0x126e98…12702c Dummy {f00=0x005d, f01=0x0190, f02=» PD P ]Z V - 0 P A # +T W Q P P 1 ! T V C B Q 1 ` ]b Y Y Y @ r t @ B X$ _, X Z8W4 A x ? ? d B T E E R B > > > > > I X ' B C X 4
0x12702c…1271c0 Dummy {f00=0x005d, f01=0x0190, f02=» Pn Pb P ]Z ! C ` @ Y H Y L ! ! T( X H ! ! T Y H X L Y L ]( ^B _ Y F @ Y B B P ! T B R Y L A S [hU B Y D h Y :B X HP Y J Y H 4R 4 @ D : V V 49B Y F X JP ! P C
0x1271c0…127354 (3, 78) Dummy {f00=0x005d, f01=0x0190, f02=» Ds X F Y @ T a Q N SL Y WB T. X F" P& Y B Y D Y F @ Y L B X H a Q V ` ]b Y _ Y ` Y H ! ! T Y B ` Y D Y F ! X H a Q V Y 4 Y @ T" 0P -_t 5 t _~ A Y ! X
0x127354…1274e8 Dummy {f00=0x005d, f01=0x0190, f02=» C C C C ]( ^B _ Y @ Y B P ! T B R Y A S [hU B Y h Y :B X P Y Y 4R 4 @ D : V V 49B Y X P ! ]Z B PU
0x1274e8…12767c Dummy {f00=0x005d, f01=0x0190, f02=» A x X `(@ 4 W I X 4 ;DR Q B ;AY B U Y C T Q P &W -W /W A ;AY A Q` @ V8 D ( @ R $W . 8 BABCDEFGHI JKLMNOPQR /STUVWXYZ Pn Qf @ T^ D dW`:#@'=" @ QJ @ RB Q> ;AY
0x12767c…127810 Dummy {f00=0x005d, f01=0x0190, f02=» Y Y ]. C ]( ^B _ Y @ Y B P ! T B R Y A S [hU B Y h Y :B X P Y Y 4R 4 @ D : V V 49B Y X P ! B PU
0x127810…1279a4 Dummy {f00=0x005d, f01=0x0190, f02=» A x X `(@ 4 W I X 4 ;DR Q B ;AY B U Y Y D X Q^ l ` T8 C Y Y B !! T X Y ` Y B ! ! P P P P P ]Z ! B ! T > " T Y D 9 ! I N ! ! H
0x1279a4…127b38 Dummy {f00=0x005d, f01=0x0190, f02=» Y H Z P B ;b :b ^ 9 Y n Y pR4P 9 Y p ! W" ! H R T ! WJ ! @WB ! U ! ! _ P Q R" ! W ! ! @W ! ! X ' T: X nP Q C X p 8 9 ! @ 9 C B C ! ! Y p !
0x127b38…127ccc Dummy {f00=0x005d, f01=0x0190, f02=» ! R9 R Y ! I N W` ! t 9BV( ! > ! v! T6 @ > ! H N P H N;E Y ! Y D ! V X ! ! P Y ! ! H N @ X $ Pt t R::ARd P Y D ! 8 t $ <A" :E ! ! H N A Y D ! Wh Y x Y Y ! H N y Y D ! ! 4W:
0x127ccc…127e60 Dummy {f00=0x005d, f01=0x0190, f02=»" P X ! v! P Y <W: 8 T " T 9_l ! ! ! ! ! P Y ! 4 ! 4 X ;F 8 X P@ ! ! ! V! ! P Y ! X DT x W @ ! H NP _* X DT Y ! 4 > X W > X Y $ ) Y 4 B ;e :e
0x127e60…127ff4 (3, 79) Dummy {f00=0x005e, f01=0x0190, f02=»W( W$ W X DT X W >q r Y @ T a Q F ! Y Y ]b "x l Y Y B @ T Y ! R! Tn Y ! R! T` Y !! ! P Y ` Y !! ! P Y ` Y Y B P X Y '? ! 4 C @"vP$_ "v 0P -_ 5 !J _ "x A"v Y Y
0x127ff4…128188 Dummy {f00=0x005e, f01=0x0190, f02=» X P ` ]b ! R! T 9 ! I N Y D ! V! ! Tr > X BP a. @ ^ TOT2 @ f 1T( @ n a # " Q Z P R P Q R X X X Y ! W 4 : C C C C
0x128188…12831c Dummy {f00=0x005e, f01=0x0190, f02=» !)p XT P. P P& P R P $B X % ]Z ]^ ` B X ; Z Y B X T < Z0:A Z: ^@ Y@ Y Y B Y | V Y Y ~ Y X !? P6 P P. P !(8 X P !( !&D P @ 9W !(8 !&H X P X | X ~ !( &h P
0x12831c…1284b0 Dummy {f00=0x005e, f01=0x0190, f02=» d !) ( !) !) 9 X Y L & 9 !&H_ # ) 4 !) PR C !) !&H !%h(@ !) R _ !) * 1 ;h 1 !) 1 !) * !&D !%h !) ) !&H# X Y L_ P P !) P @ 9 4 ` & !) P X 1P B #t +P: Tx ( C Qh
0x1284b0…128644 Dummy {f00=0x005e, f01=0x0190, f02=») ( - l !) ) WT W Y R Y N Y P Y D @ T:B S:W4 Y 8! T$ X Y X ~ C X U Y | # W 8 ` ]b Y _ + Y Y X HP y H_, H 5 & _< Y H Y B Y L" Y !)p !&H# P ` W !(b 9 !&H X ^< Y Y B Y X L
0x128644…1287d8 Dummy {f00=0x005e, f01=0x0190, f02=» P K P0 @ T X RT $C Y B ]bK & % Y B K X D :AZn X FP Y F ! P + 7P, $ P + < $ <C ! 9 9 4 X 9C X : X | X ~ 4 B :C B 4 $ ) !&H# T` @) TOT @) SST X Y J ) W( 0 ) !&H !$ X Y J
0x1287d8…12896c Dummy {f00=0x005e, f01=0x0190, f02=» U * P jW kQ 4 9 $ 0" Z Y P Z _ 4 A&b;D A&b 4 R _ ;H 4 t !) (:C ) 4 !) ( 4 X " 4 !) ) 4 Y Y Y L" Y ! !&H# P W ! 9 !&H X ^< Y Y Y X
0x12896c…128b00 Dummy {f00=0x005e, f01=0x0190, f02=» K P @ T X T $C Y B K & % Y B K X :AZn X P Y ! P + 7P $ P + < $ <C ! 9 9 4 X 9C X : X X 4 B :C B 4 $ !&H# T @ TOT @ SST X Y W 0 !&H !$ X Y
0x128b00…128c94 (3, 80) Dummy {f00=0x005e, f01=0x0190, f02=» .X _ 4 A&b;D A&b 4 R _ ;H 4 ! (:C 4 ! ( 4 X " 4 !) ) 4 Y Y Y L" Y ! !&H# P W ! 9 !&H X ^< Y Y Y X
0x128c94…128e28 Dummy {f00=0x005e, f01=0x0190, f02=» K P @ T X T $C Y B K & % Y B K X :AZn X P Y ! P + 7P $ P + < $ <C ! 9 9 4 X 9C X : X X 4 B :C B 4 $ !&H# T @ z X & Y ( ` T C Y !3&! T ` Y W T
0x128e28…128fbc Dummy {f00=0x005e, f01=0x0190, f02=» 8 B S Yf B Y 6 B ^ Y : Y < !1 ' P X > PJ X > T X X :P Y !0 !0~ X ! P !0 !1 X 8P !1 X > J X 6 Y | Y > !0~ Y !1 Y X 8 ^ X " P X | Y 6 !0 !0 !1 X 8 ^ P, !1 _ !0 !1 Y > X 8P ^ !1 !0 !1
0x128fbc…129150 Dummy {f00=0x005e, f01=0x0190, f02=» Xv 4 !0 Y !0 ! P Y ( _ 4 8 Y _ DW FW HW Y @ T a Q @ 2B Y ]b Y ,X X >; Y P.;AV X T @ X 6 1 _( @ 1_6 Y h Y ^ Y X : s Y ; V 9E Y ; a P lP( Q l Y
0x129150…1292e4 Dummy {f00=0x005e, f01=0x0190, f02=» X : Y : 4 X 8 R P P R ;a;a Y > 4 a Q l X ( X &P Y & ` ]b Y _ 3 z Y Y @ T Y !0 ! TH Y !0 ! T: Y !3& Y !3& Y Y Xh X Y '? C .X @3 P$_~ 3 0P -_ 5 2 _ 3 A3 Y Y z _n A x ?
0x1292e4…129478 Dummy {f00=0x005e, f01=0x0190, f02=»R a. W ` a Q l 4 ,T B B " " " " * ABCDEFGHI[.<(+!&JKLMNOPQR]$
0x129478…12960c Dummy {f00=0x005e, f01=0x0190, f02=»<(+!&JKLMNOPQR]$*);^-/STUVWXYZ|,%_>?0123456789:#@'= 7- <=2&p ?' @O {[lP}M] Nk`Ka z^L~no| J Z_m j TOSS T 5 5 5 ]b 5 5 5 _ ]T
0x12960c…1297a0 Dummy {f00=0x005e, f01=0x0190, f02=» = h (@ " B 6 P ?_ = > = > = =_: R _ 00 > & <h$ P > " 2 P* P P" P P P T` XV W ]T 7 P ^ B B T P2 & T, L L R Q U V , , " _L , SF V :a
0x1297a0…129934 (3, 81) Dummy {f00=0x005e, f01=0x0190, f02=» L P T L R :AV ' > _ @ 8 >8 A @ Aa S AS T 8L @7 , - M M M M @7 7 =a 9a Q - _ - > j TOSS T 5 5 5 5 5 5 _
0x129934…129ac8 Dummy {f00=0x005e, f01=0x0190, f02=» = h (@ " B 6 P ?_ = > = > = =_: R _ 00 > & <h$ P > " 2 P P P P P P T P B B T P & T L L R Q U V , , " _L , S V :a
0x129ac8…129c5c Dummy {f00=0x005e, f01=0x0190, f02=» L P T L R :AV ' > _ @ > <=2&p ?' @O {[lP}M] Nk`Ka z^L~no| J Z_m j TOSS T 5 5 5 5 5 5 _
0x129c5c…129df0 Dummy {f00=0x005e, f01=0x0190, f02=» = h (@ " B 6 P ?_ = > = > = =_: R _ 00 > & <h$ P > " 2 P P P P P P T P B B T P & T L L R Q U V , , " _L , S V :a
0x129df0…129f84 Dummy {f00=0x005e, f01=0x0190, f02=» L P T L R :AV ' > _ @ > <=2&p ?' @O {[lP}M] Nk`Ka z^L~no| J Z_m j TOSS T 5 5 5 5 5 5 _
0x129f84…12a118 Dummy {f00=0x005e, f01=0x0190, f02=» = h (@ " B 6 P ?_ = > = > = =_: R _ 00 > & <h$ P > " 2 P P P P P P T P B B T P & T L L R Q U V , , " _L , S V :a
0x12a118…12a2ac Dummy {f00=0x005e, f01=0x0190, f02=» L P T L R :AV ' > _ @ > <=2&p ?' @O {[lP}M] Nk`Ka J | J Z_m j TOSS T 5 5 5 5 5 5 _
0x12a2ac…12a440 Dummy {f00=0x005e, f01=0x0190, f02=» = h (@ " B 6 P ?_ = > = > = =_: R _ 00 > & <h$ P > " 2 P P P P P P T P B B T P & T L L R Q U V , , " _L , S V :a
0x12a440…12a5d4 (3, 82) Dummy {f00=0x005e, f01=0x0190, f02=» L P T L R :AV ' > _ @ > <=2&p ?' @O {[lP}M] Nk`Ka | J Z_m j TOSS T 5 5 5 5 5 5 _
0x12a5d4…12a768 Dummy {f00=0x005e, f01=0x0190, f02=» = h (@ " B 6 P ?_ = > = > = =_: R _ 00 > & <h$ P > " 2 P P P P P P T P B B T P & T L L R Q U V , , " _L , S V :a
0x12a768…12a8fc Dummy {f00=0x005e, f01=0x0190, f02=» L P T L R :AV ' > _ @ > <=2&p ?' @O {[lP}M] Nk`Ka | J Z_m j TOSS T 5 5 5 5 5 5 _
0x12a8fc…12aa90 Dummy {f00=0x005e, f01=0x0190, f02=» = h (@ " B 6 P ?_ = > = > = =_: R _ 00 > & <h$ P > " 2 P P P P P P T P B B T P & T L L R Q U V , , " _L , S V :a
0x12aa90…12ac24 Dummy {f00=0x005e, f01=0x0190, f02=» L P T L R :AV ' > _ @ > <=2&p ?' @O {[lP}M] Nk`Ka | J Z_m 8 j TOSS T 5 5 5 5 5 5 _
0x12ac24…12adb8 Dummy {f00=0x005e, f01=0x0190, f02=» = h (@ " B 6 P ?_ = > = > = =_: R _ 00 > & <h$ P > " 2 P P P P P P T P B B T P & T L L R Q U V , , " _L , S V :a
0x12adb8…12af4c Dummy {f00=0x005e, f01=0x0190, f02=» L P T L R :AV ' > _ @ > <=2&p ?' @O {[lP}M] Nk`Ka | J Z_m j TOSS T 5 5 5 5 5 5 _
0x12af4c…12b0e0 Dummy {f00=0x005e, f01=0x0190, f02=» = h (@ " B 6 P ?_ = > = > = =_: R _ 00 > & <h$ P > " 2 P P P P P P T P B B T P & T L L R Q U V , , " _L , S V :a
0x12b0e0…12b274 (3, 83) Dummy {f00=0x005f, f01=0x0190, f02=» L P T L R :AV ' > _ @ > <=2&p ?' @O {[lP}M] Nk`Ka | J Z_m j TOSS T 5 5 5 5 5 5 _
0x12b274…12b408 Dummy {f00=0x005f, f01=0x0190, f02=» = h (@ " B 6 P ?_ = > = > = =_: R _ 00 > & <h$ P > " 2 P P P P P P T P B B T P & T L L R Q U V , , " _L , S V :a
0x12b408…12b59c Dummy {f00=0x005f, f01=0x0190, f02=» L P T L R :AV ' > _ @ > <=2&p ?' @O {[lP}M] Nk`Ka | J Z_m j TOSS T 5 5 5 @7 , L T" L P ?A M L T L
0x12b59c…12b730 Dummy {f00=0x005f, f01=0x0190, f02=» -(@ : - : @7 , L T M @7 (@ : > = =_: R _ T a $" P E Uh(@ $ : ' P W @ D P _ Tp T U ]b R $ - _ " P $ - : R $ - _ : Z $ -_ D ( U ( 0
0x12b730…12b8c4 Dummy {f00=0x005f, f01=0x0190, f02=» P P E AP W : X A X F 1 Y F(@ : F 4W 0P< R Q P W R T D A Q , 0 5 @] 1 A] ZB : D HW (P D A I W6 @S T ( AS U 1_ D A I D H ) E H(@ : T @ n SB P W @ U0 T m S W
0x12b8c4…12ba58 Dummy {f00=0x005f, f01=0x0190, f02=»"? T _$ : X X 8 X : ! # X =H C S W C C C X %? : C X <_" d #A 1 W: WV T U > AWT @ @ bB @ R&P % % @ I I I I _4 @ P a
0x12ba58…12bbec Dummy {f00=0x005f, f01=0x0190, f02=» P P E P W : X X 1 Y (@ WR ' Z Z ! [ AW P< P& 8! P6 K @P X T X !? ? Y W W @W [ [x " W AW X* b X2 " (@ I # V V " LP V : V
0x12bbec…12bd80 Dummy {f00=0x005f, f01=0x0190, f02=» $P X X $ $P, # ' P @T #?W #?$? X _2 J @" P Y 9 @ J ! T " Y X G [x! [ 4 P C P* [x J : J < W W P X V C W [ X ! "? K >Q 9 [ W Y B W _.! T 4 T P % Y
0x12bd80…12bf14 (3, 84) Dummy {f00=0x005f, f01=0x0190, f02=» F " G R [ N ! N P" N & N T S _ _& - M L G ]@ _ W C ( B P U Zz T 8 X>_. : X P (@ Y Y Y :" (@ X $ T ( _ ^ $ : mg mxP" $ [ 8X
0x12bf14…12c0a8 Dummy {f00=0x005f, f01=0x0190, f02=»$ T B * Y $ : " $ Y : @ P0 8 T _ " & Y 4 : : $ - Y : n > > > > > > > > @], A], hW W ` ^ ! Z@ ]* (XH @],P T M ]X , ) A],
0x12c0a8…12c23c Dummy {f00=0x005f, f01=0x0190, f02=» Z Z ? ? Z Z Z Z Z Z Z " $ & > P~ "R~ Y ]b Pj T P` ]T <UR "R4 PB X R< X T6 X T0. T G Y6 G _` P ,P - _ C C 8W T 8P Y ^ 5 )
0x12c23c…12c3d0 Dummy {f00=0x005f, f01=0x0190, f02=»'? Y Y T # P W Y (@ 2 @ _ > (@ X L U0 L QL L # T R < 5 ^ R < 5 Y ` X D P ( X ) 1 $ _( 4 (@ X P 0P X T 4 Y X 1 1 X P> - M X P. P& # P
0x12c3d0…12c564 Dummy {f00=0x005f, f01=0x0190, f02=»:g H " I "! P& X a a P ,P 9A _ H "P I " 4 ` P Y a X$; [(;! P "Z0?AZ4 @a Q " X " $XL ( I T E _ (X _ X $ _vW b b b b b b b b c"b c"b d b c c b c !" bB
0x12c564…12c6f8 Dummy {f00=0x005f, f01=0x0190, f02=» A X T X % T Ua P ^ d =A Y a T P U H I Ta I $ C C d T X?j c b ?j c W _l X X# Xt X B# T d. c _ b _ X X# X X B# P Y T ?h d. H H d$ a P I d
0x12c6f8…12c88c Dummy {f00=0x005f, f01=0x0190, f02=»W B B B d W. Y X C X D S W W B B $ T _ C C W B B X N U Rd V Tf #D X ! V( X Y P$ H P$ X ]mhP _ m T d ]b A T X N ]^e e grgrfJfJgrgrfJgrfJgre grh l grhv U
0x12c88c…12ca20 Dummy {f00=0x005f, f01=0x0190, f02=» C ( Vf gr S _z ( Vf gr B W Y X C X '? d X < X > )T P T0 X ! T(W" gr P F X >U X > G T g F S W G G F F U f V gr X X# T B S d < > F F
0x12ca20…12cbb4 (3, 85) Dummy {f00=0x005f, f01=0x0190, f02=» $ - Tr + X XR ( Vf TzW Y X U F F D '? P2 P, P< T V K K W K K D X$ P U T UJW E C E D_ X X# T B S X N ` (@( I1M1I2M2I3M3I4M4
0x12cbb4…12cd48 Dummy {f00=0x005f, f01=0x0190, f02=» C ( Vf S _z ( Vf B J B& Ag Rl P NP L <a Qg _ g J " T # T W 0T # P P R Ig _ J L u T F % =N Ag g * F % G G @ a T ( Vf T$ 9a " Eg & a PJ _ W
0x12cd48…12cedc Dummy {f00=0x005f, f01=0x0190, f02=» a j ^ S G F > P2 J # " N X# N B @g ~ @g R O X j ^ * R ] *_ @g O X F O > F O @ @g O B F ; O C F < O D Vg O LP F D Vg O J F ;F J $ $ P O ;H O X N YmhP _ Xmx O Y N > N @ m O Z N > :h! P O
0x12cedc…12d070 Dummy {f00=0x005f, f01=0x0190, f02=» ^2 : J P U Q P T T j g a TZ R Tg X g N Tr_ j " Ag J T U H $ P _ , % @S ) AS (@ : N B" J L B U B M L B T g D XV ( Vf S U I I I
0x12d070…12d204 Dummy {f00=0x005f, f01=0x0190, f02=» g Rg " P J T P a Q ?A g PB Uh(@ N %? T* N F d H 4 5W P 0 @S 1 AS (@_ * g ?B g G : g G < Rg ' P C S ( Vf G l T PT PJV
0x12d204…12d398 Dummy {f00=0x005f, f01=0x0190, f02=» V Q UF V Ud Q4P P 9A?A:AV R Z _ P*R R P ;A [ [ : V X"Z(_( L _P ($SWAP A A A A A. z& UU @ @ ! P$>B @z Az @z E D P
0x12d398…12d52c Dummy {f00=0x005f, f01=0x0190, f02=» Ay u P2 uF_ * A w W * A wHW :a2 * A u y & W F W @ F W CRP BAP COP A W F A @ : V, @ P z ;b=H : r F r W =J : R F P W W @ $ P @ R| W W {2R" W
0x12d52c…12d6c0 Dummy {f00=0x005f, f01=0x0190, f02=» Q {2VD Y2 W V @ " TJ W P {2Y z r z Y P @ P @ T W - z P _ T <B :L A W A A W z
0x12d6c0…12d854 (3, 86) Dummy {f00=0x005f, f01=0x0190, f02=»W <9B @ V W Q z W @z A yn @ s V W s ! P W @ V P _ @ ! P* z 9h !RRP V V s W _> z z z y V V PZ W @ @ ! T _ P
0x12d854…12d9e8 Dummy {f00=0x005f, f01=0x0190, f02=»PB _ P !;;T X$ W { _J u T u u W u t z xn W @n W tr V 0 !;;P P V XH _ P !;;T X$ W { nP XZ_V S Ax Ax xn @ R @ ! T Ax6 AxJ @n V V I
0x12d9e8…12db7c Dummy {f00=0x005f, f01=0x0190, f02=» :A K : A T.I T P 1 I P < R P A _> z : @ " P P o v* Av` Avd Av Av W v An Av Av Aw Aw Ay Atr Axt Ax : 9e :e Q P 9e @n P An 9C) A I " @n ! P " :B An
0x12db7c…12dd10 Dummy {f00=0x005f, f01=0x0190, f02=»n t w B J " r R,Q$ @ ( = @n Q @n "| _@ _$ : Aw Aw Aw Aw wn Ay Atr Axt Ax : h:B* An @n P An B J 4R 4 :B 4 @n : V V 49B @n 4R @ t w A I ! j : x Ay Atr Axt Ax Ax6! T xH
0x12dd10…12dea4 Dummy {f00=0x005f, f01=0x0190, f02=» xt x 9PJ S Y T@ $ 1T: C !CCTr : 1P P$_ P =H P { @ T X W n : YX d C !CCTx xB. u> <X B.9 Hn Q w _ u _ !SSTF 0 Un P A X X W W X X S W W W :
0x12dea4…12e038 Dummy {f00=0x005f, f01=0x0190, f02=» Ayt y _ 0V , - P X 9A_ : @ ! P (W ( :W> 2 W 0 . " A A A A Atr 2 ; Z [ : : [ [ : |
0x12e038…12e1cc Dummy {f00=0x005f, f01=0x0190, f02=» @ 0 V @ z 0 H W : @ A 9n A @ A A A. @ @ W A < : A ]bA > ;h 0 :C # : .=H N { {B .=H N { {B N : d 8" R _ Z
0x12e1cc…12e360 Dummy {f00=0x005f, f01=0x0190, f02=» nP } W r n } W @ @ % V , P@ , - 4 ] 4 {2Y 5 X * _6 : W @ ] @ P @ " P : V _ W W . !TTP z d @ T z Y | !TTX" A 9 A : ` @ V :a @
0x12e360…12e4f4 (3, 87) Dummy {f00=0x0060, f01=0x0190, f02=» V W @ @ T z : P S S _ : @ @ @ #D# P ; V ~ _ : @ " P @ P 3 _ @ " P V 3 S 1 S 9J S ( 3 ( 9B @ @ T z : W . !TT
0x12e4f4…12e688 Dummy {f00=0x0060, f01=0x0190, f02=» W = V t P0 r " U z _2 P0 " U z _2 V tPx {2R z S ( V | S =J @ " S V l S W l V CRT V p S W p W
0x12e688…12e81c Dummy {f00=0x0060, f01=0x0190, f02=» r _ Pd W p V 8 8 4 D P$ { @ # P H I K T + Y@ V p _f V t Y | !TTX @ @ T z : W % @ P _ R @ WT R @
0x12e81c…12e9b0 Dummy {f00=0x0060, f01=0x0190, f02=» f ( W d G =h G V d V r < V f P W f _B V W V t Yv | !TTX @ @ T z : | !TTX !CCTr d P, V r 4 U z $ $ _. P, V 4 U
0x12e9b0…12eb44 Dummy {f00=0x0060, f01=0x0190, f02=» 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 z : W V F !SST WJ
0x12eb44…12ecd8 Dummy {f00=0x0060, f01=0x0190, f02=»W D { ) $ PV D L Tp D "P V ` T @ 1 Q a , I ( I * $# P8 V -W( W" D V ` T @ 1 Q a : @ % PD H I H T P( H U V U W < + + P V : `
0x12ecd8…12ee6c Dummy {f00=0x0060, f01=0x0190, f02=»# ;b W ;a WR# T W W,# T W W # T W W W R _ $ W : z Y Z ]$ @]$T A]$ V W Y0 Z6 ]& @]&T A]& V >A 8T 9 0 1 8 $; # V ;c F !AAP # $ < $ : W
0x12ee6c…12f000 Dummy {f00=0x0060, f01=0x0190, f02=» U Y$ P W | V z 3 % W P _ V |P V v ]] W v P _ @]$P V { A]$ (P ) @]$ @]&P V { A]& (P ) @]& @ @ T z : N =H N { : N =H N { : &=H F { : F =H F {
0x12f000…12f194 (3, 88) Dummy {f00=0x0060, f01=0x0190, f02=» _ : }Z } ~" ~ B J @ R @ $ D L * A CRT M " L x 4 p b T 0 T a q b a a : 3 3 "x "x "x "x + + + + ;c F !AAP # $ < $ : W
0x12f194…12f328 Dummy {f00=0x0060, f01=0x0190, f02=»# P P R Ir _ J L u _ F % =N As> sH * F % G G @ m,T ( a T$ 9a " Er & m, PJ _ W & P & a I - G w W _* _ # ( a G sH T @s@ Yf?A W ' m,
0x12f328…12f4bc Dummy {f00=0x0060, f01=0x0190, f02=» O @ @s@ O B F ; O C F < O D Vs O LP F D Vs* O J F ;F J $ $ P O ;H O X N Yx P _ Xx O Y N > N @ x O Z N > :h! P O :G t N s v.W N B" P G G @r G N X:n G V V N & y` t N @' x W W
0x12f4bc…12f650 Dummy {f00=0x0060, f01=0x0190, f02=» Ar J _ a H $ P _ , % @_2 ) A_2(@ : N B" J L B U B M L B _ r D XV ( a _ a I I I F RD P NP L L C D s Us <a Qr Qr <B s s _H Ar J " " r V
0x12f650…12f7e4 Dummy {f00=0x0060, f01=0x0190, f02=» * sH ?B s G : s G < Rr ' P C _ ( a G w T PT PJV P>V SH? V :!9 V @ P R W ;A [ [ : _4 Pj T Pf
0x12f7e4…12f978 Dummy {f00=0x0060, f01=0x0190, f02=» : V X"Z(_( L _P ($SWAP A A A A A. p UU @ @ ! P$>B @ : A : @ : E D P _ $ % $P _ % A >f A A A @ " Q" z :d @ # U R>P0 P @ A 8
0x12f978…12fb0c Dummy {f00=0x0060, f01=0x0190, f02=» F A @ : V, @ P @;b=H : } F } W =J : R F P W W @ $ P @ R| W W |R" W W V V 8 !RRT W V X W W V V V PF A @ |U U^ A
0x12fb0c…12fca0 Dummy {f00=0x0060, f01=0x0190, f02=»~ : Y P @ 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
0x12fca0…12fe34 (3, 89) Opaque[0x194]
0x12fe34…12ffc8 # DirEnt {nam=»CONF01«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x0c10, f03=0x0000}
0x12fe34…12ffc8 IdxSect {
0x12fe34…12ffc8 f00 = 0x0060 // 0x12fe34 @0x0
0x12fe34…12ffc8 f01 = 0x0002 // 0x12fe36 @0x2
0x12fe34…12ffc8 gno = [ // 0x12fe38 @0x4
0x12fe34…12ffc8 [0x00]: C0x0060.0x2.0
0x12fe34…12ffc8 ]
0x12fe34…12ffc8 }
0x12ffc8…13015c Dummy {f00=0x0060, f01=0x008e, f02=» T; 01; TID=TU; TCL=TU; * LEV=60; : P00; J P03; V SDC=S01; b SDC=S02; r PSDC=S03;
0x13015c…1302f0 Dummy {f00=0x0060, f01=0x2008, f02=» 01; TID=TU; TCL=TU; * LEV=60; : P00; J P03; V SDC=S01; b SDC=S02; r PSDC=S03;
0x1302f0…130484 Dummy {f00=0x0060, f01=0x2008, f02=» MES PARAMETER ERROR H$PCASE $ HEND 2RUN CPLGEN MON01 : HMOV MON01,/L,MONITOR R HRUN PCAS MON01 n HWEF 3 UTIL01 HMOV UTIL01,/L HRUN PCAS UTIL01 & H$PCASC C=CONF01,CU=CONFIG,A=UTIL01 H$PCASC C=CONF01,A=UTIL01
0x130484…130618 Dummy {f00=0x0060, f01=0x4128, f02=»MLBL EQU * PDUM1 EQU * PDUM2 EQU * $ PDUM3 EQU * 6 PDUM6 EQU * H PDUM4 EQU * Z PDUM5 EQU * l PPRINDX EQU * ~ PBINDEX EQU * PRINDEX EQU * PCOPYCF EQU * PSORTF EQU * P LDKL A1,-5 P LDK A2,0 P
0x130618…1307ac Dummy {f00=0x0060, f01=0x2008, f02=» * PCOPYIT EQU * PCOPYTI EQU * & PIBMLBL EQU * : PSORTF EQU * N PPRINDX EQU * b PBINDEX EQU * v PRINDEX EQU * PCOPYCF EQU * P END @ PIPL412 EQU * PIPL413 EQU * PIPL811 EQU * PIPL812
0x1307ac…130940 Dummy {f00=0x0060, f01=0x0190, f02=»C ENTRIES | P* 6: CREATION DATE P* 7: RETENTION PERIOD . P* 8: BLOCKING FACTOR N P* 9: RECORD LENGTH l P* 10: NUMBER OF RECORDS P* 11: SECTOR NUMBER P* 12: CHARACTER POSITION P* 13: HEXADECIMAL VALUE P*
0x130940…130ad4 (3, 90) Opaque[0x194]
0x130ad4…130c68 # DirEnt {nam=»OBDIR «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x0c18, f03=0x0000}
0x130ad4…130c68 IdxSect {
0x130ad4…130c68 f00 = 0x0060 // 0x130ad4 @0x0
0x130ad4…130c68 f01 = 0x0008 // 0x130ad6 @0x2
0x130ad4…130c68 gno = [ // 0x130ad8 @0x4
0x130ad4…130c68 [0x00]: C0x0060.0x3.0
0x130ad4…130c68 [0x01]: C0x0061.0x0.0
0x130ad4…130c68 [0x02]: C0x0061.0x1.0
0x130ad4…130c68 [0x03]: C0x0061.0x2.0
0x130ad4…130c68 ]
0x130ad4…130c68 }
0x130c68…130dfc Dummy {f00=0x0060, f01=0x000c, f02=» 5 5 CCEMT CCASSE FMERR n 8 rDK2IPL / IPL121 IPL221 IPL122 IPL222 IPL123 IPL223 QBLFAC *GETFC 3 GETFC PRVTOC PRDISC UPDISC COPVOL COPFI
0x130dfc…130f90 Dummy {f00=0x0060, f01=0x0190, f02=» CCI ECBBA ECBRL ECBEL ECBRC ECBCW REBUF Z U:BUF1 PBLK U:BUF2 CCIUTI BINRES ^ EFFLEN d CCFCT READAN CCCCT WRITT WRINER ( CCTIE QCTIEL DTBCON N NUMBER CTR:30 HTBCON
0x130f90…131124 Dummy {f00=0x0060, f01=0x0190, f02=» j LCDISCT CDISCT CDISLE 8 FIRFC FCMAX 8 BINDEX BINDEX . FMRLEN FMREC1 FMREC2 RRORD WRORD ERPROT RDORD CLORD RFORD FDLEN FDFNR FMLEN FMORD FMORG SORG . nCC
0x131124…1312b8 Dummy {f00=0x0060, f01=0x0190, f02=»RVTOC FIRFC CDISCT BINACR BIDACR L TIBMLBL IBMLBL VOLNAM BIDACR DECBIN CONIBM l >PRINDX PRINDX FIRFC CDISCT XIBMSUB " SUB1 CONIBM h DECBIN
0x1312b8…13144c Dummy {f00=0x0060, f01=0x0190, f02=» fFILHND 8 CRFILE l FIRFC FCMAX ADDMOD DSUMOD BINACR DLFILE F b ,ADDMOD H ADDMOD J ,DSUMOD I DSUMOD V JCRVOL J QBLFAC TOSREL CRVOL
0x13144c…1315e0 Dummy {f00=0x0060, f01=0x0190, f02=»131 IPL132 IPL133 IPL211 IPL212 IPL213 IPL221 IPL222 IPL223 IPL231 IPL232 IPL233 VOLNAM BIDACR DSUMOD PRFILE Z STCKP PREC1 PREC2 FMLEN PRFILE * PRTECB FDLEN RFORD FDFILE PRINTK SPA
0x1315e0…131774 (3, 91) Dummy {f00=0x0061, f01=0x0190, f02=» PRFIS RRORD RTN:02 RTN:01 RTN:04 PREC1 PREC2 PRINTK OUTTXK PRTBUF BININT BININR COMPCT bASC HEXASC b rDMTEST ` DMTEST FDLEN RFORD FDRLEN RRWORD RWORD RDORD WRORD BIDAC
0x131774…131908 Dummy {f00=0x0061, f01=0x0190, f02=»C N UPPR STACKP SECNO BINAC CHSCNO RINDEX k RINDEX FMRLEN FMBLF FMSIZE FMREC1 FMREC2 BIDACR CLORD RRORD WRORD ERPROT RDORD RFORD FDLEN FMLEN FDFNR FMORD FMORG SORG DIVMOD O
0x131908…131a9c Dummy {f00=0x0061, f01=0x0190, f02=»CBI SPACE SCAN COMTAB OUTINT OUTCHA T:INP x TPREAD TPWAIT ERROR2 ERROR7 ERROR8 ASC:IM INVOL1 NXVLIN COPIED ERROR4 ERROR5 ERROR6 ERRORB COPYCF } COPYC
0x131a9c…131c30 Dummy {f00=0x0061, f01=0x0190, f02=» TOWEOF " TOWRIT b TOWAIT j TOVOL1 FMFILE FMCCD FMCRP COPIED ERROR1 ASC:IM ASC:CM COPYIT COPYIT @ SUB1 CONIBM DECBIN FDLEN RFORD FDRLEN FDFNR FMLEN FMORD FMR
0x131c30…131dc4 Dummy {f00=0x0061, f01=0x0190, f02=» DECBIN FDLEN RFORD FDRLEN FDFNR FMORD FMREC1 FMREC2 RRORD CLORD COPYFT COPYFT FDLEN RFORD ERROR2 FDRLEN ERROR3 FDFNR FMLEN FMORD TOVOL1 REORD RRORD TOWAIT TOWRIT TOWEOF C
0x131dc4…131f58 Dummy {f00=0x0061, f01=0x0190, f02=» ERROR4 ERROR5 " ERROR6 & ERROR7 * ERROR8 . ERROR9 2 ERRORA 6 ERRORB : CLORD WRORD ERPROT TPWAIT ^COMPCT COMPCT bTAB OUTCHA PRTBUF OUTTXK ATOA ATOE V RPRINT
0x131f58…1320ec Dummy {f00=0x0061, f01=0x0190, f02=»X 4 XDISPB : OUTXW d XDISPW j BLANKS z |TAB SKIPIF PRTIF OUTINT OUTINR IDISPR BININT BINAC BININR BINACR PRTECB " ^ASC |ASC PRTBUF OUTCHA OUTTXT OUTHEX ATOA ATOE
0x1320ec…132280 Dummy {f00=0x0061, f01=0x0190, f02=» HEXASC OUTINR OUTCHA OUTHEX bTAB OUTTXT PRTBUF SPACE ATOA ATOE 8OK:SUB VOLNAM l OK:SUB RCONPAR SYSPAR CONPAR <C SYSFNR |VBB 6BIDACR
0x132280…132414 (3, 92) Dummy {f00=0x0061, f01=0x0190, f02=»DISPL IDISPR ZSCAN COMTAB STRTAB P SCECBI SCECBO SCAN ,MPYMOD MPYMOD ~ ~COMPUT DUBCMP DUBMOV D DMOVIB V DMOVI1 Z BXJ DMOVI2 p MUR
0x132414…1325a8 Dummy {f00=0x0061, f01=0x0190, f02=»IVMOD SWMUL SAVEA1 SAVEA2 SAVEA4 SAVEA5 SAVEA6 SAVEA7 SWDIV SAVEA8 FETCH2 FETCH1 SWTASK 2 PRORD B D SORTF " " SAVEA1 z SAVEA2 | SAVEA4 ~ SAVEA5 SAVEA6 SAVEA7 SAVEA8 X
0x1325a8…13273c Dummy {f00=0x0061, f01=0x0190, f02=»UBADD DMOVI1 DMOVIB DMOVI2 DUBSUB RDORD RWORD FDLEN RFORD FDFNR FMORD CLORD FMOP FMCL BINACR SWMUL DUBDIV ERPROT RRWORD FMLEN SWTASK MOVE1 COPMOV $SRTAID SRTAID COPMOV
0x13273c…1328d0 Dummy {f00=0x0061, f01=0x0190, f02=»DLEN FDVOL FDFILE BASWR DELWR FDOPT OPORD SORTF CONPAR FMLEN bVBB "C SYSFNR Mt rDK3IPL IPL131 IPL231 IPL132 IPL232 IPL133 IPL233 QBLFAC NFLDIPL IPL811
0x1328d0…132a64 Dummy {f00=0x0061, f01=0x0190, f02=» RDORD RRORD RWORD ERPROT RRWORD WRORD RFORD FDLEN COPFIL FDRLEN FDFNR FMLEN FMORD FMORG FMREC1 FMREC2 CLORD FMCL FMREAD FMWRIT h DMOFF OPORD: CLORD RSORD RFORD
0x132a64…132bf8 Dummy {f00=0x0061, f01=0x0190, f02=» FDFNR FDSIZE FMLEN P FMFILE FMRLEN FMBLF FMORG FMREC1 : FMREC2 < FMCCD F FMCRP L FMSIZE FMORD FMOP FMCL FMREAD FMWRIT BASWR DELWR ERFC ERPROT @ SORG SS MAXBLK DMNMD
0x132bf8…132d8c Dummy {f00=0x0061, f01=0x0190, f02=»MEN2 IPL111 IPL112 IPL113 IPL211 IPL212 IPL213 IPL411 IPL412 IPL413 vCCISUB CDTYPE , REBUF BINRES CDFORM J BLRLEN f CCPBOT MAXBLK CDISC CDISC2 CDI
0x132d8c…132f20 Dummy {f00=0x0061, f01=0x0190, f02=» CASMIX CASIXF CASOUT PBLK2 MIXLST IXLIST WKLIST ASLIST CCIHFI PBLK FMFPB FMOP FMORD FMREC1 FMCL CCIERR FMERR FDLEN FDBLK FDFILE FDVOL FDSIZE FDOPT BASWR DELWR OPORD RSORD ERFC CLORD
0x132f20…1330b4 (3, 93) Dummy {f00=0x0061, f01=0x0190, f02=»CCODE UNLOAD WRINER READAN LOCKFD WRITT CTRSEC NUMBER CTR:30 CIBMRL EFFLEN UPD:A4 2 UPD:A9 6 UPDA9B : FCCARD B CWAA J CCIBUF CWAL P CCIBFL U:BUF1 F LSECNO STACKP
0x1330b4…133248 Dummy {f00=0x0061, f01=0x0190, f02=»CCMT L CCSQT INLIST OTLIST ASLIST WKLIST MIXLST IXLIST FLTAB QCCHBC QCCDBC QCCFOR QCCLIM QCCSPE QCCOBB @ QCCOBW QCCOAS CCCCT CCFCT CCLCT n CCSCT CPRDEV CDISC CSPNAL
0x133248…1333dc Dummy {f00=0x0061, f01=0x0190, f02=» CMTDK1 UPD:A4 CMTDK2 UPD:A9 CMTDK3 CDTYPE CASIXF CASMIX FCCARD CASWKF CMTDK4 CWAA CWAL UPDA9B CDISCA CDFORM DTYP CCPBOT CCFAT > CRVOL CRFILE DLFILE PRVTOC PRDISC UPDISC COPVOL COPFI
0x1333dc…133570 Dummy {f00=0x0061, f01=0x40d8, f02=»TF CCLTT j CCEMT CCASSE FMERR n 8 rDK2IPL / IPL121 IPL221 IPL122 IPL222 IPL123 IPL223 QBLFAC *GETFC 3 GETFC PRVTOC PRDISC UPDISC COPVOL COPFI
0x133570…133704 Dummy {f00=0x0061, f01=0x0190, f02=» ? A > @ P ,V$ A % @ 9 % T A T @ &z ? ? >_ ? ? ? ? ? ? ? Q _ ^ ( H & W '~ W ' X I I R P8 X B$P B*T Y Y W x Y Y $ 0T W W ,^ X ? ? ? ? ? ? ? '0 - X #?
0x133704…133898 Dummy {f00=0x0061, f01=0x0190, f02=» ? ? ? ? ' - ? ? ? ? ? ? ? ' - (@_~ + X R Y _ X D $! TR ? ? ? ? ? ? ? ( . 8 M ? ? ? ? ? ? ? (> - % > > > > > > > > ? ? ? ? ? ? ? (j . P X - - ( * 8 TRT X + + ? ? + Pl
0x133898…133a2c Dummy {f00=0x0061, f01=0x0190, f02=»B$P B*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 Q Q W W Q Q R P Q 5 Y ( ? ? ? ? ? ? ? ) . Qv ) * " PF X Q< X P P ? ? ? ? ? ? ? **
0x133a2c…133bc0 Dummy {f00=0x0061, f01=0x0190, f02=» - Y Y X X T ? ? ? ? ? ? ? * - > > > > > > > > ? @ ? > X B A* B (@ $ X X W W $ # C C P L L m A , DKP L X X L ! X L P L @ _ C C # $ _R _ _ _
0x133bc0…133d54 (3, 94) Opaque[0x194]
0x133d54…133ee8 # DirEnt {nam=»UTIL01«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x0c38, f03=0x0000}
0x133d54…133ee8 IdxSect {
0x133d54…133ee8 f00 = 0x0061 // 0x133d54 @0x0
0x133d54…133ee8 f01 = 0x0002 // 0x133d56 @0x2
0x133d54…133ee8 gno = [ // 0x133d58 @0x4
0x133d54…133ee8 [0x00]: C0x0061.0x3.0
0x133d54…133ee8 ]
0x133d54…133ee8 }
0x133ee8…13407c Dummy {f00=0x0061, f01=0x4152, f02=» PASG 2,NO PSCR PLED DUMENT P!!CH $$CRVOL$$DUM1$$ 2 P!!CH $$CRFILE$$DUM2$$ N P!!CH $$DLFILE$$DUM3$$ l P!!CH $$PRDISC$$DUM4$$ P!!CH $$UPDISC$$DUM5$$ P!!CH $$PRVTOC$$DUM6$$ P!!EN PASM /S PINC CCI
0x13407c…134210 Dummy {f00=0x0061, f01=0x2008, f02=» 2,NO PSCR PLED DUMENT P!!CH $$CRVOL$$DUM1$$ 2 P!!CH $$CRFILE$$DUM2$$ N P!!CH $$DLFILE$$DUM3$$ l P!!CH $$PRDISC$$DUM4$$ P!!CH $$UPDISC$$DUM5$$ P!!CH $$PRVTOC$$DUM6$$ P!!EN PASM /S PINC CCI
0x134210…1343a4 Dummy {f00=0x0061, f01=0x0190, f02=»FOND EQU * P LDKL A2,/200 P OTR A2,0,SOP ( P HLT > P* J . PFCCHEK CWK A3,MONNUM SEARCH FOR MONITOR ? T ( P RF(NE) RET100 START MONITOR SEARCH $ P LC A7,SOPFIL,A4 GET SOP NUMBER P ANK A7,/FF * P RB(NE) FILFOR NOT A MONIT
0x1343a4…134538 Dummy {f00=0x0061, f01=0x0190, f02=»A3,16,A4 FILE EXTENDED BASE,MOST SIGNIFICANT P ST A3,FILXBM,A12 4 6 P LD A3,18,A4 FILE EXTENDED BASE,LEAST SIGNIFICANT N P ST A3,FILXBL,A12 2 P LDK A3,MONNUM MONITOR NUMBER FIELD TO COMPARE 6 P LC A5,MONNUM,A4 A2:=MONITOR NUMBER TO SEARCH FO
0x134538…1346cc Dummy {f00=0x0061, f01=0x4092, f02=» PLIMIT EQU * P* P* END OF DISK IPL " P* > 6 P************************************************** H END @ XBL,A12 2 P LDK A3,MONNUM MONITOR NUMBER FIELD TO COMPARE 6 P LC A5,MONNUM,A4 A2:=MONITOR NUMBER TO SEARCH FO
0x1346cc…134860 Dummy {f00=0x0061, f01=0x2008, f02=» NT DSKIPL 79-07-13 POHO END *@ 6
0x134860…1349f4 (3, 95) Opaque[0x194]
0x1349f4…134b88 # DirEnt {nam=»UTIL02«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x0c40, f03=0x0000}
0x1349f4…134b88 IdxSect {
0x1349f4…134b88 f00 = 0x0062 // 0x1349f4 @0x0
0x1349f4…134b88 f01 = 0x0002 // 0x1349f6 @0x2
0x1349f4…134b88 gno = [ // 0x1349f8 @0x4
0x1349f4…134b88 [0x00]: C0x0062.0x0.0
0x1349f4…134b88 ]
0x1349f4…134b88 }
0x134b88…134d1c Dummy {f00=0x0062, f01=0x0190, f02=» PASG 2,NO PSCR PLED DUMENT P!!CH $$CRFILE$$DUM0$$ 2 P!!CH $$DLFILE$$DUM1$$ P P!!CH $$PRVTOC$$DUM2$$ n P!!CH $$COPFIL$$DUM3$$ P!!CH $$COPYFT$$DUM4$$ P!!CH $$COPYTF$$DUM5$$ P!!CH $$PRFILE$$DUM6$$ P!!CH
0x134d1c…134eb0 Dummy {f00=0x0062, f01=0x4012, f02=»0,TY10 @ PSCR PLED DUMENT P!!CH $$CRFILE$$DUM0$$ 2 P!!CH $$DLFILE$$DUM1$$ P P!!CH $$PRVTOC$$DUM2$$ n P!!CH $$COPFIL$$DUM3$$ P!!CH $$COPYFT$$DUM4$$ P!!CH $$COPYTF$$DUM5$$ P!!CH $$PRFILE$$DUM6$$ P!!CH
0x134eb0…135044 Dummy {f00=0x0062, f01=0x2008, f02=» @ PSCR PLED DUMENT P!!CH $$CRFILE$$DUM0$$ 2 P!!CH $$DLFILE$$DUM1$$ P P!!CH $$PRVTOC$$DUM2$$ n P!!CH $$COPFIL$$DUM3$$ P!!CH $$COPYFT$$DUM4$$ P!!CH $$COPYTF$$DUM5$$ P!!CH $$PRFILE$$DUM6$$ P!!CH
0x135044…1351d8 Dummy {f00=0x0062, f01=0x454e, f02=»D FORMAT;TAPE UNIT NOT OPERABLE; OUTPUT DISC NOT EMPTY;FAULTY RECORD LENGTH; !!CH $$DLFILE$$DUM3$$ ENOUGH; OUTPUT FILE NOT EMPTY;TAPE UNIT NOT LOCKED/LOADED;INCORRECT TNR;OUTPUT I/O ERROR, ;INPUT I/O ERROR, ; BLOCK FACTOR ON OUTPUT TOO LARGE; TAPE MARK MISSING;
0x1351d8…13536c Dummy {f00=0x0062, f01=0x0190, f02=»OCK LENGTH ON INPUT;EOF INSIDE SPLITTED RECORD; INPUT VOLUME NAME UNKNOWN;OUTPUT VOLUME NAME UNKNOWN; FILE NAME UNKNOWN;FLEX. DISC ALREADY LOCKED;FLEX. DISC NOT LOCKED;FLEX. DISC WRITE PROTECTED; DATA SET NAME ALREADY USED; DATA SET NAME NOT FOUND;NO IBM DISC FORM
0x13536c…135500 Dummy {f00=0x0062, f01=0x0190, f02=»SECTOR NUMBER;CARD READER NOT OPERABLE; FILE ORG. ERROR;CORE AREA TOO SMALL;RECORD NOT IN FILE-END OF MEDIUM; ILLEGAL POSITION NUMBER;NOT ALLOWED TO MIX DISCSIZES; DU2 DU1 DU4 DU3 MD1 MD2 MD3 MD4 FD1 FD2 FD3 FD4 CD1 CD2 CTOR TOO LARGE; 1VOLUME NAM
0x135500…135694 (3, 96) Opaque[0x194]
0x135694…135828 # DirEnt {nam=»UTIL03«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x0c48, f03=0x0000}
0x135694…135828 IdxSect {
0x135694…135828 f00 = 0x0062 // 0x135694 @0x0
0x135694…135828 f01 = 0x0002 // 0x135696 @0x2
0x135694…135828 gno = [ // 0x135698 @0x4
0x135694…135828 [0x00]: C0x0062.0x1.0
0x135694…135828 ]
0x135694…135828 }
0x135828…1359bc Dummy {f00=0x0062, f01=0x4182, f02=» PASG 2,NO PSCR PLED DUMENT P!!CH $$COPYIT$$DUM1$$ 2 P!!CH $$COPYTI$$DUM2$$ P P!!CH $$IBMLBL$$DUM3$$ n P!!CH $$PRINDX$$DUM4$$ P!!CH $$SCANT$$DUM7$$ P!!CH $$COPYCF$$DUM8$$ P!!CH $$PRFILE$$DUM9$$ P!!CH $
0x1359bc…135b50 Dummy {f00=0x0062, f01=0x2008, f02=» 2,NO PSCR PLED DUMENT P!!CH $$COPYIT$$DUM1$$ 2 P!!CH $$COPYTI$$DUM2$$ P P!!CH $$IBMLBL$$DUM3$$ n P!!CH $$PRINDX$$DUM4$$ P!!CH $$SCANT$$DUM7$$ P!!CH $$COPYCF$$DUM8$$ P!!CH $$PRFILE$$DUM9$$ P!!CH $
0x135b50…135ce4 Dummy {f00=0x0062, f01=0x2121, f02=»CH $$SCANT$$DUM7$$ : P S P S P " X6_b NfR _ P 0 / !!CH $$COPYCF$$DUM8$$ [ [ B@ ^, ^, ' ^, !!CH $$PRFILE$$DUM9$$ %? v t v UU < 3 2P _ 4 , ) !!EN T G.G K.
0x135ce4…135e78 Dummy {f00=0x0062, f01=0x494e, f02=»C CCI N S W P X _ R R "( R ASG 2,LP0F 0 R _ <d?d U ?e R P S ?C/ G O LKE M ' P % =B S t w E M % t R.Q& @ Q R ASG /E0,TY10 & :ch
0x135e78…13600c Dummy {f00=0x0062, f01=0x0190, f02=» _ L 4 , ) T G.G K. A ;A; G. ] S % T S S M % T S L . N 0 P S P S P " P P N S W P X _ R R R " $
0x13600c…1361a0 Dummy {f00=0x0062, f01=0x0190, f02=» B. T P ' " : 6 "? UU t 3 2P _ 4 , 5 T G.G K. A ;A; G. ( ] ] S S S S " :A S S S . N 0 S & N S W P
0x1361a0…136334 (3, 97) Opaque[0x194]
0x136334…1364c8 # DirEnt {nam=»UTIL04«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x0c50, f03=0x0000}
0x136334…1364c8 IdxSect {
0x136334…1364c8 f00 = 0x0062 // 0x136334 @0x0
0x136334…1364c8 f01 = 0x0002 // 0x136336 @0x2
0x136334…1364c8 gno = [ // 0x136338 @0x4
0x136334…1364c8 [0x00]: C0x0062.0x2.0
0x136334…1364c8 ]
0x136334…1364c8 }
0x1364c8…13665c Dummy {f00=0x0062, f01=0x4108, f02=» PASG 2,NO PSCR PLED CCIBUF ( P!!CH $$SRTBUF EQU 0$$SRTBUF EQU 1$$ 2 P!!EN ^ PASM /S j PLED DUMENT x P!!CH $$SORTF$$DUM1$$ P!!EN PASM /S PINC CCI PASG 2,LP0F PLKE M PASG /E0,TY10 @
0x13665c…1367f0 Dummy {f00=0x0062, f01=0x2008, f02=» 2,NO PSCR PLED CCIBUF ( P!!CH $$SRTBUF EQU 0$$SRTBUF EQU 1$$ 2 P!!EN ^ PASM /S j PLED DUMENT x P!!CH $$SORTF$$DUM1$$ P!!EN PASM /S PINC CCI PASG 2,LP0F PLKE M PASG /E0,TY10 @
0x1367f0…136984 Dummy {f00=0x0062, f01=0x406e, f02=» =50 P XIF P* PLENGTH EQU *-CCIBUF $ P* @ P* J P* T P END ^@ jNGTH N P* z PCCIBUF EQU * PU:BUF1 RES 2048 =4 P* PPBLK2 EQU * " PFDBLK EQU *+200 OPEN BLOCK =4 PU:BUF2 RES 774
0x136984…136b18 Dummy {f00=0x0062, f01=0x2008, f02=» P XIF P* PLENGTH EQU *-CCIBUF $ P* @ P* J P* T P END ^@ jNGTH N P* z PCCIBUF EQU * PU:BUF1 RES 2048 =4 P* PPBLK2 EQU * " PFDBLK EQU *+200 OPEN BLOCK =4 PU:BUF2 RES 774
0x136b18…136cac Dummy {f00=0x0062, f01=0x0190, f02=» ^< 2 . fY%w n b ] $ ^ : 9 i $ - w z~4r tV u 3 qC + zuqL $ ) > Pu ZD q c r F~ uL _^ % ;Pl G > # F $ 4` 1F ^-8 T t tB bbTg t z ^ ^ bHPH H ^2 Z ` z
0x136cac…136e40 Dummy {f00=0x0062, 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 @ < R:R: ` J bb ^% bbpH 0~ <d hl|d : x ` ^ D)dH P D >~ `" f >~ $ d p 4d @u { D
0x136e40…136fd4 (3, 98) Opaque[0x194]
0x136fd4…137168 # DirEnt {nam=»UTIL06«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x0c58, f03=0x0000}
0x136fd4…137168 IdxSect {
0x136fd4…137168 f00 = 0x0062 // 0x136fd4 @0x0
0x136fd4…137168 f01 = 0x0002 // 0x136fd6 @0x2
0x136fd4…137168 gno = [ // 0x136fd8 @0x4
0x136fd4…137168 [0x00]: C0x0062.0x3.0
0x136fd4…137168 ]
0x136fd4…137168 }
0x137168…1372fc Dummy {f00=0x0062, f01=0x0190, f02=» PASG 2,NO PSCR PLED CONPAR,/S,## ( P##CH $$TIMER DATA 0$$TIMER DATA 1$$ 8 P##EN d PASM /S,NL p PINC SORTF PINC DMOFF PINC ADDMOD PINC DSUMOD PINC MPYMOD PINC DIVMOD PINC BINACR PINC COMP
0x1372fc…137490 Dummy {f00=0x0062, f01=0x401c, f02=» PASG /E0,TY10 @ PLED CONPAR,/S,## ( P##CH $$TIMER DATA 0$$TIMER DATA 1$$ 8 P##EN d PASM /S,NL p PINC SORTF PINC DMOFF PINC ADDMOD PINC DSUMOD PINC MPYMOD PINC DIVMOD PINC BINACR PINC COMP
0x137490…137624 Dummy {f00=0x0062, f01=0x2008, f02=» /E0,TY10 @ PLED CONPAR,/S,## ( P##CH $$TIMER DATA 0$$TIMER DATA 1$$ 8 P##EN d PASM /S,NL p PINC SORTF PINC DMOFF PINC ADDMOD PINC DSUMOD PINC MPYMOD PINC DIVMOD PINC BINACR PINC COMP
0x137624…1377b8 Dummy {f00=0x0062, f01=0x2a5c, f02=»DATA RSECM* /01 READ WITH NO WAIT * DATA RLTRA* * T A10,ECBCW,A8 =1 DEFRO EQU * 2,A8 =1
0x1377b8…13794c Dummy {f00=0x0062, f01=0x5c4c, f02=»DR* A2,A1 ST A2,LTRACK =4 LD A2,2,A1 ST A2,SEPRTR =4
0x13794c…137ae0 Dummy {f00=0x0062, f01=0x5c53, f02=»T A2,RSECND =4 LD A2,6,A1 =4 B43 =4 ST A2,RSECMX =4 LD A2,8,A1 =4
0x137ae0…137c74 (3, 99) Opaque[0x194]
0x137c74…137e08 # DirEnt {nam=»DUMENT«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0c60, f03=0x0000}
0x137c74…137e08 IdxSect {
0x137c74…137e08 f00 = 0x0063 // 0x137c74 @0x0
0x137c74…137e08 f01 = 0x0002 // 0x137c76 @0x2
0x137c74…137e08 gno = [ // 0x137c78 @0x4
0x137c74…137e08 [0x00]: C0x0063.0x0.0
0x137c74…137e08 ]
0x137c74…137e08 }
0x137e08…137f9c Dummy {f00=0x0063, f01=0x0190, f02=» 2 P IDENT DUMENT REL 10.0 80-03-14 870136641000 * P =10 IPL-EQU' S HAVE MOVED TO DUMEN2 : P* h P* DUMMY ENTRYS FOR LKE r P* $ P ENTRY COPVOL COPY DISC TO DISC , P ENTRY COPFIL COPY FILE TO FILE ON DISCS ( P ENTRY COPYFT COPY DIS
0x137f9c…138130 Dummy {f00=0x0063, f01=0x0190, f02=»OPYIT COPY FILE IBM TO TOSS ( P ENTRY COPYTI COPY FILE TOSS TO IBM $ " P ENTRY IBMLBL WRITE IBM LABELS P $ P ENTRY PRINDX PRINT INDEX TRACK v " P ENTRY BINDEX BUILD INDEX FILE ( P ENTRY RINDEX REORGANIZE INDEX FILE $ P ENTRY COPYCF COPY CARDS
0x138130…1382c4 Dummy {f00=0x0063, f01=0x018e, f02=»C P ENTRY SORTF P* =10 PCOPVOL EQU * . PCOPFIL EQU * B PCOPYFT EQU * V PCOPYTF EQU * j PPRFILE EQU * ~ PSCANT EQU * PCOPYIT EQU * PCOPYTI EQU * PIBMLBL EQU * PCRVOL EQU * PCRFILE EQU *
0x1382c4…138458 Dummy {f00=0x0063, f01=0x4076, f02=» PCOPYCF EQU * PSORTF EQU * P LDKL A1,-5 0 P LDK A2,0 D P RTN A14 V P END f@ r j PPRFILE EQU * ~ PSCANT EQU * PCOPYIT EQU * PCOPYTI EQU * PIBMLBL EQU * PCRVOL EQU * PCRFILE EQU *
0x138458…1385ec Dummy {f00=0x0063, f01=0x2008, f02=» F EQU * P LDKL A1,-5 P LDK A2,0 , P RTN A14 > P END N@ Z * T PPRFILE EQU * h PSCANT EQU * | PCOPYIT EQU * PCOPYTI EQU * PIBMLBL EQU * PCRVOL EQU * PCRFILE EQU * PDLFILE EQU * P
0x1385ec…138780 Dummy {f00=0x0063, f01=0x0190, f02=» A ~ H A v ( $ P P >P P P W _ A n T >FV :A H @ nY H @ nZ >AV W _ _ @ n @ r >BV -W >AV -W >AV B j R _ @ r T T S S S S >T T S S S S @ p - - T A r
0x138780…138914 (3, 100) Opaque[0x194]
0x138914…138aa8 # DirEnt {nam=»UTIL05«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x0c68, f03=0x0000}
0x138914…138aa8 IdxSect {
0x138914…138aa8 f00 = 0x0063 // 0x138914 @0x0
0x138914…138aa8 f01 = 0x0002 // 0x138916 @0x2
0x138914…138aa8 gno = [ // 0x138918 @0x4
0x138914…138aa8 [0x00]: C0x0063.0x1.0
0x138914…138aa8 ]
0x138914…138aa8 }
0x138aa8…138c3c Dummy {f00=0x0063, f01=0x412c, f02=» PSCR PASG 2,NO PLED CCIBUF ( P!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ 2 P!!EN ^ PASM /S,NL j PINC CCI | PINC CCITAB PLED DUMENT P!!DL 4,23 P!!DL 36,55 P!!EN PASM /S,NL PASG 2,LP0F PLKE
0x138c3c…138dd0 Dummy {f00=0x0063, f01=0x2008, f02=» PASG 2,NO PLED CCIBUF ( P!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ 2 P!!EN ^ PASM /S,NL j PINC CCI | PINC CCITAB PLED DUMENT P!!DL 4,23 P!!DL 36,55 P!!EN PASM /S,NL PASG 2,LP0F PLKE
0x138dd0…138f64 Dummy {f00=0x0063, f01=0x0190, f02=»1 Q v P CM EXTNO R ( P CF A14,LOCK LOCK IF FLEXIBLE DISCS R P* R H P EJECT COPVOL CRVOL R R P* R r P* ****** R | P* *TEST* R P* ****** R P* R ( P* COMPARE NAMES IN PBLK AND ON DISC R P* R P* READ VL1 TO BUF1 R P*
0x138f64…1390f8 Dummy {f00=0x0063, f01=0x0190, f02=»N PBLK R x P ADK A3,8 S P LDK A5,3 A5 COUNTER S P* S < PTST010 LDR* A4,A3 S F P CWR* A4,A1 COMPARE ONE WORD S ` P ABL(NE) RTN02 ERROR MESSAGE S P ADK A3,2 S P ADK A1,2 S P SUK A5,1 END? S P RB(P) TST010 NEXT S P* S P A
0x1390f8…13928c Dummy {f00=0x0063, f01=0x018e, f02=»UK A1,26 =4 S P* T . P LC A5,QREORG,A12 GET REORGANIZE PARAMETER T P ANK A5,/FF T P " P ABL(Z) BACKUP NO REORGANIZE? T d P* T P EJECT COPVOL CRVOL T P* T P* READ VL2 TO BUF2 T P* T P CF A14,READ2 T * P LD A2,QBUF2,A12
0x13928c…139420 Dummy {f00=0x0063, f01=0x0190, f02=» T r P ABL(NE) RTN02 ERROR MESSAGE U P ADK A3,2 A3 POINTER IN PBLK U , P ADK A2,2 U P P SUK A5,1 U b P RB(P) TST020 NEXT U t P* U P EJECT COPVOL CRVOL U P* U P* U & P ADK A2,26 POINT TO 'TO' ON DISC2 U P LDR* A4,A2 'TO' T
0x139420…1395b4 (3, 101) Opaque[0x194]
0x1395b4…139748 # DirEnt {nam=»MON02 «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0c70, f03=0x0000}
0x1395b4…139748 IdxSect {
0x1395b4…139748 f00 = 0x0063 // 0x1395b4 @0x0
0x1395b4…139748 f01 = 0x001c // 0x1395b6 @0x2
0x1395b4…139748 gno = [ // 0x1395b8 @0x4
0x1395b4…139748 [0x00]: C0x0063.0x2.0
0x1395b4…139748 [0x01]: C0x0063.0x3.0
0x1395b4…139748 [0x02]: C0x0064.0x0.0
0x1395b4…139748 [0x03]: C0x0064.0x1.0
0x1395b4…139748 [0x04]: C0x0064.0x2.0
0x1395b4…139748 [0x05]: C0x0064.0x3.0
0x1395b4…139748 [0x06]: C0x0065.0x0.0
0x1395b4…139748 [0x07]: C0x0065.0x1.0
0x1395b4…139748 [0x08]: C0x0065.0x2.0
0x1395b4…139748 [0x09]: C0x0065.0x3.0
0x1395b4…139748 [0x0a]: C0x0066.0x0.0
0x1395b4…139748 [0x0b]: C0x0066.0x1.0
0x1395b4…139748 [0x0c]: C0x0066.0x2.0
0x1395b4…139748 [0x0d]: C0x0066.0x3.0
0x1395b4…139748 ]
0x1395b4…139748 }
0x139748…1398dc Dummy {f00=0x0063, f01=0x0190, f02=»x h T L L L L d L L L$`2 L* L L L L L L L L L L L L L L* L L L$`< L L L L! ! L L 2 L L L:2 L L L L L L L L L L L L L L R c @ p z ^ N l8Z8 H N2 Z jq z
0x1398dc…139a70 Dummy {f00=0x0063, f01=0x0190, f02=» 4c r @]g N x d 2Z $"z y wL / y N DlR m 2 &Z iL a [ ? d V% L % "~ T &b 5Cn 1 d _ A H " M, _ @M, > > U # T @ H ( ( P c P W6 @ AM, $ V ( U P @A"V LA"
0x139a70…139c04 Dummy {f00=0x0063, f01=0x0190, f02=» H A Q > ? A H A FQ 2_ A F < Q @ P @ Q @ Z Y _ 8 M6 Q Z P 0 9 _ z $ _, ? _ P H H ? ? ? ? ? ^ A _ _ ^ M* $P T I R $ 5 % > ? W ? W ? T
0x139c04…139d98 Dummy {f00=0x0063, f01=0x0190, f02=» @K T R 0 AK 1 Q Q > > 0 @K 1 AK P P > " ? * X R Y P _ ? @ 8 R Y P _ W0 8 X W( ? ` @ @ P $ H W W > > > > > > @K V ? K > _ > ? _ > > ? ^ ! Y ^ _ R ? JA. ~
0x139d98…139f2c Dummy {f00=0x0063, f01=0x0190, f02=» $ ( , 0 4 8 < C C 8W T 8P Y ^ 5 ) P U MT 4 XT XF Y @ P R T X &P Xh I Y T # C C W4 O " # X Y ) C C x # P Y '? Y
0x139f2c…13a0c0 Dummy {f00=0x0063, f01=0x0190, f02=» 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 F > X B U( H Q2 X D B $ T C
0x13a0c0…13a254 (3, 102) Dummy {f00=0x0063, f01=0x0190, f02=» Q > P _0 # T p > P p (_H _2 B U X F > ? _ X T (@ 2 ^ > > ? _ X T (@ X L U L Q4 M X D P ( X ) 1_f _& ?(@ X P 0P
0x13a254…13a3e8 Dummy {f00=0x0063, f01=0x0190, f02=» ^ X P8 P0 # P T P 0P 1 _ W Y > > ! P C 1"78 &3$ Q P ^ ML A 6 B X T " T A D 7T B # Y B A < P T YF ZJ X T X M A p 2 H < B J J
0x13a3e8…13a57c Dummy {f00=0x0063, f01=0x0190, f02=»_<#/ X T Y P ) Y C C Y A p P8 P )@:b P ) :a P :a P X '? R Q )@ 2 8 8 2 MP A D X T P L " P: A X P ` W Y @ T* P ] D W @ 6 :C _L) @ _ TP _ Y
0x13a57c…13a710 Dummy {f00=0x0063, f01=0x0190, f02=» A z A _0 _ _8 _< _@ _D _H A H ?M P: A PbQ* ? A z @ 6 T M -W ,E A A > > >M A _ A > ? ;I C X "A _> A A A A MT # X& TT X T X:EV W X T Y `:DV X Qx X:EVp W "
0x13a710…13a8a4 Dummy {f00=0x0063, f01=0x0190, f02=» " Y A p P P )@:b P ) :a P :a P X '? R Q )@ 2 8 8 2 A X T " P A X P W Y @ T ] D W @ 6 :C _L) @ _ P _ Y
0x13a8a4…13aa38 Dummy {f00=0x0063, f01=0x0190, f02=» A A _0 _ _8 _< _@ _D _H A H ?M P A P Q ? A z @ 6 T M -W ,E A A > > >M A _ A > ? ;I C X "A _> A A A A # X& TT X T X:EV W X Q }P ML A X " :B
0x13aa38…13abcc Dummy {f00=0x0063, f01=0x0190, f02=» T } B X T # T 4 ^ ( ) W 4# T _$ H R4 ( X _ X P < R0< Q B ^ ! P Q ! ! R ! A _ < 0' 9H 1 P & Q _J ! Q ; V )Wv ! ! Rj! A _$ B 9 I ! ) ! rWT ) ! TR ! WH
0x13abcc…13ad60 Dummy {f00=0x0063, f01=0x0190, f02=» P :b P ) :b P X ' R Q )@ MP? A A @x b MT @ @ A _r A ! 9 R 9 4 A X A @x MT @ @ @ A _< " 0 s t W4 @ _ W( W$ AW QW @W !W W _4 ` 9 @ T"A P S R B B 4 A
0x13ad60…13aef4 (3, 103) Dummy {f00=0x0064, f01=0x0190, f02=» ? Y 9 @ P 1 A @ T @x 1 MT A H 9 R ! @ MP ?b ! H R` ! ( r ( ! ! 9 Z 9 V A ! T8 @ ( )T Q R ! _ R ! _ ! T 9 V H ; R @ ( "13478? n `
0x13aef4…13b088 Dummy {f00=0x0064, f01=0x0190, f02=» U P R U ML ! ! W ! 8 Q ! ^ B Z P C ! " B P $$ R % C ! ^_, Y *X Y (P. Y )P( $ P 0R Q W R ?U C ! ^_f Y (P Y ) _ ^ _ ! P: B L # +P Y , ! ( U _ X T _ W ! ( Y ! X
0x13b088…13b21c Dummy {f00=0x0064, f01=0x0190, f02=»R X X ' " P ! X , _V MP A H ? X R> 8 J P X ' Q 8 J " W~ C U X Y , Y MP 8 J P: 8 B W0 B W B W B @ T 8 T Y Y Y Y MT Y . ! " X ._B B 1 4 X X X X ' 4 B
0x13b21c…13b3b0 Dummy {f00=0x0064, f01=0x0190, f02=» U P R U ! ! W ! Q ! B Z P C ! B P $$ R % C ! _, Y *X Y (P Y ) P 0R Q W R ?U C ! _f Y (P Y ) _ ^ _ ! P B L # +P Y , ! U _ X T _ W ! Y ! X
0x13b3b0…13b544 Dummy {f00=0x0064, f01=0x0190, f02=»R X X ' " P ! X , _V A H ? X R> 8 J P X ' Q 8 J " W~ C U X Y , Y Y " Y H X Qj p "9 ! :a ! r Lh T8 C Y Y F !"r T X $ Y L& Y F "j "j P P P P P ML
0x13b544…13b6d8 Dummy {f00=0x0064, f01=0x0190, f02=» > B " ! 9FR P "j B X # B Z H V^ H VY H ^ P B 9 Y r Y tR4P 9 Y t ! > W" ! > H R T ! > WJ ! > @WB ! > U ! > ! > _ P Q R" ! > W ! > ! > @W ! > ! > X ' T: X rP Q C X t 8 9 ! >@ 9 C
0x13b6d8…13b86c Dummy {f00=0x0064, f01=0x0190, f02=» ! h H RT RdW I R ! h ! 9 R ! 9 R Y " ! h I R W` ! h t 9BV( ! X r !! ! T6 @ r ! h H R P H R;E Y ! X Y H ! X ! ! P Y " "B ! h H R @ X $ P t R::AR~ P Y H ! t $ <A" :E ! ! h H R A Y H ! ZWz ! h H R X
0x13b86c…13ba00 Dummy {f00=0x0064, f01=0x0190, f02=» t " :A C :a X ! r U 4 ! h ! P t :AV rW X " P X 9 :A !! ! P Y " FW: 8 T " T 9_ ! h ! P ! ! ! P Y " ! "B 4 X ;F 8 X P^ ! h ! P ! ! ! P Y " "X X HT$ X P _ X X L ^ W :A H W
0x13ba00…13bb94 (3, 104) Dummy {f00=0x0064, f01=0x0190, f02=» 8 H R" P # ;B 4 X " 4 Y 8 9 Y Y :c Y 4 8 X HP T X :F Y 4 X P* X X P _ X X I ^ W :A I Y 4 H R;C+ W( W$ W X HT X :AW r9 q r Y @ T M Q J ": Y Y MT ? # p Y Y F @ T Y ! !
0x13bb94…13bd28 Dummy {f00=0x0064, f01=0x0190, f02=» # 0P -_ @x! _ # A# Y Y F p _ A H ? # I F 9AZL9a P D ) X FV # T> X X X 4 Y W( x n?AR X $' T C C X "P MT ! ! T 9 ! h I R Y H ! ! ! Tr r X FP L @ TOT2 @ 1T( @ M # "
0x13bd28…13bebc Dummy {f00=0x0064, f01=0x0190, f02=» C C C C # T 1 WP B B PD P ML V - 0 P A$ # +T W Q P P 1 !$, T V C B Q 1 MT Y Y Y @ r t @
0x13bebc…13c050 Dummy {f00=0x0064, f01=0x0190, f02=» $ _ $ Y Y _ A H ? I F 9AZL9a P D ) X V # T X X X 4 Y W x ?AR X $' T C C X P % Lh 9 !)~! Tp 9 !+ X $ Y L& ) X Y $ 9 X L%b Y X N Y !,
0x13c050…13c1e4 Dummy {f00=0x0064, f01=0x0190, f02=» Y B Y ""0 Y V Y Y Y X X T V" X R # ;b9B Y Y ) Y X !? PZ P PR P !+ X P - _ X x ^ Y X P !,6 !)~ P @ 9W@ !+ X P - Y !) X P X !, X P X - _ X p
0x13c1e4…13c378 Dummy {f00=0x0064, f01=0x0190, f02=» p !- !,X h !- ( !,X ` !- 9 X Y P ) 9 " !) _ # - 4 !, PR C !, !) !(f(@ !, R _ !, -f 1 ;h 1 !, 1 !, * !)~ !(f !, ) !) # X Y P_ P P !, P @ 9 4 Lh ) !, P X 1P B % +PV T (
0x13c378…13c50c Dummy {f00=0x0064, f01=0x0190, f02=» D - x ^ !+ !,6 !)~ P @ 9 !, T ) C W ML X !- ( - p !- ) Wf W Y V Y R Y T Y H @ TLB SLWF Y 8! T6 X Y X C X U X Y R V Y &D W 8 MT Y _ ? / Y Y X LP y L_* L @x*" _: Y L
0x13c50c…13c6a0 Dummy {f00=0x0064, f01=0x0190, f02=» # P Y P:A , Y ) Y J X $ Y C '? % X " Y _ A H ? / (@ X R X T K P0 @ T X VT $C Y B MTK & % Y B K X H :AZl X JP Y J ! P + 7P, $ P + < $ <C ! 9 9 4 X 9C X : X X 4 B :C
0x13c6a0…13c834 (3, 105) Dummy {f00=0x0064, f01=0x0190, f02=» L 4 - (@ 0! D> 1 Y W (@ - 0! D? ]- Y - 4 !, ;E :B 9A !, U -fP jW kQ 4 9 ' 0" Z Y P Z _ 4 A) ;D A) 4 R _ ;H 4 x !- (:C - 4 ` !- ( 4 X " 4 !- ) 4
0x13c834…13c9c8 Dummy {f00=0x0064, f01=0x0190, f02=» # P Y :A , Y ) Y X $ Y C '? % X " Y _ A H ? (@ X X K P @ T X T $C Y B K & % Y B K X :AZl X P Y ! P + 7P $ P + < $ <C ! 9 9 4 X 9C X : X X 4 B :C
0x13c9c8…13cb5c Dummy {f00=0x0064, f01=0x0190, f02=» 4 (@ 0 %j / / $(,0 !%)-1 "&*.2 #'+/3 X Y $ M P Z
0x13cb5c…13ccf0 Dummy {f00=0x0064, f01=0x0190, f02=» P ]( 1 ^B _ Y J @ Y F B P ! T B R Y P A3 S [hU 1 B Y H h Y :B X LP Y N Y L 4R 4 @ D/ : V V 49B Y J X NP !1 P C W Y N !1 P C W Y J T X JT C Y PPT Y H Y X L X
0x13ccf0…13ce84 Dummy {f00=0x0064, f01=0x0190, f02=» 0 X L M Q Z MT Y _ Y L Y L !1 ! T Y F LR Y H Y J !1 X L M Q Z Y 4 ? 3 Y @ T" 3 0P -_r @x2 _| 3 A3 " Y !2 X ] Y X X $ Y '? 0 ? 3 I : V :c X V X X X
0x13ce84…13d018 Dummy {f00=0x0064, f01=0x0190, f02=» 5~ _ Y @ Y B P ! T B R Y A S [hU B Y h Y :B X P Y Y 4R 4 @ D/ : V V 49B Y X P ! P C W Y ! P C W Y T X T C Y P Y Y X X
0x13d018…13d1ac Dummy {f00=0x0064, f01=0x0190, f02=» 0 X Q Y _ Y Y !1 ! T Y Y Y !1 X Q Y 4 ? Y @ T 0P -_r _| A " X * Y , Lh T C Y " !:h! T L& Y "W T PP PJ PH PB P ML 9~ Y J !7 W !7
0x13d1ac…13d340 Dummy {f00=0x0064, f01=0x0190, f02=» Y B !9@' P X D PJ X D T X X @P Y !7D !7 X ! P !7 !8 X >P !9> X D J X : Y X B Y Y D !7 Y !8 Y X > ^ X " P$ X Y : X Y B !8 !7 !8 X > ^ P, !9>_ !7D !8 Y D X >P ^ !9> !7D !8 9l !8 Y Y b !7 ! PX Y
0x13d340…13d4d4 (3, 106) Dummy {f00=0x0064, f01=0x0190, f02=» , _ 4 8 Y b_ JW LW NW b Y @ T M Q F 9 Y MT Y " b 3~ X D; Y "P0;AV X T X ::A9 1 _* @ 1_8 Y n Y d Y X @ s Y b ; V 9E Y b; M P rP( Q r Y J !7 ! P Y , P !7 ! X
0x13d4d4…13d668 Dummy {f00=0x0064, f01=0x0190, f02=»R P P R ;a;a Y D 4 M Q r X , X *P Y * MT Y _ ? : Y " Y @ T Y !7 ! TH Y !7 ! T: Y !:h Y !:h Y Y " Xf X $ Y '? C 5~ @: P$_| : 0P -_ @x: _ : A: Y Y " _n A H ? : I :AZN P ) !
0x13d668…13d7fc Dummy {f00=0x0064, f01=0x0190, f02=» M Q r 4 3z ;^ B B " " " " * P < Y ; V 9E Y ; P P Q Y !7 ! P Y P !7 ! X
0x13d7fc…13d990 Dummy {f00=0x0064, f01=0x0190, f02=» X $ " P MT Y B Y Y Pt ;tt @ *C X. _6 ? >" X Z> A>H_J A H ? >" X ;t(@ 4 W I X 4 ;DR Q B = = ;AY B U Y $ = C T Q P &W -W /W A< ;AY A< Q` @< V8 D=8 @< R $W =>=H=RAB
0x13d990…13db24 Dummy {f00=0x0064, f01=0x0190, f02=» W = = = [.<(+^!$*);] ,%_>? Y $ ? @>HTD X 1 PR, B T X 0 :ET P OFT Y $ < Y < M. ;p >J >V P Y ; V 9E Y ; P P Q Y !7 ! P
0x13db24…13dcb8 Dummy {f00=0x0064, f01=0x0190, f02=» abcdefghi[.<(+!&jklmnopqr]$*);^-/stuvwxyz|,%_>?0123456789:#@'=" ABCDEFGHI[.<(+!&JKLMNOPQR]$*);^-/STUVWXYZ|,%_>?0123456789:#@'= 7- <=2&p ?' @O {[lP}M] Nk`Ka z^L~no| J Z_m j TOSS T
0x13dcb8…13de4c Dummy {f00=0x0064, f01=0x0190, f02=» 1 A _ P 9 > > T R L U R9C _ T M D W. D D " @ @ - U _ 9B @ T u X > " <M M@M MT@,M @ NTN O Aj Pn $" P E ` B (@ $ : ' P W @ D P _ A AD U MT
0x13de4c…13dfe0 Dummy {f00=0x0064, f01=0x0190, f02=» : X @ X F D : M, ( H > D JW 0P Q P P E EP W : X E d X J 1 Y J(@ : J 4W 0P< R Q P W R T D E Q , 0 5 @K 1 AK ZB : D LW (P D E I W6 @r<T R ( Ar< U 1_ D E I D L ) E
0x13dfe0…13e174 (3, 107) Dummy {f00=0x0065, f01=0x0190, f02=» C D > C B P. T G W B I X "? T _$ : X X < X > ! # X `=H C n~W C C C X %? : C X @_" P @M, Q (@ DN @ @M, Q (@ : U ; $ T $ T $ T&x : : $ T2 $ ) ] $ ) Y _$ U x
0x13e174…13e308 Dummy {f00=0x0065, f01=0x0190, f02=»U $ ) Y _& (# )_4 $ ($ ) YR_L U p 0_8 $_<W : X d X 1 Y #A 1 E F 5 @ 1 A ZB : D W (P D I W @ T R ( A U 1_ D I D >
0x13e308…13e49c Dummy {f00=0x0065, f01=0x0190, f02=» Y M ,P :A M( AM( >W B I X "? T _$ : X X X ! # X =H C W C C C X %? : E Ez T M F E Px ' IV H ! JT AEv J P< K P& 8! P6 K @P X T X !? ? H W
0x13e49c…13e630 Dummy {f00=0x0065, f01=0x0190, f02=» P dW Y Y " V V T Y " Y $ K` P(_t d(@ - $T 1 %_" Y (_ @Ev 0P $P X X $ $P, # ' P @T #?W #?$? G _2 J @" P Y 9 @ J ! T " Y X & $ ' JL! JT K P C P*
0x13e630…13e7c4 Dummy {f00=0x0065, f01=0x0190, f02=» % Y Y V + V K V K : V K < V K A V % K C V & K D X P K @ X 9AV K 9 !? K > F K & G K R J K N ! N P N & N T _ - M @ F Pp G M2 _ W C ( B P U
0x13e7c4…13e958 Dummy {f00=0x0065, f01=0x0190, f02=» 8X 8 , Y $ : _ & O (@ T X " C X KN V P K`_ : C J^ @F @F< F J^ F V )$ T B * Y $ : & $ Y : @ P0 8 T _ & & Y " 4 : : $ - Y : ~ v R) $P<~!62V
0x13e958…13eaec Dummy {f00=0x0065, f01=0x0190, f02=» ^ WB X Y $:g H & I &! P& X M M(P ,P 9A _ H &P I & > LR P Y M X"; [&;! P &Z.?AZ2 @M( Q & X " $XJ ( I T E _ (X _ X $ _tEz > > @M, AM, DW W ^ ! Z2 M* (X:
0x13eaec…13ec80 Dummy {f00=0x0065, f01=0x0190, f02=»MT Pj T P` MF <UR "R4 PB X R< X T6 X T0. T G Y6 G _` P ,P - _ D < ? < ? <(@ N $ P B $ 9H C ">h # P >_2 < U = D (@ " $ P B >H<h O P ?_" = > =
0x13ec80…13ee14 (3, 108) Dummy {f00=0x0065, f01=0x0190, f02=» B B T P* & T$ L L R Q U , , _D , V :a B # S0 S0 Q Z8 Z< P X @ _6 _6 " " P2 @ Q, , Y ," P L P T L R :AV ' > _ QpQpQ(Q(Q Q Q(Q Q Q(Q Q(R Q(Q R:
0x13ee14…13efa8 Dummy {f00=0x0065, f01=0x0190, f02=» Pj T P . (@ @ D X P _ Y E X T X `% T UP P ^ SV=A Y PnT P B H I TP8 I $ C C SV T X?j Rd Q ?j R W _l X # Xt X F# T R R _ Q _ X # X X F# P
0x13efa8…13f13c Dummy {f00=0x0065, f01=0x0190, f02=»" A Pn Q X G X HT T W| Y H H S W W B B B SRW. Y X G X H S W W B B $ T _ C C W B B X R B@ Rd C& Tf #D X ! V( X ] P$ H P$ X " ]r P _ r, T R ol MT
0x13f13c…13f2d0 Dummy {f00=0x0065, f01=0x0190, f02=» Q - _ - > P . (@ @ D X P _ Y E X T X `% T UP P ^ =A Y PnT P B H I TP8 I $ C C T X?j ?j W _l X # Xt X F# T _ Q _ X # X X F# P
0x13f2d0…13f464 Dummy {f00=0x0065, f01=0x0190, f02=»" A Pn Q X G X HT T W| Y H H S W W B B B SRW. Y X G X H S W W B B $ T _ C C W B B X R B@ Rd C& Tf #D X ! V( X ] P$ H P$ X " ] P _ T R MT
0x13f464…13f5f8 Dummy {f00=0x0065, f01=0x0190, f02=» Pj T P . (@ @ D X P _ Y E X T X `% T UP P ^ =A Y PnT P B H I TP8 I $ C C T X?j ?j W _l X # Xt X F# T _ Q _ X # X X F# P
0x13f5f8…13f78c Dummy {f00=0x0065, f01=0x0190, f02=»" A Pn Q X G X HT T W| Y H H S W W B B B SRW. Y X G X H S W W B B $ T _ C C W B B X R B@ Rd C& Tf #D X ! V( X ] P$ H P$ X " ] P _ T R MT
0x13f78c…13f920 Dummy {f00=0x0065, f01=0x0190, f02=» Pj T P . (@ @ D X P _ Y E X T X `% T UP P ^ =A Y PnT P B H I TP8 I $ C C T X?j ?j W _l X # Xt X F# T _ Q _ X # X X F# P
0x13f920…13fab4 (3, 109) Dummy {f00=0x0065, f01=0x0190, f02=»" A Pn Q X G X HT T W| Y H H S W W B B B SRW. Y X G X H S W W B B $ T _ C C W B B X R B@ Rd C& Tf #D X ! V( X ] P$ H P$ X " ] P _ T R MT
0x13fab4…13fc48 Dummy {f00=0x0065, f01=0x0190, f02=» Pj T P . (@ @ D X P _ Y E X T X `% T UP P ^ =A Y PnT P B H I TP8 I $ C C T X?j ?j W _l X # Xt X F# T _ Q _ X # X X F# P
0x13fc48…13fddc Dummy {f00=0x0065, f01=0x0190, f02=»" A Pn Q X G X HT T W| Y H H S W W B B B SRW. Y X G X H S W W B B $ T _ C C W B B X R B@ Rd C& Tf #D X ! V( X ] P$ H P$ X " ] P _ T R MT
0x13fddc…13ff70 Dummy {f00=0x0065, f01=0x0190, f02=» Pj T P . (@ @ D X P _ Y E X T X `% T UP P ^ =A Y PnT P B H I TP8 I $ C C T X?j ?j W _l X # Xt X F# T _ Q _ X # X X F# P
0x13ff70…140104 Dummy {f00=0x0065, f01=0x0190, f02=»" A Pn Q X G X HT T W| Y H H S W W B B B SRW. Y X G X H S W W B B $ T _ C C W B B X R B@ Rd C& Tf #D X ! V( X ] P$ H P$ X " ] P _ T R MT
0x140104…140298 Dummy {f00=0x0065, f01=0x0190, f02=» Pj T P . (@ @ D X P _ Y E X T X `% T UP P ^ =A Y PnT P B H I TP8 I $ C C T X?j ?j W _l X # Xt X F# T _ Q _ X # X X F# P
0x140298…14042c Dummy {f00=0x0065, f01=0x0190, f02=»" A Pn Q X G X HT T W| Y H H S W W B B B SRW. Y X G X H S W W B B $ T _ C C W B B X R B@ Rd C& Tf #D X ! V( X ] P$ H P$ X " ] P _ T R MT
0x14042c…1405c0 Dummy {f00=0x0065, f01=0x0190, f02=» Pj T P S` @ D X P _ Y E X T X `% T UP P ^ =A Y PnT P B H I TP8 I $ C C T X?j ?j W _l X # Xt X F# T _ Q _ X # X X F# P
0x1405c0…140754 (3, 110) Dummy {f00=0x0065, f01=0x0190, f02=»" A Pn Q X G X HT T W| Y H H S W W B B B SRW. Y X G X H S W W B B $ T _ C C W B B X R B@ Rd C& Tf #D X ! V( X ] P$ H P$ X " ] P _ T R MT
0x140754…1408e8 Dummy {f00=0x0065, f01=0x0190, f02=» Pj T P @ D X P _ Y E X T X `% T UP P ^ =A Y PnT P B H I TP8 I $ C C T X?j ?j W _l X # Xt X F# T _ Q _ X # X X F# P
0x1408e8…140a7c Dummy {f00=0x0065, f01=0x0190, f02=»" A Pn Q X G X HT T W| Y H H S W W B B B SRW. Y X G X H S W W B B $ T _ C C W B B X R B@ Rd C& Tf #D X ! V( X ] P$ H P$ X " ] P _ T R MT
0x140a7c…140c10 Dummy {f00=0x0065, f01=0x0190, f02=» Pj T P @ D X P _ Y E X T X `% T UP P ^ =A Y PnT P B H I TP8 I $ C C T X?j ?j W _l X # Xt X F# T _ Q _ X # X X F# P
0x140c10…140da4 Dummy {f00=0x0065, f01=0x0190, f02=»" A Pn Q X G X HT T W| Y H H S W W B B B SRW. Y X G X H S W W B B $ T _ C C W B B X R B@ Rd C& Tf #D X ! V( X ] P$ H P$ X " ] P _ T R MT
0x140da4…140f38 Dummy {f00=0x0065, f01=0x0190, f02=» Pj T P @ D X P _ Y E X T X `% T @S , L T" L P ?A M L T L T M W L T L T M M L Q L AS^ @S Z @S^ P % P % T W R [ [ M M M M AS -(@ : - : @S ,
0x140f38…1410cc Dummy {f00=0x0065, f01=0x0190, f02=»Q D HU q Y . C R8 L ' PN M ' T> L C L C ( C q o _z ( C q B W Y C X '? oH X @ X B )T P T0 X ! T(W" q P F X BU X B G B qx F S W G G F F B@ q&
0x1410cc…141260 Dummy {f00=0x0065, f01=0x0190, f02=» qVW W E AD q X B X @ F X D( + X R ( C TzW Y B F F D '? P2 P, P< T V K K W K K D $ P B@ T BjW E G E H_ X # T B o X R (@(
0x141260…1413f4 (3, 111) Dummy {f00=0x0066, f01=0x0190, f02=» ' T L C L C ( C o _z ( C B W Y C X '? oH X @ X B )T P T X J F& Ar Rl P RP L <a Qrv_ r J " T # T W 0T # P P R I
0x1413f4…141588 Dummy {f00=0x0066, f01=0x0190, f02=»PJ _ W & P & B I - G wj W _* _ # ( C G r T @r Yf?A W ' Pn u ^ S G F > P2 J # " N # N F @r ~ @r R O u b . R ] ._ @r O F O B F O D @r O F F
0x141588…14171c Dummy {f00=0x0066, f01=0x0190, f02=» N B :h! P O `:G tH R r u W N F" P G G @rv G N :n G V V N `& xl tD N D' xF W W ^2 : J P U Q P J D A u r PnTZ R Tr X r R A _ j " Ar| J A
0x14171c…1418b0 Dummy {f00=0x0066, f01=0x0190, f02=» C o B I I I F RD P RP P L G H r Ur <a Qrv Qr|<B r r _H Ar| J " " q V q Rr|" P J A P Pn Q ?A r PB B (@ N %? T* N J S0 L 4 5W P 0 @r< 1 Ar<(@_ . r
0x1418b0…141a44 Dummy {f00=0x0066, f01=0x0190, f02=»Q R P ;A [ [ : ($SWAP A A A A A. UU @ @ ! P$>B @ A @ E D P _ $ % $P _ % A >f A A A @ " Q" x :d @ # U R>P0 P J A J
0x141a44…141bd8 Dummy {f00=0x0066, f01=0x0190, f02=» A @ : V, @ P ;b=H : { F { W =J : R F P W W @ $ P @ R| W W 2R" W W V V 8 !RRT W V X W W V V V PF A @ 2U U^ A Q
0x141bd8…141d6c Dummy {f00=0x0066, f01=0x0190, f02=» Y P @ 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 @
0x141d6c…141f00 Dummy {f00=0x0066, f01=0x0190, f02=» 9h !RRP V V } W _> V V PZ W @ @ ! T _ P :l 9b ) V _ @ V^ W A A n W W J J PH W> J T
0x141f00…142094 (3, 112) Dummy {f00=0x0066, f01=0x0190, f02=» Z Z V 00P& Z Z_0 Z V 00P Z_ 0 !TTX W A~ !CCT CC A _ 0 !;; Z_ S A g A . @ R @ ! T A A @x V V I W V $ ) H
0x142094…142228 Dummy {f00=0x0066, f01=0x0190, f02=» : 0 !TTT 0 !;;T : W W 0 !99Q P !00R P 00W 11 A ( P.=H_, !11R T$ 0 !LLP !RRP !AAP !SSP W W W 0 !;;T~ : 0 !00Rr !99U !AARf !ZZQ` 0 !;;TR : : : : : : : 0 )T : !00T
0x142228…1423bc Dummy {f00=0x0066, f01=0x0190, f02=» :A K : A T.I T P 1 I P < R P A _> : @ " P P yb A A $ A L A PW ^ Ax A A A A A A A 4 A J : 9e :e Q P 9e @x P Ax 9C) A I " @x ! P " :B Ax
0x1423bc…142550 Dummy {f00=0x0066, f01=0x0190, f02=»x t w B J " r R,Q$ @ ( = @x Q @x "| _@ _$ : A H A L A A . A A A 4 A J : h:B* Ax @x P Ax B J 4R 4 :B 4 @x : V V 49B @x 4R @ t w A I ! j : A A A 4 A J A ! T
0x142550…1426e4 Dummy {f00=0x0066, f01=0x0190, f02=» 4 J 9PJ S Y T@ $ 1T: C !CCTr : 1P P$_ P =H P 0 @ T X W n : YX d C !CCTx xB. <X B.9 Hx Q _ _ !SSTF 0 Ux P A X X W W X X S W W W :
0x1426e4…142878 Dummy {f00=0x0066, f01=0x0190, f02=» A 4 _ 0V , - P X 9A_ : @ ! P (W ( :W> 2 W 0 . " A A A A A 2 ; Z [ : : [ [ : @
0x142878…142a0c Dummy {f00=0x0066, f01=0x0190, f02=» R $ )_ : V W 0 : W ; V : : , X G : J @ 0 V @ 0 H W : V ) V v : @ 9B A 9n A @ A A A. @ @ W < H A : A
0x142a0c…142ba0 Dummy {f00=0x0066, f01=0x0190, f02=» _ ZY QY : @ V H W z W | CRPp ? ? > W ` V @ @ P 1_ R 8 _ v V @ A x R P W r W @ @ % V , P@ , -
0x142ba0…142d34 (3, 113) Dummy {f00=0x0066, f01=0x0190, f02=» . !TTP @ T Y J !TTX" A 9 A : ` @ V :a @ B @ A @ B;a P$ W @ A @ T A : K ` @ P _ 3 S S V V W @ @ T : P S S
0x142d34…142ec8 Dummy {f00=0x0066, f01=0x0190, f02=»RRP @ ! T W* H @ S W @ U 3 S H S Yd @ @ T : @ @ @ #D# P ; V * _ : @ " P @ P 3 _ @ " P V 3 S 1 S 9J S ( 3 ( 9B @ @
0x142ec8…14305c Dummy {f00=0x0066, f01=0x0190, f02=» 0 W | ( @ % 5 T W @ = V W = V P0 r " U _2 P0 " U _2 V tP 2R S ( V | S =J @ " S V
0x14305c…1431f0 Dummy {f00=0x0066, f01=0x0190, f02=»P V W t * P r _ Pd W p V 8 8 4 D P$ @ # P H I K T + Y@ V p _f V t Y J !TTX @ @ T : W % @ P _
0x1431f0…143384 Dummy {f00=0x0066, f01=0x0190, f02=» 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 Yv J !TTX @ @ T : J !TTX !CCTr P, V r 4 U
0x143384…143518 Dummy {f00=0x0066, f01=0x0190, f02=» 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& @ @ @ % P V 4 4 4 _r @ @ T
0x143518…1436ac Dummy {f00=0x0066, f01=0x0190, f02=» W >b & 8P V x V W R 9 W D ) $ PV D L Tp D &P V ` T @ 1 Q a 0 I , I . $# P8 V -W( W" D V ` T @ 1 Q a : @ % PD H I H T P( H U V
0x1436ac…143840 Dummy {f00=0x0066, f01=0x0190, f02=» : V Q R $ F !LLT # W ;I # ;b W ;a WR# T W W,# T W W # T W W W R _ $ W : Y Z L @L T AL V W Y0 Z6 L @L T AL V >A 8T 9 0 1 8 $; # V
0x143840…1439d4 (3, 114) Dummy {f00=0x0066, f01=0x0190, f02=» *_ *T P$ _ .P _ / V z U Y$ P W | V z 3 % W P _ V |P V v ]K W v P _ @L P V AL (P ) @L @L P V AL (P ) @L @ @ T : N =H N
0x1439d4…143b68 Dummy {f00=0x0066, f01=0x0190, f02=» @ ! P (W ( : 00=H 00 P P _ _ : P j f @ R @ $ D L * A CRT M " p 0 $ Pn >" q Pn Pn : 3 3 3 3 : : # # # # / / /
0x143b68…143cfc Dummy {f00=0x0066, f01=0x0190, f02=» L P T L R :AV ' > _ @ > <=2&p ?' @O {[lP}M] Nk`Ka z^L~no| J Z_m j TOSS T 5 5 5 5 5 5 _
0x143cfc…143e90 Dummy {f00=0x0066, f01=0x0190, f02=» = h (@ " B 6 P ?_ = > = > = =_: R _ 00 > & <h$ P > " 2 P P P P P P T P B B T P & T L L R Q U V , , " _L , S V :a
0x143e90…144024 Dummy {f00=0x0066, f01=0x0190, f02=» L P T L R :AV ' > _ @ > <=2&p ?' @O {[lP}M] Nk`Ka z^L~no| J Z_m j TOSS T 5 5 5 5 5 5 _
0x144024…1441b8 Dummy {f00=0x0066, f01=0x0190, f02=» = h (@ " B 6 P ?_ = > = > = =_: R _ 00 > & <h$ P > " 2 P P P P P P T P B B T P & T L L R Q U V , , " _L , S V :a
0x1441b8…14434c Dummy {f00=0x0066, f01=0x0190, f02=» L P T L R :AV ' > _ @ > <=2&p ?' @O {[lP}M] Nk`Ka J | J Z_m j TOSS T 5 5 5 5 5 5 _
0x14434c…1444e0 Dummy {f00=0x0066, f01=0x0190, f02=» = h (@ " B 6 P ?_ = > = > = =_: R _ 00 > & <h$ P > " 2 P P P P P P T P B B T P & T L L R Q U V , , " _L , S V :a
0x1444e0…144674 (3, 115) Opaque[0x194]
0x144674…144808 # DirEnt {nam=»/OBJCT«, typ=»OB«, f00=0x0000, f01=0x0000, f02=0x0ce0, f03=0x0000}
0x144674…144808 IdxSect {
0x144674…144808 f00 = 0x0067 // 0x144674 @0x0
0x144674…144808 f01 = 0x0058 // 0x144676 @0x2
0x144674…144808 gno = [ // 0x144678 @0x4
0x144674…144808 [0x00]: C0x0067.0x0.0
0x144674…144808 [0x01]: C0x0067.0x1.0
0x144674…144808 [0x02]: C0x0067.0x2.0
0x144674…144808 [0x03]: C0x0067.0x3.0
0x144674…144808 [0x04]: C0x0068.0x0.0
0x144674…144808 [0x05]: C0x0068.0x1.0
0x144674…144808 [0x06]: C0x0068.0x2.0
0x144674…144808 [0x07]: C0x0068.0x3.0
0x144674…144808 [0x08]: C0x0069.0x0.0
0x144674…144808 [0x09]: C0x0069.0x1.0
0x144674…144808 [0x0a]: C0x0069.0x2.0
0x144674…144808 [0x0b]: C0x0069.0x3.0
0x144674…144808 [0x0c]: C0x006a.0x0.0
0x144674…144808 [0x0d]: C0x006a.0x1.0
0x144674…144808 [0x0e]: C0x006a.0x2.0
0x144674…144808 [0x0f]: C0x006a.0x3.0
0x144674…144808 [0x10]: C0x006b.0x0.0
0x144674…144808 [0x11]: C0x006b.0x1.0
0x144674…144808 [0x12]: C0x006b.0x2.0
0x144674…144808 [0x13]: C0x006b.0x3.0
0x144674…144808 [0x14]: C0x006c.0x0.0
0x144674…144808 [0x15]: C0x006c.0x1.0
0x144674…144808 [0x16]: C0x006c.0x2.0
0x144674…144808 [0x17]: C0x006c.0x3.0
0x144674…144808 [0x18]: C0x006d.0x0.0
0x144674…144808 [0x19]: C0x006d.0x1.0
0x144674…144808 [0x1a]: C0x006d.0x2.0
0x144674…144808 [0x1b]: C0x006d.0x3.0
0x144674…144808 [0x1c]: C0x006e.0x0.0
0x144674…144808 [0x1d]: C0x006e.0x1.0
0x144674…144808 [0x1e]: C0x006e.0x2.0
0x144674…144808 [0x1f]: C0x006e.0x3.0
0x144674…144808 [0x20]: C0x006f.0x0.0
0x144674…144808 [0x21]: C0x006f.0x1.0
0x144674…144808 [0x22]: C0x006f.0x2.0
0x144674…144808 [0x23]: C0x006f.0x3.0
0x144674…144808 [0x24]: C0x0070.0x0.0
0x144674…144808 [0x25]: C0x0070.0x1.0
0x144674…144808 [0x26]: C0x0070.0x2.0
0x144674…144808 [0x27]: C0x0070.0x3.0
0x144674…144808 [0x28]: C0x0071.0x0.0
0x144674…144808 [0x29]: C0x0071.0x1.0
0x144674…144808 [0x2a]: C0x0071.0x2.0
0x144674…144808 [0x2b]: C0x0071.0x3.0
0x144674…144808 ]
0x144674…144808 }
0x144808…14499c Dummy {f00=0x0067, f01=0x0190, f02=» > @ IDENT CCI REL 10.0 80-03-14 870136641000 F B REBUF BINRES CCIUTI HTBCON DTBCON ECBBA ECBRL ECBEL EFFLEN F > : ECBRC ECBCW PBLK WRINER READAN CCIERR CCIHFI WRITT ECBBA ECBRL ECBEL
0x14499c…144b30 Dummy {f00=0x0067, f01=0x0190, f02=»:BUF2 ( $ P ,* # + RC: 0 CCIUTI : BINRES ^ N EFFLEN d b , ( ] END OF ;PROGRAM AB v CCFCT READAN CCCCT , ( } $ORTED BY OPERATOR; T T > ,
0x144b30…144cc4 Dummy {f00=0x0067, f01=0x0190, f02=» [ B : $ ! | , ( $ ; P I =Z I WRINER ( L CCTIE ` * & C C ( : [ p QCTIEL DTBCON N , ( 7 Z : , ( S [ [ [
0x144cc4…144e58 Dummy {f00=0x0067, f01=0x0190, f02=» T T @ `T W Z Z NUMBER $ , ( Z Z : [ _ 6 CTR:30 f , ( Y R Y$R x HTBCON , ( @ Y6 _ [ [ , ( + Q , 0R 9
0x144e58…144fec Dummy {f00=0x0067, f01=0x0190, f02=» : [ [ [ [ [ [ , ( [ R 0 0 CCPBOT ` , ( =A T R !LLT r CCLTT , ( A T ! A b T R T , ( XF V (_D ( W [
0x144fec…145180 Dummy {f00=0x0067, f01=0x0190, f02=»_d>AV N r , ( } P P >P P P W CCLCT B , ( _ A ^ T >FV :A H @ ^Y R CCSCT , ( @@ H @ ^Z >AV W _ _ @ ^ , ( @ @ b >BV -W >AV -W >AV B , ( @ Z R
0x145180…145314 (3, 116) Dummy {f00=0x0067, f01=0x0190, f02=» A b B R T , ( q > R > @ T T W CCTSTT P QCTCCL b * & * t CCTCC CCCMT , ( D P (_ @ * & @ Z H
0x145314…1454a8 Dummy {f00=0x0067, f01=0x0190, f02=» W @ 2P , ( = " #( : d M 0 QCCMNI ` CCSQT r , ( ] ^ R $_ & , ( y W 4_ @ 0P , ( P R " R Q " #
0x1454a8…14563c Dummy {f00=0x0067, f01=0x0190, f02=»N THIS PACKAGE ; rW ;A CCEMT " CCIERR 2 , ( AE @ H * , 4 P r F , ( J 5 B @ :A H A n H v & " T Q A p f H D ! Z R V W P ( T U P gQx iP~ {S*
0x14563c…1457d0 Dummy {f00=0x0067, f01=0x40fa, f02=» Px Pr Pl W V V W h H D ! V Wp V Wh Vd RV T T +T 1T mR& uR T T W P $ H D !j P 0 2 P 2 TH " !W0 9P eR {W P8 P2 R Q T p $ P^ Q0 T$ W2 W +P j @ P gQx iP~ {S*
0x1457d0…145964 Dummy {f00=0x0067, f01=0x4126, f02=» > @ IDENT CDISCT REL 10.0 80-03-14 870136641000 " CDISCT CDISLE FIRFC FCMAX F CDISCT l , ( DU2 DU1 DU4 DU3 MD1 MD2 MD3 MD4 CDISLE 8 FIRFC FCMAX $ ! FD1 FD2 FD3 FD4 CD1 CD2
0x145964…145af8 Dummy {f00=0x0067, f01=0x0190, f02=» > @ IDENT BINDEX REL 10.0 80-03-14 870136641000 BINDEX F BINDEX . X , ( + , 2 A A R A R A l FMRLEN , ( @ K A 9h A A * D R FMREC1 FMREC2 , ( @ i
0x145af8…145c8c Dummy {f00=0x0067, f01=0x0190, f02=» A S r , ( ( @ / P ;BR ;BZ ;FZ W , ( D A A _. 2 R R R $ - B , ( " - @ - @ r WRORD ERPROT , ( ! - - ( @ T , ( @ = @ # X
0x145c8c…145e20 Dummy {f00=0x0067, f01=0x0190, f02=» , ( W W W W W W W CLORD 4 , ( @ ( ( , : A * D RFORD t FDLEN , ( _$ C ( B FDFNR FMLEN , ( D f B " D #
0x145e20…145fb4 (3, 117) Dummy {f00=0x0067, f01=0x408c, f02=» s T S P R W ;T QTF SW W Z T , ( T W W W W W W W W F . v@ , ( _$ C ( B FDFNR FMLEN , ( D f B " D #
0x145fb4…146148 Dummy {f00=0x0067, f01=0x4140, f02=» > @ IDENT CCIBUF REL 10.0 80-03-14 870136641000 8 4 CCIBUF CCIBFL U:BUF1 U:BUF2 FMFPB PBLK2 FDBLK F CCIBFL CCIBUF U:BUF1 PBLK2 FDBLK FMFPB
0x146148…1462dc Dummy {f00=0x0067, f01=0x0190, f02=» > @ IDENT PRVTOC REL 10.0 80-03-14 870136641000 PRVTOC F , ( 1 0 0VOLUME NAME: X , ( ! DISC: , ( A 0FREE SPACE TAB ( ( a LE 0EXT BASE EXT LENG
0x1462dc…146470 Dummy {f00=0x0067, f01=0x0190, f02=» FILE FI t ( ( LE FILE RECORD BLOCK LAST , ( FILE FILE CREATION RET INDE @ , ( ! X KEY MONITOR SWITCH NAME p , ( A EXT BASE EXT LEN ORG LENGT , ( a H FACT REC NO SEC NO EXT NO D ( (
0x146470…146604 Dummy {f00=0x0067, f01=0x0190, f02=» ( - : PRVTOC , , ( C ( B : 2 A @ FIRFC p * & D ! A B A R A R A CDISCT , ( ? P A * P A , A , ( @ Y "' R
0x146604…146798 Dummy {f00=0x0067, f01=0x0190, f02=» 2 , 9 TO , ( A 4 4 I 2 Y , ( )I $ 0 , A N P , ( , A F , A H " , A J @ J , ( @ 9 A >c A L C ( B , ( Y . B & A
0x146798…14692c Dummy {f00=0x0067, f01=0x0190, f02=» 4 | BIDACR " , ( P YBW YL @ B 4 , ( PJ @ L d , ( R n : n , ( P 1 N F D J , ( B Q D
0x14692c…146ac0 Dummy {f00=0x0067, f01=0x0190, f02=» J U !LLT J , ( " c J " k $ , ( - U 8 U T U ZW - U d U l J T , ( 8 J ? J , ( ) J J J , ( G@ . J J J
0x146ac0…146c54 (3, 118) Dummy {f00=0x0067, f01=0x018e, f02=» J & X t , ( H R p $ ! R ! , ( __Q Y . % Y p W A D , ( @ t , ( R & W 9 W W W : H D ! : cR$ iQ
0x146c54…146de8 Dummy {f00=0x0067, f01=0x4008, f02=»@ t , ( H R p $ ! R ! , ( __Q Y . % Y p W A D , ( @ t , ( R & W 9 W W W : H D ! : cR$ iQ
0x146de8…146f7c Dummy {f00=0x0067, f01=0x0190, f02=» > @ IDENT IBMLBL REL 10.0 80-03-14 870136641000 IBMLBL F X r , ( ERMAPVOL1 080 01001 , ( ; 7302601001080 74001 7302674001DD , ( [ R1 DATA HDR1 DATA VOL1 0
0x146f7c…147110 Dummy {f00=0x0067, f01=0x0190, f02=» A R A A , ( P A l ( , ( B , 0T Y W A p R 5 X VOLNAM , ( $ A C , ( ; A A , ( @ Y
0x147110…1472a4 Dummy {f00=0x0067, f01=0x0190, f02=» 4 )T , ( R W ],W A " * , ( & Z , ( W E 5 @ pP , ( " 7 @ r 5 @ s 5 2 P , ( W b 0
0x1472a4…147438 Dummy {f00=0x0067, f01=0x0190, f02=» z , ( R BIDACR J , ( @ P @ " , ( W 10_ 20_ C C , ( 5 ( P P A " , ( U P T
0x147438…1475cc Dummy {f00=0x0067, f01=0x0190, f02=» : W 5 | , ( I : # A 4 4 DECBIN L * & $ : @ ( : ^ , ( @ P A @ Z A CONIBM , ( / A 2 @ P , ( M t
0x1475cc…147760 Dummy {f00=0x0067, f01=0x410c, f02=» t W W * , , ) 5P K , z H D ! S Y 4 a k y P P W , 6 H D ! * P 4 Wf EP$ MP ]P cT iT oW sW wW $ 0 {W W W PP EP l @
0x147760…1478f4 (3, 119) Dummy {f00=0x0068, f01=0x0190, f02=» > @ IDENT PRINDX REL 10.0 80-03-14 870136641000 PRINDX F X , ( 1VOLUME NAME: DISC: r * ( ; 0INDEX TRACK: 0DSL DATA , ( [ RECORD BOE EOE EOD , ( {
0x1478f4…147a88 Dummy {f00=0x0068, f01=0x0190, f02=» DATE r , ( BE A 07 2 A R A , ( A 0 B , ( VO 0 L1 r FIRFC CDISCT * & ; F , ( W 5 F U
0x147a88…147c1c Dummy {f00=0x0068, f01=0x0190, f02=» , ( H @ " , ( T 0 a A A @ Y R , ( W 10_x 20_~ W W W , ( ! 3 : A ( @ & : , ( S ( @ P P
0x147c1c…147db0 Dummy {f00=0x0068, f01=0x407a, f02=» y L Px Px ~ ~ h < 8 ~ ~ ~ ~ ~ T 6 W #W 'W +W eP kP $ d@ v R , ( W 10_x 20_~ W W W , ( ! 3 : A ( @ & : , ( S ( @ P P
0x147db0…147f44 Dummy {f00=0x0068, f01=0x0190, f02=» > @ IDENT IBMSUB REL 10.0 80-03-14 870136641000 * & SUB1 CONIBM DECBIN CONVRT CHAR F SUB1 t , ( # ( B P C C , ( ! C ( B P B " T , ( A B 4 9T
0x147f44…1480d8 Dummy {f00=0x0068, f01=0x40c0, f02=» n CONVRT CHAR " , ( : <C : 4$ 4 : d 0 , PH 7P ?T QT m q v @ ( B P B " T , ( A B 4 9T
0x1480d8…14826c Dummy {f00=0x0068, f01=0x0190, f02=» > @ IDENT FILHND REL 10.0 80-03-14 870136641000 CRFILE DLFILE F , ( ` , ( ! , ( A CRFILE l , ( U
0x14826c…148400 Dummy {f00=0x0068, f01=0x0190, f02=» , ( h A f A d Y A d A , ( f @ hW S 1 A d S 2 4 , ( P A f A : d FIRFC , ( ! R P # A R Q , ( ? ( B T ( B T C C , (
0x148400…148594 (3, 120) Dummy {f00=0x0068, f01=0x0190, f02=» R 0 $ t , ( ' R T W $ T A L R , ( ( !LLP @ T A . A 0 R 1 R D , ( !* 8 A @ R 6! A >P A D A F @ . @ t ADDMOD , ( J 0 A . A 0S @ D @ F DSUMOD , ( ;
0x148594…148728 Dummy {f00=0x0068, f01=0x0190, f02=»Y4W R 6:B A A @ LP @ A > , ( UB @ A @ @ f A N @ f Y P @ f ( , ( T A f @ @ @ f P Y X , ( P @ @ A A A R , ( " A A A . A `9H A ^ , ( ) 1 A A A A @
0x148728…1488bc Dummy {f00=0x0068, f01=0x0190, f02=» @ ^:c A b A x , ( 2 A 4 A 6 A 8 @ A * @ A , A , ( D @ * @ , A * A , @ D H , ( E R 0 A . 0 A 0 @ . x , ( % T @ 0X" @ . @ 2R Q @ 0 @ 4R , ( UQ / @ . A 2 @ 0 A 4 @ . @ ZTQ @ 0 , (
0x1488bc…148a50 Dummy {f00=0x0068, f01=0x0190, f02=» h , ( . @ A 0W T Q 1 Q Q , ( " P R A R @ A Z A @ ^ C 8 , ( B ( C @ X /T @ jT h , ( A j : W W : _ @ T , ( T / _ _ R @ A . @ A 0 !LL , ( !@ O P @ 2
0x148a50…148be4 Dummy {f00=0x0068, f01=0x0190, f02=» A 2 A 4 @ B P A : P , ( T A < @ . @ 0 P P Q Q ( , ( " @ 2 Q @ 4 1 P X , ( IB A 2 0 A 4 A . A 0 @ f , ( H ) A . A 0 @ . @ 0 @ f , ( U! E A . A 0 @ 2 @ 4 @ f
0x148be4…148d78 Dummy {f00=0x0068, f01=0x0190, f02=» Q @ 2 Q @ x , ( B 4 1 @ @ @ . @ 0 A A , ( U A 2 A 4 @ LP @ > @ @ @ . @ 0 H , ( @ A > A @ x , ( E A A @ : A j , ( ; : P . P @ LP , (
0x148d78…148f0c Dummy {f00=0x0068, f01=0x0190, f02=» h , ( X / R 6 P J S , ( T $ 1T P _ X` 8 , ( " _2 A : @ T @ h , ( B Q : " @ , ( ; @ K @ K @ . K @ , ( [ 0 K @
0x148f0c…1490a0 Dummy {f00=0x0068, f01=0x0190, f02=» . " R !LLP R , ( 6 K % R 4 K & K ( K ) ( @ ( , ( X / : @ T @ X , ( !R Q : " @ A , ( ; 2 A R @ d % @ R , ( [ R 2 R 1 % Y @ .
0x1490a0…149234 (3, 121) Dummy {f00=0x0068, f01=0x0190, f02=» @ J @ f @ LP x , ( B @ N A H A J @ . @ HYXR @ , ( T 0 @ JYd @ : A H @ < A J @ d C H , ( * @ H A Z @ J A ( C @ x , ( 7 X / @ H @ J @ f @ LP @ , ( Q W N A H A J @ . @ HY`R @ 0 , (
0x149234…1493c8 Dummy {f00=0x0068, f01=0x0190, f02=» h , ( @ 0 A @ : @ < BINACR 8 , ( @ . @ 0 J , ( " @ T A A z DLFILE F , ( 1 ( P @ : A , ( Q T @ T : A
0x1493c8…14955c Dummy {f00=0x0068, f01=0x0190, f02=» @ - ( ~ , ( DD @ X / J A J A . J , ( DP A 0 J A : J A < R @ N , ( ^9c A b @ b 0 A B ~ , ( ) 1 0 A D @ BT @ D P @ :T P , ( * Q @ < r A D A F A @ @ B @ D P
0x14955c…1496f0 Dummy {f00=0x0068, f01=0x0190, f02=» @ 0 n , ( Q 1 P A . 0 A 0 @ D @ F , ( @ @ @ T _ ] = ] ] r A > , ( ( D A F A @ P P @ . @ 0 n , ( UU + A B A D @ D @ F @ @ @ : @ B , ( U K @ < @ D @ : Q @ < Q _ , ( ID k
0x1496f0…149884 Dummy {f00=0x0068, f01=0x0190, f02=» 9 VOLUME NAME FILE EXT , ( .NO EXTENT BASE EXTENT LENGT . ( H A ^ ( + | $ K DELETED H D ! P P b P< W 5R ;Q KTH WT< oP uW Q H D !
0x149884…149a18 Dummy {f00=0x0068, f01=0x4182, f02=» L H D ! T T W W -T OPJ YT e 2 Rn W4 ~ T P H D ! X KP2 SP* YP P T T P T Q ? T P T !Q T H D ! ? P R SP oR Q6 2 ; H D ! K Q T Z # '
0x149a18…149bac Dummy {f00=0x0068, f01=0x412c, f02=» > @ IDENT ADDMOD REL 10.0 80-03-14 870136641000 ADDMOD F ADDMOD X , ( [ S Q R S l , ( ! P W S _ R Q _ ;A A [ : , ( S Q" R S !P #W +S 1
0x149bac…149d40 Dummy {f00=0x0068, f01=0x4140, f02=» > @ IDENT DSUMOD REL 10.0 80-03-14 870136641000 DSUMOD F DSUMOD X , ( [ Q S W l , ( ! S Q R S P W S _ R " A _ ;A [ : 4 0 Q S W #S '
0x149d40…149ed4 (3, 122) Dummy {f00=0x0068, f01=0x0190, f02=» > @ IDENT CRVOL REL 10.0 80-03-14 870136641000 CRVOL QBLFAC TOSREL F QBLFAC f z K J , ( - * ( W NUMB
0x149ed4…14a068 Dummy {f00=0x0068, f01=0x0190, f02=» , ( SECTORS TOSS REL 10.0 , ( Z 4 , ( $ A D A D A D A d , ( D A [ : Z $ A D A , ( 7 D A D A D A [ , ( D W : Z $ A
0x14a068…14a1fc Dummy {f00=0x0068, f01=0x0190, f02=» : : , ( : < 2 C C ( $ , ( B & B .P " T T CRVOL , ( : A @ A @ A 2 & IPL811 IPL812 IPL813 * & 7 R ' P P
0x14a1fc…14a390 Dummy {f00=0x0068, f01=0x0190, f02=» h IPL411 IPL412 IPL413 , ( [h 4 &[4 4 P X * , ( rS S E &q+ Z IPL111 IPL112 IPL113 , ( W R &? &@ X IPL121 IPL122 IPL123 * &
0x14a390…14a524 Dummy {f00=0x0068, f01=0x0190, f02=» " $ &? &@ ~ IPL211 IPL212 IPL213 , ( / W R X & ( * @ IPL221 IPL222 IPL223 p , ( @ I * L L P X , . 0 IPL231 IPL232 IPL233 , ( c 1g 1h P X
0x14a524…14a6b8 Dummy {f00=0x0068, f01=0x0190, f02=» B t , ( " P C C VOLNAM D , ( ( C 8 < V , ( 2 C I I " C ( , ( ; ( C W B 9 , ( [ R ! T :
0x14a6b8…14a84c Dummy {f00=0x0068, f01=0x018e, f02=»' P ( v , ( C ( B R % R E R , ( E B N % Z F , ( R R E ( ( ( v , ( UU 9 A V A X A , A J A J , ( T Y A A 2 , (
0x14a84c…14a9e0 Dummy {f00=0x0068, f01=0x0190, f02=» f , ( T B & B P , ( T @ J ) I 8 , ( * A J @ @ U Y h , ( $ 9 A @ Y A @_ A , ( H Y A @_ A @ A 2 , ( @ y .
0x14a9e0…14ab74 (3, 123) Dummy {f00=0x0069, f01=0x0190, f02=» P W T , ( T P W $ ( , ( ( Y P _2 W X , ( @ 9 T @ J A , ( Y @ T @ , ( y Q A 2 Q @ A 2
0x14ab74…14ad08 Dummy {f00=0x0069, f01=0x0190, f02=»P W T x , ( @ T P W , ( J $ Y P _2 H , ( 9 @ T @ U Q x , ( @ Y A @ Q A @W T P , ( H* y @ JV A , (
0x14ad08…14ae9c Dummy {f00=0x0069, f01=0x0190, f02=» h , ( R D H R Q W ,^` - , ( @ $ M _> H ,^| - ( M 8 , ( @ 9 _ @ Q ,^ ( M H h , ( Y - _" @ JQ ,^ $ M D BIDACR , ( y - _" A u : ,
0x14ae9c…14b030 Dummy {f00=0x0069, f01=0x0190, f02=» < 1 Q | , ( @ Q _* @ W @ , ( @ @ <Q 1 Q A @ L , ( 1 A @ 2 | , ( Q P T 0P 0 % % , ( A q @ Q _4 _ %
0x14b030…14b1c4 Dummy {f00=0x0069, f01=0x0190, f02=» j , ( ( A @ A @ Q , ( U _ 2 % 2 : , ( - * % Y : 2 * j , ( M @ Q P * BA % DS % , ( m PO % T % 5 Y , (
0x14b1c4…14b358 Dummy {f00=0x0069, f01=0x0190, f02=» " T ` A 9A D 2 , ( @ R V 2 * , ( - U A ]D 2 2 Z , ( M @ % % , ( @ m Z ) % % Z @ % @ , ( @ % @ % (
0x14b358…14b4ec Dummy {f00=0x0069, f01=0x0190, f02=»T . : z H D ! @ S V P T EP KP o P W P P 1Wf WP@ H D ! yP W T P T ; T I T SW [R _T i q ^ H D ! P T Tv P& T 1U, P Wl P W H D ! T T P
0x14b4ec…14b680 Dummy {f00=0x0069, f01=0x40c4, f02=» W W W W Qv QN Q* R R Q W EQ> gQ QT Q4 H D ! Q W Q UT YP( uQ T R Q U( UQ [Pl W T R J @ %V T @ P& T 1U, P Wl P W H D ! T T P
0x14b680…14b814 (3, 124) Dummy {f00=0x0069, f01=0x0190, f02=» > @ IDENT PRFILE REL 10.0 80-03-14 870136641000 @ < PRFILE RTN:01 RTN:02 RTN:03 RTN:04 STCKP PREC1 PREC2 F STCKP PREC1 PREC2 FMLEN PRFILE * PRTECB , (
0x14b814…14b9a8 Dummy {f00=0x0069, f01=0x0190, f02=»E , ( Q ( B T " T B PRINTK : , ( o@ $ ) L SPACE | FDFNR , ( 1FILE NAME: FMORD FMREC1 , ( @ B J A
0x14b9a8…14bb3c Dummy {f00=0x0069, f01=0x4126, f02=» R C R r PRFIS , ( ! 9 C R C " CLORD R RTN:01 0 b RTN:02 4 v RTN:03 8 , ( ! ( : _ _ RTN:04 < ; _ _$ eT iT u
0x14bb3c…14bcd0 Dummy {f00=0x0069, f01=0x0190, f02=» > @ IDENT PRFIS REL 10.0 80-03-14 870136641000 PRFIS F PRFIS V RRORD h , ( % 6 x RTN:02 RTN:01 * & !@ ( B RTN:04
0x14bcd0…14be64 Dummy {f00=0x0069, f01=0x0190, f02=» l , ( q 2 FOLLOWING RECORDS ARE BEHI OUTTXK < , ( ND LAST RECORD NUMBER > V N PRTBUF ~ , ( NO DATA W N N , ( @ U P REC.NO: BININT BIN
0x14be64…14bff8 Dummy {f00=0x0069, f01=0x40e2, f02=» X W t COMPCT bASC & * & C Y Y _( : 4 HEXASC b _ t < 8 WQ YRJ cU@ iT: V^ W^ U0 P W 'S AW b @ C.NO: BININT BIN
0x14bff8…14c18c Dummy {f00=0x0069, f01=0x0190, f02=» > @ IDENT DMTEST REL 10.0 80-03-14 870136641000 DMTEST F DMTEST X FDLEN l , ( R A A 2 A A | RFORD FDRLEN , ( A ( D A RRWORD
0x14c18c…14c320 Dummy {f00=0x0069, f01=0x0190, f02=»RDP p , ( s WRP PRP NOP EX V , ( : S [ : R A @ > , ( A @ 5 U ( B P n BIDACR , ( @ 2 , ( A R @ ^P_ A A
0x14c320…14c4b4 (3, 125) Dummy {f00=0x0069, f01=0x412e, f02=»ODE : / p , ( o 0 @ H D ! 4 y | z ! ) x 5 | 9 6 A I Q [PH eP> oP4 yP* ` H D !? P P 4 2 2 z x P" n X 2 D 2 2
0x14c4b4…14c648 Dummy {f00=0x0069, f01=0x0190, f02=» > @ IDENT UPDISC REL 10.0 80-03-14 870136641000 UPDISC F UPDISC X STACKP l UPPR ~ , ( " A , ( @T 2 I R A A A R , ( = Q A (
0x14c648…14c7dc Dummy {f00=0x0069, f01=0x0190, f02=» W A R V R V CHSCNO , , ( R C R C > , ( ( B & B .T & T R n , ( R 2 $ 1 P , ( Y ( B .T & T W " 7
0x14c7dc…14c970 Dummy {f00=0x0069, f01=0x400e, f02=» @ R V R V CHSCNO , , ( R C R C > , ( ( B & B .T & T R n , ( R 2 $ 1 P , ( Y ( B .T & T W " 7
0x14c970…14cb04 Dummy {f00=0x0069, f01=0x0190, f02=» > @ IDENT PRDISC REL 10.0 80-03-14 870136641000 PRDISC F X , ( k 1VOLUME NAME: 0SECTOR x , ( NO: , ( ( B ' P , (
0x14cb04…14cc98 Dummy {f00=0x0069, f01=0x0190, f02=» h BIDACR , ( + Y : 5 PRDISC N J UPPR ^ STACKP n , ( I Y : A 2 A R , ( E e A R A A R Q A , ( ( B A A
0x14cc98…14ce2c Dummy {f00=0x0069, f01=0x0190, f02=» j R A R , ( P A ( W : BINAC P , ( U ! @ A @ @ ` , ( J ? A A ( ^ A , ( @ _ 2 5 Y , ( P 0 !
0x14ce2c…14cfc0 Dummy {f00=0x0069, f01=0x0190, f02=» A W _ @ 5 Y , ( Q" _N j CHSCNO P , ( $ A & A A b , ( = A A ( B " , ( ] 2 @ P P @ } .P _
0x14cfc0…14d154 (3, 126) Dummy {f00=0x0069, f01=0x4024, f02=»P P ^ @ _N j CHSCNO P , ( $ A & A A b , ( = A A ( B " , ( ] 2 @ P P @ } .P _
0x14d154…14d2e8 Dummy {f00=0x0069, f01=0x0190, f02=» > @ IDENT RINDEX REL 10.0 80-03-14 870136641000 RINDEX F + X 9 j , ( K | , ( k 0NUMBER OF MASTER INDEX ENTRIES , ( : 0NUMBER OF INDEX RECORD
0x14d2e8…14d47c Dummy {f00=0x0069, f01=0x0190, f02=» R A A 7 A R FMRLEN , ( D @ A ) D @ 2 FMBLF b , ( ) d A X A J A Z D # A r , ( @ G V A : ( @ X D FMSIZE , ( eA D # A D A ^
0x14d47c…14d610 Dummy {f00=0x0069, f01=0x0190, f02=» A ` @ & A b t , ( T( A L @ T @ RZZ @ P @ NZh * & " _n A P A T : D D , ( R A d A A A r FMREC1 FMREC2 , ( =" D T D T : ( @ * @ Z , ( @T Y `
0x14d610…14d7a4 Dummy {f00=0x0069, f01=0x0190, f02=» h , ( P A 4 j ' W W , ( W W W W W W W W 8 CLORD h , ( " ( ( ( ( x RRORD , ( h : A S ( @ WRORD , ( " 3 P ; Z
0x14d7a4…14d938 Dummy {f00=0x0069, f01=0x0190, f02=»W 6( @ z , ( >" : B A @ B A B " A 7 , ( QP v | : @ @ * @ Z J RFORD z * & J @ fP R A P A T : FDLEN , ( C ( B FMLEN
0x14d938…14dacc Dummy {f00=0x0069, f01=0x0190, f02=» ! $ : $ ) x , ( @ ; : @ @ X ) : R , ( [ @ V dU _ A R @ V H DIVMOD x * & % { A f : @ @ ^ R ! R , ( D & P @ VV @ VW @ VY OK:SUB * & ( A N
0x14dacc…14dc60 Dummy {f00=0x0069, f01=0x4172, f02=» _ W W : H D ! + D 9 H : % - U : c { X h 6 H D ! 6 T L R %R = CT IT c 6 g R yP2 N P h H D ! P W& W$ W W W W W W W W )S 3P H D !0` _P
0x14dc60…14ddf4 (3, 127) Dummy {f00=0x006a, f01=0x0190, f02=» > @ IDENT SCANT REL 10.0 80-03-14 870136641000 SCANT F V COMPCT bASC HEXASC r , ( O AECSHN F B R P L O X , ( i R ! A R ! , ( Q A A A
0x14ddf4…14df88 Dummy {f00=0x006a, f01=0x0190, f02=» L YB: @ J I " A JW OUTTXK , ( D @ A J P @ ? V *TM* @ 2 , ( ' ? V *NO DATA* @ ?BV b , ( @ E *BOT/EOT* @ P OUTXW PRTBUF , ( a RC: @ @
0x14df88…14e11c Dummy {f00=0x006a, f01=0x0190, f02=»CBI , ( A A R A ! Q SPACE < , ( A W A 2 A A L SCAN | COMTAB , ( ( @ Z 4Z , ( J A M M Y 4R , ( A P
0x14e11c…14e2b0 Dummy {f00=0x006a, f01=0x0190, f02=» i V _ A @ @ R , ( R @ @ @ P BLK.NO . OUTINT ^ OUTCHA p , ( : @ L . @ J * & P , SIZE: @ , ( @ T A Z :
0x14e2b0…14e444 Dummy {f00=0x006a, f01=0x018e, f02=» R A p , ( H W @ R A W $ x $" P M NP , ( @ w ^ W Q R A W Q ; A @ " _4 : g : p H D ! k m o B q F s N u H w P4 P WL V W0 W& V W Pd H D ! V )V AV [P Q W R
0x14e444…14e5d8 Dummy {f00=0x006a, f01=0x401a, f02=» @ R A W $ x $" P M NP , ( @ w ^ W Q R A W Q ; A @ " _4 : g : p H D ! k m o B q F s N u H w P4 P WL V W0 W& V W Pd H D ! V )V AV [P Q W R
0x14e5d8…14e76c Dummy {f00=0x006a, f01=0x0190, f02=» > @ IDENT T:INP REL 10.0 80-03-14 870136641000 & " TPREAD TPWAIT NXVLIN INVOL1 F TPREAD p TPWAIT ERROR2 , ( V T ( W ( B ERROR7 , ( B > R > Z$W R &
0x14e76c…14e900 Dummy {f00=0x006a, f01=0x0190, f02=» n INVOL1 NXVLIN " , ( w X > Z 01 W (W ( 6 COPIED f , ( W R W R " R x , ( MP W C C ( , ( B P ( B a R
0x14e900…14ea94 (3, 128) Dummy {f00=0x006a, f01=0x0190, f02=»RROR6 , ( / " N V (T h : ! ERRORB > , ( K : W W W V & W & P , ( i 8# R @V `W . I ^ 0 , ( _6W R " P # D ! $P , ( # " C C ( B Y
0x14ea94…14ec28 Dummy {f00=0x006a, f01=0x0190, f02=» HD p , ( ) R LABEL CHECK: ERR +VOLUME + , ( I LABEL +IDENTIFIER LABEL RECORD @ i : ' p , ( ' ENTER COMMAND (GO/REMOUNT/AB , ( ORT): +FILE SECTION SEQUENCE , ( " * 64j$ * 64j$ 64
0x14ec28…14edbc Dummy {f00=0x006a, f01=0x406c, f02=»T* 9T OW SW WW qR uV yW l WB P8 ~ P" $ : V@ h i : ' p , ( ' ENTER COMMAND (GO/REMOUNT/AB , ( ORT): +FILE SECTION SEQUENCE , ( " * 64j$ * 64j$ 64
0x14edbc…14ef50 Dummy {f00=0x006a, f01=0x0190, f02=» > @ IDENT COPYCF REL 10.0 80-03-14 870136641000 COPYCF F 3 X COPYCF l ( ( = 0NUMBER OF READ CARDS: , ( J( ] > 2 A A R A A $ R A RFORD FDLEN , ( P } 1 R
0x14ef50…14f0e4 Dummy {f00=0x006a, f01=0x018e, f02=» 2 " D # # C ( FMREC2 , FMREC1 > FMRLEN P , ( # D T D T D PU b , ( 2 R D P A A A , ( < 2 P ( @ P WRORN , ( +
0x14f0e4…14f278 Dummy {f00=0x006a, f01=0x0190, f02=» , ( B ( "( @ *P ( , ( A <_ W W W W W W 4 CLORD d , ( " ( > : _ t , ( ( B " : F T WRORD , ( F 2 : P (
0x14f278…14f40c Dummy {f00=0x006a, f01=0x40bc, f02=» h _ P - : H D ! k 3 @ T T T U ` #P ' 7 ` YP ] kP o ` & 0 , @ P W W W W W W @ P r l @ F T WRORD , ( F 2 : P (
0x14f40c…14f5a0 Dummy {f00=0x006a, f01=0x0190, f02=» > @ IDENT T:OUTP REL 10.0 80-03-14 870136641000 6 2 TOWRIT TOWAIT TOWEOF TOVOL1 ASC:CM ASC:IM F 1 00 00000000 TOWEOF " , ( # 9 $ R ! P A W , ( C
0x14f5a0…14f734 (3, 129) Dummy {f00=0x006a, f01=0x0190, f02=»1 FMFILE , ( $ ( b_* W FMCCD N , ( $ I ^ $ ! P ^ FMCRP , ( $ I ^ $ I COPIED , ( ^ W W
0x14f734…14f8c8 Dummy {f00=0x006a, f01=0x416a, f02=» C C p , ( [ ( B P ( B aT ERROR1 @ ASC:IM R , ( { R ! P J N : $# f ASC:CM , ( 9P : % : 0 % ^ : 0 % ^ : H D !j 1P 5 N = J ?W C N MW
0x14f8c8…14fa5c Dummy {f00=0x006a, f01=0x0190, f02=» > @ IDENT COPYIT REL 10.0 80-03-14 870136641000 COPYIT F X v COPYIT @ , ( 9 2 A A R A , > SUB1 , ( Y A A <
0x14fa5c…14fbf0 Dummy {f00=0x006a, f01=0x0190, f02=» l FDLEN , ( ( A : R A A + RFORD L FDRLEN , ( @ @ A 2 T T A A n FDFNR FMLEN FMORD * & . T $ A A A FMREC1
0x14fbf0…14fd84 Dummy {f00=0x006a, f01=0x0190, f02=» P , ( _ _ _& A , ( W ( T @ A A P , ( @ @ P T P , ( " T W @ <T : W W W W CLORD , ( W W
0x14fd84…14ff18 Dummy {f00=0x006a, f01=0x0190, f02=» " r , ( 7 T _ : _@ 2 5 : , ( W T @ @ :Q @ <T A < p B , ( w P F W p r RWORD , ( _ A S P RDORD , ( @ _ A
0x14ff18…1500ac Dummy {f00=0x006a, f01=0x411a, f02=» ! s p T T T ) / 9 z =T M SP [ F _ c H D ! g m W T P T P T W" T W W W W W L H D ! u W !P 7T ? C YT: cQ0 iT wP W S ` PZ W P
0x1500ac…150240 Dummy {f00=0x006a, f01=0x0190, f02=» > @ IDENT COPYTI REL 10.0 80-03-14 870136641000 COPYTI F FMLEN X , ( h COPYTI 8 , ( P / 2 A A " A SUB1 , ( O @
0x150240…1503d4 (3, 130) Dummy {f00=0x006a, f01=0x0190, f02=» p , ( @ B A ' FDLEN @ RFORD P FDRLEN ` , ( @ R A A 2 r FDFNR FMORD , ( @@ T A T A % A & FMREC1 F
0x1503d4…150568 Dummy {f00=0x006a, f01=0x0190, f02=» P T v RRORD * & W _ _( A S & , ( u W A A _ A 6_ ( T , ( $A @ 6P A 6 B @ 2Q R B @ 4 , ( U C @ 0# P @ , ( T T T W @ T
0x150568…1506fc Dummy {f00=0x006a, f01=0x0190, f02=» ( " : ( @ , ( " O Xj X @ R_F @ " , ( H o @ Y A _: @ T A r T R , ( J P h BW h l , ( @_ 2 P 5 : H D ! ] i w
0x1506fc…150890 Dummy {f00=0x006a, f01=0x4062, f02=» ! h B W W W W W W W T T P W P L@ ^ _: @ T A r T R , ( J P h BW h l , ( @_ 2 P 5 : H D ! ] i w
0x150890…150a24 Dummy {f00=0x006a, f01=0x018e, f02=» > @ IDENT COPYFT REL 10.0 80-03-14 870136641000 COPYFT F COPYFT X , ( 8 : % 6 W l FDLEN RFORD , ( ! R W W ERROR2 FDRLEN
0x150a24…150bb8 Dummy {f00=0x006a, f01=0x0190, f02=» , ( y MP W W J FMLEN 4 FMORD D , ( ' # B C ( C T TOVOL1 , ( R ' # R REORD , ( ( B T Y W
0x150bb8…150d4c Dummy {f00=0x006a, f01=0x0190, f02=» W U V R $ C , ( G R # MMT W ( TOWRIT X , ( g Q C W C W " j , ( V " _0 V Q , ( V R $ W V ] TOWEOF
0x150d4c…150ee0 Dummy {f00=0x006a, f01=0x4024, f02=»R W @ , ( G R # MMT W ( TOWRIT X , ( g Q C W C W " j , ( V " _0 V Q , ( V R $ W V ] TOWEOF
0x150ee0…151074 (3, 131) Dummy {f00=0x006b, f01=0x0190, f02=» > @ IDENT COPYTF REL 10.0 80-03-14 870136641000 F B COPYTF COPIED ERROR1 ERROR2 ERROR3 ERROR4 ERROR5 ERROR6 F . * ERROR7 ERROR8 ERROR9 ERRORA ERRORB COPYTF FDLEN , ( < > % 6
0x151074…151208 Dummy {f00=0x006b, f01=0x0190, f02=» h INVOL1 , ( [ R # Y W R !MMP , ( {@ ( W W V P W J , ( V P ( V V 5 z , ( Y W B W V Y , ( V P (
0x151208…15139c Dummy {f00=0x006b, f01=0x0190, f02=»OR4 ERROR5 " ERROR6 & " ERROR7 * 6 ERROR8 . J ERROR9 2 ^ ERRORA 6 r , ( W W W W W W W W ERRORB : CLORD , ( 9 W W R ! T W
0x15139c…151530 Dummy {f00=0x006b, f01=0x0190, f02=»PWAIT , ( B ^ : : , ( _ P $ R # > , ( B Q P A C ( _ n , ( B A @ V Z" C : [ : H D ! * M uP y W W8 P W P
0x151530…1516c4 Dummy {f00=0x006b, f01=0x4022, f02=» x @ : : , ( _ P $ R # > , ( B Q P A C ( _ n , ( B A @ V Z" C : [ : H D ! * M uP y W W8 P W P
0x1516c4…151858 Dummy {f00=0x006b, f01=0x0190, f02=» > @ IDENT COMPCT REL 10.0 80-03-14 870136641000 COMPCT F COMPCT X bTAB l , ( A I * z OUTCHA PRTBUF * & T . P Y" OUTTXK
0x151858…1519ec Dummy {f00=0x006b, f01=0x4010, f02=» V @ T COMPCT REL 10.0 80-03-14 870136641000 COMPCT F COMPCT X bTAB l , ( A I * z OUTCHA PRTBUF * & T . P Y" OUTTXK
0x1519ec…151b80 Dummy {f00=0x006b, f01=0x0190, f02=» > @ IDENT PRINT REL 10.0 80-03-14 870136641000 H D ! PAGE PRINT SPACE PRTBUF SKIPIF PRTIF SKIPPdTAB BLANKS OUTTXT F F B OUTCHA OUTINT OUTINR BININT BININR OUTTXK PRINTK XDISPB * & XDISPW OUTHEX OUTXW MOVE PRTECB
0x151b80…151d14 (3, 132) Dummy {f00=0x006b, f01=0x0190, f02=» A W @ n A A , ( A A U ( @ & , ( a @ A A ( B ' V RTN:03 PAGE , ( P A : U SKIPP IDISPL , (
0x151d14…151ea8 Dummy {f00=0x006b, f01=0x018e, f02=» OUTTXK OUTTXT , ( Z : : < , = = & MOVE V OUTCHA * h OUTHEX 4 | XDISPB : , ( $ - Y : - : , ( = " :d H - " H - :01234567 O
0x151ea8…15203c Dummy {f00=0x006b, f01=0x0190, f02=» , ( } - Y : @ nY : @ U PRTIF 4 OUTINT F , ( : @ A R ._ : Z OUTINR IDISPR BININT BINAC , ( A : : , (
0x15203c…1521d0 Dummy {f00=0x006b, f01=0x0190, f02=»ECB " * & M : 1 < PAGE: . T H D ! > ' )W - 5 = A F E I KU O S r H D ! W " _ c g k $ o & s P . U ~ W H
0x1521d0…152364 Dummy {f00=0x006b, f01=0x4014, f02=» @ M : 1 < PAGE: . T H D ! > ' )W - 5 = A F E I KU O S r H D ! W " _ c g k $ o & s P . U ~ W H
0x152364…1524f8 Dummy {f00=0x006b, f01=0x0190, f02=» > @ IDENT ASC REL 10.0 80-03-14 870136641000 dASC F |ASC T PRTBUF d , ( ( * U Y _ v OUTCHA , ( : & P U ?V W _ OUTTXT * & = W
0x1524f8…15268c Dummy {f00=0x006b, f01=0x4038, f02=»P$ /U 3V 7W ?W C L KW ~ j "@ 4641000 dASC F |ASC T PRTBUF d , ( ( * U Y _ v OUTCHA , ( : & P U ?V W _ OUTTXT * & = W
0x15268c…152820 Dummy {f00=0x006b, f01=0x0190, f02=» > @ IDENT DIVMOD REL 10.0 80-03-14 870136641000 DIVMOD F DIVMOD X , ( P T P V l , ( ! Q U V U Q P , ( A P 9A?A:AV R Z _ , ( a P R
0x152820…1529b4 (3, 133) Dummy {f00=0x006b, f01=0x405a, f02=» +UF /V 9Ud =Q4 ?P CP QR aP* cR oR qP x V 4 D@ V DIVMOD X , ( P T P V l , ( ! Q U V U Q P , ( A P 9A?A:AV R Z _ , ( a P R
0x1529b4…152b48 Dummy {f00=0x006b, f01=0x0190, f02=» > @ IDENT TCCODE REL 10.0 80-03-14 870136641000 ATOA ATOE F ATOA ATOE n , ( ! R ?U W W ! @R @R @ , ( ! R L # : : .<(+?& , ( A !$*); ??? &%->?
0x152b48…152cdc Dummy {f00=0x006b, f01=0x4040, f02=» R U W W R R !R % n *@ < ATOA ATOE F ATOA ATOE n , ( ! R ?U W W ! @R @R @ , ( ! R L # : : .<(+?& , ( A !$*); ??? &%->?
0x152cdc…152e70 Dummy {f00=0x006b, f01=0x018e, f02=» > @ IDENT HEXPRT REL 10.0 80-03-14 870136641000 HEXASC F HEXASC X OUTINR l , ( @ A U " T ~ OUTCHA OUTHEX , ( D " T * * bTAB
0x152e70…153004 Dummy {f00=0x006b, f01=0x40aa, f02=» SPACE " q Yv : ATOA ATOE : P ( $ U< T )T ; ? c h @ OUTCHA OUTHEX , ( D " T * * bTAB
0x153004…153198 Dummy {f00=0x006b, f01=0x0190, f02=» > @ IDENT OK:SUB REL 10.0 80-03-14 870136641000 OK:SUB VOLNAM F ` ( ( 0OK? 0OUTPUT VOLUME NAME: t , ( = C C R A " P A VOLNAM l , ( ] ( : : B 8
0x153198…15332c Dummy {f00=0x006b, f01=0x4020, f02=»P @ REL 10.0 80-03-14 870136641000 OK:SUB VOLNAM F ` ( ( 0OK? 0OUTPUT VOLUME NAME: t , ( = C C R A " P A VOLNAM l , ( ] ( : : B 8
0x15332c…1534c0 Dummy {f00=0x006b, f01=0x4108, f02=» > @ IDENT CONPAR REL 10.0 80-03-14 870136641000 $ SYSPAR CONPAR $C SYSFNR dVBB F SYSPAR n CONPAR <C SYSFNR |VBB & " @
0x1534c0…153654 (3, 134) Dummy {f00=0x006b, f01=0x0190, f02=» > @ IDENT BIDACR REL 10.0 80-03-14 870136641000 BIDAC BIDACR F BIDAC ^ , ( R _ P 0 - : ; p , ( ! [ V - - ' , ( @ A d Z : BIDAC
0x153654…1537e8 Dummy {f00=0x006b, f01=0x4042, f02=» R P )V V W R T R ,@ > BIDAC BIDACR F BIDAC ^ , ( R _ P 0 - : ; p , ( ! [ V - - ' , ( @ A d Z : BIDAC
0x1537e8…15397c Dummy {f00=0x006b, f01=0x0190, f02=» > @ IDENT BINACR REL 10.0 80-03-14 870136641000 BINAC BINACR F DSUMOD ^ , ( R _ P 0 / p ADDMOD BINAC , , ( : ; [ [ [ , ( = [
0x15397c…153b10 Dummy {f00=0x006b, f01=0x40ee, f02=» : : BINACR $ , ( @ ; , : V 8 , ( *W R - _ 1 T R P - h _ : $ R P V W R T R @ , ( = [
0x153b10…153ca4 Dummy {f00=0x006b, f01=0x0190, f02=» > @ IDENT IDISPL REL 10.0 80-03-14 870136641000 IDISPL IDISPR F IDISPL ` IDISPR t , ( W ; [ [ [ [ , ( ! A V W - A , ( A R X R X _ A P
0x153ca4…153e38 Dummy {f00=0x006b, f01=0x4062, f02=» !J W % +V 1W 9 AR@ E IR M U WP YQ ]T m q uR L@ ^ IDISPL ` IDISPR t , ( W ; [ [ [ [ , ( ! A V W - A , ( A R X R X _ A P
0x153e38…153fcc Dummy {f00=0x006b, f01=0x0190, f02=» > @ IDENT SCAN REL 10.0 80-03-14 870136641000 , ( SCAN SCECBI SCECBO COMTAB STRTAB F COMTAB v STRTAB P SCECBI SCECBO , ( # +
0x153fcc…154160 Dummy {f00=0x006b, f01=0x0190, f02=» ,* . '/ ' P : D , ( (T a A W A A ( & , ( ) : A ( B P ! V , ( ( ` A % W @ , ( ( 7 P @ x A vW , ( W 0R U R U R I
0x154160…1542f4 (3, 135) Dummy {f00=0x006c, f01=0x0190, f02=» : P A , ( UJ v @ A x A P ( , ( "U R tP W X @ R X , ( W $P %P _ A , ( P 7 A P Q S X W tP W , ( W _. % < S
0x1542f4…154488 Dummy {f00=0x006c, f01=0x0190, f02=» V _ ? x , ( Q <H P _ !.. , ( %@ T : W W H , ( W W W W W W L :kP x , ( 7 H H L :g" P L :c , ( W " H p 2 . | , (
0x154488…15461c Dummy {f00=0x006c, f01=0x4130, f02=»U0 aR eU, kR. sW" ^ H D ! yP" W R P W W W P R P W W& P !P ?P AQ H D ! CS KW QP8 SW kS oS wS T W P V Vz P U VZ QH f H D ! ] T W W W W W #W 'W +W 1 5P 9 f = p E KP O z S [
0x15461c…1547b0 Dummy {f00=0x006c, f01=0x417c, f02=» > @ IDENT MPYMOD REL 10.0 80-03-14 870136641000 MPYMOD F MPYMOD X , ( T P P V l , ( ! P V S ? V :!9 V , ( A @ P R W * & a
0x1547b0…154944 Dummy {f00=0x006c, f01=0x0190, f02=» > @ IDENT COMPUT REL 10.0 80-03-14 870136641000 F B DUBADD DUBSUB DUBMUL DUBDIV DURADD DURSUB DURMUL DURDIV F J F " MURMOD DUBCMP DUBMOV DMOVI1 DMOVI2 DMOVIB SWMUL SWDIV FETCH1 FETCH2 SWTASK PRORD DUBCMP
0x154944…154ad8 Dummy {f00=0x006c, f01=0x018e, f02=» V DMOVI1 Z BXJ , ( A _ ( % ( % : W , DMOVI2 p , ( a@ @ $ P W @ ( p MURMOD MPYMOD DUBADD DUBSUB DUBMUL , ( }
0x154ad8…154c6c Dummy {f00=0x006c, f01=0x0190, f02=» ADDMOD , ( W W W W W W DSUMOD J , ( D W W [ , ( Z W [ DIVMOD , ( [ Z [ , (
0x154c6c…154e00 Dummy {f00=0x006c, f01=0x0190, f02=» SWMUL SAVEA1 * & g Z [ [ : A " SAVEA2 P SAVEA4 b SAVEA5 t SAVEA6 SAVEA7 * & H A A A A A , ( P [
0x154e00…154f94 (3, 136) Dummy {f00=0x006c, f01=0x0190, f02=» @ @ FETCH2 * FETCH1 > , ( @ @ @ @ : W R SWTASK 2 , ( Z [ < : ; @ PRORD B 7 P ( : : H D ! ( P
0x154f94…155128 Dummy {f00=0x006c, f01=0x403c, f02=» 2 P W2 2 W 7 B 9P D &@ 8 FETCH1 > , ( @ @ @ @ : W R SWTASK 2 , ( Z [ < : ; @ PRORD B 7 P ( : : H D ! ( P
0x155128…1552bc Dummy {f00=0x006c, f01=0x018e, f02=» > @ IDENT SORTF REL 10.0 80-03-14 870136641000 F B SORTFDXJ COPMOV MOVE1 SAVEA1 SAVEA2 SAVEA4 SAVEA5 SAVEA6 F SAVEA7 SAVEA8 ( $ , ( S
0x1552bc…155450 Dummy {f00=0x006c, f01=0x018e, f02=» , ( s , ( 4 , ( d XJ * & , ( , (
0x155450…1555e4 Dummy {f00=0x006c, f01=0x0190, f02=» , ( $ y TNR S $ M r LPP ( LDP , ( I * DMP NPP 2 NL IL IP , 4 , ( $ LPM 4 LDM 6 DMM NM > BI B d , ( I IM 8 NP UTILITY SORT , ( F. NUMBER OF PASSES IN MERGE PH , ( ASE = PA
0x1555e4…155778 Dummy {f00=0x006c, f01=0x0190, f02=»SORT ENDED NUMBER OF RECORD , ( S: * H R ( $ SORTF T , ( A ^ 4 ( : f , ( R A G R A + , ( "* A R A 9 R A A , A : FMORG
0x155778…15590c Dummy {f00=0x006c, f01=0x0190, f02=» 5 # A D A D A D * & O A * D , , ( k ! D # A D Z , ( P A 8 D ! , ( D # A R D A D , ( DD A D A D A D
0x15590c…155aa0 Dummy {f00=0x006c, f01=0x0190, f02=»CMP * & D 9A A r R ! A R A DUBMOV : , ( 0 9 T R T @ L , ( U V A 9 V A @ R | , ( u T A 9 V A @ P R " , ( @ T A @ @ P T
0x155aa0…155c34 (3, 137) Dummy {f00=0x006c, f01=0x0190, f02=» @ nP A | , ( B W @ @ @ Q @ SWDIV L , ( - Q @ , ( P I P _ A @ P @ @ Q @ , ( i P _ A OK:SUB , (
0x155c34…155dc8 Dummy {f00=0x006c, f01=0x0190, f02=»$E @ P @ 2 @ A A 4 , ( UU A 6 A 8 A : A < A > A A A . , ( %@ $ P : A ^ , ( C b @ , ( * _ D A p @ @ J A R @ V A , ( B T @
0x155dc8…155f5c Dummy {f00=0x006c, f01=0x0190, f02=» P < / ~ , ( " ` $ @ , T W % , ( _4 @ hX : A v A N , ( P = @ 2 A A ` @ A x : ~ , ( ] V X @ K O A v @ , ( } v9 R V @ @
0x155f5c…1560f0 Dummy {f00=0x006c, f01=0x0190, f02=» l DUBMUL * & 9! A DUBADD L DMOVI1 ^ * & 1 p * & 0 % U , ( 0 ? B ]V , ( Y @ D
0x1560f0…156284 Dummy {f00=0x006c, f01=0x0190, f02=» p @ n , ( $B T @ p A p A P , ( T > , ( " @ # @ " @ $ n DMOVI2 * & P _T " " , ( 0 / T #_& @ lX0 @
0x156284…156418 Dummy {f00=0x006c, f01=0x0190, f02=» " ~ , ( 1 $ U , ( F ]X : L , ( A b * @ T A R | , ( t U , ( @
0x156418…1565ac Dummy {f00=0x006c, f01=0x0190, f02=» l , ( B : * R , ( @ T P < , ( @ B @ @ d @ U @ l RDORD , ( ? V ? = T & , ( B $ _X
0x1565ac…156740 Dummy {f00=0x006c, f01=0x0190, f02=» l RWORD , ( c ( , ( }! & L , ( h A $ _b $ @ D $ | FDLEN RFORD * & T D T * C FDFNR
0x156740…1568d4 (3, 138) Dummy {f00=0x006c, f01=0x0190, f02=» 4 j FMCL * & ( B @ E @ E , ( 6( @ @ E @ E : @ H , ( ; & @ P x , ( [ | @ G : . @ , ( { P : @ v Z F , (
0x1568d4…156a68 Dummy {f00=0x006c, f01=0x0190, f02=» _F @ P @ P @ z , ( P G : W C L C N , ( IA C P @ R @ C R C T J , ( T) 5 C V B N @ C X C Z : L z , ( ( S W l $ ) : (W SWMUL , ( RU s 4 @ ^ : @ @
0x156a68…156bfc Dummy {f00=0x006c, f01=0x0190, f02=» A h @ J A ` z , ( B : A ` @ , ( ( rR ;B @ r @ A J DUBDIV z , ( + $ < $ 2 A P $ , ( P G @ @ P A <A A " : , ( A e A ` : @
0x156bfc…156d90 Dummy {f00=0x006c, f01=0x0190, f02=» @ X. : 4 ! P :hP | , ( P W T _ , ( A A A R L , ( $V _ | , ( * 9 : @ r A @ @ : , ( B U A J d @ `T 9C;B W
0x156d90…156f24 Dummy {f00=0x006c, f01=0x0190, f02=» `P l , ( A D P : ^ , ( P ? A F A H 9B ;A @ D < , ( H @ `T @ J;BW ;C:A A @ @ r l , ( R ) @ B @ @R @ @ A @ R @ V A , ( I : A _ @ `P , ( i :
0x156f24…1570b8 Dummy {f00=0x006c, f01=0x0190, f02=» A @ @ A @ 9A A x @ D : , ( BB @ A : @ P @ @ A , , ( A @ D9B A @ D @ x , ( '@ : @ A @ @ A : , ( R E @ D @ H>A @ a @ F;B @ , ( e P ;a %_ :
0x1570b8…15724c Dummy {f00=0x006c, f01=0x0190, f02=» 9A P _ | , ( >a : @ @ H 9A ; R , ( P =a _ : [ [ L , ( @ % @ $ :a P P | , ( T E @ `Q , ( e Q W * Z Z : _
0x15724c…1573e0 Dummy {f00=0x006c, f01=0x0190, f02=» : @ l , ( D_ (W 4 @ z : @ x , ( :a : @ : R N A A < , ( 0c # $ l , ( Q = @ A t : T T A , ( F [ A : , ( w B R
0x1573e0…157574 (3, 139) Dummy {f00=0x006d, f01=0x0190, f02=» T T A * & A : A l A j , , ( 1 $ @ l Z , ( F @ A Q R A , ( ; B h A j $ , ( 2 U
0x157574…157708 Dummy {f00=0x006d, f01=0x0190, f02=» @ jP Q z , ( U _ RP f @ A @ , ( F* A @ A @ A J , ( Q A f x Q z z , ( @ # P T @ zP , ( C@ : _8 Y Z @ lY v ,
0x157708…15789c Dummy {f00=0x006d, f01=0x0190, f02=» @ j , ( @ ) A @ nP @ bT , ( B @ @ d W @ nP : , ( H W @ `Q @ @ A $W @ j , ( T @ C W @ R A Z R C , ( ? C @ C @ Z A R : , ( B _ @ `Q
0x15789c…157a30 Dummy {f00=0x006d, f01=0x0190, f02=»P P T @ zT @ P RT , ( @ D W (W RT W ( , ( @ ( @ A : W X , ( " @ C @ C ( B #T ERPROT RRWORD , ( ) B >P (T @_4
0x157a30…157bc4 Dummy {f00=0x006d, f01=0x0190, f02=» l , ( P @ @ C C ( ^: : , ( W W W W W W W W < , ( ( W W : _ l , ( H , * C ( B B , ( @ . A A 0 ( FMLEN
0x157bc4…157d58 Dummy {f00=0x006d, f01=0x0190, f02=» l , ( P U P _ A A P , ( H $ E _ @ a @ ZT : < SWTASK l , ( [ [ @ ^ @ * @ P ~ , ( @ @ D $ $ @ Q $ T , ( Y$ Z Z : @ dZ _ ,
0x157d58…157eec Dummy {f00=0x006d, f01=0x0190, f02=» n , ( @ ZX : ( MOVE1 > , ( - Y : D R $ - P COPMOV , ( _ : D R % _ : D R $T _ : , ( * ELAPSED TIME :
0x157eec…158080 Dummy {f00=0x006d, f01=0x0190, f02=» j " m : : , ( P A o T A } T A ~ T 4 0 , ( P R ( W ( H 8 n ` , ( ( _D : V 8 : H D ! % 1 _ g s P P U
0x158080…158214 (3, 140) Dummy {f00=0x006d, f01=0x0190, f02=» < P X H D ! . Z P -P 1 5 d H D ! 9 r ? K o P D P T R0 P T b P0 ` H D !>5 T W % N 1 5 r W R T U +U _ x P> t H D ! T
0x158214…1583a8 Dummy {f00=0x006d, f01=0x0190, f02=» ! U V T P GPX W u } Tr Tl 7 8 H D ! d 6 6 E O UP _ k w }P , W P , P P L H D ! Y , W !R SW qW P R : =P UP m : H D ! q t P P P W T
0x1583a8…15853c Dummy {f00=0x006d, f01=0x0190, f02=» P P P P R P =P> CP& | H D !Ht QQ Y eQ iW P P P W + i P, +Q 5R 8 H D ! iQ R W" T P Q P@ d Q % d )P$ /T 7P K ^ oP H D ! L w P ^ Q T` Q: P. T W P r
0x15853c…1586d0 Dummy {f00=0x006d, f01=0x410a, f02=» A r GPp IWr QV U r [Tl aPn h H D ! cWd kV yP: W, W( W" W W W W W W W D 8 # 7 ! $ H D ! F - 6 ePb kP U P P P Q ( T -Q /R i R ! p 4 0 R R T ?R q z P& R W V ! ! @ !
0x1586d0…158864 Dummy {f00=0x006d, f01=0x0190, f02=» > @ IDENT SRTAID REL 10.0 80-03-14 870136641000 SRTAID F SRTAID X , ( N P l , ( ! A _" , ( A A A ( @ , ( a Z(
0x158864…1589f8 Dummy {f00=0x006d, f01=0x0190, f02=» n , ( A A ( @ Z @ , ( x @ X @ ) Z > MOVE1 n , ( U _ ~ , ( R "% 0Z U Z Y <D , ( H = _, P + < + <
0x1589f8…158b8c Dummy {f00=0x006d, f01=0x0190, f02=» n DUBMOV , ( J ` @ `! A ` d DUBADD P , ( 1 V X B @ M b RWORD , ( - @ ^ M M @ C ERPROT , ( " @ ^ C ( B P
0x158b8c…158d20 Dummy {f00=0x006d, f01=0x018e, f02=» ` t ( B FMORD $ CLORD 4 , ( g A ( @ n @ p D FMOP t FMREC1 , ( d( ( ] FMREC2 FMCL , ( ] ( <
0x158d20…158eb4 (3, 141) Dummy {f00=0x006d, f01=0x0190, f02=» FDFILE , ( @ " E ^ $ E ^ , ( @ & ( = J , ( 1 $ ( = z BASWR DELWR FDOPT , ( O B A ( * E ,
0x158eb4…159048 Dummy {f00=0x006d, f01=0x0190, f02=» P A z SORTF , ( @ < 0 * , ( @ < A A Z , ( < , ( # Q W : T , ( A ":HW " 9l Q 0W
0x159048…1591dc Dummy {f00=0x006d, f01=0x0190, f02=» * * ( $ 0SORT-AID REL 10.0 = + B * ( - + ? ERROR: A1= A2= T " ASG-ERR A7= CONPAR , ( @ 0 2DD FP P , (
0x1591dc…159370 Dummy {f00=0x006d, f01=0x0190, f02=» h bVBB * & { V8 6 V7 6 V6 , ( 6 V5 6 V4 6 V3 6 V2 D , ( 6 V1 6 SO WL NB t , ( I$ N1 N2 RL SR SK KA "C SYSFNR , ( KL C
0x159370…159504 Dummy {f00=0x006d, f01=0x0190, f02=» M R H D ! S Y a g iP m s f y z { } | H D ! f U R& +U Z H D ! IP g $ f +P 1T ATn IRf H D ! [ b c k q s p
0x159504…159698 Dummy {f00=0x006d, f01=0x40b8, f02=»P" 6 f 6 6 H D ! f %Q ) 6 -W ?T EW QQ UW i m q } F $ Mt @ +P 1T ATn IRf H D ! [ b c k q s p
0x159698…15982c Dummy {f00=0x006d, f01=0x0190, f02=» > @ IDENT DK3IPL REL 10.0 80-03-14 870136641000 6 2 IPL131 IPL132 IPL133 IPL231 IPL232 IPL233 F IPL131 IPL231 IPL132 IPL232 IPL133 IPL233 ,
0x15982c…1599c0 Dummy {f00=0x006d, f01=0x0190, f02=» j , ( , ) , ( 0 R _ <d?d U : , ( ! ?e R P S ?C/ G O j , ( A % R ' P % =B S t w E , ( a M % t R Q @ , (
0x1599c0…159b54 (3, 142) Dummy {f00=0x006d, f01=0x0190, f02=» . N 0 , ( N S W * , ( ! P X _ R R <"( R Z QBLFAC * ( A J , ( _ P #P & B. , ( T P
0x159b54…159ce8 Dummy {f00=0x006d, f01=0x4092, f02=» H D ! R U ' )P - E IP S oR. qQ& Q T T ( $ R 4 W -P _P gP T P |@ C * ( A J , ( _ P #P & B. , ( T P
0x159ce8…159e7c Dummy {f00=0x006d, f01=0x0190, f02=» > @ IDENT FLDIPL REL 10.0 80-03-14 870136641000 IPL811 IPL812 IPL813 F IPL811 h IPL812 | IPL813 , ( t v @0 UU , ( ! 3 2P _ , ) , (
0x159e7c…15a010 Dummy {f00=0x006d, f01=0x018e, f02=» , ( M % T S , ( . N 0 N 4 , ( S W d , ( P X _ R R " R R QBLFAC , ( ! & P , (
0x15a010…15a1a4 Dummy {f00=0x006d, f01=0x40ec, f02=» f , ( E M T 1 E _ M @ p : 8 H D ! F %P / 5 4 IT s } $ < T @ < T " N 8 4 " W " P < - " =P EP _T T @ P , (
0x15a1a4…15a338 Dummy {f00=0x006d, f01=0x0190, f02=» > @ IDENT MFDIPL REL 10.0 80-03-14 870136641000 IPL311 IPL312 IPL313 F IPL311 h IPL312 | IPL313 , ( "? UU 3 2P _ , ( ! , 5 T G. , (
0x15a338…15a4cc Dummy {f00=0x006d, f01=0x018e, f02=» , ( . N 0 S , ( N S W 4 , ( P X _ R R d , ( "? R R h:B* S , ( ! R P S B J 4R 4 :B , ( A 4 R
0x15a4cc…15a660 Dummy {f00=0x006d, f01=0x4128, f02=» f , ( P ( B. T P , ( ' " P : P S P S P 8 % `_" h H D ! 6 t P % 4 9T c ( m u y } ~ D @ & W P 'P 9R OV SV aR P P
0x15a660…15a7f4 (3, 143) Dummy {f00=0x006e, f01=0x0190, f02=» > @ IDENT COPFIL REL 10.0 80-03-14 870136641000 COPFIL F , ( X , ( ! , ( D A A *S : A ( A *_ @ RDORD , ( a @ A ( @
0x15a7f4…15a988 Dummy {f00=0x006e, f01=0x0190, f02=» h , ( D A _( ( @ &' RWORD 8 , ( H" : A S ( @ ' H ERPROT x RRWORD , ( T @ P _" , ( D @ : A A _J , ( 3 2
0x15a988…15ab1c Dummy {f00=0x006e, f01=0x0190, f02=»RORD , ( @ ' : ( B ' RFORD < FDLEN L , ( @ $ B : C COPFIL , ( @ ( B C C : , ( B 2 A A R A R A A , (
0x15ab1c…15acb0 Dummy {f00=0x006e, f01=0x0190, f02=» FMORD * & I D A - A . A 0 FMORG > FMREC1 N FMREC2 ` * & a ,( D A : D r , ( P y A <T D 2 H * & @ H A - A . ,( H , ( @
0x15acb0…15ae44 Dummy {f00=0x006e, f01=0x0190, f02=» * p_ @_. 6 0 @ , ( % P ^ p_ ^ p . , ( * C _d ^ W @ ^ , ( c T T @ : R D _( A , ( " S _0 A A _> @ : ZF _L , ( T D p W
0x15ae44…15afd8 Dummy {f00=0x006e, f01=0x0190, f02=» ] n , ( @ " ( R A R , ( ( W @ > A ] @ B > , ( 7H ] " ( : A B 0 n , ( ER S A > A A A A A A FMREAD , ( s A @ $( B
0x15afd8…15b16c Dummy {f00=0x006e, f01=0x0190, f02=» @ p FMWRIT , ( T A @ @ A W @ @ A A " , ( &( B ' @ R , ( @ + @ A @ A A $( B " I ' H D ! A G ^ MS S S< T P ES
0x15b16c…15b300 Dummy {f00=0x006e, f01=0x4056, f02=» W W W W R W R %W X p @ W< ' X , ^ @@ R &( B ' @ R , ( @ + @ A @ A A $( B " I ' H D ! A G ^ MS S S< T P ES
0x15b300…15b494 (3, 144) Dummy {f00=0x006e, f01=0x0190, f02=» > @ IDENT DMOFF REL 10.0 80-03-14 870136641000 J F " OPORD CLORD RSORD RFORD REORD RRORD WRORD RWORD RRWORD WRORN RDORD F J F " FDLEN FDRLEN FDORG FDFILE FDVOL FDOPT FDFNR FDSIZE FMLEN FMFILE J F " FMRLEN FMBLF FMORG FMREC1 FMREC2
0x15b494…15b628 Dummy {f00=0x006e, f01=0x018e, f02=»RD RSORD RFORD REORD 0 RRORD B WRORD T RWORD f RRWORD x WRORN RDORD FDLEN B FDRLEN FDORG FDFILE FDVOL
0x15b628…15b7bc Dummy {f00=0x006e, f01=0x415a, f02=» FMORG FMREC1 : FMREC2 < * FMCCD F > FMCRP L P FMSIZE b FMORD v FMOP FMCL FMREAD FMWRIT BASWR DELWR ERFC
0x15b7bc…15b950 Dummy {f00=0x006e, f01=0x40fc, f02=» > @ IDENT MNMDOS REL 10.0 80-03-14 870136641000 MNMDOS MNMLEN MNMPOI F MNMDOS h MNMLEN | , ( DU1 DU2 DU3 DU4 MD1 MD2 FD1 FD2 MNMPOI ! " @ NMDOS
0x15b950…15bae4 Dummy {f00=0x006e, f01=0x4072, f02=» @ @ IDENT TEST2 REL 10.0 80-01-03 870136641000 H @ n
0x15bae4…15bc78 Dummy {f00=0x006e, f01=0x4072, f02=» @ @ IDENT TEST1 REL 10.0 80-01-03 870136641000 H @ nD p@ |$PCASE PEND P$PCASF PMES M FOLLOWED BY C PMES ONLY COMBINATION PMES WHICH IS NOT PMES ALLOWED
0x15bc78…15be0c Dummy {f00=0x006e, f01=0x416c, f02=» > @ IDENT DUMEN2 REL 10.0 80-03-14 870136641000 F B IPL111 IPL112 IPL113 IPL211 IPL212 IPL213 IPL411 IPL412 F IPL413 IPL111 IPL112 IPL113 IPL211 IPL212
0x15be0c…15bfa0 Dummy {f00=0x006e, f01=0x0190, f02=» > @ IDENT CCISUB REL 10.0 80-03-14 870136641000 D @ BLRLEN CDISC CPRDEV CFIORG CSPNAL CYESNO CASSFC CASOUT F D @ CINDEV COTDEV CLAB CPCONV CCCODE STLIFI LOCKFD UNLOAD F B CDISC2 CTRSEC CIBMRL CMTDK1 CMTDK2 CMTDK3
0x15bfa0…15c134 (3, 145) Dummy {f00=0x006e, f01=0x0190, f02=» j , ( LPOP 0XLS TK1 TK2 MT1 MT2 pqCS CDTYPE , 8 REBUF L , ( ! H @ !NNP !YY BINRES CDFORM J , ( ? P A : @ ! P P BLRLEN f CCPBOT , (
0x15c134…15c2c8 Dummy {f00=0x006e, f01=0x0190, f02=»DISC2 CDISCT , ( @H @ FDX H @ T H " CDISLE R FIRFC d , ( A T W t CDISCA , ( A : W @ FDX , ( $H H @ T H A
0x15c2c8…15c45c Dummy {f00=0x006e, f01=0x0190, f02=» B , ( / W W S : @ , ( K $P W 9a D A : CFIORG j j CSPNAL ~ ~ , ( i : @ I P ^ W : R I STLIFI CYESNO , ( W : R !LLT
0x15c45c…15c5f0 Dummy {f00=0x006e, f01=0x0190, f02=» , ( X A (W A & A ( A " A $W CASIXF 8 CASOUT L , ( R A $ A (W A " A (W A ( A " A $ ` PBLK2 MIXLST , ( @@ A & @ $P W @ IXLIST WKLIST
0x15c5f0…15c784 Dummy {f00=0x006e, f01=0x0190, f02=»K , ( Q P P _ @ &T A , ( o A W @ $P A _ A _ : FMFPB j , ( @ @ " ] z * & ( = , ( " ( = , (
0x15c784…15c918 Dummy {f00=0x006e, f01=0x0190, f02=» B &( @ " LP FMREC1 ( FMCL : , ( 7 @ " ] ( ] ( *( A J , ( O @ @ &T A W A z CCIERR , ( i : P P , FMERR FDLEN
0x15c918…15caac Dummy {f00=0x006e, f01=0x0190, f02=» FDVOL , ( ( = 2 6 , ( @ ( = P > FDSIZE n , ( DP P P _& 8_, @ FDOPT BASWR , ( " *T @ *T 2 B : * & )H
0x15caac…15cc40 Dummy {f00=0x006e, f01=0x0190, f02=» A 2 A ~ , ( s @( B T : ! P RSORD L ERFC , ( @ ,' P B( @ l CLORD , ( @ DP W F( CCASSE , ( Q 9A D HT
0x15cc40…15cdd4 (3, 146) Dummy {f00=0x006e, f01=0x0190, f02=»T @ $T "] : | CMTDK1 J , ( A @ DKT A 0 CMTDK2 ^ ` , ( ] : @ DKP W A t CMTDK3 z CMTDK4 , ( y : @ DKX. W S DK , ( V A
0x15cdd4…15cf68 Dummy {f00=0x006e, f01=0x0190, f02=» , ( " ! P !TTP "W , ( @ W E P 4 , ( H A W A : d , ( %H @ @ "P ^ W CLAB J , ( A C ;b : @ ! YT A
0x15cf68…15d0fc Dummy {f00=0x006e, f01=0x0190, f02=»W : @ R I : W , ( @ ! P !P T A : " UNLOAD R WRINER f READAN x , ( [ : W A & W P , ( @ R_ A &W < @ # ( , ( B # T W IBM LABEL;
0x15d0fc…15d290 Dummy {f00=0x006e, f01=0x0190, f02=» I R P $ T W T # P WRITT . , ( i :' P P W T > CTRSEC n , ( _ Z rQ , 0 NUMBER CTR:30 , ( Z %U : ,! 9D ,"
0x15d290…15d424 Dummy {f00=0x006e, f01=0x0190, f02=» ^ 00 R _ a UPD:A4 2 . , ( V ]| (Y : B UPD:A9 6 r UPDA9B : FCCARD B CWAA J CCIBUF CWAL P CCIBFL , ( 5 : :
0x15d424…15d5b8 Dummy {f00=0x006e, f01=0x0190, f02=» h , ( < ) 2 6 , ( < ) P P P 8 * & P _& 8_, : &P T h , ( $ T @ A W , ( H @ T @ A * & $ W
0x15d5b8…15d74c Dummy {f00=0x006e, f01=0x0190, f02=» W T H D ! T T W P P #P )T /W 3W MP WWj uP {WF R W6 H D ! T T T W* W$ W W P W P #W )P 3W =W H D ! UP ]P gT q = sW yP P P P P = < > ! l 3P H D ! K = O S = YT
0x15d74c…15d8e0 Dummy {f00=0x006e, f01=0x417e, f02=» Q T -T 3T STj gP mWX W6 P W P P $ W0 $ H D !T W& $ P r W l 1P ?Wp UT aP cWL qW {W }W2 R& W H H D ! P P T W W W< Tl W W EP KR MP QT UW [T _P H D ! oP uP {W Q0 U R OW
0x15d8e0…15da74 (3, 147) Dummy {f00=0x006f, f01=0x0190, f02=» > @ IDENT SECNO REL 10.0 80-03-14 870136641000 " STACKP SECNO CHSCNO UPPR F STACKP l UPPR SECNO , ( 2 D TOT 0 $' $& P , ( ! P P P P W P , (
0x15da74…15dc08 Dummy {f00=0x006f, f01=0x018e, f02=» , ( W &? W J W CHSCNO 4 , ( 1g W L W : H , ( R Q R @ T R Q R x : : H D ! TN PL %P +P 1P, 7PB 9W$ ?PH EPP KPX QP` WPh ]Pp i kWp w
0x15dc08…15dd9c Dummy {f00=0x006f, f01=0x4008, f02=»@ W &? W J W CHSCNO 4 , ( 1g W L W : H , ( R Q R @ T R Q R x : : H D ! TN PL %P +P 1P, 7PB 9W$ ?PH EPP KPX QP` WPh ]Pp i kWp w
0x15dd9c…15df30 Dummy {f00=0x006f, f01=0x0190, f02=» > @ IDENT DK2IPL REL 10.0 80-03-14 870136641000 6 2 IPL121 IPL122 IPL123 IPL221 IPL222 IPL223 F IPL121 IPL221 IPL122 IPL222 IPL123 IPL223 , ( %?
0x15df30…15e0c4 Dummy {f00=0x006f, f01=0x0190, f02=» , ) ?e , ( =e Q P ?e R ( , ( P S ?C/ G O % R X , ( ' P % =B S t w E M , ( % n : T G.G K. A ;A; , ( G. x ]
0x15e0c4…15e258 Dummy {f00=0x006f, f01=0x0190, f02=» P X _ R z R x QBLFAC , ( 6"( R ~ | * , ( P #P & Z , ( B. T P ' " P : P S | P S ~ P " ^_" H D ! v : f ! 6 % b - ^ 1 ` 5 ;
0x15e258…15e3ec Dummy {f00=0x006f, f01=0x4010, f02=» @ x QBLFAC , ( 6"( R ~ | * , ( P #P & Z , ( B. T P ' " P : P S | P S ~ P " ^_" H D ! v : f ! 6 % b - ^ 1 ` 5 ;
0x15e3ec…15e580 Dummy {f00=0x006f, f01=0x4172, f02=» > @ IDENT GETFC REL 10.0 80-03-14 870136641000 GETFC F GETFC V , ( ( 8 ) 9 DUFDMD [ h , ( ! ; @ H -P Z : : , ( @ A H M :B L # ;A H , ( a @ P
0x15e580…15e714 (3, 148) Dummy {f00=0x006f, f01=0x0190, f02=» > @ IDENT CCITAB REL 10.0 80-05-09 870136641000 J F " FLTAB CCCMT CCSCT CCCCT CCFCT CCLCT CCSQT CCPBOT CCFAT CCLTT CCEMT F F B CCASSE QCCHBC QCCDBC QCCFOR QCCLIM QCCSPE QCCOBB QCCOBW J F " QCCOAS QCCMNI QCTCCL QCTIEL CCTSTT
0x15e714…15e8a8 Dummy {f00=0x006f, f01=0x0190, f02=» TOSS UTILITIES REL 10.0 DATE: 8 , ( ! 0-05-09 12NC=870136641000 ; 0CC * CCTCC < Z QCTCCL l CCTIE B QCTIEL CCCMT L , ( A : WHAT?? CRV CRF DLF PVC PD , ( a S UDS CDD CFF CFT CTF PR
0x15e8a8…15ea3c Dummy {f00=0x006f, f01=0x0190, f02=» *+ , ( W * , ( 8 Z , ( ! 8 # ! , ( A # " - D , ( a 6 87
0x15ea3c…15ebd0 Dummy {f00=0x006f, f01=0x0190, f02=» OTLIST , ( J KLMVQRSTO 8 ASLIST B WKLIST V MIXLST j IXLIST ~ FLTAB , ( NP B AI QCCHBC QCCDBC QCCFOR
0x15ebd0…15ed64 Dummy {f00=0x006f, f01=0x0190, f02=» A A V! VAW!T T"V" , ( ! $, B A A A A A A AVAVA & , ( A T A A A A V!VAVA A V , ( a A E E AV!E A VAV! AV! , ( V!W! AW! A AT V/V/ CCFCT , ( T
0x15ed64…15eef8 Dummy {f00=0x006f, f01=0x0190, f02=» , ( ! ( , ( A X CCLCT n , ( a MAXBLK , ( |
0x15eef8…15f08c Dummy {f00=0x006f, f01=0x0190, f02=» l , ( c ! , ( ! < , ( ? ! l , ( ] d ! , ( { ! , ( @
0x15f08c…15f220 Dummy {f00=0x006f, f01=0x018e, f02=» CSPNAL ! STLIFI " BLRLEN " " * & " 4 CFIORG " b CASSFC " t CYESNO " , ( " CINDEV " COTDEV " CLAB " , (
0x15f220…15f3b4 (3, 149) Dummy {f00=0x006f, f01=0x0190, f02=» CTRSEC # * & ) P # CIBMRL # D CASOUT # V CMTDK1 # h , ( = D " $ & # z UPD:A4 # CMTDK2 # UPD:A9 # CMTDK3 # CDTYPE # , (
0x15f3b4…15f548 Dummy {f00=0x006f, f01=0x018e, f02=» 6 8 # | CMTDK4 $ CWAA $ , CWAL $ < UPDA9B $ L CDISCA $ ^ * & w : < > @ $ p CDFORM $ DTYP $ CCPBOT $ , ( B D ( . 1 2 7 $ , (
0x15f548…15f6dc Dummy {f00=0x006f, f01=0x0190, f02=» $ f , ( * % CCFAT > % 8 CRVOL % J CRFILE % Z , ( # H F % l DLFILE % PRVTOC % PRDISC % UPDISC % COPVOL % COPFIL %
0x15f6dc…15f870 Dummy {f00=0x006f, f01=0x0190, f02=» UNLOAD % COPYIT & COPYTI & $ IBMLBL & 6 PRINDX & H , ( Q X Z ^ ` b d f & Z BINDEX & RINDEX & COPYCF & SORTF & CCLTT j & , ( a h j l n p
0x15f870…15fa04 Dummy {f00=0x006f, f01=0x0190, f02=» & r , ( ' , ( ' B CCEMT ' r , ( ' , ( 7 ' , ( W
0x15fa04…15fb98 Dummy {f00=0x006f, f01=0x0190, f02=» ' t , ( ( , ( ( D , ( ( t , ( 7 ( CCASSE ( FMERR n ( , ( W
0x15fb98…15fd2c Dummy {f00=0x006f, f01=0x0190, f02=» NAME:; OLD RESP. NEW VOLUME NAM ( , ( ES:;FILE NAME:; NUMBER OF VTOC E ) * , ( NTRIES:;CREATION DATE:; RETENTIO ) Z , ( N PERIOD:;BLOCKING FACTOR:; EFFE ) , ( 7 CTIVE RECORD LENGTH:; MAXIMUM NU ) , ( W MBER OF RECORDS:; SECT
0x15fd2c…15fec0 Dummy {f00=0x006f, f01=0x0190, f02=»***;PACK:;OUTPUT D ) z , ( EVICE:; LABELLED TAPE:; SEQ. NUM * , ( BER INPUT TAPE:;SEQ. NUMBER OUTP * J , ( UT TAPE:; BLOCK FACTOR INPUT TAP * z , ( 7 E:; BLOCK FACTOR OUTPUT TAPE:;TA * , ( W PE VOLUME ID:;RECORD LIMITS:; PR * ,
0x15fec0…160054 (3, 150) Dummy {f00=0x006f, f01=0x0190, f02=»SW * j , ( ITCH ON SOP:; MORE THAN ONE APPL + , ( ICATION :;DATA SET NAME:; BOE-SE + : , ( CTOR:;EOE-SECTOR:;EXPIRATION DAT + j , ( 7 E:; VOLUME INITIALIZATION:; SECT + , ( W OR OF DATA SET LABEL:;NUMBER OF + , ( w INDEX
0x160054…1601e8 Dummy {f00=0x006f, f01=0x0190, f02=» PE:;LOAD FACTOR:; INDEX FILE NAM + , ( E:; MASTER INDEX FILE NAME:;INPU , * , ( T DEVICE:;PTS 6876 DISC :;MAX NO , Z , ( 7 OF RECORDS ON OUTPUT INDEX FILE , , ( W :;SUB-KEY ADDRESSES IN RECORD:; , , ( w SUB-KEY LENGTHS IN REC
0x1601e8…16037c Dummy {f00=0x006f, f01=0x0190, f02=» DISC:; DISC VERSI , z , ( ON:;DISC NOT OPERABLE;BADSPOT ON - , ( TRACK ZERO.DISC NOT USABLE;MORE - J , ( 7 THAN 18 BADSPOTS.DISC NOT USABL - z , ( W E;DISC I/O ERROR.;PRINTER NOT OP - , ( w ERABLE; TOO MANY SECTORS IN FILE - ,
0x16037c…160510 Dummy {f00=0x006f, f01=0x0190, f02=»EN - j , ( TRY AVAILABLE;FILE NAME ALREADY . , ( USED; NO TOSS DISC FORMAT;TAPE U . : , ( 7 NIT NOT OPERABLE; OUTPUT DISC NO . j , ( W T EMPTY;FAULTY RECORD LENGTH; OU . , ( w TPUT FILE NOT LARGE ENOUGH; OUTP . , ( UT FIL
0x160510…1606a4 Dummy {f00=0x006f, f01=0x0190, f02=» ; BLOCK FACTOR ON OUTPUT TOO L . , ( ARGE; TAPE MARK MISSING;TAPE MAR / * , ( 7 K MISSING AFTER LABEL RECORD; LA / Z , ( W BEL RECORD MISSING; UNEXPECTED T / , ( w APE MARK; LABEL RECORD ERROR; IL / , ( LEGAL BLOCK LENGTH ON
0x1606a4…160838 Dummy {f00=0x006f, f01=0x0190, f02=»FILE NAME UNKNOWN; / z , ( FLEX. DISC ALREADY LOCKED;FLEX. 0 , ( 7 DISC NOT LOCKED;FLEX. DISC WRITE 0 J , ( W PROTECTED; DATA SET NAME ALREAD 0 z , ( w Y USED; DATA SET NAME NOT FOUND; 0 , ( NO IBM DISC FORMAT; BLOCK SEQUEN 0 ,
0x160838…1609cc Dummy {f00=0x006f, f01=0x0190, f02=»L 0 j , ( SECTOR NUMBER;CARD READER NOT OP 1 , ( 7 ERABLE; FILE ORG. ERROR;CORE ARE 1 : , ( W A TOO SMALL;RECORD NOT IN FILE-E 1 j , ( w ND OF MEDIUM; ILLEGAL POSITION N 1 , ( UMBER;NOT ALLOWED TO MIX DISCSIZ 1 , ( ES; NO
0x1609cc…160b60 Dummy {f00=0x006f, f01=0x0190, f02=» N FILE; ILLEGAL VOLUME/FILE NAME 1 7 ; 2 * H D ! M Z k m o q s u w y { } < T h x 2 < H D ! : T T d 2 H D ! t
0x160b60…160cf4 (3, 151) Dummy {f00=0x0070, f01=0x0190, f02=» 2 2 l H D ! J ! T # f % p ' x ) + - / 1 3 5 7 9 ; = 3 ( H D ! ? A C E G 6 I F K M O 2 Q X S F U X W Y [ ] 3 t H D ! _ a c F e ~ g X i k m o F q s X u h w y { X } h 3
0x160cf4…160e88 Dummy {f00=0x0070, f01=0x0190, f02=» 3 X H D ! t X h b X X 0 0 X ^ 4 H D ! t ~ X ^ t ~ F X b 4 ` H D ! F X h > ^ t 4 H D ! ! # %
0x160e88…16101c Dummy {f00=0x0070, f01=0x402e, f02=» m w 4 8 5 @ 5 * X X 0 0 X ^ 4 H D ! t ~ X ^ t ~ F X b 4 ` H D ! F X h > ^ t 4 H D ! ! # %
0x16101c…1611b0 Dummy {f00=0x0070, f01=0x0190, f02=» > @ IDENT COPVOL REL 10.0 80-05-09 870136641000 COPVOL F , ( X , ( ! , ( A , ( a
0x1611b0…161344 Dummy {f00=0x0070, f01=0x0190, f02=» 0READ ERROR x & ( SECTOR NO: TO , ( FILE NAME: DE B ( ( ! STROYED RECORDS: TO r , ( A 0INPUT DISC 0OUTPUT DISC , ( a @ x | , (
0x161344…1614d8 Dummy {f00=0x0070, f01=0x0190, f02=»)E ( A 8 @ tP @ 6 @ BY,R @ 8 @ D , ( ^8W @ 6 @ @ 8 @ V^J YB $ . , ( D ! ) Y : ) @ . ) @ 0 ) ^ , ( D A @ * ) @ , ) ) @ ) : , ( @$ a @ P<E H A 6 ( A 8 H , ( %E A 2 ( A 4 @ 6 @
0x1614d8…16166c Dummy {f00=0x0070, f01=0x018e, f02=» J L ( ~ , ( @ ! @ J @ L , ( ! J > L @ A @ : A ` @ < A N DSUMOD ~ ADDMOD , ( A b @ B @ D @ Z , ( ]@ @ A ` A b @ VP A , ( T {
0x16166c…161800 Dummy {f00=0x0070, f01=0x018e, f02=» BINACR , ( 0 @ , ( T < @ > @ @ F , ( @ > @ @ @ V v , ( J +@ " , ( RP I ( 2 @ @ % , (
0x161800…161994 (3, 152) Dummy {f00=0x0070, f01=0x0190, f02=» f , ( B @ ( A J A LW @ J @ L @ , ( U Z A J A L & " ( $ 8 , ( ( 2 A A A A Z Z h , ( @ ! : : C ( , ( A B ' : _* , ( a 0
0x161994…161b28 Dummy {f00=0x0070, f01=0x0190, f02=» A ( / : , ( J L ( ( , ( B B / : _> X , ( ( ! A 0 2 P , ( A *_ : A " ! R ( B , ( a R T T W " T
0x161b28…161cbc Dummy {f00=0x0070, f01=0x0190, f02=» A A x , ( @ @ P : B A P , ( P B _| B P A j B H , ( %* P R @ l @ n x , ( ? @ l @ n @ j , ( A$ [ " : F _R , (
0x161cbc…161e50 Dummy {f00=0x0070, f01=0x0190, f02=» h VOLNAM , ( C R C , ( I I " C C C ( J , ( $ ( C W A ( z , ( 7 B ' : ( B , ( W ( C
0x161e50…161fe4 Dummy {f00=0x0070, f01=0x0190, f02=» D 1 C ( B , , ( % Y 2 $ 2 , Y A * , ( @ v @ v Y Z , ( P A J A L 2 A < A l A , ( J ) 2 A A @ l A l A A * & T I l A n x @ J @ L @
0x161fe4…162178 Dummy {f00=0x0070, f01=0x0190, f02=» ( 2 A A R , ( ( A A R A a R A A R , , ( * A A A F 0 2 , ( , $ Y $ TO R , ( % % J X R , ( , ( D E Y ( TO $ A |
0x162178…16230c Dummy {f00=0x0070, f01=0x0190, f02=» z @ P:H A X | * & @ A @ P<E J * , ( U Y A F A H | A @ x J , ( ) @ N ^ z , ( ! ! B $ T A $ A , ( A $ A $ A B $ A D $ A ,
0x16230c…1624a0 Dummy {f00=0x0070, f01=0x0190, f02=»W j , ( J A ( , ( ! R : , ( _~ P _ j , ( U! ! A A d A h A r A f H ( @ B , ( B A @ D A B A D @ d @ f @ h @ , ( E _ r (
0x1624a0…162634 (3, 153) Dummy {f00=0x0070, f01=0x0190, f02=» A W A A A , ( U @ P A A 0 @ B * , ( U A : @ D A < @ F R @ H A Z , ( T f @ F @ H A F A H @ f A , ( ! = " $ , ( J" ] J L $ A
0x162634…1627c8 Dummy {f00=0x0070, f01=0x0190, f02=» A T A V @ T @ V @ T^ A , ( Z z A @ P<H A X , , ( P A H A 2 ( A 4 A f @ , ( R R @ 6 @ BQ R @ 8 @ DV ` A , ( ; f @ 2 A * @ 4 A , @ Z 2 J , ( [ 4 L @ T A
0x1627c8…16295c Dummy {f00=0x0070, f01=0x0190, f02=» @ V A 2 A 4 @ | , ( ( 6 @ 8 @ V A 6 A 8 T , ( E! @ V @ @ @ V A L , ( T A @ " @ $ @ V A " A $ | , ( ( / T @ VR @ VP @ T A _ 2 A , ( O J L @ Z P @
0x16295c…162af0 Dummy {f00=0x0070, f01=0x0190, f02=» @ V l , ( @ A 6 A 8 Q @ VR @ f @ , ( 2 I @ 4 )W @ ) % < , ( J @ A " $ l , ( R ' _ @ " @ $ @ V , ( H G A " A $ @ @ @ V , ( TE c A
0x162af0…162c84 Dummy {f00=0x0070, f01=0x0190, f02=» A f H A 2 ( A 4 @ R @ , ( 6 @ BQ R @ 8 @ DV ` A f @ , , ( T z @ ~ P X , ( JH # @ @ , @ T % , ( UU C A J L L A . A 0 , ( IU c "T $P J
0x162c84…162e18 Dummy {f00=0x0070, f01=0x0190, f02=» W W W t | , ( W W W t W t W W , ( W : @ l A p @ n A r @ L , ( Q # @ A A @ ?( @ p | , ( B C @ r A A @ ?( , ( a ( B P P B @
0x162e18…162fac Dummy {f00=0x0070, f01=0x0190, f02=» A l A : H D ! l ^ T4 P X P R W m Q x sPJ R $ H D !"` W P & U U* W U uT P ?P WR* cR iT oT p H D !- qW uT } T P P P PZ PP P T T H D
0x162fac…163140 Dummy {f00=0x0070, f01=0x410a, f02=» gPJ mP" T H D ! @ uQ W Q W: Q W P R T R 'Q )R 3V T H D ! R T 6 3T 9R ?P Q R W T P> R Q R V =T H D ! gT mP T P* W6 W W. W$ W W W W W W mP sP @
0x163140…1632d4 (3, 154) Dummy {f00=0x0070, f01=0x2008, f02=» d L = REL10.2,5 1 DATE = 800508 6875PACK NBR = 9999 f ?
0x1632d4…163468 Dummy {f00=0x0070, f01=0x0190, f02=»` " ` _ Yv _ : %%% : d@dR e " = @ A A PAGE 0OK? 0OUTPUT VOLUME NAME: e C C R Ae " P Ae ( : : B e $ ) Y e e e e Ae e ( `e YP $ : R _ P
0x163468…1635fc Dummy {f00=0x0070, f01=0x0190, f02=» V *W R - _ 1 T R Pf - _ : RXR _ P 0 / R : ; [ [ [ [ B@ g g ' g g d g g g Z Z Z Z : : ; g g, :
0x1635fc…163790 Dummy {f00=0x0070, f01=0x0190, f02=»h R Xh _ Ah P Q T Z& - _. Ah @h R - 0 - _F Z Z Z Z : :** d ' i Ah S : Ah Ah _ @h Ah @h Ah : h ( i. : B l^ lb : Ah S
0x163790…163924 Dummy {f00=0x0070, f01=0x0190, f02=» @h lj : Ah Ah _J 2 - Y : Ah S W Ah Ah @h @h @h Q R @h @h U h C i. : h ( @h ' i. : h ( B ' i. B lj : B C ( B i. C C : h 2 Ah Ah R Ah R Ah Ah Ah
0x163924…163ab8 Dummy {f00=0x0070, f01=0x0190, f02=» 2 H H Ah Ah h ( H <T H : ln lr lf Ah Ah Ah Ah Ah PxW, iD @h : RX: R" jF @h @P i ir i _ i _. 6 i jF @h @P i ir i _ i ir i _d i ir i iJW iD @h T> T, @h : R h ir i _( Ah S _0 Ah Ah _>
0x163ab8…163c4c Dummy {f00=0x0070, f01=0x0190, f02=»( R Ah R h ( W @h Ah ] : @h ] < h ( : Ah 0 Ah Ah Ah Ah Ah Ah Ah Ah h ( i. h B B n h h @h @h Ah ( Ah @h lj h ( i. h B B ln @h Ah @h Ah W< @h Ah Ah h
0x163c4c…163de0 Dummy {f00=0x0070, f01=0x0190, f02=» B > R > Z$W4 R & P2 nrW W ^f b 7P P ^j ) r n _Z [ : ( B X > Z ^N 01 W (W ( W ^F R W R " R MP W C C ( B P ( B a ^N R nrWL! ^Z 1 /TD R P D M T*
0x163de0…163f74 (3, 155) Dummy {f00=0x0071, f01=0x0190, f02=»P8 # Dp ! p $P" # p." C C ( B Y _& [ : R C * C C p C ( B Y B Y| o W GOX ABX n HDR LABEL CHECK: ERR +VOLUME +LABEL +IDENTIFIER LABEL RECORD: 'h B B ln @h Ah @h Ah W<' ENTER COMMAND
0x163f74…164108 Dummy {f00=0x0071, f01=0x0190, f02=» B 00000000W 9 $ R ! P qR Aq qNW qR : W ( B r : ( :( B P 9 r 7 q( ( q qf_* q W $ Iq ^ K $ ! P $ Iq ^ N $ Iq ^ q r W W ^F 1 Aq ! $ Iq ^ q#
0x164108…16429c Dummy {f00=0x0071, f01=0x0190, f02=» : ^J $# 9P : % : 0 % ^ : 0 % ^ :Y _& [ : R C * C C p C ( B Y B Y| o W GOX ABX n HDR LABEL CHECK: ERR +VOLUME +LABEL +IDENTIFIER LABEL RECORD: 'h B B ln @h Ah @h Ah W<' ENTER COMMAND
0x16429c…164430 Dummy {f00=0x0071, f01=0x0190, f02=»2 ~ P RTN A14 P* P EJECT COPFIL $ P* < P* **************** F P* * ENTRY COPFIL * ` P* **************** z P* PCOPFIL EQU * & P ST A14,STACKP STORE STACKPOINTER " P LDR* A1,A12 GET BUF1 ADDRESS ( P ST A1
0x164430…1645c4 Dummy {f00=0x0071, f01=0x0190, f02=»2+2 BUF2 ADDRESS TO ECB2 P* . P LD A3,QFC,A12 GET FILE CODES INPUT/OUTPUT * P ECR A2,A3 0 P SC A2,ECBIN+1 FILE CODE INPUT DISC TO ECBIN n 4 P SC A3,ECBOUT+1 FILE CODE OUTPUT DISC TO ECBOUT 0 P SC A3,ECB2+1 FILE CODE OUTPUT DISC TO ECB2
0x1645c4…164758 Dummy {f00=0x0071, f01=0x0190, f02=»FF P ANKL A2,/FF P CWK A2,/A0 P ABL(L) L1 2 P CWK A3,/A0 D P ABL(L) RTN:06 TYPE ERROR X P ABL L2 OK,BOTH ARE S-FILES z PL1 EQU * P CWK A3,/A0 P ABL(NL) RTN:06 TYPE ERROR " P ABL COPYL OK,BOTH ARE L-FILES
0x164758…1648ec Dummy {f00=0x0071, f01=0x0190, f02=»* P LDKL A8,ECBIN & P CF A14,VTOC READ VTOC INPUT DISC P* =4 START J ( P LD A10,FDRLEN,A1 RECORD LENGTH=A10 P* P LC A6,FDFNR,A1 FILENR P SC A6,ECBFM+1 IN FM ECB P ST A1,ECBFM+2 P LDKL A6,FMLEN P ST A6,ECBFM
0x1648ec…164a80 Dummy {f00=0x0071, f01=0x0190, f02=» P LD A6,FMREC1,A1 =4 P ST A6,FREC1 =4 & P LD A6,FMREC2,A1 LAST RECNR PART 2 8 P ST A6,FREC2 =4 b P RF(NZ) A006 z & P LD A6,FMREC1,A1 LAST RECNR PART 1 P* =4 END P* P EJECT COPFIL P* P* PA006 EQU *
0x164a80…164c14 (3, 156) Dummy {f00=0x0071, f01=0x0190, f02=»,FDRLEN,A2 RECORD LENGTH=A4 P LC A5,FDFNR,A2 FILE NR $ P SC A5,ECBFM+1 D P ST A2,ECBFM+2 Z P LDKL A7,FMORD p 2 P LDKL A8,ECBFM READ FILE PARM BLOCK OUTPUTFILE P LKM P DATA 15 P LD A5,FMREC2,A2 LRN PART 2 & P RF(NZ) A007
0x164c14…164da8 Dummy {f00=0x0071, f01=0x0190, f02=»CT COPFIL P* P* 2 P CC A11,FMORG,A2 COMPARE FILE ORGANIZATIONS =4 ( . P ABL(NE) RTN:06 JUMP TO ERROR IF NOT EQUAL ^ P* 2 P CWR A4,A10 COMPARE INPUT/OUTPUT RECORD LENGTH * P ABL(NE) RTN:03 FAULTY RECORD LENGTHS? P ST A4,ECB
0x164da8…164f3c Dummy {f00=0x0071, f01=0x0000, f02=»
0x164f3c…1650d0 Dummy {f00=0x0071, f01=0x0016, f02=»
0x1650d0…165264 Dummy {f00=0x0071, f01=0x0190, f02=» Or : 0 j 0 $ ^ : 9 i $ 7 f w |4r tV u 3 qC 5 * zuqV $ ' > P ZD o c r P| sV i % 9Zj Q > - D $ 4` 1P -8 T r tB l`Tg t z ^ ,* # + RC: | | 0 z
0x165264…1653f8 Dummy {f00=0x0071, f01=0x0190, f02=»D OF ;PROGRAM ABORTED BY OPERATOR; T+} T* > R > V W C C ( B P 8_ B Z T $ B U [ B : $ !; P I , =Z I , * C C ( : [ ) $ Z : [ [ [ [ QxP~
0x1653f8…16558c Dummy {f00=0x0071, f01=0x0190, f02=» [ _ '0 Y R '0 Y$R '0 '8 Y6 _ [ [ Q. , 0R" 9U AR FQ 0 P =D _, [ Z Z : = ! U 9 - Y : [ [ [ [ [ [ [ RZ 0=A * T R !LLT
0x16558c…165720 Dummy {f00=0x0071, f01=0x0190, f02=» U+|ZN j T* >BV ,W,_d>AV* ^ P P~ >Px Pr PlW _ A n T* >FV :A H,0 @ nY H,2 @ nZ >AV - W _ _ @ n @ r >BV -Wp>AV -Wh>AVd B j RV _ @ r T T S S S S >T T S S S S @ p - - T.M A r
0x165720…1658b4 (3, 157) Dummy {f00=0x0071, f01=0x0190, f02=»P X _ @ l I) :a A l ;a L* # A @ A B P A B TH 2 #( W0 @ BP 2 #( : d M ^ R _ )h W D_ * $ @ @P8 P2 R " R Q 2 #( @ @ T R A @_. @ l /
0x1658b4…165a48 Dummy {f00=0x0071, f01=0x0190, f02=» A ~ H) A v ( $ P P >P P P W _ A n T >FV :A H @ nY H @ nZ >AV W _ _ @ n @ r >BV -W >AV -W >AV B j R _ @ r T T S S S S >T T S S S S @ p - - T A r
0x165a48…165bdc Dummy {f00=0x0071, f01=0x0190, f02=»P X _ @ l I :a A l ;a L # A A P A T #( W @ BP 2 #( : d M ^ R _ W D_ * $ @ @P P R " R Q 2 #( @ @ T R A @_. @ l
0x165bdc…165d70 Dummy {f00=0x0071, f01=0x0190, f02=» A ~ H A v ( $ P P >P P P W _ A n T >FV :A H @ nY H @ nZ >AV W _ _ @ n @ r >BV -W >AV -W >AV B j R _ @ r T T S S S S >T T S S S S @ p - - T A r
0x165d70…165f04 Dummy {f00=0x0071, f01=0x0190, f02=»P X _ @ l I :a A l ;a L # A A P A T #( W @ BP 2 #( : d M ^ R _ W D_ * $ @ @P P R " R Q 2 #( @ @ T R A @_. @ l
0x165f04…166098 Dummy {f00=0x0071, f01=0x0190, f02=» A ~ H A v ( $ P P >P P P W _ A n T >FV :A H @ nY H @ nZ >AV W _ _ @ n @ r >BV -W >AV -W >AV B j R _ @ r T T S S S S >T T S S S S @ p - - T A r
0x166098…16622c Dummy {f00=0x0071, f01=0x0190, f02=»P X _ @ l I :a A l ;a L # A A P A T #( W @ BP 2 #( : d M ^ R _ W D_ * $ @ @P P R " R Q 2 #( @ @ T R A @_. @ l
0x16622c…1663c0 Dummy {f00=0x0071, f01=0x0190, f02=» A ~ H A v ( $ P P >P P P W _ A n T >FV :A H @ nY H @ nZ >AV W _ _ @ n @ r >BV -W >AV -W >AV B j R _ @ r T T S S S S >T T S S S S @ p - - T A r
0x1663c0…166554 (3, 158) Dummy {f00=0x0071, f01=0x0190, f02=»P X _ @ l I :a A l ;a L # A A P A T #( W @ BP 2 #( : d M ^ R _ W D_ * $ @ @P P R " R Q 2 #( @ @ T R A @_. @ l
0x166554…1666e8 Dummy {f00=0x0071, f01=0x0190, f02=» A ~ H A v ( $ P P >P P P W _ A n T >FV :A H @ nY H @ nZ >AV W _ _ @ n @ r >BV -W >AV -W >AV B j R _ @ r T T S S S S >T T S S S S @ p - - T A r
0x1666e8…16687c Dummy {f00=0x0071, f01=0x0000, f02=»
[…0x5…]
0x167060…1671f4 (3, 159) Opaque[0x194]
0x1671f4…167388 # DirEnt {nam=»FLXMON«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0e40, f03=0x0000}
0x1671f4…167388 IdxSect {
0x1671f4…167388 f00 = 0x0072 // 0x1671f4 @0x0
0x1671f4…167388 f01 = 0x000a // 0x1671f6 @0x2
0x1671f4…167388 gno = [ // 0x1671f8 @0x4
0x1671f4…167388 [0x00]: C0x0072.0x0.0
0x1671f4…167388 [0x01]: C0x0072.0x1.0
0x1671f4…167388 [0x02]: C0x0072.0x2.0
0x1671f4…167388 [0x03]: C0x0072.0x3.0
0x1671f4…167388 [0x04]: C0x0073.0x0.0
0x1671f4…167388 ]
0x1671f4…167388 }
0x167388…16751c Dummy {f00=0x0072, f01=0x0190, f02=» ,` & J & c @ z ^ ^ bHPH H ^2 Z ` z
0x16751c…1676b0 Dummy {f00=0x0072, 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 B 6 & ? ? ? ? ? ? ? @ 6 > > U H ( ( P c P W. A 6 V ( U P
0x1676b0…167844 Dummy {f00=0x0072, f01=0x0190, f02=»_ _( ^ P H H #P F A A "Q ^ @ 4 ) A 4_ A $ A 6_ ? ? ? ? ? ^ A _ _ ^ ? ? ? 4 $P T I R $ 5 % ^ FW ^ W ^ T T U U U U T U W , ,
0x167844…1679d8 Dummy {f00=0x0072, f01=0x0190, f02=» " ? * X R Y P _ ? @ 8 R Y P _ W6 8 X W. ? ` @ @ P $ H W W > > > > > > > > @ nV ? n > _ > ? _ > > ? ^ ! Y ^ _ & ^ A. #M 1
0x1679d8…167b6c Dummy {f00=0x0072, f01=0x0190, f02=» B A " P T YF ZJ X T X M A H & . r 6 6 ^ @ $ l 8 Px X XZ# Y ) Wf " P P F_ :CV + W* T T * _<#/ X T Y P ) Y C C Y A P8
0x167b6c…167d00 Dummy {f00=0x0072, f01=0x0190, f02=»P F W Y @ T* 6 ] D W @ :C _L) @ _ :P _ Y > ;g# + _ Y B _ F Y _ 6 :XB_P Y 8 M # C P A _ A A ` A _* _ _2 _6 _: _> _B A ?M P: A PdQ* ?
0x167d00…167e94 (3, 160) Dummy {f00=0x0072, f01=0x0190, f02=» l # X& :T X T >:EV W X T Y F:DV X Qx >:EVp W " P Y WD X $ QB R _ P U F _ : V # P W Y P X ' P Y _ Y " "
0x167e94…168028 Dummy {f00=0x0072, f01=0x0190, f02=» X X V 9_> @ ! ! T< 9 X Y 9 X L | Y ! F X6 &R f d h B X ; Z Y B Z$ ^* Y* Y 6 Y 4 B Y 0 V Y 8 Y 2 Y 6 X !? P* P P" P x ! , !
0x168028…1681bc Dummy {f00=0x0072, f01=0x0190, f02=» 8! T X 8 Y 4 X 2 C X 6U Y 0 8 P l ^ V Y Y X &P y &_$ & _4 Y & X ( P Y : ! F ! X # P Y (:A , Y X| Y $ X Y C '? X b _* A ? ? V H * H .T $B P W J T % V I * H ,T B > > > ? ? ?
0x1681bc…168350 Dummy {f00=0x0072, f01=0x0190, f02=» X 0 X 2 4 A ;D A 4 T , _ P ^ ^ ^ 4 _ , , @ 1 A _ P 9 > > >
0x168350…1684e4 Dummy {f00=0x0072, f01=0x0190, f02=» & > > > > > > > $ " [ [ [ [ [ [ [ > > [ [ 6 Z Z ? ? Z Z Z Z Z Z Z " $ & > h P~ "R~ Y l Pj T P` ^ <UR "R4 h PB X R< X T6 X T0. T G
0x1684e4…168678 Dummy {f00=0x0072, f01=0x0190, f02=»XL X@ Y @ P R T X "P Xb I Y # C C # P Y '? Y Y T # P W , Y (@ 2 ^ X L % T L Rr (@ L U0 L QF L # T R < 5 ^ R < 5 Y P X D ( ) 1 > _" X
0x168678…16880c Dummy {f00=0x0072, f01=0x0190, f02=» # P 0P 1 _ P W Y ($SWAP A A A A @ A. UU @ @ ! P$>B @ T A T @ T E D P _ $ % $P _ % A A @ " Q" :d @ # U RDP2 P
0x16880c…1689a0 Dummy {f00=0x0072, f01=0x0190, f02=»BAP COP A W F A @ : V, @ P X;b=H : ~ F ~W =J : RT F PN W @ $ P( @ R W 8 !RRT W V P A Y W @ " T> W @ V W Q X * T Y P @
0x1689a0…168b34 (3, 161) Dummy {f00=0x0072, f01=0x0190, f02=»T F W V X = V W Y* P Z( = :L < P W <9B @ V W Q X W @ T @ V ! P W @ V P _ @ ! P( | !RRP V V W _< X |
0x168b34…168cc8 Dummy {f00=0x0072, f01=0x0190, f02=» 9b ) V _ @ V W W P TJ V 0 !;;P P V P$ _ P !;;T X$ W h_J X T W X W @ W V 0 !;;P P V Xf _ P !;;T X$ W
0x168cc8…168e5c Dummy {f00=0x0072, f01=0x0190, f02=» V $ ) H A I. : C. X C.9h! # " :A K : A T.I T P 1 I P < R P A _> X : @ " P P A A A A W A A < A @ A h A l A A V A A
0x168e5c…168ff0 Dummy {f00=0x0072, f01=0x0190, f02=»" n : 0 R _ <d?d A U <e @ P A <C, D L " @ $ P " :B A t w B J " r R,Q$ @ ( = @ Q @ "| _@ _$ : A A A 0 A 4 A V A A A : h:B* A @ P A B J 4R 4 :B
0x168ff0…169184 Dummy {f00=0x0072, f01=0x0190, f02=» A I ! : 9D @ @ r s @ A I T - A _ I N T V S : X 9PJ S Y T@ $ 1T: C !CCTr : 1P P$_ P =H P D @ T X W n : YX d C !CCT xB. <X B.9 H Q
0x169184…169318 Dummy {f00=0x0072, f01=0x0190, f02=»V W V T W P Z V T W P V W @ $ P p W h T : A V_| 0V , - P X 9A_ : @ ! P (W ( :W> 2 W 0 . " A A A A A 2 ; Z [ : : [ [ :
0x169318…1694ac Dummy {f00=0x0072, f01=0x0190, f02=» A. c R $ )_ : V W 0 : W ; V : : J @ 0 V @ X 0 H W : @ A 9n A @ A A r A. @ t @ W A ^ : A lA > ;h 0 :C # : .=H N
0x1694ac…169640 Dummy {f00=0x0072, f01=0x0190, f02=» ? ? > v V @ @ X A ,< ,>P X W r ,> X W @ @ % , V , P@ , - 4 ] 4 |Y 5 X * _6 : W @ F ] @ P @ " P : V _ W W . !TT
0x169640…1697d4 (3, 162) Dummy {f00=0x0072, f01=0x0190, f02=» @ T X A : ` @ P _ 3 S S V V W @ @ T X : P S S _ : @ @ @ #D# P ; V ! _ : @ " P @ P 3 _ @ " P S 1 S 9J S (
0x1697d4…169968 Dummy {f00=0x0072, f01=0x0190, f02=» =H N + W p N =H N D W | ( @ % 5 T W @ = V W = V +^ P0 +| r " U X _2 +n P0 +| " U X _2 V tPZ S ( V | S =J @ " S V l S
0x169968…169afc Dummy {f00=0x0072, f01=0x0190, f02=» . !TTP X V +N W t * +^ P +| r _ +n Pd W p +| V 8 8 4 D P$ h @ # P H I K T + Y@ V p _f V t Y ^ !TTX @ @ T X : W % @
0x169afc…169c90 Dummy {f00=0x0072, f01=0x0190, f02=» +N 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 X : ^ !TTX !CCTr +N P, +| V r 4 U X $ $ _. +n P, +| V
0x169c90…169e24 Dummy {f00=0x0072, f01=0x0190, f02=» +N P0 W f +| W d + V d V r < '. V f _2 +n Un +| V 8 U X 8 8 8 4 D P$ h @ # P H I K T + Y@ _pR& @ @ @ % P V 4 4 4 _r @ @ T X : W
0x169e24…169fb8 Dummy {f00=0x0072, f01=0x0190, f02=» V V W R 9 W D h ) $ PV D L Tp D "P V ` T @ 1 Q a , I ( I * $# P8 V -W( (8W" D V ` T @ 1 Q a : @ % PH H I H T P, H U V U W <
0x169fb8…16a14c Dummy {f00=0x0072, f01=0x0190, f02=»LLT # W ;I # ;b W ;a WR# T W W,# T W W # T W W W R _ $ W : . @ .T A . V W 0 @ 0T A 0 V >A 8T 9 0 1 8 $; # V ;c F !AAP # $ < $ : W | v
0x16a14c…16a2e0 Dummy {f00=0x0072, f01=0x0190, f02=» W | V z 3 % W P _ V |P V v ] P _ @ .P V h A . (P ) @ . @ 0P V h A 0 (P ) @ 0 @ @ T X : N =H N D : N =H N D : &=H F D : F =H F D : F =H F D :
0x16a2e0…16a474 (3, 163) Dummy {f00=0x0073, f01=0x0190, f02=» ! #@ $< %X * A CRT M " . ,D,V X V V h W R _ $ W : . @ .T A . V W 0 @ 0T A 0 V >A 8T 9 0 1 8 $; # V ;c F !AAP # $ < $ : W | v
0x16a474…16a608 Dummy {f00=0x0073, f01=0x0002, f02=»
0x16a608…16a79c Dummy {f00=0x0073, f01=0x0190, f02=» 2 P IDENT INTLT3 REL 8.2 78-09-15 870105040820 P* : @ P* INTERRUPT TABLE FOR DEVICES CONNECTED TO CHANNEL UNIT NO.1 D P* FOR LOCAL TERMINALS D P* THIS TABLE CONTAINS POINTERS TO DEVICE WORK TABLES ASSOCIATED D P* WITH DEVICES CONNECTED T
0x16a79c…16a930 Dummy {f00=0x0073, f01=0x40f8, f02=»TABLE ENTRY P* P* TERMINAL PARAMETERS P* > P* H , P* RIGHT BYTE = 2 * NUMBER OF DEVICES R P* P* P* P* PINTLT3 EQU * TABLE ENTRY P* P* P* P END @ ICES CONNECTED T
0x16a930…16aac4 Dummy {f00=0x0073, f01=0x2008, f02=» NAL PARAMETERS 0 P* LEFT BYTE = 2 * NUMBER OF INPUT DEVICES 4 P* AND DEVICES WITH DATA REQUESTS R , P* RIGHT BYTE = 2 * NUMBER OF DEVICES P* 4 P* NOTE: PRINTERS ARE TREATED AS INPUT DEVICES P* P*
0x16aac4…16ac58 Dummy {f00=0x0073, f01=0x4010, f02=» END @ = DEVICE DEPENDENT ECHO SUBROUTINE P* : PECHOCD EQU * D P LDR A7,A7 EOR ? X P RF(N) ECHO10 p P CF A5,OUTPUT SEND CHARACTER PECHO10 ABL ECHRTN P EJECT P* P* R C C D P* P* PRCCD
0x16ac58…16adec Dummy {f00=0x0073, f01=0x2008, f02=» A15,SAVE8 LD A7,DWTST,A6 RB(N) EXIT 2 LDK A1,2 F RB ENDIO X * j * t END ~@ LD A4,DWTST,A6 STATUS RF(N) EXIT LDR A1,A1 RETURN CODE RF(NE) ENDIO YES END I/O ABL LDR
0x16adec…16af80 Dummy {f00=0x0073, f01=0x0190, f02=» SUK A4,1 DECREMENT RETRY COUNTER $ P ABL(Z) END:IO ALL RETRIES DONE * P RB WRIT:N TRY AGAIN R P n P IFT RAW=1 v PWRIT20 CWK A7,5 P ABL(E) END:IO BASIC WRITE & P LDKL A3,BUF DRIVER BUFFER ADDRESS P XIF P IFF RAW=1 $
0x16af80…16b114 (3, 164) Opaque[0x194]
0x16b114…16b2a8 # DirEnt {nam=»MONCOP«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0e68, f03=0x0000}
0x16b114…16b2a8 IdxSect {
0x16b114…16b2a8 f00 = 0x0073 // 0x16b114 @0x0
0x16b114…16b2a8 f01 = 0x000a // 0x16b116 @0x2
0x16b114…16b2a8 gno = [ // 0x16b118 @0x4
0x16b114…16b2a8 [0x00]: C0x0073.0x1.0
0x16b114…16b2a8 [0x01]: C0x0073.0x2.0
0x16b114…16b2a8 [0x02]: C0x0073.0x3.0
0x16b114…16b2a8 [0x03]: C0x0074.0x0.0
0x16b114…16b2a8 [0x04]: C0x0074.0x1.0
0x16b114…16b2a8 ]
0x16b114…16b2a8 }
0x16b2a8…16b43c Dummy {f00=0x0073, f01=0x0190, f02=» ,` & J & c @ z ^ ^ bHPH H ^2 Z ` z
0x16b43c…16b5d0 Dummy {f00=0x0073, 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 B 6 & ? ? ? ? ? ? ? @ 6 > > U H ( ( P c P W. A 6 V ( U P
0x16b5d0…16b764 Dummy {f00=0x0073, f01=0x0190, f02=»_ _( ^ P H H #P F A A "Q ^ @ 4 ) A 4_ A $ A 6_ ? ? ? ? ? ^ A _ _ ^ ? ? ? 4 $P T I R $ 5 % ^ FW ^ W ^ T T U U U U T U W , ,
0x16b764…16b8f8 Dummy {f00=0x0073, f01=0x0190, f02=» " ? * X R Y P _ ? @ 8 R Y P _ W6 8 X W. ? ` @ @ P $ H W W > > > > > > > > @ nV ? n > _ > ? _ > > ? ^ ! Y ^ _ & ^ A. #M 1
0x16b8f8…16ba8c Dummy {f00=0x0073, f01=0x0190, f02=» B A " P T YF ZJ X T X M A H & . r 6 6 ^ @ $ l 8 Px X XZ# Y ) Wf " P P F_ :CV + W* T T * _<#/ X T Y P ) Y C C Y A P8
0x16ba8c…16bc20 Dummy {f00=0x0073, f01=0x0190, f02=»P F W Y @ T* 6 ] D W @ :C _L) @ _ :P _ Y > ;g# + _ Y B _ F Y _ 6 :XB_P Y 8 M # C P A _ A A ` A _* _ _2 _6 _: _> _B A ?M P: A PdQ* ?
0x16bc20…16bdb4 (3, 165) Dummy {f00=0x0073, f01=0x0190, f02=» l # X& :T X T >:EV W X T Y F:DV X Qx >:EVp W " P Y WD X $ QB R _ P U F _ : V # P W Y P X ' P Y _ Y " "
0x16bdb4…16bf48 Dummy {f00=0x0073, f01=0x0190, f02=» X X V 9_> @ ! ! T< 9 X Y 9 X L | Y ! F X6 &R f d h B X ; Z Y B Z$ ^* Y* Y 6 Y 4 B Y 0 V Y 8 Y 2 Y 6 X !? P* P P" P x ! , !
0x16bf48…16c0dc Dummy {f00=0x0073, f01=0x0190, f02=» 8! T X 8 Y 4 X 2 C X 6U Y 0 8 P l ^ V Y Y X &P y &_$ & _4 Y & X ( P Y : ! F ! X # P Y (:A , Y X| Y $ X Y C '? X b _* A ? ? V H * H .T $B P W J T % V I * H ,T B > > > ? ? ?
0x16c0dc…16c270 Dummy {f00=0x0073, f01=0x0190, f02=» X 0 X 2 4 A ;D A 4 T , _ P ^ ^ ^ 4 _ , , @ 1 A _ P 9 > > >
0x16c270…16c404 Dummy {f00=0x0073, f01=0x0190, f02=» & > > > > > > > $ " [ [ [ [ [ [ [ > > [ [ 6 Z Z ? ? Z Z Z Z Z Z Z " $ & > h P~ "R~ Y l Pj T P` ^ <UR "R4 h PB X R< X T6 X T0. T G
0x16c404…16c598 Dummy {f00=0x0073, f01=0x0190, f02=»XL X@ Y @ P R T X "P Xb I Y # C C # P Y '? Y Y T # P W , Y (@ 2 ^ X L % T L Rr (@ L U0 L QF L # T R < 5 ^ R < 5 Y P X D ( ) 1 > _" X
0x16c598…16c72c Dummy {f00=0x0073, f01=0x0190, f02=» # P 0P 1 _ P W Y ($SWAP A A A A @ A. UU @ @ ! P$>B @ T A T @ T E D P _ $ % $P _ % A A @ " Q" :d @ # U RDP2 P
0x16c72c…16c8c0 Dummy {f00=0x0073, f01=0x0190, f02=»BAP COP A W F A @ : V, @ P X;b=H : ~ F ~W =J : RT F PN W @ $ P( @ R W 8 !RRT W V P A Y W @ " T> W @ V W Q X * T Y P @
0x16c8c0…16ca54 (3, 166) Dummy {f00=0x0073, f01=0x0190, f02=»T F W V X = V W Y* P Z( = :L < P W <9B @ V W Q X W @ T @ V ! P W @ V P _ @ ! P( | !RRP V V W _< X |
0x16ca54…16cbe8 Dummy {f00=0x0073, f01=0x0190, f02=» 9b ) V _ @ V W W P TJ V 0 !;;P P V P$ _ P !;;T X$ W h_J X T W X W @ W V 0 !;;P P V Xf _ P !;;T X$ W
0x16cbe8…16cd7c Dummy {f00=0x0073, f01=0x0190, f02=» V $ ) H A I. : C. X C.9h! # " :A K : A T.I T P 1 I P < R P A _> X : @ " P P A A A A W A A < A @ A h A l A A V A A
0x16cd7c…16cf10 Dummy {f00=0x0073, f01=0x0190, f02=»" n : 0 R _ <d?d A U <e @ P A <C, D L " @ $ P " :B A t w B J " r R,Q$ @ ( = @ Q @ "| _@ _$ : A A A 0 A 4 A V A A A : h:B* A @ P A B J 4R 4 :B
0x16cf10…16d0a4 Dummy {f00=0x0073, f01=0x0190, f02=» A I ! : 9D @ @ r s @ A I T - A _ I N T V S : X 9PJ S Y T@ $ 1T: C !CCTr : 1P P$_ P =H P D @ T X W n : YX d C !CCT xB. <X B.9 H Q
0x16d0a4…16d238 Dummy {f00=0x0073, f01=0x0190, f02=»V W V T W P Z V T W P V W @ $ P p W h T : A V_| 0V , - P X 9A_ : @ ! P (W ( :W> 2 W 0 . " A A A A A 2 ; Z [ : : [ [ :
0x16d238…16d3cc Dummy {f00=0x0073, f01=0x0190, f02=» A. c R $ )_ : V W 0 : W ; V : : J @ 0 V @ X 0 H W : @ A 9n A @ A A r A. @ t @ W A ^ : A lA > ;h 0 :C # : .=H N
0x16d3cc…16d560 Dummy {f00=0x0073, f01=0x0190, f02=» ? ? > v V @ @ X A ,< ,>P X W r ,> X W @ @ % , V , P@ , - 4 ] 4 |Y 5 X * _6 : W @ F ] @ P @ " P : V _ W W . !TT
0x16d560…16d6f4 (3, 167) Dummy {f00=0x0074, f01=0x0190, f02=» @ T X A : ` @ P _ 3 S S V V W @ @ T X : P S S _ : @ @ @ #D# P ; V ! _ : @ " P @ P 3 _ @ " P S 1 S 9J S (
0x16d6f4…16d888 Dummy {f00=0x0074, f01=0x0190, f02=» =H N + W p N =H N D W | ( @ % 5 T W @ = V W = V +^ P0 +| r " U X _2 +n P0 +| " U X _2 V tPZ S ( V | S =J @ " S V l S
0x16d888…16da1c Dummy {f00=0x0074, f01=0x0190, f02=» . !TTP X V +N W t * +^ P +| r _ +n Pd W p +| V 8 8 4 D P$ h @ # P H I K T + Y@ V p _f V t Y ^ !TTX @ @ T X : W % @
0x16da1c…16dbb0 Dummy {f00=0x0074, f01=0x0190, f02=» +N 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 X : ^ !TTX !CCTr +N P, +| V r 4 U X $ $ _. +n P, +| V
0x16dbb0…16dd44 Dummy {f00=0x0074, f01=0x0190, f02=» +N P0 W f +| W d + V d V r < '. V f _2 +n Un +| V 8 U X 8 8 8 4 D P$ h @ # P H I K T + Y@ _pR& @ @ @ % P V 4 4 4 _r @ @ T X : W
0x16dd44…16ded8 Dummy {f00=0x0074, f01=0x0190, f02=» V V W R 9 W D h ) $ PV D L Tp D "P V ` T @ 1 Q a , I ( I * $# P8 V -W( (8W" D V ` T @ 1 Q a : @ % PH H I H T P, H U V U W <
0x16ded8…16e06c Dummy {f00=0x0074, f01=0x0190, f02=»LLT # W ;I # ;b W ;a WR# T W W,# T W W # T W W W R _ $ W : . @ .T A . V W 0 @ 0T A 0 V >A 8T 9 0 1 8 $; # V ;c F !AAP # $ < $ : W | v
0x16e06c…16e200 Dummy {f00=0x0074, f01=0x0190, f02=» W | V z 3 % W P _ V |P V v ] P _ @ .P V h A . (P ) @ . @ 0P V h A 0 (P ) @ 0 @ @ T X : N =H N D : N =H N D : &=H F D : F =H F D : F =H F D :
0x16e200…16e394 (3, 168) Dummy {f00=0x0074, f01=0x0190, f02=» ! #@ $< %X * A CRT M " . ,D,V X V V h W R _ $ W : . @ .T A . V W 0 @ 0T A 0 V >A 8T 9 0 1 8 $; # V ;c F !AAP # $ < $ : W | v
0x16e394…16e528 Dummy {f00=0x0074, f01=0x0002, f02=»
0x16e528…16e6bc Dummy {f00=0x0074, f01=0x0190, f02=» 2 P IDENT INTLT3 REL 8.2 78-09-15 870105040820 P* : @ P* INTERRUPT TABLE FOR DEVICES CONNECTED TO CHANNEL UNIT NO.1 D P* FOR LOCAL TERMINALS D P* THIS TABLE CONTAINS POINTERS TO DEVICE WORK TABLES ASSOCIATED D P* WITH DEVICES CONNECTED T
0x16e6bc…16e850 Dummy {f00=0x0074, f01=0x40f8, f02=»TABLE ENTRY P* P* TERMINAL PARAMETERS P* > P* H , P* RIGHT BYTE = 2 * NUMBER OF DEVICES R P* P* P* P* PINTLT3 EQU * TABLE ENTRY P* P* P* P END @ ICES CONNECTED T
0x16e850…16e9e4 Dummy {f00=0x0074, f01=0x2008, f02=» NAL PARAMETERS 0 P* LEFT BYTE = 2 * NUMBER OF INPUT DEVICES 4 P* AND DEVICES WITH DATA REQUESTS R , P* RIGHT BYTE = 2 * NUMBER OF DEVICES P* 4 P* NOTE: PRINTERS ARE TREATED AS INPUT DEVICES P* P*
0x16e9e4…16eb78 Dummy {f00=0x0074, f01=0x4010, f02=» END @ = DEVICE DEPENDENT ECHO SUBROUTINE P* : PECHOCD EQU * D P LDR A7,A7 EOR ? X P RF(N) ECHO10 p P CF A5,OUTPUT SEND CHARACTER PECHO10 ABL ECHRTN P EJECT P* P* R C C D P* P* PRCCD
0x16eb78…16ed0c Dummy {f00=0x0074, f01=0x2008, f02=» A15,SAVE8 LD A7,DWTST,A6 RB(N) EXIT 2 LDK A1,2 F RB ENDIO X * j * t END ~@ LD A4,DWTST,A6 STATUS RF(N) EXIT LDR A1,A1 RETURN CODE RF(NE) ENDIO YES END I/O ABL LDR
0x16ed0c…16eea0 Dummy {f00=0x0074, f01=0x0190, f02=» SUK A4,1 DECREMENT RETRY COUNTER $ P ABL(Z) END:IO ALL RETRIES DONE * P RB WRIT:N TRY AGAIN R P n P IFT RAW=1 v PWRIT20 CWK A7,5 P ABL(E) END:IO BASIC WRITE & P LDKL A3,BUF DRIVER BUFFER ADDRESS P XIF P IFF RAW=1 $
0x16eea0…16f034 (3, 169) Opaque[0x194]
0x16f034…16f1c8 # DirEnt {nam=»CASCOP«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0e90, f03=0x0000}
0x16f034…16f1c8 IdxSect {
0x16f034…16f1c8 f00 = 0x0074 // 0x16f034 @0x0
0x16f034…16f1c8 f01 = 0x0002 // 0x16f036 @0x2
0x16f034…16f1c8 gno = [ // 0x16f038 @0x4
0x16f034…16f1c8 [0x00]: C0x0074.0x2.0
0x16f034…16f1c8 ]
0x16f034…16f1c8 }
0x16f1c8…16f35c Dummy {f00=0x0074, f01=0x0190, f02=» < + . Y%w n b ] $ ^ : 9 i $ - w z~4r tV u 3 qC + zuqL $ ) > Pu ZD q c r F~ uL _^ % ;Pl G > # F $ 4` 1F ^-8 T t tB bbTg t z ^ ^ bHPH H ^2 Z ` z
0x16f35c…16f4f0 Dummy {f00=0x0074, f01=0x0190, f02=» & T X Q A & T l A $ A & # C ( B Tl B C # T" ( B TH A $ @ PW ( B T( @ $T A $_n p # ( #( _ p 9H9h @ &T W <i<E ! l _> # C ( B : W # C (
0x16f4f0…16f684 Dummy {f00=0x0074, f01=0x0000, f02=»
[…0x3…]
0x16fb40…16fcd4 (3, 170) Opaque[0x194]
0x16fcd4…16fe68 # DirEnt {nam=»CASCON«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x0e98, f03=0x0000}
0x16fcd4…16fe68 IdxSect {
0x16fcd4…16fe68 f00 = 0x0074 // 0x16fcd4 @0x0
0x16fcd4…16fe68 f01 = 0x0002 // 0x16fcd6 @0x2
0x16fcd4…16fe68 gno = [ // 0x16fcd8 @0x4
0x16fcd4…16fe68 [0x00]: C0x0074.0x3.0
0x16fcd4…16fe68 ]
0x16fcd4…16fe68 }
0x16fe68…16fffc Dummy {f00=0x0074, 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
0x16fffc…170190 Dummy {f00=0x0074, 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
0x170190…170324 Dummy {f00=0x0074, f01=0x0190, f02=» IHTCN , ( IHSOP > IHFDN N , ( ^ , ( ! , ( 1 , ( A
0x170324…1704b8 Dummy {f00=0x0074, f01=0x0190, f02=» ~ HALTN . SCTMSZK F SCTSFA Z SCTEFA n SCTPLD SCTANO SCTADA SCTPAGL , ( @ SCT
0x1704b8…17064c Dummy {f00=0x0074, f01=0x018e, f02=» SCTMMP SCTLAP SCTNPE & SCTSTB : SCTOPT N SCTTCTR b SCTCDTr v SCTBUGa SCTDMT! , ( SCTDMI SCTDML
0x17064c…1707e0 Dummy {f00=0x0074, f01=0x401e, f02=» v @ SCTNPE & SCTSTB : SCTOPT N SCTTCTR b SCTCDTr v SCTBUGa SCTDMT! , ( SCTDMI SCTDML
0x1707e0…170974 (3, 171) Opaque[0x194]
0x170974…170b08 # DirEnt {nam=»FLXCON«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x0ea0, f03=0x0000}
0x170974…170b08 IdxSect {
0x170974…170b08 f00 = 0x0075 // 0x170974 @0x0
0x170974…170b08 f01 = 0x0002 // 0x170976 @0x2
0x170974…170b08 gno = [ // 0x170978 @0x4
0x170974…170b08 [0x00]: C0x0075.0x0.0
0x170974…170b08 ]
0x170974…170b08 }
0x170b08…170c9c Dummy {f00=0x0075, f01=0x007e, f02=» T; 01; TID=SP; TCL=SP; * LEV=60; : 00; J 02; V SDC=S01; b SDC=S02; r
0x170c9c…170e30 Dummy {f00=0x0075, f01=0x2008, f02=» 01; TID=SP; TCL=SP; * LEV=60; : 00; J 02; V SDC=S01; b SDC=S02; r
0x170e30…170fc4 Dummy {f00=0x0075, f01=0x2008, f02=»
0x170fc4…171158 Dummy {f00=0x0075, 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,
0x171158…1712ec Dummy {f00=0x0075, 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
0x1712ec…171480 Dummy {f00=0x0075, 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
0x171480…171614 (3, 172) Opaque[0x194]
0x171614…1717a8 # DirEnt {nam=»FLXCOP«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0ea8, f03=0x0000}
0x171614…1717a8 IdxSect {
0x171614…1717a8 f00 = 0x0075 // 0x171614 @0x0
0x171614…1717a8 f01 = 0x0004 // 0x171616 @0x2
0x171614…1717a8 gno = [ // 0x171618 @0x4
0x171614…1717a8 [0x00]: C0x0075.0x1.0
0x171614…1717a8 [0x01]: C0x0075.0x2.0
0x171614…1717a8 ]
0x171614…1717a8 }
0x1717a8…17193c Dummy {f00=0x0075, f01=0x0190, f02=» t + . f w n b $ ^ : 9 i $ - w z~4r tV u 3 qC + zuqL $ ) > Pu ZD q c r F~ uL _^ % ;Pl G > # F $ 4` 1F ^-8 T t tB bbTg t z ^ ^ bHPH H ^2 Z ` z
0x17193c…171ad0 Dummy {f00=0x0075, 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 @ < R:R: ` J bb ^% bbpH 0~ <d hl|d : x ` ^ D)dH P D >~ `" f >~ $ d p 4d @u { D
0x171ad0…171c64 Dummy {f00=0x0075, f01=0x0190, f02=» ^< 2 + . f w n b $ ^ : 9 i $ - w z~4r tV u 3 qC + zuqL $ ) > Pu ZD q c r F~ uL _^ % ;Pl G > # F $ 4` 1F ^-8 T t tB bbTg t z ^ ^ bHPH H ^2 Z ` z
0x171c64…171df8 Dummy {f00=0x0075, 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 @ < R:R: ` J bb ^% bbpH 0~ <d hl|d : x ` ^ D)dH P D >~ `" f >~ $ d p 4d @u { D
0x171df8…171f8c Dummy {f00=0x0075, f01=0x0190, f02=» ^< 2 + . f w n b $ ^ : 9 i $ - w z~4r tV u 3 qC + zuqL $ ) > Pu ZD q c r F~ uL _^ % ;Pl G > # F $ 4` 1F ^-8 T t tB bbTg t z ^ ^ bHPH H ^2 Z ` z
0x171f8c…172120 Dummy {f00=0x0075, 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 @ < R:R: ` J bb ^% bbpH 0~ <d hl|d : x ` ^ D)dH P D >~ `" f >~ $ d p 4d @u { D
0x172120…1722b4 (3, 173) Dummy {f00=0x0075, f01=0x0190, f02=» ^< 2 + . f w n b $ ^ : 9 i $ - w z~4r tV u 3 qC + zuqL $ ) > Pu ZD q c r F~ uL _^ % ;Pl G > # F $ 4` 1F ^-8 T t tB bbTg t z ^ ^ bHPH H ^2 Z ` z
0x1722b4…172448 Dummy {f00=0x0075, 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 @ < R:R: ` J bb ^% bbpH 0~ <d hl|d : x ` ^ D)dH P D >~ `" f >~ $ d p 4d @u { D
0x172448…1725dc Dummy {f00=0x0075, f01=0x0190, f02=» ^< 2 + . f w n b $ ^ : 9 i $ - w z~4r tV u 3 qC + zuqL $ ) > Pu ZD q c r F~ uL _^ % ;Pl G > # F SP( ( r N @ Z J 8 " 8 8 F
0x1725dc…172770 Dummy {f00=0x0075, f01=0x0190, f02=» J ( "( _ J F_(( @ T @ A : X: A ( @ T A A @ A _< Xp 5_& T( ( @ * $ @ . A . . : A & 4T ( @ * A $ A . " & @ . A ._B( B
0x172770…172904 Dummy {f00=0x0075, f01=0x0190, f02=» P A f (P ) @ , ( $ f @ hP V > P A " , ( h (P ) @ h @ R * & )A @ T " , ( A @ : N =H N J : N =H N , ( ] J : &=H F J : F =H
0x172904…172a98 Dummy {f00=0x0075, f01=0x0190, f02=» (W ( : p , ( 00=H 00 P P _ , ( _ : b | @ SCTIOE: p SYSLDX , ( 6 2 N A p CRT M " -@ r H D !pC P # N / N G WP@ P P V P D
0x172a98…172c2c Dummy {f00=0x0075, f01=0x0190, f02=» ;U ] d eP0 i r wU PZ T T #T EP t H D ! W D m T qP u r d Pd r P$ P T ?P MR aW& oT }P D 0 H D ! U T PT r $ P ;T gTr q D uP, y r U d P, r | H D ! U P P W ) D -P0 5 r = Q $ e d mUn q r U P$ P
0x172c2c…172dc0 Dummy {f00=0x0075, f01=0x4102, f02=» -W" 3V 9T WPH sP, ` H D ! U P P: P W T 3WR 7T AW, ET QW WT cW uR T W H D ! T T P 5T 9P KP aT eP$ oP U P W P P P P h 4 0 P P P -T P T P W P P %T 2 @ P$ P
0x172dc0…173a60 (4, 0) DirGranule ((4, 0)) {
0x172dc0…173a60 DirEnt {nam=»IBM327«, typ=»0 «, f00=0x0000, f01=0x0000, f02=0x0eb8, f03=0x0000}
0x172dc0…173a60 DirEnt {nam=»START «, typ=»SC«, f00=0x019a, f01=0x0196, f02=0x0ec0, f03=0x0008}
0x172dc0…173a60 DirEnt {nam=»VDUPRT«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0f48, f03=0x0000}
0x172dc0…173a60 DirEnt {nam=»PRT «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0fa8, f03=0x0000}
0x172dc0…173a60 DirEnt {nam=»TB3270«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0fd0, f03=0x0000}
0x172dc0…173a60 DirEnt {nam=»CTAB01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0fe0, f03=0x0000}
0x172dc0…173a60 DirEnt {nam=»NOIFLI«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x0fe8, f03=0x0000}
0x172dc0…173a60 DirEnt {nam=»DATDIV«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0ff0, f03=0x0000}
0x172dc0…173a60 DirEnt {nam=»/OBJCT«, typ=»OB«, f00=0x0000, f01=0x0000, f02=0x1008, f03=0x0000}
0x172dc0…173a60 DirEnt {nam=»LIST «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1068, f03=0x0000}
0x172dc0…173a60 DirEnt {nam=»M:PROC«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1070, f03=0x0000}
0x172dc0…173a60 DirEnt {nam=»DW2501«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1078, f03=0x0000}
0x172dc0…173a60 DirEnt {nam=»DRDC25«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1080, f03=0x0000}
0x172dc0…173a60 }
0x173a60…173bf4 (4, 1) Opaque[0x194]
0x173bf4…173d88 # DirEnt {nam=»START «, typ=»SC«, f00=0x019a, f01=0x0196, f02=0x0ec0, f03=0x0008}
0x173bf4…173d88 IdxSect {
0x173bf4…173d88 f00 = 0x0076 // 0x173bf4 @0x0
0x173bf4…173d88 f01 = 0x0022 // 0x173bf6 @0x2
0x173bf4…173d88 gno = [ // 0x173bf8 @0x4
0x173bf4…173d88 [0x00]: C0x0076.0x0.0
0x173bf4…173d88 [0x01]: C0x0076.0x1.0
0x173bf4…173d88 [0x02]: C0x0076.0x2.0
0x173bf4…173d88 [0x03]: C0x0076.0x3.0
0x173bf4…173d88 [0x04]: C0x0077.0x0.0
0x173bf4…173d88 [0x05]: C0x0077.0x1.0
0x173bf4…173d88 [0x06]: C0x0077.0x2.0
0x173bf4…173d88 [0x07]: C0x0077.0x3.0
0x173bf4…173d88 [0x08]: C0x0078.0x0.0
0x173bf4…173d88 [0x09]: C0x0078.0x1.0
0x173bf4…173d88 [0x0a]: C0x0078.0x2.0
0x173bf4…173d88 [0x0b]: C0x0078.0x3.0
0x173bf4…173d88 [0x0c]: C0x0079.0x0.0
0x173bf4…173d88 [0x0d]: C0x0079.0x1.0
0x173bf4…173d88 [0x0e]: C0x0079.0x2.0
0x173bf4…173d88 [0x0f]: C0x0079.0x3.0
0x173bf4…173d88 [0x10]: C0x007a.0x0.0
0x173bf4…173d88 ]
0x173bf4…173d88 }
0x173d88…173f1c Dummy {f00=0x0076, f01=0x0190, f02=» 0 P IDENT START REL 10.0 80-03-14 870150541000 P 8 " P =6, SKIP CIRCULAR KB-BUFFER @ P REL 2.1 79-05-23 f , P =4,CURSOR STOP AT LAST POS. EACH LINE P REL 2.1 79-05-23 , P =5, RESET KEY DOESN7T WORK ON KB6234 P REL 2.1
0x173f1c…1740b0 Dummy {f00=0x0076, f01=0x0190, f02=» =3, UNDEFINED LABEL P REL 2.1 79-05-23 B P************************************************************* 8 P* ~ H P* S T A R T : MODULE HANDLING KEYBOARD INPUT.KEYBOARD INITIATED H P* MESSAGES ADDRESSED TO THE MAIN FRA
0x1740b0…174244 Dummy {f00=0x0076, f01=0x0190, f02=»****************************************** p P 2 P : P B P J P EJECT R P* ` P* j P* ENTRY PARAMETERS t P* P* P* P ENTRY LINHON,LINHOF,ATMASB P ENTRY LSAVOF,LSAVON P ENTRY EMULA & P ENTRY L
0x174244…1743d8 Dummy {f00=0x0076, f01=0x0190, f02=» ENTRY DC1INQ P ENTRY DC2INQ $ P ENTRY REQTIM SET REQUEST TIMER , P ENTRY ICWRTE T P* j P* t P* ~ P* EXTERNAL REFERENSES P* P* P* P EXTRN DCINP P EXTRN DCGETM P EXTRN ICREAD P
0x1743d8…17456c Dummy {f00=0x0076, f01=0x0190, f02=»XTRN TRPA P EXTRN ERASUA P EXTRN DISPL ( P EXTRN ERASUP < P* R 0 P EXTRN KEYCNV KEY CONVERSION IF NOT PTS 6272 P EXTRN TASCII P* , P EXTRN I:EVA0 CREDIT EVALUATION ROUTINE & P EXTRN I:RT1 RETURN TO CREDIT CODE
0x17456c…174700 Dummy {f00=0x0076, f01=0x018e, f02=» P* & P********************************* P 8 P* @ F PKB6272 EQU 1 IF PTS 6272 (6236) IS NOT USED YOU MUST USE 'KEYCNV' J 0 P USE THE KEY CONVERSION TABLE IN 'TB3270' 0 PKEYLST EQU 0 KEY LOCK STATUS SAVED IN 'KEYS' POFLIN EQU 0
0x174700…174894 (4, 2) Dummy {f00=0x0076, f01=0x0190, f02=» 8 PCOPCMD EQU 0 COPY COMMAND (ONLY TO PRINTER) IF := 1 PCOPL EQU 0 COPY LOCK IF := 1 @ P EJECT d P* r P* | P* EQUATES P* PRSET EQU /B2 RESET KEY " P* COMMON EQU FOR ECB HANDLING P* P PECBBA EQU 2
0x174894…174a28 Dummy {f00=0x0076, f01=0x0190, f02=» P* P* ECB REL. ADDRESSES P* . P* 8 PDIS EQU 20 B P* T PECBDC EQU -DIS-14 ^ P IFT DCLIN=2 x P IFT COPCMD=1 PECBDC2 EQU ECBDC-DIS PECBICR EQU ECBDC2-DIS PECBICW EQU ECBICR-DIS P XIF P I
0x174a28…174bbc Dummy {f00=0x0076, f01=0x0190, f02=»OPCMD=1 PECBICR EQU ECBDC-DIS PECBICW EQU ECBICR-DIS , P XIF J P IFF DCLIN=2 V P IFF COPCMD=1 j PECBICW EQU ECBDC-DIS P XIF PECBVDU EQU ECBICW-DIS PECBKB EQU ECBVDU-DIS PECBSD EQU ECBKB-DIS P EJECT
0x174bbc…174d50 Dummy {f00=0x0076, f01=0x0190, f02=» P* TCA REL. ADDRESSES P* PTCT01 EQU 0 * PPRINTER EQU TCT01+2 > ( PBVDU EQU PRINTER+2 VDU SCREEN BUFFER Z 0 PPCURS EQU BVDU+1920 CURSOR ADDRESS , BINARY * PATTRIB EQU PCURS+2 LAST ATTRIBUTE CHAR PCURATT EQU ATTRIB+2 & PWCC
0x174d50…174ee4 Dummy {f00=0x0076, f01=0x0190, f02=»QU LINCNT+2 DC READ EFFECTIVE LENGTH 2 PICWORK EQU DCLENG+2 WORK FIELD INTERTASK COMM , , PINTATT EQU ICWORK+2 INTENSITY ATTRIBUTE b $ POFFFLG EQU INTATT+2 OFFLINE FLAG ( PCOPNO EQU OFFFLG+2 HARDCOPY TASK ID * PCCC EQU COPNO+2 COPY COMMAND CHARA
0x174ee4…175078 Dummy {f00=0x0076, f01=0x0190, f02=»QU KEYS+2 ECB ADDRESS LAST READ DC 2 PECBBLK EQU ECBDCC+2 ECBS FOR MULTIPLE WAIT &C * 4 PRDMORE EQU ECBBLK+10 BRANCH ADDRESS NEXT READ KB ` P EJECT PNULL EQU /7F NULL CHARACTER PDUPCH EQU /7B PFMCH EQU /60 * PLBVDU EQU 1920 1920
0x175078…17520c Dummy {f00=0x0076, f01=0x018e, f02=»B1' REL ADDRESSES P* " PNBRKBV EQU 0 NUMBER OF KB/VDUS $ & PNBRGTP EQU NBRKBV+2 NUMBER OF GTPS J P* t 2 PMF1KBV EQU NBRGTP+2 DV ADDRESSES KB/VDU MF #1 ~ 2 PMF1GTP EQU MF1KBV+16 DV ADDRESSES GTPS MF # 1 P IFT DCLIN=2 PMF2KBV EQU
0x17520c…1753a0 Dummy {f00=0x0076, f01=0x0190, f02=» PKEYTAB EQU * P DATA CHAR SPACE P DATA CHAR ! 4 P DATA CHAR " H P DATA CHAR # P DATA CHAR $ p P DATA CHAR % P DATA CHAR & P DATA CHAR ' P DATA CHAR ( P DATA CHAR ) P DATA CHAR * P DATA CHAR +
0x1753a0…175534 (4, 3) Dummy {f00=0x0076, f01=0x0190, f02=» DATA NUM 2 P DATA NUM 3 P DATA NUM 4 ( P DATA NUM 5 < P DATA NUM 6 P P DATA NUM 7 d P DATA NUM 8 x P DATA NUM 9 P DATA CHAR : P DATA CHAR ; P DATA CHAR < P DATA CHAR = P DATA CHAR > P DAT
0x175534…1756c8 Dummy {f00=0x0076, f01=0x018e, f02=»AR E P DATA CHAR F P DATA CHAR G P DATA CHAR H 4 P DATA CHAR I H P DATA CHAR J P DATA CHAR K p P DATA CHAR L P DATA CHAR M P DATA CHAR N P DATA CHAR O P* P DATA CHAR P P DATA CHAR Q P D
0x1756c8…17585c Dummy {f00=0x0076, f01=0x0190, f02=» P DATA CHAR Y P DATA CHAR Z P DATA CHAR [ , P DATA CHAR BACK SLASH @ P DATA CHAR ] ^ P DATA CHAR CIRCOMFLEX r P DATA CHAR UNDERLINE P* $ P DATA RETURN /60 CANNOT BE USED P DATA CHAR LOWER CASE P DATA CHAR
0x17585c…1759f0 Dummy {f00=0x0076, f01=0x018e, f02=»A CHAR P DATA CHAR P DATA CHAR P DATA CHAR 2 P DATA CHAR D P DATA CHAR V P* h P IFT KEYLST=1 r P DATA KEYL KEYLOCK P DATA KEYL P DATA KEYL P DATA KEYL P DATA KEYL P DATA KEYL P DATA KEYL
0x1759f0…175b84 Dummy {f00=0x0076, f01=0x0190, f02=» P DATA RETURN P DATA RETURN P DATA RETURN , P DATA RETURN @ P XIF T P DATA CHAR LOWER CASE X ` P DATA CHAR P DATA CHAR ( P DATA RETURN /7B-/7F CANNOT BE USED P DATA RETURN P DATA RETURN P DATA RETURN
0x175b84…175d18 Dummy {f00=0x0076, f01=0x0190, f02=»A PA1 P DATA PA2 P DATA PA3 & P DATA PA410 PA4 - PA10 (ALFASKOP) 2 P DATA PA410 P DATA PA410 p P DATA PA410 P DATA PA410 P DATA PA410 P DATA PA410 P DATA CLEAR P IFT PFX=1 P DATA PFEX
0x175d18…175eac Dummy {f00=0x0076, f01=0x018e, f02=»PF 4 P DATA PF 5 P DATA PF 6 P DATA PF 7 0 P DATA PF 8 B P DATA PF 9 T P DATA PF 10 f P DATA PF 11 z P DATA PF 12 . P DATA RETURN /99-/A4 RESERVED FOR PF13-24 P DATA RETURN P DATA RETURN P DATA RETURN
0x175eac…176040 Dummy {f00=0x0076, f01=0x0190, f02=» P DATA RETURN P DATA RETURN P DATA ENTER , P DATA CRUP @ P DATA CRLEFT R P DATA CRRIGT f P DATA CRDOWN z P DATA BAKTAB P DATA TAB P DATA CRNL P DATA RDHOME P DATA ERINPT P DATA EREOF P*
0x176040…1761d4 (4, 4) Dummy {f00=0x0076, f01=0x0190, f02=» XIF P DATA RESET P DATA DUP P DATA FLDMRK 2 P DATA COPY F P IFT OFLIN=1 X P DATA OFLINE l P XIF P IFF OFLIN=1 P DATA RETURN P XIF P IFT DCLIN=2 P DATA MFCHGE P XIF P IFF DCLIN=2 P
0x1761d4…176368 Dummy {f00=0x0076, f01=0x0190, f02=»A RETURN P DATA RETURN P DATA RETURN $ P* 8 6 P DATA LCASPW LOWER CASE P - W (BECAUSE OF KEYLOCK) B P DATA LCASPW | P DATA LCASPW P DATA LCASPW P DATA LCASPW P DATA LCASPW P DATA LCASPW P DATA LCASPW P
0x176368…1764fc Dummy {f00=0x0076, f01=0x0190, f02=»******************************************************* P @ PDCTASK EQU * H P CF A14,I:EVA0 & P LDR* A1,A9 POLL & SELECT ADDRESS r P LDKL A8,ECBDC P ADR A8,CREBAS P ST A1,ECBCW,A8 $ P LDK A7,/B7 TRANSFER PARAMETERS P
0x1764fc…176690 Dummy {f00=0x0076, f01=0x0190, f02=»RBUF GET RECEIVE BUFFER P LDKL A8,ECBDC P ADR A8,CREBAS 6 P CF A14,DCGETM L P LD A4,ECBBA,A8 b " P CF A14,RLRBUF RELEASE BUFFER z P RB DCT100 P EJECT P* P* ( P* SUBROUTINE ACTIVATED BY ALL TASKS P*
0x176690…176824 Dummy {f00=0x0076, f01=0x0190, f02=»ETERS v P LKM P DATA 1 P RTN A14 * P EJECT : P* H : P***************************************************** R P* P* VDUKB P* " P* MAIN MODULE FOR KEYBOARD VDU P* < P********************************
0x176824…1769b8 Dummy {f00=0x0076, f01=0x0190, f02=» P P 4 P STR A12,A14 SAVE REGISTERS A12-A13 ON A14 STACK P ST A13,-2,A14 P $ P SUKL A14,4 UPDATE STACK POINTER f P CM OFFFLG,TCABAS * P CF A14,LIOLOF TURN OFF OFF LINE LAMP P XIF P P EJECT B P****************
0x1769b8…176b4c Dummy {f00=0x0076, f01=0x0190, f02=»*********************************************** P 8 P LDR* A4,TCABAS REL TASK NO @ " P AD A4,6,CREBAS 'CB1' ADDRESS d & P LC A1,MF1KBV-1,A4 GET DV-ADDRESS P ANK A1,/FF P LDKL A8,ECBDC P CF A14,EMULA P P IFT DCLIN=2
0x176b4c…176ce0 Dummy {f00=0x0076, f01=0x018e, f02=»* B P************************************************************* P P & P LC A1,MF2KBV-1,A4 GET DV ADDRESS X P ANK A1,/FF P LDKL A8,ECBDC2 P CF A14,EMULA P XIF P EJECT PVDU080 EQU * P CF A14,ERASE ERASE SC
0x176ce0…176e74 (4, 5) Dummy {f00=0x0077, f01=0x0190, f02=» , P CM MAIN,TCABAS INDICATE MAIN-FRAME # 1 P EJECT 8 P* F P* RELATIVE POS IN ECBBLK P PKB EQU 2 p PDC1 EQU 4 P IFT DCLIN=2 P IFT COPCMD=1 PDC2 EQU 6 PICR EQU 8 PECBBS EQU 4 P XIF P IFT DCL
0x176e74…177008 Dummy {f00=0x0077, f01=0x0190, f02=» PECBBS EQU 3 P XIF P IFF DCLIN=2 ( P IFF COPCMD=1 < PECBBS EQU 2 R P XIF f P* r P LDK A1,ECBBS | P ST A1,ECBBLK,TCABAS PVDU100 EQU * P LD A1,ECBBLK+DC1,TCABAS P RF(NZ) VDU110 PENDING 0 P CF A14,
0x177008…17719c Dummy {f00=0x0077, f01=0x0190, f02=»NG | 6 P CF A14,DC2INQ TEST IF ANY MESSAGE MF # 2, NO WAIT P XIF D PVDU120 EQU * P P IFT COPCMD=1 d P LD A1,ECBBLK+ICR,TCABAS z P RF(NZ) VDU125 PENDING P LDKL A3,ICWORK BUFFER P ADR A3,TCABAS ADDRESS P LDK A6,2 REQ LENG
0x17719c…177330 Dummy {f00=0x0077, f01=0x0190, f02=»VDU150 PENDING ( P CF A14,RDKBNW READ KEYBOARD NO WAIT ! PVDU150 EQU * ! B P LDKL A7,ECBBLK ! V P ADR A7,TCABAS ! n P LKM ! P DATA 7 MULTIPLE WAIT ! P CW A8,ECBBLK+KB,TCABAS ! $ P RF(E) KBINP INPUT FROM KEYBOARD ! P IFT COPCMD=1 !
0x177330…1774c4 Dummy {f00=0x0077, f01=0x0190, f02=»RRENT READ ! d P CF A14,DCINP INPUT FROM DC " P RB VDU100 " 6 P EJECT " H P* " V P* READ KEYBOARD WITH NO WAIT " ` P* " PRDKBNW EQU * " P LDKL A8,ECBKB " P ADR A8,CREBAS " P LDK A7,1 " " P ST A7,ECBRL,A8 REQ LENGTH = 1 " * P S
0x1774c4…177658 Dummy {f00=0x0077, f01=0x0190, f02=»* " PDC1INQ EQU * # P LDKL A8,ECBDC # P ADR A8,CREBAS # 4 P ST A8,ECBBLK+DC1,TCABAS # J PDC1I20 EQU * # j P LDK A1,0 # ~ P CF A14,REQTIM # P LDK A7,0 # PDC1I30 EQU * # P LKM # P DATA 1 # P RTN A14 # PDC2INQ EQU * #
0x177658…1777ec Dummy {f00=0x0077, f01=0x0190, f02=» COPCMD=1 # P EJECT $ P* $ " P* SEND BUFFER TO PRINTER TASK $ * P* $ P PBUFCOP EQU * $ Z P CM ECBBLK+ICR,TCABAS $ n P LDKL A3,BVDU BUFFER $ P ADR A3,TCABAS ADDRESS $ P IFT COPL=1 $ P* $ P* CHECK IF COPY LOCK $ P* $
0x1777ec…177980 Dummy {f00=0x0077, f01=0x0190, f02=»/8B ORDER: WRITE ADDRESSED WITH WAIT $ P LD A5,ICWORK,TCABAS TASK ID % , P LDKL A6,LBVDU REQ LENGTH % P P CF A14,ICWRTE % r P LD A1,KBINH,TCABAS % ( P ANK A1,/E NOT INHIBITED ANY LONGER % P ST A1,KBINH,TCABAS % P RB VDU100 % P XIF %
0x177980…177b14 (4, 6) Dummy {f00=0x0077, f01=0x0190, f02=»5 POWER OFF % P LD A2,ECBRC,A8 & P RF(0) KBIN10 & , PKBIN05 EQU * & B & P LDK A7,/31 RESET KEYBOARD BUFFER & V P LKM & P DATA 1 & P RB VDU100 & PKBIN10 EQU * & P LD A1,KBINH,TCABAS & , P ANK A1,1 RESETTING BY 'RESET' ALLOWED ? &
0x177b14…177ca8 Dummy {f00=0x0077, f01=0x0190, f02=» & n P XIF =5 ' P LD A1,KBINH,TCABAS ' " P ANK A1,6 MUST BE RESET KEY ? ' 6 P RF(Z) KBIN20 NO ' P CWK A2,RSET RESET KEY ? ' t P RB(NE) KBIN05 NO ' PKBIN20 EQU * ' P KB6234 RESET KEY =5 ' $ P LDR A5,A2 COPY INPUT CHARACTER ' P
0x177ca8…177e3c Dummy {f00=0x0077, f01=0x0190, f02=»C-READ TO ENABLE DC-WRITE ' z P LDR A7,A7 ( " 6 P ABL(NZ) VDU100 DC COMPLETED, TAKE CARE OF MESSAGE ( 4 P ADR A5,A5 TO KEY TABLE ( n P* ( P LDKL A8,ECBVDU ( P ADR A8,CREBAS ( P LD A1,RDMORE,TCABAS ( P RF(Z) KBIN30 ( P* ( P CFR A
0x177e3c…177fd0 Dummy {f00=0x0077, f01=0x0190, f02=»0 ( P EJECT ) P* ) & P* ABORT DC-REQUEST TO ENABLE WRITE ) " P* ) L PDCABOR EQU * ) V P LDK A7,0 ) j P LDKL A8,ECBDC ) | P IFT DCLIN=2 ) P LD A1,MAIN,TCABAS ) P RF(NZ) DCAB05 ) P XIF ) P CM ECBBLK+DC1,TCABAS ) P IFT DCL
0x177fd0…178164 Dummy {f00=0x0077, f01=0x0190, f02=» ADR A8,CREBAS ) P LKM * P DATA 10 * " P RTN A14 * 2 P EJECT * B P* * P P* SET REQUEST TIMER * Z P* A1 = TIME OUT VALUE * v P* A8 = ECB ADDRESS * P* * PREQTIM EQU * * P ST A1,ECBCW,A8 * P LDK A7,/B9 * P LKM * P DAT
0x178164…1782f8 Dummy {f00=0x0077, f01=0x0190, f02=»* * P* RETURN + P* + B P************************************************************** + $ P* + j PRETURN RTN A14 + t P EJECT + P* + < P******************************************************* + P* + P* CRLEFT + P* + 6
0x1782f8…17848c Dummy {f00=0x0077, f01=0x0190, f02=» + PCRLEFT EQU * , * P LD A2,PCURS,TCABAS GET CURSOR BINARY , P SUK A2,1 , J $ P RF(NN) CRL050 NOT LEFTMOST POS , P LDKL A2,LBVDU-1 , PCRL050 RF CRH100 , P* , < P******************************************************** , P* , P
0x17848c…178620 Dummy {f00=0x0077, f01=0x0190, f02=»************************ , p P* - P* A3=CHARACTER - * P* - @ PCRRIGT EQU * - J * P LD A2,PCURS,TCABAS GET CURSOR BINARY - ^ P ADK A2,1 - P CWK A2,LBVDU END OF BUFFER? - P RF(L) CRR050 NO - P LDK A2,0 - PCRR050 RF CRH100 - P EJE
0x178620…1787b4 (4, 7) Dummy {f00=0x0077, f01=0x018e, f02=» MOVES THE CURSOR TO NEXT ROW. SAME COLUMN. - P* . 4 @ P************************************************************ . > P* . PCRDOWN EQU * . & P LD A2,PCURS,TCABAS GET CURSOR POS . P ADKL A2,LLINE . P CWK A2,LBVDU LAST LINE? . P RF(L) C
0x1787b4…178948 Dummy {f00=0x0077, f01=0x0190, f02=» . P P* / P* CRUP / P* / ( P* MOVE CURSOR ONE LINE UP. SAME COL. / * P* / V B P************************************************************** / ` P* / PCRUP EQU * / * P LD A2,PCURS,TCABAS GET CURSOR BINARY / P SUKL A2,LLINE / P R
0x178948…178adc Dummy {f00=0x0077, f01=0x0190, f02=»******************** / n P* 0 P* CRHOME 0 & P* 0 6 P* HOME POSITIONING OF CURSOR 0 @ P* 0 d : P****************************************************** 0 n P* 0 PCRHOME EQU * 0 P LDK A2,0 0 PCRH100 EQU * 0 * P ST A2,PCURS,TCABAS GET
0x178adc…178c70 Dummy {f00=0x0077, f01=0x0190, f02=»***************************************************** 0 P* 1 > P* CRNL 1 H P* 1 V 2 P* CURSOR IN FIRST UNPROTECTED POS ON NEW LINE 1 ` P* 1 : P***************************************************** 1 P* 1 PCRNL EQU * 1 & P LD A2,PCURS,T
0x178c70…178e04 Dummy {f00=0x0077, f01=0x0190, f02=» 1 P* COMPUTE LEFTMOST POS 2 P* 2 & PCRN050 LDK A1,0 2 0 PCRN100 SUKL A2,LLINE 2 H P RF(N) CRN120 2 d P ADKL A1,LLINE 2 z P RB CRN100 2 2 PCRN120 ST A1,PCURS,TCABAS STORE CURSOR ADDRESS 2 P EJECT 2 P 2 F P**************************
0x178e04…178f98 Dummy {f00=0x0077, f01=0x0190, f02=»F(Z) CRN130 NO ATTRIBUTE FOUND 2 P ANK A3,/10 3 & P RF(NZ) TAB PROTECTED FIELD 3 : . P CW A2,PCURS,TCABAS CURSOR ON ATTRIBUTE ?? 3 ^ P RF(NE) CRN150 NO!! 3 ( P CWK A2,1919 LAST SCREEN POSITION?? 3 P RF(NE) CRN140 NO!! 3 PCRN130 LDKL A2,-1 3
0x178f98…17912c Dummy {f00=0x0077, f01=0x0190, f02=»************************************************* 3 ~ P EJECT 4 : P* 4 H 8 P**************************************************** 4 R P* 4 P* TAB 4 P* 4 2 P* MOVE THE CURSOR TO THE FIRST CHAR. LOCATION 4 ( P* OF THE NEXT UNPROTECTED DATA FIE
0x17912c…1792c0 Dummy {f00=0x0077, f01=0x0190, f02=» 4 b P* 2=EOB 5 P* 3=ATTRIB. IN EOB POS 5 P* A2=CURSOR BINARY ADDRESS 5 : P* A3=CHARACTGR 5 P* 5 r PTAB EQU * 5 | P LDK A5,1 5 & P LD A2,PCURS,TCABAS GET CURSOR POS 5 * PTAB100 CF A14,ATMASF SEARCH ATTRIBUTE 5 P CWK A1,0 END OF
0x1792c0…179454 (4, 8) Dummy {f00=0x0077, f01=0x0190, f02=»EXT ATTRIB. 5 PTAB200 ST A2,PCURS,TCABAS 6 & P CF A14,SETCUR DISPLAY NEW CURSOR 6 6 P RTN A14 6 ` PTAB300 LDK A2,0 6 p , P CWK A1,3 ATTRIBUTE IN LAST POSITION ?? 6 P EJECT 6 < P******************************************************** 6 P R
0x179454…1795e8 Dummy {f00=0x0077, f01=0x0190, f02=»TTRIBUTE 6 ~ PTAB350 EQU * 7 < P******************************************************** 7 $ $ P ANK A5,1 WHOLE BUFF. CONTROLED? 7 d P RF(G) TAB400 NO 7 0 P RB TAB200 ALL PROT. OR NON-FORMATTED BUFF. 7 PTAB400 LDK A5,0 7 P RB TAB100 7 P EJECT
0x1795e8…17977c Dummy {f00=0x0077, f01=0x0190, f02=» 7 : P* OPERATION OF THIS KEY CAUSES A UNIQUE CHARACTER CODE 8 : P* TO BE ENTERED INTO THE DISPLAY BUFFER AND A STANDARD 8 F ( P* TAB KEY OPERATION TO BE PERFORMED 8 P* 8 @ P************************************************************ 8 P* 8 P
0x17977c…179910 Dummy {f00=0x0077, f01=0x0190, f02=» 0 P LD A3,ECBKB+ECBBA,CREBAS GET KB BUFF. ADDR. 9 P SCR A2,A3 9 8 P CF A14,NUM 9 J P CF A14,TAB 9 ^ P RTN A14 9 r P EJECT 9 P* 9 @ P*********************************************************** 9 P* 9 P* FIELD MARK 9 P* 9
0x179910…179aa4 Dummy {f00=0x0077, f01=0x0190, f02=»* TO THE DC CHARACTER TRANSMITTED 9 P* : 0 > P********************************************************** : : P* : | PFLDMRK EQU * : $ P LD A1,MODE,TCABAS INSERT MODE?? : 6 P ABL(NZ) ERROR FUNCTION NOT ALLOWED IN INSERT MODE : P LDK A2,FMCH
0x179aa4…179c38 Dummy {f00=0x0077, f01=0x018e, f02=» > P********************************************************** ; P* ; F P* RDHOME ; P P* ; f P* READY HOME KEY ; p 8 P* OPERATION OF THIS KEY CAUSES THE CURSOR TOBE ; : P* POSITIONED AT THE FIRST UNPROTECTED CHARACTER ; P
0x179c38…179dcc Dummy {f00=0x0077, f01=0x0190, f02=» ; z & P ADR A4,TCABAS VDU BUFFER ADDRESS < , P LC A2,1919,A4 GET LAST SCREEN CHARACTER < 2 P ANK A2,/7F < b P CWK A2,/20 < v P RF(NL) RDH10 < P ANK A2,/10 < $ P ABL(Z) CRHOME UNPROTECTED FIELD < PRDH10 CM PCURS,TCABAS < , P CF A14,TAB SE
0x179dcc…179f60 Dummy {f00=0x0077, f01=0x018e, f02=»* < P* BAKTAB = P* = 6 P* MOVE THE CURSOR TO THE FIRST CHARACTER LOCATION = $ 2 P* OF THE NEXT PRECIDING UNPROTECTED DATA FIELD = ^ P* = 8 P**************************************************** = P* = P* A2=CURSOR BINARY ADDRESS = P*
0x179f60…17a0f4 (4, 9) Dummy {f00=0x0078, f01=0x0190, f02=» P CWK A3,/1F ATTRIB. CHAR? > P RF(NG) BAK100 YES > & " P CWK A2,0 UPPER LEFTMOST POS? > @ P RF(E) BAK400 YES > f P SUK A2,1 > ( PBAK100 CWK A2,0 UPPER LEFTMOST POS? > P RF(E) BAK400 YES > PBAK200 SUK A2,1 > $ P CF A14,ATMASB SEARCH AT
0x17a0f4…17a288 Dummy {f00=0x0078, f01=0x0190, f02=» RF(N) BAK250 ATTRIBUTE FOUND. NOT IN LAST POS. > 0 P SUR A2,A2 ATTRIBUTE FOUND IN LAST POSITION ? 8 P RF BAK300 ? l PBAK250 EQU * ? ~ > P********************************************************* ? P ANK A3,/10 PROTECTED? ? P RB(NE) BAK100 YES ?
0x17a288…17a41c Dummy {f00=0x0078, f01=0x0190, f02=»TROLLED? ? r P RB(NZ) BAK300 YES @ ( P LDKL A2,LBVDU-1 END BUFFER ADDRESS @ * " P CF A14,GBUFFC GET BUFF CHAR. @ V P CWK A3,/1F ATTRIBUTE CHAR? @ | P RB(G) BAK200 NO @ P ANK A3,/10 PROTECTED? @ P RB(NE) BAK200 YES @ . P ST A3,ATTRIB,TCABAS UPD
0x17a41c…17a5b0 Dummy {f00=0x0078, f01=0x0190, f02=» @ D P**************************************************************** A P EJECT A P P EJECT A ^ P* A l > P********************************************************* A v P* A P* CHAR A P* A : P* ALPHABETIC AND SPECIAL CHAR UPDATING AND DIS
0x17a5b0…17a744 Dummy {f00=0x0078, f01=0x0190, f02=»NVERT TO LOWER CASE P - W A P SC* A2,ECBKB+ECBBA,CREBAS B " P* B D PCHAR EQU * B N & P LD A2,PCURS,TCABAS GET CURSOR POS B ` . P LD A3,CURATT,TCABAS GET ATTRIBUTE ADDRESS B P CWR A2,A3 CURSOR ON ATTRIB? B P RF(E) CHA300 YES B 2 PCHA100 LD A3,A
0x17a744…17a8d8 Dummy {f00=0x0078, f01=0x0190, f02=»A3 B P ANK A4,/8 NUMERIC FIELD? C P RF(E) ANCOMM NO C , , PCHA300 ABL ERROR NOT ALLOWED DISPLAY POS C D P EJECT C t D P*************************************************************** C P* C & P* Z E R O : 3 TRIPLE ZERO KEY C ( P* Z E R
0x17a8d8…17aa6c Dummy {f00=0x0078, f01=0x0190, f02=»1,X'30' CHARACTER ZERO C 8 P SC* A1,ECBKB+ECBBA,CREBAS STORE CHARACTER IN BUFFER D " P CF A14,NUM DISPLAY CHARACTER D Z P D PZERO:2 EQU * D P LDK A1,X'30' CHARACTER ZERO D 8 P SC* A1,ECBKB+ECBBA,CREBAS STORE CHARACTER IN BUFFER D " P CF A14,NUM
0x17aa6c…17ac00 Dummy {f00=0x0078, f01=0x0190, f02=»******************** D j P* E P* NUM E & P* E 4 " P* DISPLAY AND UPDATE NUMERICS E > P* E d > P********************************************************** E n P* E PNUMCOM EQU * E P LDK A2,/2C E P SC* A2,ECBKB+ECBBA,CREBAS E P* E
0x17ac00…17ad94 (4, 10) Dummy {f00=0x0078, f01=0x0190, f02=» ATTRIBUTE? E | P RF(E) NUM200 YES F 2 PNUM100 LD A3,ATTRIB,TCABAS GET ATTRIBUTE CHAR F . P LDR A4,A3 F d P ANK A4,/10 PROTECTED FIELD? F v P RF(E) ANCOMM NO F , PNUM200 ABL ERROR NOT ALLOWED DISPLAY POS F P EJECT F P* F > P**************
0x17ad94…17af28 Dummy {f00=0x0078, f01=0x0190, f02=»YING AND F ` P* UPDATING G P* G " > P********************************************************** G , P* G n PANCOMM EQU * G x " P LC* A4,ECBKB+ECBBA,CREBAS =1 G PANC005 EQU * G P LDKL A6,BVDU G P ADR A6,TCABAS G P ADR A6,A2 G P G
0x17af28…17b0bc Dummy {f00=0x0078, f01=0x0190, f02=» POSITION G t P LD A5,CURATT,TCABAS H ( P CWK A5,LBVDU+1 UNFORMATTED SCREEN? H . P RF(E) ANC100 YES H Z P SUR A6,A2 BVDU START ADDR. H t P ADR A6,A5 ATTRIB. POS H , P LD A3,ATTRIB,TCABAS GET ATTRIBUTE CHAR H P ORK A3,1 MDT-BIT ON H P SCR A
0x17b0bc…17b250 Dummy {f00=0x0078, f01=0x018e, f02=»ET CHARACTER AT CURSOR POSITION H P ANK A1,/7F I ( P CWK A1,NULL NULL?? I < P RF(NE) INS:10 NO!! I X $ P SCR A4,A7 STORE INPUT CHARACTER I t P XIF =3 I PANC120 EQU * I P I 2 P LDK A5,/2B CURSOR NOT MOVED BEFORE DISPLAYING I P LD A1,E
0x17b250…17b3e4 Dummy {f00=0x0078, f01=0x0190, f02=» I j P LDR A6,A3 J $ P ANK A3,/4 STANDARD DISPLAYING? J P RF(Z) ANC200 YES J B & P ANK A6,/2 INTENSIFIED DISPLAYING? J P RF(Z) ANC150 YES J P LDK A2,/20 LOAD SPACE J P RF ANC250 NON DISPLAYING J ( PANC150 LDK A5,/1F SET HIGH INTENSITY J
0x17b3e4…17b578 Dummy {f00=0x0078, f01=0x0190, f02=»D A2,PCURS,TCABAS GET CURSOR POS J P ADK A2,1 K ( PANC252 EQU * K : P CWK A2,LBVDU K N P RF(NE) ANC255 K d P LDKL A2,0 K z PANC255 EQU * K P ST A2,PCURS,TCABAS K " P CF A14,GBUFFC GET BUFFER CHAR K P CWK A3,/1F ATTRIBUTE CHAR? K P R
0x17b578…17b70c Dummy {f00=0x0078, f01=0x0190, f02=»1,X'FF' LINE POSITION K * P SUK A1,80 LAST POSITION ON LINE ?? =4 L P RF(NZ) ANC350 NO!!! L L : P CF A14,SETCUR POSITION CURSOR TO 1:ST POS. NEXT LINE L h PANC350 EQU * L P RTN A14 L P IFT IN:DL=1 L P EJECT L P L 8 P********************
0x17b70c…17b8a0 Dummy {f00=0x0078, f01=0x0190, f02=»OSITION TO THE LEFT L z P* M @ P************************************************************ M & P M j PDELETE EQU * M r P LDKL A6,-1 M & P LD A2,PCURS,TCABAS CURSOR ADDRESS M ( PDEL:10 ADK A6,80 END OF LINE POINTER M . P CWR A6,A2 LAST POSITION
0x17b8a0…17ba34 (4, 11) Dummy {f00=0x0078, f01=0x0190, f02=»UTE FOUND ?? M P RF(Z) DEL:20 NO!! N . P CWR A2,A6 ATTRIBUTE AFTER END OF LINE ?? N . P RF(G) DEL:20 YES!! N ` P SUK A2,1 SKIP ATTRIBUTE N | P LDR A6,A2 N PDEL:20 LDR A2,A6 N P N P N P LDK A1,BVDU N * P ADR A1,TCABAS ABSOLUTE BUFFER
0x17ba34…17bbc8 Dummy {f00=0x0078, f01=0x0190, f02=»SHIFTED ?? N p P RF(E) DEL:40 YES!! O P LC A3,1,A1 GET CHARACTER O . P ORK A3,/80 SET MODIFIED BIT O P * P SCR A3,A1 SHIFT CHARACTER 1 POS. LEFT O t P ADK A1,1 O " P RB DEL:30 GET NEXT CHARACTER O P O P O * PDEL:40 LDK A3,NULL+/80 NULL CH
0x17bbc8…17bd5c Dummy {f00=0x0078, f01=0x0190, f02=» P P 2 P LD A1,CURATT,TCABAS CURRENT ATTRIBUTE ADDRESS P * P CWK A1,LBVDU+1 UNFORMATTED SCREEN ??? P B P RF(E) INS:60 YES!!! P p P ADKL A1,BVDU P . P ADR A1,TCABAS ABSOLUTE ATTRIBUTE ADDRESS P " P SCR A3,A1 SAVE NEW ATTRIBUTE P & P RF INS:60 DIS
0x17bd5c…17bef0 Dummy {f00=0x0078, f01=0x0190, f02=»SERT CHARACTER AT CURSOR POSITION. SHIFT CHARACTERS IN P < P* SAME FIELD , EXCEPT NULLS, ONE POSITION TO THE RIGHT Q > P* Q ~ 8 P**************************************************** Q P Q PINSERT EQU * Q $ P IM MODE,TCABAS SET INSERT MODE Q . P
0x17bef0…17c084 Dummy {f00=0x0078, f01=0x0190, f02=»LBVDU+1 UNFORMATTED SCREEN?? Q P RF(NE) INS:20 NO!! R $ P LDKL A2,LBVDU-1 R @ P RF INS:30 R X P R j P R r 0 PINS:20 CF A14,S:ATT SEARCH ATTRIBUTE FORWARD R z P R P R P SUK A1,2 ATTRIBUTE FOUND ?? R P RF(Z) INS:30 NO!! R P SUK A2,1 R
0x17c084…17c218 Dummy {f00=0x0078, f01=0x0190, f02=»RACTER R l . PINS:40 CWR A2,A6 ALL CHARACTERS SHIFTED ?? S P RF(E) INS:50 YES!! S @ P LC A3,-1,A2 GET CHARACTER S P ORK A3,/80 SET MODIFIED BIT S ~ * P SCR A3,A2 SHIFT CHAR ONE POS TO RIGHT S P SUK A2,1 S " P RB INS:40 GET NEXT CHARACTER S P
0x17c218…17c3ac Dummy {f00=0x0078, f01=0x0190, f02=» CURSOR POSITION S v PINS:60 EQU * T * P CF A14,DISPL DISPLAY MODIFIED FIELDS T , ( P LD A2,PCURS,TCABAS CURSOR POSITION T Z P RB ANC252 T P XIF T P EJECT T P T > P********************************************************** T P* T 4 P*
0x17c3ac…17c540 Dummy {f00=0x0078, f01=0x0190, f02=»NULL EQU * T P LDR A1,A6 U P U $ PS:NU10 CWR A1,A2 U , P RF(E) S:NU30 U D P LCR A3,A1 GET CHARACTER U Z & P ANK A3,/7F MASK AWAY MODIFIED BIT U z P CWK A3,NULL NULL CHARACTER U P RF(E) S:NU20 YES!! U P ADK A1,1 U * P RB S:NU10 CHECK N
0x17c540…17c6d4 (4, 12) Dummy {f00=0x0078, f01=0x0190, f02=»************************************************* U P* V : P* CANCEL V D P* V T : P* PROGRAM ATTENTION KEY WHICH CAUSES AN I/O OPERATION V ^ $ P* AND GENERATE AN AID CHARACTER V P* V > P*********************************************************
0x17c6d4…17c868 Dummy {f00=0x0078, f01=0x0190, f02=»E V r PCAN200 EQU * W . P CF A14,LINHON TURN ON "KEYBOARD INHIBIT" W ( P CF A14,TRPA UPDATE AID AND TRANSMIT W P P RTN A14 W | P* W P W P IFT PAX=1 W P W P* W P* W F P* PROGRAM ATTENTION KEY IS PRESSED AND NUMBER WILL BE INSERT
0x17c868…17c9fc Dummy {f00=0x0078, f01=0x0190, f02=» ST A1,RDMORE,TCABAS W P RTN A14 X PPAEXA EQU * X , P CM RDMORE,TCABAS X @ P SUK A2,/31 CHECK IF NUM.1-3 X Z P RF(L) PFERR ILLEGAL CHAR. X ~ P SUK A2,/2 CHECK IF NUM.1-3 X P RF(G) PFERR ILLEGAL CHAR. X P RF(Z) PA3 X P ADK A2,1 X
0x17c9fc…17cb90 Dummy {f00=0x0078, f01=0x0190, f02=»A1 PROGRAM ATTENTION KEY X P* Y $ P* Y . PPA1 EQU * Y 8 P LDK A2,/2C PA1 POS Y J P RB CAN100 Y f P* Y x P* Y $ P* PA3 PROGRAM ATTENTION KEY Y P* Y P* Y PPA3 EQU * Y P LDK A2,/2B PA3 POS Y P RB CAN100 Y P
0x17cb90…17cd24 Dummy {f00=0x0078, f01=0x0190, f02=»****************************************************** Y P* Z > P* ENTER Z H P* Z X 8 P* PROGRAM FUNCTION KEY WHICH CAUSES AN I/O OPERATION Z b < P* AND GENERATE AN AID CHARACTER FOLLOWED BY AN SBA ORDER Z 8 P* ATTRIBUTE ADDRESS AND TEXT FOR EACH MODI
0x17cd24…17ceb8 Dummy {f00=0x0078, f01=0x0190, f02=»TER EQU * Z P LDK A2,/3D ENTER POS [ PENT100 EQU * [ 0 & P LC A2,TASCII,A2 CONVERT TO ASCII [ D . P CF A14,LINHON TURN ON "KEYBOARD INHIBIT" [ n . P CF A14,TRPF AID+MODIFIED FIELDS+TRANSMIT [ PENT200 EQU * [ P RTN A14 [ P* [ P [ P
0x17ceb8…17d04c Dummy {f00=0x0078, f01=0x0190, f02=»THE FUNCTIONS UNDER PF1-PF12 [ P* $ P* . PPFEX EQU * 8 P LDKL A1,PFEXA J P RF PFNXT ` PPFEXA EQU * r P CM RDMORE,TCABAS P SUK A2,/30 LEGAL CHAR ? , P RF(L) PFERR ILLEGAL,GO TO ERR.HANDLING & P RF(Z) PF0 FIRST NUM. 0
0x17d04c…17d1e0 Dummy {f00=0x0078, f01=0x0190, f02=» P CM RDMORE,TCABAS ] P SUK A2,/30 LEGAL NUM.? ] " , P RF(L) PFERR ILLEGAL GO TO ERR.HANDLING ] B P SUK A2,/2 LEGAL NUM ? ] r , P RF(G) PFERR ILLEGAL GO TO ERR.HANDLING ] P ADK A2,/3C PF10-12 POS ] P RB ENT100 ] P ] PPF0 EQU * ]
0x17d1e0…17d374 (4, 13) Dummy {f00=0x0079, f01=0x0190, f02=»UK A2,/31 LEGAL NUM ? ] , P RF(L) PFERR ILLEGAL GO TO ERR.HANDLING ^ P SUK A2,/8 LEGAL NUM ? ^ N , P RF(G) PFERR ILLEGAL GO TO ERR.HANDLING ^ l P ADK A2,/39 PF1-9 POS ^ P RB ENT100 ^ P XIF ^ PPFERR EQU * ^ * P CF A14,ERROR GO TO ERR-HAND
0x17d374…17d508 Dummy {f00=0x0079, f01=0x0190, f02=»IN=1 ^ P EJECT _ @ P************************************************************ _ P* _ ^ P* OFLINE _ h < P* THE OFFLINE SWITCH "OFFFLG" IS SET = 1 AND _ x 8 P* A BRANCH IS MADE BACK TO CREDIT PROGRAM _ P* _ B P**********
0x17d508…17d69c Dummy {f00=0x0079, f01=0x0190, f02=» _ P IFT DCLIN=2 ` P LD A7,MAIN,TCABAS ` P XRK A7,1 ` 6 P ST A7,MAIN,TCABAS ` H 0 P CF A14,DCABOR ABORT REQUEST NOT CURRENT MF ` b P XIF ` P IFT OFLIN=1 ` 6 P LDK A1,0 DV ADDRESS ::= 0MESSAGES TO VDU IGNORED ` P LDKL A8,ECBDC MF # 1 `
0x17d69c…17d830 Dummy {f00=0x0079, f01=0x018e, f02=» P XIF a P IFT OFLIN=1 a P CF A14,LMF1OF a $ P CF A14,LMF2OF a : P CF A14,LSAVOF a P ( P CF A14,LIOLON TURN ON OFFLINE LAMP a f & P IM OFFFLG,TCABAS SET OFFLINE FLAG a $ P ADKL A14,4 SKIP ONE STACK LEVEL a * P LD A13,2,A14 RELOAD REGISTERS A12-A
0x17d830…17d9c4 Dummy {f00=0x0079, f01=0x0190, f02=» P IFT DCLIN=2 b P EJECT b @ P*********************************************************** b & P* b j P* MAINFRAME CHANGE b t H P* THE SWITCH 'MAIN' IS CHANGED, AND THE APPROPRIATE 'SYSTEM' LAMP b P* IS TTURNED ON b P* b J P******
0x17d9c4…17db58 Dummy {f00=0x0079, f01=0x018e, f02=» b P CF A14,RESET c P CF A14,LMF1OF c P CF A14,LMF2OF c 4 P CF A14,LSAVOF c J P LD A1,MAIN,TCABAS c ` P XRK A1,1 c z P RF(NZ) MFCH10 c P CF A14,LMF1ON c P RF MFCH90 c PMFCH10 EQU * c P CF A14,LMF2ON c PMFCH90 EQU * c P
0x17db58…17dcec Dummy {f00=0x0079, f01=0x0190, f02=» c V P* d P* CLEAR d P* d " : P* PROGRAM ATTENTION KEY WHICH CAUSES AN I/O OPERATION d , 8 P* AND GENERATE AN AID CHARACTER. THE ENTIRE DISPLAY d j : P* BUFFER IS CLEARED TO NULLS AND CURSOR IS LOCATED IN d P* HOME POS d P* d < P********
0x17dcec…17de80 Dummy {f00=0x0079, f01=0x0190, f02=»A2 d . P CF A14,LINHON TURN ON "KEYBOARD INHIBIT" e ( P CF A14,TRPA UPDATE AID AND TRANSMIT e < & P CF A14,ERASE ERASE ENTIRE SCREEN e h P RTN A14 e P EJECT e P* e @ P************************************************************ e P* e P
0x17de80…17e014 (4, 14) Dummy {f00=0x0079, f01=0x0190, f02=»* e PEREOF EQU * f P LDK A6,1 f & P LD A3,ATTRIB,TCABAS GET ATTRIBUTE f 0 P ANK A3,/10 UNPROTECTED? f Z P RF(E) ERE100 YES f z P ABL ERROR f PERE100 LD A2,PCURS,TCABAS f P f ( P************************ 77.06.01 f P f 2 P CW
0x17e014…17e1a8 Dummy {f00=0x0079, f01=0x018e, f02=».01 f p P g ( PERE150 CF A14,GBUFFC GET BUFF. CHAR g P CWK A3,/1F ATTRIBUTE CHAR g @ P RF(G) ERE200 NO g b PERE160 LDR A1,A2 g z P LD A3,PCURS,TCABAS g PERE170 EQU * g P LDKL A4,BVDU g P ADR A4,TCABAS g P ADR A4,A3 g 0 P CF A14,
0x17e1a8…17e33c Dummy {f00=0x0079, f01=0x0190, f02=» g j P* h P h P LD A2,CURATT,TCABAS h P CWK A2,LBVDU+1 h 6 $ P RF(E) ERE180 UNFORMATTED SCREEN h N P h v P ADK A2,BVDU h ~ . P ADR A2,TCABAS ABSOLUTE ATTRIBUTE ADDRESS h P LCR A1,A2 GET ATTRIBUTE h P ORK A1,1 SET MDT BIT h P SCR A
0x17e33c…17e4d0 Dummy {f00=0x0079, f01=0x0190, f02=» RB ERE150 NEXT h * PERE300 SUK A6,1 WHOLW BUFF CONTROLED? i P RB(N) ERE160 i F P LDK A2,0 WRAP AROUND. i P RB ERE150 i z P EJECT i P* i < P******************************************************** i P* i P* ERINPT i P* i : P
0x17e4d0…17e664 Dummy {f00=0x0079, f01=0x0190, f02=»ION ON THE SCREEN i P* j < P******************************************************* j $ P* j d PERINPT EQU * j n ( P CF A14,ERASUP ERASE ALL UNPROTECTED j P CF A14,DISPL j P LD A2,PCURS,TCABAS j P CF A14,ATMASB j > P******************
0x17e664…17e7f8 Dummy {f00=0x0079, f01=0x0190, f02=»LAST POSITION j r * P LDKL A2,-1 ATTRIBUTE IN LAST POSITION k PERI:5 EQU * k D > P********************************************************** k X P ADK A2,1 k P k PERI:10 EQU * k P ST A2,PCURS,TCABAS k P RTN A14 k P EJECT k P* k
0x17e7f8…17e98c Dummy {f00=0x0079, f01=0x0190, f02=»NALLOWED KEYS k t P* l @ P*********************************************************** l P* l d PERROR EQU * l n ( P CF A14,LERRON TURN ON 'ERROR' LAMP l P LD A5,KBINH,TCABAS l 4 P ORK A5,4 BIT 13:=1,ERROR HANDLING.RESET ALLOWED l P ST A5
0x17e98c…17eb20 Dummy {f00=0x0079, f01=0x0190, f02=» ADDRESS l z " P LD A2,ECBBA,A8 BUFFER ADDRESS m $ P LDK A7,X'2B' CONTROL CHARACTER m 6 P SC A7,1,A2 m ^ P LDK A7,X'07' BELL CHARACTER m r P SC A7,2,A2 m P LDK A7,3 REQUESTED LENGTH m P ST A7,ECBRL,A8 m P LDK A7,X'86' SOUND ALARM m P L
0x17eb20…17ecb4 (4, 15) Dummy {f00=0x0079, f01=0x0190, f02=»**************** m ^ P* n ( P* KEY LOCK STATUS IS SET IN 'KEYS' n " , P* ON ENTRY A2 = KEY LOCK VALUE /70-/77 n N P* n ~ F P****************************************************************** n P* n PKEYL EQU * n & P SUK A2,/78 GET NEG KEY LO
0x17ecb4…17ee48 Dummy {f00=0x0079, f01=0x018e, f02=» n x P RB(N) KEYL10 o P ANR A3,A4 CHECK OLD KEY POS o P RF(NZ) KEYL20 WAS ON o B P LDR A2,A2 WAS OFF o ` & P RF(NZ) KEYL99 NOW OFF, NO CHANGE o z P RF KEYL30 NOW ON o PKEYL20 EQU * WAS ON o P LDR A2,A2 o $ P RF(Z) KEYL99 NOW ON, NO CHA
0x17ee48…17efdc Dummy {f00=0x0079, f01=0x0190, f02=» o j P* p P* KEYLOCK STATUS CHANGED p J P* A3 = NEW STATUS, RIGHTMOST BIT = RIGHTMOST LOCK, BIT ON = LOCK ON p 2 * P* A4 = KEYLOCK CHANGED, LAYOUT AS A3 p ( P* A2 = 1, IF CHANGED TO OFF ELSE 0 p P* p * P* INSERT USER ROUTINE BELOW THIS LIN
0x17efdc…17f170 Dummy {f00=0x0079, f01=0x0190, f02=»************ p d P* q P* LAMPMODULE q P* q 2 P* q < < P******************************************************** q F P* q PLON EQU /B7 q PLOF EQU /B8 q P IFT KB6272=1 q PLMF1 EQU /20 q PLMF2 EQU /10 q PLIOL EQU 8 q P
0x17f170…17f304 Dummy {f00=0x0079, f01=0x0190, f02=» EQU 1 =2 q PLINH EQU 2 =2 r PLERR EQU 4 =2 r ( PLSAV EQU 8 =2 r > P XIF r T PLMF1ON LDK A3,LMF1 r ` P RF LMPON r z PLMF1OF LDK A3,LMF1 r P RF LMPOF r PLMF2ON LDK A3,LMF2 r P RF LMPON r PLMF2OF LDK A3,LMF2 r P RF LMPOF
0x17f304…17f498 Dummy {f00=0x0079, f01=0x0190, f02=» PLINHOF LDK A3,LINH s P RF LMPOF s PLERRON LDK A3,LERR s 0 P RF LMPON s J PLERROF LDK A3,LERR s P RF LMPOF s v PLSAVON LDK A3,LSAV s P RF LMPON s PLSAVOF LDK A3,LSAV s P RF LMPOF s P* s PLMPON LDK A7,LON s P RF SD
0x17f498…17f62c Dummy {f00=0x0079, f01=0x0190, f02=»****** s ^ P* t P* SDISP t P* t ( $ P* SIGNAL DISPLAY MONITOR REQUEST t 2 P* t Z < P******************************************************** t d P* t PSDISP EQU * t P LDKL A8,ECBSD t P ADR A8,CREBAS t P ST A3,ECBCW,A8 t P L
0x17f62c…17f7c0 Dummy {f00=0x0079, f01=0x0190, f02=» P* ATMASB u P* u : P* SEARCH FOR ATTRIBUTE CHAR BACKWARDS AND MASK IT u " P* u ` < P******************************************************** u j P* u " P* A2=CURSOR BINARY ADDRESS u $ P* A1=BUFFER SCANNING PARAM. u . P* 0=AT
0x17f7c0…17f954 (4, 16) Dummy {f00=0x0079, f01=0x0190, f02=»ASB05 EQU * u " P CF A14,GBUFFC GET BUFFER CHAR v P CWK A3,/1F ATTRIB. CHAR. v : P RF(G) ASB10 NO v PASB08 ST A3,ATTRIB,TCABAS v t , P ST A2,CURATT,TCABAS CURSOR ON ATTRIBUTE v P RTN A14 v PASB10 CWK A2,0 END OF BUFFER v P RF(E) ASB20 Y
0x17f954…17fae8 Dummy {f00=0x0079, f01=0x0190, f02=»***** v d $ P LDK A1,2 ATTRIBUTE IN LAST POS. w & P LDKL A2,1919 LAST BUFFER POSITION w 6 P CF A14,GBUFFC GET CHARACTER w ` P CWK A3,/1F ATTRIBUTE ??? w P RB(NG) ASB08 YES!!! w P SUR A2,A2 FIRST SCREEN POS. w 2 P**********************************
0x17fae8…17fc7c Dummy {f00=0x0079, f01=0x0190, f02=»SIBLY UNFORMATTED SCREEN w x P RTN A14 x P EJECT x 0 P* x > < P******************************************************** x H P* x P* ATMASF x P* x : P* SEARCH FOR ATTRIBUTE CHAR. FORWARDS AND MASK IT x P* x > P****************
0x17fc7c…17fe10 Dummy {f00=0x0079, f01=0x0190, f02=»SCANNING PARAM. x . P* 0=ATTRIB FOUND 2=END OF BUFFER RIGHT y " P* A3=ATTRIB IN LAST BUFF POS y J P* y p P y z P y PS:ATT EQU * y P LD A7,ATTRIB,TCABAS y P LD A8,CURATT,TCABAS y , P CF A14,ATMASF SEARCH ATTRIBUTE FORWARD y P S
0x17fe10…17ffa4 Dummy {f00=0x0079, f01=0x018e, f02=» CF A14,GBUFFC GET BUFFER CHAR y P CWK A3,/1F ATTRIB CHAR? z & P RF(G) ASF10 NO z F @ P************************************************************ z ^ , P CWK A2,LBVDU-1 EOB +ATTRIB IN LAST POS z @ P******************************************************
0x17ffa4…180138 Dummy {f00=0x0079, f01=0x018e, f02=» P RTN A14 { ( PASF10 CWK A2,LBVDU-1 END OF BUFFER? { P RF(L) ASF20 NO { @ P LDK A1,2 { X P RTN A14 { j PASF20 ADK A2,1 { z P RB ASF05 { P EJECT { P* { 6 P************************************************** { P* { P* GBUFFC {
0x180138…1802cc Dummy {f00=0x0079, f01=0x0190, f02=» { P* | P* A2=CURSOR BINARY ADDR | P* A3=CHARACTER | 2 P* | H P* | R PGBUFFC EQU * | P LDK A3,0 | p P LDKL A4,BVDU | " P ADR A4,TCABAS GET VDU BUFFER | P ADR A4,A2 | & P LCR A3,A4 GET CHARACTER IN BUFF. | P RTN A14 |
0x1802cc…180460 Dummy {f00=0x0079, f01=0x0190, f02=»T 'KEYBOARD INHIBIT' IN FOLLOWING SITUATIONS: | 8 P* 1- A DEVICE WITH AN ATTACHED KEYBOARD IS EXECUTING } 6 $ P* A COMMAND. BIT 14=1 IN KBINH } r 2 P* 2- A PA-KEY OPERATION IS IN PROCESS PRIOR TO } < P* INITIATION OF A COMMAND FOR A DEVICE WITH AN ATTACHED
0x180460…1805f4 (4, 17) Dummy {f00=0x007a, f01=0x018e, f02=»TING ALLOWED DURING } n $ P* UPDATE AND DISPLAY SITUATION. ~ P* ~ D @ P*********************************************************** ~ N P* ~ PRESET EQU * ~ & P CM MODE,TCABAS RESET INSERT MODE ~ * P CF A14,LIOLOF TURN OFF "INSERT" LAMP ~ & P
0x1805f4…180788 Dummy {f00=0x007a, f01=0x0190, f02=» ~ ^ P RTN A14 P EJECT P & P . D P*************************************************************** 6 P* ~ 4 P* C O P Y : COPY CONTENTS IN VDU BUFFER ON $ P* HARDCOPY DEVICE P* @ P**********************
0x180788…18091c Dummy {f00=0x007a, f01=0x0190, f02=»BUFFER P ADR A3,TCABAS ADDRESSS P LDKL A6,LBVDU REQ LENGTH 0 , P LDK A4,/8B ORDER = WRITE ADDRESSED WAIT R P EJECT P* $ P* WRITE INTERTASK COMMUNICATION P* P* A3 = BUFFER ADDRESS P* A4 = ORDER P* A5 = "TO
0x18091c…180ab0 Dummy {f00=0x007a, f01=0x40de, f02=» CF A14,REQTIM NO TIME OUT SUPERVISION P ST A5,ECBCW,A8 TO TASK ID . P ST A6,ECBRL,A8 REQ LENGTH P P ST A3,ECBBA,A8 r P LDR A7,A4 ORDER P LKM P DATA 1 P RTN A14 P END @ ESS P* A4 = ORDER P* A5 = "TO
0x180ab0…180c44 Dummy {f00=0x007a, f01=0x2008, f02=» A7,/B7 TRANSFER PARAMETERS LKM , DATA 1 8 CF A14,ERASE ERASE SCREEN H 0 ,EM100 CF A14,TRPF TRANSMIT, PROGRAM FUNCTION j RB EM100 AGAIN * * END START @ 4,2,A13 ADR A14,A13 LOAD STACK
0x180c44…180dd8 Dummy {f00=0x007a, f01=0x0190, f02=»ST ON j p P* k P* k PPOLL EQU * k " P LD A8,DWTECB,A7 k 4 P ST A8,DWTSAV+10,A6 k L P ST A8,DWTSAV+10,A7 k h P CM ECBRC,A8 k P CM ECBEL,A8 k P ANK A1,2 k P RF(Z) POL100 k " P LDKL A1,POLHLT RC:POLL HALTED k P RF POL225 k
0x180dd8…180f6c Dummy {f00=0x007a, f01=0x0190, f02=»,A1 GET NEXT TCA k P RB(Z) POL110 EMPTY PLACE l " P RF(NN) POL150 ACTIVE TC FOUND l : P ADK A3,1 l ` P RB(NZ) POL110 INACTIVE TCA l r P LDK A1,PLIST END OF POLLIST l P ADR A1,A6 l PPOL120 EQU * l P ST A1,PACT,A6 UPDATE PACT l PPOL130
0x180f6c…181100 Dummy {f00=0x007a, f01=0x018e, f02=» l n P CW A1,PINACT,A6 m P RF(E) POL134 LIST SCANNED m P LDR* A3,A1 m B " P RB(NN) POL132 NOT INACTIVE TC m V P ADK A3,1 m | $ P RF(NZ) POL138 INACTIVE TC FOUND m & P LDK A1,PLIST END OF LIST REACHED m P ADR A1,A6 m P RB POL132 m PPOL1
0x181100…181294 (4, 18) Opaque[0x194]
0x181294…181428 # DirEnt {nam=»VDUPRT«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0f48, f03=0x0000}
0x181294…181428 IdxSect {
0x181294…181428 f00 = 0x007a // 0x181294 @0x0
0x181294…181428 f01 = 0x0018 // 0x181296 @0x2
0x181294…181428 gno = [ // 0x181298 @0x4
0x181294…181428 [0x00]: C0x007a.0x1.0
0x181294…181428 [0x01]: C0x007a.0x2.0
0x181294…181428 [0x02]: C0x007a.0x3.0
0x181294…181428 [0x03]: C0x007b.0x0.0
0x181294…181428 [0x04]: C0x007b.0x1.0
0x181294…181428 [0x05]: C0x007b.0x2.0
0x181294…181428 [0x06]: C0x007b.0x3.0
0x181294…181428 [0x07]: C0x007c.0x0.0
0x181294…181428 [0x08]: C0x007c.0x1.0
0x181294…181428 [0x09]: C0x007c.0x2.0
0x181294…181428 [0x0a]: C0x007c.0x3.0
0x181294…181428 [0x0b]: C0x007d.0x0.0
0x181294…181428 ]
0x181294…181428 }
0x181428…1815bc Dummy {f00=0x007a, f01=0x018e, f02=» 2 P IDENT VDUPRT REL 10.0 80-03-14 870150541000 P : P =6, BUFFER OVERFLOW B P REL 3.0 79-12-07 ` P =4, ESC IN MESSAGE TEXT | P REL 2.1 79-05-23 " P =5, SKIP CIRCULAR KB-BUFFER P REL 2.1 79-05-23 P =1,ODD BU
0x1815bc…181750 Dummy {f00=0x007a, f01=0x018e, f02=» p P REL 2.1 79-05-23 F P****************************************************************** $ P* n < P* V D U P R T : MODULE HANDLING MESSAGES COMING FROM x : P* MAIN FRAME, AND DISPLAYING THEM ON . P*
0x181750…1818e4 Dummy {f00=0x007a, f01=0x0190, f02=» P EJECT P* P* P* ENTRIES & P* 8 P* B * P ENTRY TRPF TRANSMIT, PROGRAM FUNCTION L , P ENTRY TRPA TRANSMIT, PROGRAM ATTENTION z $ P ENTRY ERASE ERASE ENTIRE SCREEN $ P ENTRY SETCUR CURSOR POSITIONING ( P ENTRY ERASUP
0x1818e4…181a78 Dummy {f00=0x007a, f01=0x018e, f02=»RITE ONE CHAR IN CURSOR POS P ENTRY UPDATE $ " P ENTRY RFMDUP REPLACE FM & DUP : P ENTRY DCINP ` P ENTRY RLRBUF t P ENTRY DCGETM P ENTRY GTRBUF P* P* P* EXTERNALS P* P* P EXTRN LINHON,LINHOF S
0x181a78…181c0c Dummy {f00=0x007a, f01=0x0190, f02=» P EXTRN SNBUSY PRT P* " * P EXTRN I:EVA0 CREDIT EVALUATION TABLE , P* Z P EXTRN TASCII,TEBCDI TB3270 d P EJECT P* D P**************************************************************** P* ( P* CONDITIONAL ASSEMB
0x181c0c…181da0 Dummy {f00=0x007a, f01=0x0190, f02=»:= 1 f , PDCLIN EQU 1 NUMBER OF MAIN FRAMES (1-2) 2 PRBUFL EQU 1050 RECEIVE BUFFER LENGTH IN WORDS < 0 PRBUFNR EQU 2 NUMBER OF RECEIVE BUFFERS (1-5) r 2 PTBUFL EQU 500 TRANSMIT BUFFER LENGTH IN WORDS 2 PTBUFNR EQU 2 NUMBER OF TRANSMIT BUFFERS (1-5
0x181da0…181f34 (4, 19) Dummy {f00=0x007a, f01=0x0190, f02=» P* P* * PTIMDC EQU 300 DC TIME OUT VALUE: 30 S PESC EQU /1B F PSBA EQU /11 Z PNULL EQU /7F NULL CHARACTER n & PNEWLIN EQU /7E NEW LINE CHARACTER $ PENDMES EQU /7D END MESSAGE CHAR " PFORMFD EQU /7C FORM FEED CHAR
0x181f34…1820c8 Dummy {f00=0x007a, f01=0x0190, f02=»ING v P* P PECBBA EQU 2 PECBRL EQU 4 2 PECBEL EQU 6 F PECBRC EQU 8 Z PECBCW EQU 10 n P* P* P* CREDIT USED EQU P* P* P* ECB REL. ADDRESSES P* P* PDIS EQU 20 P*
0x1820c8…18225c Dummy {f00=0x007a, f01=0x0190, f02=»BICW EQU ECBICR-DIS P XIF P IFT DCLIN=2 ( P IFF COPCMD=1 < PECBDC2 EQU ECBDC-DIS R PECBICW EQU ECBDC2-DIS n P XIF P IFF DCLIN=2 P IFT COPCMD=1 PECBICR EQU ECBDC-DIS PECBICW EQU ECBICR-DIS P XIF P
0x18225c…1823f0 Dummy {f00=0x007a, f01=0x0190, f02=» PECBSD EQU ECBKB-DIS P EJECT P* . P* 8 " P* BASE ADDRESS FOR TCA AND ECB B P* h PTCABAS EQU A11 r PCREBAS EQU A13 ECB P* P* P* TCA REL. ADDRESSES P* PTCT01 EQU 0 PPRINTER EQU TCT01+2
0x1823f0…182584 Dummy {f00=0x007a, f01=0x0190, f02=»AR l PCURATT EQU ATTRIB+2 & PWCC EQU CURATT+2 WCC/CCC CHARACTER & . PKBINH EQU WCC+2 KEYBOARD INHIBIT INDICATOR P $ PLINCNT EQU KBINH+2 LINE COUNTER 0 PDCLENG EQU LINCNT+2 DC READ EFFECTIVE LENGTH 2 PICWORK EQU DCLENG+2 WORK FIELD INTERTASK C
0x182584…182718 Dummy {f00=0x007a, f01=0x0190, f02=» l * PCCC EQU COPNO+2 COPY COMMAND CHARACTER PMAIN EQU CCC+2 MAIN FRAME 6 & PMODE EQU MAIN+2 INSERT MODE SWITCH X $ PKEYS EQU MODE+2 KEY LOCK STATUS . PECBDCC EQU KEYS+2 ECB ADDRESS LAST READ DC 2 PECBBLK EQU ECBDCC+2 ECBS FOR MULTIPLE WAIT &
0x182718…1828ac Dummy {f00=0x007a, f01=0x0190, f02=»R DISPLAY t " PLPAGE EQU 48 LINES ON ONE PAGE * PLLINE EQU 80 80 CHAR PER DISPLAY LINE 8 . PTID EQU -4 TASK IDENTITY T:A DISPLACEMENT f P* & P* CONFIG DATA 'CB1' REL ADDRESSES P* " PNBRKBV EQU 0 NUMBER OF KB/VDUS & PNBRGTP EQU N
0x1828ac…182a40 Dummy {f00=0x007a, f01=0x018e, f02=»# 1 f P IFT DCLIN=2 PMF2KBV EQU MF1GTP+16 PMF2GTP EQU MF2KBV+16 < P XIF X P* d P n P EJECT v D P**************************************************************** P* P* INPUT FROM DC P* 8 P****************
0x182a40…182bd4 (4, 20) Dummy {f00=0x007a, f01=0x018e, f02=» P* PDCINP EQU * & P CF A14,GTRBUF GET RECEIVE BUFFER " P LD A8,ECBDCC,TCABAS L P CF A14,DCGETM READ MESSAGE h P IFF DCLIN=2 P CM ECBBLK+DC1,TCABAS P XIF P IFT DCLIN=2 P LD A1,MAIN,TCABAS P CW A8,ECBBLK+DC
0x182bd4…182d68 Dummy {f00=0x007a, f01=0x0190, f02=» PDCIN20 EQU * P CM ECBBLK+DC2,TCABAS P LDR A1,A1 : P RF(Z) DCIN90 WRONG MF L P XIF j PDCIN30 EQU * v P IFT OFLIN=1 P LD A1,OFFFLG,TCABAS P RF(NZ) DCIN90 P XIF ( P LD A1,ECBEL,A8 EFFECTIVE DC-LENGTH P
0x182d68…182efc Dummy {f00=0x007a, f01=0x0190, f02=»BIT 15 = 0 AFTER DISPLAYING. P ST A5,KBINH,TCABAS $ . P CF A14,LINHON TURN ON 'KEYBOARD INHIBIT' @ . P CF A14,LSAVON TURN ON "SYSTEM AVAILABLE" r P CF A14,UPDATE P CF A14,DISPL P LD A2,PCURS,TCABAS P CF A14,ATMASB P
0x182efc…183090 Dummy {f00=0x007a, f01=0x0190, f02=»/E BIT 15:=0 KEYBOARD NOT TOTALLY P* INHIBITED ANY LONGER * P ST A2,KBINH,TCABAS J P LD A2,WCC,TCABAS f P ANK A2,2 P RF(Z) DCIN95 PDCIN60 EQU * . P CF A14,LINHOF TURN OFF 'KEYBOARD INHIBIT' P LD A2,KBINH,TCABAS ,
0x183090…183224 Dummy {f00=0x007a, f01=0x0190, f02=» | P LD A4,ECBBA,A8 P CF A14,RLRBUF PDCIN95 EQU * 6 P CF A14,SNBUSY J P RTN A14 ` P EJECT p P* ~ P* READ DC P* PDCGETM EQU * P LDK A1,0 P CF A14,REQTIM P LDK A7,/82 READ, WAIT ( P CM ECBCW,
0x183224…1833b8 Dummy {f00=0x007a, f01=0x0190, f02=»A 1 P RTN A14 P EJECT > P********************************************************** * P* l P* BUFFER HANDLING v P* > P********************************************************** P* PRLINK EQU RBUFL+RBUFL+2 P*
0x1833b8…18354c Dummy {f00=0x007a, f01=0x0190, f02=»2 P DATA *+RLINK P RES RBUFL P IFF RBUFNR=3 2 P DATA *+RLINK H P RES RBUFL ^ P IFF RBUFNR=4 p P DATA *+RLINK P RES RBUFL P XIF P DATA 0 END OF CHAIN P RES RBUFL P* P* PTLINK EQU TB
0x18354c…1836e0 Dummy {f00=0x007a, f01=0x0190, f02=»FL P IFF TBUFNR=2 P DATA *+TLINK P RES TBUFL 6 P IFF TBUFNR=3 H P DATA *+TLINK ^ P RES TBUFL t P IFF TBUFNR=4 P DATA *+TLINK P RES TBUFL P XIF P DATA 0 END OF CHAIN P RES TBUFL P* P
0x1836e0…183874 (4, 21) Dummy {f00=0x007b, f01=0x0190, f02=»,A4 P ADK A7,2 SKIP P LDKL A9,2 FOR DV ADDRESS " P RTN A14 F P* V P* GET RECEIVE BUFFER ` P* | PGTRBUF EQU * P LDKL A5,RBUF P* P* PGETBUF EQU * P LDR* A4,A5 P RF(Z) GETB50 NO BUFFER FREE
0x183874…183a08 Dummy {f00=0x007b, f01=0x0190, f02=» TASK P RB GETBUF P* P* RELEASE BUFFER * P* B PRLRBUF EQU * L P LDKL A2,RBUF ` PRELB05 EQU * v P SUK A4,2 POINT TO LINK PRELB10 EQU * P LDR* A3,A2 P RF(Z) RELB20 P LDR A2,A3 P RB RELB10
0x183a08…183b9c Dummy {f00=0x007b, f01=0x0190, f02=» P EJECT P* P* " P* STORE CHARACTER IN DC BUFFER * P* P P* A2=CHAR Z P* A7=BUFFER POINTER l " P* A9=BUFFER CHARACTER COUNTER P* P* PPDCCH EQU * P CWK A9,TBUFL+TBUFL =3 P RF(NL) PDCCHR OVE
0x183b9c…183d30 Dummy {f00=0x007b, f01=0x0190, f02=»ORE ATTENTION ID FROM A2 P* P* * PPAID CF A14,PDCCH 4 P RTN A14 N P* ^ P* h ( P* GET CHARACTER FROM DC BUFFER TO A2 r P* P* PGDCCH LCR A2,A7 P ANK A2,/FF & P RF(NZ) GDCC:1 NOT NULL CHARACTER $ P
0x183d30…183ec4 Dummy {f00=0x007b, f01=0x0190, f02=»A1 FROM DC BUFFER x P* P* $ PGETADR CF A14,GDCCH . P LC A1,TEBCDI,A2 J P ANK A1,/3F b P SLL A1,6 v P CF A14,GDCCH P LC A2,TEBCDI,A2 P ANK A2,/3F P ORR A1,A2 P RTN A14 P EJECT P* P*
0x183ec4…184058 Dummy {f00=0x007b, f01=0x0190, f02=» LDKL A8,ECBDC P IFT DCLIN=2 P LD A7,MAIN,TCABAS * P RF(Z) DC050 D P LDKL A8,ECBDC2 X P XIF p PDC050 EQU * | P ADR A8,CREBAS P LDKL A1,TIMDC P CF A14,REQTIM P ST A9,ECBRL,A8 REQ LENGTH $ P ST A12,ECBBA,A8 BUF
0x184058…1841ec Dummy {f00=0x007b, f01=0x0190, f02=» LDK A7,/86 PDC100 EQU * P LKM ( P DATA 1 4 PDC200 EQU * D P LDR A4,A12 X P CF A14,RLWBUF l $ P LD A1,ECBRC,A8 GET RETURN CODE P RF(Z) DC300 P LD A7,KBINH,TCABAS ( P ANK A7,/D BIT 14:=0 ALLIWE KEYBOARD P S
0x1841ec…184380 Dummy {f00=0x007b, f01=0x0190, f02=» LDK A7,/31 RESET KEYBOARD ECB BUFFER P LDKL A8,ECBKB . P ADR A8,CREBAS D P LKM Z P DATA 1 f P* v P RTN A14 PDC300 EQU * . P CF A14,LSAVON TURN ON 'SYSTEM AVAILABLE' P RTN A14 P EJECT P* P* ( P
0x184380…184514 (4, 22) Dummy {f00=0x007b, f01=0x0190, f02=»STORE BUFFER ADDRESS IN DC BUFFER P* * P* A1=BINARY BUFFER ADDRESS 4 P* V P* ` PBUFADR LDR A2,A1 j P SRL A2,6 P ANK A2,/3F & P LC A2,TASCII,A2 CONVERT TO ASCII P CF A14,PDCCH P LDR A2,A1 P ANK A2,/3F
0x184514…1846a8 Dummy {f00=0x007b, f01=0x0190, f02=»MAGE BUFFER n P* P* A3=BUFFER POSITION BINARY P* A4=BUFFER POINTER B P* ^ P* h " PRDMOD LDK A3,0 RESET POSITION r P LDKL A4,BVDU " P ADR A4,TCABAS BUFFER POINTER @ P****************************************************
0x1846a8…18483c Dummy {f00=0x007b, f01=0x0190, f02=» P ADR A4,TCABAS P P LDR A1,A2 " P ANK A1,/60 ATTRIBUTE ??? 4 P RF(Z) RD200 YES!!! V P r @ P************************************************************ z PRD100 CWK A3,LBVDU P RF(NL) RDMODE ALL EXAMINED P LCR A2,A4 G
0x18483c…1849d0 Dummy {f00=0x007b, f01=0x0190, f02=» @ P************************************************************ ! P LDR A1,A2 ! H P ANK A1,/60 ! Z P RF(Z) RD200 ATTRIBUTE CHAR ! n PRD110 CWK A2,NULL ! " P RB(E) RD100 DON'T STORE NULL ! * P CF A14,PDCCH STORE CHAR IN DC BUFFER ! P RB RD10
0x1849d0…184b64 Dummy {f00=0x007b, f01=0x0190, f02=» ! t P LCR A2,A4 " P ADK A3,1 " P ADK A4,1 " , P LDR A1,A2 " > P ANK A1,/60 " P $ P RB(NZ) RD210 NO ATTRIBUTE CHAR " d F P******************************************************** 78-05-11 " * P CWK A3,LBVDU ALL BUFFER EXAMINED ??? " P RF(
0x184b64…184cf8 Dummy {f00=0x007b, f01=0x0190, f02=»0 LDK A2,SBA " " P CF A14,PDCCH SBA TO DC BUFFER # P LDR A1,A3 BUFFER POSITION # : P CF A14,BUFADR TO DC BUFFER # P RB RD100 # PRDMODE RTN A14 # P EJECT # P* # P* # 4 P* UPDATE VIDEO DISPLAY BUFFER IMAGE BY THE DATA # P* #
0x184cf8…184e8c Dummy {f00=0x007b, f01=0x0190, f02=»FFER INDEX, INITIALLY ZERO # P* $ " P* A3=DISPLAY BUFFER POSITION $ , P* A4=DISPLAY BUFFER POINTER $ P P* $ t P* $ ~ PUPDATE EQU * $ P CM ICWORK,TCABAS $ P LD A8,ECBDCC,TCABAS $ & P LD A7,ECBBA,A8 DC BUFFER ADDRESS $ $ P SUR A9,A9 R
0x184e8c…185020 Dummy {f00=0x007b, f01=0x0190, f02=»SCAPE $ | PUPD010 EQU * % " P CF A14,GDCCH GET COMMAND CODE % " P CWK A2,/31 % H P RF(E) UPD100 WRITE % P CWK A2,/35 % x P RF(E) UPD120 ERASE/WRITE % P CWK A2,/3F % ( P RF(E) UPD140 ERASE ALL UNPROTECTED % P IFT COPCMD=1 % P CWK
0x185020…1851b4 (4, 23) Dummy {f00=0x007b, f01=0x0190, f02=»COMMAND % P* & PUPD100 EQU * & ( P CF A14,PWCC PROCESS WCC FOR MDT BIT & . P LD A3,PCURS,TCABAS & Z ( P LDR A4,A3 START IN CURSOR POSITION & v P ADKL A4,BVDU & P ADR A4,TCABAS & $ P LDK A5,1 INDICATE WCC, IC OR RA & P RF UPD220 & P
0x1851b4…185348 Dummy {f00=0x007b, f01=0x0190, f02=»ASE ALL UNPROTECTED & P* ' PUPD140 EQU * ' & ( P CF A14,ERASUP ERASE ALL UNPROTECTED ' : ( P RF UPDEND NO TEXT WITH THIS COMMAND ' f P* ' . P* TAKE CARE OF WRITE CONTROL CHARACTER WCC ' P* ' " PUPD200 CF A14,PWCC PROCESS WCC ' $ P LDK A5,1
0x185348…1854dc Dummy {f00=0x007b, f01=0x0190, f02=»0 START FROM POSITION ZERO ' P LDKL A4,BVDU ( " P ADR A4,TCABAS ( 8 PUPD220 CW A9,DCLENG,TCABAS ( N 0 P RF(NL) UPDEND ALL RECEIVED CHARS PROCESSED ( p * P CF A14,GDCCH GET CHAR FROM DC BUFFER ( P CWK A2,/20 ( P RF(L) UPD300 ORDER ( PUPD230
0x1854dc…185670 Dummy {f00=0x007b, f01=0x0190, f02=» RF(E) UPD260 END OF VIDEO BUFFER ( PUPD250 EQU * ) * $ P SCR A2,A4 STORE IN VIDEO BUFFER ) > P ADK A3,1 ) f P ADK A4,1 ) x P RB UPD220 ) PUPD260 LDK A3,0 ) P LDKL A4,BVDU ) P ADR A4,TCABAS ) P RB UPD250 ) PUPD300 EQU * ) : P**
0x185670…185804 Dummy {f00=0x007b, f01=0x018e, f02=» SUR A3,A3 FIRST SCREEN POSITION ) P LDKL A4,BVDU * ( " P ADR A4,TCABAS BUFFER POSITION * > PUPD302 EQU * * d : P******************************************* 78-08-15 * x P CWK A2,/1D * P RF(E) UPD320 START FIELD * P CWK A2,/11 * $ P RF(E) U
0x185804…185998 Dummy {f00=0x007b, f01=0x0190, f02=» * t P CWK A2,/14 + $ P RF(E) UPD500 REPEAT TO ADDRESS + P CWK A2,/12 + D . P RF(E) UPD540 ERASE UNPROTECTED TO ADDRESS + X P CWK A2,/0C + P RF(NE) UPD305 + P LDK A2,FORMFD FORM FEED + P RB UPD230 + PUPD305 CWK A2,/19 + P RF(NE)
0x185998…185b2c Dummy {f00=0x007b, f01=0x0190, f02=»NEWLIN NEW LINE + P RB UPD230 , PUPD315 EQU * , * P CWK A2,/18 , > P RF(NE) UPD317 ILLEGAL ORDER , R P LDK A2,/30 , v P RB UPD230 , P , PUPD317 EQU * , P CWK A2,ESC ESCAPE ??? , P RB(E) UPD010 YES!! GET TEXT , P EJECT , P
0x185b2c…185cc0 Dummy {f00=0x007b, f01=0x0190, f02=»ER , t P RB UPD230 - P - @ P************************************************************ - $ P* - h P* RELEASE RECEIVE BUFFER - r P* - * P************************************* - P - PUPDEND EQU * - P LD A8,ECBDCC,TCABAS - P LD
0x185cc0…185e54 (4, 24) Dummy {f00=0x007b, f01=0x0190, f02=» CF A14,GDCCH GET ATTRIBUTE CHAR - P LC A2,TEBCDI,A2 . ( * P LDR A1,A2 COMPOSE PTS ATTRIBUTE CHAR . @ P ANK A1,1 . n P SRL A2,1 . P ANK A2,/1E . P ORR A2,A1 . P RB UPD240 . P* . P* SET BUFFER ADDRESS . P* . $ PUPD340 CF A14,
0x185e54…185fe8 Dummy {f00=0x007b, f01=0x0190, f02=» . P ADR A4,TCABAS / P RB UPD220 / P* / 0 P* INSERT CURSOR / : P* / R 0 PUPD360 ST A3,PCURS,TCABAS SET NEW CURSOR POS / $ P LDK A5,1 INDICATE WCC, IC OR RA / P RB UPD220 / P EJECT / P* / P* PROGRAM TAB / P* / PUPD400
0x185fe8…18617c Dummy {f00=0x007b, f01=0x0190, f02=» LDK A5,0 / P CWK A3,LBVDU 0 P RB(NL) UPD210 END OF BUFFER 0 ( P LCR A2,A4 0 L P ADK A3,1 0 ^ P ANK A2,/7F 0 p P CWK A2,/20 0 P RF(L) UPD415 0 P SCR A1,A4 STORE NULL 0 P ADK A4,1 0 P RB UPD410 0 PUPD415 EQU * 0 P ADK
0x18617c…186310 Dummy {f00=0x007b, f01=0x0190, f02=» * P ABL(NL) UPD210 END OF DISPLAY BUFFER 1 P LCR A2,A4 1 2 P ADK A3,1 1 D P ADK A4,1 1 V P ANK A2,/7F 1 h P CWK A2,/20 1 | P RB(L) UPD420 1 P RB UPD430 1 P EJECT 1 P* 1 P* REPEAT TO ADDRESS 1 P* 1 ( PUPD500 CF A14,GETA
0x186310…1864a4 Dummy {f00=0x007b, f01=0x0190, f02=» A5,1 INDICATE WCC, IC OR RA 1 " P ORK A2,/80 INDICATE MODIFIED 2 $ P 2 J B P**************************************************** 78-07-02 2 R P 2 2 P CWR A3,A1 NULLS TO ALL SCREEN POSITIONS ???? 2 P RF(E) UPD530 YES!!! 2 P 2 D P**************
0x1864a4…186638 Dummy {f00=0x007b, f01=0x0190, f02=»DK A3,0 2 P LDKL A4,BVDU WRAP AROUND 3 P ADR A4,TCABAS 3 2 PUPD520 CWR A3,A1 3 H $ P ABL(E) UPD220 ALL CHAR REPEATED 3 ` P 3 F P******************************************************* 78-07-02 3 PUPD530 EQU * 3 D P**************************
0x186638…1867cc Dummy {f00=0x007b, f01=0x0190, f02=» P* 4 " P* ERASE UNPROTECTED TO ADDRESS 4 P* 4 4 ( PUPD540 CF A14,GETADR GET END ADDRESS 4 > P CWK A3,LBVDU 4 j " P RB(NL) UPDEND INVALID ADDRESS 4 0 P CF A14,ERASUA ERASE UNPROTECTED TO ADDRESS 4 P ABL UPD220 4 P IFT COPCMD=1 4 P EJE
0x1867cc…186960 Dummy {f00=0x007b, f01=0x0190, f02=»PORTED FOR VDU 4 n P ADK A7,1 5 P BYPASS CCC 5 ( " P CF A14,GDCCH GET FROM DEVICE 5 > P IFT EBCDIC=1 5 d & P LC A2,TEBCDI,A2 CONVERT TO EBCDIC 5 z P XIF 5 P IFT COPCMD=1 5 " P LD A3,6,CREBAS 'CB1' ADDRESS 5 P LDK A4,MF1KBV-1 5 P IFT
0x186960…186af4 (4, 25) Dummy {f00=0x007c, f01=0x0190, f02=» PUPD602 EQU * 6 P ADR A4,A3 CONFIG TABLE -1 6 & P LD A5,NBRKBV,A3 NUMBER OF KB/VDUS 6 : ( P ADR A4,A5 LAST KB/VDU CONFIGURATED 6 d PUPD604 EQU * 6 $ P CCR A2,A4 DV-ADDRESS MATCHES ? 6 P RF(E) UPD610 YES 6 P SUK A4,1 6 P SUK A5,1 6
0x186af4…186c88 Dummy {f00=0x007c, f01=0x0190, f02=» LKM 6 0 P DATA 10 ABORT LAST REQUEST IF NOT COMPLETED 7 & P ADKL A5,/4B40 TASKID FROM DEVICE 7 @ $ P LD A2,-4,CREBAS GET OWN TASKID 7 j & P ST A2,ICWORK,TCABAS PUT IN BUFFER 7 * P LDK A4,/0B WRITE ADDRESSED , NO WAIT 7 P LDK A6,2 REQ LENGTH 7 P L
0x186c88…186e1c Dummy {f00=0x007c, f01=0x018e, f02=» 7 P* 8 P* 8 & P* PROCESS WRITE CONTROL CHARACTER 8 P* 8 F * P* ONLY RESET MDT BIT IS TAKEN CARE OF 8 P P* 8 ~ P* 8 PPWCC CF A14,GDCCH GET WCC 8 P LC A2,TEBCDI,A2 IN EBCDIC 8 P ST A2,WCC,TCABAS SAVE IT 8 P ANK A2,/04 8
0x186e1c…186fb0 Dummy {f00=0x007c, f01=0x0190, f02=» 8 P LD A2,ECBBA,A8 9 P LDK A7,/2B 9 P SC A7,1,A2 =1 9 4 P LDK A7,/07 BELL =1 9 L P SC A7,2,A2 =1 9 h P SC A7,3,A2 =1 9 P LDK A7,4 9 P ST A7,ECBRL,A8 9 P LDK A7,/86 9 P LKM 9 P DATA 1 9 P LD A8,ECBDCC,TCABAS 9
0x186fb0…187144 Dummy {f00=0x007c, f01=0x0190, f02=» A14 NO ACTION 9 P* : P* : P* RESET ALL MDT BITS : * P* : F P* : P PRESMDT LDK A3,0 : Z P LDKL A4,BVDU : r P ADR A4,TCABAS : PRESM10 CWK A3,LBVDU : P RB(NL) PWCC10 ALL DONE : P LCR A2,A4 GET CHAR : P ANK A2,/60 :
0x187144…1872d8 Dummy {f00=0x007c, f01=0x0190, f02=»1 : P RB RESM10 ; P EJECT ; P* ; * P* ; 4 P* ERASE ENTIRE SCREEN ; > P* ; P* ; f PERASE LDK A3,0 ; p P LDKL A4,BVDU ; P ADR A4,TCABAS ; P LDK A2,NULL ; PERAS20 CWK A3,LBVDU ; P RF(NL) ERAS25 ALL ERASED ; P SCR
0x1872d8…18746c Dummy {f00=0x007c, f01=0x018e, f02=» 0 P ST A1,CURATT,TCABAS INDICATE UNFORM. SCREEN < P CM ATTRIB,TCABAS < 8 , P LD A1,PRINTER,TCABAS CHECK DEVISE TYPE < R ( P RF(NZ) ERAEND PRINTER, NOT DISPLAY < ( P STR A7,A14 SAVE A7 AND A8 ON STACK < P ST A8,-2,A14 < P LDKL A8,ECBVDU < P
0x18746c…187600 Dummy {f00=0x007c, f01=0x0190, f02=» " P ST A7,ECBRL,A8 REQ LENGTH = 2 = P LDK A7,/86 WRITE = * P LKM = D P DATA 1 = P P LD A8,-2,A14 = ` " P LDR* A7,A14 RESTORE A7 AND A8 = v PERAEND RTN A14 = P EJECT = P* = P* = P* ERASE ALL UNPROTECTED = P* = P* = P
0x187600…187794 (4, 26) Dummy {f00=0x007c, f01=0x0190, f02=» CM PCURS,TCABAS FIND FIRST UNPROTECTED POS = H P******************************************************************** > 4 , P LC A2,1919,A4 GET LAST SCREEN CHARACTER > P ANK A2,/7F > P CWK A2,/20 ATTRIBUTE ??? > $ P RF(L) ERU:01 YES!! WE GOT IT!! >
0x187794…187928 Dummy {f00=0x007c, f01=0x0190, f02=»LBVDU > P RF(NL) ERASU2 ? P LCR A2,A4 GET CHAR ? $ P ANK A2,/7F ? @ P ADK A3,1 ? T P ADK A4,1 ? f P CWK A2,/20 ? x P RB(NL) ERASU1 NO ATTRIBUTE ? PERU:01 EQU * ? P ANK A2,/10 ? P RB(NZ) ERASU1 PROTECTED ? * P ST A3,PCURS,TCA
0x187928…187abc Dummy {f00=0x007c, f01=0x018e, f02=»U ? P ADR A4,TCABAS @ P RF ERASU4 @ PERASU3 EQU * @ 2 P LDR A3,A3 @ F 6 P RF(Z) ERASU4 UNPROTECTED ATT. IN LAST SCREEN POS. @ X $ P SUK A3,1 GET BACK TO ATTRIBUTE @ P SUK A4,1 - " - @ PERASU4 EQU * @ P LDK A1,0 @ P LDK A6,NU
0x187abc…187c50 Dummy {f00=0x007c, f01=0x0190, f02=» P* A * PERASUA LDK A6,NULL+/80 ERASE CHARACTER A $ P ******************* 78-09-11 A < " P CWK A3,LBVDU WRAP AROUND ??? A d P RF(L) ERAS:1 NO!! A P LDK A3,0 BUFFERINDEX A P LDKL A4,BVDU A , P ADR A4,TCABAS ABSOLUTE BUFFER ADDRESS A P
0x187c50…187de4 Dummy {f00=0x007c, f01=0x0190, f02=» P ANK A2,/7F B ( P CWK A2,/20 ATTRIBUTE CHARACTER ??? B P RF(NL) ERAS35 NO!!! B D P ANK A2,/10 B ` " P RF(NZ) ERAS70 PROTECTED FIELD B t P LC A2,1919,A4 B P ANK A2,/FE B P SC A2,1919,A4 RESET MDT BIT B P RF ERAS35 B $ P ***********
0x187de4…187f78 Dummy {f00=0x007c, f01=0x0190, f02=»D B x P ADR A4,TCABAS C PERAS33 EQU * C P CWR A3,A1 C 4 ( P RB(E) ERAEND ALL UNPROTECTED ERASED C F . PERAS35 LCR A2,A4 GET CHAR FROM VDU BUFFER C r P ANK A2,/7F C P CWK A2,/20 C P RF(L) ERAS50 ATTRIBUTE CHAR C P XRK A2,NULL C P RF(
0x187f78…18810c Dummy {f00=0x007c, f01=0x0190, f02=»DK A3,1 C P ADK A4,1 D P ANK A2,/10 D " " P RF(NZ) ERAS60 PROTECTED FIELD D 6 P LC A2,-1,A4 D P ANK A2,/FE RESET MDT BIT D p P SC A2,-1,A4 D P RB ERAS30 D PERAS60 CWK A3,LBVDU D P RF(L) ERAS65 D P LDK A3,0 D P LDKL A4,BVD
0x18810c…1882a0 Dummy {f00=0x007c, f01=0x0190, f02=» A2,A4 D P ANK A2,/7F E P CWK A2,/20 E " " P RB(L) ERAS50 ATTRIBUTE FOUND E 6 P ADK A3,1 E P ADK A4,1 E n P RB ERAS60 E P EJECT E P* E P* E P* TRANSMIT PROGRAM ATTENTION E P* E P* A2=AID E P* E P* E * PTR
0x1882a0…188434 (4, 27) Dummy {f00=0x007c, f01=0x0190, f02=»TR050 EQU * E " P RTN A14 TRANSMISSION TROUBLE F PTRRTN RTN A14 F : P EJECT F P P* F ^ P* F h P* TRANSMIT PROGRAM FUNCTION F r P* F P* A2=AID F P* F P* F * PTRPF CF A14,GTWBUF GET TRANSMIT BUFFER F PTRPF10 CF A14,PAID STO
0x188434…1885c8 Dummy {f00=0x007c, f01=0x0190, f02=» F P* G P* G $ P* DISPLAY MODIFIED FIELDS ON VDU G P* G D P* G N P* A3=VDU POSITION G X P* A4=VDU IMAGE POINTER G r P* A5=MODIFIED INDICATOR G P* A7=VDU LINE OUTPUT POINTER G P* A8=VDU ECB G P* A9=VDU OUTPUT CHAR COUNTER G
0x1885c8…18875c Dummy {f00=0x007c, f01=0x0190, f02=» G 8 P SUR A10,A10 RESET COUNT FOR INTENSIFIED DISPLAYING H P LDK A3,0 H D P LDKL A4,BVDU H V P ADR A4,TCABAS H l , P CF A14,SPACES PUT SPACES IN LINE BUFFER H D P**************************************************************** H 6 P LC A2,1919,A4
0x18875c…1888f0 Dummy {f00=0x007c, f01=0x0190, f02=»NK A2,6 H P XRK A2,6 I > P ST A2,INTATT,TCABAS CHECK DISPLAY/NONDISPLAY INFORMATION I " P RF(Z) DIS210 NON DISPLAY I d 4 P CF A14,INTCHK INSERT HIGH/LOW INTENS. IN BUFFER I H P******************************************************************* I
0x1888f0…188a84 Dummy {f00=0x007c, f01=0x018e, f02=» CHECK IF LOW/HIGH INTENSITY I PDIS110 EQU * J $ P CWK A3,LBVDU J 8 P RF(NL) DIS900 ALL SCANNED J N P LCR A2,A4 GET CHAR J p > P************************************************ 78-08-15 J P J " P CF A14,SET:M SET MODIFIED BIT J P J > P****
0x188a84…188c18 Dummy {f00=0x007c, f01=0x0190, f02=» P ADK A3,1 K P ADK A4,1 K P ADK A7,1 K ( P ADKL A9,1 K : P CWK A2,/20 K L P RF(L) DIS200 ATTRIBUTE CHAR K ` P CWK A2,NULL K . P RB(E) DIS100 NULL EQUALS SPACE AT DISPLAY K P CWK A2,/7D K P RF(NE) DIS120 K P LDK A2,/39 K P
0x188c18…188dac Dummy {f00=0x007c, f01=0x0190, f02=»DIS122 EQU * K 4 P SC A2,-1,A7 STORE CHAR IN DISPLAY OUTPUT BUFFER L P RB DIS100 L L PDIS200 ANK A2,6 L ^ " P XRK A2,6 CHECK IF NONDISPLAY L v 2 P ST A2,INTATT,TCABAS SAVE ATTRIBUTE CHARACTER L P RF(Z) DIS210 NON DISPLAY L P ANK A2,4 L P R
0x188dac…188f40 Dummy {f00=0x007c, f01=0x0190, f02=» EQU * L * P SC A2,-1,A7 STORE INTENSITY CHARACTER M " P ADKL A10,1 INCREMENT COUNTER M < P ADK A7,1 M b P RB DIS100 M t PDIS210 EQU * M P CWK A9,LLINE M P RF(L) DIS220 M $ P CF A14,DISLIN DISPLAY THIS LINE M PDIS220 EQU * M P CWK A
0x188f40…1890d4 (4, 28) Dummy {f00=0x007c, f01=0x0190, f02=» M " P CF A14,SET:M SET MODIFIED BIT N P N . > P************************************************ 78-08-15 N 6 PDIS225 EQU * N x " P ANK A2,/7F RESET DISPLAY BIT N P SCR A2,A4 N P ADK A3,1 N P ADK A4,1 N P ADK A7,1 N P ADKL A9,1 N
0x1890d4…189268 Dummy {f00=0x007c, f01=0x0190, f02=» N z P* O P* O PSETCUR EQU * O PDIS900 LDK A1,2 REQ LENGTH O 0 PDIS905 ST A1,ECBRL,A8 O R & P LD A1,PCURS,TCABAS GET CURSOR POS O p & P LDKL A2,/101 START ON LIN 1 POS 1 O P ST A2,ECBCW,A8 O P LDKL A2,/100 O PDIS910 CWK A1,LLINE O
0x189268…1893fc Dummy {f00=0x007c, f01=0x0190, f02=»T CURSOR AND WRITE O P LKM P P DATA 1 P & 0 P CM INTATT,TCABAS CLEAR INTENSITY ATTRIBUTE P 6 P RTN A14 P j P EJECT P z P* P P* P 0 P* WRITE ONE CHAR FROM A2 IN CURSOR POSITION P P* P P* P PWCHAR LD A1,ECBBA,A8 P P CF A14,
0x1893fc…189590 Dummy {f00=0x007c, f01=0x0190, f02=»************************************************************* P P* Q F 8 P* REPLACE FM & DUP WITH '*' RESP. ';', IF PRESENT Q P P* CHARACTER IN A2 Q P* Q J P********************************************************************* Q P* Q
0x189590…189724 Dummy {f00=0x007c, f01=0x0190, f02=»NE) RFMD20 Q P LDK A2,/3B R PRFMD20 EQU * R & P RTN A14 R : P EJECT R J P* R X P* R b ( P* PUT SPACES TO DISPLAY LINE BUFFER R l P* R P* R PSPACES LD A7,ECBBA,A8 R P ADK A7,2 BUFFER ADDRESS R P LDKL A9,LLINE LINE LENGTH R
0x189724…1898b8 Dummy {f00=0x007c, f01=0x018e, f02=»A9,2 R P RB(P) SPAC10 S $ P LDK A2,0 CLEAR A2=CHAR REGISTER S " & P LDK A5,0 RESET MODIFIED INDICATOR S J P LD A7,ECBBA,A8 S t P ADK A7,2 BUFFER ADDRESS S & P SUR A9,A9 RESET LINE CHAR COUNTER S P RTN A14 S P EJECT S P* S P* S ( P
0x1898b8…189a4c Dummy {f00=0x007c, f01=0x018e, f02=» PDISLIN EQU * T P LDR A7,A5 T $ P ANK A5,/80 ANY MODIFICATIONS ?? T * " P RF(Z) DISL10 NO MODIFICATIONS T R P LDK A1,2 T x ( P XRK A7,/A0 ONLY SPACES IN BUFFER ?? T P RF(Z) DIS:10 YES!! T P LDKL A1,LLINE+2 T . P ADR A1,A10 ADD NR OF INTENSIT
0x189a4c…189be0 Dummy {f00=0x007c, f01=0x0190, f02=» T p P U P U $ P LDK A7,/8B SET CURSOR AND WRITE U P LKM U @ P DATA 1 U L P EJECT U P U j H P******************************************************************** U r P* U 0 P* EXECUTE FAST OUTPUT TO BLANK REMAINIG PART U P* OF THE LIN
0x189be0…189d74 (4, 29) Dummy {f00=0x007d, f01=0x018e, f02=» U p P ANK A1,X'FF' COLUMN NUMBER V P SUK A1,81 LAST POSITION ??? V , 4 P RF(Z) DISL10 YES!! NO FAST OUTPUT ON THIS LINE V P P V " P LD A1,ECBBA,A8 BUFFER ADRESS V , P LDK A2,X'2B' DONT MOVE CURSOR ONE LINE V P SC A2,1,A1 =1 V * P LDKL A2,X
0x189d74…189f08 Dummy {f00=0x007d, f01=0x018e, f02=» V r P ST A2,ECBRL,A8 W P LDK A7,X'86' WRITE ORDER W P LKM W B P DATA 1 W N P W ^ PDISL10 EQU * W f P LDK A2,1 W z ( P SC A2,ECBCW+1,A8 POS 1 ON NEXT LINE W P LDKL A2,/100 W * P ADS A2,ECBCW,A8 INCREMENT LINE NUMBER W $ P RB SPACES P
0x189f08…18a09c Dummy {f00=0x007d, f01=0x018e, f02=» P* X > P* I N T C H K CHECK IF LINE SHOULD BE PRINTED WITH X 0 P* HIGH OR LOW INTENSITY X P P* X J P********************************************************************** X P X , PINTCHK SUR A10,A10 RESET INTENSITY C
0x18a09c…18a230 Dummy {f00=0x007d, f01=0x0190, f02=» P RF(Z) INT:10 YES Y P Y P LDK A2,X'1E' LOW INTENSITY Y & P RF INT:20 HIGH INTENSITY Y J P Y l & PINT:10 LDK A2,X'1F' HIGH INTENSITY Y t P Y 8 PINT:20 SCR A2,A7 SAVE INTENSITY CHARACTER IN BUFFER Y & P ADK A7,1 INCREMENT BUFFER POINTER Y
0x18a230…18a3c4 Dummy {f00=0x007d, f01=0x0190, f02=»**************************************** Y x P* Z 0 @ P* SET:M SET MODIFIED BIT IF CHARACTER HAS BEEN MODIFIED Z : P* Z ~ F P****************************************************************** Z P Z PSET:M CWK A2,/20 Z & P RF(L) SET:M2 ATTRIBUT
0x18a3c4…18a558 Dummy {f00=0x007d, f01=0x4096, f02=»TE Z n ( P ORK A5,/A0 MODIFIED NULL CHARACTER [ P RTN A14 [ 6 & PSET:M1 ORR A5,A2 SET MODIFIED BIT [ F PSET:M2 RTN A14 [ p P END [ @ [ **************************************************** Z P Z PSET:M CWK A2,/20 Z & P RF(L) SET:M2 ATTRIBUT
0x18a558…18a6ec Dummy {f00=0x007d, f01=0x2008, f02=» NT DUMMY END @ (
0x18a6ec…18a880 Dummy {f00=0x007d, f01=0x018e, f02=» MOVE DATA FROM USER BUFFER P XIF ] $ & P LD A4,ECBBA,A8 GET BUFFER ADDRESS ] 0 P LD A3,ECBRL,A8 GET LENGTH ] Z PPOL127 EQU * ] | & P ST A4,FECBBA SAVE BUFFER ADDRESS ] ( P SUK A3,2 SKIP FIRST WORD OF BUFFER ] P ST A3,FECBRL SAVE LENGTH ] P
0x18a880…18aa14 (4, 30) Opaque[0x194]
0x18aa14…18aba8 # DirEnt {nam=»PRT «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0fa8, f03=0x0000}
0x18aa14…18aba8 IdxSect {
0x18aa14…18aba8 f00 = 0x007d // 0x18aa14 @0x0
0x18aa14…18aba8 f01 = 0x000a // 0x18aa16 @0x2
0x18aa14…18aba8 gno = [ // 0x18aa18 @0x4
0x18aa14…18aba8 [0x00]: C0x007d.0x1.0
0x18aa14…18aba8 [0x01]: C0x007d.0x2.0
0x18aa14…18aba8 [0x02]: C0x007d.0x3.0
0x18aa14…18aba8 [0x03]: C0x007e.0x0.0
0x18aa14…18aba8 [0x04]: C0x007e.0x1.0
0x18aa14…18aba8 ]
0x18aa14…18aba8 }
0x18aba8…18ad3c Dummy {f00=0x007d, f01=0x0190, f02=» . P IDENT PRT REL 10.0 80-03-14 870150541000 P 6 P =1, ODD BUFFER ADDRESS > P REL 2.1 79-05-23 ` N P************************************************************************* | P* F P* P R T : MODULE PRINTING MAIN FRAME MESSAGE
0x18ad3c…18aed0 Dummy {f00=0x007d, f01=0x0190, f02=» h P* J P********************************************************************** P* ` P EJECT j P x P P* P* P* ENTRY PARAMETERS P* P* P ENTRY SNBUSY P ENTRY PRINT P ENTRY ICREAD
0x18aed0…18b064 Dummy {f00=0x007d, f01=0x0190, f02=»E FM & DUP CHARS | P EXTRN GTRBUF P EXTRN DCGETM . P EXTRN RELBUF D P EXTRN DC1INQ Z P EXTRN DC2INQ p P EXTRN REQTIM P* , P EXTRN I:EVA0 CREDIT EVALUATION ROUTINE P* P EXTRN EMULA START P EJECT P
0x18b064…18b1f8 Dummy {f00=0x007d, f01=0x0190, f02=»************************************* P . 2 POFLIN EQU 0 OFFLINE HANDLING POSSIBLE IF ::= 1 6 , PDCLIN EQU 1 NUMBER OF MAIN FRAMES 81-2) l & PCOPCMD EQU 0 COPY COMMAND IF := 1 P* P* EQUATES P* P* P* * PTIMDC EQ
0x18b1f8…18b38c Dummy {f00=0x007d, f01=0x0190, f02=»E CHARACTER z $ PENDMES EQU /7D END MESSAGE CHAR " PFORMFD EQU /7C FORMFEED CHAR. < PFMCH EQU /60 b PDUPCH EQU /7B v P EJECT P* P* P* EQUATES P* " P* COMMON EQU FOR ECB HANDLING P* P PEC
0x18b38c…18b520 Dummy {f00=0x007d, f01=0x0190, f02=» ~ P* P* P* ECB REL. ADDRESSES P* 8 P* B PDIS EQU 20 L P* ^ PECBDC EQU -DIS-14 h P IFT DCLIN=2 PECBDC2 EQU ECBDC-DIS PECBICR EQU ECBDC2-DIS P XIF P IFF DCLIN=2 PECBICR EQU ECBDC-DIS
0x18b520…18b6b4 (4, 31) Dummy {f00=0x007d, f01=0x0190, f02=»EQU ECBICR-DIS P XIF P* " P* , " P* BASE ADDRESS FOR TCA AND ECB 6 P* PTCABAS EQU A11 f PCREBAS EQU A13 ECB | P* & P* CONFIG DATA 'CB1' REL ADDRESSES P* " PNBRKBV EQU 0 NUMBER OF KB/VDUS & PNBRGTP EQU NBR
0x18b6b4…18b848 Dummy {f00=0x007d, f01=0x0190, f02=»1 d P IFT DCLIN=2 PMF2KBV EQU MF1GTP+16 PMF2GTP EQU MF2KBV+16 : P XIF V P EJECT b P* p P* TCA REL. ADDRESSES z P* PTCT01 EQU 0 PPRINTER EQU TCT01+2 ( PBVDU EQU PRINTER+2 VDU SCREEN BUFFER 0 PPCURS EQU BV
0x18b848…18b9dc Dummy {f00=0x007d, f01=0x0190, f02=»CC CHARACTER z . PKBINH EQU WCC+2 KEYBOARD INHIBIT INDICATOR $ PLINCNT EQU KBINH+2 LINE COUNTER F 0 PDCLENG EQU LINCNT+2 DC READ EFFECTIVE LENGTH n 2 PICWORK EQU DCLENG+2 WORK FIELD INTERTASK COMM , PINTATT EQU ICWORK+2 INTENSITY ATTRIBUTE $ P
0x18b9dc…18bb70 Dummy {f00=0x007d, f01=0x0190, f02=»QU CCC+2 MAIN FRAME & PMODE EQU MAIN+2 INSERT MODE SWITCH $ PKEYS EQU MODE+2 KEY LOCK STATUS F . PECBDCC EQU KEYS+2 ECB ADDRESS LAST READ DC n 2 PECBBLK EQU ECBDCC+2 ECBS FOR MULTIPLE WAIT &C 4 PRDMORE EQU ECBBLK+10 BRANCH ADDRESS NEXT READ KB
0x18bb70…18bd04 Dummy {f00=0x007d, f01=0x0190, f02=»920 CHARACTER DISPLAY " PLPAGE EQU 48 LINES ON ONE PAGE : PGTPLIN EQU 112 LINELENGTH MAX 112 CHAR. 'NL' ORDER IN D , P* BUFFER DETERMINES PRINT LINE LENGTH P* P P P EJECT PPRINT EQU * P CF A14,I:EVA0 & P LDR
0x18bd04…18be98 Dummy {f00=0x007d, f01=0x018e, f02=»********************************* P* * , P* TRANSFER PARAMETER FOR MAIN-FRAME #1 4 P* d 6 P************************************************* n P P LC A1,MF1GTP-1,A4 P ANK A1,/FF P LDKL A8,ECBDC P CF A14,EMULA
0x18be98…18c02c Dummy {f00=0x007d, f01=0x0190, f02=» P* 6 P************************************************* P H P LC A1,MF2GTP-1,A4 P P ANK A1,/FF j P LDKL A8,ECBDC2 ~ $ P CF A14,EMULA TRANSFER PARAMETER P XIF P EJECT P* P* RELATIVE POS IN ECBBLK PICR EQ
0x18c02c…18c1c0 Dummy {f00=0x007d, f01=0x018e, f02=»3 P XIF P ST A1,ECBBLK,TCABAS PPRI100 EQU * 2 P CM ICWORK,TCABAS F P LD A1,ECBBLK+DC1,TCABAS ` P RF(NZ) PRI110 PENDING 0 P CF A14,DC1INQ TEST IF ANY MESSAGE, NO WAIT PPRI110 EQU * P IFT DCLIN=2 P LD A1,ECBBLK+
0x18c1c0…18c354 (4, 32) Dummy {f00=0x007d, f01=0x0190, f02=» P LD A1,ECBBLK+ICR,TCABAS P RF(NZ) PRI150 PENDING $ P LDKL A6,LBVDU REQ LENGTH B P LDKL A3,BVDU BUFFER d P ADR A3,TCABAS ADDRESS * P CF A14,ICREAD READ INTERTASK NO WAIT P ST A8,ECBBLK+ICR,TCABAS PPRI150 EQU * P LDKL
0x18c354…18c4e8 Dummy {f00=0x007d, f01=0x0190, f02=»OM INTERTASK z : P ST A8,ECBDCC,TCABAS SAVE ECB ADDRESS FOR CURRENT READ P CF A14,DCINP INPUT FROM DC R P RB PRI100 v P EJECT P* P* READ INTERTASK, NOWAIT P* P* A3 = BUFFER ADDRESS P* A6 = REQ LENGTH P*
0x18c4e8…18c67c Dummy {f00=0x007d, f01=0x018e, f02=»TH x P ST A3,ECBBA,A8 * P LDK A7,2 READ NOT ADDRESSED, NO WAIT " P LKM P P DATA 1 P RTN A14 l P EJECT | D P**************************************************************** P* P* INPUT FROM DC P* 8 P**********
0x18c67c…18c810 Dummy {f00=0x007d, f01=0x0190, f02=» P RF(Z) DCIN10 NOT COMPLETED P IM ICWORK,TCABAS SET FLAG , , P RF ICRINP TAKE CARE OF INTERTASK INPUT N . P OR BUFFER WILL BE DESTROYED IN 'UPDATE' ~ PDCIN10 EQU * & P CF A14,GTRBUF GET RECEIVE BUFFER P LD A8,ECBDCC,TCABAS
0x18c810…18c9a4 Dummy {f00=0x007d, f01=0x0190, f02=»2,TCABAS P RF(E) DCIN20 MF # 2 P CM ECBBLK+DC1,TCABAS , P RF DCIN30 J PDCIN20 EQU * P CM ECBBLK+DC2,TCABAS p P XIF PDCIN30 EQU * $ P LD A1,ECBEL,A8 EFFECTIVE LENGTH . P ST A1,DCLENG,TCABAS SAVE IT IN SAVE AREA P
0x18c9a4…18cb38 Dummy {f00=0x007d, f01=0x0190, f02=»AND x P XIF . P LD A1,WCC,TCABAS WRITE CONTROL CHARACTER P ST A1,CCC,TCABAS COPY IT J P CF A14,COPY COPY ON PRINTER l PDCIN90 EQU * P CF A14,SNBUSY P RTN A14 P EJECT P* P* ABORT INTERTASK READ P*
0x18cb38…18cccc Dummy {f00=0x007d, f01=0x0190, f02=» P RTN A14 P EJECT P* & P* INPUT FROM INTERTASK 0 P* N PICRINP EQU * X P CM ECBBLK+ICR,TCABAS l P * P LDK A1,X'38' PRINT BIT, 80 CHAR./LINE 4 P ST A1,CCC,TCABAS SAVE AS COPY CONTROL CHARACTER * P CF A14,COPY PRI
0x18cccc…18ce60 Dummy {f00=0x007d, f01=0x0190, f02=» P* . P* PRINT THE CONTENTS OF THE PRINTER BUFFER P* D P* N > PLINLEN DATA /0028,/4050 LINE LENGTHS /40, 64 AND 80 CHARS X P* P* PCOPY LDKL A8,ECBPR P ADR A8,CREBAS PRINTER ECB P LD A7,ECBBA,A8 P SUR A
0x18ce60…18cff4 (4, 33) Dummy {f00=0x007e, f01=0x0190, f02=» P LDKL A4,BVDU P ADR A4,TCABAS " P LD A2,CCC,TCABAS GET CCC/CCC 0 P ANK A2,/08 V ( P RF(NZ) COP100 START PRINTER BIT SET j PCOPRTN RTN A14 PCOP100 EQU * P LD A2,CCC,TCABAS P ANK A2,/30 , P ABL(Z) COP111 NL DETERMIN
0x18cff4…18d188 Dummy {f00=0x007e, f01=0x018e, f02=» , PCOP115 CF A14,PRLINE LINE FULL: PRINT IT P RB COP110 8 PCOP120 CWK A3,LBVDU J $ P ABL(NL) COP300 PRINT LAST LINE f P LCR A2,A4 " P ANK A2,/7F RESET DISPLAY BIT P SCR A2,A4 P CWK A2,/20 P RF(NL) COP130 PCOP123
0x18d188…18d31c Dummy {f00=0x007e, f01=0x0190, f02=» PCOP130 CWK A2,NULL ( P RB(E) COP125 REPLACE NULL BY SPACE PCOP140 EQU * J P CWK A2,/7D ^ P RF(NE) COP141 r P LDK A2,/39 PCOP141 CWK A2,/7E P RF(NE) COP142 P LDK A2,/35 PCOP142 EQU * P CF A14,RFMDUP FM OR
0x18d31c…18d4b0 Dummy {f00=0x007e, f01=0x018e, f02=»DK A3,1 P ADK A4,1 P ADK A7,1 " P ADKL A9,1 4 P RB COP110 F , PCOP150 LDK A2,/20 SPACE INSTEAD OF TEXT X P SCR A2,A7 P ADK A3,1 P ADK A4,1 P ADK A7,1 P ADKL A9,1 P CWR A9,A6 P RF(L) COP160 (
0x18d4b0…18d644 Dummy {f00=0x007e, f01=0x0190, f02=» v ( P RB COP150 STILL IN PROTECTED FIELD P* 4 P* > , P* LINE LENGTH AS DEFINED BY NL CHARACTER H P* x P* 6 P* THE FIRST INSTR. ORIGINALLY HAD LABEL 'COP200'. P* P* PCOP111 EQU * P CWK A9,GTPLIN P
0x18d644…18d7d8 Dummy {f00=0x007e, f01=0x0190, f02=») COP300 PRINT LAST LINE P LCR A2,A4 P ANK A2,/7F 2 P SCR A2,A4 RESET DISPLAY BIT F P CWK A2,/20 j P RF(NL) COP230 ~ ( PCOP223 ANK A2,/6 ATTRIBUTE CHARACTER P XRK A2,6 " P RF(Z) COP250 PROTECTED FIELD 0 PCOP225 LDK A2,/2
0x18d7d8…18d96c Dummy {f00=0x007e, f01=0x0190, f02=»QU * P CWK A2,/7B P RF(NE) COP241 P LDK A2,/2A 6 PCOP241 SCR A2,A7 J P ADK A3,1 b P ADK A4,1 t P ADK A7,1 P CWK A2,NEWLIN & P RB(E) COP210 NL CHAR: PRINT LINE P CWK A2,ENDMES . P RF(E) COP300 UND MESSAGE:
0x18d96c…18db00 Dummy {f00=0x007e, f01=0x0190, f02=»1 P ADK A4,1 P ADK A7,1 P ADKL A9,1 . P CWR A9,A6 @ P RF(L) COP260 R ( P CF A14,PRLINE LINE FULL : PRINT IT h PCOP260 LCR A2,A4 P ANK A2,/7F P CWK A2,/20 " P RB(L) COP223 ATTRIBUTE FOUND ( P RB COP250 STI
0x18db00…18dc94 (4, 34) Dummy {f00=0x007e, f01=0x0190, f02=»N P EJECT P* P* " P* PRINT ONE LINE ON PRINTER , P* P ( P* A9=NUMBER OF CHAR IN PRINT BUFFER Z P* P* 4 PPRLINE IM LINCNT,TCABAS COUNT NBR OF PRINTLINES " P RF(N) PRL100 NOT END OF PAGE P LDK A7,LPAGE EN
0x18dc94…18de28 Dummy {f00=0x007e, f01=0x0190, f02=»CHAR IN BUFFER z P ANK A2,/7F P CWK A2,FORMFD * P RF(NE) PRL200 NOT FORM FEED @ P LDK A2,/20 d $ P SC A2,2,A7 REPLACE LF BY SPACE x P PPRL110 EQU * " P LD A1,LINCNT,TCABAS FORM FEED P LDK A7,2 4 P ST A7,ECBRL,A8 SET
0x18de28…18dfbc Dummy {f00=0x007e, f01=0x0190, f02=» PRL120 P LDK A7,LPAGE P NGR A7,A7 & , P ST A7,LINCNT,TCABAS RESET LINE COUNTER 8 0 PPRL200 ADKL A9,2 ADJUST LENGTH FOR BUFFER CW h P ST A9,ECBRL,A8 REQ LENGTH P LDK A7,/86 STD WRITE P LKM P DATA 1 P LDK A7,0
0x18dfbc…18e150 Dummy {f00=0x007e, f01=0x4128, f02=»TN A14 P EJECT ! P* ! P* ! & P* SET STATUS NOT BUSY FOR DC ! 0 P* ! T P* ! ^ PSNBUSY EQU * ! h P LD A8,ECBDCC,TCABAS ! | P CM ECBCW,A8 ! P LDK A7,/B8 SET STATUS ORDER ! P LKM ! P DATA 1 ! P RTN A14 ! P* ! P*
0x18e150…18e2e4 Dummy {f00=0x007e, f01=0x2008, f02=» " IDENT PRT END "@ 6
0x18e2e4…18e478 Dummy {f00=0x007e, f01=0x0190, f02=»* " PDC1INQ EQU * # P LDKL A8,ECBDC # P ADR A8,CREBAS # 4 P ST A8,ECBBLK+DC1,TCABAS # J PDC1I20 EQU * # j P LDK A1,0 # ~ P CF A14,REQTIM # P LDK A7,0 # PDC1I30 EQU * # P LKM # P DATA 1 # P RTN A14 # PDC2INQ EQU * #
0x18e478…18e60c Dummy {f00=0x007e, f01=0x0190, f02=» COPCMD=1 # P EJECT $ P* $ " P* SEND BUFFER TO PRINTER TASK $ * P* $ P PBUFCOP EQU * $ Z P CM ECBBLK+ICR,TCABAS $ n P LDKL A3,BVDU BUFFER $ P ADR A3,TCABAS ADDRESS $ P IFT COPL=1 $ P* $ P* CHECK IF COPY LOCK $ P* $
0x18e60c…18e7a0 Dummy {f00=0x007e, f01=0x0190, f02=»/8B ORDER: WRITE ADDRESSED WITH WAIT $ P LD A5,ICWORK,TCABAS TASK ID % , P LDKL A6,LBVDU REQ LENGTH % P P CF A14,ICWRTE % r P LD A1,KBINH,TCABAS % ( P ANK A1,/E NOT INHIBITED ANY LONGER % P ST A1,KBINH,TCABAS % P RB VDU100 % P XIF %
0x18e7a0…18e934 (4, 35) Opaque[0x194]
0x18e934…18eac8 # DirEnt {nam=»TB3270«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0fd0, f03=0x0000}
0x18e934…18eac8 IdxSect {
0x18e934…18eac8 f00 = 0x007e // 0x18e934 @0x0
0x18e934…18eac8 f01 = 0x0004 // 0x18e936 @0x2
0x18e934…18eac8 gno = [ // 0x18e938 @0x4
0x18e934…18eac8 [0x00]: C0x007e.0x2.0
0x18e934…18eac8 [0x01]: C0x007e.0x3.0
0x18e934…18eac8 ]
0x18e934…18eac8 }
0x18eac8…18ec5c Dummy {f00=0x007e, f01=0x0190, f02=» 2 P IDENT TB3270 REL 10.0 80-03-14 870150541000 P : F P****************************************************************** B P* : P* CONVERSION TABLES FOR IBM 3270 EMULATION PACKKAGE P* H P******************************************
0x18ec5c…18edf0 Dummy {f00=0x007e, f01=0x0190, f02=»EYCNV P* P P* CONDITIONAL ASSEMBLIES P* B PKB6272 EQU 1 L P* ` P EJECT j P* x P* 4 P* TABLE FOR CONVERSION OF EBCDIC 6 BIT INTERNAL P* P* CODE TO ASCII P* PTASCII EQU * * P DAT
0x18edf0…18ef84 Dummy {f00=0x007e, f01=0x0190, f02=»ATA /5152,/5D24,/2A29,/3B5E /18-/1F * P DATA /2D2F,/5354,/5556,/5758 /20-/27 , * P DATA /595A,/7C2C,/255F,/3E3F /28-/2F Z ( P DATA /3031,/3233,/3435,/3637 /30-37 ( P DATA /3839,/3A23,/4027,/3D22 /38-3F P EJECT P* P* 4 P* TABL
0x18ef84…18f118 Dummy {f00=0x007e, f01=0x0190, f02=»CODES ARE CONVERTED TO ZEROS P* $ P* . PTEBCDIC EQU * 8 P DATA 0,0,0,0 /00-/07 N P DATA 0,0,0,0 /08-/0F l P DATA 0,0,0,0 /10-/17 P DATA 0,0,0,0 /18-1F * P DATA /404F,/7F7B,/5B6C,/507D /20-/27 * P DATA /4D5D,/5C4E,/6B6
0x18f118…18f2ac Dummy {f00=0x007e, f01=0x0190, f02=»4C5,/C6C7 /40-/47 | * P DATA /C8C9,/D1D2,/D3D4,/D5D6 /48-/4F ( P DATA /D7D8,/D9E2,/E3E4,/E5E6 /50-57 H * P DATA /E7E8,/E94A,/005A,/5F6D /58-/5F t * P DATA /0081,/8282,/8485,/8687 /60-/67 * P DATA /8889,/9192,/9394,/9596 /68-/6F * P DATA /979
0x18f2ac…18f440 Dummy {f00=0x007e, f01=0x0190, f02=»& LOWER CASE P - W r P* PKEYCNV EQU * $ P IFF KB6272=1 8 P CWK A2,/70 N P RF(L) KEYC99 b P CWK A2,/77 x P RF(G) KEYC10 P ADK A2,/50 LOWER CASE P - W P RF KEYC99 PKEYC10 EQU * P CWK A2,/80 P RF(L) K
0x18f440…18f5d4 (4, 36) Dummy {f00=0x007e, f01=0x0190, f02=» P* * P DATA /93A6,/A8AA,/A7AC,/83AB /80-/87 * P DATA /A98D,/8E8F,/7F7F,/7F7F /88-/8F @ * P DATA /8BAE,/A594,/9596,/AF82 /90-/97 n * P DATA /8192,/7F7F,/7F7F,/7F7F /98-/9F * P DATA /9190,/B5B3,/7F7F,/7F7F /A0-/A7 * P DATA /7F7F,/7F7
0x18f5d4…18f768 Dummy {f00=0x007e, f01=0x400e, f02=»ND @ * P DATA /93A6,/A8AA,/A7AC,/83AB /80-/87 * P DATA /A98D,/8E8F,/7F7F,/7F7F /88-/8F @ * P DATA /8BAE,/A594,/9596,/AF82 /90-/97 n * P DATA /8192,/7F7F,/7F7F,/7F7F /98-/9F * P DATA /9190,/B5B3,/7F7F,/7F7F /A0-/A7 * P DATA /7F7F,/7F7
0x18f768…18f8fc Dummy {f00=0x007e, f01=0x2008, f02=» A @ aP x (@ :P T P> H D ! P P T P P T #P 'P +W AT M SQ T H D !A( aT y }P Q P PP WF T W P P P P H D ! $ 1 d I d _ d sP w
0x18f8fc…18fa90 Dummy {f00=0x007e, f01=0x0190, f02=»***************************************************** 0 P* 1 > P* CRNL 1 H P* 1 V 2 P* CURSOR IN FIRST UNPROTECTED POS ON NEW LINE 1 ` P* 1 : P***************************************************** 1 P* 1 PCRNL EQU * 1 & P LD A2,PCURS,T
0x18fa90…18fc24 Dummy {f00=0x007e, f01=0x0190, f02=» 1 P* COMPUTE LEFTMOST POS 2 P* 2 & PCRN050 LDK A1,0 2 0 PCRN100 SUKL A2,LLINE 2 H P RF(N) CRN120 2 d P ADKL A1,LLINE 2 z P RB CRN100 2 2 PCRN120 ST A1,PCURS,TCABAS STORE CURSOR ADDRESS 2 P EJECT 2 P 2 F P**************************
0x18fc24…18fdb8 Dummy {f00=0x007e, f01=0x0190, f02=»F(Z) CRN130 NO ATTRIBUTE FOUND 2 P ANK A3,/10 3 & P RF(NZ) TAB PROTECTED FIELD 3 : . P CW A2,PCURS,TCABAS CURSOR ON ATTRIBUTE ?? 3 ^ P RF(NE) CRN150 NO!! 3 ( P CWK A2,1919 LAST SCREEN POSITION?? 3 P RF(NE) CRN140 NO!! 3 PCRN130 LDKL A2,-1 3
0x18fdb8…18ff4c Dummy {f00=0x007e, f01=0x0190, f02=»************************************************* 3 ~ P EJECT 4 : P* 4 H 8 P**************************************************** 4 R P* 4 P* TAB 4 P* 4 2 P* MOVE THE CURSOR TO THE FIRST CHAR. LOCATION 4 ( P* OF THE NEXT UNPROTECTED DATA FIE
0x18ff4c…1900e0 Dummy {f00=0x007e, f01=0x0190, f02=» 4 b P* 2=EOB 5 P* 3=ATTRIB. IN EOB POS 5 P* A2=CURSOR BINARY ADDRESS 5 : P* A3=CHARACTGR 5 P* 5 r PTAB EQU * 5 | P LDK A5,1 5 & P LD A2,PCURS,TCABAS GET CURSOR POS 5 * PTAB100 CF A14,ATMASF SEARCH ATTRIBUTE 5 P CWK A1,0 END OF
0x1900e0…190274 (4, 37) Opaque[0x194]
0x190274…190408 # DirEnt {nam=»CTAB01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0fe0, f03=0x0000}
0x190274…190408 IdxSect {
0x190274…190408 f00 = 0x007f // 0x190274 @0x0
0x190274…190408 f01 = 0x0002 // 0x190276 @0x2
0x190274…190408 gno = [ // 0x190278 @0x4
0x190274…190408 [0x00]: C0x007f.0x0.0
0x190274…190408 ]
0x190274…190408 }
0x190408…19059c Dummy {f00=0x007f, f01=0x0190, f02=» 2 P IDENT CTAB01 REL 10.0 80-03-14 870150541000 P* : 4 P* CODE CONVERSION TABLE FOR IBM 3270 EMULATION D P* | P ENTRY CTAB01 P 0 PCTAB01 DATA FUNC,FUNC,UNSC,SHIFT,UNSC,SHIFT PFUNC EQU * : P DATA /9693,/9495,/9091,/928D,
0x19059c…190730 Dummy {f00=0x007f, f01=0x0190, f02=»/7F7F,/7F7F f PUNSC EQU * : P DATA /207F,/7F7F,/7F7F,/7F27,/7F7F,/7F2B,/2C2D,/2E7F & : P DATA /3031,/3233,/3435,/3637,/3839,/ADA9,/3CA7,/A8A6 d : P DATA /4041,/4243,/4445,/4647,/4849,/4A4B,/4C4D,/4E4F : P DATA /5051,/5253,/5455,/5657,/5859,/5A5
0x190730…1908c4 Dummy {f00=0x007f, f01=0x40aa, f02=»829,/ADA9,/3EA7,/A8A6 p : P DATA /4041,/4243,/4445,/4647,/4849,/4A4B,/4C4D,/4E4F : P DATA /5051,/5253,/5455,/5657,/5859,/5A5B,/5C5D,/5E7F P END @ 041,/4243,/4445,/4647,/4849,/4A4B,/4C4D,/4E4F : P DATA /5051,/5253,/5455,/5657,/5859,/5A5
0x1908c4…190a58 Dummy {f00=0x007f, f01=0x2008, f02=» A @ aP x (@ :P T P> H D ! P P T P P T #P 'P +W AT M SQ T H D !A( aT y }P Q P PP WF T W P P P P H D ! $ 1 d I d _ d sP w
0x190a58…190bec Dummy {f00=0x007f, f01=0x0190, f02=» ; z & P ADR A4,TCABAS VDU BUFFER ADDRESS < , P LC A2,1919,A4 GET LAST SCREEN CHARACTER < 2 P ANK A2,/7F < b P CWK A2,/20 < v P RF(NL) RDH10 < P ANK A2,/10 < $ P ABL(Z) CRHOME UNPROTECTED FIELD < PRDH10 CM PCURS,TCABAS < , P CF A14,TAB SE
0x190bec…190d80 Dummy {f00=0x007f, f01=0x018e, f02=»* < P* BAKTAB = P* = 6 P* MOVE THE CURSOR TO THE FIRST CHARACTER LOCATION = $ 2 P* OF THE NEXT PRECIDING UNPROTECTED DATA FIELD = ^ P* = 8 P**************************************************** = P* = P* A2=CURSOR BINARY ADDRESS = P*
0x190d80…190f14 (4, 38) Opaque[0x194]
0x190f14…1910a8 # DirEnt {nam=»NOIFLI«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x0fe8, f03=0x0000}
0x190f14…1910a8 IdxSect {
0x190f14…1910a8 f00 = 0x007f // 0x190f14 @0x0
0x190f14…1910a8 f01 = 0x0002 // 0x190f16 @0x2
0x190f14…1910a8 gno = [ // 0x190f18 @0x4
0x190f14…1910a8 [0x00]: C0x007f.0x1.0
0x190f14…1910a8 ]
0x190f14…1910a8 }
0x1910a8…19123c Dummy {f00=0x007f, f01=0x00a6, f02=» $NOIF S=START PSCR /O $NOIF S=VDUPRT ( PSCR /O > $NOIF S=PRT L P$NOIF S=TB3270 ` PTRA DATDIV v SCR /O ASG /E0,TY10
0x19123c…1913d0 Dummy {f00=0x007f, f01=0x2008, f02=» F S=START PSCR /O $NOIF S=VDUPRT ( PSCR /O > $NOIF S=PRT L P$NOIF S=TB3270 ` PTRA DATDIV v SCR /O ASG /E0,TY10
0x1913d0…191564 Dummy {f00=0x007f, f01=0x0190, f02=» A , v_ I " P A A n 4 A _$" P H B P W ! _ ! ! 1 4 A @ ` @ P 0 M A 4 , @ ` @ P $ Y _ @ rT @ A j A j a r 4 ! X A r > A 4 A
0x191564…1916f8 Dummy {f00=0x007f, f01=0x0190, f02=» ! A @! :H 4 x ! ) P R W ! P " ! " :A *@ H T 0 ! W R ! A @ @ U Z` Q P Q T 0 ! A 0 ! A ! " ! " ! A _" A A ! ! % ! R ! ! @ ! 8 !
0x1916f8…19188c Dummy {f00=0x007f, f01=0x0190, f02=» A , v_ I " P A A n 4 A _$" P H B P W ! _ ! ! 1 4 A @ ` @ P 0 M A 4 , @ ` @ P $ Y _ @ rT @ A j A j a r 4 ! X A r > A 4 A
0x19188c…191a20 Dummy {f00=0x007f, f01=0x0190, f02=» ! A @! :H 4 x ! ) P R W ! P " ! " :A *@ H T 0 ! W R ! A @ @ U Z` Q P Q T 0 ! A 0 ! A ! " ! " ! A _" A A ! ! % ! R ! ! @ ! 8 !
0x191a20…191bb4 (4, 39) Opaque[0x194]
0x191bb4…191d48 # DirEnt {nam=»DATDIV«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0ff0, f03=0x0000}
0x191bb4…191d48 IdxSect {
0x191bb4…191d48 f00 = 0x007f // 0x191bb4 @0x0
0x191bb4…191d48 f01 = 0x0006 // 0x191bb6 @0x2
0x191bb4…191d48 gno = [ // 0x191bb8 @0x4
0x191bb4…191d48 [0x00]: C0x007f.0x2.0
0x191bb4…191d48 [0x01]: C0x007f.0x3.0
0x191bb4…191d48 [0x02]: C0x0080.0x0.0
0x191bb4…191d48 ]
0x191bb4…191d48 }
0x191d48…191edc Dummy {f00=0x007f, f01=0x0190, f02=» 2 P IDENT DATDIV REL 10.0 80-03-14 870150541000 P : L P************************************************************************ B P* F P* D A T D I V : DATA DIVISION FOR IBM-3270 EMULATION PACKAGE. B P* THIS MODULE AL
0x191edc…192070 Dummy {f00=0x007f, f01=0x0190, f02=»************************ d P P EJECT ( P DDIV 6 P* D P* KB/VDU TERMINAL N P* n P TERM KA x P* P CWB CB1 P TWB TB1 P* P START KBVGO P* PDSDC DSET FC=61 " P*DSDC2 DSET FC=62 IFT
0x192070…192204 Dummy {f00=0x007f, f01=0x0190, f02=»KBAN DSET FC=20,DEV=KA,BUFL=2 $ PDSKBSD DSET FC=40,DEV=KI,BUFL=2 & P EJECT N P* P* GTP TERMINAL f P* P TERM GA P* P CWB CB1 P TWB TB1 P* P START GTPGO P* PDSDC DSET FC=61 " P*D
0x192204…192398 Dummy {f00=0x007f, f01=0x0190, f02=»P,BUFL=162 z P EJECT P* P* * P* DCTASK FOR DC LINE 1 4 P* V P* ` P TERM D0 j P* z P CWB CB1 P START DC1GO PDSDC DSET FC=60 P* P* DCTASK FOR DC-LINE 2 P* P* TERM D1 P*
0x192398…19252c Dummy {f00=0x007f, f01=0x0190, f02=»Y TASKS h P* P* PTB1 BLK $ P* 4 & PTCT01 BIN 4X'0' TID AND STACKBASE > * PPRINTER STRG 4X'0' KEYBARD/VDU/PRINTER h & PBVDU STRG 3840X'0' VDU SCREEN BUFF ( PPCURS STRG 4X'0' CURSOR ADDR. BINARY . PATTRIB STRG 4X'0' LAST ATTRI
0x19252c…1926c0 Dummy {f00=0x007f, f01=0x0190, f02=»T INDIC. p PLINCNT STRG 4X'0' . PDCLENG STRG 4X'0' DC READ EFFECTIVE LENGTH * PICWORK STRG 4X'0' * PINTATT STRG 4X'0' INTENSITY ATTRIBUTE v " POFFFLG STRG 4X'0' OFFLINE FLAG PCOPNO BIN TID FOR HARDCOPY PMISCAR STRG 44X'0' CCC,MAI
0x1926c0…192854 (4, 40) Dummy {f00=0x007f, f01=0x0190, f02=»OCK FOR ALL TASKS ~ P* . P***************************************** $ P V PCB1 BLK ^ P* n PCNFIGD BOOL x PCNFBSY BOOL P* P* CONFIGURATION DATA P* " PNBRKBV BIN NUMBER OF KB/VDUS PNBRGTP BIN NUMB
0x192854…1929e8 Dummy {f00=0x007f, f01=0x0190, f02=» GTP b P* MF # 2 ( P*MF2KBV STRG 32X'40C1C2C3C4C5C6C7' ( P*MF2GTP STRG 32X'C8C94A4B4C4D4E4F' H H P* THE LENGTH OR PLACE OF THE CONFIG DATA ABOVE SHOULD NOT BE CHANGED t P* ( PMF1CU STRG X'6040' CU-ADDRESS MF # 1 P*MF2CU STRG X'6040
0x1929e8…192b7c Dummy {f00=0x007f, f01=0x018e, f02=»IN P PDIV P* P* " P* , P ENTRY KBVGO 6 P ENTRY GTPGO J P ENTRY DC1GO ^ P* ENTRY DC2GO r P EXT VDUKB P EXT PRINT P EXT DCTASK P EXT SWITCH " P EXT GETTID GET TASK IDENTITY 2 P* EXT OFFLNE C
0x192b7c…192d10 Dummy {f00=0x007f, f01=0x0190, f02=» , P**************************************** P* 8 ( P* START ADDRESS FOR KEYBOARD TASK B P* n , P**************************************** x P PKBVGO P ADD NBRKBV,='1' P CALL GETTID,TCT01 P SUB TCT01,=X'4B40'
0x192d10…192ea4 Dummy {f00=0x007f, f01=0x0190, f02=» PKB050 P CALL VDUKB,TCT01 ( P* PERF OFFLNE BRANCH TO CREDIT CODE , * P* B KB050 RETURN TO IBM-3270 EMULATION X P EJECT P P 2 P********************************************* P* . P* START ADDRESS FOR GENERAL PRINTE
0x192ea4…193038 Dummy {f00=0x007f, f01=0x0190, f02=»,TCT01 P SUB TCT01,=X'4740' P MOVE PRINTER,=X'0001' * P* PERF CONF H P CALL PRINT,TCT01 P v P EJECT ~ P P 4 P*********************************************** P* " P* START ADDRESS FOR DC-TASK P*
0x193038…1931cc Dummy {f00=0x007f, f01=0x4024, f02=»2CU P P END @ P MOVE PRINTER,=X'0001' * P* PERF CONF H P CALL PRINT,TCT01 P v P EJECT ~ P P 4 P*********************************************** P* " P* START ADDRESS FOR DC-TASK P*
0x1931cc…193360 Dummy {f00=0x007f, f01=0x2008, f02=» * END @ * $ * . GP1 BLK 8 * H GPAREA STRG 2000 R EJECT j PDIV x * * ENTRY KBGO ENTRY VDUGO ENTRY GTPGO * EXT VDUKB EXT VDTASK E
0x193360…1934f4 (4, 41) Dummy {f00=0x0080, f01=0x0190, f02=»************************************************* U P* V : P* CANCEL V D P* V T : P* PROGRAM ATTENTION KEY WHICH CAUSES AN I/O OPERATION V ^ $ P* AND GENERATE AN AID CHARACTER V P* V > P*********************************************************
0x1934f4…193688 Dummy {f00=0x0080, f01=0x0190, f02=»E V r PCAN200 EQU * W . P CF A14,LINHON TURN ON "KEYBOARD INHIBIT" W ( P CF A14,TRPA UPDATE AID AND TRANSMIT W P P RTN A14 W | P* W P W P IFT PAX=1 W P W P* W P* W F P* PROGRAM ATTENTION KEY IS PRESSED AND NUMBER WILL BE INSERT
0x193688…19381c Dummy {f00=0x0080, f01=0x0190, f02=» ST A1,RDMORE,TCABAS W P RTN A14 X PPAEXA EQU * X , P CM RDMORE,TCABAS X @ P SUK A2,/31 CHECK IF NUM.1-3 X Z P RF(L) PFERR ILLEGAL CHAR. X ~ P SUK A2,/2 CHECK IF NUM.1-3 X P RF(G) PFERR ILLEGAL CHAR. X P RF(Z) PA3 X P ADK A2,1 X
0x19381c…1939b0 Dummy {f00=0x0080, f01=0x0190, f02=»A1 PROGRAM ATTENTION KEY X P* Y $ P* Y . PPA1 EQU * Y 8 P LDK A2,/2C PA1 POS Y J P RB CAN100 Y f P* Y x P* Y $ P* PA3 PROGRAM ATTENTION KEY Y P* Y P* Y PPA3 EQU * Y P LDK A2,/2B PA3 POS Y P RB CAN100 Y P
0x1939b0…193b44 Dummy {f00=0x0080, f01=0x0190, f02=»****************************************************** Y P* Z > P* ENTER Z H P* Z X 8 P* PROGRAM FUNCTION KEY WHICH CAUSES AN I/O OPERATION Z b < P* AND GENERATE AN AID CHARACTER FOLLOWED BY AN SBA ORDER Z 8 P* ATTRIBUTE ADDRESS AND TEXT FOR EACH MODI
0x193b44…193cd8 Dummy {f00=0x0080, f01=0x0190, f02=»TER EQU * Z P LDK A2,/3D ENTER POS [ PENT100 EQU * [ 0 & P LC A2,TASCII,A2 CONVERT TO ASCII [ D . P CF A14,LINHON TURN ON "KEYBOARD INHIBIT" [ n . P CF A14,TRPF AID+MODIFIED FIELDS+TRANSMIT [ PENT200 EQU * [ P RTN A14 [ P* [ P [ P
0x193cd8…193e6c Dummy {f00=0x0080, f01=0x0190, f02=»THE FUNCTIONS UNDER PF1-PF12 [ P* $ P* . PPFEX EQU * 8 P LDKL A1,PFEXA J P RF PFNXT ` PPFEXA EQU * r P CM RDMORE,TCABAS P SUK A2,/30 LEGAL CHAR ? , P RF(L) PFERR ILLEGAL,GO TO ERR.HANDLING & P RF(Z) PF0 FIRST NUM. 0
0x193e6c…194000 Dummy {f00=0x0080, f01=0x0190, f02=» P CM RDMORE,TCABAS ] P SUK A2,/30 LEGAL NUM.? ] " , P RF(L) PFERR ILLEGAL GO TO ERR.HANDLING ] B P SUK A2,/2 LEGAL NUM ? ] r , P RF(G) PFERR ILLEGAL GO TO ERR.HANDLING ] P ADK A2,/3C PF10-12 POS ] P RB ENT100 ] P ] PPF0 EQU * ]
0x194000…194194 (4, 42) Opaque[0x194]
0x194194…194328 # DirEnt {nam=»/OBJCT«, typ=»OB«, f00=0x0000, f01=0x0000, f02=0x1008, f03=0x0000}
0x194194…194328 IdxSect {
0x194194…194328 f00 = 0x0080 // 0x194194 @0x0
0x194194…194328 f01 = 0x0018 // 0x194196 @0x2
0x194194…194328 gno = [ // 0x194198 @0x4
0x194194…194328 [0x00]: C0x0080.0x1.0
0x194194…194328 [0x01]: C0x0080.0x2.0
0x194194…194328 [0x02]: C0x0080.0x3.0
0x194194…194328 [0x03]: C0x0081.0x0.0
0x194194…194328 [0x04]: C0x0081.0x1.0
0x194194…194328 [0x05]: C0x0081.0x2.0
0x194194…194328 [0x06]: C0x0081.0x3.0
0x194194…194328 [0x07]: C0x0082.0x0.0
0x194194…194328 [0x08]: C0x0082.0x1.0
0x194194…194328 [0x09]: C0x0082.0x2.0
0x194194…194328 [0x0a]: C0x0082.0x3.0
0x194194…194328 [0x0b]: C0x0083.0x0.0
0x194194…194328 ]
0x194194…194328 }
0x194328…1944bc Dummy {f00=0x0080, f01=0x0190, f02=» > @ IDENT START REL 10.0 80-03-14 870150541000 J F " LINHON LINHOF ATMASB LSAVOF LSAVON EMULA LIOLON LIOLOF VDUKB F . * DCTASK DC1INQ DC2INQ REQTIM ICWRTE , ( , ( !
0x1944bc…194650 Dummy {f00=0x0080, f01=0x0190, f02=» , ( & , ( V , ( , ( , ( !
0x194650…1947e4 Dummy {f00=0x0080, f01=0x0190, f02=» _ ( ( RLRBUF 0 EMULA B VDUKB T , ( { B _ C ( : f ERASE , ( . V P ! , ( O O O N T N
0x1947e4…194978 Dummy {f00=0x0080, f01=0x0190, f02=»Q $ , ( ( : O B P B , ( 1 P 1( _t N ! b N ! P < , ( Q " Z Y l , ( P q N P O REQTIM , ( ( : C ( : : N V
0x194978…194b0c Dummy {f00=0x0080, f01=0x0190, f02=» : N P R , ( PR P_ O P # T N " , ( / T T O : N R , ( M Q # P _ O : , ( k T % X _ % Q _ _6 N , ( { V - F : N ` V
0x194b0c…194ca0 Dummy {f00=0x0080, f01=0x0190, f02=»W # O r , ( : Y2# 6 , ( ) O O _@ P w N N P N B , ( I $ T $ P 0 w 0 w r , ( i : , w N N P N , ( $ P v N T 9 , (
0x194ca0…194e34 (4, 43) Dummy {f00=0x0080, f01=0x0190, f02=» T r , ( @ O Q F B ! PT , ( ' : N P Z P Q B , ( E N P D + % _ r , ( e ) N + N P %W O , ( : T W P , (
0x194e34…194fc8 Dummy {f00=0x0080, f01=0x0190, f02=» , ( _ : . H : ,_ TRPF 4 , ( +_ _ = H : D , ( $ : _ - H : t , ( 5 N # P N N ERASUA , ( U $ Q N
0x194fc8…19515c Dummy {f00=0x0080, f01=0x0190, f02=» O : N - O , ( B + I I C ( : ( LIOLON X LIOLOF l LINHON LINHOF , ( W W W W W W W W LSAVON LSAVOF , (
0x19515c…1952f0 Dummy {f00=0x0080, f01=0x0190, f02=»]$ O t , ( m O : N O : , ( Q T O O : D , ( R : _* 0 : O t , ( O : N ICWRTE , ( C C
0x1952f0…195484 Dummy {f00=0x0080, f01=0x0190, f02=» + x - x / x 1 x 3 x 5 8 7 8 9 8 ; 8 = 8 ? 8 x H D ! A 8 C 8 E 8 G 8 I 8 K 8 M 8 O 8 Q 8 S 8 U 8 W 8 Y 8 [ 8 ] 8 _ 8 4 H D ! a 8 c 8 e 8 g 8 i 8 k 8 m 8 o 8 q 8 s 8 u 8 w 8 y 8 { 8 } 8 8 H D ! 8 8 8 8 8 8 8 8 8 8 8 8 8
0x195484…195618 Dummy {f00=0x0080, f01=0x0190, f02=» d H D ! H D ! F 4 l H D ! ! # * % ' ) + - / 1 3 5 b 7 X 9 r ; = ? H D !
0x195618…1957ac Dummy {f00=0x0080, f01=0x0190, f02=» R P H D ! = ! 2 %P )T /T 5T O UQ [P oT {Q x x V H D ! U P( P 2 P R W CP MT SP> W a x k x o x P X H D !@$ P T P P T P P W T Q #T ; t ?P CQ H D ! WP wPP WF T
0x1957ac…195940 Dummy {f00=0x0080, f01=0x406e, f02=» W W W W W W W !W 7 =Q MP [ Q T R D X@ jP R W CP MT SP> W a x k x o x P X H D !@$ P T P P T P P W T Q #T ; t ?P CQ H D ! WP wPP WF T
0x195940…195ad4 (4, 44) Dummy {f00=0x0080, f01=0x0190, f02=» > @ IDENT VDUPRT REL 10.0 80-03-14 870150541000 D @ TRPF TRPA ERASE SETCUR ERASUP DISPL ERASUA WCHAR UPDATE F , ( RFMDUP DCINP RLRBUF DCGETM GTRBUF DCINP , ( O B O N - O LINHO
0x195ad4…195c68 Dummy {f00=0x0080, f01=0x0190, f02=» N " P x SNBUSY DCGETM v * , ( Y N " O W B : > REQTIM n , ( w C 4 C C ( : GTRBUF
0x195c68…195dfc Dummy {f00=0x0080, f01=0x0190, f02=» V = : : <" T TEBCDI $ , ( 9 _ 2 H !?9F 2 H "? 6 , ( U : , N / f , ( s O ( B P N ' O LSAVOF , ( H 1 ( :
0x195dfc…195f90 Dummy {f00=0x0080, f01=0x0190, f02=» !`P X x , ( _ " T V 0 !` V _ UPDATE 6 H , ( $ ' _J : O B , ( G 2 T 2 1P 5P ?P W , ( g N W W W , ( V
0x195f90…196124 Dummy {f00=0x0080, f01=0x0190, f02=» T |_X T }_b | , ( T ~_l T 0_v X T , ( ' _ B : 2 H ! L , ( E :a" _ < ^, _ O | , ( e _ T ^ 0 " R , ( 1 _ " X 0 "
0x196124…1962b8 Dummy {f00=0x0080, f01=0x0190, f02=» N l , ( T B + I I I , ( # C ( N " T : < ERASE l , ( C ^ 0"`T 0" 1 _ ~ , ( c V 1 _ O O O , ( N T ; 1 B E
0x1962b8…19644c Dummy {f00=0x0080, f01=0x0190, f02=»" O P W P ERASUA " , ( W R T P 6 , ( # " V " T P " Q W R f , ( C X 0" R 2 P 1 , ( c _( " T P " Q _< R TRPA , (
0x19644c…1965e0 Dummy {f00=0x0080, f01=0x0190, f02=» C P " , ( Q " 2 O P PR , , ( V 0 " 1 R , ( # X4 }T 9 ~T 5 |T < ] , ( C _R" 2 O P " P W ] , ( c _r PR V 0
0x1965e0…196774 (4, 45) Dummy {f00=0x0081, f01=0x0190, f02=» WCHAR RFMDUP , ( : B E _D {T * ` & , ( T ; : B P = ] V , ( Y B : % P 7 P , ( # R C ( B ! QP B + E , ( C E :h E T C (
0x196774…196908 Dummy {f00=0x0081, f01=0x0190, f02=» v - 6 1 AP SP cW o P P !V 7T P W P H D ! * VD P T V" #V MT WP ]P cP eW i yW } W W D H D ! V R P T Pd Pr P P P P T T T T %T H D ! mT" R P R P4 T. 9T OT kV
0x196908…196a9c Dummy {f00=0x0081, f01=0x4082, f02=» 3T ;T MP QP UW iR m sV y R t 8 4 T T PD P 9P$ uP yP }W R P T 0 l@ ~ W D H D ! V R P T Pd Pr P P P P T T T T %T H D ! mT" R P R P4 T. 9T OT kV
0x196a9c…196c30 Dummy {f00=0x0081, f01=0x018e, f02=» > @ IDENT PRT REL 10.0 80-03-14 870150541000 SNBUSY PRINT ICREAD F PRINT f I:EVA0 x EMULA , ( @ . V P ! DC1INQ , ( O O N T N T
0x196c30…196dc4 Dummy {f00=0x0081, f01=0x0190, f02=» GTRBUF DCGETM , ( y ( : P O W ( UPDATE X , ( @ O B O N O j , ( : O ( : O 8 , ( O N T_ (@P B , ( ] ]
0x196dc4…196f58 Dummy {f00=0x0081, f01=0x0190, f02=»DUP , ( S T 9 ~T 5 aR = , ( q _X = R 0 < , ( " ZZ_" pR V 0 l , ( " 1 V " 2 P W X {T , ( * = ~X@ }P , ( =
0x196f58…1970ec Dummy {f00=0x0081, f01=0x413c, f02=» Q Z 0 O ( B SNBUSY ~ , * & q : C ( : @ H D !, )T 3T A ` UPv ] ~ P W@ ~ T #R ' 1 n H D ! @ =V CP4 GW ST [T gR R R Vb V P. W T P*
0x1970ec…197280 Dummy {f00=0x0081, f01=0x0190, f02=» > @ IDENT TB3270 REL 10.0 80-03-14 870150541000 TASCII TEBCDI KEYCNV F TASCII h , ( ABCDEFGHI[.<(+!&JKLMNOPQR]$*);^ | TEBCDI @ , ( ! -/STUVWXYZ|,%_>?0123456789:#@'=" , ( A
0x197280…197414 (4, 46) Dummy {f00=0x0081, f01=0x405c, f02=» , ( j : 4 F@ XCNV F TASCII h , ( ABCDEFGHI[.<(+!&JKLMNOPQR]$*);^ | TEBCDI @ , ( ! -/STUVWXYZ|,%_>?0123456789:#@'=" , ( A
0x197414…1975a8 Dummy {f00=0x0081, f01=0x0190, f02=» > @ IDENT CTAB01 REL 10.0 80-03-14 870150541000 CTAB01 F CTAB01 X , ( 0123 l , ( ! 456789 , ( A ' +,-. 0123456789 < @ABC , ( a DEFG
0x1975a8…19773c Dummy {f00=0x0081, f01=0x4032, f02=» < | < | @ .870150541000 CTAB01 F CTAB01 X , ( 0123 l , ( ! 456789 , ( A ' +,-. 0123456789 < @ABC , ( a DEFG
0x19773c…1978d0 Dummy {f00=0x0081, f01=0x40d4, f02=» > @ IDENT DW2501 REL 10.0 80-03-14 870150541000 DW2501 F DW2501 X DC25AD l , ( DC 2 ~ @ ECB P DATA 0,0,0,0,0,0 P XIF P*
0x1978d0…197a64 Dummy {f00=0x0081, f01=0x0190, f02=» > @ IDENT DRDC25 REL 10.0 80-03-14 870150541000 . * DC25AD IH2501 IH2502 DC25ON DW2500 F DC25AD x * & DISIOE , ( C P P 1P P W P 5P TDISP
0x197a64…197bf8 Dummy {f00=0x0081, f01=0x0190, f02=» DWTECB , ( % A A _F _P ECBEL @ DC:MIN P , ( @ X P 0 Y P C b DISEND , ( @ _r _x B Y _D SETIME , ( @ X P A
0x197bf8…197d8c Dummy {f00=0x0081, f01=0x0190, f02=» W (P v , ( k 0 ) > (P _ ) 1_ , ( @ (X( P _ 0 )_6 ( F DWTST v DWTOR , ( BP _ ) 1 4 X R X , ( T X P , Y L C , ( L C
0x197d8c…197f20 Dummy {f00=0x0081, f01=0x0190, f02=» A > A A A A A , ( [ W & { > V l PFPOST , ( < @ T ! @ , ( T B ! T P P , (
0x197f20…1980b4 (4, 47) Dummy {f00=0x0081, f01=0x0190, f02=» 5 _ ! T " X ! , ( U _ ! @ P @ P ! A A , , ( u _ ! @ P @ X< ! T A , ( ! ! ! X _4 A @ @ , ( @ T P A ` @ P X , ( R X T
0x1980b4…198248 Dummy {f00=0x0081, f01=0x0190, f02=» T @ X W @ @ | , ( P@ G @ A ! @ X4 ! T , ( @ g @ P ! ! _N 1T @ X @ L , ( @ P ! ! _l A 8 A | , ( D @ T _( _, @ T W @ , ( ( T ! _ ! ! _ A A E A
0x198248…1983dc Dummy {f00=0x0081, f01=0x0190, f02=» % A B B A A A , ( $ A A A ! ! A _R @ j , , ( a ! X Z X X X`_j @ , ( } P X R X P T T , ( @ Y W L P C , ( T A A 4 @
0x1983dc…198570 Dummy {f00=0x0081, f01=0x0190, f02=» P 1 A @ | , ( 3 ]6W P _@ @ @ E ! P , ( S ! 4 _$ ! 2_l 1 A L , ( s T 0W ;W A A W W W | , ( $D A A ! @ ! @ ! , ( ! ! B J ! 4 ! !
0x198570…198704 Dummy {f00=0x0081, f01=0x0190, f02=» l , ( 3 Z& ! ! A _ @ IH2501 l < INTSAV P * & Q T B J B ! ! 4 A b SAVE8 , ( o bJ T ! A T IH2502 , ( P 4 ! A
0x198704…198898 Dummy {f00=0x0081, f01=0x0190, f02=» H " t , ( * 9AY X 2 _ ! 9AP ^ 2 _ " , ( ! ! 1 4 A ( @ ` @ P D DC25ON R t , ( A 0 M A ( 4 @ A , ( J _ @ T < @ A , ( P A a
0x198898…198a2c Dummy {f00=0x0081, f01=0x0190, f02=» A ! T ' x DW2500 , ( A A 4 , 0 t , ( (o A W A W P A A , ( ( @ - R A @ @ ( 4 , ( +
0x198a2c…198bc0 Dummy {f00=0x0081, f01=0x0190, f02=» GPp KPb OP SP UW [P _P g u wP. t H D ! {+ +T + + + P P + + t P P 0 H D !~B Wb ! ( ' 0 9 = E I QP _W c iP }P P P R2 | H D ! T* P& P )P -T 5 9T = A K d O h S l W p [ t _ x
0x198bc0…198d54 (4, 48) Dummy {f00=0x0081, f01=0x0190, f02=» 3 * 9 X ? * CT G ` H D ! K U [ aP gP m z { P T T PP H D ! 3 P2 R, T$ W W l T #P ' / 5T =WP Q B U h H D ! _ eT kP o s {T" P z B T T8 W T z H D !
0x198d54…198ee8 Dummy {f00=0x0081, f01=0x018e, f02=» L H D ! PL P #P. 7W =P C O QP Y g uT yW }W W W W H D ! ~ L (n L T" R T H D ! +U 9 ? QT ] e {T ( T Ph (n P P H D !.q P W (x P 1+ 5+
0x198ee8…19907c Dummy {f00=0x0081, f01=0x400c, f02=» @
0x19907c…199210 Dummy {f00=0x0081, f01=0x2008, f02=» 3 L = REL 10.1:2 DATE = 79 -1 0- 1215PACK NBR = 0001 f ?
0x199210…1993a4 Dummy {f00=0x0081, f01=0x0190, f02=» Q O O : P _ ]$ O O : N O : Q T O O : R : _* 0 : O f O v n : N C C C ( : +h O B O N - O j z ,
0x1993a4…199538 Dummy {f00=0x0081, f01=0x0190, f02=» O N _ P $# P _ : . H : ,_ +_ _ = H : : _ - H : N # P N N Q N N P () ) : P _@ Z: _H N P R O : N - O
0x199538…1996cc Dummy {f00=0x0081, f01=0x0000, f02=»
0x1996cc…199860 Dummy {f00=0x0081, f01=0x0014, f02=» ( 0 8 @ H P
0x199860…1999f4 (4, 49) Dummy {f00=0x0082, f01=0x018e, f02=» J F IDENT START REL 2.1 79-10-29 870150540210 J F " LINHONK LINHOF ATMASB LSAVOF LSAVON EMULA LIOLON LIOLOFC VDUKB R . * DCTASK DC1INQN DC2INQ REQTIM ICWRTE@ , ( , ( !
0x1999f4…199b88 Dummy {f00=0x0082, f01=0x0190, f02=» , ( , ( 4 , ( d , ( , ( , ( !
0x199b88…199d1c Dummy {f00=0x0082, f01=0x018e, f02=»CGETM , ( _ ( ( RLRBUF > EMULA P VDUKB b , ( { B _ C ( : t ERASE , ( . V P ! , ( O O O N T
0x199d1c…199eb0 Dummy {f00=0x0082, f01=0x018e, f02=» f DC2INQ $ , ( ( : O B P B , ( 1 P 1( _t N ! b N ! P L , ( Q " Z Y | , ( P q N P O REQTIM , ( ( : C
0x199eb0…19a044 Dummy {f00=0x0082, f01=0x0190, f02=» , ( : N P R , ( PR P_ O P # T N 4 , ( / T T O : N d , ( M Q # P _ O : , ( k T % X _ % Q _ _6 N , ( { V -
0x19a044…19a1d8 Dummy {f00=0x0082, f01=0x0190, f02=» P P R W # O , ( : Y2# 6 $ , ( ) O O _@ P w N N P N T , ( I $ T $ P 0 w 0 w , ( i : , w N N P N , ( $ P v N T
0x19a1d8…19a36c Dummy {f00=0x0082, f01=0x018e, f02=»W % N T , ( @ O Q F B ! PT $ , ( ' : N P Z P Q T , ( E N P D + % _ , ( e ) N + N P %W O , ( : T W
0x19a36c…19a500 Dummy {f00=0x0082, f01=0x0190, f02=» TRPAN , ( _ : . H : ,_ TRPFN H , ( +_ _ = H : X , ( $ : _ - H : , ( 5 N # P N N ERASUA , ( U $ Q
0x19a500…19a694 (4, 50) Dummy {f00=0x0082, f01=0x0190, f02=»P R l , ( O : N - O , ( B + I I C ( : < LIOLON l LIOLOFC LINHONK LINHOF , ( W W W W W W W W LSAVON LSAVO
0x19a694…19a828 Dummy {f00=0x0082, f01=0x0190, f02=»P _ ]$ O , ( m O : N O : ( , ( Q T O O : X , ( R : _* 0 : O , ( O : N ICWRTE@ , (
0x19a828…19a9bc Dummy {f00=0x0082, f01=0x0190, f02=» ! x # x % x ' x ) x + x - x / x 1 x 3 x 5 8 7 8 9 8 ; 8 = 8 ? 8 H D ! A 8 C 8 E 8 G 8 I 8 K 8 M 8 O 8 Q 8 S 8 U 8 W 8 Y 8 [ 8 ] 8 _ 8 H H D ! a 8 c 8 e 8 g 8 i 8 k 8 m 8 o 8 q 8 s 8 u 8 w 8 y 8 { 8 } 8 8 H D ! 8 8 8 8 8 8 8 8
0x19a9bc…19ab50 Dummy {f00=0x0082, f01=0x0190, f02=» x H D ! 4 H D ! F 4 H D ! ! # * % ' ) + - / 1 3 5 b 7 X 9 r ;
0x19ab50…19ace4 Dummy {f00=0x0082, f01=0x0190, f02=» W V W 2 R R d H D ! = ! 2 %P )T /T 5T O UQ [P oT {Q x x V H D ! U P( P 2 P R W CP MT SP> W a x k x o x P l H D !@$ P T P P T P P W T Q #T ; t ?P CQ H D !
0x19ace4…19ae78 Dummy {f00=0x0082, f01=0x4082, f02=» W P H D ! N W W W W W W W W !W 7 =Q MP [ Q T R X l@ ~P R W CP MT SP> W a x k x o x P l H D !@$ P T P P T P P W T Q #T ; t ?P CQ H D !
0x19ae78…19b00c Dummy {f00=0x0082, f01=0x0190, f02=» J F IDENT VDUPRT REL 2.1 79-10-29 870150540210 D @ TRPFY TRPAY ERASE SETCUR ERASUPA DISPL ERASUAL WCHAR UPDATE R , ( RFMDUP DCINP RLRBUF DCGETM GTRBUF DCINP , ( O B O N - O
0x19b00c…19b1a0 Dummy {f00=0x0082, f01=0x0190, f02=»" P N " O N " P SNBUSY $ DCGETM v 6 , ( Y N " O W B : J REQTIM~ z , ( w C 4 C C ( :
0x19b1a0…19b334 (4, 51) Dummy {f00=0x0082, f01=0x0190, f02=» _ Q = : : <" T TEBCDI 0 , ( 9 _ 2 H !?9F 2 H "? B , ( U : , N / r , ( s O ( B P N ' O LSAVOF , ( H 1 ( :
0x19b334…19b4c8 Dummy {f00=0x0082, f01=0x0190, f02=» V 0 !`P X , ( _ " T V 0 !` V _ $ UPDATE 6 T , ( $ ' _J : O B h , ( G 2 T 2 1P 5P ?P W , ( g N W W W , (
0x19b4c8…19b65c Dummy {f00=0x0082, f01=0x0190, f02=» P P T |_X T }_b , ( T ~_l T 0_v X T ( , ( ' _ B : 2 H ! X , ( E :a" _ < ^, _ O , ( e _ T ^ 0 " R , ( 1 _ " X 0
0x19b65c…19b7f0 Dummy {f00=0x0082, f01=0x0190, f02=» O " P N x , ( T B + I I I , ( # C ( N " T : H ERASE x , ( C ^ 0"`T 0" 1 _ , ( c V 1 _ O O O , ( N T ; 1
0x19b7f0…19b984 Dummy {f00=0x0082, f01=0x0190, f02=» ^ " O P W P ERASUAL . , ( W R T P B , ( # " V " T P " Q W R r , ( C X 0" R 2 P 1 , ( c _( " T P " Q _< R TRP
0x19b984…19bb18 Dummy {f00=0x0082, f01=0x0190, f02=» h , ( C P " , ( Q " 2 O P PR 8 , ( V 0 " 1 R h , ( # X4 }T 9 ~T 5 |T < ] , ( C _R" 2 O P " P W ] , ( c _r PR
0x19bb18…19bcac Dummy {f00=0x0082, f01=0x0190, f02=»A4,DCTPGP STORE TIMER POINTER P ADKL A15,4 & P ABR* A15 : P EJECT L P* Z P* START PROCEDURE TIMER d P* PSPTIM EQU * $ P LDR A1,A6 LOAD DWT AS PARAMETER P CF A15,SETIME P DATA PRTOUT,TIMPRO $ P ST A4,DCTPP
0x19bcac…19be40 Dummy {f00=0x0082, f01=0x0190, f02=» | P LDKL A5,STB LOAD STACK BASE , P CF A5,HALTIN HALT INPUT IF OPEN SALCUZ , P LD A1,XACK " P RF(Z) PRT10 ACK NOT EXPECTED p P CF A5,TRENQ SEND ENQ & P CF A5,SPTIM START PROCEDURE TIMER PPRT10 ABL BRM P EJECT P*
0x19be40…19bfd4 (4, 52) Dummy {f00=0x0082, 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
0x19bfd4…19c168 Dummy {f00=0x0082, 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
0x19c168…19c2fc Dummy {f00=0x0082, 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
0x19c2fc…19c490 Dummy {f00=0x0082, f01=0x018e, f02=» " P* CR=0 IF LRC OK P* * PRDLRC IM SYNSW 4 P CF A5,READP J P ADK A5,4 ^ P LDR A1,A1 p P RF(NZ) LRCEND P ANK A7,/7F PLRCEND EQU * P CM SYNSW P ABR* A5 P P XIF P EJECT P*
0x19c490…19c624 Dummy {f00=0x0082, f01=0x0190, f02=»,ECBCW,A8 GET TCS IF ANY P ANK A2,/FF P RF(Z) DCTP10 4 ( P LC A2,TASCII,A2 TRANSLATE TO ASCII J P SLL A2,8 v PDCTP10 EQU * $ P LC A3,ECBCW+1,A8 GET TCP OR DV P ANK A3,/FF ( P LC A2,TASCII,A3 TRANSLATE TO ASCII P XIF
0x19c624…19c7b8 Dummy {f00=0x0082, f01=0x0190, f02=»BUF,A6 ( P LD A3,ECBRL,A8 CURSOR ADDRESS WORD P ST A3,DWTCUR,A6 : P XIF R " P CWK A6,DW1500 DCTASK DWT ??? ^ 2 P RF(E) DCTP30 YES!!! SHOULD NOT BE IN DC:TAB * P LD A1,DC:IN GET DC:TAB INPUT POINTER * P CWK A1,DC:END TABLE ALREADY FUL
0x19c7b8…19c94c Dummy {f00=0x0082, f01=0x0190, f02=» r $ P AD* A4,DCTAB LAST TABLE POS. =3 * PDCTP22 SUK A4,2 ADDR. TO NEXT ENTRY =3 0 * P 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 CHE
0x19c94c…19cae0 Dummy {f00=0x0082, f01=0x0190, f02=»C:TAB IN POINTER z P * P ADS A1,DC:TAB INCREMENT DC:TAB LENGTH P IFT STAT=1 N P LDK A1,4 DEVICE END b P ORS A1,DWTST,A6 ~ ( P CF A15,INSSQ INSERT IN STATUS QUEUE P XIF PDCTP30 EQU * P SUR A1,A1 RETURN CODE ::= 0 PEN
0x19cae0…19cc74 (4, 53) Dummy {f00=0x0083, f01=0x018e, f02=»* P* COMPLETE WHEN: P* SUCCESFUL TRANSMISSION " P* TIME OUT D P* X P* b PDCWR EQU * l P IFT MMUPAG=1 ~ $ P LD A1,ECBRL,A8 REQUESTED LENGTH " P CWK A1,BUFLEN ILLEGAL LENGTH? P RF(G) IL:LEN YES!! P XIF
0x19cc74…19ce08 Dummy {f00=0x0083, f01=0x0190, f02=» P* P* COMPLETE WHEN: P* MESSAGE RECEIVED * P* TIME OUT F P* Z P* d PDCRD EQU * n P LD A8,DWTECB,A6 GET ECB $ P LD A2,ECBRL,A8 REQUESTED LENGTH P CWK A2,RBUFL+RBUFL & P RF(L) IL:LEN ILLEGAL BUFFER SIZE
0x19ce08…19cf9c Dummy {f00=0x0083, f01=0x0190, f02=»HE FIRST IN QUEUE ~ P ST A2,DWTRQ,A6 P ADK A4,6 2 " P LD A3,-4,A4 EFFECTIVE LENGTH D P ST A3,ECBEL,A8 j P * P CF A15,DC:MIN MOV DATA TO USER BUFFER P SUK A4,6 P CF A15,RRBUF RELEASE BUFFER P LDK A1,0 P CF A15,
0x19cf9c…19d130 Dummy {f00=0x0083, f01=0x0190, f02=»T STATUS P* P* P IFF STAT=0 $ PDCSS EQU * 8 * P LD A1,ECBCW,A8 GET STATUS INFORMATION J P ANK A1,3 MASK DB,IR x P RF(Z) DCSS20 DEVICE END PDCSS10 EQU * P ST A1,DWTST,A6 P RB DCTP30 COMPLETE REQUEST PDCSS
0x19d130…19d2c4 Dummy {f00=0x0083, f01=0x0190, f02=»INSERT DWT IN STATUS QUEUE P LDK A1,4 SET DE " P RB DCSS10 : P XIF L P EJECT X P f P* n " P* SET REQUEST TIMEOUT VALUE x P* P* P PREQTIM EQU * " P LD A2,ECBCW,A8 TIMEOUT VALUE $ P ST A2,DWTTIM,A6 SAV
0x19d2c4…19d458 Dummy {f00=0x0083, f01=0x018e, f02=»IL:LEN LDKL A1,/8008 REQUEST ERROR + ILLEGAL LENGTH P ABL DISEND COMPLETE REQUEST < P EJECT ` P* n P* x P* P* TIMER HANDLING PART P* P* P* P* READ TIMER=TIMERR P* PTIMERE EQU * P LDR A
0x19d458…19d5ec Dummy {f00=0x0083, f01=0x0000, f02=»
[…0x1…]
0x19d780…19d914 (4, 54) Opaque[0x194]
0x19d914…19daa8 # DirEnt {nam=»LIST «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1068, f03=0x0000}
0x19d914…19daa8 IdxSect {
0x19d914…19daa8 f00 = 0x0083 // 0x19d914 @0x0
0x19d914…19daa8 f01 = 0x0002 // 0x19d916 @0x2
0x19d914…19daa8 gno = [ // 0x19d918 @0x4
0x19d914…19daa8 [0x00]: C0x0083.0x1.0
0x19d914…19daa8 ]
0x19d914…19daa8 }
0x19daa8…19dc3c Dummy {f00=0x0083, 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
0x19dc3c…19ddd0 Dummy {f00=0x0083, 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
0x19ddd0…19df64 Dummy {f00=0x0083, 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 * @
0x19df64…19e0f8 Dummy {f00=0x0083, 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 * & * & = * &
0x19e0f8…19e28c Dummy {f00=0x0083, f01=0x0190, f02=» * & , * & Z * & * & - * & K
0x19e28c…19e420 Dummy {f00=0x0083, f01=0x0190, f02=» n * & * & : * & h * & * & ; * & Y
0x19e420…19e5b4 (4, 55) Opaque[0x194]
0x19e5b4…19e748 # DirEnt {nam=»M:PROC«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1070, f03=0x0000}
0x19e5b4…19e748 IdxSect {
0x19e5b4…19e748 f00 = 0x0083 // 0x19e5b4 @0x0
0x19e5b4…19e748 f01 = 0x0002 // 0x19e5b6 @0x2
0x19e5b4…19e748 gno = [ // 0x19e5b8 @0x4
0x19e5b4…19e748 [0x00]: C0x0083.0x2.0
0x19e5b4…19e748 ]
0x19e5b4…19e748 }
0x19e748…19e8dc Dummy {f00=0x0083, f01=0x006c, f02=» $NOIF PLED @S,/S,/EE,XX PXXCH $$ IF$$ IF$$ * PXXEN F ASM /S,@L R END d
0x19e8dc…19ea70 Dummy {f00=0x0083, f01=0x2008, f02=» F PLED @S,/S,/EE,XX PXXCH $$ IF$$ IF$$ * PXXEN F ASM /S,@L R END d
0x19ea70…19ec04 Dummy {f00=0x0083, f01=0x0190, f02=» H W W > > > > > > > > @4tV ? 4t > _ > ? _ > > ? ^ ! Y ^ _ , A. #M 1 C j 8W T 8P Y ^ 5 ) P U , XH D #D
0x19ec04…19ed98 Dummy {f00=0x0083, f01=0x0190, f02=» T # P W R Y (@ 2 ,(@ X L L U 0 % _ ,(@ X P& T D #DP 0P X T 4 Y R X @z X T X @z 1 1 X P> - M X P. P& # P 0P 1 _ W R Y ( Y
0x19ed98…19ef2c Dummy {f00=0x0083, f01=0x0190, f02=» P C B T B % X * $ 4 T % X (T ! W Y * V B P X " _V B P $$ R % C W Y 'PB Y &P8 Y $P Y %P R _Q P OR R Wz B V Wn W 0 Z B Z Z" X * ,T @
0x19ef2c…19f0c0 Dummy {f00=0x0083, f01=0x0190, f02=» X R2;GV. X V X ( $4 P X *T * W Y ( - ? X :a Z T T W P X :d Y > > |Vd ? 8 R @R6 V @% =cW2 RBP R P 9 W. _ _ _ _ %0=c X 0P > 0 > >_ P > _v B 1 > @T , _
0x19f0c0…19f254 (4, 56) Opaque[0x194]
0x19f254…19f3e8 # DirEnt {nam=»DW2501«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1078, f03=0x0000}
0x19f254…19f3e8 IdxSect {
0x19f254…19f3e8 f00 = 0x0083 // 0x19f254 @0x0
0x19f254…19f3e8 f01 = 0x0002 // 0x19f256 @0x2
0x19f254…19f3e8 gno = [ // 0x19f258 @0x4
0x19f254…19f3e8 [0x00]: C0x0083.0x3.0
0x19f254…19f3e8 ]
0x19f254…19f3e8 }
0x19f3e8…19f57c Dummy {f00=0x0083, f01=0x0190, f02=» 2 P IDENT DW2501 REL 10.0 80-03-14 870150541000 P : P* B : P* DEVICE WORK TABLE FOR DATA-COMMUNICATION DEVICE 1 L P* P ENTRY DW2501 TABLE ENTRY * P EXTRN DC25AD POINTER TO ADDRESS-BLOCK P* PMMUPAG EQU 0 P*
0x19f57c…19f710 Dummy {f00=0x0083, f01=0x0190, f02=»DRESS P DATA DWTEND-DW2501 P RIGHT BYTE=ORDER * * P DATA DC25AD POINTER TO ADDRESS-BLOCK F P DATA 'DC' TTAB-ADDRESS t $ P DATA 0 WAIT/ACTIVATE INDICATOR P DATA 0 TERMINAL QUEUE P* P IFT MMUPAG=1 P DATA 0 USER E
0x19f710…19f8a4 Dummy {f00=0x0083, f01=0x4134, f02=»ATA 0 STATUS 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*
0x19f8a4…19fa38 Dummy {f00=0x0083, f01=0x2008, f02=» R ( P DATA DCAD POINTER TO ADDRESS-BLOCK P DATA 0 TTAB-ADDRESS > $ P DATA 0 WAIT/ACTIVATE INDICATOR Z P DATA 0 TERMINAL QUEUE P DATA 0 TIMER POINTER P DATA 0 WRITE QUEUE P DATA 0 STATUS QUEUE P DATA 0,0 SAVE ARE
0x19fa38…19fbcc Dummy {f00=0x0083, f01=0x0190, f02=»1,X'30' CHARACTER ZERO C 8 P SC* A1,ECBKB+ECBBA,CREBAS STORE CHARACTER IN BUFFER D " P CF A14,NUM DISPLAY CHARACTER D Z P D PZERO:2 EQU * D P LDK A1,X'30' CHARACTER ZERO D 8 P SC* A1,ECBKB+ECBBA,CREBAS STORE CHARACTER IN BUFFER D " P CF A14,NUM
0x19fbcc…19fd60 Dummy {f00=0x0083, f01=0x0190, f02=»******************** D j P* E P* NUM E & P* E 4 " P* DISPLAY AND UPDATE NUMERICS E > P* E d > P********************************************************** E n P* E PNUMCOM EQU * E P LDK A2,/2C E P SC* A2,ECBKB+ECBBA,CREBAS E P* E
0x19fd60…19fef4 (4, 57) Opaque[0x194]
0x19fef4…1a0088 # DirEnt {nam=»DRDC25«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1080, f03=0x0000}
0x19fef4…1a0088 IdxSect {
0x19fef4…1a0088 f00 = 0x0084 // 0x19fef4 @0x0
0x19fef4…1a0088 f01 = 0x002a // 0x19fef6 @0x2
0x19fef4…1a0088 gno = [ // 0x19fef8 @0x4
0x19fef4…1a0088 [0x00]: C0x0084.0x0.0
0x19fef4…1a0088 [0x01]: C0x0084.0x1.0
0x19fef4…1a0088 [0x02]: C0x0084.0x2.0
0x19fef4…1a0088 [0x03]: C0x0084.0x3.0
0x19fef4…1a0088 [0x04]: C0x0085.0x0.0
0x19fef4…1a0088 [0x05]: C0x0085.0x1.0
0x19fef4…1a0088 [0x06]: C0x0085.0x2.0
0x19fef4…1a0088 [0x07]: C0x0085.0x3.0
0x19fef4…1a0088 [0x08]: C0x0086.0x0.0
0x19fef4…1a0088 [0x09]: C0x0086.0x1.0
0x19fef4…1a0088 [0x0a]: C0x0086.0x2.0
0x19fef4…1a0088 [0x0b]: C0x0086.0x3.0
0x19fef4…1a0088 [0x0c]: C0x0087.0x0.0
0x19fef4…1a0088 [0x0d]: C0x0087.0x1.0
0x19fef4…1a0088 [0x0e]: C0x0087.0x2.0
0x19fef4…1a0088 [0x0f]: C0x0087.0x3.0
0x19fef4…1a0088 [0x10]: C0x0088.0x0.0
0x19fef4…1a0088 [0x11]: C0x0088.0x1.0
0x19fef4…1a0088 [0x12]: C0x0088.0x2.0
0x19fef4…1a0088 [0x13]: C0x0088.0x3.0
0x19fef4…1a0088 [0x14]: C0x0089.0x0.0
0x19fef4…1a0088 ]
0x19fef4…1a0088 }
0x1a0088…1a021c Dummy {f00=0x0084, f01=0x018e, f02=» 2 P IDENT DRDC25 REL 10.0 80-03-14 870150541000 & P =9, OLLES POWER UP+MODEM NOT OP : P REL 10.1 79-10-26 d P P REL 10.1 ADAPTATION P REL 9.1 79-08-16 P =8, ASCII-MODE FOR SALCUZ P REL 9.1 79-07-19 & P =7,
0x1a021c…1a03b0 Dummy {f00=0x0084, f01=0x0190, f02=» $ P =5, INCOMPLETE POLL SEQUENCE P REL 9.1 79-05-23 , P =3, TRANSFER PARAMETER H P PRR 9.1 79-04-06 j P =4, ANY MESSAGE ORDER P PRR 9.1 79-04-06 P =2, ABORT HANDLING P PRR 9.1 78-11-29 P =1, MSR-I
0x1a03b0…1a0544 Dummy {f00=0x0084, f01=0x0190, f02=»*********** n P* $ P* PHILIPS TERMINAL SYSTEM PTS P* F * P* DRDC15: DRIVER DATA COMMUNICATION P . P* BSC MULTIPOINT LINE PROCEDURE ~ P* OR SIEMENS MSV1 P* P* P* P* P* 8 P**
0x1a0544…1a06d8 Dummy {f00=0x0084, f01=0x0190, f02=»D ADDRESS BLOCK TERMINAL REQUESTS " P ENTRY IH2501 INPUT INTERRUPT * " P ENTRY IH2502 OUTPUT INTERRUPT P " P ENTRY DC25ON POWER ON ROUTINE v " P ENTRY DW2500 DWT FOR DC TASK P* P* P* EXTERNAL REFERENCES P* P* " P
0x1a06d8…1a086c Dummy {f00=0x0084, f01=0x0190, f02=»REQUEST ERROR P EXTRN SETIME SET TIMER P EXTRN DWTST DWT STATUS 6 P EXTRN DWTOR DWT ORDER V P EXTRN DWTECB DWT ECB t * P EXTRN INTSAV SAVE AREA LAST INTERRUPT ( P EXTRN TEBCDIC ASCII TO EBCDIC TABLE ( P EXTRN TASCII EBCDIC TO ASCI
0x1a086c…1a0a00 Dummy {f00=0x0084, f01=0x018e, f02=» P EXTRN ECBRC ECB RETURN CODE " P EXTRN ECBCW ECB CONTROL WORD ( * P EXTRN DC:MIN MOVE DATA TO USER BUFFER N , P EXTRN DC:MOT MOVE DATA FROM USER BUFFER | 0 P EXTRN DISEND COMPLETE REQUEST AND DISPATCH * P EXTRN PFPOST WAIT FOR POWER UP IF SET
0x1a0a00…1a0b94 (4, 58) Dummy {f00=0x0084, f01=0x0190, f02=» P* P* P* DWT CONTENTS P* . J P* DWTCHP TERMINAL ADDRESS AS GIVEN AT PARAMETER TRANSFER (BIT #08-#15) 8 P* P EJECT < P******************************************************* P* * P* PARAMETERS FOR CONDITIONAL ASS
0x1a0b94…1a0d28 Dummy {f00=0x0084, f01=0x0190, f02=»15FC EQU /63 $ PX:C EQU 1 IF 1 INTERRUPT LOGGING PLOGG EQU X:C < " PX:D EQU 600 POLL TIMEOUT VALUE P PTIMPOL EQU X:D v * PX:E EQU 0 STATUS AND RVI HANDLING IF=1 PSTAT EQU X:E ( PX:F EQU 0 READ COMMAND HANDLING IF=1 PRCOM EQU X:F
0x1a0d28…1a0ebc Dummy {f00=0x0084, f01=0x0190, f02=»I EQU 1 IF 1 SPECIFIC POLL HANDLING PSPECP EQU X:I , , PX:J EQU 1 IF = 1 LINE SPEED SET TO HIGH B ( P IF = 0 LINE SPEED IS SET TO LOW r PSPEED EQU X:J * PX:K EQU 0 IF 1 SIEMENS MSV1 PROCEDURE PMSV1 EQU X:K . PX:L EQU 2 NUMBER O
0x1a0ebc…1a1050 Dummy {f00=0x0084, f01=0x0190, f02=»2 P IFT P6805=0 , PLCUIN EQU X:N DEVICE ADDRESS OF RECEIVER P XIF N P IFT P6805=1 Z , PLCUIN EQU /0A DEVICE ADDRESS OF RECEIVER n P XIF PX:O EQU 1 . PIBMCHR EQU X:O IF 1 IBM CHARACTER HANDLING . PX:P EQU 0 IF 1 MESSAGE PAS
0x1a1050…1a11e4 Dummy {f00=0x0084, f01=0x0190, f02=» $ PTBUFL EQU X:R MMU BUFFER LENGTH * PBINTRM EQU 0 IF 1 BINARY TRANSMISSION 0 , PTSTREQ EQU 0 IF 1 TEST REQUEST HANDLING ^ , PDMRK EQU 0 SPECIAL CONDITION FOR DENMARK 4 PNOWACK EQU 0 WHEN WORKING WITH A MAIN-FRAME THAT 0 P DOESN'T ACCEPT
0x1a11e4…1a1378 Dummy {f00=0x0084, f01=0x0190, f02=»FT P6805=0 SALCUZ < PLCUUT EQU LCUIN+/10 DEVICE ADDRESS OF TRANSMITTER SALCUZ P XIF SALCUZ Z P IFT P6805=1 p < PLCUUT EQU LCUIN+/01 DEVICE ADDRESS OF TRANSMITTER SALCUZ P XIF SALCUZ P* P EJECT P* P* . P**
0x1a1378…1a150c Dummy {f00=0x0084, f01=0x0190, f02=»*** j P* . P* A PROGRAM VERSION USING TOSS MMU PAGING * P* IS OBTAINED BY SETTING MMUPAG EQU 1. H P* v PMMUPAG EQU 0 P* P* 6 P* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION . P* SET IS OBTAINED BY SETTING CPU852 EQ
0x1a150c…1a16a0 Dummy {f00=0x0084, f01=0x0190, f02=»FER SIZE r P* P EJECT P* ( P* DWT DISPLACEMENTS 2 P* N 0 PDWTDRD EQU /10 START OF DRIVER DEFINED PART X P* P IFT MMUPAG=0 PSTART EQU DWTDRD P XIF P* P IFT MMUPAG=1 PSTART EQU DWTDRD+4
0x1a16a0…1a1834 (4, 59) Dummy {f00=0x0084, f01=0x0190, f02=»EQU START+/04 STATUS QUEUE & PDWTRQ EQU START+/06 RECEIVE QUEUE " . PDWTBUF EQU START+/08 DEVICE BUFFER ADDRESS L ( PDWTCUR EQU START+/0A CURSOR ADDRESS ~ , PDWTTIM EQU START+/0C REQUEST TIMER VALUE P* P EJECT P* P* REQUEST HA
0x1a1834…1a19c8 Dummy {f00=0x0084, f01=0x0190, f02=»RS x P* /38: SET STATUS $ P* /39: SET REQUEST TIMEOUT VALUE $ P* L P* V P* CONSTANTS AND WORK AREAS ` P* P* & PDCONOF DATA 0 ON- / OFFLINESWITCH * PDCSTOL DATA 0 OLD DC EQUIPMENT STATUS PDCSTCU DATA 0 CURRENT STAT
0x1a19c8…1a1b5c Dummy {f00=0x0084, f01=0x0190, f02=»ESS BLOCK P* $ P DATA 0 INDICATES NO MMU BUFFER P DATA DEVIND DEVICE INDEX D * PDC15DC DATA DCACTD ACTIVATION ADDRESS f & P DATA ABORT ABORT ROUTINE ADDRESS $ P DATA DCRBUF REC. BUFFER ANCHOR P* P* DRIVER ADDRESS BLOCK
0x1a1b5c…1a1cf0 Dummy {f00=0x0084, f01=0x0190, f02=»ABORT ABORT ROUTINE ABORT ROUTINE ADDRESS $ P DATA DCRBUF REC. BUFFER ANCHOR 2 P* Z , P RES 15 SUBROUTINE STACK FOR INTERRUPTS d PSTB RES 1 " P RES 1 AND FOR TRANSFER PARAM PSTB2 RES 1 P P IFT SPEED=1 PLSPEED EQU /02
0x1a1cf0…1a1e84 Dummy {f00=0x0084, f01=0x0190, f02=»ASKS t P* PDCACT EQU * P LDK A1,0 PRESET RETURN CODE * P IFT EM3270=1 =4 N P LDR A7,A7 =4 h & P RF(Z) ANYMSG ANY MESSAGE ORDER =4 ~ P XIF P SUK A7,/02 P RF(Z) DCRD READ SPECIFIC P SUK A7,/06-/02 P RF(Z)
0x1a1e84…1a2018 Dummy {f00=0x0084, f01=0x0190, f02=»T STATUS P SUK A7,/39-/38 $ P ABL(Z) REQTIM SET REQUEST TIMER ( P XIF P P P IFT STAT=0 d P SUK A7,/39-/37 x $ P RF(Z) REQTIM SET REQUEST TIMER P XIF P RF DCA100 P EJECT P* P* P* ACTIVATION FRO
0x1a2018…1a21ac Dummy {f00=0x0084, f01=0x0190, f02=» & P RF(Z) ANYMSG ANY MESSAGE ORDER =4 P XIF 2 P SUK A7,/02 > P RF(E) DCRDDC READ R P SUK A7,/37-/02 l $ P RF(E) DCTP TRANSFER PARAMETERS P PDCA100 EQU * REQUEST ERROR P ABL DISIOE INVALID ORDER P* P*
0x1a21ac…1a2340 Dummy {f00=0x0084, f01=0x0190, f02=»T p $ P* SPONTANOUS MESSAGE RECEPTION P* 2 PDCRDDC EQU * < , P CF A15,CKMESS CHECK IF MESSAGE RECEIVED P PDCRTN EQU * P ABL TDISP GO TO DISPATCHER P IFT EM3270=1 =4 P EJECT . P****************************************
0x1a2340…1a24d4 (4, 60) Dummy {f00=0x0084, f01=0x0190, f02=»ED MESSAGE ?? =4 r P RF(Z) DCRD10 NO!! =4 ( P RF ENDIO YES!! COMPLETE REQUEST =4 6 P XIF b P EJECT n P* | P* P* TRANSFER PARAMETERS P* P* > P* REQUEST FROM DC-TASK: TRANSFER TERMINAL COMPUTER ADDRESS : P*
0x1a24d4…1a2668 Dummy {f00=0x0084, f01=0x0190, f02=» P XIF P IFT CODE=1 & PDCTP LC A2,ECBCW,A8 GET TCS IF ANY $ P ANK A2,/FF N P RF(Z) DCTP10 b ( P LC A2,TASCII,A2 TRANSLATE TO ASCII x P SLL A2,8 PDCTP10 EQU * $ P LC A3,ECBCW+1,A8 GET TCP OR DV P ANK A3,/FF ( P L
0x1a2668…1a27fc Dummy {f00=0x0084, f01=0x0190, f02=»BA,A8 DEVICE BUFFER ADDRESS P ST A3,DWTBUF,A6 $ ( P LD A3,ECBRL,A8 CURSOR ADDRESS WORD < P ST A3,DWTCUR,A6 h P XIF " P CWK A6,DW2500 DCTASK DWT ??? 2 P RF(E) DCTP30 YES!!! SHOULD NOT BE IN DC:TAB * P LD A1,DC:IN GET DC:TAB INPUT PO
0x1a27fc…1a2990 Dummy {f00=0x0084, f01=0x018e, f02=»20 EQU * " P LD A4,DCTAB DC:TAB ADDRESS =3 $ P AD* A4,DCTAB LAST TABLE POS. =3 6 * PDCTP22 SUK A4,2 ADDR. TO NEXT ENTRY =3 ^ * P CW A4,DCTAB ALL ENTRIES CHECKED?? =3 * P RF(E) DCTP25 YES.DWT NOT IN TABLE =3 P CWR* A6,A4 IN TABLE ?? =3
0x1a2990…1a2b24 Dummy {f00=0x0084, f01=0x018e, f02=» n P LDK A1,2 * P ADS A1,DC:IN UPDATE DC:TAB IN POINTER P H * P ADS A1,DC:TAB INCREMENT DC:TAB LENGTH P P IFT STAT=1 ~ P LDK A1,4 DEVICE END P ORS A1,DWTST,A6 ( P CF A15,INSSQ INSERT IN STATUS QUEUE P XIF PDCTP30 EQU
0x1a2b24…1a2cb8 Dummy {f00=0x0084, f01=0x018e, f02=» P* P* P* WRITE P* ( P* 2 P* COMPLETE WHEN: < P* SUCCESFUL TRANSMISSION T P* TIME OUT v P* P* PDCWR EQU * P IFT MMUPAG=1 $ P LD A1,ECBRL,A8 REQUESTED LENGTH " P CWK A1,BUFLEN ILLEGAL LEN
0x1a2cb8…1a2e4c Dummy {f00=0x0084, f01=0x0190, f02=» P* P* P* P* READ " P* 0 P* : P* COMPLETE WHEN: D P* MESSAGE RECEIVED P* TIME OUT x P* P* PDCRD EQU * P LD A8,DWTECB,A6 GET ECB . P LD A4,DWTRQ,A6 AND RECEIVE MESSAGE QUEUE " P RF(
0x1a2e4c…1a2fe0 Dummy {f00=0x0084, f01=0x018e, f02=» " P LD A3,-4,A4 EFFECTIVE LENGTH P ST A3,ECBEL,A8 . P F P LDK A1,0 RESET RETURN CODE N * P CF A15,DC:MIN MOV DATA TO USER BUFFER r P RB DCRTN P $ PDCRD10 CF A15,TIMERE START TIMER P RB DCRTN P EJECT P*
0x1a2fe0…1a3174 (4, 61) Dummy {f00=0x0085, f01=0x0190, f02=» 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 l PDCSS20 EQU * P LD A1,DWTST,A6 P ANK A1,9 ( P RB(Z) DCSS10 WACK HAS NOT BEEN SENT PDCSS30 EQU *
0x1a3174…1a3308 Dummy {f00=0x0085, f01=0x0190, f02=» " P* SET REQUEST TIMEOUT VALUE P* * P* 4 P > PREQTIM EQU * F " P LD A2,ECBCW,A8 TIMEOUT VALUE Z $ P ST A2,DWTTIM,A6 SAVE IT IN DWT P RB DCTP30 TENDIO & DISPATCH P P* ( P* ILLEGAL APPLICATION BUFFER SIZE
0x1a3308…1a349c Dummy {f00=0x0085, f01=0x0190, f02=» P* P* P* TIMER HANDLING PART P* 6 P* @ P* J P* READ TIMER=TIMERR T P* p PTIMERE EQU * z P LDR A1,A6 . P LD A2,DWTTIM,A6 GET REQUEST TIMEOUT VALUE P RF(Z) TIME10 NO TIMING P ST A2,TIMERR P
0x1a349c…1a3630 Dummy {f00=0x0085, f01=0x018e, f02=»10 RETURN P* ! P* TIMEOUT READ TIMER ! P* ! 8 PTOUTRE EQU * ! B P LDR A6,A1 FETCH DWT ! V P CM DWTTP,A6 ! r PTOUTR1 EQU * ! " P LDK A1,/40 INDICATE TIME OUT ! $ PTOUTR2 RB ENDIO COMPLETE REQUEST ! P* ! P* WRITE TIMER=TIMWR !
0x1a3630…1a37c4 Dummy {f00=0x0085, f01=0x0190, f02=» ! P CF A15,SETIME " P DATA TOUTWR " PTIMWR DATA 0 " 2 P ST A4,DWTTP,A6 " F P RB TIME10 " ^ P EJECT " p P* " ~ P* TIMEOUT WRITE TIMER " P* " PTOUTWR EQU * " P LDR A6,A1 FETCH DWT " P CM DWTTP,A6 " * P CF A15,REMOVW REMOV
0x1a37c4…1a3958 Dummy {f00=0x0085, f01=0x0190, f02=» CWR A2,A6 " * P RB(NE) TOUTR1 THIS DWT IS NOT WRITING # ( P CM XACK INDICATE 'ACK NOT EXPECTED' # @ P CM FDWTUT # l P* # ~ P* # P RB TOUTR1 # P EJECT # P* # P* # P* STOP REQUEST TIMING # P* # & P* REMAINING TIME IS RETURN
0x1a3958…1a3aec Dummy {f00=0x0085, f01=0x0190, f02=»* A2,A2 # " P NGR A2,A2 GET REMAINING TIME $ P CM* DWTTP,A6 STOP TIMER $ 6 P CM DWTTP,A6 $ V PCTIM10 EQU * $ j P RF GBUF10 $ ~ P EJECT $ P* $ P* GET RECEIVE BUFFER $ P* $ $ P* CALLING SEQUENCE: CF A15,GRBUF $ P* A4=0 IF NO BUFFE
0x1a3aec…1a3c80 Dummy {f00=0x0085, f01=0x0190, f02=»ECEIVE BUFFERS $ z PGBUF INH % P LDR* A4,A2 % & P RF(Z) GBUF10 NO BUFFER FREE % : . P LDR* A3,A4 REMOVE BUFFER FROM FREE CHAIN % ^ P STR A3,A2 % * PGBUF10 ADKL A15,4 ADJUST STACK POINTER % P ABR* A15 RETURN TO CALLER % P EJECT % P* %
0x1a3c80…1a3e14 (4, 62) Dummy {f00=0x0085, f01=0x0190, f02=»WRQ GET QUEUE ANCHOR % PINSWQ1 LDK A4,DWTWQ & PINSWQ2 LDR* A3,A2 & 8 $ P RF(Z) INSWQ3 END OF QUEUE FOUND & R P LDR A2,A3 & z P RB INSWQ2 & PINSWQ3 ADR A4,A6 & P STR A4,A2 INSERT IN QUEUE & " P CMR A4 INDICATE END OF QUEUE & P RB GBUF10
0x1a3e14…1a3fa8 Dummy {f00=0x0085, f01=0x0190, f02=»* & * PREMOVW LDKL A2,DCWRQ GET QUEUE ANCHOR ' 2 PREM05 LDK A4,DWTWQ GET DWT-LINK TO BE REMOVED ' 8 PREM06 EQU * ' n 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 LDR A2,A3
0x1a3fa8…1a413c Dummy {f00=0x0085, f01=0x0190, f02=»* ' P* INSERT DWT IN STATUS QUEUE ( P* ( . P IFF STAT=0 ( 8 P* A2,A3,A4 DESTROYED ( L P* A6=DWT ( h P* ( x ( PINSSQ LDKL A2,DCSTQ GET QUEUE ANCHOR ( P LDK A4,DWTSQ ( P RB INSWQ2 ( P* ( P* ( " P* REMOVE DWT FROM STATUS QUEUE
0x1a413c…1a42d0 Dummy {f00=0x0085, f01=0x0190, f02=» P RB REM06 ) P XIF ) P EJECT ) " P* ) 0 P* ) : $ P* QUEUE ALLOCATED RECEIVE BUFFER ) D P* ) l P* A4=BUFFER ADDR ) v P* A2,A3 DESTROYED ) P* ) PQRBUF EQU * ) P IFT MESPAS=1 ) ( P LDKL A2,DW2500 QUEUE ON DC-TASK DWT ) P
0x1a42d0…1a4464 Dummy {f00=0x0085, f01=0x0190, f02=»100 EQU * ) P LDR* A3,A2 * $ P RF(Z) QR200 END OF QUEUE FOUND * & P LDR A2,A3 * N P RB QR100 * ` & PQR200 STR A4,A2 INSERT INTO QUEUE * r " P CMR A4 INDICATE END OF QUEUE * P RTN A5 * P EJECT * P* * P* * 2 P* CHECK IF UNEXPECTE
0x1a4464…1a45f8 Dummy {f00=0x0085, f01=0x0190, f02=» 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) CKM110 NO + t $ P LD 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 +
0x1a45f8…1a478c Dummy {f00=0x0085, f01=0x018e, f02=»ER TO TEXT + | & P DONT DESTROY BUFFER ADDRESS =6 , P LD A4,-4,A3 , < 0 P ST A4,ECBEL,A8 STORE NUMBERS OF CHARACTERS , P P LD A4,-2,A3 , . P ST A4,ECBCW,A8 STORE LINE DEVICE ADDRESS , P , P LDK A1,0 RESET RETURN CODE , & P LDR A4,A3 RECEIVE
0x1a478c…1a4920 Dummy {f00=0x0085, f01=0x0190, f02=» , ~ 8 PCKM200 LD A1,DCSTCU NO MESSAGE RECEIVED,CHECK STATUS - , P OR A1,DCONOF TAKE CARE OF POLL TIME OUT - D P CW A1,DCSTOL - t P ST A1,DCSTOL - & P RB(E) CKM110 NO CHANGE OF STATUS - * P ORKL A1,/2000 INDICATE STATUS CHANGE - 0 P CF A15,TENDIO C
0x1a4920…1a4ab4 (4, 63) Dummy {f00=0x0085, f01=0x018e, f02=» - T P* . P* ABORT ROUTINE . P* . , P************************ . 6 P . V & PABORT LD A1,DWTTP,A6 TIMER POINTER . ^ " P RF(Z) AB:10 NO TIMER RUNNING . P CM* DWTTP,A6 KILL TIMER . P CM DWTTP,A6 . P . $ PAB:10 LD A1,DWTOR,A6 ORDER COD
0x1a4ab4…1a4c48 Dummy {f00=0x0085, f01=0x018e, f02=» . d P / . P CF A15,REMOVW REMOVE DWT FROM WRITE QUEUE / & P LD A2,FDWTUT WRITING DWT ADDRESS / B P CWR A2,A6 / l P RF(NE) AB:RTN NOT THIS DWT / ~ P CM XACK RESET ACK EXPECTED / P CM FDWTUT RESET WRITING DWT / P / PAB:RTN EQU * / P I
0x1a4c48…1a4ddc Dummy {f00=0x0085, f01=0x0190, f02=» / P EJECT 0 P 0 P EJECT 0 P* 0 , P* 0 6 P* STORE REGISTER A3-A8 0 @ $ P* CALLING SEQUENSE: CF A15,STREG 0 ^ P* 0 P* RESTORE 0 $ P* CALLING SEQUENCE: CF A15,LDREG 0 P* 0 P* 0 PSTREG ST A3,LCA3 0 P ST A4,LCA4 0
0x1a4ddc…1a4f70 Dummy {f00=0x0085, f01=0x0190, f02=»0 0 PLCA3 EQU *-2 1 P LDKL A4,0 1 PLCA4 EQU *-2 1 0 P LDKL A5,0 1 D PLCA5 EQU *-2 1 V P LDKL A6,0 1 j PLCA6 EQU *-2 1 | P LDKL A7,0 1 PLCA7 EQU *-2 1 P LDKL A8,0 1 PLCA8 EQU *-2 1 PRTNA15 EQU * 1 P ADKL A15,4 1 P ABR
0x1a4f70…1a5104 Dummy {f00=0x0085, f01=0x0190, f02=» 1 P* 2 P* CHARACTER EQUATES 2 P* 2 . & PSF EQU X'1D' START FIELD CHARACTER 2 8 PSYN EQU /16 2 b PSTX EQU /02 2 v PETX EQU /03 2 PETB EQU /17 2 PITB EQU /1F 2 PSOH EQU /01 2 PENQ EQU /05 2 PDLE EQU /10 2 PEOT EQ
0x1a5104…1a5298 Dummy {f00=0x0085, f01=0x0190, f02=» IFT CODE=0 2 PPAR EQU /80 3 PRVI EQU /3C 3 ( PACK0 EQU /30 3 < PACK1 EQU /31 3 P PDC1 EQU /11 3 d P IFT MSV1=0 3 x PWACK EQU /3B 3 P XIF 3 P IFT CODE=0 3 P IFT MSV1=1 3 0 PWACK EQU /BF =WABT - SIEMENS MSV1 PROCEDURE 3 P
0x1a5298…1a542c Dummy {f00=0x0085, f01=0x0190, f02=»BC EQU /32 3 P XIF 4 P EJECT 4 P* 4 , P* 4 6 P* PROCEDURE WORK AREAS 4 @ P* 4 ^ P* 4 h * PFDWTIN RES 1 CURRENT DWT FOR RECEPTION 4 r . PFDWTUT RES 1 CURRENT DWT FOR TRANSMISSION 4 PXACK DATA 0 ACK EXPECTED 4 PXSEL DATA 0 SELECTED 4
0x1a542c…1a55c0 Dummy {f00=0x0085, f01=0x0190, f02=»0 ACK COUNTER 4 * PSYNSW DATA 0 0=SKIP SYNS, 1=DON'T SKIP 5 P* 5 D PFECB RES 1 WRITING ECB 5 N ( PFECBBA RES 1 WRITING BUFFER ADDRESS 5 l & PFECBRL RES 1 WRITING BUFFER LENGTH 5 PFBAX DATA 0 BUFFER INDEX 5 0 PFBLST DATA 0 START OF LAST TRANSMITTED
0x1a55c0…1a5754 (4, 64) Dummy {f00=0x0085, f01=0x0190, f02=»AVE AREA 5 p P* 6 P* 6 $ P* 3270 SENSE/STATUS INFORMATION 6 $ P* 6 L P* 6 V P IFF STAT=0 6 ` . PSSTAB EQU * S/S 0 : NO STATUS,DB,DE,DB+DE 6 t P* 6 P* 6 P DATA /4248 6 P DATA /4242 6 P* 6 2 PNOIR EQU /20 S/S 1 : NO INTE
0x1a5754…1a58e8 Dummy {f00=0x0085, f01=0x0190, f02=»MODE 6 P* 7 " P* ENTERED EVERY TIME A MESSAGE 7 & P* IS EXPECTED FROM THE MASTER SIDE 7 < P* 7 f P* 7 p P IFT P6805=1 SALCUZ 7 z , PBRMHLT CF A5,HALTIN HALT RECEIVER SALCUZ 7 P XIF SALCUZ 7 PBRM EQU * 7 P LDKL A5,STB LOAD STACKBAS
0x1a58e8…1a5a7c Dummy {f00=0x0085, f01=0x0190, f02=»TE STATUS 7 l P XIF SALCUZ 8 P IFT P6805=1 SALCUZ 8 ( 0 P CF A15,CKMESS CHECK IF STATUS CHANGE SALCUZ 8 D P XIF SALCUZ 8 x PBRM010 EQU * 8 P LD A2,PFPOST 8 $ P RF(NZ) BRM100 WAIT FOR POWER UP 8 P IFT CODE+P6805=0 SALCUZ 8 0 P LDKL
0x1a5a7c…1a5c10 Dummy {f00=0x0085, f01=0x0190, f02=»+SYNEBC SPECIFY SYN PATTERN 8 | P XIF SALCUZ 9 $ P IFT P6805=0 SALCUZ 9 : " P CIO A2,1,LCUIN START RECEIVER 9 V P XIF SALCUZ 9 | P IFT P6805=1 SALCUZ 9 P IFF CODE=1 SALCUZ 9 P LDK A2,/0C SALCUZ 9 * P CIO A2,1,LCUIN START RECEIVER SAL
0x1a5c10…1a5da4 Dummy {f00=0x0085, f01=0x0190, f02=»Z 9 P IFT CODE+P6805=2 SALCUZ : P LDK A2,0 SALCUZ : , * P CIO A2,1,LCUIN START RECEIVER SALCUZ : F P LDK A2,SYNEBC SALCUZ : t 2 P OTR A2,1,LCUIN SPECIFY SYNC CHARACTER SALCUZ : P RB(NA) BRMHLT SALCUZ : P XIF SALCUZ : PBRM100 EQU *
0x1a5da4…1a5f38 Dummy {f00=0x0085, f01=0x0190, f02=»STX RECEIVED : P SUK A1,EOT-STX ; P RF(Z) BRM200 EOT RECEIVED ; , P SUK A1,ENQ-EOT ; N P ABL(Z) BRM400 ENQ RECEIVED ; f P SUK A1,DLE-ENQ ; P ABL(Z) BRM600 DLE RECEIVED ; P SUK A1,NAK-DLE ; P ABL(Z) BRM500 NAK RECEIVED ; P IFT M
0x1a5f38…1a60cc Dummy {f00=0x0085, f01=0x0190, f02=»M150 INVALID ADDRESSING ; P XIF < P LDK A3,0 < , P CC A2,DW2500+1 < > P RF(E) BRM110 POLLING < V P LDK A3,2 < t P CC A2,DW2500 < P RF(NE) BRM150 NOT THIS TCU < PBRM110 EQU * < P CF A5,READP READ 1:ST STA < P RF(NZ) BRM150 PAR
0x1a60cc…1a6260 Dummy {f00=0x0085, f01=0x018e, f02=» < , P RF(NE) BRM150 INVALID ADDRESS SEQUENCE = P XIF = 8 " P CF A5,READ READ ONE CHARACTER = D P IFT P6805=0 SALCUZ = j P SUK A2,ENQ+PAR = P XIF SALCUZ = P IFT P6805=1 SALCUZ = P SUK A2,ENQ SALCUZ = P XIF SALCUZ = P RF(NZ
0x1a6260…1a63f4 (4, 65) Dummy {f00=0x0086, f01=0x0190, f02=» P > P CIO A1,0,LCUIN HALT INPUT > P SST A1,LCUIN > . P XIF SALCUZ > D P IFT P6805=1 SALCUZ > Z $ P CF A5,HALTIN HALT INPUT SALCUZ > v . P RB(NZ) BRM010 PARITY ERROR SALCUZ SALCUZ > P XIF SALCUZ > P LDK A1,1 > P ST A1,CACK LOAD
0x1a63f4…1a6588 Dummy {f00=0x0086, f01=0x0190, f02=» P IFT MSV1=1 ? 6 P CF A5,FINTEP CHECK IF STA PRESENT (POLL ADDRESS) ? P XIF ? R P IFT MSV1=0 ? ^ & P CF A5,FINTER CHECK IF STA PRESENT ? r P XIF ? P LDR A6,A3 LOAD DWT TO A6 ? P ABL(NZ) SPOLL SPECIFIC POLL ? P RB BRM INVALID POLL ?
0x1a6588…1a671c Dummy {f00=0x0086, f01=0x018e, f02=»SV1=0 ? $ P LDKL A6,DW2500 SELECT TO DCTASK @ PBRM130 EQU * @ 8 P ABL SELECT @ L P XIF @ ` P IFT MSV1=1 @ p P ABL BRM INVALID ADDRESS @ P XIF @ P* @ , P* WAIT FOR MARK HOLD TO RESYNCHRONIZE @ P* @ PBRM150 EQU * @
0x1a671c…1a68b0 Dummy {f00=0x0086, f01=0x0190, f02=» P EJECT A P* A P* A P* EOT HAS BEEN RECEIVED A & P* A F P* A P PBRM200 EQU * A Z & P CF A5,HPTIM STOP PROCEDURE TIMER A n P IFT RCOM=1 A P CM XRB RESET READ BUFFER A P XIF A P LD A1,XACK A & P RF(Z) BRM220 ACK IS NOT E
0x1a68b0…1a6a44 Dummy {f00=0x0086, f01=0x0190, f02=»TE WRITE REQUEST A | PBRM210 EQU * B " P CM XACK RESET 'ACK EXPECTED' B , PBRM220 EQU * B R P CM XSEL RESET 'SELECTED' B f P RB BRM B P EJECT B P* B P* B P* STX HAS BEEN RECEIVED B P* B P* B PBRM300 EQU * B P CF A5
0x1a6a44…1a6bd8 Dummy {f00=0x0086, f01=0x0190, f02=»B(Z) BRM150 NO BUFFER AVAILABLE B P********************* C ( PBRM305 EQU * C F P CF A5,RDMESS READ MESSAGE C Z P SUK A7,1 C | P RF(NZ) BRM320 MESSAGE OK C PBRM310 EQU * C ( P CM XSTA INDICATE 'INVALID MESSAGE' C PBRM312 EQU * C P CF
0x1a6bd8…1a6d6c Dummy {f00=0x0086, f01=0x0190, f02=» C n P LD A1,DCRBUF D & P RF(Z) BRM316 NO BUFFER AVAILABLE D " P LD A6,FDWTUT GET WRITING DWT D H 0 P ABL(Z) BRM150 NO ONE WRITING. RESYNCHRONIZE D n P LDR* A2,A6 GET STA D P XIF D P IFT RCOM=1 D , P CF A5,PRREC PREPARE FOR TEXT RECEPTION D
0x1a6d6c…1a6f00 Dummy {f00=0x0086, f01=0x0190, f02=» D t P XIF E ( PBRM316 CF A5,READ READ ONE CHARACTER E P IFF P6805=1 =8 E @ P SUK A2,ENQ+PAR E X P XIF =8 E p P IFT P6805=1 =8 E P SUK A2,ENQ =8 E P XIF =8 E ( P RB(Z) BRM312 FORWARD ABORT SEQUENCE E P RB BRM220 E PBRM320
0x1a6f00…1a7094 (4, 66) Dummy {f00=0x0086, f01=0x0190, f02=»BRM325 NOT FIRST BLOCK E P IFF RCOM=0 F P LDK A1,ESC F 2 P CCR A1,A4 F F P RB(NE) BRM310 ESC NOT FOUND F X P ADK A4,1 F | P LCR A1,A4 GET COMMAND CODE F P SUK A4,1 F P SUK A1,RDBCOM F ( P RF(Z) RDBUF READ MODIFIED RECEIVED F P S
0x1a7094…1a7228 Dummy {f00=0x0086, f01=0x0190, f02=»SSAGE ENDED BY ETB F P CM FBAX G * P CF A15,GRBUF ALLOCATE RECEIVE BUFFER G * P ADK A4,6 G X P LD A6,FDWTIN GET INPUT DWT G j P* G " P* PREPARE FOR CHAINED COMMAND G P* G P IFT RCOM=1 G P LDR* A2,A6 G P LC A2,TEBCDIC,A2 G
0x1a7228…1a73bc Dummy {f00=0x0086, f01=0x0190, f02=»SSAGE IS MENT FOR DCTASK G P LD A2,DWTST,A6 GET STATUS H P RF(N) BRM330 NO REQUEST H B P IFT EM3270=1 =4 H b P LD A2,DWTOR,A6 ORDER =4 H | & P RF(Z) BRM327 ANY MESSAGE ORDER =4 H P XIF =4 H P LDK A2,2 H P CW A2,DWTOR,A6 H " P RF(NE
0x1a73bc…1a7550 Dummy {f00=0x0086, f01=0x0190, f02=»ENGTH H ~ * P ST A3,ECBEL,A8 STORE EFFECTIVE LENGTH I & P CF A15,CTIME STOP REQUEST TIMING I < ( P ST A2,ECBCW,A8 STORE REMAINING TIME I f P EJECT I P* I P* I 0 P* CHECK IF START PRINTER BIT SET IN CCC/WCC I P* I P* I P IFT STAT=1
0x1a7550…1a76e4 Dummy {f00=0x0086, f01=0x0190, f02=»D A2,DWTST,A6 GET STATUS I P ORK A2,/A J P ST A2,DWTST,A6 J 2 PBRM328 EQU * J J P XIF J ^ P IFT EM3270=1 =4 J j P LD A2,DWTOR,A6 ORDER =4 J , P RF(NZ) BRM329 NOT ANY MESSAGE ORDER =4 J & P SUK A4,6 ADJUST BUFFER ADDRESS =4 J ( P CF A5,QRB
0x1a76e4…1a7878 Dummy {f00=0x0086, f01=0x018e, f02=» & P CF A15,DC:MIN MOVE TO USER BUFFER K P RF BRM345 K . PBRM32A EQU * =4 K @ P K X $ P CF A15,TENDIO COMPLETE REQUEST K ` P RF BRM345 K P EJECT K PBRM330 EQU * K P IFT EM3270=1 =4 K P LD A1,DWTST,A6 STATUS =4 K P RF(N) BRM335 NO
0x1a7878…1a7a0c Dummy {f00=0x0086, f01=0x018e, f02=» K l PBRM335 EQU * =4 L P XIF =4 L P SUK A4,6 GET BUFFER BASE L 2 ( P CF A5,QRBUF QUEUE BUFFER FOR DCTASK L T . P CF A15,CKMESS COMPLETE DCTASK READ IF ANY L PBRM340 EQU * L P CF A5,TRACK SEND ACK 0/1 L P ABL BRM L PBRM345 EQU * L
0x1a7a0c…1a7ba0 Dummy {f00=0x0086, f01=0x0190, f02=» P RF BRM410 M P XIF M P IFF STAT=1 M " P RB BRM340 M 6 P XIF M H P EJECT M T P* M b P* M l , P* READ MODIFIED OR READ BUFFER RECEIVED M v P* M P* M P IFF RCOM=0 M $ PRDBUF EQU * READ BUFFER COMMAND M PRDMOD EQU * M "
0x1a7ba0…1a7d34 (4, 67) Dummy {f00=0x0086, f01=0x0190, f02=» SUK A4,2 SDJUST BUFFER ADDRESS M " P LDKL A3,1922 REQUESTED LENGTH N ( " P IM XRB SET READ BUFFER SWITCH N N P CM FDWTUT N t P LDK A1,1 N & P XRS A1,CACK INCREMENT ACK COUNTER N P ABL POL127 N P XIF N P* N P* N P* ENQ HAS BEEN REC
0x1a7d34…1a7ec8 Dummy {f00=0x0086, f01=0x0190, f02=»NSMISSION OF MESSAGE N | P OR A1,XSEL O " P RF(Z) BRM410 IN CONTROL STATE O 0 . P CF A5,TRREP REPEAT LAST CONTROL SEQUENCE O V PBRM410 EQU * O P ABL BRM O P EJECT O P* O P* O P* NAK HAS BEEN RECEIVED O P* O P* O PBRM500
0x1a7ec8…1a805c Dummy {f00=0x0086, f01=0x0190, f02=»Z) BRM410 IN CONTROL STATE O P RF BRM636 P " PBRM510 EQU * P 4 " P LD A6,FDWTUT GET WRITING DWT P H P IFF STAT=0 P n P LD A1,XSTA P 0 P ABL(NZ) POL050 STATUS HAS BEEN TRANSMITTED P P XIF P 0 P LD A1,FBLST GET START POINT FOR LAST BLOCK P &
0x1a805c…1a81f0 Dummy {f00=0x0086, f01=0x0190, f02=»* P P* Q PBRM600 EQU * Q & P CF A5,HPTIM STOP PROCEDURE TIMER Q ( P LD A1,XACK Q R " P RB(Z) BRM410 ACK NOT EXPECTED Q f & P CF A5,READ READ SECOND CHARACTER Q P IFF P6805=1 =8 Q P CWK A2,ACK0+PAR Q P XIF =8 Q P IFT P6805=1 =8
0x1a81f0…1a8384 Dummy {f00=0x0086, f01=0x0190, f02=»KCOUNTER Q ~ P RF(Z) BRM630 ACK,0 EXPECTED R PBRM610 EQU * R 4 P CF A5,TRENQ SEND ENQ R H & P CF A5,SPTIM START PROCEDURE TIMER R f P RB BRM410 R PBRM620 EQU * R P CWK A2,ACK1 R P RF(NE) BRM650 R P* R P* ACK , 1 RECEIVED R P* R
0x1a8384…1a8518 Dummy {f00=0x0086, f01=0x018e, f02=»ETX NOT SENT R P EJECT S P* S " , P* ACK HAS BEEN RECEIVED TO AN ETX BLOCK S , P* S P LDK A1,0 SET RC=0 S f PBRM635 EQU * S P IFF STAT=0 S P LD A2,XSTA S . P RF(NZ) BRM670 STATUS HAS BEEN TRANSMITTED S P XIF S ( P CF A5,CWRITE
0x1a8518…1a86ac Dummy {f00=0x0086, f01=0x0190, f02=» S t P XIF T P RB BRM410 T PBRM640 EQU * T & P LDK A1,1 T : & P XRS A1,CACK INCREMENT ACK COUNTER T L P ABL POL130 T v PBRM650 EQU * T P IFF P6805=1 =8 T P CWK A2,RVI+PAR T P XIF =8 T P IFT P6805=1 =8 T P CWK A2,RVI =8
0x1a86ac…1a8840 Dummy {f00=0x0086, f01=0x0190, f02=»BRM660 ETX HAS BEEN SENT T P LDK A1,2 SET RC=2 U P RB BRM635 U : PBRM660 EQU * U L P LDK A1,0 SET RC=0 U ` P RB BRM635 U z P IFF STAT=0 U P EJECT U P* U P* U " P* STATUS HAS BEEN TRANSMITTED U P* U P* U PBRM670 EQU *
0x1a8840…1a89d4 (4, 68) Dummy {f00=0x0086, f01=0x0190, f02=»CK CLEAR 'ACK EXPECTED' U P LD A1,DWTST,A6 GET STATUS V P ANK A1,4 V B P RB(Z) BRM636 NOT DE V T P LDKL A1,/8000 V p " P ANS A1,DWTST,A6 CLEAR STATUS V P RB BRM636 V P XIF V P EJECT V P* V P* V P* SELECT HAS BEEN RECEIVED V
0x1a89d4…1a8b68 Dummy {f00=0x0086, f01=0x0190, f02=» LD A1,DWTST,A6 GET STATUS V P LDR A3,A1 W " P ANK A1,1 W 4 $ P RF(Z) SEL110 NO PENDING STATUS W F P CF A5,TRRVI SEND RVI W n P XIF W P IFF STAT=1 W P RF SEL110 W P XIF W PSEL100 EQU * W P ABL BRM W PSEL110 EQU * W P IFT S
0x1a8b68…1a8cfc Dummy {f00=0x0086, f01=0x0190, f02=»DEVICE NOT BUSY W P CF A5,TRWACK TRANSMIT WACK X P ABL BRM X < PSEL111 EQU * X L P XIF X ` P LD A1,DCRBUF X l $ P RF(NZ) SEL120 BUFFER AVAILABLE X PSEL115 EQU * X P IFF STAT+NOWACK=2 X P CF A5,TRWACK SEND WACK X P XIF X P RB
0x1a8cfc…1a8e90 Dummy {f00=0x0086, f01=0x0190, f02=»CT X P* Y P* Y P* PREPARE FOR TEXT RECEPTION Y P* Y B P* Y L PPRREC EQU * Y V P IM XSEL SET 'SELECTED' Y j P CM FBAX RESET BUFFER INDEX Y P IFT CODE=1 Y . P LC A2,TEBCDIC,A2 TRANSLATE STA TO EBCDIC Y P XIF Y $ P ST A2,+
0x1a8e90…1a9024 Dummy {f00=0x0086, f01=0x0190, f02=»* GENERAL POLL HAS BEEN RECEIVED Y P* Z ( P* Z 2 PGPOLL EQU * Z < P LD A1,XACK =5 Z P & P RF(Z) POL020 ACK NOT EXPECTED =5 Z h " PPOL010 CF A5,TRENQ SEND ENQ =5 Z * P CF A5,SPTIM START PROCEDURE TIMER =5 Z " P ABL BRM WAIT FOR RESPONSE =5 Z
0x1a9024…1a91b8 Dummy {f00=0x0086, f01=0x0190, f02=»E SENT Z t " P SUK A6,DWTSQ GET DWT ADDRESS [ PPOL050 EQU * [ 4 P CF A5,TRSTA SEND STATUS [ H & P CF A5,SPTIM START PROCEDURE TIMER [ h P IM XACK SET 'ACK EXPECTED' [ P XIF [ P IFF STAT=1 [ P RF POL110 [ P XIF [ PPOL100 EQU * [ P
0x1a91b8…1a934c Dummy {f00=0x0086, f01=0x0190, f02=» [ z P RB POL100 PPOL120 EQU * " P SUK A6,DWTWQ GET DWT ADDRESS . PPOL125 EQU * T $ P LD A8,DWTECB,A6 GET ECB ADDRESS h P RF(NZ) POL126 P CF A15,REMOVW P RB POL115 PPOL126 EQU * P ST A8,FECB SAVE ECB ADDRESS P S
0x1a934c…1a94e0 Dummy {f00=0x0086, f01=0x018e, f02=» MOVE DATA FROM USER BUFFER P XIF ] $ & P LD A4,ECBBA,A8 GET BUFFER ADDRESS ] 0 P LD A3,ECBRL,A8 GET LENGTH ] Z PPOL127 EQU * ] | & P ST A4,FECBBA SAVE BUFFER ADDRESS ] ( P SUK A3,2 SKIP FIRST WORD OF BUFFER ] P ST A3,FECBRL SAVE LENGTH ] P
0x1a94e0…1a9674 (4, 69) Dummy {f00=0x0087, f01=0x0190, f02=» ] r & P CF A5,SPTIM START PROCEDURE TIMER ^ P IM XACK SET 'ACK EXPECTED' ^ 2 P RB POL100 ^ V P EJECT ^ h P* ^ v P* ^ & P* SPECIFIC POLL HAS BEEN RECEIVED ^ P* ^ P* ^ PSPOLL EQU * ^ P IFF STAT+SPECP=0 ^ P LD A1,XACK =5 ^
0x1a9674…1a9808 Dummy {f00=0x0087, f01=0x018e, f02=» IFT STAT=1 ^ P LD A1,DWTST,A6 GET STATUS _ P ANK A1,7 _ 6 " P RB(NZ) POL050 PENDING STATUS _ H P XIF _ n P IFF STAT+SPECP=0 _ z P LD A1,DWTST,A6 _ P RB(N) POL115 NO REQUEST _ P LD A1,DWTOR,A6 GET ORDER _ P SUK A1,6 _ P RB(Z) P
0x1a9808…1a999c Dummy {f00=0x0087, f01=0x0190, f02=» P* ` P* ` 8 P* CHECK IF THERE IS A WRITE REQUEST TO BE COMPLETED ` P* ` T P* A1 CONTAINS RETURN CODE ` ^ P* ` P* ` PCWRITE LD A6,FDWTUT ` $ P RF(Z) CWR900 NO WRITE GOING ON ` P LD A2,DWTST,A6 ` P RF(N) CWR900 NO REQUEST
0x1a999c…1a9b30 Dummy {f00=0x0087, f01=0x0190, f02=»HANGE REQUEST ` z 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 ORDER a ~ P RF CWR150 a & PCWR100 LD A8,FECB GET ECB ADDRESS a P CF A15,CTIME STOP TIMING a P
0x1a9b30…1a9cc4 Dummy {f00=0x0087, f01=0x0190, f02=»VW REMOVE FROM WRITE QUEUE a PCWR200 EQU * b " PCWR900 EQU * b 6 " P CM XACK RESET 'ACK EXPECTED' b J P CM FDWTUT b p P RTN A5 b P EJECT b P* b P* b P* READ ONE TEXT BLOCK b P* b P* ON EXIT A3 CONTAINS : b ( P* 0 : IF COR
0x1a9cc4…1a9e58 Dummy {f00=0x0087, f01=0x0190, f02=» PRDMESS EQU * c $ 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 r $ P RF(NZ) RDM050 LAST INPUT WAS OK c " P LD A1,FBLST COMPUTE NEW INDEX c P SUR A1,A4 c P ST A1,FBAX c PRDM050 EQU * c
0x1a9e58…1a9fec Dummy {f00=0x0087, f01=0x0190, f02=»T LRC c P d P IFT IBMCHR=1 d P LD A1,FBAX d , " P RF(NZ) RDM100 NOT FIRST BLOCK d @ P CF A5,READP d f P RF(NZ) RDM120 PARITY ERROR d z P CWK A2,ESC d P RF(NE) RDM110 d * P CF A5,READP SKIP NEXT TWO CHARACTERS d P CF A5,READP d
0x1a9fec…1aa180 Dummy {f00=0x0087, f01=0x0190, f02=»2,ETX d P RF(E) RDM130 ETX RECEIVED e P CWK A2,ETB e 0 P RF(E) RDM160 ETB RECEIVED e D P CWK A2,ITB e f P RF(E) RDM170 ITB RECEIVED e z P CWK A2,ENQ e 2 P RF(E) RDM120 SKIP IF ENQ EMBEDDED IN MESSAGE e P CWK A2,/FF e $ P RF(E) RDM140
0x1aa180…1aa314 (4, 70) Dummy {f00=0x0087, f01=0x018e, f02=»5 NOT DC1-DC3 e P ADK A1,3 f P RF(N) RDM115 NOT DC1-DC3 f ( P SLL A1,6 f J P LDR A8,A1 f * P CF A5,READP 8-BIT CHAR GET NEXT PART f n P RF(NZ) RDM120 PARITY ERROR f * P SUK A2,/20 ASSEMBLE TO ONE CHARACTER f P ORR A2,A8 f PRDM115 E
0x1aa314…1aa4a8 Dummy {f00=0x0087, f01=0x0190, f02=» f n P LD A1,FBAX g P CWK A1,RBUFL+RBUFL g P RB(NG) RDM100 NOT OVERFLOW g 8 P* g P* BUFFER OVERFLOW g f P* g P RF RDM140 ABORT INPUT g PRDM120 EQU * g & P LDK A3,1 INDICATE INVALID MESSAGE g P SUK A2,/7F g $ P RF(Z) RDM150
0x1aa4a8…1aa63c Dummy {f00=0x0087, f01=0x0190, f02=»SS g r P LD A2,FBAX GET BUFFER INDEX h 2 P ST A2,+2,A1 STORE EFFECTIVE LENGTH IN HEADER h . P IFF CODE=1 h d P CF A5,RDLRC h x P RF(Z) RDM150 LRC WAS OK h P XIF h P IFT CODE=1 h & P CF A5,RDCRC READ CRC AND CHECK IT h P RF(E) RDM150 CRC
0x1aa63c…1aa7d0 Dummy {f00=0x0087, f01=0x0190, f02=»TER h t P CF A5,HALTIN HALT INPUT i P IFT P6805=1 i , " P ORR A7,A1 PARITY ERROR SALCUZ i @ P XIF SALCUZ i f P RTN A5 i | P* i P* ETB RECEIVED i P* i PRDM160 EQU * i P LDR A3,A3 i " P RB(NZ) RDM130 ALREADY INVALID i " P LDK A
0x1aa7d0…1aa964 Dummy {f00=0x0087, f01=0x0190, f02=»A5,RDLRC i " P RB(NZ) RDM120 LRC WAS NOT OK j P XIF j 6 P IFT CODE=1 j B & P CF A5,RDCRC READ CRC AND CHECK IT j V " P RB(NE) RDM120 CRC WAS NOT OK j P XIF j P RB RDM100 j P EJECT j P* j P* TRANSMIT ACK 0 OR 1 j P* j PTRAC
0x1aa964…1aaaf8 Dummy {f00=0x0087, f01=0x0190, f02=»K0 j | P RF TRDLE k P* k P* TRANSMIT WACK k & P* k > PTRWACK LDK A3,WACK LOAD WACK k H P RF TRDLE k l P* k ~ P* TRANSMIT RVI k P* k P IFF STAT=0 k PTRRVI LDK A3,RVI LOAD RVI k P XIF k P* k P* TRANSMIT DLE k
0x1aaaf8…1aac8c Dummy {f00=0x0087, f01=0x018e, f02=» P* l P* TRANSMIT NAK l P* l $ PTRNAK LDK A3,NAK LOAD NAK l . P RF TREN10 l P P* l b P* TRANSMIT EOT l l P* l PTREOT LDK A3,EOT LOAD EOT l P RF TREN10 l P* l P* TRANSMIT ENQ l P* l PTRENQ LDK A3,ENQ LOAD ENQ l
0x1aac8c…1aae20 Dummy {f00=0x0087, f01=0x018e, f02=» l n & P LC A2,RESEND GET FIRST CHARACTER m P CF A5,WRITEP SEND IT m 2 & P LC A2,RESEND+1 GET NEXT CHARACTER m P P CF A5,WRITEP SEND IT m z PTRRE10 LDK A2,/FF m P CF A5,WRIT05 SEND PAD m P LDK A2,/FF m P CF A5,WRIT05 m P LDK A2,0 SAL
0x1aae20…1aafb4 (4, 71) Dummy {f00=0x0087, f01=0x0190, f02=» m & P SST A2,LCUUT PERFORM SST AT ONCE n P IFF LOGG=0 n 2 ( P CF A5,LOGSST LOG TRANSMITTER STATUS n F P XIF n r P RTN A5 n ~ P EJECT n P* n P* n P* TRANSMIT ONE TEXT BLOCK n P* n P* n PTRTEXT EQU * n P CF A5,TRSYNC
0x1aafb4…1ab148 Dummy {f00=0x0087, f01=0x0190, f02=»F(NZ) TRT050 NOT START OF MESSAGE n P o * 2 P LD A1,XRB READ BUFFER COMMAND IN PROCESS ??? o 2 P RF(NZ) TRT050 YES !! o h P o P LD A4,FECBBA o " P LC A3,+2,A4 GET AID CHARACTER o P SUK A3,/30 o $ P RF(NZ) TRT050 NOT TEST REQUEST o P L
0x1ab148…1ab2dc Dummy {f00=0x0087, f01=0x018e, f02=» o P CF A5,WRITE SEND / p P LDK A2,STX p $ P CF A5,WRITE SEND STX p 8 ( P ST A4,FBLST REMEMBER START OF BLOCK p V ( P ADK A4,5 SKIP AID + CURSOR ADDRESS p P LDK A3,5 ADJUST LENGTH p P LDK A2,3 p P ST A2,FBAX p P RF TRT100 p PTR
0x1ab2dc…1ab470 Dummy {f00=0x0087, f01=0x0190, f02=» $ P LD A4,FECBBA GET BUFFER ADDRESS q P AD A4,FBAX ADD BUFFER INDEX q , ( P ST A4,FBLST REMEMBER START OF BLOCK q P ( P ADK A4,2 SKIP FIRST WORD OF BUFFER q | & P LDK A3,0 RESET CHARACTER COUNTER q P LD A1,FBAX GET BUFFER INDEX q " P RF(NZ) TRT100 NOT
0x1ab470…1ab604 Dummy {f00=0x0087, f01=0x0190, f02=» P IFT IBMCHR=1 r P IFF RCOM=1 r " P LDK A2,/27 SEND ENTER AS AID r . P CF A5,WRITEP r T " P LDK A2,/20 AND CURSOR ADDRESS r j P CF A5,WRITEP r P LDK A2,/20 r P CF A5,WRITEP r P XIF r P IFT RCOM=1 r P r & P LD A1,XRB READ
0x1ab604…1ab798 Dummy {f00=0x0087, f01=0x0190, f02=» CF A5,WRITEP SEND AID r P s $ P LD* A3,DWTCUR,A6 CURSOR ADDRESS s & . P CF A5,LINCOL SEND LINE AND COLUMN NUMBER s N P LDK A3,5 SET BLOCK COUNT s P RF TRT100 s PTRT070 EQU * s P XIF s P s P LDK A3,2 s PTRT100 EQU * s P LCR A
0x1ab798…1ab92c Dummy {f00=0x0087, f01=0x0190, f02=» ??? s r P RF(Z) TRT105 NO!! t P t & @ P************************************************************ t . P* t r , P* CHECK IF ATTRIBUTE CHARACTER OR NULL t | P* t 4 P*********************************************** t P t & P CWK A2,X'20' ATTR
0x1ab92c…1abac0 Dummy {f00=0x0087, f01=0x0190, f02=» TO TRT102 t | P LDK A2,/0A u PTRT102 EQU * u & P CWK A2,/7D END OF MESSAGE ? u : " 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 P SUK A2,1 u P XIF u P IFT RCOM=
0x1abac0…1abc54 (4, 72) Dummy {f00=0x0087, f01=0x018e, f02=»1,A4 GET ATTRIBUTE CHARACTER u P ANK A2,X'7F' v $ ( P LDR A1,A2 CONVERT TO IBM ATTRIBUTE v : P ANK A1,1 v f P ANK A2,/1E MASK v x P SLL A2,1 v & P ORR A2,A1 IBM ATTRIBUTE COMPOSED v " P ORK A2,/40 BIT ALWAYS SET ONE v P LC A2,TASCII,A2 v &
0x1abc54…1abde8 Dummy {f00=0x0087, f01=0x0190, f02=» v r P ADK A3,1 w P RF TRT110 w PTRT105 EQU * w , P XIF w @ P EJECT w L P CWK A2,/07 w Z ( P RF(L) TRT110 ILLEGAL CODE : SKIP IT w n P CF A5,WRITEP SEND CHARACTER w PTRT110 EQU * w $ P IM FBAX INCREMENT BUFFER INDEX w & P LD A1,FECBRL
0x1abde8…1abf7c Dummy {f00=0x0087, f01=0x0190, f02=» A3,TBLEN w P RB(L) TRT100 NOT FULL BLOCK x P IFT RCOM=1 x 6 , P LDK A1,SBA CHECK IF SBA AT END OF BLOCK x J P CC A1,-2,A4 x z P RF(E) TRT115 YES x P CC A1,-1,A4 x P RF(NE) TRT116 NO SEND ETB x ( P LCR A2,A4 GET FIRST BYTE AFTER SBA x
0x1abf7c…1ac110 Dummy {f00=0x0087, f01=0x0190, f02=» SBA x j P CF A5,WRITEP SEND IT y P IM FBAX INCREMENT INDEX y * P XIF y J PTRT116 EQU * y V P LDK A2,ETB LOAD ETB y j PTRT120 EQU * y P CF A5,WRITEP SEND IT y P IFF CODE=1 y P LDR A2,A7 GET LRC y P CF A5,WRITEP SEND LRC y P XIF
0x1ac110…1ac2a4 Dummy {f00=0x0087, f01=0x0190, f02=» P ECR A2,A8 z P ANK A2,/FF z " P CF A5,WRIT05 SEND CRC BYTE 2 z * P XIF z P 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 P RB TRT120 SEND ETX AND LRC z P
0x1ac2a4…1ac438 Dummy {f00=0x0087, f01=0x0190, f02=» INDICATE 'STATUS SENT' z P ST A6,FDWTUT SAVE A6 { P CF A5,TRSYNC START OUTPUT { > P LDK A2,SOH { ` P CF A5,WRITE SEND SOH { t P LDK A7,0 REST LRC { P LDK A2,'%' { P CF A5,WRITEP SEND '%' { P LDK A2,'R' { P CF A5,WRITEP SEND 'R'
0x1ac438…1ac5cc Dummy {f00=0x0087, f01=0x0190, f02=»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 P CF A5,WRITEP SEND S/S 0 | P LDK A2,NOIR PRELOAD S/S 1 | P LD A1,DWTST,A6 GET STATUS | P ANK A1,5 |
0x1ac5cc…1ac760 Dummy {f00=0x0087, f01=0x0190, f02=»TEP SEND S/S 1 | P RB TRT130 SEND ETX AND LRC } P XIF } : P EJECT } F P* } T P* } ^ P* TRANSMIT SYNC SEQUENCE } h P* } P* } PTRSYNC EQU * } P LD A2,PFPOST } $ P RF(NZ) TRS050 WAIT FOR POWER UP } P LDK A2,0 SALCUZ } * P
0x1ac760…1ac8f4 (4, 73) Dummy {f00=0x0088, f01=0x0190, f02=»ITTER } t P XIF SALCUZ ~ P IFT P6805=1 SALCUZ ~ $ P IFT CODE=1 SALCUZ ~ @ P LDK A2,0 SALCUZ ~ , P CIO A2,1,LCUUT START TRANSMITTER SALCUZ ~ v P RF(A) TRS010 SALCUZ ~ P SST A1,LCUUT SALCUZ ~ P RF(A) TRS005 SALCUZ ~ P ABL BRM
0x1ac8f4…1aca88 Dummy {f00=0x0088, f01=0x0190, f02=»SYNC CHARACTER SALCUZ ~ x P XIF SALCUZ P IFT P6805=1 SALCUZ 4 P IFT CODE=0 SALCUZ P P LDK A2,/0C SALCUZ l P CIO A2,1,LCUUT SALCUZ P RF(A) TRS010 SALCUZ P SST A1,LCUUT SALCUZ P RF(A) TRS005 SALCUZ P ABL B
0x1aca88…1acc1c Dummy {f00=0x0088, f01=0x0190, f02=»RACTER SALCUZ p P XIF SALCUZ PTRS050 EQU * , * P CF A5,READ WAIT FOR OUTPUT INTERRUPT @ P LDK A3,4 4 SYNS n PTRS100 LDK A2,SYN P CF A5,WRITE SEND SYN P SUK A3,1 P RB(NZ) TRS100 P RTN A5 P EJECT P*
0x1acc1c…1acdb0 Dummy {f00=0x0088, f01=0x0190, f02=»SAVE8 SAVE A1-A8 P XIF P $ P IFF CPU852=1 , P MSR 8,A15 SAVE A1-A8 =1 B P XIF b * P CF A15,LDREG RESTORE DC REGS A3 - A8 n P INR A2,0,LCUIN READ CHAR , P RF(NA) IHIN20 NOT ACCEPTED,CHECK STATUS P IFF LOGG=0 ( P CF A5
0x1acdb0…1acf44 Dummy {f00=0x0088, f01=0x0190, f02=» P RF(E) READ " PIHLCI2 XRR A7,A2 CALCULATE LRC P XIF > P IFT CODE=1 J P C2 SYNSW ^ 2 P RF(NZ) IHLCI1 DO NOT SKIP SYNCS IN BCC FRAME p P CWK A2,SYNEBC P RF(E) READ SKIP EBCDIC SYN PIHLCI1 EQU * P CF A5,CRCCAL CALCUL
0x1acf44…1ad0d8 Dummy {f00=0x0088, f01=0x0190, f02=»ST PERFORM SST P ABL BRM P XIF SALCUZ & P IFT P6805=1 SALCUZ < $ PIHIN20 RF SST PERFORM SST SALCUZ X P XIF SALCUZ P EJECT P* P* P* TRANSMITTER INTERRUPT P* P* PIH2502 EQU * P ST P,
0x1ad0d8…1ad26c Dummy {f00=0x0088, f01=0x0190, f02=» x P XIF * P CF A15,LDREG RESTORE DC REGS A3 - A8 P RB IHIN10 B P EJECT T P* b P* l & P* SST INSTRUCTION AND STATUS CHECK v P* ( P* LCU STATUS : BIT 10=CARRIER OFF . P* BIT 13=PARITY ERROR (6805 ONLY) SALCUZ , P
0x1ad26c…1ad400 Dummy {f00=0x0088, f01=0x0190, f02=»6805=1 SALCUZ 2 P RF(NA) SST200 ALREADY INACTIVE SALCUZ SALCUZ P XIF SALCUZ L P LDR A2,A1 b P IFF LOGG=0 t & P CF A5,LOGSST LOG SST INFORMATION P XIF P IFT P6805=0 SALCUZ P ANK A2,2 P RF(Z) SST100 P XIF
0x1ad400…1ad594 (4, 74) Dummy {f00=0x0088, f01=0x0190, f02=»T050 THROUGH PUT SALCUZ & P LDK A1,1 SET PARITY ERROR SALCUZ P RF SSTRET SALCUZ J P XIF SALCUZ d PSST050 EQU * SALCUZ z P CM XSTA TROUHHPUT ERROR P LDKL A5,STB P ABL BRM010 PSST100 EQU * P LDR A2,A1 P ANK
0x1ad594…1ad728 Dummy {f00=0x0088, f01=0x0190, f02=» P ABL TDISP DISPATCH PSST150 EQU * $ P CF A15,LDREG LOAD REGISTERS 8 PSST200 EQU * P ST A1,DCSTCU p P IFT P6805=0 SALCUZ * P CF A15,CKMESS CHECK IF STATUS CHANGE P RTN A5 P XIF SALCUZ P IFT P6805=1 SALC
0x1ad728…1ad8bc Dummy {f00=0x0088, f01=0x0190, f02=»RESTART SALCUZ P DATA 2 WAIT TIME SALCUZ P RF READ SALCUZ 6 P* N PSST200 LDK A1,0 SALCUZ X PSSTRET ADK A5,4 SALCUZ x P LDR A1,A1 SET CR SALCUZ P ABR* A5 RETURN SALCUZ P XIF SALCUZ P* P* P* HALT I
0x1ad8bc…1ada50 Dummy {f00=0x0088, f01=0x0190, f02=»INSTRUCTION AND STATUS CHECK | P XIF SALCUZ $ P IFT P6805=1 SALCUZ : * P RF READ WAIT FOR SST INTERRUPT SALCUZ V P XIF SALCUZ P EJECT P* P* , P* WRITE FROM OR READ ONE CHARACTER TO A2 P* P* PWRITE EQ
0x1ada50…1adbe4 Dummy {f00=0x0088, f01=0x0190, f02=»IC,A2 TRANSLATE TO EBCDIC P XIF " PWRIT05 EQU * . " P OTR A2,0,LCUUT SEND CHARACTER B P RF(A) WRIT10 h P RF READ THROUGHPUT ERROR ~ P IFF CODE=1 $ PWRIT10 XRR A7,A2 ACCUMULATE BCC P XIF P IFT CODE=1 & PWRIT10 CF A5
0x1adbe4…1add78 Dummy {f00=0x0088, f01=0x018e, f02=»5,STREG P ABL TDISP P EJECT " P* 0 P* : P*** WRITEP D P* V P* WRITE A2 WITH PARITY ` P* P* P IFT CODE+P6805=0 SALCUZ PWRITEP ANK A2,/FF P ECR A1,A2 P ORK A2,/80 PWRI100 SLL A1,1
0x1add78…1adf0c Dummy {f00=0x0088, f01=0x018e, f02=» PWRITEP RB WRITE P XIF P* ( P* 2 P* < P*** READP F P* X . P* READ CHARACTER TO A2 AND CHECK PARITY b P* P* PREADP CF A5,READ P IFT CODE+P6805=0 SALCUZ P ECR A1,A2 PRE100 SLL A1,1
0x1adf0c…1ae0a0 Dummy {f00=0x0088, f01=0x0190, f02=» P IFF CODE+P6805=0 SALCUZ P LDK A1,/80 & P XIF : P ADK A5,4 F P ANK A1,/80 X P XRK A1,/80 l P ABR* A5 P* P* P EJECT P* < P* FIND DWT CONTAINING SUBTERMINAL ADDRESS AS GIVEN IN A2 P* $ P*
0x1ae0a0…1ae234 (4, 75) Dummy {f00=0x0088, f01=0x0190, f02=» B P* NOTE: FOR SIEMENS MSV1 - SEPARATE SELECT AND POLL ADDRESSES * P* ENTRY: FINTER - CHECK SELECT ADDRESS J , P* FINTEP - CHECK SPECIFIC POLL ADDRESS x P* . PRBYTE DATA 0 IF 1 COMPARE WITH RIGTH BYTE P* P* PFINTEP EQU *
0x1ae234…1ae3c8 Dummy {f00=0x0088, f01=0x0190, f02=»AB GET ADDRESS TO DC:TAB * P AD* A4,DCTAB ADDRESS TO END OF DC:TAB PFINT10 SUK A4,2 N P LDK A3,0 DEFAULT VALUE f P CW A4,DCTAB END OF TABLE ( P RF(E) FINT20 SUBTERMINAL NOT FOUND P LDR* A3,A4 LOAD DWT ADDRESS P IFT MSV1=1
0x1ae3c8…1ae55c Dummy {f00=0x0088, f01=0x0190, f02=»MPARE TO SUBTERMINAL ADDRESS P XIF $ & P RB(NE) FINT10 TAKE NEXT TERMINAL 0 PFINT20 CM RBYTE Z P ANKL A3,/FFFE r P RTN A5 P EJECT P* P* P* POWER ON FUNCTIONS P* P* PDC25ON EQU * P IFT CPU85
0x1ae55c…1ae6f0 Dummy {f00=0x0088, f01=0x0190, f02=»TAT=1 P LDK A5,4 SET DEVICE END P LD A1,DCTAB . . P AD* A1,DCTAB GET ADDRESS TO END OF TABLE B PDRDC05 SUK A1,2 t P CW A1,DCTAB P RF(E) DRDC06 END OF TABLE P LDR* A6,A1 GET DWT ADDRESS 0 P ORS A5,DWTST,A6 STORE DEVICE END
0x1ae6f0…1ae884 Dummy {f00=0x0088, f01=0x018e, f02=» A2,DCONOF P CF A15,CKMESS ( P LD A2,DCTPGP GET POLL TIMER POINTER ( " P RF(NZ) DRDC20 ALREADY STARTED T * PDRDC10 CF A15,SPOTIM START POLL TIMER z PDRDC20 ABL BRM P EJECT P* P* POLL TIME OUT P* ( PPTOUT LDKL A5,ST
0x1ae884…1aea18 Dummy {f00=0x0088, f01=0x0190, f02=» $ P CF A15,SPOTIM START POLL TIMER P ABL TDISP , P* > 4 P* RESTART POLL TIMER WHEN POLL HAS BEEN RECEIVED H P* $ PCPTIM CM DCONOF INDICATE POLLING P LDKL A2,-TIMPOL P ST* A2,DCTPGP RESTART TIMER * P CF A15,CKMESS CHECK IF ST
0x1aea18…1aebac Dummy {f00=0x0088, f01=0x0190, f02=»MPOL & P ST A4,DCTPGP STORE TIMER POINTER P ADKL A15,4 6 P ABR* A15 J P EJECT P* j P* START PROCEDURE TIMER t P* PSPTIM EQU * $ P LDR A1,A6 LOAD DWT AS PARAMETER P CF A15,SETIME P DATA PRTOUT,TIMPRO
0x1aebac…1aed40 Dummy {f00=0x0088, f01=0x0190, f02=» A6,A1 RELOAD A6 P LDKL A5,STB LOAD STACK BASE , P CF A5,HALTIN HALT INPUT IF OPEN SALCUZ < P LD A1,XACK l " P RF(Z) PRT10 ACK NOT EXPECTED P CF A5,TRENQ SEND ENQ & P CF A5,SPTIM START PROCEDURE TIMER PPRT10 ABL BRM P EJE
0x1aed40…1aeed4 (4, 76) Dummy {f00=0x0088, f01=0x018e, f02=» CM* DCTPP STOP TIMER P CM DCTPP PHPT10 RTN A5 0 P EJECT D P IFT CODE=1 R P* f P* p P* CALCULATION OF CRC z P* P* A2 = CHARACTER P* A7 = ACCUMULATED CRC P* P* PCRCCAL EQU * P ST A1,CRC
0x1aeed4…1af068 Dummy {f00=0x0088, f01=0x018e, f02=» P SRL A2,1 P ANK A3,1 P RF(Z) CRC110 ( P XRKL A7,/A001 > PCRC110 SUK A1,1 T P RB(NZ) CRC100 l P LD A1,CRCSAV P LD A2,CRCSAV+2 P LD A3,CRCSAV+4 P RTN A5 PCRCSAV RES 3 P EJECT P* P*
0x1af068…1af1fc Dummy {f00=0x0088, f01=0x0190, f02=» n $ P IM SYNSW DO NOT SKIP SYNCS NOW P CF A5,READ READ BYTE 1 0 P LD A8,CRCSAV+2 SAVE IT P P CF A5,READ READ BYTE 2 p ( 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,
0x1af1fc…1af390 Dummy {f00=0x0088, f01=0x0190, f02=»D LRC CHARACTER ~ " P* CR=0 IF LRC OK P* > PRDLRC IM SYNSW H P CF A5,READP ^ P ADK A5,4 r P LDR A1,A1 P RF(NZ) LRCEND P ANK A7,/7F PLRCEND EQU * P CM SYNSW P ABR* A5 P P XIF
0x1af390…1af524 Dummy {f00=0x0088, f01=0x0190, f02=» LINE ADDRESS P DATA /8000 STATUS P DATA 0 ECB ADDRESS 0 P DATA 0 ORDER L * P DATA DC15DC POINTER TO ADDRESS BLOCK b P DATA 0 TTAB ADDRESS $ P DATA 0 WAIT/ACTIVATE INDICATOR P DATA 0 TASK QUEUE P* P IFT MMUPAG=1
0x1af524…1af6b8 Dummy {f00=0x0088, f01=0x0190, f02=»ITE QUEUE OR BUFFER QUEUE . P DATA 0 STATUS QUEUE (NOT USED BY DC-TASK) " " P DATA 0 RECEIVE MESSAGE QUEUE T , P DATA 0 SIMULATED DEVICE BUFFER ADDRESS z P DATA 0 CURSOR ADDRESS " P DATA 0 REQUEST TIMEOUT VALUE P* P IFT MMUPAG=1
0x1af6b8…1af84c Dummy {f00=0x0088, f01=0x0190, f02=»POOL | P* PRLINK EQU RBUFL+RBUFL+8 P* 6 PDCRBUF EQU * @ P DATA *+2 FREE BUFFER ANCHOR T P IFF RBUFNR=2 x P DATA *+RLINK P RES RBUFL+3 P IFF RBUFNR=3 P DATA *+RLINK P RES RBUFL+3 P IFF RBUFNR=4
0x1af84c…1af9e0 Dummy {f00=0x0088, f01=0x018e, f02=»BUFL+3 P P IFF MMUPAG=0 & PMMUBUF RES TBUFL+1 MMU WORK BUFFER , P XIF V P EJECT b P* p P* z P* INTERRUPT LOGGING ROUTINE P* P* P IFF LOGG=0 PLOGSST ST A2,SAVE2 P ORKL A2,/F000 P RF LOG1
0x1af9e0…1afb74 (4, 77) Dummy {f00=0x0089, f01=0x0190, f02=» PLOG10 ST A3,SAVE3 P LD A3,LOGPNT " P STR A2,A3 8 P ADK A3,2 J P CWK A3,LOGEND P RF(L) LOGEXI r P LDKL A3,LOGSTA PLOGEXI ST A3,LOGPNT P LD A2,SAVE2 P LD A3,SAVE3 PLOGE10 RTN A5 P EJECT P
0x1afb74…1afd08 Dummy {f00=0x0089, f01=0x0190, f02=» P XIF P* P* P* ( P IFT RCOM=1 2 P EJECT F < P******************************************************* T P* P* L I N C O L P* : P* CONVERT CURSOR ADDRESS TO LINE AND COLUMN NUMBER P* >
0x1afd08…1afe9c Dummy {f00=0x0089, f01=0x0190, f02=»RL A2,6 P ANK A2,X'3F' & P LC A2,LICO:T,A2 ASCII LINE NUMBER & " P CF A5,WRITEP SEND LINE NUMBER P P v 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 P RTN A5 RETURN
0x1afe9c…1b0030 Dummy {f00=0x0089, f01=0x0190, f02=»ATA /4849,/5B2E,/3C28,/2B21 /08-/0F * P DATA /264A,/4B4C,/4D4E,/4F50 /10-/17 , * P DATA /5152,/5D24,/2A29,/3B5E /18-/1F Z * P DATA /2D2F,/5354,/5556,/5758 /20-/27 * P DATA /595A,/7C2C,/255F,/3E3F /28-/2F ( P DATA /3031,/3233,/3435,/3637 /30-37
0x1b0030…1b01c4 Dummy {f00=0x0089, 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 @ 95A,/7C2C,/255F,/3E3F /28-/2F ( P DATA /3031,/3233,/3435,/3637 /30-37
0x1b01c4…1b0358 Dummy {f00=0x0089, f01=0x2008, f02=» H P X ` h p x
0x1b0358…1b04ec Dummy {f00=0x0089, f01=0x018e, f02=» P* P* INDICATE WRONG N(R) P* , PUPD205 EQU * 6 P LDKL A1,BIT12 J P ORS A1,DWTST,A7 ` P CF A5,STORCO x P RTN A5 P* * P* HERE NO TRANSMISSION HAS BEEN DONE P* CHECK VALID N(R) P* PUPD210 EQU *
0x1b04ec…1b0680 Dummy {f00=0x0089, f01=0x0190, f02=» P RTN A5 P* P EJECT " P* 0 0 P* BEFORE RETURN,RESTORE COUNTERS IN POLLIST : P* n PSTORCO EQU * x P LC A2,DWTOR,A6 P ANK A2,/FF P ADR A2,A6 P ADK A2,PLIST $ P SUK A2,2 POINTER TO TC'S STATUS P
0x1b0680…1b1320 (5, 0) DirGranule ((5, 0)) {
0x1b0680…1b1320 DirEnt {nam=»TOSSWO«, typ=»RK«, f00=0x0000, f01=0x0000, f02=0x1138, f03=0x0000}
0x1b0680…1b1320 DirEnt {nam=»/OBJCT«, typ=»OB«, f00=0x019a, f01=0x0196, f02=0x1140, f03=0x0008}
0x1b0680…1b1320 DirEnt {nam=»ADDMOD«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1240, f03=0x0000}
0x1b0680…1b1320 DirEnt {nam=»CTABX «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1250, f03=0x0000}
0x1b0680…1b1320 DirEnt {nam=»DFTAB «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1258, f03=0x0000}
0x1b0680…1b1320 DirEnt {nam=»DIVMOD«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1260, f03=0x0000}
0x1b0680…1b1320 DirEnt {nam=»DMBUF «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1270, f03=0x0000}
0x1b0680…1b1320 DirEnt {nam=»DMFDB «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1298, f03=0x0000}
0x1b0680…1b1320 DirEnt {nam=»DMINIT«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x12a0, f03=0x0000}
0x1b0680…1b1320 DirEnt {nam=»DMOPCL«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x12a8, f03=0x0000}
0x1b0680…1b1320 DirEnt {nam=»DMSUBR«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x12f8, f03=0x0000}
0x1b0680…1b1320 DirEnt {nam=»DMSUBX«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1348, f03=0x0000}
0x1b0680…1b1320 DirEnt {nam=»DMTASK«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1378, f03=0x0000}
0x1b0680…1b1320 DirEnt {nam=»DRCD01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x13d8, f03=0x0000}
0x1b0680…1b1320 DirEnt {nam=»DRDC07«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1430, f03=0x0000}
0x1b0680…1b1320 DirEnt {nam=»DRDC13«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x14b8, f03=0x0000}
0x1b0680…1b1320 DirEnt {nam=»DRDC15«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1518, f03=0x0000}
0x1b0680…1b1320 DirEnt {nam=»DRDI01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x15d0, f03=0x0000}
0x1b0680…1b1320 DirEnt {nam=»DRDN01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x15f0, f03=0x0000}
0x1b0680…1b1320 DirEnt {nam=»DRDU01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1608, f03=0x0000}
0x1b0680…1b1320 DirEnt {nam=»DRDY01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x16a0, f03=0x0000}
0x1b0680…1b1320 DirEnt {nam=»DRFD01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1700, f03=0x0000}
0x1b0680…1b1320 DirEnt {nam=»DRGP01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1788, f03=0x0000}
0x1b0680…1b1320 DirEnt {nam=»DRGP02«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x17c0, f03=0x0000}
0x1b0680…1b1320 DirEnt {nam=»DRIC01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1810, f03=0x0000}
0x1b0680…1b1320 DirEnt {nam=»DRKB01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1838, f03=0x0000}
0x1b0680…1b1320 DirEnt {nam=»DRKB03«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1880, f03=0x0000}
0x1b0680…1b1320 DirEnt {nam=»DRLP01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x18c0, f03=0x0000}
0x1b0680…1b1320 DirEnt {nam=»DRLT01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x18e0, f03=0x0000}
0x1b0680…1b1320 DirEnt {nam=»DRMS02«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1930, f03=0x0000}
0x1b0680…1b1320 DirEnt {nam=»DRMT01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1968, f03=0x0000}
0x1b0680…1b1320 DirEnt {nam=»DRRT01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x19b0, f03=0x0000}
0x1b0680…1b1320 DirEnt {nam=»DRSOP1«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1a58, f03=0x0000}
0x1b0680…1b1320 DirEnt {nam=»DRSW01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1a80, f03=0x0000}
0x1b0680…1b1320 DirEnt {nam=»DRTC01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1aa0, f03=0x0000}
0x1b0680…1b1320 DirEnt {nam=»DRTP02«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1ae8, f03=0x0000}
0x1b0680…1b1320 DirEnt {nam=»DRTP03«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1b30, f03=0x0000}
0x1b0680…1b1320 DirEnt {nam=»DRTW01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1b90, f03=0x0000}
0x1b0680…1b1320 DirEnt {nam=»DSKSUB«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1bc0, f03=0x0000}
0x1b0680…1b1320 DirEnt {nam=»DSUMOD«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1be8, f03=0x0000}
0x1b0680…1b1320 DirEnt {nam=»DTTP03«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1bf8, f03=0x0000}
0x1b0680…1b1320 DirEnt {nam=»DVTDI «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1c10, f03=0x0000}
0x1b0680…1b1320 DirEnt {nam=»DVTDN «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1c18, f03=0x0000}
0x1b0680…1b1320 DirEnt {nam=»DVTDY «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1c20, f03=0x0000}
0x1b0680…1b1320 DirEnt {nam=»DVTG1 «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1c28, f03=0x0000}
0x1b0680…1b1320 DirEnt {nam=»DVTGP «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1c30, f03=0x0000}
0x1b0680…1b1320 DirEnt {nam=»DVTKB «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1c38, f03=0x0000}
0x1b0680…1b1320 DirEnt {nam=»DVTT1 «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1c40, f03=0x0000}
0x1b0680…1b1320 DirEnt {nam=»DVTTP «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1c48, f03=0x0000}
0x1b0680…1b1320 DirEnt {nam=»DW0701«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1c50, f03=0x0000}
0x1b0680…1b1320 DirEnt {nam=»DW1301«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1c58, f03=0x0000}
0x1b0680…1b1320 DirEnt {nam=»DW1501«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1c60, f03=0x0000}
0x1b0680…1b1320 DirEnt {nam=»DWII01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1c68, f03=0x0000}
0x1b0680…1b1320 DirEnt {nam=»DWIO01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1c70, f03=0x0000}
0x1b0680…1b1320 DirEnt {nam=»EBCDIC«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1c78, f03=0x0000}
0x1b0680…1b1320 DirEnt {nam=»FMTASK«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1c88, f03=0x0000}
0x1b0680…1b1320 DirEnt {nam=»LDTASK«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1d00, f03=0x0000}
0x1b0680…1b1320 DirEnt {nam=»LKMAL «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1d30, f03=0x0000}
0x1b0680…1b1320 DirEnt {nam=»LRPINT«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1d40, f03=0x0000}
0x1b0680…1b1320 DirEnt {nam=»MONTAB«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1d68, f03=0x0000}
0x1b0680…1b1320 DirEnt {nam=»MONTIM«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1d70, f03=0x0000}
0x1b0680…1b1320 DirEnt {nam=»MPYMOD«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1d88, f03=0x0000}
0x1b0680…1b1320 DirEnt {nam=»MSUBS «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1d98, f03=0x0000}
0x1b0680…1b1320 DirEnt {nam=»PFTAB «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1dd0, f03=0x0000}
0x1b0680…1b1320 DirEnt {nam=»SCLASS«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1dd8, f03=0x0000}
0x1b0680…1b1320 DirEnt {nam=»SYSLDA«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1de0, f03=0x0000}
0x1b0680…1b1320 DirEnt {nam=»SYSLDM«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1f38, f03=0x0000}
0x1b0680…1b1320 DirEnt {nam=»SYSLOD«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2030, f03=0x0000}
0x1b0680…1b1320 DirEnt {nam=»SYSTAB«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2100, f03=0x0000}
0x1b0680…1b1320 DirEnt {nam=»TABORT«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2118, f03=0x0000}
0x1b0680…1b1320 DirEnt {nam=»TCLASS«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2128, f03=0x0000}
0x1b0680…1b1320 DirEnt {nam=»TDISP «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2130, f03=0x0000}
0x1b0680…1b1320 DirEnt {nam=»TIMER «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2150, f03=0x0000}
0x1b0680…1b1320 DirEnt {nam=»TIODM «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2168, f03=0x0000}
0x1b0680…1b1320 DirEnt {nam=»TIODMX«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x21a8, f03=0x0000}
0x1b0680…1b1320 DirEnt {nam=»TLDSEG«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x21b0, f03=0x0000}
0x1b0680…1b1320 DirEnt {nam=»TMMLKM«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x21c8, f03=0x0000}
0x1b0680…1b1320 DirEnt {nam=»TOSSFM«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x21e0, f03=0x0000}
0x1b0680…1b1320 DirEnt {nam=»TOSSIO«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2208, f03=0x0000}
0x1b0680…1b1320 DirEnt {nam=»TPROC «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2290, f03=0x0000}
0x1b0680…1b1320 DirEnt {nam=»TSWBLK«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x22a8, f03=0x0000}
0x1b0680…1b1320 DirEnt {nam=»TTMJOB«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x22b8, f03=0x0000}
0x1b0680…1b1320 DirEnt {nam=»DRDC17«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x22c8, f03=0x0000}
0x1b0680…1b1320 DirEnt {nam=»DRDC81«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2390, f03=0x0000}
0x1b0680…1b1320 DirEnt {nam=»DRDC82«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2490, f03=0x0000}
0x1b0680…1b1320 DirEnt {nam=»ST8000«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2568, f03=0x0000}
0x1b0680…1b1320 }
0x1b1320…1b14b4 (5, 1) Opaque[0x194]
0x1b14b4…1b1648 # DirEnt {nam=»/OBJCT«, typ=»OB«, f00=0x019a, f01=0x0196, f02=0x1140, f03=0x0008}
0x1b14b4…1b1648 IdxSect {
0x1b14b4…1b1648 f00 = 0x008a // 0x1b14b4 @0x0
0x1b14b4…1b1648 f01 = 0x0040 // 0x1b14b6 @0x2
0x1b14b4…1b1648 gno = [ // 0x1b14b8 @0x4
0x1b14b4…1b1648 [0x00]: C0x008a.0x0.0
0x1b14b4…1b1648 [0x01]: C0x008a.0x1.0
0x1b14b4…1b1648 [0x02]: C0x008a.0x2.0
0x1b14b4…1b1648 [0x03]: C0x008a.0x3.0
0x1b14b4…1b1648 [0x04]: C0x008b.0x0.0
0x1b14b4…1b1648 [0x05]: C0x008b.0x1.0
0x1b14b4…1b1648 [0x06]: C0x008b.0x2.0
0x1b14b4…1b1648 [0x07]: C0x008b.0x3.0
0x1b14b4…1b1648 [0x08]: C0x008c.0x0.0
0x1b14b4…1b1648 [0x09]: C0x008c.0x1.0
0x1b14b4…1b1648 [0x0a]: C0x008c.0x2.0
0x1b14b4…1b1648 [0x0b]: C0x008c.0x3.0
0x1b14b4…1b1648 [0x0c]: C0x008d.0x0.0
0x1b14b4…1b1648 [0x0d]: C0x008d.0x1.0
0x1b14b4…1b1648 [0x0e]: C0x008d.0x2.0
0x1b14b4…1b1648 [0x0f]: C0x008d.0x3.0
0x1b14b4…1b1648 [0x10]: C0x008e.0x0.0
0x1b14b4…1b1648 [0x11]: C0x008e.0x1.0
0x1b14b4…1b1648 [0x12]: C0x008e.0x2.0
0x1b14b4…1b1648 [0x13]: C0x008e.0x3.0
0x1b14b4…1b1648 [0x14]: C0x008f.0x0.0
0x1b14b4…1b1648 [0x15]: C0x008f.0x1.0
0x1b14b4…1b1648 [0x16]: C0x008f.0x2.0
0x1b14b4…1b1648 [0x17]: C0x008f.0x3.0
0x1b14b4…1b1648 [0x18]: C0x0090.0x0.0
0x1b14b4…1b1648 [0x19]: C0x0090.0x1.0
0x1b14b4…1b1648 [0x1a]: C0x0090.0x2.0
0x1b14b4…1b1648 [0x1b]: C0x0090.0x3.0
0x1b14b4…1b1648 [0x1c]: C0x0091.0x0.0
0x1b14b4…1b1648 [0x1d]: C0x0091.0x1.0
0x1b14b4…1b1648 [0x1e]: C0x0091.0x2.0
0x1b14b4…1b1648 [0x1f]: C0x0091.0x3.0
0x1b14b4…1b1648 ]
0x1b14b4…1b1648 }
0x1b1648…1b17dc Dummy {f00=0x008a, f01=0x0190, f02=» > @ IDENT DEBUG REL 10.0 80-03-14 870105041000 dBUG F |BUG T , ( A @ ~ A d , ( ! A ~ @ A A @ A , ( A A @ A A @ A a A
0x1b17dc…1b1970 Dummy {f00=0x008a, f01=0x0190, f02=» , ( $ ( , 0 4 , ( 8 < P , ( - , ( M , ( m 2
0x1b1970…1b1b04 Dummy {f00=0x008a, f01=0x0190, f02=» _ = p , ( :A , >a @ t , ( " A P UW B @ , ( - @ = / M Q p , ( M R S T Y G P H L , ( m V I U _v A , (
0x1b1b04…1b1c98 Dummy {f00=0x008a, f01=0x0190, f02=» . , + - ; : , ( X " H W X " H H 0 , ( - A A A _T @ P A 1+ ` , ( !T M X A _ @ A @ A _ , ( ! m A UP z z " , ( Q! @ @ T z
0x1b1c98…1b1e2c Dummy {f00=0x008a, f01=0x0190, f02=» _, W , ( ! W P @ & 0 , ( - T A P P P , ( M _b _J A , ( m T @ W @ , ( % T @ W @ @ >a
0x1b1e2c…1b1fc0 Dummy {f00=0x008a, f01=0x0190, f02=» t 0 p , ( W A W @ A , ( - P 3P z @ , ( M C @ P @ @ P @ Q p , ( m A @ A " T @ W @ , ( ( A A P , ( B$
0x1b1fc0…1b2154 (5, 2) Dummy {f00=0x008a, f01=0x0190, f02=» @ A 9 Y , ( $ - >a Y T c A ~ A " 0 , ( P M z A <a P T A ` , ( @ m ) " A H , ( U A @ z @ @ , ( T A A ~
0x1b2154…1b22e8 Dummy {f00=0x008a, f01=0x0190, f02=» RN ME MN W R , ( - ( T ( W P T $ ; V , ( M ; W &~ P &`P 6 P @ t P , ( m $ P $ T P #~ , ( > V . >A P Y X W ^ , ( ? ? @ t ' P Y Y @ t
0x1b22e8…1b247c Dummy {f00=0x008a, f01=0x0190, f02=» ^ 9 p , ( - V >! D A A > , ( M > > > > > > > ^ @ , ( m _ ^ _ ? ? ? ? ? A ^ p , ( @ t ? ? > > > , ( > > > > n > , ( P
0x1b247c…1b2610 Dummy {f00=0x008a, f01=0x0190, f02=» - Q (P _ # # H A " , ( M A 0R 9U AR F 0 , ( m Q 0:D A _* A " ` , ( A A T A , ( A " R _U . , ( " A
0x1b2610…1b27a4 Dummy {f00=0x008a, f01=0x018e, f02=»W ! A A P _ n @ , ( M _ , ( m I T " T A P I T ! A P , ( UU A r A R A V A Z A ^ A b A f j , ( @T A A @ A | @ > , ( !S n @ _ p I
0x1b27a4…1b2938 Dummy {f00=0x008a, f01=0x0190, f02=» p H D ! ! - 1 = A M Q ] a F i . H D ! R . . P W % . ) - 1 T H D ! 3 : 7 = z A E I ~ M Q U Y ] a e i x m q H D ! _ u y } $
0x1b2938…1b2acc Dummy {f00=0x008a, f01=0x0190, f02=» W W W ( W W PP H D ! ' ( - 3T 7 =P A , G . K S W ] c . m q u T @ H D ! W T W 6 H D !{ W ( W ' + / 3 =P
0x1b2acc…1b2c60 Dummy {f00=0x008a, f01=0x0190, f02=» g m V T P@ PB 6 p H D ! 6 T +R, 1T 5W ?T GV WWp _P cP gP oP TH P@ , H D ! V P W P P W P . T T P -V x H D ! 1 V 9 L = T A V I T ! F % F - F /Q 3P C F K 6 S [R$
0x1b2c60…1b2df4 (5, 3) Dummy {f00=0x008a, f01=0x407a, f02=» 'W +W 1 ~ 5W H D ! ; x ?PL C oT {T P T$ R> P6 T. P W #T 1P 9V B d@ v
0x1b2df4…1b2f88 Dummy {f00=0x008a, f01=0x0190, f02=» > @ IDENT DEBUGM REL 10.0 80-03-14 870105041000 dBUG F |BUG T SCTLAC d , ( A U A @ , A v , ( A @ ~ A A ~ @ , ( ? A A @ A A @ , (
0x1b2f88…1b311c Dummy {f00=0x008a, f01=0x0190, f02=» x , ( , ( $ ( , 0 4 H , ( ! 8 < x , ( A , ( a , (
0x1b311c…1b32b0 Dummy {f00=0x008a, f01=0x0190, f02=» h , ( A T :a R T <a Z _ = , ( :A , >a @ 8 , ( " ! A P UW B h , ( A @ = / M Q , ( a R S T Y G P H L , ( V I
0x1b32b0…1b3444 Dummy {f00=0x008a, f01=0x0190, f02=» *T A _ P A A , ( . , + - ; : ( , ( ! X " H W X " H H X , ( A A A A _T @ P A 1+ , ( !T a X A _ @ A @ A _ , ( ! A UP
0x1b3444…1b35d8 Dummy {f00=0x008a, f01=0x0190, f02=» W W x , ( 0 _, W , ( ! ! W P @ & 0 H , ( A T A P P x , ( a _b _J A , ( "T @ W @ , (
0x1b35d8…1b376c Dummy {f00=0x008a, f01=0x0190, f02=» h , ( _L W @ $ 0 , ( ! W " A W @ A 8 , ( A P 3P h , ( a C @ P @ @ P @ Q , ( A " @ A " T @ W @ , ( ( A
0x1b376c…1b3900 Dummy {f00=0x008a, f01=0x0190, f02=» $ @ @ @ P , ( ! $ @ A 9 Y ( , ( $ A (>a Y h c A A " X , ( P a $ A (<a P h A , ( @ ) " A H , ( U A @ $
0x1b3900…1b3a94 (5, 4) Dummy {f00=0x008a, f01=0x0190, f02=» A " x , ( ! RE RN ME MN W R , ( A ( T ( W P T $ ; V H , ( a ; W &~ P &`P 6 P @ x , ( $ P $W $ T P , ( #~ > V . >A P Y X , (
0x1b3a94…1b3c28 Dummy {f00=0x008a, f01=0x0190, f02=» h , ( ! ^ P _ " , ( @ A ^ T @ 9J A T _ 1@ 8 , ( a _ ^ 9 V >! D A h , ( A > > > > , ( > > > > ^ _ ^ _ ? ? ? ? , ( @ ? A
0x1b3c28…1b3dbc Dummy {f00=0x008a, f01=0x0190, f02=» ? ? ? ? ? ? ? A > , ( J A A > A A ^ " ( , ( a , , A A :B A Q (P _ # X , ( # H A " A 0 , ( R 9U AR FQ 0:D A , ( _* A " A
0x1b3dbc…1b3f50 Dummy {f00=0x008a, f01=0x0190, f02=» " A A x , ( A $ T ! " A @ , ( a T 0W 0W A @ T 1W H , ( 1 @ " P A UT @ W x $ T @ W T @ W @ " , ( @ D H L P T X ` d h l p t x | , (
0x1b3f50…1b40e4 Dummy {f00=0x008a, f01=0x0190, f02=» Y W W ?W /W : A W ! A A , ( y P _ @ _ 0 , ( I T " T ` , ( A P I T ! A A A A A A , ( A A @ A A @ , ( B A @ >
0x1b40e4…1b4278 Dummy {f00=0x008a, f01=0x0190, f02=» 6 @ A P A < V A @ y H D ! & % 1 5 A E Q U a e q u 4 H D ! } P h L R h h : F ! ) P /P 3W 9 h H D ! = L A E Z G N K Q U Y ] a e i m q
0x1b4278…1b440c Dummy {f00=0x008a, f01=0x0190, f02=» S YP k p P p d H D ! T P T W 4 W Z W P F b H D ! W !W )PP ; b A GT K QP U f [ h _ . g Z k F q : w h 8 l H D ! P T W T W P F F 8 F F H D ! x
0x1b440c…1b45a0 Dummy {f00=0x008a, f01=0x0190, f02=» ^ P H D !o P ^ Z P ' Z 5 8 ; X S n a Z k { 8 n Z T H D !< P@ PB p p Z " T ?R, ET IW ST [V kW~ sP wP {P X H D ! / P W TR PJ V P W P W P & W $ H D !% W 3P 9 h IT UT
0x1b45a0…1b4734 (5, 5) Dummy {f00=0x008b, f01=0x4152, f02=» T 6 R U h # 4 + : / 4 9 P = T C X GT H D ! 4 [ _ 8 aT eW i mW q u 8 wT {W P& T W D H D !JP T W T W ?R EW" K h OW U h YW ]W aW eW H D ! @ k oW u yPL } T T P T$
0x1b4734…1b48c8 Dummy {f00=0x008b, f01=0x4138, f02=» J F IDENT ADDMOD REL 10.0 80-03-14 870105041000 ADDMODK R ADDMODK d , ( S Q R S P W x , ( ! S _ R Q _ ;A A [ [ : , ( S Q" R S
0x1b48c8…1b4a5c Dummy {f00=0x008b, f01=0x40aa, f02=» J F IDENT CTABX REL 10.0 80-03-14 870105041000 CTABX R CTABX b t @ P DATA C1 P DATA C2 P DATA C3 P DATA C4 P DATA C5 P DATA C6
0x1b4a5c…1b4bf0 Dummy {f00=0x008b, f01=0x40fe, f02=» J F IDENT DFTAB REL 10.0 80-03-14 870105041000 $ DFTAB DFTABE DMTIDP DMTIDS R DFTAB z DFTABE DMTIDP DMTIDS @ PDMTIDP E
0x1b4bf0…1b4d84 Dummy {f00=0x008b, f01=0x0190, f02=» J F IDENT DIVMOD REL 10.0 80-03-14 870105041000 DIVMODK R DIVMODK d , ( P T P V x , ( ! Q U V U Q P , ( A P 9A?A:AV R Z _ , (
0x1b4d84…1b4f18 Dummy {f00=0x008b, f01=0x4066, f02=» Pf V 'Q +UF /V 9Ud =Q4 ?P CP QR aP* cR oR qP V @ P@ b DIVMODK d , ( P T P V x , ( ! Q U V U Q P , ( A P 9A?A:AV R Z _ , (
0x1b4f18…1b50ac Dummy {f00=0x008b, f01=0x0190, f02=» J F IDENT DMBUF REL 10.0 80-03-14 870105041000 D @ CURBUFK BUFLNK BUFDMI BUFSNR BUFOR BUFSTA DMTGBU DMTRBUC R BLKMXL CLRBUF DMI020 BLKMXL CURBUFK BUFLNK BUFDMI
0x1b50ac…1b5240 Dummy {f00=0x008b, f01=0x0190, f02=» ~ # - " 7 < A V K p DMTGBU T , ( U @ , L T L P ?A M , ( u L T L T M W L T , ( L
0x1b5240…1b53d4 (5, 6) Dummy {f00=0x008b, f01=0x018e, f02=» -(@ n DMTRBUC CLRBUF " , ( : - : @ , L T M 6 @ (@ : f DMI020 SCTFWT FDBSTA CRNQUE@ CRBUFL CRNEND , ( I$ @ A
0x1b53d4…1b5568 Dummy {f00=0x008b, f01=0x40b2, f02=» a - _ - > H D ! " # , - 6 7 @ A J K iT" oP {T T W T T $ ( $ Q P P T W T ) P _Q p @ CRNQUE@ CRBUFL CRNEND , ( I$ @ A
0x1b5568…1b56fc Dummy {f00=0x008b, f01=0x411e, f02=» J F IDENT DMFDB REL 10.0 80-03-14 870105041000 $ CRNQUEK CRBUFL CRNEND MXIND R CRBUFL z CRNQUEK CRNEND f MXIND f g @ g i p
0x1b56fc…1b5890 Dummy {f00=0x008b, f01=0x40ec, f02=» J F IDENT DMINIT REL 10.0 80-03-14 870105041000 DMINITK DMI010 R DMINITK l INIFLG DMI020 DMI010 H @ > @ NIFLG P EXTRN DMI020
0x1b5890…1b5a24 Dummy {f00=0x008b, f01=0x0190, f02=» J F IDENT DMOPCL REL 10.0 80-03-14 870105041000 DMOPENK DMCLOS DMRFP R , ( I1M1I2M2I3M3I4M4 r , ( ! , ( A a
0x1b5a24…1b5bb8 Dummy {f00=0x008b, f01=0x0190, f02=»MOPENK DWTOPT* , ( @ @ L <a Q _ h J " , ( " T # T W 0T # P P R I R DWTECBV ECBBA DMTBM FPB:BO , ( 9 _ J L u FDBECB , (
0x1b5bb8…1b5d4c Dummy {f00=0x008b, f01=0x0190, f02=»MTIOTC , ( T ( T 9a " E & REQERRC > , ( @ P _ W P CRNGET CRNSTA9 , ( @& P & I - ECBRC , ( G W _*
0x1b5d4c…1b5ee0 Dummy {f00=0x008b, f01=0x0190, f02=» * & / ^ S G " F $ P J FDBDBR 6 , ( I # " N &# N @ H FDBMEC x , ( c ` ~ @ ^R O & ( FPB:RL4 , ( R ] _ @ ^ O & F FDBRLEV
0x1b5ee0…1b6074 (5, 7) Dummy {f00=0x008b, f01=0x0190, f02=» * & I F 2 O 4 F 2 O 4 V , O FPB:KA 6 FDBKA H , ( $ 6P F 8 V J O : F ;F X FDBBLZ FWTVOL * & @ J $ $ P O <;H O & N DFTAB DMTIDP FDBDMI
0x1b6074…1b6208 Dummy {f00=0x008b, f01=0x0190, f02=» BLKMXL , ( # D , :h! P O <:G J , ( = " W N " P B , ( YD G " G " @ G N &:n G r FPB:S1 DIVMODI * & s V L V L N <& , ( $ N N
0x1b6208…1b639c Dummy {f00=0x008b, f01=0x0190, f02=» R P t FPB:FNN DMTBMRS & , ( " T V L 8 * & @$ " T R T "X " h DMTWM DWTTABV * & X_ j " A J FNDFDBT FDBCRL ,
0x1b639c…1b6530 Dummy {f00=0x008b, f01=0x0190, f02=» L P B U B | DMTERXM DMCLOS . , ( oH M R L B b D B DMTRBU r , ( " &V ( d CRNCDF ECBFC , ( $ I I f I f F h R * &
0x1b6530…1b66c4 Dummy {f00=0x008b, f01=0x0190, f02=»<B 6 8_H A J j" , ( H l b V b $ , ( @ # B R " P J Z P T EARELBE FWTPAR , ( = Q ?A "P n(@ N FDBEALR TASHLTE , ( [ H p
0x1b66c4…1b6858 Dummy {f00=0x008b, f01=0x4154, f02=»BUF , ( " 2 R ' P C h v " ( G < H D ! Rl P T !T #W 'T +P /P 5R T T$ PJ W P W b H D !$ T #W 1 B EP2 kR w B R P P P -P K N MW UP U TZ @ < R ;P g
0x1b6858…1b69ec Dummy {f00=0x008b, f01=0x0190, f02=» J F IDENT DMSUBR REL 10.0 80-03-14 870105041000 J F " DMTENDK RELPRO DMTWM DMTBM DMTBMR FNDFDB GETA14@ DMTREM EATESTC R F B EASETB EARELBN CRNGET CALSNO GTBKBU@ DMTIOT DMTIOZ MOV:US MOV:SU MOVZUS MOVZSUL
0x1b69ec…1b6b80 Dummy {f00=0x008b, f01=0x0190, f02=»2E SCTTCTV , ( B $ : ' P W @ TTB:SA L QTJOB ^ , ( 9 D P _ U n TDISP DMTWM f , ( WH R $ - DMTBM ~ DMT
0x1b6b80…1b6d14 (5, 8) Dummy {f00=0x008b, f01=0x0190, f02=» l SCTCDT , ( 0 W T ` U @ DMTREM N FDBRRO b ECBBA t , ( B , @ W : X F , ( $ P ~W $ P $ - f GETA14@ PRUN
0x1b6d14…1b6ea8 Dummy {f00=0x008b, f01=0x018e, f02=»P W p EASETB > GETBLK: $ , ( ; $ : X X 1 6 EARELBN f , ( UA Y (@ : 4W 0P R z , ( q Q P W R T D Q FREQUE CRNGET FDBCR
0x1b6ea8…1b703c Dummy {f00=0x008b, f01=0x0190, f02=» f HALTN CRBUFL , ( H &T ( ( A & * U * * & 1_ D I $ D " ) E Z CALSNO FDBBLF DIVMOD2 , ( "(@ : T , .S P MPYMOD , (
0x1b703c…1b71d0 Dummy {f00=0x008b, f01=0x0190, f02=» DMTIOT Z FDBECB * & E 4 _ 6W U : . DMTIOZ ` ECBCW p DWTECB , ( ] $ 8 D 2 C : D 2 C : ECBRC RETRIEN , ( sH < B >P T @ G
0x1b71d0…1b7364 Dummy {f00=0x008b, f01=0x0190, f02=» FWTFNR * & H HT _$ : X J X 2 X ECBRL H DMTGBUN X * & 2 <! # X =H C L j , ( D NW C : C : B C MOV:US MOV:SU MOVZSUL M
0x1b7364…1b74f8 Dummy {f00=0x008b, f01=0x40cc, f02=»P R U W T U W P W n H D ! P W P 3P 9W eW kP< oR }W R T W P W6 T U * < 8 SB P W U0 )S +W AP OW {P. T W T W v @ OV:US MOV:SU MOVZSUL M
0x1b74f8…1b768c Dummy {f00=0x008b, f01=0x0190, f02=» J F IDENT DMSUBX REL 10.0 80-03-14 870105041000 > : FNDKMXK CHKKEY RDNXTR FNDKEY CRNUPD GTLGRN CRNCIFL R CRNCIFL FNDKMXK MPYMOD * & 4U :! 4 U , (
0x1b768c…1b7820 Dummy {f00=0x008b, f01=0x0190, f02=» , )Q p RDNXTR , ( } R V _ W W : T $ GTBKBU# T DMTIOZ f * & ; [ V ( x FDBRRO , ( T E W D V ; FDBMRO FDBRLE
0x1b7820…1b79b4 (5, 9) Dummy {f00=0x008c, f01=0x0190, f02=» DMTRBUT , ( E E W _| , ( # P [ Z : B FNDKEY B r FDBMIA CALSNOH , ( A : D ; Z BUFSTA , ( @ ] T
0x1b79b4…1b7b48 Dummy {f00=0x008c, f01=0x0190, f02=» EOFRC , ( D W Z r Q R W NOKEY > , ( K ]f J _l W W N CRNUPD ~ FDBADF FDBCRL , ( : : "W FWTFNR , ( P T $
0x1b7b48…1b7cdc Dummy {f00=0x008c, f01=0x018e, f02=» S _P (@ : T ~ DSUMOD DIVMOD 0 , ( a T ( T B FDBBLF r , ( y $ * T , T , ( T ^ S W : H D ! UP U 3
0x1b7cdc…1b7e70 Dummy {f00=0x008c, f01=0x404e, f02=» 0 , W W W W PL R #Q 3R S W 8@ J T ( T B FDBBLF r , ( y $ * T , T , ( T ^ S W : H D ! UP U 3
0x1b7e70…1b8004 Dummy {f00=0x008c, f01=0x0190, f02=» J F IDENT DMTASK REL 10.0 80-05-28 870105041000 . * DMTASKK DMTERX QOPEN QRFP dQCL RECBFZ R RECBFZ QOPEN DMOPEN tQCL DMCLOS , (
0x1b8004…1b8198 Dummy {f00=0x008c, f01=0x0190, f02=» (@ X R X z FDBKA DWTOR * DWTECBj : ECBCW L * & 7 Q D '? T F FDBLRN EOFERR * & M F E R Q D U FDBDBRD FDBECBL GTBKB
0x1b8198…1b832c Dummy {f00=0x008c, f01=0x0190, f02=» DMTIOT , ( L " C ( $ DMTRBU F ECBBA X , ( & _z ( $ B h BUFSTA , ( $ (W Y * C ( FDBRLE , ( A X '? X X
0x1b832c…1b84c0 Dummy {f00=0x008c, f01=0x0190, f02=» DMTREMM , ( P F 2 X ,U X , G 4 , ( /B 6 F S W G B EATEST r , ( ID G F F 8 CALSNO , ( a : X # T * & }I B (
0x1b84c0…1b8654 (5, 10) Dummy {f00=0x008c, f01=0x0190, f02=» FDBTNR0 RELPROE , ( B R W 0W > ( PROERR X , ( HH @ B X , X j DMTBM , ( A F ( $ P DW $ P $ - DMTWM , ( F + X R
0x1b8654…1b87e8 Dummy {f00=0x008c, f01=0x0190, f02=»RNCDFI , ( i P T V K J K * & JW K J K J D $ P > EASETB l , ( H 8 T LW E E _ ~ DMTERX * & BH X # T B ( * & X TENDIO
0x1b87e8…1b897c Dummy {f00=0x008c, f01=0x40f6, f02=» T> W T P T0 T( W" p H D ! P %U 5 D =S ?W _ q {T P P T W4 P P R , H D ! " W W P W P )R 9Tz ;W _P2 eP, kP< qT yV W x P T W T @
0x1b897c…1b8b10 Dummy {f00=0x008c, f01=0x0190, f02=» J F IDENT DRAS01 REL 10.0 80-03-14 870105041000 & " IASCUZK ASCUON OUTASC ASCHAN R ASCHAN | , ( J B A A J J B A A , ( ! J J B A A J J B A ASCUON R , (
0x1b8b10…1b8ca4 Dummy {f00=0x008c, f01=0x0190, f02=» U (@ _2 A ? @ H W , ( V J U T =g% J !0 0 * , ( T " P "T P "T Z , ( P _$ 8! P W TDISP , ( 4 T " 8'p P P DWTOCH
0x1b8ca4…1b8e38 Dummy {f00=0x008c, f01=0x018e, f02=» DWTADRL , ( Y U X " ' X INTADR @ , ( s (@ L U =g% J R , ( T R 4T " X U _ 5 T DWTOTQ OUTLIN , ( " T T P X U X , (
0x1b8e38…1b8fcc Dummy {f00=0x008c, f01=0x0190, f02=» f DWTST * & + @ U U X ' T X RECADR F DWTSB2 X , ( G P ? > | j OUTASC b , ( a _ " 8# ;D 8 ! D J $ T T , ( <AV D J T R 4P P Y
0x1b8fcc…1b9160 Dummy {f00=0x008c, f01=0x0190, f02=»_ U W Q Y ~ , ( > ? @ T A % > > N , ( " $0<B! 9H > 8$ < 8 d INTAS , ( - ? > P P > K (@ > H D !BC I ] F W V` T TD 2
0x1b9160…1b92f4 (5, 11) Dummy {f00=0x008c, f01=0x409a, f02=» Rn PH P" R: W& CT MP {T V R P P$ D @ W T T P P P W T 7P =P < N @ AS , ( - ? > P P > K (@ > H D !BC I ] F W V` T TD 2
0x1b92f4…1b9488 Dummy {f00=0x008c, f01=0x0190, f02=» J F IDENT DRSL01 REL 10.0 80-03-14 870105041000 ( $ ISLCI ISLCO SLCUON OUTSAL CHANY R CHANY ~ SLCUON , ( J B A A J A J @ , ( ! P X U 5 U U I
0x1b9488…1b961c Dummy {f00=0x008c, f01=0x0190, f02=»T P _ 8$ T ?H W 8 DWTOR ( DWTECB@ 8 DWTADR J INTADR , ( H X " ' X (@ L n SETIMP * & U `" T U W ISLCO , ( W U
0x1b961c…1b97b0 Dummy {f00=0x008c, f01=0x0190, f02=» DWTOCH OUTLIN TDISP $ , ( / U X P 4 , ( I@ X @ U _ U d , ( g U X4 $P > R > DWTST RECADR DWTSB2 , ( H 8' T X
0x1b97b0…1b9944 Dummy {f00=0x008c, f01=0x0190, f02=» U l PFPOST , ( $@W Q Y W @ T U T , ( T P u W N , ( 'p P ! P U P T 5W T ~ , ( 5 ;AR _x U 5 8 , ( U P P Y > > T U
0x1b9944…1b9ad8 Dummy {f00=0x008c, f01=0x018e, f02=» A % n > > INTSL ( * & @ P P > (@ > 8 H D !D) % _W eV oTJ w {P T P T W T W| f H D ! Wl W VN RN T. %R6 +P A CP O s P& R" T T H D ! P
0x1b9ad8…1b9c6c Dummy {f00=0x008c, f01=0x4036, f02=» J P P @ 2 & @ P P > (@ > 8 H D !D) % _W eV oTJ w {P T P T W T W| f H D ! Wl W VN RN T. %R6 +P A CP O s P& R" T T H D ! P
0x1b9c6c…1b9e00 Dummy {f00=0x008c, f01=0x0190, f02=» J F IDENT DRSW01 REL 10.0 80-03-14 870105041000 H D ! OUTLINK OUTPUT LDREG LDREGE LDREGF STREG GETCHR@ ECHRTN ECHOY R ECHENDN OUTLINK SAVE8 OUTLRT OUTASC| * & A 8
0x1b9e00…1b9f94 (5, 12) Dummy {f00=0x008c, f01=0x018e, f02=» DWTST DWTA3 DWTA4 DWTA5 . , ( 7 P Y Y Y > TDISP n LDREG X ~ LDREGF f , ( QI Y X X Y X LDREGE j DWTOR DWTECB
0x1b9f94…1ba128 Dummy {f00=0x008c, f01=0x4168, f02=» ECHOY , ( $ > Y Y Y X 9B DWTECH F DWTWATL X DWTSB2 j DWTADR | ECHADR , ( DV X Y X D ECHRTN TENDIO $ V
0x1ba128…1ba2bc Dummy {f00=0x008c, f01=0x0190, f02=» J F IDENT DSKSUB REL 10.0 80-03-14 870105041000 F B VOLCLRK VOLNAM VOLADR NVLCHK VOLGET NEWVOL INXDWTL NVLTAB R NVLDMT NVLEND NVLBIT VOLCLRK VOLNAM ECBRL ECBEL , (
0x1ba2bc…1ba450 Dummy {f00=0x008c, f01=0x0190, f02=» ) Y W X | NVLCHK H DWTORD 0 , ( 9 $ $ ^ W X Y :g B DWTNVL: r DWTTAB , ( S! H I ! P X , ( m " P ,P 9A _ H P I IHRTN
0x1ba450…1ba5e4 Dummy {f00=0x008c, f01=0x40f0, f02=» INXDWTL NVLTAB NVLDMT & NVLEND : NVLBIT N , ( @ X " _F X $ _R b D @ 2 Wz Tr 2 1WX GWB cP& m q sP wP P P @ IHRTN
0x1ba5e4…1ba778 Dummy {f00=0x008c, f01=0x414c, f02=» J F IDENT DSUMOD REL 10.0 80-03-14 870105041000 DSUMODK R DSUMODK d , ( Q S W S Q x , ( ! R S P W S _ R _ " A ;A [ [ : 4 0 Q
0x1ba778…1ba90c Dummy {f00=0x008c, f01=0x40ee, f02=» J F IDENT DVTDI REL 10.0 80-03-14 870105041000 DVTDI R DVTDI b DIADN t , ( DI ?O_o " " @ G=1 PDEVECB DATA 0,
0x1ba90c…1baaa0 Dummy {f00=0x008c, f01=0x40d4, f02=» J F IDENT DVTDN REL 10.0 80-03-14 870105041000 DVTDN R DVTDN b DNADN t & " N @ DATA DEVECB MMU ECB ADDRESS XIF
0x1baaa0…1bac34 (5, 13) Dummy {f00=0x008d, f01=0x40ec, f02=» J F IDENT DVTDY REL 10.0 80-03-14 870105041000 DVTDY R DVTDY b DYADN t & " Y ! ( ( @ DEVECB DATA 0,0,0,0,0,0
0x1bac34…1badc8 Dummy {f00=0x008d, f01=0x4120, f02=» J F IDENT DVTG1 REL 10.0 80-03-14 870105041000 DVTG1 R DVTG1 b GPAD8 t , ( GP , ( ? D
0x1badc8…1baf5c Dummy {f00=0x008d, f01=0x40e8, f02=» J F IDENT DVTGP REL 10.0 80-03-14 870105041000 DVTGP R DVTGP b GPADN t & " P ! $ $ @ DATA DEVECB MMU ECB ADD
0x1baf5c…1bb0f0 Dummy {f00=0x008d, f01=0x4108, f02=» J F IDENT DVTKB REL 10.0 80-03-14 870105041000 DVTKB R DVTKB b KBADN t & " KB bECH !@ ` , ) , + , , @
0x1bb0f0…1bb284 Dummy {f00=0x008d, f01=0x40ec, f02=» J F IDENT DVTMS REL 10.0 80-03-14 870105041000 DVTMS R DVTMS b MSADN t & " MS ! ( ( @ AND RETRY COUNTER P D
0x1bb284…1bb418 Dummy {f00=0x008d, f01=0x40f8, f02=» J F IDENT DVTOD REL 10.0 80-03-14 870105041000 DVTOD R DVTOD b ODADN t & " OD ! ` , ) , + , , @ DATA DWTSQ+DVTO
0x1bb418…1bb5ac Dummy {f00=0x008d, f01=0x4100, f02=» J F IDENT DVTT1 REL 10.0 80-03-14 870105041000 DVTT1 R DVTT1 b TPAD3 t , ( TP " 4 4 @ 0 DOCUME
0x1bb5ac…1bb740 Dummy {f00=0x008d, f01=0x40f0, f02=» J F IDENT DVTTP REL 10.0 80-03-14 870105041000 DVTTP R DVTTP b TPADN t , ( TP $ $ @ REA USER ECB ADDRESS
0x1bb740…1bb8d4 (5, 14) Dummy {f00=0x008d, f01=0x40dc, f02=» J F IDENT DW0701 REL 10.0 80-03-14 870105041000 DW0701K R DW0701K d DC07AD x ( $ DC @ ND EQU * P END @ ATA 0 USER E
0x1bb8d4…1bba68 Dummy {f00=0x008d, f01=0x40e0, f02=» J F IDENT DW1301 REL 10.0 80-03-14 870105041000 DW1301K R DW1301K d DC13AD x , ( DC @ 0,0,0,0 P XIF P* PDW
0x1bba68…1bbbfc Dummy {f00=0x008d, f01=0x40e0, f02=» J F IDENT DW1501 REL 10.0 80-03-14 870105041000 DW1501K R DW1501K d DC15AD x , ( DC @ 0 P XIF P* PDWTEND E
0x1bbbfc…1bbd90 Dummy {f00=0x008d, f01=0x4100, f02=» J F IDENT DW2201 REL 10.0 80-03-14 870105041000 DW2201K R DW2201K d DC22AD x , ( . . @ PDC:E
0x1bbd90…1bbf24 Dummy {f00=0x008d, f01=0x40dc, f02=» J F IDENT DWII01 REL 10.0 80-03-14 870105041000 DWII01K R DWII01K d ITADN x * & @ @ U ECB ADDRESS P XIF
0x1bbf24…1bc0b8 Dummy {f00=0x008d, f01=0x40dc, f02=» J F IDENT DWIO01 REL 10.0 80-03-14 870105041000 DWIO01K R DWIO01K d ITADN x * & @ @ U ECB ADDRESS P XIF
0x1bc0b8…1bc24c Dummy {f00=0x008d, f01=0x0190, f02=» J F IDENT EBCDIC REL 10.0 80-03-14 870105041000 TASCIIK TEBCDI R TASCIIK l , ( , ( ! , ( A ABCDEFGHI[.<(+!&JKLMNOPQR]$*);^
0x1bc24c…1bc3e0 Dummy {f00=0x008d, f01=0x416e, f02=»89:#@'=" p , ( ABCDEFGHI[.<(+!&JKLMNOPQR]$*);^ TEBCDI @ , ( -/STUVWXYZ|,%_>?0123456789:#@'= T , ( 7- <=2&p ?' , ( ! @O {[lP}M] Nk`Ka z^L~no , ( A | J
0x1bc3e0…1bc574 (5, 15) Dummy {f00=0x008d, f01=0x0190, f02=» J F IDENT FMTASK REL 10.0 80-03-15 870105041000 F B FMRDWRK FM:ADM FMINIT TTABFM FWTPAR FWTFNR FWTTABL FWTEW1 R F B FWTEXB FWTVOL EWTEXL EWTEXB EWTVOL FPB:RLL FPB:BF| FPB:FO F B FPB:BO FPB:FN FPB:EL FPB:V1
0x1bc574…1bc708 Dummy {f00=0x008d, f01=0x0190, f02=»:CD FPB:RP z FWTPAR FWTFNR ( FWTTABL < FWTEW1 P FWTVOL d FWTEXB x EWTEXL EWTVOL EWTEXB FPB:RLL FPB:BF| FPB:FO F
0x1bc708…1bc89c Dummy {f00=0x008d, f01=0x0190, f02=» FPB:V3 & FPB:S3 , FPB:V4 0 ( FPB:S4 6 < FPB:FR : P FPB:US > d FPB:SHL @ x FPB:MN A FPB:SNI B FPB:IF C FPB:KAV D FPB:CD F FPB:RP L T
0x1bc89c…1bca30 Dummy {f00=0x008d, f01=0x0190, f02=»T SCTNOF TIODM , ( I > A H @ @ , SCTFWL , ( c @ R P % % @ n DWTST DWTADRI SCTDMT * & I I I I _4 @ NVLDM
0x1bca30…1bcbc4 Dummy {f00=0x008d, f01=0x0190, f02=» ,P :A x NVLBITS A > * FM:ADM J F ECBBA Z , ( K F ' j , ( i ! A P P 8! , ( P K @P X T X !? ? , ( W
0x1bcbc4…1bcd58 Dummy {f00=0x008d, f01=0x0190, f02=»(@ I V V ~ , ( " LP V : V V P GETBLK N , ( % W Y Y " V V ` , ( C T Y Y P _t , ( a (@ - $T 1 %_" Y (_ , ( @ @ 0P
0x1bcd58…1bceec Dummy {f00=0x008d, f01=0x0190, f02=» Y 9 @ J ! T " Y X G ECBRC . , ( " ! P C $ > , ( P J : J < W W P X V n , ( ; C $W X ! "? K >Q , ( Y @ 9 W Y B $W _.! * ( w T
0x1bceec…1bd080 Dummy {f00=0x008d, f01=0x018e, f02=» V & K D X P K @ X 9AV K , ( 9 !? K > F " G , , ( R N ! , ( 7 N P N & N T S QMEXIT * & W _ _& - M L G $ ECBCW2
0x1bd080…1bd214 (5, 16) Dummy {f00=0x008d, f01=0x0190, f02=» , ( X>_. : X P ,(@ Y Y , ( Y :" (@ X $ T ( 4 DWTVOLR d DFTAB v DFTABE , ( _ ^ . : 0 , ( 2P $ 8X 8 , FCHEC2* ,
0x1bd214…1bd3a8 Dummy {f00=0x008d, f01=0x0190, f02=» J j , ( w V )$ T B ( * Y $ * & : " $ Y : @ : , ( P 8 T _ " h , ( & Y 4 : : $ FMRDWRK LKMERR - Y : 6
0x1bd3a8…1bd53c Dummy {f00=0x008d, f01=0x4112, f02=» #P +W CT S H D ! 9 WP( kT P P P, P T W P T l t ( P P* l H D ! G 3P 9V AW E z WQ _ aW mW wT { ( T P V ) d H D ! ( / =P" OT US }W P P T P" 5T G n MP Q T P0 T
0x1bd53c…1bd6d0 Dummy {f00=0x008d, f01=0x0190, f02=» J F IDENT LDTASK REL 10.0 80-03-14 870105041000 F B LT:DSKK LT:SWB TTABLD QLTDSK QLTSWB QLTASK LD:ECBL LD:BUF R LD:BUE PQEMTY LD:STB LD:ECBL LD:BUF L
0x1bd6d0…1bd864 Dummy {f00=0x008d, f01=0x0190, f02=» TLDS15 , ( 7 $V QMEXITL J PAGQUE PAG:QB n , ( U H A ( @ X PAG:SB , ( oH H A ( 1 ) @ H P 1 SEG:PB# S
0x1bd864…1bd9f8 Dummy {f00=0x008d, f01=0x018e, f02=» SEG:DS TTB:CB , ( H H D $! " ECBCW1I R ECBCW2 d , ( A u C C v ECBRL ECBBA , ( V P ECBEL , (
0x1bd9f8…1bdb8c Dummy {f00=0x008d, f01=0x4190, f02=» f ECBRC TTB:SAV , ( CA C _,( B & T :" * RELPA2 Z SCTIOES l , ( _H U ( F * ' @ , U ~ LT:SWB z QLTSWB z LKMERR| QLTDSK ~ QLTASK
0x1bdb8c…1bdd20 Dummy {f00=0x008d, f01=0x0190, f02=» J F IDENT LKMAL REL 10.0 80-03-14 870105041000 LKMAL R LKMAL b bTIO t TWAIT TEXIT TACTOT TPAUSE TIMER TMWAIT TLUSEGC * & UT
0x1bdd20…1bdeb4 (5, 17) Dummy {f00=0x008e, f01=0x40b0, f02=» TCHPAGC , ( J TCHMMU F TSWBLK X # " " j * * @ TPAUSE TIMER TMWAIT TLUSEGC * & UT
0x1bdeb4…1be048 Dummy {f00=0x008e, f01=0x0190, f02=» J F IDENT LRPINT REL 10.0 80-03-14 870105041000 J F " IHLKM LKM030 LKMRQE LKMERR LKMQDI IHRTC TIMQUE@ MONCLO IHPFARC R INIFLG PFPOSTN IHLKM INTSAV PRUNN TTB:SAT , ( A
0x1be048…1be1dc Dummy {f00=0x008e, f01=0x0190, f02=» U H ( ( P c P W A SWL48 & , ( W V ( U 6 LKMAL f LKMERR v HALTN LKMRQE , ( q! P @ V L LKMQDI QTJOB TDI
0x1be1dc…1be370 Dummy {f00=0x008e, f01=0x018e, f02=» A A Q DISQUEA . * & @ @ , ( XV ) A A _b A A n PFINIT IHRTC , ( $@ A _t A A Q > QMJOB SWL
0x1be370…1be504 Dummy {f00=0x008e, f01=0x4160, f02=» , ( O Z Y _ 8 FREBLK 8 , ( o D Q Z P 0 9 _ J , ( _, _ P z TIMQUE@ H H H D ! ] 4 IP OP SW. aV qP wV Q
0x1be504…1be698 Dummy {f00=0x008e, f01=0x0190, f02=» J F IDENT MONTAB REL 10.0 80-03-14 870105041000 F B MONTABK SPDLCI FREQUE PAGQUE INTLT1 INTLT2 INTLT3L INTLT4 R 2 . INTRT1 INTRT2 INTRT3 INTRT4 INTAS INTSL MONTABK FREQUE PAGQUE
0x1be698…1be82c Dummy {f00=0x008e, f01=0x0190, f02=» INTRT4 SYSLOD KBAD3 0 KBADN @ * & P TPADN ~ GPADN DNADN DIADN DYADN MSADN ODADN TPAD3 , (
0x1be82c…1be9c0 Dummy {f00=0x008e, f01=0x401a, f02=» 4 @ SYSLOD KBAD3 0 KBADN @ * & P TPADN ~ GPADN DNADN DIADN DYADN MSADN ODADN TPAD3 , (
0x1be9c0…1beb54 (5, 18) Dummy {f00=0x008e, f01=0x0190, f02=» J F IDENT MONTIM REL 10.0 80-03-14 870105041000 GETTIMK SETTIM R GETTIMK l MONCLO , ( @ < ? < ? <(@ C TTB:SA LKMQDI * & # P >_ < U
0x1beb54…1bece8 Dummy {f00=0x008e, f01=0x4076, f02=»R _ 00 > & <h$ P > ( r %P O SP wR P < `@ r l MONCLO , ( @ < ? < ? <(@ C TTB:SA LKMQDI * & # P >_ < U
0x1bece8…1bee7c Dummy {f00=0x008e, f01=0x4188, f02=» J F IDENT MPYMOD REL 10.0 80-03-14 870105041000 MPYMODK R MPYMODK d , ( T P P V x , ( ! P V S ? V :!9 V , ( A @ P R W * &
0x1bee7c…1bf010 Dummy {f00=0x008e, f01=0x0190, f02=» J F IDENT MSUBS REL 10.0 80-03-14 870105041000 D @ SAVE8 QTJOB QMJOB ACTOT ACTOTP EXITY GETBLK FREBLKL FNDDWT R H D ! FNDDWD FNDTID PFINIT SWL48 SWLXY ILLINT@ INTSAV HALTY RELPAG , ( RELPA2@ IHRET8V IHRET2 IHRET18
0x1bf010…1bf1a4 Dummy {f00=0x008e, f01=0x0190, f02=» ! ? ? ? $P T I QMJOB N . TTMJOB @ ACTOTP X R , ( = R $ 5 % W f ACTOT ` TTB:SA * & D Y W T T U U TTB:ID , ( s H U
0x1bf1a4…1bf338 Dummy {f00=0x008e, f01=0x0190, f02=» T P 0 U ~ GETBLK FREQUE 2 , ( _n ? @ T D FREBLKL t , ( 0 A 1 Q Q >W 0 @ FNDDWT TTB:TD , ( 1 A P P W " ? X
0x1bf338…1bf4cc Dummy {f00=0x008e, f01=0x0190, f02=» Y P _ W 8 X W ? ` @ IHRET8V j * , ( S @ @ P $ H W W > IHRET2 v n IHRET18 x IHRTN z PFINIT PFTAB , ( m > > > > > > > > @ V SWL48
0x1bf4cc…1bf660 Dummy {f00=0x008e, f01=0x4134, f02=» ? ^ ! Y ^ _ RELPAG * RELPA2@ > LKMERRD R * & @@ A. d H D ! $ 5P ?R M t WW _W kT W T P T < 8 W Wp R !P 3R 9P AW6 IW. [P e
0x1bf660…1bf7f4 (5, 19) Dummy {f00=0x008e, f01=0x0190, f02=» J F IDENT PFTAB REL 10.0 80-03-14 870105041000 PFTAB R PFTAB b TWONN t TCDRON SOPRN CHLTONA C1DRONA C2DRON C3DRON` FDONN * & UT
0x1bf7f4…1bf988 Dummy {f00=0x008e, f01=0x40b8, f02=» DMINIT` SLCUON , ( $ ASCUON T CDONN f ! " $ v & & @ C1DRONA C2DRON C3DRON` FDONN * & UT
0x1bf988…1bfb1c Dummy {f00=0x008e, f01=0x40b0, f02=» J F IDENT SCLASS REL 10.0 80-03-14 870105041000 SCLASSK R SCLASSK d x @ ATA TCLASE-* PTCLASE EQU * P END @
0x1bfb1c…1bfcb0 Dummy {f00=0x008e, f01=0x0190, f02=» J F IDENT ST8000 REL 10.0 80-06-09 870105041000 ST8000K R ST8000K d IHPFAR x IHLKM IHRTC ILLINT IHTWA IASCUZ , (
0x1bfcb0…1bfe44 Dummy {f00=0x008e, f01=0x4150, f02=» ~ , ( ! , ( 1 N , ( A ~ , ( Q , ( a
0x1bfe44…1bffd8 Dummy {f00=0x008e, f01=0x0190, f02=» J F IDENT SYSLDA REL 10.0 80-05-29 870105041000 D @ JUMPY SYSLDX dREL LDALEN MOVEY ERROR CMPADR NXTBLKL NXTCOM R F B CONVRT GETNUM MULTY MMTAB TABBE MMEND MMDDIV BUFSIZ SYSBUF D @ M:REL I:RSTE SAVE01 SAVE12 SAV
0x1bffd8…1c016c Dummy {f00=0x008e, f01=0x0190, f02=» SAVE18 SAVE19 SAVE20 SAVE21S SAVE220 v F B SAVE23 SAVE24V SAVE254 SAVE26 SAVE27> SAVE282 SAVE29 SAVE30 0 APPTYPN z I:RSTE * |REL $ W W " , ( 1 ; Z [ : : [ [
0x1c016c…1c0300 Dummy {f00=0x008e, f01=0x0190, f02=» SAVE03 SAVE04~ SAVE05 0 SAVE06 D SAVE07 X , ( o l SAVE08 SAVE09 SAVE10 SAVE11 SAVE12 SAVE1
0x1c0300…1c0494 (5, 20) Dummy {f00=0x008e, f01=0x0190, f02=»AVE30 , ( M:REL @ SYSBUF R BUFSIZ f LDALEN z SAVE14I d SAVE15 f SAVE16V l SAVE17 p SAVE18 r SAVE19 t
0x1c0494…1c0628 Dummy {f00=0x008e, f01=0x0190, f02=» MMEND , ( ERROR @ MOVEY R SCTEFA d , ( W Z A. c @ v , ( V W U R $ )_ CMPADR MULTY , ( :
0x1c0628…1c07bc Dummy {f00=0x008e, f01=0x0190, f02=» H W : @ A SCTSFA * & g H 9n A @ A A 2 SCTBUGY ` SCTSTB r , ( } @ A. @ PFINIT SAVE8 , ( @ W A
0x1c07bc…1c0950 Dummy {f00=0x008e, f01=0x0190, f02=»KL NXTCOM , ( : .=H N GETNUM . P , ( @ .=H N N : d SYSLDX L , ( / d 8" R _ ZY QY : , ( O @ H W z W | CRP
0x1c0950…1c0ae4 Dummy {f00=0x008e, f01=0x4064, f02=» V W U R V W GV n =R iP* m z * N@ ` @ .=H N N : d SYSLDX L , ( / d 8" R _ ZY QY : , ( O @ H W z W | CRP
0x1c0ae4…1c0c78 Dummy {f00=0x008e, f01=0x018e, f02=» J F IDENT SYSLDM REL 10.0 80-03-17 870105041000 SYSLDMK R SYSLDMK d SCTSFAD x SYSBAS SCTEFA TCLASS( , ( I A SCLASSL SAV
0x1c0c78…1c0e0c Dummy {f00=0x008e, f01=0x018e, f02=» f , ( K , P , - 4 ] CMPADR 8 SCTOPT J , ( i @ 4 Y 5 X SAVE03N SAVE01 * & * _6 : W TTMJOB SCTDMT , (
0x1c0e0c…1c0fa0 Dummy {f00=0x008e, f01=0x0190, f02=» , ( !TTP " @ T NXTBLK 8 , ( ! " Y $ !TTX" A J SCTTCT z SCTNFT, , ( "H 9 A & : ` & @ & V :a @ MULTN SCTNOF SCTFWL * & !
0x1c0fa0…1c1134 (5, 21) Dummy {f00=0x008f, f01=0x0190, f02=» " A : FREQUE " SCTBLK 4 , ( eI 4 ` & @ 6 P F BUFSIZM v , ( } _ 3 S S V 8 V SYSBUFM , ( HB W 8 : @ @ , ( @T
0x1c1134…1c12c8 Dummy {f00=0x008f, f01=0x018e, f02=» _ l , ( : @ " P @ P 3 _ SAVE30M < , ( %B @ " P V > 3 S N , ( A 1 S 9J S ( 3 ( 9B ~ , ( a! @ @ T " SAVE04 SAVE10R * & {
0x1c12c8…1c145c Dummy {f00=0x008f, f01=0x0190, f02=» , ( @ N =H N W F V H CRT N SAVE17 8 CONVRT J SAVE24 , ( =H N W J N =H N L n , ( B W N ( @ % 5 T W TTB:CBM , ( @ @ = V W = V P
0x1c145c…1c15f0 Dummy {f00=0x008f, f01=0x0190, f02=» p , ( u @ " U " , ( _2 V DP @ , ( R " p , ( S ( V N S =J @ " S , ( V F S W F V H CRT , ( A
0x1c15f0…1c1784 Dummy {f00=0x008f, f01=0x0190, f02=» n , ( I . !TTP " V W , ( e D * P > , ( @ _ n , ( P W J V 8 8 MOVEN , ( H 4 D P T @ # P
0x1c1784…1c1918 Dummy {f00=0x008f, f01=0x0190, f02=»T n * & /B " : W B % @ * & G P _ 0 R @ < , ( _ $ 2 W B j , ( w @ R @ B 0 W , ( @ ` W W T , (
0x1c1918…1c1aac Dummy {f00=0x008f, f01=0x0190, f02=»5 SAVE14P * & $ P W V ( W , ( X G =h G V X J , ( + B V < V V P W V z , ( E $ _B V W V D , ( _ Yv $ !TTX @ @ T *
0x1c1aac…1c1c40 Dummy {f00=0x008f, f01=0x0190, f02=» h , ( " $ $ _. , ( P V 4 U " 8 SCTDCT h , ( $ $ $ _. @ Z @ z , ( !A @ ! P V 8 8 8 SCTCDT , ( = 3 .
0x1c1c40…1c1dd4 (5, 22) Dummy {f00=0x008f, f01=0x0190, f02=» z , ( U V 8 8 8 4 D , ( P T @ # P H J , ( I K T + Y@ z , ( _`R @ @ Z @ % , ( ! P V 4 4 4 _r @
0x1c1dd4…1c1f68 Dummy {f00=0x008f, f01=0x0190, f02=» W V 0 V | SAVE06 SAVE07 , , ( B 0 V `P _ W b $ > , ( q > R P >b W >b & 8P n SYSLOD , ( V d V W R , ( @ 9 W D T ) $ P
0x1c1f68…1c20fc Dummy {f00=0x008f, f01=0x0190, f02=» 7I h I h I h $# P , ( Q@ V b -W W D V ` T 0 , ( m D @ 1 Q a : @ % ` , ( P H I H T P H , ( U V 8U W , ( 8 :
0x1c20fc…1c2290 Dummy {f00=0x008f, f01=0x0190, f02=» f % E , a : V , ( 3 ^ Q R $ F ! , ( Q LLT # W `;I # ;b W 0;a P * & m W # T W `W # T W , ( `W # T W `W , ( @ W ` R _ $ W 0
0x1c2290…1c2424 Dummy {f00=0x008f, f01=0x0190, f02=» $$Z6 l @ lT A l V @ , ( >A 8T 9 0 1 8 $; # . , ( / V ^ ;c F !AAP # ^ * & M @$ < $ : W SAVE21 SAVE23 , ( i N n B p
0x1c2424…1c25b8 Dummy {f00=0x008f, f01=0x0190, f02=» U p , ( @ Y$ P W N V p 3 % , ( W P _ V N @ INTLT1 p , ( $@P V n ] rW n P , ( 3 _ @ jP V T A j , ( K (P ) @ j @ lP
0x1c25b8…1c274c Dummy {f00=0x008f, f01=0x018e, f02=» N L r * & : N =H N L : &=H F , ( @ L : F =H F L : F =H F @ , ( @ L : P N =H p , ( N T $_ : @ , ( # ! P (W ( : 00=H 00 P , ( C
0x1c274c…1c28e0 Dummy {f00=0x008f, f01=0x0190, f02=» , ( R @ t $ D L v A x CRT SYSLDX 8 $ @ M " z J H D !pC P # N / N G X WP@ P P V P T ;P$ MT wP { r H D ! V T P P V P P +P oT P T T W H
0x1c28e0…1c2a74 (5, 23) Dummy {f00=0x008f, f01=0x0190, f02=»R W& T V H D !oJ P PT . 7 T ?P M wT Tr P, U H D ! } P, U )P QP [W e iP0 q y T U^ ^ H D ! P P$ P R& !P AT qT u wWJ }T W> 0 P R P W H D !` P ^
0x1c2a74…1c2c08 Dummy {f00=0x008f, f01=0x40c0, f02=» T W R T W T T EP T P P T P$ P U P H D ! W P P #W /P 9P QP _P wP T P T %P )W =P EP J R T @ T qT u wWJ }T W> 0 P R P W H D !` P ^
0x1c2c08…1c2d9c Dummy {f00=0x008f, f01=0x0190, f02=» J F IDENT SYSTAB REL 10.0 80-03-14 870105041000 F B SCTMSZK SCTSFA SCTEFA SCTIPL SCTANO SCTADA SCTIOEL SCTPAG R F B SCTSWB SCTNOP SCTPSZ SCTMMC SCTLAC SCTMMPL SCTLAP| SCTNPE F B SCTSTB SCTOPT SCTTCT SCTCDT
0x1c2d9c…1c2f30 Dummy {f00=0x008f, f01=0x0190, f02=»:PB PAG:QF PAG:QB PAG:PA PAG:SBS SWB:NC0 z SWB:DS SWB:ELV SWB:NS* 4 SEG:FCL V SEG:NS j SEG:STI ~ SEG:DS SEG:ELV SEG:PB PAG:QF PAG:QB PAG:PA
0x1c2f30…1c30c4 Dummy {f00=0x008f, f01=0x018e, f02=» IHRTC ILLINTM IHTWN " IHTCN 2 , ( B IHSOP r CHLT1 IHFDN CHRT1 , ( CHRT2 CHRT3 CHR
0x1c30c4…1c3258 Dummy {f00=0x008f, f01=0x0190, f02=» CHLT4 , ( 1 " $ & IHLPN D IHCRN T IHDU1 d , ( A ( * t IHDU2 IHMTN IHCDP , ( Q , . 0 , (
0x1c3258…1c33ec Dummy {f00=0x008f, f01=0x0190, f02=»CTMSZK SCTSFA SCTEFA $ SCTIPL 8 SCTANO L SCTADA ` , ( @ t SCTIOEL SCTTCT SCTCDT SCTPAG SCTSWB
0x1c33ec…1c3580 Dummy {f00=0x008f, f01=0x418a, f02=» SCTSTB SCTOPT bBUG , SCTBUG : , ( 6 N SCTDMT~ ~ SCTDMI SCTFWT SCTNOF SCTNFT SCTFWL SCTBLK
0x1c3580…1c3714 (5, 24) Dummy {f00=0x008f, f01=0x0190, f02=» J F IDENT TABORT REL 10.0 80-03-14 870105041000 TABORTK R TABORTK d FNDDWT x DWTTAB DWTST , ( "R P X T X R ? DWTECH DWTADR ABTAD
0x1c3714…1c38a8 Dummy {f00=0x008f, 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
0x1c38a8…1c3a3c Dummy {f00=0x008f, f01=0x40b0, f02=» J F IDENT TCLASS REL 10.0 80-03-14 870105041000 TCLASSK R TCLASSK d x @ ATA TCLASE-* PTCLASE EQU * P END @
0x1c3a3c…1c3bd0 Dummy {f00=0x008f, f01=0x0190, f02=» J F IDENT TDISP REL 10.0 80-03-14 870105041000 H D ! TDISP TPAUSE TEXIT MEXIT QMEXITA ACTDISA DISIOE DISEND` DISQUE R PRUNY RETUR8 DISQUE PRUNY RETUR8 QTJOB QMEXI
0x1c3bd0…1c3d64 Dummy {f00=0x008f, f01=0x0190, f02=»SA * DISIOE 0 TENDIO DISEND` 4 2 TPAUSE 8 F , ( A W W Z TDISP 8 TTB:ST , ( 9 ^ ! Z@ (XH @ P T , ( W@ M ]X , ) A P P Y U
0x1c3d64…1c3ef8 Dummy {f00=0x008f, f01=0x4146, f02=» [ [ [ [ TTB:PWL , ( [ [ > > [ [ 2 , ( @ Z Z ? ? Z Z b , ( I$ Z Z Z Z Z * & H >
0x1c3ef8…1c408c Dummy {f00=0x008f, f01=0x0190, f02=» J F IDENT TIMER REL 10.0 80-03-14 870105041000 TIMER SETIME SETIMP R TIMER r TDISP FNDTIDC LKMRQE , ( $ T GETBLK@ LKMQDI
0x1c408c…1c4220 Dummy {f00=0x008f, f01=0x4112, f02=» , ( 9 " _ , ( Q ^ 4 _ 8 TIMQUEA h IHRET8A z , ( o @ 1 A _ P 9 ( $ ~ T J : - 4 1 J 3 > P
0x1c4220…1c43b4 (5, 25) Dummy {f00=0x0090, f01=0x0190, f02=» J F IDENT TIODM REL 10.0 80-03-14 870105041000 D @ TIODM FDBECB FDBSNR FDBRRO FDBRLE FDBBLF FDBTNR FDBLRNC R D @ FDBNIF FDBEAL FDBCRL FDBKA FDBMIA FDBADF@ FDBAI1 CRNTID F B CRNCDF CRNSTA FDBBLZ FDBDMIL FDB
0x1c43b4…1c4548 Dummy {f00=0x0090, f01=0x0190, f02=»R PROERR REQERR LGTERR EOFERRS EDMERR0 z EOMERR 2 PROTY @ F NODERR X KEYERR l PROERR REQERR REQER2( LGTERR EDMERR0 EOFERRS RETRIEW
0x1c4548…1c46dc Dummy {f00=0x0090, f01=0x0190, f02=»1 6 , ( ! !" , ( A < , ( a l FDBECB * FDBSNR 8 FDBRRO < FDBRLE > FDBBLF @ FDBTN
0x1c46dc…1c4870 Dummy {f00=0x0090, f01=0x0190, f02=»ADF@ N FDBAI1 P FDBDBR: X " FDBDMIL Y 6 FDBMRO Z J FDBBLZ ^ FDBMEC ^ r FDBKEY ^ CRNTID CRNSTA CRNCDF TIODM ECBCW * & 6
0x1c4870…1c4a04 Dummy {f00=0x0090, f01=0x0190, f02=» _ Y A X T X % T U , ( $P ^ =A Y 6T * CRNGETG Z , ( P H I T l , ( I $ C C T , ( / X?j ?j W _l X X , ( O # Xt
0x1c4a04…1c4b98 Dummy {f00=0x0090, f01=0x0190, f02=»PB:FR ECBRL , ( 6P I , ( @ B Y < H H C N FNDFDB ~ , ( C _ X "" * & 6 Q X C X DT T W Y , ( H H S W
0x1c4b98…1c4d2c Dummy {f00=0x0090, f01=0x0190, f02=» C W B B ~ EATEST CALSNOR . , ( X N R T @ FNDTID p , ( #D X ! V X Y TTB:SA FWTVOL DFTAB DMTIDSC , ( P H
0x1c4d2c…1c4ec0 Dummy {f00=0x0090, f01=0x0190, f02=» ACTOT TDISP RELPROV , ( $ $ & A ( X 0 DISEND ` N * r H D ! & & J J J v v f H D ! . ! # ? P T T P T P %
0x1c4ec0…1c5054 (5, 26) Dummy {f00=0x0090, f01=0x403e, f02=» W Rd Tf V( P$ P$ P T p (@ : $ & A ( X 0 DISEND ` N * r H D ! & & J J J v v f H D ! . ! # ? P T T P T P %
0x1c5054…1c51e8 Dummy {f00=0x0090, f01=0x40b8, f02=» J F IDENT TIODMX REL 10.0 80-03-14 870105041000 TIODM FDBMEC R TIODM j FDBMEC | c @ P* 8 P**************************************************** P* (
0x1c51e8…1c537c Dummy {f00=0x0090, f01=0x0190, f02=» J F IDENT TLDSEG REL 10.0 80-03-14 870105041000 TLDSEGK TLDS15 TLDS20 R TLDSEGK t TTB:SP SEG:NS LKM030 , ( B T R L U 9C TTB:SB SEG:D
0x1c537c…1c5510 Dummy {f00=0x0090, f01=0x40a8, f02=»TB:CB@ TTB:SA * & 5 H D u T T T $ I @ T T T > N R U 'T 1W v X @ LKM030 , ( B T R L U 9C TTB:SB SEG:D
0x1c5510…1c56a4 Dummy {f00=0x0090, f01=0x0190, f02=» J F IDENT TMMLKM REL 10.0 80-03-14 870105041000 TCHPAGK TCHMMU TLUSEG R TCHPAGK t TTB:MT LKMQDI TCHMMU FNDTID , ( $' "?:B ] TLU
0x1c56a4…1c5838 Dummy {f00=0x0090, f01=0x407a, f02=» ,$ T -_> | RELPAG Q - _H . P -U 3U IT H X d@ vPAGK t TTB:MT LKMQDI TCHMMU FNDTID , ( $' "?:B ] TLU
0x1c5838…1c59cc Dummy {f00=0x0090, f01=0x018e, f02=» J F IDENT TOSSFM REL 10.0 80-03-14 870105041000 TOSSFMK FCHECK FCHEC2 R TOSSFMK t , ( " 2 P P P P P P FM:ADM TTABFM ACTDIS , ( ! T
0x1c59cc…1c5b60 Dummy {f00=0x0090, f01=0x0190, f02=» EWTEXL , ( U T L L R Q EWTEXB J , ( o U V , , " _L , ECBRL * & S V :a B EWTVOL FNDDWD , ( # S S
0x1c5b60…1c5cf4 (5, 27) Dummy {f00=0x0090, f01=0x0190, f02=» FCHEC2 , ( _L _< _< " SCTNOF H SCTFWT Z , ( " P @ Q " , Y ," l FWTTAB| FWTPARL , ( P L $P T L &R :AV ' > / _ H D
0x1c5cf4…1c5e88 Dummy {f00=0x0090, f01=0x4016, f02=» 6 @ ( _L _< _< " SCTNOF H SCTFWT Z , ( " P @ Q " , Y ," l FWTTAB| FWTPARL , ( P L $P T L &R :AV ' > / _ H D
0x1c5e88…1c601c Dummy {f00=0x0090, f01=0x0190, f02=» J F IDENT TOSSIO REL 10.0 80-04-30 870105041000 J F "dTIO TIO:FM TIOERR TENDIO QUEDEV QUEFIL DC:MIN@ DC:MOT MONMMUC R J F " ECBFC ECBBA ECBRL ECBEL ECBRC ECBCW ECBCW1` ECBCW2 DC:DIX DM:DIX( F B PC:DIXV MX:DIX KB:DIX8
0x1c601c…1c61b0 Dummy {f00=0x0090, f01=0x0190, f02=» DWTOR DWTOCHV DWTADR DWTTABR DWTWAT DWTTQ DWTOTQ DWTUEC J F " DWTMECj DWTA2 DWTA3 DWTA4 DWTA5 DWTSB12 DWTSB2 DWTTP DWTECH DWTSQ D DWTORD DWTNVL DWTVOLA DWTCHP DWTST DWTBC DWTECBV DWTOP
0x1c61b0…1c6344 Dummy {f00=0x0090, f01=0x0190, f02=»C DWTMECj DWTOTQ DWTA2 4 DWTA3 F DWTA4 X DWTA5 j DWTSB12 | DWTSB2 DWTTP DWTORD DWTNVL " DWTECH " DWTVOLA *
0x1c6344…1c64d8 Dummy {f00=0x0090, f01=0x018e, f02=» RECADRV ECHADR DC:DIX ( DM:DIX( < PC:DIXV P MX:DIX d KB:DIX8 x IT:DIXT DK:DIXN ECBFC ECBBA ECBRL ECBEL ECBRC
0x1c64d8…1c666c Dummy {f00=0x0090, f01=0x0190, f02=» QUEFIL TTB:STM * & C C 8W T . TTB:SA , ( 8P Y ^ 5 ) P n TDISP FNDDWT |TIO @ TIO:FM D , ( 9I U
0x1c666c…1c6800 Dummy {f00=0x0090, f01=0x018e, f02=» Y Y t GETBLKS QTJOB & , ( T # P W Y (@ 6 DC:MIN@ f SAVE8 z , ( 2 @ _ > (@ X L , ( U L Q L # T R < 5 , ( ^ R < 5 Y
0x1c6800…1c6994 (5, 28) Dummy {f00=0x0090, f01=0x0190, f02=» , ( I (@ X P 0P , ( e X T 4 Y X 1 4 , ( 1 X P - M X P P # P d FREBLK: ACTOTPO * & 0P 1 _ " @ W Y
0x1c6994…1c6b28 Dummy {f00=0x0090, f01=0x4016, f02=» @ (@ X P 0P , ( e X T 4 Y X 1 4 , ( 1 X P - M X P P # P d FREBLK: ACTOTPO * & 0P 1 _ " @ W Y
0x1c6b28…1c6cbc Dummy {f00=0x0090, f01=0x018e, f02=» J F IDENT TPROC REL 10.0 80-03-14 870105041000 TWAIT TMWAIT TACTOT R FNDDWT r TWAIT DWTWATL TDISP TACTOT FNDTIDN , ( @ P "R Y
0x1c6cbc…1c6e50 Dummy {f00=0x0090, f01=0x4144, f02=» DWTTAB * & 3 U "R P X R X , ( M T X T . T G H , ( g Y6 G _` P ,P x LKMRQE` LKMQDIA - _ < 8 P~ R~ Pj )P` 3UR ;
0x1c6e50…1c6fe4 Dummy {f00=0x0090, f01=0x4136, f02=» J F IDENT TSWBLK REL 10.0 80-03-14 870105041000 TSWBLKK R TSWBLKK d SCTSWB x LKMRQE , ( D @ T $ $Y $' % QLTSWB TDISP Y
0x1c6fe4…1c7178 Dummy {f00=0x0090, f01=0x018e, f02=» J F IDENT TTMJOB REL 10.0 80-03-14 870105041000 F B TTB:AMK TTB:MT TTB:CB TTB:SP TTB:SB TTMJOB TTB:QLL TTB:ID R . * TTB:ST TTB:PP TTB:PW TTB:SA TTB:TD TTB:AMK TTB:MT TTB:CB
0x1c7178…1c730c Dummy {f00=0x0090, f01=0x40a8, f02=» TTB:PW TTB:SA , ( #M 1 0 TTB:TD ( ` ! t . @ TB:PP TTB:PW TTB:SA TTB:TD TTB:AMK TTB:MT TTB:CB
0x1c730c…1c74a0 Dummy {f00=0x0090, f01=0x2008, f02=» L = REL 10.0 DATE = 80 02 07 1216PACK NBR = 0001 ` Q O ?
0x1c74a0…1c7634 (5, 29) Dummy {f00=0x0091, f01=0x018e, f02=» c , ( ! , , ( A , ( a d , ( , (
0x1c7634…1c77c8 Dummy {f00=0x0091, f01=0x018e, f02=» STLIFI BLRLEN , ( ( CFIORG X CASSFC j CYESNO | CINDEV COTDEV * & TT CLAB CPCONV * &
0x1c77c8…1c795c Dummy {f00=0x0091, f01=0x0190, f02=» CIBMRL * & 1 CASOUT H CMTDK1 Z UPD:A4 l CMTDK2 ~ , ( C " " $ & UPD:A9 CMTDK3 CDTYPE CASIXF
0x1c795c…1c7af0 Dummy {f00=0x0091, f01=0x0190, f02=» i * 2 4 6 8 CWAL 0 UPDA9B @ CDISCA R CDFORM d DTYP v CCPBOT , ( } T : < > @ B , ( ( . 1 2 7 , (
0x1c7af0…1c7c84 Dummy {f00=0x0091, f01=0x0190, f02=» * H CCFAT @ , CRVOL > CRFILE N DLFILE ` PRVTOC r * & / T D F H PRDISC UPDISC COPVOL COPFIL COPYFT
0x1c7c84…1c7e18 Dummy {f00=0x0091, f01=0x0190, f02=» COPYIT COPYTI IBMLBL ( PRINDX : BINDEX L RINDEX ^ , ( W Z ^ ` b d f h p COPYCF SORTF CCLTT l , ( g j l n , (
0x1c7e18…1c7fac Dummy {f00=0x0091, f01=0x018e, f02=» , ( CCEMT 4 , ( F , ( ! v , ( A , ( a , (
0x1c7fac…1c8140 Dummy {f00=0x0091, f01=0x0190, f02=» f , ( , ( 8 , ( ! h CCASSE ^ , ( A FMERR p , ( a
0x1c8140…1c82d4 (5, 30) Dummy {f00=0x0091, f01=0x0190, f02=» PREVIOUS BLOCKS SCANNED? z P RF(E) TCL:60 YES! " . P LC A5,TDBMC+4,A11 GET FIRST CHAR. IN TCL < P SLL A5,8 MOVE TO LEFT BYTE n . P LC A5,TDBMC+5,A11 GET SECOND CHAR IN TCL P CWR A5,A6 SAME TCL? P RF(NE) TCL:50 NO! & P CALL GETTSK G
0x1c82d4…1c8468 Dummy {f00=0x0091, f01=0x0190, f02=» LDR A5,A7 SAVE START VALUE OF TCL P RTN A14 * EJECT : . )***************************************** H . )* GETCON - GET CONTENT IN MEMORY WORD * z . )***************************************** * * REFERENCED IN: SEGGEN
0x1c8468…1c85fc Dummy {f00=0x0091, f01=0x0190, f02=»MEMORY ADDRESS v * * WORK REGISTER: * : * SUBROUTINES: D * PGETCON EQU * f " P LD A1,SCTOPT GET OPTION WORD z P ANK A1,1 MMU OPTION P RF(Z) GCON10 NO MMU ELR A1,A2 P RF GCON20 PGCON10 EQU *
0x1c85fc…1c8790 Dummy {f00=0x0091, f01=0x0190, f02=»************ ^ B >* BINASC - CONVERT A BINARY NUMBER TO A ASCII-CODED NUMBER * * Z D ?* NUMBERS IN THE DOMAIN 1-99 MAY BE CONVERTED * d * B >************************************************************** * *
0x1c8790…1c8924 Dummy {f00=0x0091, f01=0x0190, f02=»D NUMBER l * * WORK REGISTER: A2 * 8 * SUBROUTINES: B * Z PBINASC EQU * d P LCK A5,'00' x P SLL A5,8 P LCK A5,'00' LDK A2,0 LDR A1,A1 PBIN:20 EQU * RF(Z) BINEX ADK A2,1
0x1c8924…1c8ab8 Dummy {f00=0x0091, f01=0x0190, f02=» SUK A1,1 RB BIN:20 PBINEX EQU * , P ADR A5,A2 @ RTN A14 R P EJECT b D P**************************************************************** p D P* START MONITOR SAVE01URATION * D P********
0x1c8ab8…1c8c4c Dummy {f00=0x0091, f01=0x0190, f02=»FWT BUILD FILE WORK TABLES ( P CALL MONBLK GENERATE MONITOR BLOCKS " P IFF MMUPAG+DSKPAG=0 =3 N $ P CALL SEGGEN BUILD SEGMENT TABLE n P XIF P IFT SWPBLK=1 2 P CALL B:SWBT BUILD SWAPPABLE WORK BLOCK TABLE P XIF 2 P CALL B:DMTT B
0x1c8c4c…1c8de0 Dummy {f00=0x0091, f01=0x0190, f02=» CALL B:DWTT BUILD TERMINAL DEVICE WORK TABLES * P CALL B:CDT BUILD COMMON DEVICE TABLES 6 & P CALL B:ITAB BUILD INTERRUPT TABLE d P EJECT P* & P* CHECK IF ASSEMBLER APPLICATION P* " P LD A4,SCTOPT GET OPTION WORD ( P RF(N) S
0x1c8de0…1c8f74 (5, 31) Dummy {f00=0x0091, f01=0x0190, f02=» n $ P LD A1,2,A1 GET APPLICATON TYPE P LD A2,I:RSTE,A3 0 P XIF H P IFT MMUPAG=1 T $ P ELR A3,A1 GET ADDRESS TO P:MTAB j $ P EL A1,2,A1 GET APPLICAION TYPE 2 P EL A2,I:RSTE,A3 GET INTERPRETER RESTART ENTRY P XIF PSLDM70 EQU *
0x1c8f74…1c9108 Dummy {f00=0x0091, f01=0x0190, f02=») SLDM80 NO P IFF MMUPAG=1 " P ST A4,34,A3 SAVE OPTION WORD * P XIF P P IFT MMUPAG=1 " P ES A4,34,A3 SAVE OPTION WORD r P XIF PSLDM80 EQU * P EJECT F P*****************************************************************
0x1c9108…1c929c Dummy {f00=0x0091, f01=0x4110, f02=» * Z F P***************************************************************** P LDKL A8,/FFFF ^ * P ST A8,SCTEFA MODIFY END OF FREE AREA t P LDR A8,A13 GET BASE-ADDRESS & P ADKL A8,SYSLDX APPL. CONF. ENTRY P ABR A8 P END
0x1c929c…1c9430 Dummy {f00=0x0091, f01=0x403c, f02=» 0 P******************************************** @ 8************************* P LDKL A8,/FFFF ^ * P ST A8,SCTEFA MODIFY END OF FREE AREA t P LDR A8,A13 GET BASE-ADDRESS & P ADKL A8,SYSLDX APPL. CONF. ENTRY P ABR A8 P END
0x1c9430…1c95c4 Dummy {f00=0x0091, f01=0x2008, f02=» P X ` h p
0x1c95c4…1c9758 Dummy {f00=0x0091, f01=0x0190, f02=» " 2@P : [ [ U> & @"v! P d Z d [ 6 [ Z 7 T Z 7 : ( :A ( @"x" P ! P [ :;H 2 P ;h W : Uv ; V Y : 2! : 6 2 W,W& " # W ;b ;
0x1c9758…1c98ec Dummy {f00=0x0091, f01=0x0190, f02=»V W Q P [ ! X # P 4 V W Q P [ " X $ P TF R R ` ; <( Q P # W " <! =# T6W = Z P _ V ^< `_@ R Q <# =_ P :" P * U P 1`! T "# 9e! # K : #0 d
0x1c98ec…1c9a80 Dummy {f00=0x0091, f01=0x0190, f02=»_0 R W ( V W Q P W ! W V P , V W Q P W $ W V P T V W Z :$0#0;b [j P P PF P 0 - P0 _ 4 V W Q P ) P 9_ &" ! 9 : & P Q Z ,^ , < Z
0x1c9a80…1c9c14 (5, 32) Dummy {f00=0x0091, f01=0x0190, f02=» RBUFL+3 u P DATA *+RLINK v P RES RBUFL+3 v & P DATA *+RLINK v : P RES RBUFL+3 v P P DATA *+RLINK v d P RES RBUFL+3 v z P XIF v P IFT RBUFNR=8 v P DATA *+RLINK v P RES RBUFL+3 v P DATA *+RLINK v P RES RBUFL+3 v P DAT
0x1c9c14…1c9da8 Dummy {f00=0x0091, f01=0x0006, f02=» ( 0
0x1c9da8…1c9f3c Dummy {f00=0x0091, f01=0x018e, f02=» J F IDENT SYSLDM REL 10.0 80-03-14 870105041000 SYSLDMK R SYSLDMK d SCTSFAD x SYSBAS SCTEFA TCLASS( , ( I A SCLASSL SAV
0x1c9f3c…1ca0d0 Dummy {f00=0x0091, f01=0x018e, f02=» f , ( K , P , - 4 ] CMPADR 8 SCTOPT J , ( i @ 4 Y 5 X SAVE03N SAVE01 * & * _6 : W TTMJOB SCTDMT , (
0x1ca0d0…1ca264 Dummy {f00=0x0091, f01=0x0190, f02=» , ( !TTP " @ T NXTBLK 8 , ( ! " Y $ !TTX" A J SCTTCT z SCTNFT, , ( "H 9 A & : ` & @ & V :a @ MULTN SCTNOF SCTFWL * & !
0x1ca264…1ca3f8 Dummy {f00=0x0091, f01=0x0190, f02=» " A : FREQUE " SCTBLK 4 , ( eI 4 ` & @ 6 P F BUFSIZM v , ( } _ 3 S S V 8 V SYSBUFM , ( HB W 8 : @ @ , ( @T
0x1ca3f8…1ca58c Dummy {f00=0x0091, f01=0x018e, f02=» _ l , ( : @ " P @ P 3 _ SAVE30M < , ( %B @ " P V > 3 S N , ( A 1 S 9J S ( 3 ( 9B ~ , ( a! @ @ T " SAVE04 SAVE10R * & {
0x1ca58c…1ca720 Dummy {f00=0x0091, f01=0x0190, f02=» , ( @ N =H N W F V H CRT N SAVE17 8 CONVRT J SAVE24 , ( =H N W J N =H N L n , ( B W N ( @ % 5 T W TTB:CBM , ( @ @ = V W = V P
0x1ca720…1ca8b4 (5, 33) Opaque[0x194]
0x1ca8b4…1caa48 # DirEnt {nam=»ADDMOD«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1240, f03=0x0000}
0x1ca8b4…1caa48 IdxSect {
0x1ca8b4…1caa48 f00 = 0x0092 // 0x1ca8b4 @0x0
0x1ca8b4…1caa48 f01 = 0x0004 // 0x1ca8b6 @0x2
0x1ca8b4…1caa48 gno = [ // 0x1ca8b8 @0x4
0x1ca8b4…1caa48 [0x00]: C0x0092.0x0.0
0x1ca8b4…1caa48 [0x01]: C0x0092.0x1.0
0x1ca8b4…1caa48 ]
0x1ca8b4…1caa48 }
0x1caa48…1cabdc Dummy {f00=0x0092, f01=0x0190, f02=» 2 P IDENT ADDMOD REL 10.0 80-03-14 870105041000 P : P* B 8 P**************************************************** L P* $ P* PHILIPS TERMINAL SYSTEM PTS P* P* TOSS DATA MANAGEMENT P* P* P* 8 P******
0x1cabdc…1cad70 Dummy {f00=0x0092, f01=0x0190, f02=»UTER P*CALLING SEQUENCE: $ P* A1-A2 = ARG1 & $ P* AG-A7 = ARG2 N P* CF A14,ADDMOD v & P*RETURN : RESULT IN A1-A2 4 P* CAUTION REGISTERS A3,A4,A6,A7 ARE CRUSHED. P ENT
0x1cad70…1caf04 Dummy {f00=0x0092, f01=0x0190, f02=» . P***************************************** P* 6 6 P* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION @ . P* SET IS OBTAINED BY SETTING CPU852 EQU 0. z P* PCPU852 EQU 1 P* P EJECT PADDMOD EQU * P LDK A3,0 P
0x1caf04…1cb098 Dummy {f00=0x0092, f01=0x0190, f02=» P ADR A2,A7 P RF(3) OVER1 $ 0 PNOVER ADR A1,A6 * NO OVERFLOW D P RF(1) END1 x P RF(2) END2 P RF(3) END3 PNOVER1 ADK A2,0 P RF(0) END0
0x1cb098…1cb22c Dummy {f00=0x0092, f01=0x0190, f02=» RB(7) NOVER POVER3 ADR A1,A6 P RF(2) END3 < P ADK A1,0 Z P RF(1) END1 x P RB(7) NOVER1 P XIF P IFF CPU852=1 P RF(0) END0 P RF(1) END1 P RF(2) E
0x1cb22c…1cb3c0 Dummy {f00=0x0092, f01=0x411e, f02=»LL A3,1 ********************************** P ANK.L A3,/0300 < P LDK.L A4,/FCFF ^ P AN.S A4,2,A14 B P OR.S A3,2,A14 UPDATE CR IN PSW CALLING PROGRAM P RTN A14 P
0x1cb3c0…1cb554 (5, 34) Dummy {f00=0x0092, 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
0x1cb554…1cb6e8 Dummy {f00=0x0092, f01=0x0002, f02=»
0x1cb6e8…1cb87c Dummy {f00=0x0092, f01=0x018e, f02=» P$REL PMES @P PLED @P,/S,/EE,## P##DL 0,1 6 0 P IDENT @P REL 10.0 80-03-14 870105041000 F P z P##EN PKPF /S PASM /S,NL PKPF /O PSCR /S PSCR /O PEND P$MOVDM PMOV @R,/S,SLASK
0x1cb87c…1cba10 Dummy {f00=0x0092, f01=0x0190, f02=» PSCR /S PSCR /O PEND P$MOVOB , PMES @P : PINC @P,HELP H PKPF /O PSCR /S j PSCR /O x PEND P$MOVUF PMES @P PMOV @P,/A,HELP PKPF /A,@P PSCR /A PEND P$NC PMES @P
0x1cba10…1cbba4 Dummy {f00=0x0092, f01=0x0010, f02=» PEND PSCR /O PEND P$MOVOB , PMES @P : PINC @P,HELP H PKPF /O PSCR /S j PSCR /O x PEND P$MOVUF PMES @P PMOV @P,/A,HELP PKPF /A,@P PSCR /A PEND P$NC PMES @P
0x1cbba4…1cbd38 Dummy {f00=0x0092, f01=0x2008, f02=» END PSCR /O PEND P$MOVOB , PMES @P : PINC @P,HELP H PKPF /O PSCR /S j PSCR /O x PEND P$MOVUF PMES @P PMOV @P,/A,HELP PKPF /A,@P PSCR /A PEND P$NC PMES @P
0x1cbd38…1cbecc Dummy {f00=0x0092, f01=0x0190, f02=»X EQU /03 LAST DUMMY . PRETURN EQU /12 RETURN TO ALPHANUMERIC MODE * PESCAPE EQU /11 ESCAPE TO GRAPHIC MODE N " PPOINT EQU /2E POINT CHARACTER | 2 PEQU EQU 6 THRESHOLD FOR AUTOMATIC FAST OUTPUT PSTILL EQU /18 CURSOR STEADY $ PCTYCOD EQU /
0x1cbecc…1cc060 Dummy {f00=0x0092, f01=0x0190, f02=»R EQU /4 CODE CHECK ERROR ( POPERR EQU /1 NOT OPERABLE, POWER OFF " P* N P EJECT X P* f P* p . P***************************************** z . P* CONDITIONAL ASSEMBLY * . P*****************************************
0x1cc060…1cc1f4 (5, 35) Opaque[0x194]
0x1cc1f4…1cc388 # DirEnt {nam=»CTABX «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1250, f03=0x0000}
0x1cc1f4…1cc388 IdxSect {
0x1cc1f4…1cc388 f00 = 0x0092 // 0x1cc1f4 @0x0
0x1cc1f4…1cc388 f01 = 0x0002 // 0x1cc1f6 @0x2
0x1cc1f4…1cc388 gno = [ // 0x1cc1f8 @0x4
0x1cc1f4…1cc388 [0x00]: C0x0092.0x2.0
0x1cc1f4…1cc388 ]
0x1cc1f4…1cc388 }
0x1cc388…1cc51c Dummy {f00=0x0092, f01=0x0190, f02=» 0 P IDENT CTABX REL 10.0 80-03-14 870105041000 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
0x1cc51c…1cc6b0 Dummy {f00=0x0092, 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
0x1cc6b0…1cc844 Dummy {f00=0x0092, 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 @
0x1cc844…1cc9d8 Dummy {f00=0x0092, f01=0x0190, f02=» & PDYERR ABL DISIOE I/O REQUEST ERROR P EJECT 2 : P* ACTIONS SPECIFIED BY USER IN RIGHT BYTE IN BUFFER @ P* ARE CARRIED OUT. ~ 0 P* /2B NO MOVING OF PRINT HEAD " P* /30 CR, LF, LF B P* /31
0x1cc9d8…1ccb6c Dummy {f00=0x0092, f01=0x0190, f02=»ESTED LENGTH | P RF(E) ACDY25 P LDK A3,2 START BUFFER INDEX * " P LD A2,2,A8 GET BUFFER ADDRESS N & P LC A2,1,A2 GET CONTROL CHARACTER t P ANK A2,/FF PACDY25 EQU * * P SUK A2,/2B POSITIONING BEFORE WRITE ? P RF(E) ACDY90
0x1ccb6c…1ccd00 Dummy {f00=0x0092, f01=0x0190, f02=» ( P ADK A4,1 INDICATE DOUBLE LINE FEED P 4 P < $ PACDY30 LDK A2,CR CARRIAGE RETURN D PACDY35 LDK A1,1 l 2 P SC A1,DWTAP+1,A6 RESET HEAD POSITION COUNTER 8 P* SEND CARRIAGE RETURN AND ONE OR TWO LINE FEEDS P* PACDY50 E
0x1ccd00…1cce94 (5, 36) Opaque[0x194]
0x1cce94…1cd028 # DirEnt {nam=»DFTAB «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1258, f03=0x0000}
0x1cce94…1cd028 IdxSect {
0x1cce94…1cd028 f00 = 0x0092 // 0x1cce94 @0x0
0x1cce94…1cd028 f01 = 0x0002 // 0x1cce96 @0x2
0x1cce94…1cd028 gno = [ // 0x1cce98 @0x4
0x1cce94…1cd028 [0x00]: C0x0092.0x3.0
0x1cce94…1cd028 ]
0x1cce94…1cd028 }
0x1cd028…1cd1bc Dummy {f00=0x0092, f01=0x0190, f02=» 0 P IDENT DFTAB REL 10.0 80-03-14 870105041000 P 8 P* @ 8 P**************************************************** J P* $ P* PHILIPS TERMINAL SYSTEM PTS P* & P* DFTAB = DISC FILE CODE TABLE P* P* P* 8
0x1cd1bc…1cd350 Dummy {f00=0x0092, f01=0x4138, f02=»NTRY DFTABE P ENTRY DMTIDP P ENTRY DMTIDS * P* @ P* J PDFTAB EQU * T P DATA /F0F1 h P DATA /F2F3 | P DATA /F4F5,/F6F7 P DATA /F8F9,/FAFB P DATA /FCFC P DATA /FDFD PDFTABE EQU * PDMTIDP E
0x1cd350…1cd4e4 Dummy {f00=0x0092, 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*
0x1cd4e4…1cd678 Dummy {f00=0x0092, f01=0x0190, f02=»AST OUTPUT? " ~ P RF(E) ADY125 # P SUK A1,1 NO! # * " P LDR* A7,A6 CHANNEL PARAMETER # @ P ANK A7,/30 GRAFIC DISPLAY ? # f P RF(E) ADY110 NO # P LDK A1,5 SET TABLE PONTER # * PADY110 CC A2,TABSPE,A1 CHARACTER FOUND # P RF(NE) ADY128 # " P
0x1cd678…1cd80c Dummy {f00=0x0092, f01=0x0190, f02=» A4,0 # P RB ACDY50 $ $ PADY122 CCK A2,/1212 UNDERLINE ? $ P RF(NE) ADY125 $ H " P LDK A4,/40 SET UNDERLINE MODE $ ^ P RB ADY120 $ & PADY125 CCK A2,/1414 FAST OUTPUT ? $ P LDK A4,0 $ P RB(NE) ACDY50 NO $ P LDR A4,A2 $ ( P CF A15,GE
0x1cd80c…1cd9a0 Dummy {f00=0x0092, f01=0x0190, f02=»F(Z) ADY127 NONE $ P* % P IFT WHATDY=0 % " & P LDR* A7,A6 GET CHANNEL PARAMETER % 8 P ANK A7,/10 % b 2 P RF(NZ) OTHER OTHER DISPLAY THAN 6344 OR 6386? % v P XIF % P LDR A3,A1 NO! % P CF A5,FASTER % PADY127 EQU * % P LD A3,4,A8 REQ
0x1cd9a0…1cdb34 (5, 37) Opaque[0x194]
0x1cdb34…1cdcc8 # DirEnt {nam=»DIVMOD«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1260, f03=0x0000}
0x1cdb34…1cdcc8 IdxSect {
0x1cdb34…1cdcc8 f00 = 0x0093 // 0x1cdb34 @0x0
0x1cdb34…1cdcc8 f01 = 0x0004 // 0x1cdb36 @0x2
0x1cdb34…1cdcc8 gno = [ // 0x1cdb38 @0x4
0x1cdb34…1cdcc8 [0x00]: C0x0093.0x0.0
0x1cdb34…1cdcc8 [0x01]: C0x0093.0x1.0
0x1cdb34…1cdcc8 ]
0x1cdb34…1cdcc8 }
0x1cdcc8…1cde5c Dummy {f00=0x0093, f01=0x0190, f02=» 2 P IDENT DIVMOD REL 10.0 80-03-14 870105041000 P : P* B 8 P**************************************************** L P* $ P* PHILIPS TERMINAL SYSTEM PTS P* P* TOSS DATA MANAGEMENT P* P* P* 8 P******
0x1cde5c…1cdff0 Dummy {f00=0x0093, f01=0x0190, f02=»ING SEQUENCE & P* A1-A2= DIVIDEND $ P* A6 = DIVISOR > P* CF A14,DIVMOD f B P*RETURN* RESUT IN A1-A2 ; A1= REMAINDER;A2= QUOTIENT 6 P* CAUTION : REGISTERS A3,A4,A6,A7,A8 ARE CRUSHED.
0x1cdff0…1ce184 Dummy {f00=0x0093, f01=0x018e, f02=» z P* . P***************************************** P* D 6 P* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION N . P* SET IS OBTAINED BY SETTING CPU852 EQU 0. P* PCPU852 EQU 1 P* P EJECT PDIVMOD EQU * P LDK
0x1ce184…1ce318 Dummy {f00=0x0093, f01=0x0190, f02=» ^ P ADK A6,0 @ P RF(0) END3 * IF DIVISOR IS NULL, OVREFLOW & P ADK A1,0 j P RF(4) SIGNE P ANK.L A2,/7FFF @ P RF(0) END0 * IF DIVIDEND IS NULL, CR = 0
0x1ce318…1ce4ac Dummy {f00=0x0093, f01=0x0190, f02=» ADK A1,0 *SIGN OF DIVIDEND P RF(6) DIVENP 0 8 P ADK A3,1 * DIVIDEND IS NEGATIVE P P C1R A1,A1 P C1R A2,A2 P ANK.L A2,X'7FFF' P ADK A2,1
0x1ce4ac…1ce640 Dummy {f00=0x0093, f01=0x0190, f02=» DIVISOR j P RF(6) DIVORP 4 P SUK A3,1 *NEGATIVE DIVISOR 0 P C1R A6,A6 h P ADK A6,1 < P ADK A6,0 RESET IF OVERFLOW P RF(5) CASSPE PDI
0x1ce640…1ce7d4 (5, 38) Dummy {f00=0x0093, f01=0x0190, f02=»A6 d P RF(0) END P SLL A1,1 ( P SLL A7,1 F P SLL A2,1 d P RF(6) *+4 P ADK A1,1 P ADK A1,0 P RF(2) CASSP1 P CWR
0x1ce7d4…1ce968 Dummy {f00=0x0093, f01=0x0190, f02=»T z 4 P*THIS SEQUENCE RESTORES THE SIGN OF THE RESULTS PEND LDR A2,A7 B P ADK A3,0 b P RF(0) NOSIGN 8 P RF(2) AA DIVIDEND +. DIVISOR + , P C1R A1,A1 *REMAINDER
0x1ce968…1ceafc Dummy {f00=0x0093, f01=0x0190, f02=»CTION IS ABSOLUTELY NECESSARY TO SET CR x > P* WHEN THE ADK A2,1 SET AN OVERFLOW CR EX (QUOTIENT=8000) 0 P ADK A2,0 r P XIF P IFF CPU852=1 P RF(1) END1 P XIF P RF(2) END2 P RF(0) END0
0x1ceafc…1cec90 Dummy {f00=0x0093, f01=0x018e, f02=»**************************** n P ANK.L A3,/0300 $ P LDK.L A4,/FCFF F P AN.S A4,2,A14 h B P OR.S A3,2,A14 UPDATE CR IN PSW CALLING PROGRAM P RTN A14 P IFT CPU852=1 8 PNOSI
0x1cec90…1cee24 Dummy {f00=0x0093, f01=0x418e, f02=» . P ADK A1,1 REMAINDER - PBB ADK A2,0 : P RB(0) END0 X P RB(2) END2 v P RB(7) END1 PCASSPE LDR A7,A1 P LDR A1,A2 P CWK A1,/
0x1cee24…1cefb8 Dummy {f00=0x0093, 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
0x1cefb8…1cf14c Dummy {f00=0x0093, f01=0x0190, f02=»SEND 3 P SUK A3,1 LAST BACKSPACE ? 4 P RB(NE) ADY345 4 . 8 PADY370 SC A4,DWTAP+1,A6 UPDATE HEAD POSITION POINTER 4 D P XIF 4 & PADY380 LDK A3,2 START BUFFER INDEX 4 P ABL ACDY90 4 P IFT WHATDY=0 4 P* 4 & PADY400 LDK A2,/22 START CHARAC
0x1cf14c…1cf2e0 Dummy {f00=0x0093, f01=0x0190, f02=»ITION IN CONTROL 4 l 4 P* WORD, LOAD A1 WITH RETURN CODE AND END I/0. 5 P* 5 P PADY405 EQU * 5 Z & P LDR* A1,A6 GET CHANNEL PARAMETER 5 n P ANK A1,/30 6344 ? 5 P RF(NE) ADY407 NO 5 P LDR* A1,A6 5 P LDR A4,A1 5 P ANK A1,/40 UNDERLINE
0x1cf2e0…1cf474 (5, 39) Opaque[0x194]
0x1cf474…1cf608 # DirEnt {nam=»DMBUF «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1270, f03=0x0000}
0x1cf474…1cf608 IdxSect {
0x1cf474…1cf608 f00 = 0x0093 // 0x1cf474 @0x0
0x1cf474…1cf608 f01 = 0x000a // 0x1cf476 @0x2
0x1cf474…1cf608 gno = [ // 0x1cf478 @0x4
0x1cf474…1cf608 [0x00]: C0x0093.0x2.0
0x1cf474…1cf608 [0x01]: C0x0093.0x3.0
0x1cf474…1cf608 [0x02]: C0x0094.0x0.0
0x1cf474…1cf608 [0x03]: C0x0094.0x1.0
0x1cf474…1cf608 [0x04]: C0x0094.0x2.0
0x1cf474…1cf608 ]
0x1cf474…1cf608 }
0x1cf608…1cf79c Dummy {f00=0x0093, f01=0x0190, f02=» 0 P IDENT DMBUF REL 10.0 80-03-14 870105041000 P 8 8 P**************************************************** @ P* | $ P* PHILIPS TERMINAL SYSTEM PTS P* . P* DMBUF = DATA MANAGEMENT BUFFER AREAS P* P* P* P
0x1cf79c…1cf930 Dummy {f00=0x0093, f01=0x0190, f02=» l P* . P* A ROUTINE DMTGBU TO GET A DISC BUFFER P* D L P* BY MEANS OF CONDITIONAL ASSEMBLY QNBUF NUMBER OF BUFFERS WILL BE ALL N P* P* MAX VALUE OF QNBUF IS 16 P* P* P EJECT P* P***************
0x1cf930…1cfac4 Dummy {f00=0x0093, f01=0x0190, f02=» v P ENTRY BUFDMI DMTASK IDENT P ENTRY BUFSNR SECTOR NO * P ENTRY BUFOR ORDER J * P ENTRY BUFSTA DATA AREA START ADDRESS d P ENTRY DMTGBU GET A BUFFER " P ENTRY DMTRBU RELEASE A BUFFER $ P ENTRY BLKMXL MAXIMUM BLOCK SIZE * P ENTRY
0x1cfac4…1cfc58 Dummy {f00=0x0093, f01=0x0190, f02=» EXTRN CRNQUE,CRNEND,CRBUFL P EXTRN FDBSTA $ P EXTRN SCTFWT : P EJECT P PX:B EQU 128 ^ " PBLKMXL EQU X:B MAX BLOCK SIZE r $ PX:A EQU 8 NUMBER OF DISC BUFFERS PQNBUF EQU X:A P* P* PCURBUF DATA BUF1 PNEWBUF
0x1cfc58…1cfdec Dummy {f00=0x0093, f01=0x018e, f02=» P DATA 0 PBUFSNR EQU *-BUF1 SECTOR NO P DATA 0 8 P DATA 0 H PBUFOR EQU *-BUF1 LRU-WORD X " P DATA 0 BUFFER STATUS,DM ORDER z ( PBUFSTA EQU *-BUF1 DATA BUFFER START PBUFAR EQU * P RES BLKMXL P* P* P
0x1cfdec…1cff80 Dummy {f00=0x0093, f01=0x0190, f02=» P RES BLKMXL P XIF P* $ P* . P IFT QNBUF=2 8 PBUF3 EQU BUF1 L P XIF b P* n P* x P IFF QNBUF=1 P IFF QNBUF=2 PBUF3 DATA BUF4 P DATA 0,0,0,0 P RES BLKMXL P XIF P* P*
0x1cff80…1d0114 (5, 40) Dummy {f00=0x0093, f01=0x0190, f02=»BUF4 DATA BUF5 P DATA 0,0,0,0 P RES BLKMXL , P XIF @ P* L P* V P IFT QNBUF=4 ` PBUF5 EQU BUF1 t P XIF P* P* P IFF QNBUF=1 P IFF QNBUF=2 P IFF QNBUF=3 P IFF QNBUF=4 PBUF5 DATA BUF6
0x1d0114…1d02a8 Dummy {f00=0x0093, f01=0x0190, f02=»* P* P IFF QNBUF=1 P IFF QNBUF=2 ( P IFF QNBUF=3 < P IFF QNBUF=4 P P IFF QNBUF=5 d PBUF6 DATA BUF7 x P DATA 0,0,0,0 P RES BLKMXL P XIF P* P* P IFT QNBUF=6 PBUF7 EQU BUF1 P XIF
0x1d02a8…1d043c Dummy {f00=0x0093, f01=0x018e, f02=»=6 PBUF7 DATA BUF8 P DATA 0,0,0,0 P RES BLKMXL 6 P XIF J P* V P* ` P IFT QNBUF=7 j PBUF8 EQU BUF1 ~ P XIF P* P* P IFF QNBUF=1 P IFF QNBUF=2 P IFF QNBUF=3 P IFF QNBUF=4 P IFF
0x1d043c…1d05d0 Dummy {f00=0x0093, f01=0x0190, f02=» P* P IFT QNBUF=8 PBUF9 EQU BUF1 & P XIF < P* H P* R P IFF QNBUF=1 P IFF QNBUF=2 p P IFF QNBUF=3 P IFF QNBUF=4 P IFF QNBUF=5 P IFF QNBUF=6 P IFF QNBUF=7 P IFF QNBUF=8 PBUF9 DATA BU
0x1d05d0…1d0764 Dummy {f00=0x0093, f01=0x0190, f02=» P* P* P IFF QNBUF=1 P IFF QNBUF=2 , P IFF QNBUF=3 @ P IFF QNBUF=4 T P IFF QNBUF=5 h P IFF QNBUF=6 | P IFF QNBUF=7 P IFF QNBUF=8 P IFF QNBUF=9 PBUF10 DATA BUF11 P DATA 0,0,0,0 P RES BLKMXL
0x1d0764…1d08f8 Dummy {f00=0x0093, f01=0x0190, f02=»FF QNBUF=3 P IFF QNBUF=4 P IFF QNBUF=5 & P IFF QNBUF=6 : P IFF QNBUF=7 N P IFF QNBUF=8 b P IFF QNBUF=9 v P IFF QNBUF=10 PBUF11 DATA BUF12 P DATA 0,0,0,0 P RES BLKMXL P XIF P IFT QNBUF=11 PBUF1
0x1d08f8…1d0a8c Dummy {f00=0x0093, f01=0x0190, f02=»NBUF=5 P IFF QNBUF=6 P IFF QNBUF=7 " P IFF QNBUF=8 6 P IFF QNBUF=9 J P IFF QNBUF=10 ^ P IFF QNBUF=11 t PBUF12 DATA BUF13 P DATA 0,0,0,0 P RES BLKMXL P XIF P IFT QNBUF=12 PBUF13 EQU BUF1 P XIF
0x1d0a8c…1d0c20 Dummy {f00=0x0093, f01=0x0190, f02=»UF=6 P IFF QNBUF=7 P IFF QNBUF=8 P IFF QNBUF=9 4 P IFF QNBUF=10 H P IFF QNBUF=11 ^ P IFF QNBUF=12 t PBUF13 DATA BUF14 P DATA 0,0,0,0 P RES BLKMXL P XIF P IFT QNBUF=13 PBUF14 EQU BUF1 P XIF
0x1d0c20…1d0db4 (5, 41) Dummy {f00=0x0094, f01=0x0190, f02=»UF=6 P IFF QNBUF=7 P IFF QNBUF=8 P IFF QNBUF=9 4 P IFF QNBUF=10 H P IFF QNBUF=11 ^ P IFF QNBUF=12 t P IFF QNBUF=13 PBUF14 DATA BUF15 P DATA 0,0,0,0 P RES BLKMXL P XIF P IFT QNBUF=14 PBUF1
0x1d0db4…1d0f48 Dummy {f00=0x0094, f01=0x0190, f02=»NBUF=5 P IFF QNBUF=6 P IFF QNBUF=7 " P IFF QNBUF=8 6 P IFF QNBUF=9 J P IFF QNBUF=10 ^ P IFF QNBUF=11 t P IFF QNBUF=12 P IFF QNBUF=13 P IFF QNBUF=14 PBUF15 DATA BUF16 P DATA 0,0,0,0 P RES BLKMXL
0x1d0f48…1d10dc Dummy {f00=0x0094, f01=0x0190, f02=»FF QNBUF=3 P IFF QNBUF=4 P IFF QNBUF=5 & P IFF QNBUF=6 : P IFF QNBUF=7 N P IFF QNBUF=8 b P IFF QNBUF=9 v P IFF QNBUF=10 P IFF QNBUF=11 P IFF QNBUF=12 P IFF QNBUF=13 P IFF QNBUF=14 P IFF QNBUF=15
0x1d10dc…1d1270 Dummy {f00=0x0094, f01=0x0190, f02=»TGBU * P************** P* & * P* ENTRY DMTGBU GET A DISC BUFFER 0 P* ^ P* INPUT A1 = FILE NR h " P* A2 = SECTOR NUMBER $ P* A4 = SECT NR PART 2 P* $ P* OUTPUT A3 = BUFFER ADDRESS J P
0x1d1270…1d1404 Dummy {f00=0x0094, f01=0x0190, f02=»* USED REGS A1-A5,A7 P* P* ALL BUFFERS ARE SEARCED. * 6 P* ONE BUFFER IS SELECTED IN FOLLOWING PRIORITY : N P* , P* 1. USED BUFFER IN REQ FILE ( DELAY) P* 2. REQ FILE AND SECT NR P* 3. OLDEST UNUSED P*
0x1d1404…1d1598 Dummy {f00=0x0094, f01=0x0190, f02=» . P* BUFOR BIT 0-8= DELAY + SAME INDICATOR " P* BUFOR BIT 9-15= BUFFER AGE 6 P* BUFSTA= BLOCK AREA P* z P* P EJECT PDMTGBU EQU * P INH INH P LD A3,CURBUF P LDK A5,0 PDMT010 LDR* A3,A3 P ANK
0x1d1598…1d172c Dummy {f00=0x0094, f01=0x0190, f02=» ~ P SLL A7,1 P SC A7,BUFOR,A3 MARK DELAY PDMT015 EQU * < P CW A2,BUFSNR,A3 P P RF(NE) DMT020 h P CW A4,BUFSNR+2,A3 ~ P RF(NE) DMT020 WRONG SECT NR P LDKL A7,/100 & P ORS A7,BUFOR,A3 MARK SAME SECT NR P RF DMT030
0x1d172c…1d18c0 Dummy {f00=0x0094, f01=0x018e, f02=»5 p P RF(NZ) DMT030 USED P IM BUFOR,A3 MAKE OLDER & $ P SC A7,BUFOR,A3 CLEAR LEFT BYTE F PDMT030 EQU * n P CW A5,BUFOR,A3 P RF(G) DMT041 NOT OLDER P LD A5,BUFOR,A3 P ST A3,NEWBUF PDMT041 EQU * P CW A3,CURBU
0x1d18c0…1d1a54 (5, 42) Dummy {f00=0x0094, f01=0x018e, f02=» $ P LD A3,NEWBUF CHOOSE THIS BUFFER P ECR A5,A5 , P LDR A5,A5 > P RF(Z) DMT042 NO BUFFER P P ANK A5,/3 p P RF(Z) DMT043 NO DATA P ANK A5,/2 P RF(NZ) DMT051 DELAY P RF DMT050 FREE SECTOR FOUND PDMT042 EQU * P L
0x1d1a54…1d1be8 Dummy {f00=0x0094, f01=0x0190, f02=» h P* P IM 4,A14 P IM 4,A14 SKIP RETURN $ P ST A1,BUFDMI,A3 DMIDENT, FC B " P ST A2,BUFSNR,A3 SECTOR NUMBER f P ST A4,BUFSNR+2,A3 PDMT050 EQU * " P CM BUFOR,A3 RESET OLD-COUNTER PDMT051 EQU * DELAY USE P ST A3,CUR
0x1d1be8…1d1d7c Dummy {f00=0x0094, f01=0x0190, f02=»************ P* DMTRBU * P************** * P* @ . P* ENTRY DMTRBU RELEASE A DISC BUFFER J P* | $ P* INPUT A3 = BUFFER ADDRESS P* A2 IS DESTROYED P* P* PDMTRBU EQU * P LDKL A2,/FFFE
0x1d1d7c…1d1f10 Dummy {f00=0x0094, f01=0x0190, f02=»********************************************** P INH 6 P LD A3,CURBUF B PDMT700 LDR* A3,A3 X P ANKL A3,/FFFE r P LDK A2,1 P AN A2,BUFLNK,A3 P RF(NZ) DMT750 USED P CM BUFDMI,A3 REMOVE PDMT750 CW A3,CURBUF P R
0x1d1f10…1d20a4 Dummy {f00=0x0094, f01=0x0190, f02=» BUT ^ . P* IS OVERLAYED ON THE FIRST BLOCK BUFFER P* > PDMIFIN EQU * H P RORG BUFAR P* p PDMI020 EQU * z P* P* INITIALIZE SYSTEM FWT P* P LD A3,SCTFWT ADDR FIRST FWT & P ST A3,FDBSTA QUEUE FIRST FOR EV
0x1d20a4…1d2238 Dummy {f00=0x0094, f01=0x018e, f02=»L A6,CRNEND P CF A15,DMIN30 P* * < P* CLEAR USE BIT AND BUFFER HEADER WORDS IN DM BUFFERS 4 P* t P LDKL A2,/FFFE ~ P LD A3,CURBUF PDMIN50 LDR* A3,A3 P ANRS A2,A3 CLEAR USE BIT P CM BUFDMI,A3 P CM BUFSNR,A
0x1d2238…1d23cc Dummy {f00=0x0094, f01=0x0190, f02=» P* P* P* IN; A2 = LENGTH P* A3= LINK ROOT 2 P* A6= AREA END ADDR P PDMIN30 LDR A4,A3 r P ADR A4,A2 P* P* DIV W. 2 FOR 16 K LIMIT P* P LDR A5,A4 P SRL A5,1 P LDR A1,A6
0x1d23cc…1d2560 Dummy {f00=0x0094, f01=0x4090, f02=»DMIN40 EQU * P SUR A3,A2 P CMR A3 END OF FDB CHAIN & P ADKL A15,4 F P ABR* A15 Z P RORG DMIFIN l P END @ 4,A2 P* P* DIV W. 2 FOR 16 K LIMIT P* P LDR A5,A4 P SRL A5,1 P LDR A1,A6
0x1d2560…1d26f4 (5, 43) Dummy {f00=0x0094, 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
0x1d26f4…1d2888 Dummy {f00=0x0094, f01=0x018e, f02=»Y l P* P* & PX:A EQU 2000 RECEIVE BUFFER LENGTH PRBUFL EQU X:A H PX:B EQU /60 DCTASK FILE CODE ^ PDC15FC EQU /60 $ PX:C EQU 1 IF 1 INTERRUPT LOGGING PLOGG EQU X:C " PX:D EQU 600 POLL TIMEOUT VALUE PTIMPOL EQU X:D
0x1d2888…1d2a1c Dummy {f00=0x0094, f01=0x0190, f02=» & PX:G EQU 254 TRANSMIT BLOCK LENGTH PTBLEN EQU X:G . ( PX:H EQU 0 CODE , 0=ASCII , 1=EBCDIC D PCODE EQU X:H p * PX:I EQU 1 IF 1 SPECIFIC POLL HANDLING PSPECP EQU X:I , PX:J EQU 1 IF = 1 LINE SPEED SET TO HIGH ( P IF = 0 LINE
0x1d2a1c…1d2bb0 Dummy {f00=0x0094, f01=0x0190, f02=»RECEIVE BUFFERS (2-5) | PRBUFNR EQU X:L . PX:M EQU 0 IF = 1 PTS 6805 ADAPTION SALCUZ 4 PP6805 EQU X:M f PX:N EQU /02 | P IFT P6805=0 , PLCUIN EQU X:N DEVICE ADDRESS OF RECEIVER P XIF P IFT P6805=1 , PLCUIN EQU /0A DEVICE
0x1d2bb0…1d2d44 Dummy {f00=0x0094, f01=0x0190, f02=»NG TO DC TASK t PMESPAS EQU X:P 4 PX:Q EQU 0 IBM-3270 EMULATION PACKAGE, IF NOT = 0 , PEM3270 EQU X:Q d PX:R EQU 1000 z $ PTBUFL EQU X:R MMU BUFFER LENGTH * PBINTRM EQU 0 IF 1 BINARY TRANSMISSION , PTSTREQ EQU 0 IF 1 TEST REQUEST HANDL
0x1d2d44…1d2ed8 Dummy {f00=0x0094, f01=0x0190, f02=»CK RESPONSE TO A SELECT | 0 P SEQUENCE, NOWACK SHOULD BE SET TO "ONE". , P ONLY WORKING IF STAT IS SET TO "ONE". T P IFT P6805=0 SALCUZ < PLCUUT EQU LCUIN+/10 DEVICE ADDRESS OF TRANSMITTER SALCUZ P XIF SALCUZ P IFT P6805=1 <
0x1d2ed8…1d306c Dummy {f00=0x0094, f01=0x0190, f02=»************************************* P* . P* CONDITIONAL ASSEMBLY 8 P* V . P***************************************** ` P* . P* A PROGRAM VERSION USING TOSS MMU PAGING * P* IS OBTAINED BY SETTING MMUPAG EQU 1. P* PMM
0x1d306c…1d3200 Dummy {f00=0x0094, f01=0x0190, f02=»0. h P* PCPU852 EQU 1 P* ( 2 PDEVIND EQU -2 DEVICE INDEX DATA COMMUNICATION 2 * PBUFLEN EQU TBUFL+TBUFL MMU BUFFER SIZE h P* P EJECT P* P* DWT DISPLACEMENTS P* 0 PDWTDRD EQU /10 START OF DRIVER DEFINED PAR
0x1d3200…1d3394 (5, 44) Opaque[0x194]
0x1d3394…1d3528 # DirEnt {nam=»DMFDB «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1298, f03=0x0000}
0x1d3394…1d3528 IdxSect {
0x1d3394…1d3528 f00 = 0x0094 // 0x1d3394 @0x0
0x1d3394…1d3528 f01 = 0x0002 // 0x1d3396 @0x2
0x1d3394…1d3528 gno = [ // 0x1d3398 @0x4
0x1d3394…1d3528 [0x00]: C0x0094.0x3.0
0x1d3394…1d3528 ]
0x1d3394…1d3528 }
0x1d3528…1d36bc Dummy {f00=0x0094, f01=0x0190, f02=» 0 P IDENT DMFDB REL 10.0 80-03-14 870105041000 P 8 8 P**************************************************** @ P* | $ P* PHILIPS TERMINAL SYSTEM PTS P* ( P* THIS MODULE CONTAINS AREAS FOR : P* CURRENCY P* MASTER I
0x1d36bc…1d3850 Dummy {f00=0x0094, f01=0x0190, f02=»RY CRNEND P ENTRY MXIND P EJECT & P* 4 6 P* MXSIZ IS THE SIZE OF THE MASTER INDEX AREA IN > P* WORDS x P* PX:C EQU 0 $ PMXSIZ EQU X:C MASTER INDEX AREA P IFF MXSIZ=0 INDEXES " PCRBUFL EQU 12 SIZE CRN BUFFER
0x1d3850…1d39e4 Dummy {f00=0x0094, f01=0x0190, f02=»RERA IN WORDS f 4 P* WHERE CRBUFL BYTES ARE USED FOR EACH BUFFER P* N PX:B EQU 50 X PCRNBAR EQU X:B CURRENCY AREA j P* P* PX:A EQU 250 P* P EJECT P* PCRNQUE DATA 0 CRN LINK ROOT P IFF CRNBAR=
0x1d39e4…1d3b78 Dummy {f00=0x0094, f01=0x4170, f02=»* LENGTH INDEX INDEX ~ P DATA MXAR MASTER INDEX ADDR " P DATA MXSIZ MASTER INDEX SIEZE @ P IFF MXSIZ=0 f * P DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 z * P DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 P XIF PMXINDE EQU * END INDEX INDEX 2 P D
0x1d3b78…1d3d0c Dummy {f00=0x0094, 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*
0x1d3d0c…1d3ea0 Dummy {f00=0x0094, f01=0x0190, f02=» P* NORMAL REGISTER USAGE P* * " P* REGISTER A1 = RETURN CODE 4 ( P* A2 = OUTPUT CHARACTER Z $ P* A3 = BUFFER INDEX $ P* A4 = WORK REGISTER " P* A5 = STACK BASE " P*
0x1d3ea0…1d4034 (5, 45) Opaque[0x194]
0x1d4034…1d41c8 # DirEnt {nam=»DMINIT«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x12a0, f03=0x0000}
0x1d4034…1d41c8 IdxSect {
0x1d4034…1d41c8 f00 = 0x0095 // 0x1d4034 @0x0
0x1d4034…1d41c8 f01 = 0x0002 // 0x1d4036 @0x2
0x1d4034…1d41c8 gno = [ // 0x1d4038 @0x4
0x1d4034…1d41c8 [0x00]: C0x0095.0x0.0
0x1d4034…1d41c8 ]
0x1d4034…1d41c8 }
0x1d41c8…1d435c Dummy {f00=0x0095, f01=0x0190, f02=» 2 P IDENT DMINIT REL 10.0 80-03-14 870105041000 P : 8 P**************************************************** B P* ~ $ P* PHILIPS TERMINAL SYSTEM PTS P* 0 P* DMINIT = DATA MANAGEMENT INITIALIZATION P* P* P*
0x1d435c…1d44f0 Dummy {f00=0x0095, f01=0x0190, f02=»FFER HEADER IN DM BUFFERS p P* " , P* DMINIT IS CALLED AS A PFINIT ROUTINE , P* " P* REGISTERS A1 - A6 ARE USED f P EJECT P* P ENTRY DMINIT P ENTRY DMI010 FROM DMBUF P* P EXTRN INIFLG P EXTRN DMI020
0x1d44f0…1d4684 Dummy {f00=0x0095, f01=0x406e, f02=» . P ABL(NZ) DMI020 FIRST ACTIVATION AFTER IPL PDMI010 EQU * : P RTN A15 N P END ^@ jSTERS A1 - A6 ARE USED f P EJECT P* P ENTRY DMINIT P ENTRY DMI010 FROM DMBUF P* P EXTRN INIFLG P EXTRN DMI020
0x1d4684…1d4818 Dummy {f00=0x0095, 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
0x1d4818…1d49ac Dummy {f00=0x0095, f01=0x0190, f02=»ACE PSTX EQU /82 START OF MESSAGE PETB EQU /97 END OF MESSAGE 0 PETX EQU /03 LAST DUMMY R . PRETURN EQU /12 RETURN TO ALPHANUMERIC MODE p * PESCAPE EQU /11 ESCAPE TO GRAPHIC MODE " PPOINT EQU /2E POINT CHARACTER 2 PEQU EQU 6 THRESHOL
0x1d49ac…1d4b40 Dummy {f00=0x0095, f01=0x0190, f02=»****** P* RETURN CODES * P******************** * P* F " PCCERR EQU /4 CODE CHECK ERROR P ( POPERR EQU /1 NOT OPERABLE, POWER OFF v P* P EJECT P* P* . P***************************************** . P* CON
0x1d4b40…1d4cd4 (5, 46) Opaque[0x194]
0x1d4cd4…1d4e68 # DirEnt {nam=»DMOPCL«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x12a8, f03=0x0000}
0x1d4cd4…1d4e68 IdxSect {
0x1d4cd4…1d4e68 f00 = 0x0095 // 0x1d4cd4 @0x0
0x1d4cd4…1d4e68 f01 = 0x0014 // 0x1d4cd6 @0x2
0x1d4cd4…1d4e68 gno = [ // 0x1d4cd8 @0x4
0x1d4cd4…1d4e68 [0x00]: C0x0095.0x1.0
0x1d4cd4…1d4e68 [0x01]: C0x0095.0x2.0
0x1d4cd4…1d4e68 [0x02]: C0x0095.0x3.0
0x1d4cd4…1d4e68 [0x03]: C0x0096.0x0.0
0x1d4cd4…1d4e68 [0x04]: C0x0096.0x1.0
0x1d4cd4…1d4e68 [0x05]: C0x0096.0x2.0
0x1d4cd4…1d4e68 [0x06]: C0x0096.0x3.0
0x1d4cd4…1d4e68 [0x07]: C0x0097.0x0.0
0x1d4cd4…1d4e68 [0x08]: C0x0097.0x1.0
0x1d4cd4…1d4e68 [0x09]: C0x0097.0x2.0
0x1d4cd4…1d4e68 ]
0x1d4cd4…1d4e68 }
0x1d4e68…1d4ffc Dummy {f00=0x0095, f01=0x0190, f02=» 2 P IDENT DMOPCL REL 10.0 80-03-14 870105041000 P : P =3 ,RECORD LGTH 256 B P 79-11-28 ` P =2, COMMIT CHECK t P 79-11-22 P =1 ,CONCURRENT OPEN P 79-11-02 8 P**************************************************
0x1d4ffc…1d5190 Dummy {f00=0x0095, f01=0x0190, f02=»IT IS ACTIVATED FROM DMTASK P* $ P* . P* 8 P* B P* L 8 P**************************************************** V P* P EJECT P* P*************** P* ENTRIES * P*************** P* P*
0x1d5190…1d5324 Dummy {f00=0x0095, f01=0x0190, f02=» ~ P* . P EXTRN CLRBUF,CRNCDF,CRNCIF,CRNGET,CRNQUE P EXTRN ECBRC D 4 P EXTRN FDBADF,FDBBLF,FDBCRL,FDBECB,FDBKA,FDBLRN X . P EXTRN FDBMEC,FDBMIA,FDBNIF,FDBRLE,FDBSTA P EXTRN FDBTNR P EXTRN FNDFDB,DMTWM P EXTRN FWTFNR,FWTPAR
0x1d5324…1d54b8 Dummy {f00=0x0095, f01=0x0190, f02=»FDBBLZ t P EXTRN ECBFC P EXTRN ECBBA " P EXTRN ECBEL 6 P EXTRN ECBRL J P EXTRN DWTECB ^ P EXTRN DWTOR t P EXTRN DWTTAB,DWTOPT,BLKMXL 4 P EXTRN FPB:RL,FPB:BF,FPB:FO,FPB:BO,FPB:FN,FPB:EL B P EXTRN FPB:V1,FPB:S1,FPB:V2,FPB:S2,F
0x1d54b8…1d564c Dummy {f00=0x0095, f01=0x0190, f02=» P EXTRN CRNSTA,DFTAB,DMTIDP P EXTRN MONMMU,DMTERX,QCL * P EXTRN DMTRBU,DMTBM J P EXTRN DMTIOT f P EXTRN EARELB | P EXTRN TASHLT P EXTRN FDBEAL P EXTRN RECBFZ,REQERR P EXTRN DMTBMR P EJECT DMTASK P
0x1d564c…1d57e0 Dummy {f00=0x0095, f01=0x0190, f02=»* IS OBTAINED BY SETTING MMUPAG EQU 1. P* . PMMUPAG EQU 0 8 P* L * V P* ` 6 P* A PROGRAM VERSION FOR INDEXED ACCESS HANDLING j * P* IS OBTAINED BY SETTING INDXAC = 1 PX:B EQU 0 PINDXAC EQU X:B P* P*
0x1d57e0…1d5974 (5, 47) Dummy {f00=0x0095, f01=0x0190, f02=» $ PFPB:NI EQU FPBSTA+68 NR OF INDEX $ PFPB:I1 EQU FPBSTA+70 INDEX ID 1 , ( PFPB:K1 EQU FPBSTA+77 NR OF KEY ITEMS T $ PFPB:A1 EQU FPBSTA+78 KEY ADDR 1 & PFPB:L1 EQU FPBSTA+80 KEY LENGTH 1 PFPB:I2 EQU FPBSTA+82 PFPB:L4 EQU FPBSTA+116
0x1d5974…1d5b08 Dummy {f00=0x0095, f01=0x0190, f02=»ESERVED FIELD LENGTH IN FILE PAR BLOCK P* . $ PNOCORE EQU 1 NO CORE ERROR CODE 8 P* ` " PERPAR EQU 4 WRONG PAR ERR CODE j P* POFLW EQU 3 OVERFLOW ERR CODE P* " PERKEYL EQU 8 LONG KEY ERR CODE P EJECT P************
0x1d5b08…1d5c9c Dummy {f00=0x0095, f01=0x0190, f02=»: ( P* OPEN,CLOSE,READ FILE PARAMETERS. P* 6 POPESPA DATA ' ' 2 SPACES @ " POPEFN EQU * FILE NAME PREFIXES b P DATA ' ' P DATA 'I1M1' P DATA 'I2M2' P DATA 'I3M3' P DATA 'I4M4' POPEFNR EQU * OPENED FILE NRS
0x1d5c9c…1d5e30 Dummy {f00=0x0095, f01=0x0190, f02=» ( POPEMXI EQU * MASTER INDEX ADDRESSES P DATA 0,0,0,0,0 4 0 POPELRN DATA 0,0,0,0,0,0,0,0,0,0 LAST REC NRS L ( POPEKAD DATA 0,0,0,0,0 KEY ADDRESSES $ POPEKYL DATA 0,0,0,0,0 KEY LENGTH PDELAY DATA 0 $ PNROFIX DATA 0 NR OF INDEX FILES
0x1d5e30…1d5fc4 Dummy {f00=0x0095, f01=0x0190, f02=» P EJECT $ PDMRFP EQU * READ FILE PARAMETERS P* : P* A1 = A6 D $ P* A6 = FDB ADDRESS ALL ORDERS X " P* A7 = ORDER CODE ALL ORDERS P* P LDR A10,A6 FBD ADDR " P LC A6,FDBNIF,A10 NR OF INDEX P ANK A6,/FF P S
0x1d5fc4…1d6158 Dummy {f00=0x0095, f01=0x0190, f02=»F(N) OPE099 ALL FILES P LDR A4,A10 P ADR A4,A5 2 P LD A3,FDBADF,A4 FDB ADDR D P RF(Z) RFP130 NO FILE f P LC A6,FWTFNR,A3 FILE NR PRFP130 EQU * P LDR A4,A5 P SRL A4,1 " P SC A6,OPEFNR,A4 SAVE FILE NR P RB RF
0x1d6158…1d62ec Dummy {f00=0x0095, f01=0x0190, f02=» PDMOPEN EQU * OPEN P* " P* A8 = ECB ADDR , P* A9 = FPB ADDR F P* A10= SYSTEM FWT ADDR ` P* A11= CURRENT FWT ADDR & P* A12= LOOP COUNTER (FILE INDEX) P* P LDKL A9,OPEFPB AS ABOVE P* CHECK OPTIONS
0x1d62ec…1d6480 Dummy {f00=0x0095, f01=0x0190, f02=»C P SUK A2,/8 P RF(NZ) OPE020 NOT INPUT P ANK A3,/3 < P RF(NZ) OPEERR ONLY UNPROT N P RF OPE030 p POPE020 EQU * P SUK A2,/30 P RF(NZ) OPEERR NOT INP/OUTP P ANK A3,/3 $ P RF(Z) OPEERR UNPROT NOT ALLOWED P
0x1d6480…1d6614 (5, 48) Dummy {f00=0x0095, f01=0x0190, f02=» 1 = DATA FILE P* 2 = INDEX 1 P* 3 = MASTER INDEX 1 6 P* 4 = INDEX 2 Z P* ETC x P* P* CLEAR WORK AREA P* & P LDK A2,OPEEND NR OF BYTE TO CLEAR POPE050 EQU * P SUK A2,2
0x1d6614…1d67a8 Dummy {f00=0x0095, f01=0x0190, f02=»RAMETER BLOCK P* $ P LD A3,DWTECB,A10 USER ECB ADDR " P LD A1,ECBBA,A3 FD ADDR USER H " P ADK A1,FPBRES RESERVED FIELDS n P LDR A2,A9 FPB ADDR $ P LDK A3,FPB:L4+1 MAX SIGN LENGTH P IFT MMUPAG=1 $ P LD A4,DWTTAB,A10 USER TTA
0x1d67a8…1d693c Dummy {f00=0x0095, f01=0x0190, f02=» XIF P IFT INDXAC=1 P* " $ P* SAVE VOLUME NAME INDEX FILES , P* T P LDR A1,A9 FPB ADDR ^ P ADKL A1,FPB:IV FROM ADDR z P LDKL A3,INDVOL TO ADDR P LDK A2,6 P CF A14,DMTBM P XIF " P LC A5,FPB:BO,A9 TOSS OP
0x1d693c…1d6ad0 Dummy {f00=0x0095, f01=0x0190, f02=» RF(Z) OPE099 STANDARD FILE $ P LD A5,DWTECB,A10 USER ECB ADDR $ P LD A5,ECBRL,A5 REQ LGTH L P CWK A5,FPB:NI+FPBRES l P RF(NG) OPEERR NO INDEX " P LC A5,FPB:NI,A9 NR OF INDEXES P SC A5,NROFIX+1 P EJECT P* ( P* SAVE
0x1d6ad0…1d6c64 Dummy {f00=0x0095, f01=0x0190, f02=»FSET INDEX 1 POPE070 EQU * P SUK A5,1 ( P RF(N) OPE099 ALL INDEXES : P LDK A1,0 P LC A1,-1,A2 NR OF KEY ITEMS n P SUK A1,1 P RF(NZ) OPEER4 ERR P LC A1,2,A2 KEY LENGTH P ST A1,OPEKYL,A3 P LDR* A1,A2 KEY OFFS
0x1d6c64…1d6df8 Dummy {f00=0x0095, f01=0x0190, f02=»L A12,1 DATA FILE INDEX POPE100 EQU * FILE LOOP P* > P* OPEN FM FILE H P* ` P LDKL A9,OPEFPB FPB ADDR j P LDR A8,A10 P ADKL A8,FDBECB ECB ADDR P ST A9,ECBBA,A8 FPB ADDR P LC A5,FPB:BO,A9 P ANK A5,1 ( P
0x1d6df8…1d6f8c Dummy {f00=0x0095, f01=0x0190, f02=»10 READ FILE PAR ORDER P LDK A7,/A1 OPEN P LKM 6 P DATA 15 B P LDR A1,A10 MAIN FDB R P CF A14,DMTIOT ERR CHECK n P LDR A1,A1 P RF(NZ) OPEER0 ERR P EJECT P* P* STORE FILE NR P* P LDR A1,A12 LOOP I
0x1d6f8c…1d7120 Dummy {f00=0x0095, f01=0x0190, f02=» IN A11 P* P ANK A6,/FF " P LDKL A11,FDBSTA SYST FDB ADDR . P LDR A3,A6 FILE NR T POPE150 EQU * n P RF(Z) OPE190 END COUNT P LDR* A11,A11 NEXT FDB P ANKL A11,/FFFE USE BIT P SUK A3,1 P RB OPE150 P EJE
0x1d7120…1d72b4 (5, 49) Dummy {f00=0x0096, f01=0x0190, f02=» P ANK A6,/F BIT 4-7 IN RC " P RF(Z) OPEERA NO SPECIAL CODE $ & P ANK A6,/A GET BIT 4 AND 6 FROM RC J P ADK A6,1 B4=9,B5=1,B6=3 t POPEERS EQU * P LDR A1,A10 SYST FDB & P CF A14,CRNGET GET CURRENCY BUFFER P SC A6,CRNSTA,A2 STAT CODE
0x1d72b4…1d7448 Dummy {f00=0x0096, f01=0x0190, f02=»A9,DWTECB,A10 USER ECB ADDR P ORS A1,ECBRC,A9 SEND CODE $ P ABL OPEER1 F POPEER3 LDK A6,OFLW OVERFLOW Z P RF OPEERQ ~ ( POPEER4 LDK A6,ERPAR WRONG PARAMETER POPEERQ LDKL A5,REQERR BIT 0 P RB OPEERS " POPEER8 LDK A6,ERKEYL L
0x1d7448…1d75dc Dummy {f00=0x0096, f01=0x0190, f02=» STR A6,A8 FILE NR P LDK A7,/83 RFP P LKM 2 P DATA 15 > P LDR A1,A10 MAIN FDB N P CF A14,DMTIOT ERR CHECK j P ORS A1,ECBRC,A9 RET CODE P LDKL A9,OPEFPB FPB ADDR P CWK A12,1 P RF(NE) OPE192 INDEX FILE P LD A7,N
0x1d75dc…1d7770 Dummy {f00=0x0096, f01=0x0190, f02=»LOOPER , P SUR A13,A13 REL ADDR IN TABLES OF OPEN P RF OPE191 > POPE192 EQU * P P LDR A7,A12 d P ANK A7,/FE REL ADDR x P LDR A13,A7 POPE191 EQU * P CWK A10,FDBSTA ( P ABL(NE) OPE300 READ FILE PAR ORDER P LDR A1,
0x1d7770…1d7904 Dummy {f00=0x0096, f01=0x0190, f02=» P RB(NE) OPEERR NOT STD FILE P LC A3,FPB:US,A9 NR OF USERS , P SUK A3,1 P P RF(Z) OPE195 FIRST OPEN b P LC A3,DWTOPT,A10 OPTION P LDR A2,A3 P ANK A3,/02 EXCL , P RB(NZ) OPEERR EXCLUSIVE WANTED IN VAIN P ANK A2,/3 W
0x1d7904…1d7a98 Dummy {f00=0x0096, f01=0x0190, f02=»DBNIF,A11 NR OF INDEX BEFORE FOR THIS FILE P CW A3,NROFIX NR OF INDEXES 2 $ P RB(NE) OPEER4 ALW SAME INDEXES V P LD A2,DELAY ~ * P RF(N) OPE193 2ND DELAY WANTED IN VAIN P LDKL A2,/7FFF P ANS A2,FDBDBR,A11 NO DELAY POPE193 EQU *
0x1d7a98…1d7c2c Dummy {f00=0x0096, f01=0x0190, f02=»DBECB LENGTH POPE196 EQU * P SUK A2,2 ( P RF(N) OPE200 OK : P LDR A7,A11 R P ADR A7,A2 f P CM FDBECB,A7 x P RB OPE196 POPE200 EQU * P LD A2,DELAY , P ST A2,FDBDBR,A11 SET DELAY FOR NEW FILE P EJECT P*
0x1d7c2c…1d7dc0 Dummy {f00=0x0096, f01=0x0190, f02=»C A3,FPB:BF,A9 " P SC A3,FDBBLF,A11 BLOCK FACTOR P LD A3,NROFIX NR OF INDEXES < ( P SC A3,FDBNIF,A11 NR OF INDEX FILES ` P LC A3,FPB:FR+1,A9 P SC A3,FDBLRN,A11 P LD A3,FPB:FR+2,A9 $ P ST A3,FDBLRN+1,A11 LAST REC NR P LD A3
0x1d7dc0…1d7f54 (5, 50) Dummy {f00=0x0096, f01=0x0190, f02=»KAD,A13 P RB(NE) OPEER4 WRONG KEY P ST A3,FDBKA,A11 KEY ADDR 0 POPE255 EQU * R P LC A3,FPB:BO,A9 f * P SLL A3,6 TOSS OPTIONS DELAY AND BASIC ~ P LC A4,DWTOPT,A10 P ANK A4,/3 OPTIONS P ORR A3,A4 P ANK A4,1 =2 P
0x1d7f54…1d80e8 Dummy {f00=0x0096, f01=0x0190, f02=»ASIC + OPTION | P* CALCULATE DMTASK ID P* 6 , P LC A3,FWTVOL,A11 FIRST EXTENT VOLUME FC @ P LDK A6,0 p POPE260 CC A3,DFTAB,A6 P RF(E) OPE270 THIS DISC P ADK A6,1 $ P RB OPE260 SEARCH NEXT DISC CODE ( POPE270 LC A3,D
0x1d80e8…1d827c Dummy {f00=0x0096, f01=0x0190, f02=»A11 REC LENGTH P ADK A6,1 P LDK A7,0 ( P LC A7,FDBBLF,A11 BLOCK FACT : P SUK A7,1 ^ P CF A14,MPYMOD A1,A2=A6*A7 p P ST A2,FDBMRO,A11 MAX FDBRRO P* CALCULATE BLOCK SIZE P* P AD A2,FDBRLE,A11 BLOCK LGTH P ADK
0x1d827c…1d8410 Dummy {f00=0x0096, f01=0x0190, f02=»1 POPE290 EQU * ! P SC A2,FDBBLZ,A11 BLOCK SIZE ! P SLL A2,7 WORDS ! B P CWK A2,BLKMXL ! Z ( P ABL(G) OPEER4 TOO LARGE BLOCK SIZE ! p P ST A11,FDBADF,A11 ! POPE300 EQU * ! $ P ST A11,OPEFWT,A13 SAVE FWT ADDR ! P LDR A13,A13 ! P
0x1d8410…1d85a4 Dummy {f00=0x0096, f01=0x0190, f02=» $ POPE400 EQU * MASTER INDEX BRANCH " P CWK A10,FDBSTA " , ( P ABL(NE) OPE700 ORDER READ FILE PAR " D P LDR A8,A10 " p P ADKL A8,FDBECB ECB ADDR " P LD* A3,DWTECB,A10 FILE CODE " P ANK A3,/FF " * P ST A3,-36,A14 FC ENTRY IN TTAB DMTASK "
0x1d85a4…1d8738 Dummy {f00=0x0096, f01=0x018e, f02=»NO COMMIT CHECK =2 " | P LDK A2,1 # 4 P SC A2,FDBDMI,A11 LET DMTASK 1 READ MASTER INDEX # , P* # d 0 P* CALC NO OF WORDS NEEDED IN MASTRE INDEX # n P* # P LD A6,FPB:RL,A9 REC LGTH # P LDR A1,A6 # P SUK A1,3 KEY LENGTH # P CW A1,OPEKY
0x1d8738…1d88cc Dummy {f00=0x0096, f01=0x0190, f02=» P SRC A1,1 $ P ORR A2,A1 GET MOST SIGN BIT $ P ADK A2,5 $ : P SRL A2,1 NO OF WORDS NEEDED $ L P RF(Z) DMT570 WRONG SIZE $ p P LD A4,MXIND LENGTH MXIND $ P SUK A4,4 MAX A5 VALUE $ P LDKL A5,-2 OFFSET $ PDMT540 EQU * $ P ADK A5,4
0x1d88cc…1d8a60 Dummy {f00=0x0096, f01=0x0190, f02=»XIND+2,A5 $ P RB(N) DMT540 ENTRY USED % P SUR A6,A2 NO OF SPARE WORDS % 2 & P RB(N) DMT540 LARGER ENTRY NEEDED % V P* % P* SUFFICIENT SPACE FOUND % P* % P LDKL A1,/8000 USED BIT % & P ORS A1,MXIND+2,A5 MARK ENTRY USED % P LDR A7,
0x1d8a60…1d8bf4 (5, 51) Dummy {f00=0x0096, f01=0x0190, f02=»A1,FPB:RL,A9 % P ST A1,2,A3 ENTRY LENGTH & P ADK A3,4 SKIP MX HEADRER & 4 P ST A3,ECBBA,A8 BUFFER ADDR & V P ST A1,ECBRL,A8 REQ LGTH & z . P LDR A1,A5 MXIND ENTRY PAR TO REACTIVATION & P CWR A1,A4 MXIND ENTRY & P RF(NL) DMT590 LAST ENTRY &
0x1d8bf4…1d8d88 Dummy {f00=0x0096, f01=0x0190, f02=»,MXIND+2,A1 & " P ANKL A2,/7FFF REMOVE USE BIT ' P SUR A2,A6 ' : P ORKL A2,/8000 USE BIT ' L P ST A2,MXIND+2,A1 ' j . P ADS A6,MXIND+6,A1 MAKE NEXT ENTRY LARGER ' $ P LD A7,MXIND,A1 PREVIOUS POINTER ' P SLL A2,1 NO OF BYTES ' P ADR A7,A2 '
0x1d8d88…1d8f1c Dummy {f00=0x0096, f01=0x018e, f02=» P LDKL A7,/0082 SEQ READ ( P LKM ( $ P DATA 1 ( 0 P LD A2,ECBRC,A8 ( @ & P ANKL A2,/FEFF BIT 7 ONLY RETRIES ( X P RF(Z) DMT560 NO ERROR ( P* ( " P* REMOVE THE ONLY CRN BUFFER ( P* ( P LDR A4,A11 FDB ADDR ( P LD A5,FDBCRL,A4 C
0x1d8f1c…1d90b0 Dummy {f00=0x0096, f01=0x0190, f02=» ( P ENB ) PDMT553 EQU * ) P LDR A1,A2 ) ( P ANKL A2,/1000 BIT 3 = EOF ) : 0 P RF(NZ) DMT595 READY ,WHOLIE MXINDEX IS READ ) P ABL OPEER2 ERR ) PDMT560 EQU * ) P* ) P* RECORD READ,READ NEXRT ) P* ) P LD A2,ECBRL,A8 )
0x1d90b0…1d9244 Dummy {f00=0x0096, f01=0x0190, f02=» OPEERQ ) P* CLOSE MASTER INDEX FILE * P* * 4 PDMT595 EQU * * > " P ST A10,-34,A14 CLOSE FC ENTRY * R P LDR A8,A10 FWT ADDR * x P ADKL A8,FDBECB ECB ADDR * $ P CM FPB:FR+2,A9 DO NOT WRITE LRN * P LDR A7,A12 LOOP COUNT * P SRL A7,1 *
0x1d9244…1d93d8 Dummy {f00=0x0096, f01=0x0190, f02=»UF RELEASE ALL FREE BUFFERS * P LKM + $ P DATA 15 + 0 P LDR A1,A10 MAIN FDB + @ P CF A14,DMTIOT ERR CHECK + P LDR A1,A1 + | P ABL(NZ) OPEER2 + P LDKL A9,OPEFPB FPB ADDR + P RF OPE700 NEXT FILE + P EJECT + POPE600 EQU * INDEX FILE
0x1d93d8…1d956c Dummy {f00=0x0096, f01=0x0190, f02=»FILLER + P SC A2,FPB:NI,A9 NR OF INDEX , P LDR A3,A12 , 2 P SRL A3,1 , F P LDR A2,A3 , X P LDR A4,A9 , j P LDKL A5,FPB:I2 , | P SUKL A5,FPB:I1 OFFSET , P SUR A4,A5 , POPE630 EQU * , P ADR A4,A5 REL ADDR , P SUK A2,1 NEXT INDEX
0x1d956c…1d9700 Dummy {f00=0x0096, f01=0x0190, f02=» CM FPB:I1+4,A4 , P LDK A7,1 - " P ST A7,FPB:I1+6,A4 NR OF ITEMS - * P LD A7,FDBKA,A11 KEY OFFSET - P P ST A7,FPB:A1,A4 KEY ADDR - t P LD A7,FDBRLE,A11 REC LGTH - P SUK A7,6 - P CM FPB:L1,A4 FILLER - P SC A7,FPB:L1,A4 KEY LENGTH -
0x1d9700…1d9894 (5, 52) Dummy {f00=0x0096, f01=0x0190, f02=»DEX SIZE - P* . P LD A1,FPB:S1,A9 . & P LD A2,FPB:S1+2,A9 SIZE IN SECTORS . 2 P LC A6,FDBBLZ,A11 BLOCK SIZE . P ANK A6,/FF . P CF A14,DIVMOD . P ABL(O) OPEER3 LONG FILE . P CM FPB:IS,A9 . & P ST A2,FPB:IS+2,A9 SIZE IN BLOCKS .
0x1d9894…1d9a28 Dummy {f00=0x0096, f01=0x0190, f02=»3,A9 TO . P LDK A2,6 LGTH / P CF A14,DMTBM MOVE / & P XIF / @ P EJECT / L P* / Z POPE700 EQU * NEXT FILE / d P IFF INDXAC=1 NO INDEX / P RF OPE900 NO INDEX / P XIF / P IFT INDXAC=1 INDEXES YES / P SUKL A12,1 FILE LOOP / P
0x1d9a28…1d9bbc Dummy {f00=0x0096, f01=0x0190, f02=» , P* SKIP MASTER INDEX AT SECONDARY OPEN 0 P* 0 4 P LD A1,OPEFWT DATA FILE 0 > P LC A1,FWTPAR,A1 0 ^ $ P ANK A1,/3E NR OF OPEN BEYOND 1 0 v P RF(Z) OPE710 FIRST 0 P ANKL A12,/E NO MASTER INDEX 0 POPE710 EQU * 0 P* 0 P* NEXT FIL
0x1d9bbc…1d9d50 Dummy {f00=0x0096, f01=0x0190, f02=»ME 0 x P* 1 & P* FETCH VOLUME NAME FOR INDEXES 1 P* 1 > P LDKL A1,INDVOL FROM ADDR 1 H P LDR A3,A9 1 j P ADKL A3,FPB:V1 TO ADDR 1 | P LDK A2,6 1 " P CF A14,DMTWM MOVE VOLUME NAME 1 P* 1 * P* MOVE SPACES TO OTHER VOLUME NAMES 1
0x1d9d50…1d9ee4 Dummy {f00=0x0096, f01=0x0190, f02=»FROM ADDR 1 P LDR A3,A9 2 P ADKL A3,FPB:V2 2 $ P ADR A3,A6 TO ADDR 2 < P LDK A2,6 NR OF CHAR 2 V P CF A14,DMTWM 2 r P RB OPE750 2 . POPE740 EQU * GET FILE NR FOR READ FILE PAR 2 P LDR A7,A12 2 P SRL A7,1 2 P LC A6,OPEFNR,A7 2
0x1d9ee4…1da078 Dummy {f00=0x0096, f01=0x0190, f02=»JECT 2 POPE800 EQU * DATA FILE 3 P* 3 * P* UPDATE USER PAR BLOCK 3 4 P* 3 V P LC A2,FDBNIF,A11 3 ` P ANK A2,/FF 3 z P RF(Z) OPE830 NO INDEX 3 P LDK A2,1 3 POPE830 EQU * 3 P SC A2,FPB:FO,A9 FILE ORG 3 P LDK A2,1 3 " P S
0x1da078…1da20c Dummy {f00=0x0096, f01=0x018e, f02=»C A2,FPB:BO,A9 DELAY BASIC TOSS OPTIONS 3 P* 4 0 & P* CONVERT SIZE TO NR OF RECORDS 4 : P* 4 d P LDK A5,3 4 VOLUMES 4 n P LDR A13,A9 4 POPE850 EQU * 4 ( P LD A1,FPB:S1,A13 LENGTH IN SECTORS 4 P LD A2,FPB:S1+2,A13 4 * P LC A6,FDBBLZ,
0x1da20c…1da3a0 Dummy {f00=0x0096, f01=0x0190, f02=» ( P LC A7,FDBBLF,A11 NR OF REC IN BLOCK 5 P ANK A7,/FF 5 0 P CF A14,MPYMOD NR OF RECS 5 D P ST A1,FPB:S1,A13 5 f P ST A2,FPB:S1+2,A13 5 P ADKL A13,10 5 P SUK A5,1 5 P RB(NN) OPE850 MORE VOLUMES 5 P* 5 " P* MOVE PART OF BLOCK T
0x1da3a0…1da534 (5, 53) Dummy {f00=0x0097, f01=0x018e, f02=»Q LENGTH 5 ~ P SUK A1,FPBRES RESERVED 6 P CWR A3,A1 6 0 P RF(NG) OPE860 TAKE SHORTEST 6 B P LDR A3,A1 6 f POPE860 EQU * 6 x P LDR A1,A3 6 P ADK A1,FPBRES 6 ( P ST A1,ECBEL,A4 SET EFFECTIVE LENGTH 6 P LDR A1,A9 FROM ADDR 6 P IFT MMUPAG=
0x1da534…1da6c8 Dummy {f00=0x0097, f01=0x0190, f02=» 6 P XIF 7 P IFT MMUPAG=0 7 P LDR A2,A3 LENGTH 7 * P LD A3,ECBBA,A4 TO ADDR 7 D P ADK A3,FPBRES RESERVED ITEM 7 d P CF A14,DMTBM MOVE 7 P XIF 7 P* 7 $ P* ADJUST FILE NAME FOR INDEXES 7 P* 7 P LDR A1,A9 7 P ADKL A1,FPB
0x1da6c8…1da85c Dummy {f00=0x0097, f01=0x0190, f02=» EJECT 7 POPE900 EQU * FINISH 8 & P LD A11,OPEFWT FDB ADDR DATA FILE 8 * P CWK A10,FDBSTA 8 T & P RF(NE) OPE990 READ FILE PAR ORDER 8 l P* 8 ( P* STORE FDB ADDRESSES IN ALL FDB'S 8 P* 8 P LDK A5,10 NR OF FILES * 2 8 PDMT625 EQU * 8
0x1da85c…1da9f0 Dummy {f00=0x0097, f01=0x0190, f02=» 8 t P LDKL A1,OPEFWT FROM ADDR 9 P ADKL A3,FDBADF TO ADDR 9 * P LDK A2,10 NO OF BYTES 9 J P CF A14,DMTWM MOVE 5 WORDS 9 h P RB DMT625 9 PDMT635 EQU * 9 P* 9 & P* CONNECT FILE CODE OF DATA FILE 9 P* 9 P LD* A2,DWTECB,A10 FILE CO
0x1da9f0…1dab84 Dummy {f00=0x0097, f01=0x0190, f02=»FNDFDB 9 P ST A11,2,A4 FWT ADDR : P* : , P* REMOVE CURRENCY BUFFER : 6 P* : X P LDR A1,A10 : b P CF A14,CRNGET ADDR IN A2 : v P ADKL A1,FDBCRL ROOT : P INH : POPE940 EQU * : P LDR* A3,A1 NEXT BUFFER : P CWR A3,A2 : P R
0x1dab84…1dad18 Dummy {f00=0x0097, f01=0x0190, f02=» : P STR A3,A2 ; P ST A2,CRNQUE ; P ENB =1 ; 0 POPE990 EQU * ; B P* ; V 2 P* CHECK USER SIZE AND UPDATE PARAMETER BLOCK ; ` P* ; P LDK A1,FPB:IV ; " P LC A2,FDBNIF,A11 NR OF INDEX ; P ANK A2,/F ; P IFT INDXAC=1 ; P RF(
0x1dad18…1daeac Dummy {f00=0x0097, f01=0x0190, f02=» MAX NR OF REM CHAR ; POPE994 EQU * < P XIF < 0 P ADR A1,A9 FROM ADDR < < P LD A3,DWTECB,A10 USER ECB < X P LD A4,ECBRL,A3 TOT LGTH < z P SUK A4,FPB:IV+FPBRES < P CWR A2,A4 REM LGTH < P RF(NG) OPE995 TAKE SHORTEST < P LDR A2,A4 <
0x1daeac…1db040 Dummy {f00=0x0097, f01=0x0190, f02=»,ECBBA,A3 TO ADDR < P ADK A3,FPB:IV+FPBRES = P CF A14,DMTBM MOVE = 8 P XIF = R P IFT MMUPAG=1 = ^ P LDR A4,A2 = t P LD A2,ECBBA,A3 = " P ADK A2,FPB:IV+FPBRES TO ADDER = P LDR A3,A4 LENGTH = $ P LD A4,DWTTAB,A10 USER TTAB ADDR = P C
0x1db040…1db1d4 (5, 54) Dummy {f00=0x0097, f01=0x0190, f02=» EJECT = PDMCLOS EQU * CLOSE > P* > ( P* A1 = A6 > 2 " P* (A3= BLOCK BUFFER ADDRESS ) > F P* (A5 = BLOCK ADDRESS ) > l $ P* A6 = FDB ADDRESS ALL ORDERS > " P* A7 = ORDER CODE ALL ORDERS > P* (A8 = FDBECB ADDRESS ) > P* (A9 = USE
0x1db1d4…1db368 Dummy {f00=0x0097, f01=0x018e, f02=» FM IO > P CF A14,DMTIOT ERR CHECK ? PCLO200 EQU * ? . " P CF A14,DMTRBU RELEASE BUFFER ? B P* ? h P* CLEAR CURRENCY ? r P* ? P LDR A1,A6 FDB ADDR =1 ? * P CF A14,CRNGET GET CURRENCY BUFFER =1 ? P LDK A1,0 ? P SC A1,CRNSTA,A2 STA
0x1db368…1db4fc Dummy {f00=0x0097, f01=0x0190, f02=» P* @ P* BUILD CLOSE TABLES @ P* @ , P LC A7,ECBFC,A9 FILE CODE @ 6 P LDK A5,10 2 * FILES @ X PCLO210 EQU * @ t P SUK A5,2 @ P RF(N) CLO300 ALL FILES @ P LDR A4,A6 @ P ADR A4,A5 @ P LDK A1,0 @ P LDK A2,0 @ P SUR A
0x1db4fc…1db690 Dummy {f00=0x0097, f01=0x0190, f02=»R INDEX ADDR @ z P LC A2,FWTFNR,A3 FILE NR A P LC A9,FDBLRN,A3 LAST REC NR A 4 P LD A10,FDBLRN+1,A3 A X PCLO230 EQU * A t P ST A8,OPEMXI,A5 A P ST A3,OPEFWT,A5 A P LDR A4,A5 A P SRL A4,1 A P SC A2,OPEFNR,A4 FILE NR A P SC A1,OPEFC
0x1db690…1db824 Dummy {f00=0x0097, f01=0x0190, f02=»00 EQU * A P SC A7,OPEFCD FILE CODE B P LDR A10,A6 MAIN FDB ADDR B 0 P EJECT B R $ POPEER1 EQU * RECOVERY AT ERRORS B ` P LDR A6,A10 MAIN FDB B P LD A2,DWTOR,A10 ORDER B P ANK A2,/FF B P CWK A2,QRFP READ FILE PAR B P ABL(E) DMTERX B
0x1db824…1db9b8 Dummy {f00=0x0097, f01=0x018e, f02=»F(NN) OPEE20 MORE FILES B P LDR A6,A10 MAIN FDB ADDR C P LDK A1,0 RET CODE C B P ABL DMTERX C POPEE20 EQU * C p P* RESET FILE CODE* C P* C P LC A2,OPEFCD,A12 FILE CODE C P ANK A2,/FF C P RF(Z) OPEE25 NO CODE C P LDK A5,
0x1db9b8…1dbb4c Dummy {f00=0x0097, f01=0x0190, f02=» C x $ P LDKL A7,FDBSTA SYSTEM FDB ADDR D P ST A7,2,A4 SYSTEM FWT ADDR D 0 POPEE25 EQU * D T P EJECT D h P* D v P* RELEASE EA+CRN BUFFERS D P* D P LDR A7,A12 D P SLL A7,1 WORDS D P LD A11,OPEFWT,A7 FDB ADDR D P RF(Z) DMT894
0x1dbb4c…1dbce0 Dummy {f00=0x0097, f01=0x0190, f02=»WTPAR,A11 D P ANK A5,/3F NR OF USERS E P SUK A5,1 E 2 & P RF(NZ) DMT894 MORE THAN ONE OPEN E D P LD A5,FDBEAL,A11 PRO LINK E n P ABL(NZ) TASHLT DM ERR E P EJECT E P* E P* RELEASE CURRENCY BUFFERS E P* E P LDKL A5,FDBCRL E
0x1dbce0…1dbe74 (5, 55) Dummy {f00=0x0097, f01=0x0190, f02=»ADDRESS E ~ PDMT830 EQU * F & P RF(Z) DMT840 ALL BUFFER S REMOVED F $ $ P LDR* A5,A4 NEXT BUFFER ADDRESS F N P* F v P* RETIURN BUFFER TO POOL F P* F P INH F P LD A3,CRNQUE F P STR A3,A4 F P ST A4,CRNQUE F P ENB F P RB DM
0x1dbe74…1dc008 Dummy {f00=0x0097, f01=0x0190, f02=»INDEX ADDR F x P RF(Z) DMT894 NO MX G P LD A5,MXIND LENTH G . P SUK A5,2 G H PDMT885 EQU * G Z P SUK A5,4 G n P RF(Z) DMT890 FIRST INDEX G P RF(N) DMT894 NO MATER IX G P CW A1,MXIND+2,A5 G P RB(NE) DMT885 G P LD A4,MXIND,A5 G
0x1dc008…1dc19c Dummy {f00=0x0097, f01=0x0190, f02=» NR OF WORDS G P EJECT H P* H " P* H , P* MOVE UP REST OF MXIND H 6 P* H X P LDKL A1,MXIND+6 H b P ADR A1,A5 FROM ADDR H z P LDR A3,A1 H P SUK A3,4 TO ADDR H P LD A2,MXIND H P SUR A2,A5 H P SUK A2,2 NO OF CHAR H P CF
0x1dc19c…1dc330 Dummy {f00=0x0097, f01=0x0190, f02=» P EJECT I P* I P* CLOSE FILE I P* I 2 PDMT894 LDR A8,A10 I < P ADKL A8,FDBECB ECB ADDR I V P LDKL A9,OPEFPB FPB ADDR I v P LDR A7,A12 I P SLL A7,2 2 WORD INDEX I P LD A1,OPELRN,A7 LAST REC NR I P ST A1,FPB:FR,A9 I P LD
0x1dc330…1dc4c4 Dummy {f00=0x0097, f01=0x4142, f02=»,ECBFC-1,A8 FILE NR I " P ST A9,ECBBA,A8 PAR BLOCK ADDR J P LDK A7,/A2 CLOSE J B & P CF A14,CLRBUF CLEAR FREE BUFFERS J P LKM J P DATA 15 J P LDR A1,A10 MAIN FDB J P CF A14,DMTIOT ERR CHECK J P ORS A1,ECBRC,A9 SEND CODE J PDMT898 E
0x1dc4c4…1dc658 Dummy {f00=0x0097, f01=0x2008, f02=» K 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
0x1dc658…1dc7ec Dummy {f00=0x0097, f01=0x0190, f02=»RE ADDRESS TO THIS INTERRUPT TABLE IN MONTAB ( P* IF ANY DEVICE PRESENT ON ANY LINE 4 P* ` * P LD A1,SAVE24,A13 ANY DEVICE PRESENT? j P RF(Z) BIT155 NO! 2 P LD A1,SAVE21,A13 GET INTERRUPT TABLE ADDRESS P ST A1,INTLT1,A7 SAVE P R
0x1dc7ec…1dc980 Dummy {f00=0x0097, f01=0x0190, f02=» INTERRUPT TABLE HAS BEEN SCANNED. | H D* -CHECK IF ALL INTERRUPT TABLES (INTLT1-INTRT4) HAS BEEN GENERATED * * v ADK A7,2 NEXT ENTRY IN ITAB CWK A7,16 LAST ENTRY? RF(E) BIT160 YES $ LDR A12,A11 GET NEXT FREE ENTRY RB
0x1dc980…1dcb14 (5, 56) Opaque[0x194]
0x1dcb14…1dcca8 # DirEnt {nam=»DMSUBR«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x12f8, f03=0x0000}
0x1dcb14…1dcca8 IdxSect {
0x1dcb14…1dcca8 f00 = 0x0097 // 0x1dcb14 @0x0
0x1dcb14…1dcca8 f01 = 0x0014 // 0x1dcb16 @0x2
0x1dcb14…1dcca8 gno = [ // 0x1dcb18 @0x4
0x1dcb14…1dcca8 [0x00]: C0x0097.0x3.0
0x1dcb14…1dcca8 [0x01]: C0x0098.0x0.0
0x1dcb14…1dcca8 [0x02]: C0x0098.0x1.0
0x1dcb14…1dcca8 [0x03]: C0x0098.0x2.0
0x1dcb14…1dcca8 [0x04]: C0x0098.0x3.0
0x1dcb14…1dcca8 [0x05]: C0x0099.0x0.0
0x1dcb14…1dcca8 [0x06]: C0x0099.0x1.0
0x1dcb14…1dcca8 [0x07]: C0x0099.0x2.0
0x1dcb14…1dcca8 [0x08]: C0x0099.0x3.0
0x1dcb14…1dcca8 [0x09]: C0x009a.0x0.0
0x1dcb14…1dcca8 ]
0x1dcb14…1dcca8 }
0x1dcca8…1dce3c Dummy {f00=0x0097, f01=0x0190, f02=» 2 P IDENT DMSUBR REL 10.0 80-03-14 870105041000 P : P =2 , COMMIT CHECK B P 79-11-22 ^ P =1 , PARAM TEST COMMIT r P 79-11-05 8 P**************************************************** P* $ P* PHILIPS TERMINAL SYSTE
0x1dce3c…1dcfd0 Dummy {f00=0x0097, f01=0x0190, f02=»**************************************** 8 P****THIS MODULE IS ACTIVATED FROM :***************** 0 P* l P* DMTASK,TIODM,DMTASS v P* P*************** P* ENTRIES * P*************** P* P* P ENTRY DMTEN
0x1dcfd0…1dd164 Dummy {f00=0x0097, f01=0x018e, f02=»SNO P ENTRY GTBKBU P ENTRY DMTIOT " P ENTRY DMTIOZ 8 0 P ENTRY MOV:US MOVE FROM USER TO SYSTEM AREA N 0 P ENTRY MOV:SU MOVE FROM SYSTEM TO USER AREA P ENTRY MOVZUS,MOVZSU P* P***************** P* EXTERNALS *
0x1dd164…1dd2f8 Dummy {f00=0x0097, f01=0x0190, f02=» P EXTRN FDBBLZ,FWTFNR & P EXTRN FDBSTA,SCTTCT,TTB:SA,ECBEL P EXTRN TTB:TD,SCTCDT,PRUN J 2 P EXTRN FDBECB,DWTECB,DWTOR,BUFSTA,BUFDMI,BUFOR l " P EXTRN ECBRC,ECBFC,ECBCW,ECBBA P EXTRN DIVMOD,MPYMOD P EXTRN CRNTID P EXTRN DMTGBU
0x1dd2f8…1dd48c Dummy {f00=0x0097, f01=0x0190, f02=» HALT,DSUMOD,ECBRL P EXTRN EOMERR,RETRIE P EXTRN REQER2,QTJOB,TDISP 6 & P EXTRN DWTTAB,MONMMU,TTB:ID,TTB:MT X P EXTRN QCL P EJECT DMSUBR TOSSIO P* P* . P***************************************** P* P* CO
0x1dd48c…1dd620 Dummy {f00=0x0097, f01=0x018e, f02=»G h * P* IS OBTAINED BY SETTING MMUPAG EQU 1. P* 8 PMMUPAG EQU 0 B P* V P EJECT ` P* n > P* THIS ROUTINE RELEASES PROTECTION AT END OF TRANSACTION x P* ( P* ENTRY : A9 = DM INTERNAL USER ID P* P* USED REGS
0x1dd620…1dd7b4 (5, 57) Dummy {f00=0x0098, f01=0x0190, f02=» P LDR* A2,A1 P ANK A2,/1 P RF(Z) REL053 NOT USED * 0 P LDKL A2,/C000 REMOVE BUFFERS FOR THIS TASK H P LDKL A5,/FF00 =2 | & P ANS A5,FDBBLZ,A1 COMMIT CHECK =2 P CF A14,EARELB P ENB PREL053 EQU * P LDR* A1,A1
0x1dd7b4…1dd948 Dummy {f00=0x0098, f01=0x0190, f02=» COMMIT l P* PDMTEND EQU * COMMIT P LDR A6,A5 TTAB USER 6 P ANK A7,/7F =1 R P RF(Z) DMTE10 OK ORDER j P LDKL A7,REQER2 REQUES ERR P RF DMTE40 ERR PDMTE10 EQU * P* P* DECIDE USER TASK ID P* P
0x1dd948…1ddadc Dummy {f00=0x0098, f01=0x0190, f02=» P RB DMTE20 TRY NEXT PDMTE30 LDR A9,A2 P LDKL A14,STACK STACK BASE 8 " P CF A14,RELPRO RELEASE PROTECT Z PDMTE40 EQU * P LDR A5,A6 TTAB USER & P ST A7,TTB:SA+14,A5 RET CODE IN A7 P INH P CF A15,QTJOB RESTART USER P
0x1ddadc…1ddc70 Dummy {f00=0x0098, f01=0x0190, f02=»****** P* " P* ENTRY DMTWM WORD MOVE P* > " P* INPUT A1 = FROM ADDRESS H , P* A2 = NO OF BYTES TO BE MOVED n P* A3 = TO ADDRESS P* $ P* A4 WILL BE DESTROYED P* P* P
0x1ddc70…1dde04 Dummy {f00=0x0098, f01=0x0190, f02=» A3,2 P RB DMTWM PDMTW10 ANK A2,/01 P RF(E) DMTW20 : P LCR A4,A1 MOVE LAST CHAR P P SCR A4,A3 r PDMTW20 RTN A14 P EJECT P* P************* P* DMTBM * P************* P* " P* ENTRY
0x1dde04…1ddf98 Dummy {f00=0x0098, f01=0x0190, f02=»A3 = TO ADDRESS P* $ P* A4 WILL BE DESTROYED " P* J P* OUTPUT A3 = NEXT CHAR T P* v P* PDMTBM EQU * P SUK A2,1 " P RF(N) DMTB10 LAST BYTE MOVED P LCR A4,A1 P SCR A4,A3 P ADK A1,1
0x1ddf98…1de12c Dummy {f00=0x0098, f01=0x0190, f02=»FROM THE END P* PDMTBMR ADR A1,A2 P ADR A3,A2 6 PDMTB20 SUK A2,1 H P RB(N) DMTB10 ` P SUK A1,1 v P SUK A3,1 P LCR A4,A1 P SCR A4,A3 P RB DMTB20 P EJECT 8 P****DESCRIPTION***************************
0x1de12c…1de2c0 Dummy {f00=0x0098, f01=0x0190, f02=»**************** l P* P* A1 = TTAB ADDR " $ P* A2 = FILE CODE TO SEARCH FOR < 4 P* A5 NOT= 0 WHEN ONLY TTAB SHALL BE SEARCHED d P* 8 P****EXIT PARAMETERS********************************* P* P* A1 = UNCHANGED 2 P*
0x1de2c0…1de454 (5, 58) Dummy {f00=0x0098, f01=0x0190, f02=»CTCDT = 1 WHEN TTAB v P* 8 P****USED REGISTERS********************************** & P* b P* A1-A5 l P* ~ : P****************************************************** P* " P* LOOK FOR FILE CODE IN TTAB P* PFNDFDB E
0x1de454…1de5e8 Dummy {f00=0x0098, f01=0x018e, f02=» LDR A4,A1 P ADKL A4,TTB:TD P ADR A4,A3 * P CWR* A2,A4 < P RB(NE) FND030 P P LDK A5,1 f " P RF FND080 CODE FOUND IN TTAB x P* " P* SEARCH FILE CODE IN SCTCDT P* PFND040 EQU * P LDR A5,A5 ( P RF(NZ) FN
0x1de5e8…1de77c Dummy {f00=0x0098, f01=0x018e, f02=» P LD A3,SCTCDT P ADR A3,A4 P CWR* A2,A3 , P RB(NE) FND050 @ P AD A4,SCTCDT V P RF FND080 CODE FOUND l PFND060 EQU * P LDK A2,0 NO CODE PFND080 EQU * P RTN A14 P EJECT P* P**************
0x1de77c…1de910 Dummy {f00=0x0098, f01=0x0190, f02=» 0 P* INPUT RELATIVE REC OFFSET IN FDBRRO,A6 $ P* BUFFER ADDRESS IN A5 8 * P* USER REC AREA IN ECBBA,A9 ` $ P* RECORD LENGTH IN A2 P* P* P* P* MOVE THE RECORD > P* IF (FROM) AND (TO) A
0x1de910…1deaa4 Dummy {f00=0x0098, f01=0x0190, f02=»TIONS AND THE REST WITH WORD MOVE x : P* ELSE USE BYTE MOVE INSTRUCTIONS FOR THE WHOLE REC * P* h PDMTREM EQU * r P LD A1,FDBRRO,A6 P ADR A1,A5 FROM ADDRESS P* P IFT MMUPAG=0 P LDR A4,A1 P LD A3,ECBBA,A9 TO ADDRE
0x1deaa4…1dec38 Dummy {f00=0x0098, f01=0x0190, f02=»F DMT225 P* PDMT210 LDR A4,A1 P ANK A4,/01 2 P RF(E) DMT220 BOTH EVEN F P SUK A2,1 BOTH ODD f P LCR A4,A1 P SCR A4,A3 P ADK A1,1 P ADK A3,1 " PDMT220 CF A14,DMTWM WORD MOVE PDMT225 EQU * P XIF
0x1dec38…1dedcc Dummy {f00=0x0098, f01=0x0190, f02=»ING BUFFER ADDRESS v 8 P CF A14,MOV:SU MOVE RECORD FROM SYSTEM TO USER AREA P XIF V P* b P RTN A14 l P EJECT | P* P* SET UP A14 STACK P* PGETA14 EQU * $ P LD A14,PRUN GET DM TTAB ADDRESS * P AD A14,TTB:TD,A14
0x1dedcc…1def60 Dummy {f00=0x0098, f01=0x0190, f02=»SCRIPTION************************************* P* 6 < P* EATEST WILL SEARCH THE EA-LINK FOR A LOG RECORD NO. @ P* 8 P****ENTRY PARAMETERS******************************** P* P* A1 = FDB ADRESS P* A2,A3 = LOG RECORD NO
0x1def60…1df0f4 (5, 59) Dummy {f00=0x0098, f01=0x0190, f02=»UNCHANGED P* A4 = 0 NO EA AT ALL * P* = +1 EA FOUND FOR ACTUAL TASK 4 * P* = -1 EA FOUND FO R OTHER TASK b P* 8 P****USED REGISTERS********************************** P* P* A1 - A4 P EJECT DMSUBR
0x1df0f4…1df288 Dummy {f00=0x0098, f01=0x0190, f02=»EAT030 EQU * $ P RF(Z) EAT100 EMPTY QUEUE,NO EA P* < P* SEARCH LOG REC NO F P* d P CC A2,3,A4 FIRST CHAR n P RB(NE) EAT020 P CW A3,4,A4 2 AND 3 CHAR P RB(NE) EAT020 P* P* RECORD NO FOUND P* P
0x1df288…1df41c Dummy {f00=0x0098, f01=0x018e, f02=» * P LDK A4,1 EA SAME ATASK PEAT100 EQU * * P RTN A14 > P EJECT DMSUBR N 8 P****DESCRIPTION************************************* f P* B P* EASETB WILL UNCONDITIONALLY PUT A NEW EA BUFFER IN EA-LINK L P* IF NO BUFFERS ARE
0x1df41c…1df5b0 Dummy {f00=0x0098, f01=0x0190, f02=» P* A6 = FDB ADDR " P* A2,A3 = LOGICAL RECORD NO P* D P* CF A14,EASETB N P* j 8 P****EXIT PARAMETERS********************************* t P* P* A6 = FDB ADDR P* 8 P****USED REGISTERS************************
0x1df5b0…1df744 Dummy {f00=0x0098, f01=0x0190, f02=»R PEASETB EQU * P ECR A2,A2 P LC A2,FDBTNR,A6 TASK ID 0 P ECR A2,A2 P P LDR A1,A3 LOG REC NO b P INH , P CF A15,GETBLK GET BUFF AND STORE A1,A2 P* P* LINK BUFFER TO FDB P* P LD A2,FDBEAL,A6 LINK ROOT
0x1df744…1df8d8 Dummy {f00=0x0098, f01=0x0190, f02=»************************************ P* , 8 P* EARELB WILL RELEASE EA BUFFERS AND CONNRECT THEM 6 P* TIO THE FREE LINK. r P* 8 P****ENTRY PARAMETERS******************************** P* P* A1 = FDB-ADDRESS " P* A2,A3 =
0x1df8d8…1dfa6c Dummy {f00=0x0098, f01=0x0190, f02=» ARE REMOVED. P* A2: BIT 0=1,BIT 1=1 4 P* AND A9 NOT EQ 0 ALL BUFFERS ON FDB WITH @ @ P* TASK ID AS SPEC IN A3 ARE RELEASED x < P* BIT 0=1,BIT 1=0 ALL BUFFERS ON FDB ARE REMOVED. J P* BIT
0x1dfa6c…1dfc00 Dummy {f00=0x0098, f01=0x0190, f02=» PARAMETERS********************************* P* 4 P* A1 = UNCHANGED > P* X 8 P****USED REGISTERS********************************** b P* P* A1 - A5,A9 P* 6 P************************************************* P*
0x1dfc00…1dfd94 (5, 60) Dummy {f00=0x0098, f01=0x018e, f02=»DR* A4,A5 EA ROOT P RF EAR030 PEAR020 EQU * , P LDR A5,A4 SAVE OLD ROOT @ P LDR* A4,A4 NEXT BUFFER ADR ` PEAR030 EQU * P RF(Z) EAR100 EA LINK END P LDR A2,A2 REC NO & P RF(N) EAR050 RELEASE MANY BUFFERS P* P
0x1dfd94…1dff28 Dummy {f00=0x0098, f01=0x0190, f02=» PEAR050 EQU * P CWK A2,/A000 CHECK BIT 1 0 P RF(L) EAR080 BIT 1 ZERO,ALL BUFFERS REMOVED > P LDR A3,A9 REQ TASK ID r P RF(NZ) EAR065 TASK ID IN A3 PEAR060 EQU * P* P* SEARCH TASK IDENT P* P LC A3,FDBTNR,
0x1dff28…1e00bc Dummy {f00=0x0098, f01=0x0190, f02=»QU * P LDR* A3,A4 NEXT BUFADR & P STR A3,A5 REMOVE BUFFER FROM LINK , P* V P* RETURN BUFFER TO POOL ` P* P INH P LD A3,FREQUE P STR A3,A4 NEXT FREE P ST A4,FREQUE NEW ROOT P LDR A4,A5 BUFFER ROOT P L
0x1e00bc…1e0250 Dummy {f00=0x0098, f01=0x0190, f02=»************************** v P* ! " D P* CRNGET WILL SEARCH THE CRN-LINK FOR TASK ID. IF NO BUFFER IS ! , D P* FOUND A NEW IS FETCHED FROM THE FREE LINK AND B FILLED WITH ! t H P* ZEROES AND PUT ON THE CRN LINK. IF NO FREE BUFFERS ARE AVAILABLE ! 0 P
0x1e0250…1e03e4 Dummy {f00=0x0098, f01=0x018e, f02=»********************** ! r P* " " P* A1 = FDB ADDRESS DATA FILE " ( P* " N 8 P****EXIT PARAMETERS********************************* " X P* " P* A1 = UNCHANGED " ( P* A2 = ADDRESS OF FOUND CRN-BUFFER " P* " 8 P****USED REGISTERS********
0x1e03e4…1e0578 Dummy {f00=0x0098, f01=0x0190, f02=» " P EJECT DMSUBR # PCRNGET EQU * # P LD A2,FDBCRL,A1 CRN ROOT # 4 P RF CRN030 # V PCRN020 EQU * # h P LDR* A2,A2 NEXT BUFFER # | PCRN030 EQU * # P RF(Z) CRN100 LINK END # P* # P* CHECK ATASK IDENT # P* # P LC A3,F
0x1e0578…1e070c Dummy {f00=0x0098, f01=0x0190, f02=»BUFFER # P* $ PCRN100 EQU * $ P INH $ , P LD A2,CRNQUE FREE LINK ROOT $ 8 P RF(NZ) CRN120 $ P LDK A1,3 LAMP 10 AND 11 $ r P CF A15,HALT NO MORE BUFFERS $ PCRN120 EQU * $ P LDR* A3,A2 NEXT FREE $ P ST A3,CRNQUE UPD ROOT $ P*
0x1e070c…1e08a0 Dummy {f00=0x0098, f01=0x0190, f02=»WORDS 2 - N $ P RF(NP) CRN160 BUFFER ZEROED % P LDR A4,A2 BUFFER ADR % 8 P ADR A4,A3 OFFSET IN BUFFER % V P CMR A4 % z P RB CRN140 MORE WORDS % P* % " P* CONNECT NEW BUFFER TO LINK % P* % PCRN160 EQU * % P LC A3,FDBTNR,A1 %
0x1e08a0…1e0a34 (5, 61) Dummy {f00=0x0099, f01=0x0190, f02=»00 EQU * % P ENB & P RTN A14 & P EJECT DMSUBR & , 8 P****DESCRIPTION************************************* & D P* & 2 P* CALSNO WILL CONVERT A LOGICAL RECORD NO TO & P* RELATIVE & P* SECTOR AND OFFSET & P* & 8 P****ENTRY PA
0x1e0a34…1e0bc8 Dummy {f00=0x0099, f01=0x0190, f02=»CF A14,CALSNO & P* ' 8 P****EXIT PARAMETERS********************************* ' " P* ' ^ P* A1 = 0 OK ' h , P* NE 0 , ERROR =/A000=END OF MEDIUM ' ~ P* A6 = UNCHANGED ' $ P* IN FDB : FDBSNR = SECTOR NR ' * P* FDBRRO = OF
0x1e0bc8…1e0d5c Dummy {f00=0x0099, f01=0x0190, f02=»R ' PCALSNO EQU * ( P* ( " P* FIND BLOCK NO WITHIN FILE ( ( P* ( N P LDR A5,A6 SAVE FDB ADDR ( X P LDK A6,0 ( x $ P LC A6,FDBBLF,A5 BLOCKING FACTOR ( , P CF A14,DIVMOD A2=A1,A2//A6,A1=REMAINDER ( P RF(O) CALERR OVERFLOW ( P LDR A3,
0x1e0d5c…1e0ef0 Dummy {f00=0x0099, f01=0x0190, f02=»OD30 LC A9,FDBBLF,A5 LAST REC IN BLOCK ( PTIOD40 EQU * ) . * P* FIND LOGICAL SECTOR NUMBER ON DISC ) B P* ) p P LDR A6,A3 BLOCK NR ) z P RF(NP) CALERR ) P SUK A6,1 ) P LDK A7,0 ) ( P LC A7,FDBBLZ,A5 NR OF SECT IN BLOCK ) P CF A14,MPYM
0x1e0ef0…1e1084 Dummy {f00=0x0099, f01=0x0190, f02=»L090 EQU * ) P ST A1,FDBSNR,A5 * P ST A2,FDBSNR+2,A5 SECT NR * * 0 P* FIND RELATIVE RECORD OFFSET WITHIN BLOCK * L P* * P LDK A3,0 * " P LDR A2,A9 REL REC NR IN BLOCK * PTIOD60 EQU * * P SUK A2,1 A2=REL REC NR * ( P RF(Z) TIOD65 REL
0x1e1084…1e1218 Dummy {f00=0x0099, f01=0x0190, f02=»A1,EOMERR OUT OF MEDIUM * P RF TIODMF + P* + 2 , P* STORE RELATIVE REC OFFSET IN FBDRRO + < P* + l PTIOD65 EQU * + v P LDK A1,0 OK + P ST A3,FDBRRO,A5 + PTIODMF EQU * + P LDR A6,A5 FDB ADDR + P RTN A14 + P EJECT DMSUBR +
0x1e1218…1e13ac Dummy {f00=0x0099, f01=0x0190, f02=»S DISC I/O + ` P* , P* INPUT A1 = FDB ADDRESS , P* , @ P* OUTPUT A6 = FDB ADDRESS , J P* A1 = 0 WHEN OK , n $ P* = ERROR CODE ELSE , $ P* A9 = DM ECB ADDRESS , * P* A8 = PHYS I/O ECB ADDRESS ,
0x1e13ac…1e1540 Dummy {f00=0x0099, f01=0x018e, f02=» P LDKL A8,FDBECB - P ADR A8,A1 - P* - . P P* DMTIOZ IS THE SAME AS DMTIOT WITH DIFFERENCE THAT ECB ADDR IS INPUT PAR - 8 P* - PDMTIOZ EQU * - P* - P* RESTORE SECTOR NUMBER - P* - P LD A6,FDBSNR,A1 - P ST A6,ECBCW,A8
0x1e1540…1e16d4 (5, 62) Dummy {f00=0x0099, f01=0x0190, f02=» - ~ P RF(Z) DMTIOX DISC I/O OK . P ANKL A1,/FEFF . * $ P RF(NZ) DMTIT1 NOT ONLY RETRIES . @ P LDKL A2,RETRIE . h PDMTIOC EQU * . P ORS A2,ECBRC,A9 USER RC . P RF DMTIOX . PDMTIT1 EQU * . P LD A2,ECBBA,A8 . P* GET BUFFE
0x1e16d4…1e1868 Dummy {f00=0x0099, f01=0x0190, f02=» P SUKL A2,QCL / P RF(NZ) DMTIOX NOT CLOSE / P LDR A2,A1 / 8 P LDK A1,0 / J P RB DMTIOC / PDMTIOX RTN A14 / n P EJECT DMSUBR / 8 P****DESCRIPTION************************************* / P* / 8 P* GTBKBU WILL GET A BLOCK BUFFER FOR
0x1e1868…1e19fc Dummy {f00=0x0099, f01=0x018e, f02=»** / ^ P* 0 P* A1 = FDB ADDRESS 0 P* A8 = ECB ADDR 0 0 P* 0 J 8 P****EXIT PARAMETERS********************************* 0 T P* 0 P* A1 = A6 = FDB ADDR 0 0 P* A2 = FDBRRO WHEN SECTOR IS FOUND IN CORE 0 B P*
0x1e19fc…1e1b90 Dummy {f00=0x0099, f01=0x0190, f02=» P* A5 = ORDE R CODE 1 P* A8 = ECB ADDR 1 P* A9 = DM ECB ADDR 1 : P* 1 V 8 P****USED REGISTERS********************************** 1 ` P* 1 P* A1 - A9 1 P* 1 : P****************************************************** 1 PGTBKBU
0x1e1b90…1e1d24 Dummy {f00=0x0099, f01=0x0190, f02=»A6 1 P LD A9,DWTECB,A6 DM ECB 2 P ANK A1,/FF 2 * P STR A1,A8 FILE NR 2 > P LC A5,FDBBLZ,A6 2 X " P SLL A5,8 BLOCK SIZE IN BYTYE 2 p P ST A5,ECBRL,A8 BLOCK LENGTH 2 ( P CF A14,DMTGBU A3 := BUFFER ADDRESS 2 0 P RF GTB100 RETURN IF SECTOR FOUND
0x1e1d24…1e1eb8 Dummy {f00=0x0099, f01=0x0190, f02=» EQU * 2 P ST A4,ECBCW+2,A8 SECT NR 3 P LDR A5,A3 3 0 2 P ADKL A5,BUFSTA A5 = DATA BUFFER START ADDRESS 3 B P ST A5,ECBBA,A8 3 x P LD A5,DWTOR,A6 3 P ANK A5,/3F 3 ( P LDR A1,A6 FDB ADDRESS AS PARAMETER 3 P RTN A14 3 PGTB100 EQU * 3
0x1e1eb8…1e204c Dummy {f00=0x0099, f01=0x0190, f02=» P* 4 P* 4 P IFT MMUPAG=1 4 P* 4 . P* M O V : U S 4 8 P* 4 N D P* THIS ROUTINE MOVES DATA FROM THE USER AREA (SENDING BUFFER) TO 4 X L P* THE SYSTEM AREA (RECEIVING BUFFER). DIFFERENT WAYS OF MOVING THE DATA 4 J P* ARE USED, DEPENDING ON
0x1e204c…1e21e0 Dummy {f00=0x0099, f01=0x0190, f02=» = ADDRESS OF RECEIVING BUFFER (SYSTEM AREA) 4 . P* A3 = NUMBER OF BYTES TO BE MOVED 5 4 $ P* A4 = USER TTAB ADDRESS 5 f P* 5 " P* OUTPUT: A1-A4 ARE DESTROYED 5 P* 5 PMOV:US EQU * 5 P INH 5 P TL TTB:MT,A4 SET USER MMU 5
0x1e21e0…1e2374 (5, 63) Dummy {f00=0x0099, f01=0x0190, f02=» 5 P TS TTB:MT,A4 6 P ENB 6 P RTN A14 6 * PMOVZUS EQU * 6 : & P LDR A3,A3 CHECK REQUESTED LENGTH 6 N 4 P RF(NP) MVUS35 NO MOVE IF REQUESTED LENGTH <= 0 6 x P STR A5,A14 SAVE A5 6 ( P LDR A4,A1 CHECK USER BUFFER ADDRESS 6 P ANK A4,1 6 .
0x1e2374…1e2508 Dummy {f00=0x0099, f01=0x0190, f02=»YSTEM BUFFER ADDRESS UNEVEN? 6 P* 7 $ , PMVUS10 LDR A4,A3 CHECK REQUESTED LENGTH 7 . P ANK A4,1 7 ^ , P RF(NZ) MVUS60 REQUESTED LENGTH UNEVEN? 7 p P* 7 PMVUS20 MVUS A3 7 P* 7 " PMVUS30 LDR* A5,A14 RESTORE A5 7 P* 7 PMVUS35 EQU * 7
0x1e2508…1e269c Dummy {f00=0x0099, f01=0x018e, f02=»A2 CHECK SYSTEM BUFFER ADDRESS 7 P ANK A4,1 8 & 0 P RF(NZ) MVUS80 SYSTEM BUFFER ADDRESS UNEVEN? 8 8 4 P ELR A4,A1 NO, GET FIRST CHAR. FROM USER BUFFER 8 l P* 8 2 PMVUS50 SCR A4,A2 STORE CHAR. IN SYSTEM BUFFER 8 * P ADK A2,1 UPDATE SYSTEM BUFFER ADDRE
0x1e269c…1e2830 Dummy {f00=0x0099, f01=0x0190, f02=» 8 f P* 9 8 PMVUS55 ELR A4,A1 GET NEXT TWO CHAR. FROM USER BUFFER 9 P ECR A5,A4 9 N 0 P SCR A5,A2 STORE ONE CHAR. IN SYSTEM BUFFER 9 ` * P ADK A2,1 UPDATE SYSTEM BUFFER ADDRESS 9 ( P SUK A3,1 DECREMENT REQUESTED LENGTH 9 & P RB(P) MVUS50 MORE CHAR. T
0x1e2830…1e29c4 Dummy {f00=0x0099, f01=0x0190, f02=»EVEN 9 l ( P SUK A3,1 MAKE REQUESTED LENGTH EVEN : * P RF(NP) MVUS70 ONLY ONE CHAR. TO MOVE? : 8 P LDR A4,A1 NO, SAVE A1 : f P LDR A5,A3 SAVE A3 : P MVUS A3 : * P ADR A4,A5 UPDATE USER BUFFER ADDRESS : . P ELR A5,A4 GET LAST CHAR. FROM USER BUFFER :
0x1e29c4…1e2b58 Dummy {f00=0x0099, f01=0x0190, f02=»LR A5,A1 GET LAST CHAR. FROM USER BUFFER : P RB MVUS65 ; 0 P* ; B 2 PMVUS80 EQU * BOTH BUFFER ADDRESSES WERE UNEVEN ; L 0 P ELR A4,A1 GET FIRST CHAR. FROM USER BUFFER ; 2 P SCR A4,A2 STORE FIRST CHAR. IN SYSTEM BUFFER ; & P ADK A1,1 UPDATE BUFFER ADDR
0x1e2b58…1e2cec Dummy {f00=0x0099, f01=0x0190, f02=»URN ; ~ P* < P EJECT DMSUBR < P* < . P* M O V : S U < 8 P* < N F P* THIS ROUTINE MOVES DATA FROM THE SYSTEM AREA (SENDING BUFFER) TO < X J P* THE USER AREA (RECEIVING BUFFER). DIFFERENT WAYS OF MOVING THE DATA < J P* ARE USED, DEPENDING ON
0x1e2cec…1e2e80 Dummy {f00=0x0099, f01=0x0190, f02=»A2 = ADDRESS OF RECEIVING BUFFER (USER AREA) < . P* A3 = NUMBER OF BYTES TO BE MOVED = 4 $ P* A4 = USER TTAB ADDRESS = f P* = " P* OUTPUT: A1-A4 ARE DESTROYED = P* = PMOV:SU EQU * = P INH = P TL TTB:MT,A4 SET USER MMU =
0x1e2e80…1e3014 (5, 64) Dummy {f00=0x0099, f01=0x0190, f02=» = P TS TTB:MT,A4 > P ENB > P RTN A14 > * PMOVZSU EQU * > : & P LDR A3,A3 CHECK REQUESTED LENGTH > N 4 P RF(NP) MVSU35 NO MOVE IF REQUESTED LENGTH <= 0 > x P STR A5,A14 SAVE A5 > ( P LDR A4,A2 CHECK USER BUFFER ADDRESS > P ANK A4,1 > .
0x1e3014…1e31a8 Dummy {f00=0x0099, f01=0x0190, f02=»YSTEM BUFFER ADDRESS UNEVEN? > P* ? $ , PMVSU10 LDR A4,A3 CHECK REQUESTED LENGTH ? . P ANK A4,1 ? ^ , P RF(NZ) MVSU90 REQUESTED LENGTH UNEVEN? ? p P* ? PMVSU20 MVSU A3 ? P* ? " PMVSU30 LDR* A5,A14 RESTORE A5 ? P* ? PMVSU35 RTN A14
0x1e31a8…1e333c Dummy {f00=0x0099, f01=0x0190, f02=»M BUFFER ADDRESS ? z P ANK A4,1 @ 0 P RF(NZ) MVSU80 SYSTEM BUFFER ADDRESS UNEVEN? @ * 4 P ELR A4,A2 NO, GET FIRST CHAR. FROM USER BUFFER @ ^ P RF MVSU65 @ P* @ 2 PMVSU60 EQU * SYSTEM BUFFER ADDRESS WAS UNEVEN @ 0 P LCR A4,A1 GET ONE CHAR. FROM SY
0x1e333c…1e34d0 Dummy {f00=0x0099, f01=0x018e, f02=»MVSU70 IS THIS LAST CHARACTER? @ P* A & : PMVSU65 LCR A4,A1 NO, GET NEXT CHAR. FROM SYSTEM BUFFER A 0 . P ESR A4,A2 STORE TWO CHAR. IN USER BUFFER A n & P ADK A1,1 UPDATE BUFFER ADDRESSES A P ADK A2,2 A ( P SUK A3,1 DECREMENT REQUESTED LENGTH A & P
0x1e34d0…1e3664 Dummy {f00=0x0099, f01=0x0190, f02=» $ P ANK A3,/FF SKIP LEFT CHARACTER B ( P ANKL A4,/FF00 SKIP RIGHT CHARACTER B , P ORR A3,A4 B X . P ESR A3,A2 STORE LAST CHAR. IN USER BUFFER B j P RB MVSU30 RETURN B P* B P EJECT DMSUBR B P* B P* B 2 PMVSU80 EQU * BOTH BUFFER ADD
0x1e3664…1e37f8 Dummy {f00=0x0099, f01=0x0190, f02=» A4,/FF SKIP LEFT CHARACTER B ( P ANKL A5,/FF00 SKIP RIGHT CHARACTER C $ P ORR A4,A5 C P 0 P ESR A4,A2 STORE FIRST CHAR. IN USER BUFFER C b & P ADK A1,1 UPDATE BUFFER ADDRESSES C P ADK A2,1 C ( P SUK A3,1 DECREMENT REQUESTED LENGTH C * P RB(P) MVS
0x1e37f8…1e398c Dummy {f00=0x0099, f01=0x0190, f02=»KE REQUESTED LENGTH EVEN C * P RF(NP) MVSU95 ONLY ONE CHAR. TO MOVE? D P LDR A4,A1 NO, SAVE A1 D N P LDR A5,A3 SAVE A3 D l P MVSU A3 D & P ADR A4,A5 UPDATE BUFFER ADDRESSES D P ADR A2,A5 D 2 P LDR* A4,A4 GET LAST CHAR. FROM SYSTEM BUFFER D P
0x1e398c…1e3b20 Dummy {f00=0x0099, f01=0x40e4, f02=»PAG=0 D 2 PMOV:US EQU * DUMMY LABELS FOR NON-MMU SYSTEMS E PMOV:SU EQU * E D PMOVZSU EQU * E X PMOVZUS EQU * E l 0 P ABL TASHLT HALT SYSTEM DUE TO SYSGEN ERROR E P XIF E P* E P* E P END E @ E ST CHAR. FROM SYSTEM BUFFER D P
0x1e3b20…1e3cb4 (5, 65) Dummy {f00=0x009a, f01=0x2008, f02=» F + 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* +
0x1e3cb4…1e3e48 Dummy {f00=0x009a, f01=0x0190, f02=»TION DATA n r P o P SUR A2,A3 TO-ADDRESS o P* o 8 $ P ANKL A2,/FFFE MAKE EVEN ADDRESS o B P CALL MOVE o j 6 P ST A2,SAVE01,A13 SAVE START OF CONFIGURATION DATA o | & P LDR A1,A9 GET START OF FREE AREA o P LDR A12,A2 END OF FREE AREA o $ P SUR
0x1e3e48…1e3fdc Dummy {f00=0x009a, f01=0x0190, f02=» < P* MOVE SYSLDA+SYSLDM+DWT-PROTOTYPES TO END OF FREE AREA p P* p D PMOPRO SUK A1,2 p N P SUK A2,2 p d P LDR* A4,A1 p v P STR A4,A2 p P CWR A1,A13 p P RB(NE) MOPRO p * P LDR A1,A2 SAVE NEW LOCATION OF SYSLDA p " P AD A2,LDALEN,A2 BYP
0x1e3fdc…1e4170 Dummy {f00=0x009a, f01=0x0190, f02=»************************ p ` L P* SUBROUTINES USED IN THE APPLICATION AND CONFIGURATION LOADING PHASE O q L P************************************************************************ q p $ P******************************* q $ P* SOPIN - READ SOP SWITCHES *
0x1e4170…1e4304 Dummy {f00=0x009a, f01=0x0190, f02=» * q $ P* EXIT: A1 - SOP INPUT * r $ P* BIT 6 - SWITCH 1 * r H $ P* BIT 15 - SWITCH 10 * r p $ P* * r $ P* WORK REGISTERS: A1 * r $ P* *
0x1e4304…1e4498 Dummy {f00=0x009a, f01=0x0190, f02=»U * r P CIO A1,1,SOP s P INR A1,0,SOP s " P RB(NA) *-2 s 8 P RTN A14 s L P IFT CASS=1 s P EJECT s p < P******************************************************* s ~ < P* CASSIN - CASSETTE INITIATING ROUTINE * s < P* =
0x1e4498…1e462c Dummy {f00=0x009a, f01=0x0190, f02=» SYSLOD -LOADING PART- * s ~ < P* * t . < P* ENTRY: * t n < P* * t < P* EXIT:
0x1e462c…1e47c0 Dummy {f00=0x009a, f01=0x0190, f02=» * t n < P* * u < P* SUBROUTINES: SOPIN,CHCRIO * u ^ < P* * u < P******************************************
0x1e47c0…1e4954 (5, 66) Opaque[0x194]
0x1e4954…1e4ae8 # DirEnt {nam=»DMSUBX«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1348, f03=0x0000}
0x1e4954…1e4ae8 IdxSect {
0x1e4954…1e4ae8 f00 = 0x009a // 0x1e4954 @0x0
0x1e4954…1e4ae8 f01 = 0x000c // 0x1e4956 @0x2
0x1e4954…1e4ae8 gno = [ // 0x1e4958 @0x4
0x1e4954…1e4ae8 [0x00]: C0x009a.0x1.0
0x1e4954…1e4ae8 [0x01]: C0x009a.0x2.0
0x1e4954…1e4ae8 [0x02]: C0x009a.0x3.0
0x1e4954…1e4ae8 [0x03]: C0x009b.0x0.0
0x1e4954…1e4ae8 [0x04]: C0x009b.0x1.0
0x1e4954…1e4ae8 [0x05]: C0x009b.0x2.0
0x1e4954…1e4ae8 ]
0x1e4954…1e4ae8 }
0x1e4ae8…1e4c7c Dummy {f00=0x009a, f01=0x0190, f02=» 2 P IDENT DMSUBX REL 10.0 80-03-14 870105041000 P : 8 P**************************************************** B P* ~ $ P* PHILIPS TERMINAL SYSTEM PTS P* 2 P* DMSUBX = DM-ROUTINES FOR INDEXED REQUESTS P* 8 P**************
0x1e4c7c…1e4e10 Dummy {f00=0x009a, f01=0x0190, f02=» P*************** P* ENTRIES * P*************** 8 P* P P ENTRY FNDKMX,CHKKEY Z P ENTRY RDNXTR v P ENTRY FNDKEY P ENTRY CRNUPD P ENTRY GTLGRN P ENTRY CRNCIF P* P***************** P
0x1e4e10…1e4fa4 Dummy {f00=0x009a, f01=0x0190, f02=» P EXTRN FDBBLZ,FWTFNR P EXTRN FDBRRO,FDBBLF,BUFSNR & P EXTRN FDBLRN,FDBMRO,FDBCRL,FDBADF D . P EXTRN DMTIOT,GTBKBU,ADDMOD,CALSNO,DMTRBU n P EXTRN DMTIOZ P EXTRN DIVMOD,DSUMOD P EXTRN EOFRC,NOKEY P EJECT 8 P****DESCRIPTIO
0x1e4fa4…1e5138 Dummy {f00=0x009a, f01=0x0190, f02=»RCH IS USED. REF : KNUTH PAGE 411 ALG. U. 0 P* THE FIRST TWO WORDS IN MASTER INDEX IS : 2 P* - NO OF ENTRIES N f $ P* - NO OF CHARACTERS PER ENTRY P* 8 P****ENTRY PARAMETERS******************************** P* P* A5 = MAS
0x1e5138…1e52cc Dummy {f00=0x009a, f01=0x0190, f02=»* 8 P****EXIT PARAMETERS********************************* P* F 0 P* A1,A2 = LOGICAL RECORD NO IN INDEX FILE P P* A8,A11= UNCHANGED P* 8 P****USED REGISTERS********************************** P* P* A1 - A11 P*
0x1e52cc…1e5460 Dummy {f00=0x009a, f01=0x0190, f02=»MX EQU * P LDR* A2,A5 NO OF ENTRIES N " P RF(NP) FND045 NO MASTER INDEX 4 P LDR A9,A2 Z P ANKL A9,/1 GET BIT 15 l 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 *
0x1e5460…1e55f4 (5, 67) Dummy {f00=0x009a, f01=0x0190, f02=» CF A14,MPYMOD A1,A2=(I-1)*EL P SRC A1,1 & P ORR A2,A1 GET MOST SIGN BIT 8 PFND025 EQU * " P ADR A2,A5 ADD MI BASE ADR - 2 p P ADK A2,2 ENTRY KEY ADR P LDR A1,A2 SAVE ENTRY ADR P LDR A3,A8 SEARCH KEY ADR P LDR A6,A11 MA
0x1e55f4…1e5788 Dummy {f00=0x009a, f01=0x0190, f02=» 15 P SRA A7,1 M/2 FLOOR P ADR A6,A7 M/2 CEILING ( P LDR A3,A3 CHKKEY RTN INF F . P RF(NG) FND040 SEARCHED KEY LESS OR EQUAL h P* P* SEARCHED KEY GREATER P* P LDR A10,A10 M P RF(Z) FND050 SEARCH READY P A
0x1e5788…1e591c Dummy {f00=0x009a, f01=0x0190, f02=» P RF(Z) FND060 SEARCH READY P SUR A9,A6 I=I-(M/2 CEIL) * P RB FND030 L PFND045 EQU * NO MASTER INDEX ^ P LDK A1,0 P LDK A2,1 REC NR 1 P RF FND070 PFND050 EQU * P ADR* A1,A5 ARDR NEXT ENTRY PFND060 EQU *
0x1e591c…1e5ab0 Dummy {f00=0x009a, f01=0x0190, f02=» LDK A1,0 P LCR A1,A3 P ADK A3,1 $ P LCR A2,A3 6 P ADK A3,1 H P ECR A2,A2 Z P LCR A2,A3 l PFND070 EQU * ~ P RTN A14 P EJECT 8 P****DESCRIPTION************************************* P* . P* CHKKEY COMPARE
0x1e5ab0…1e5c44 Dummy {f00=0x009a, f01=0x0190, f02=»Y x P* A3 = ADR OF SEARCH KEY * P* A6 = MAX NO OF CAHARACTERS IN KEY , 2 P* A7 = REL NO OF FIRST CHAR TO CHECK IN KEY Z P* P* CF A14,CHKKEY P* 8 P****EXIT PARAMETERS********************************* P* : P*
0x1e5c44…1e5dd8 Dummy {f00=0x009a, f01=0x0190, f02=»IS LESS t N P* A7 = REL NO OF NEXT CHAR TO CHECK = NO OF SAME CHARACTERS IN WHOLE KEY " P* A6 = MAX NO OF CHAR IN KEY b P* 8 P****USED REGISTERS********************************** P* P* A2-A4,A6-A7 < P************************
0x1e5dd8…1e5f6c Dummy {f00=0x009a, f01=0x0190, f02=»AR TO TEST z PCHK020 EQU * P LCR A4,A3 SEARCED KEY CHAR & P CCR A4,A2 SC=EC? J P RF(G) CHK100 SC GT TH EC d " 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) CHK060 ALL CHAR CHEC
0x1e5f6c…1e6100 Dummy {f00=0x009a, f01=0x0190, f02=» P RF CHK140 PCHK120 EQU * $ P LDKL A3,-1 SEARCHED KEY SMALLER * P RF CHK140 R PCHK100 EQU * d $ P LDK A3,1 SEARCHED KEY SGREATER x PCHK140 EQU * P RTN A14 P EJECT 8 P****DESCRIPTION*************************************
0x1e6100…1e6294 (5, 68) Dummy {f00=0x009a, f01=0x0190, f02=»AD BEFORE, THE FIRST RECORD IN SPECIFIED x & P* SECTOR WILL BE MADE AVAILABLE 0 P* Z 8 P****ENTRY PARAMETERS******************************** d P* : P* A1 = FDB ADDRESS FOR CURRENT RECORD (BEFORE NEXT) P* FDBCEX,FDBSNR B P*
0x1e6294…1e6428 Dummy {f00=0x009a, f01=0x0190, f02=» ADDRESS OF BLOCK BUFFER FROM PREVIOUS CALL IN > P* SAME DM-REQUEST. =0 WHEN NO BYUFFER IS ALLOCATED 6 P* A8 = ECB ADDRESS x P* 8 P****EXIT PARAMETERS********************************* P* 2 P* RETURN AT ADDR 0 WHEN OK AND A5
0x1e6428…1e65bc Dummy {f00=0x009a, f01=0x0190, f02=»N NO BUFFER IS ALLOCATED ^ $ P* A2 = FDBRRO = RECORD OFFSET P* A3 = BUFFER ADDRESS H * P* = 0 WHEN NO BUFFER IS ALLOCATED h P* A8 = ECB ADDRESS P* 8 P****USED REGISTERS********************************** P* 2 P* A1
0x1e65bc…1e6750 Dummy {f00=0x009a, f01=0x0190, f02=»********************************** | P EJECT * PRDNXTR EQU * 8 P LDR A10,A3 SAVE BUFFER ADDR L P RF(NZ) RDN200 BUFFER EXIST p P STR A7,A14 P SUKL A14,4 P ST A6,2,A14 P* P* GET A BUFFER P* PRDN040 EQU *
0x1e6750…1e68e4 Dummy {f00=0x009a, f01=0x018e, f02=»CK FROM DISC P* P LDR A10,A3 BUFFER ADDR $ P LDK A7,/91 PHYS READ WITH WAIT > P LKM f P DATA 15 FILE MANAGEMENT IO r & P CF A14,DMTIOZ CHECK RETURN CODES P LDR A1,A1 P RF(NZ) RDN900 ERROR P LDR A1,A6 FDB ADDR
0x1e68e4…1e6a78 Dummy {f00=0x009a, f01=0x0190, f02=» P* P* BUFFER WAS BEFORE P* , PRDN200 EQU * 6 $ P LD A2,FDBRRO,A1 REC ORD OFFSET J P RF(NN) RDN220 NOT FIRST REC r P STR A7,A14 P SUKL A14,4 P ST A6,2,A14 P RB RDN080 FIRST REC WANTED P* : P* CHEC
0x1e6a78…1e6c0c Dummy {f00=0x009a, f01=0x018e, f02=»HIS REC LAST IN BUFFER P* , P* GET NEXT REC IN CURRENT BLOCKBUFFER ( P* X $ P AD A2,FDBRLE,A1 RECOR D LENGTH b P ADK A2,1 STATUS CHAR P ST A2,FDBRRO,A1 NEW OFFSET P RF RDN950 RETURN P* PRDN300 EQU * P STR
0x1e6c0c…1e6da0 Dummy {f00=0x009a, f01=0x0190, f02=» $ P LC A5,FDBBLZ,A1 SECT PER BLOCK P ADR A3,A5 NEXT SECT 0 P RF(O) RDN380 L P RF RDN390 b PRDN380 ANKL A3,/7FFF t P IM FDBSNR,A1 PRDN390 ST A3,FDBSNR+2,A1 P LDR A6,A1 FDB ADDR P RF RDN500 P* P* P
0x1e6da0…1e6f34 (5, 69) Dummy {f00=0x009b, f01=0x0190, f02=» FDB ADDR P RB RDN040 NEXT SECTOR P* 0 P* EXIT : P* J PRDN900 EQU * T P LDR A5,A1 RET CODE h P LDR A1,A6 FDB ADDR P LDR A3,A10 BUFFER ADDR P RF(Z) RDN960 NO BUFFER " P CF A14,DMTRBU RELEASE BUFFER PRD
0x1e6f34…1e70c8 Dummy {f00=0x009b, f01=0x0190, f02=» ADKL A14,4 P LDR* A7,A14 PRDN950 EQU * ( P RTN A14 < P EJECT L 8 P****DESCRIPTION************************************* Z P* > P* FNDKEY WILL READ THE FIRST USED INDEX RECORD WITH THE * P* SPECIFIED KEY OR NEXT HIGHER KEY
0x1e70c8…1e725c Dummy {f00=0x009b, f01=0x0190, f02=»* P* A1 = FDB ADDRESS P* A8 = SEARCH KEY ADDR & & P* A11 = NO OF CHARACTERS IN KEY F " P* A13= PHYSICAL ECB ADDRESS p P* 8 P****EXIT PARAMETERS********************************* P* P* A1 = FDB ADDRESS 0 P*
0x1e725c…1e73f0 Dummy {f00=0x009b, f01=0x0190, f02=»* = RETURN CODE WHEN KEY IS NOT FOUND 4 P* BIT 1 CAN NEVBER BE SET BY DISC DRIVER 2 P* A3 = BUFFER ADDRESS j & P* = 0 WHEN NO RECORD IS FOUND " P* A7 = NO OF SAME CHARACTERS " P* A8 = PHYSICAL ECB ADDRESS P* A11
0x1e73f0…1e7584 Dummy {f00=0x009b, f01=0x0190, f02=»ACK l P* : P****************************************************** P EJECT T PFNDKEY EQU * b P* v & P* FIRST SEARCH THE NMASTER INDEX P* * P LD A5,FDBMIA,A1 ADDR OF MASTER INDEX $ P STR A1,A14 FDB ADDRESS IS SAVED
0x1e7584…1e7718 Dummy {f00=0x009b, f01=0x018e, f02=»R | P CF A14,CALSNO GET PHYS ADDR P LDR A1,A1 . P RF(NZ) FKY900 ERROR @ P LDR A1,A6 FDBADDR " P LDR A6,A11 NO OF CHAR IN KEY v $ P LDK A7,0 START CHAR KEY SEARCH & P SUR A9,A9 NO BUFFER TO START WITH P LDR A8,A13 ECB ADDR
0x1e7718…1e78ac Dummy {f00=0x009b, f01=0x0190, f02=» P RF FKY900 ERROR EXIT P* " " P* BUFFER AND ADATA IS FOUND , P* R PFKY150 EQU * P LDR A9,A3 BUFFER ADDR p P ADR A2,A3 BUFFER ADR P ADKL A2,BUFSTA P LDR A10,A2 SAVE REC ADDR * P AD A10,FDBRLE,A1 ADDR OF STATUS C
0x1e78ac…1e7a40 Dummy {f00=0x009b, f01=0x018e, f02=»CORDS IN THIS SECTOR P* * P LD A13,FDBRRO,A1 SAVE CURRENT OFFSET & P LD A4,FDBMRO,A1 T & P ST A4,FDBRRO,A1 LAST REC IN SECT n P* P* *CHECK IF EOF P* P LDR A10,A7 CHAR ADDR " P CF A14,GTLGRN GET LOG REC NR
0x1e7a40…1e7bd4 (5, 70) Dummy {f00=0x009b, f01=0x0190, f02=» | P CW A3,FDBLRN+1,A1 P RB(L) FKY100 NOT EOF " PFKY180 EQU * @ P* T P* EOF IS IN THIS SECTOR ^ P* 2 P ST A13,FDBRRO,A1 OFFSET TO FIRST FREE RECORD P LDK A7,0 NR OF SAME CHAR P LDKL A2,EOFRC EOF P RF FKY950
0x1e7bd4…1e7d68 Dummy {f00=0x009b, f01=0x0190, f02=»OMPARE KEYS P LDR A3,A3 & P RF(P) FKY840 SEARCHED KEY GREATER & " P RF(N) FKY850 SEARCH KEY LESS P P RF FKY870 KEY FOUNFD v PFKY840 EQU * P CC A7,-4,A10 NEXT KEY FLAG 0 P RB(NG) FKY100 THE NEXT KEY IS IDENTICAL FOR B P*
0x1e7d68…1e7efc Dummy {f00=0x009b, f01=0x0190, f02=»0 REDUCE NO OF SAME CHARACTERS P RB FKY100 NEXT KEY & PFKY850 EQU * B P LDKL A2,NOKEY KEY NOT FOUND V P RF FKY950 z PFKY870 EQU * P LDK A2,0 KEY FOUND P RF FKY950 PFKY900 EQU * P SUR A9,A9 NO BUFFERS P LDR A2,
0x1e7efc…1e8090 Dummy {f00=0x009b, f01=0x0190, f02=» z P LDR A3,A9 BUFFER ADDR ! P RTN A14 ! & P EJECT ! 6 P* ! D J P* CRNUPD UPDATES CRN-BUFFERS SO THAT RECORD NUMBERS FOR MOVED INDEX ! N P* RECORDS ARE UPDATED ! P* ! P* IN: ! & P* A8,A9 = LAST RECORD NR MOVED ! & P* A10,
0x1e8090…1e8224 Dummy {f00=0x009b, f01=0x018e, f02=»TERS: ! P* A1 -A12 " P* " " P* OUT: " , P* A5 = FDB ADDR INDEX " < P* A10,A11 = UNCHANGED " P* " | PCRNUPD EQU * " P STR A12,A14 " P SUKL A14,2 " $ P LD A12,FDBADF,A5 FDB DATA FILE " P INH " $ P LD A12,FDBCRL,A12
0x1e8224…1e83b8 Dummy {f00=0x009b, f01=0x0190, f02=» " t P CC A7,CRNCIF,A12 # P RB(NE) CRU100 WRONG FC # " P CC A10,CRNCIF+1,A12 # B P RB(G) CRU100 # ^ P RF(L) CRU200 # t P CW A11,CRNCIF+2,A12 # P RB(G) CRU100 # PCRU200 EQU * # P CC A8,CRNCIF+1,A12 # P RF(G) CRU300 # P RB(L)
0x1e83b8…1e854c Dummy {f00=0x009b, f01=0x0190, f02=»,A14 ADD PARAM # P LDR A6,A7 $ P RF(N) CRU230 -1 $ ( P LDK A6,0 $ @ PCRU230 EQU * $ R P ANKL A7,/7FFF $ f P LDK A1,0 $ | P LC A1,CRNCIF+1,A12 $ P LD A2,CRNCIF+2,A12 $ P CF A14,ADDMOD $ P SC A1,CRNCIF+1,A12 $ P ST A2,CRNCIF+2,
0x1e854c…1e86e0 Dummy {f00=0x009b, f01=0x0190, f02=»N************************************* $ P* % . D P* GTLGRN WILL CONVERT FDBSNR AND FDBRRO TO A LOGICAL RECORD NO % 8 P* % 8 P****ENTRY PARAMETERS******************************** % P* % P* A1 = FDB ADDRESS % & P* FDBSNR,FDBRRO,F
0x1e86e0…1e8874 (5, 71) Dummy {f00=0x009b, f01=0x0190, f02=»3 = LOG RECORD NO % P* & 8 P****USED REGISTERS********************************** & $ P* & ` P* A1 - A7 & j P* & ~ : P****************************************************** & P EJECT DMSUBR & PGTLGRN EQU * & P LDK A6,0 & P LDR
0x1e8874…1e8a08 Dummy {f00=0x009b, f01=0x0190, f02=» & P LC A6,FDBBLZ,A5 BLOCK SIZE ' P ST A8,-4,A14 ' , P CF A14,DIVMOD ' B P LD A8,-4,A14 ' X P LDR A6,A2 BLOCKS - 1 ' n P* ' ( P* CONVERT FDBRRO TO NO OF RECORDS ' P* ' P LDK A7,0 ' " P LC A7,FDBBLF,A5 BLOCK FACTOR ' P CF
0x1e8a08…1e8b9c Dummy {f00=0x009b, f01=0x018e, f02=»FFSET IN SECTOR ' ~ P ADK A6,1 ( PGTL150 EQU * ( * P ADK A7,1 RECORD COUNTER ( > P SUR A6,A4 ( ^ * P RB(NN) GTL150 COUNT RECORDS IN SECTOR ( p P* ( , P* ADD SECT*BLOCFACT AND RECINCURRSECT ( P* ( P ADR A2,A7 ( P RF(O) GTL160 OVERFL
0x1e8b9c…1e8d30 Dummy {f00=0x009b, f01=0x4076, f02=» P LDR A3,A2 ) P LDR A2,A1 ) P LDR A1,A5 FDB ADDR ) ( P LDR A6,A5 ) D P RTN A14 ) V P END ) f@ ) r) GTL150 COUNT RECORDS IN SECTOR ( p P* ( , P* ADD SECT*BLOCFACT AND RECINCURRSECT ( P* ( P ADR A2,A7 ( P RF(O) GTL160 OVERFL
0x1e8d30…1e8ec4 Dummy {f00=0x009b, 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* +
0x1e8ec4…1e9058 Dummy {f00=0x009b, f01=0x0190, f02=» * n @ ;* * " @ ;*********************************************************** f FRDSEC EQU * " LDR A1,A11 GET SECTOR NUMBER P SLL A1,4 P ORKL A1,/4000
0x1e9058…1e91ec Dummy {f00=0x009b, f01=0x0190, f02=»FDIOP+1 WRITE 2:ND MUX WORD $ P LDR A2,A3 BUFFER START ADDRESS $ $ P AD A2,SAVCON BUFFER END ADDRESS L $ FRD:10 CIO A1,1,FDCU START READ t & " RB(NA) FRD:10 LOOP UNTIL ACCEPTED 4 /FRD:20 INR A1,0,FDCU GET CHAR - MODIFIED IF MUX & " RF(NA) FR
0x1e91ec…1e9380 Dummy {f00=0x009b, f01=0x0190, f02=»D:20 P* " PFRD:25 CIO A1,0,FDCU STOP READ P RB FRD:20 < $ FRD:40 SST A1,FDCU SENSE STATUS N & " RB(NA) FRD:20 LOOP UNTIL ACCEPTED v P ANKL A1,/4E15 FATAL ERROR? RF(NZ) FRD:50 YES! ( P ADKL A11,1 INCREMENT SECTOR ADDRESS
0x1e9380…1e9514 (5, 72) Opaque[0x194]
0x1e9514…1e96a8 # DirEnt {nam=»DMTASK«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1378, f03=0x0000}
0x1e9514…1e96a8 IdxSect {
0x1e9514…1e96a8 f00 = 0x009b // 0x1e9514 @0x0
0x1e9514…1e96a8 f01 = 0x0018 // 0x1e9516 @0x2
0x1e9514…1e96a8 gno = [ // 0x1e9518 @0x4
0x1e9514…1e96a8 [0x00]: C0x009b.0x3.0
0x1e9514…1e96a8 [0x01]: C0x009c.0x0.0
0x1e9514…1e96a8 [0x02]: C0x009c.0x1.0
0x1e9514…1e96a8 [0x03]: C0x009c.0x2.0
0x1e9514…1e96a8 [0x04]: C0x009c.0x3.0
0x1e9514…1e96a8 [0x05]: C0x009d.0x0.0
0x1e9514…1e96a8 [0x06]: C0x009d.0x1.0
0x1e9514…1e96a8 [0x07]: C0x009d.0x2.0
0x1e9514…1e96a8 [0x08]: C0x009d.0x3.0
0x1e9514…1e96a8 [0x09]: C0x009e.0x0.0
0x1e9514…1e96a8 [0x0a]: C0x009e.0x1.0
0x1e9514…1e96a8 [0x0b]: C0x009e.0x2.0
0x1e9514…1e96a8 ]
0x1e9514…1e96a8 }
0x1e96a8…1e983c Dummy {f00=0x009b, f01=0x0190, f02=» 2 P IDENT DMTASK REL 10.0 80-05-28 870105041000 P : P =4 , PR 6249 B P 80-03-14 Z P =3 ,DUPL KEY ONLY SEQ n P 79-11-28 P =2 , START NOT USED OK P 79-11-22 " P =1 , INDEXED START NOT LESS P 79-11-0
0x1e983c…1e99d0 Dummy {f00=0x009b, f01=0x0190, f02=»TASK = HANDLES DATAMANAGEMENT DISC I/O P* . P* 8 P* B P* L P* V 8 P**************************************************** ` P* , P* THIS MODULE IS ACTIVATED FROM TIODM. P* P* INPUT PARAMETERS: P* A1 = F
0x1e99d0…1e9b64 Dummy {f00=0x009b, f01=0x018e, f02=»DB (FDBDMI, , -SNR). d : P* ALL BUFFERS ARE CHECKED TO FIND OUT IF THIS BLOCK F P* IS ALREADY PRESENT IN A BUFFER. IF SO THE BUFFER STATUS IS SET Z D P* TO USED AND ACTIONS ACCORDING TO THE ORDER ARE TAKEN. IF NOT 8 P* THE BLOCK MUST FIRST BE
0x1e9b64…1e9cf8 Dummy {f00=0x009b, f01=0x0190, f02=» P* P* P ENTRY DMTASK P* . 4 P* FOLLOWING ENTRIES ARE USED BY MODULE DMOPCL 8 P ENTRY DMTERX,QOPEN,QRFP,QCL p P ENTRY RECBFZ P EJECT P* P***************** P* EXTERNALS * P*****************
0x1e9cf8…1e9e8c Dummy {f00=0x009b, f01=0x0190, f02=»TID P EXTRN TENDIO P EXTRN FDBECB " P EXTRN FDBSNR 8 P EXTRN FDBRRO N P EXTRN FDBRLE d P EXTRN FDBBLF z P EXTRN FDBTNR P EXTRN FDBLRN P EXTRN FDBMIA P EXTRN FDBEAL P EXTRN FDBADF P EXTRN FDB
0x1e9e8c…1ea020 Dummy {f00=0x009b, f01=0x0190, f02=»XTRN ECBFC P EXTRN ECBBA P EXTRN ECBRL & P EXTRN ECBEL : P EXTRN ECBRC N P EXTRN ECBCW b P EXTRN BUFLNK v P EXTRN BUFDMI P EXTRN BUFFC P EXTRN BUFSNR P EXTRN BUFOR P EXTRN BUFSTA P EXTRN DWTECB
0x1ea020…1ea1b4 (5, 73) Dummy {f00=0x009c, f01=0x0190, f02=»O P EXTRN DSUMOD . P EXTRN EATEST,EASETB,CRNGET,EARELB,GTBKBU P EXTRN FNDKEY R P EXTRN CRNCIF,CRNCDF,CRNQUE h P EXTRN MXIND P EXTRN FDBKA,FDBNIF,RDNXTR 6 P EXTRN FDBKEY SAVE AREA FOR KEY IN INDEXED ACCESS P EXTRN GTLGR
0x1ea1b4…1ea348 Dummy {f00=0x009c, f01=0x018e, f02=»ONMMU , P EXTRN PRUN TTAB ADDRESS OF RUNNING TASK ( P EXTRN SCTPLD PROGRAM LOADING DEVICE > P EXTRN DMOPEN,DMCLOS,DMRFP j P EXTRN RELPRO & P EXTRN EOFRC,REQERR,NODERR,PROERR P EXTRN PROT,KEYERR,NXTKYS P EXTRN EOFERR P EXT
0x1ea348…1ea4dc Dummy {f00=0x009c, f01=0x0190, f02=» P* P* P************************ P* CONDITIONAL ASSEMBLY * 8 P************************ X P* x P* P* PX:B EQU 0 PX:C EQU 0 PX:E EQU 1 P* 6 P* INDEXED ACCEXSS FUNCTIONS CAN BE OMITTED WITH
0x1ea4dc…1ea670 Dummy {f00=0x009c, f01=0x0190, f02=»RECBFZ EQU X:C INDEX RECORD BUFFER SIZE IN WORDS 0 PINSLAS EQU X:E INSERT SAME KEY LAST WHEN = 1 8 P* l P* v P* . P* A PROGRAM VERSION USING TOSS MMU PAGING * P* IS OBTAINED BY SETTING MMUPAG EQU 1. P* PMMUPAG EQU 0 P
0x1ea670…1ea804 Dummy {f00=0x009c, f01=0x0190, f02=» : P* THE FOLLOWING INTERNAL ORDER CODES IS THE RELATIVE & P* POSITION IN TIODM-TABLE TIODMF B P* l PORDERS EQU * v PQRR EQU *-ORDERS P DATA DMRDRE RANDOM READ PQSR EQU *-ORDERS P DATA DMSQRE SEQUENTIAL READ P IFT INDXA
0x1ea804…1ea998 Dummy {f00=0x009c, f01=0x0190, f02=»IF P IFT INDXAC=0 P DATA DMTERR,DMTERR P XIF < PQRW EQU *-ORDERS H P DATA DMRDWR RANDOM WRITE ` PQSW EQU *-ORDERS " P DATA DMSQWR SEQUENTIAL WRITE P IFT INDXAC=1 PQINS EQU *-ORDERS P DATA DMINS INDEXED INSE
0x1ea998…1eab2c Dummy {f00=0x009c, f01=0x0190, f02=»A DMREWR RANDOM REWRITE P IFT INDXAC=1 PQIRW EQU *-ORDERS 6 P DATA DMIRW INDEXED REWRITE P P XIF t P IFT INDXAC=0 P DATA DMTERR P XIF PQRD EQU *-ORDERS P DATA DMRDDE RANDOM DELETE P IFT INDXAC=1 PQD
0x1eab2c…1eacc0 Dummy {f00=0x009c, f01=0x0190, f02=»-ORDERS P DATA DMSTDI START DIRECT P IFT INDXAC=1 2 PQSTIND EQU *-ORDERS H P DATA DMSTIN START INDEXED d P XIF P IFT INDXAC=0 P DATA DMTERR P XIF P* 4 P* FOLLOWING LABELS ARE FOUND IN MODULE DMOPCL
0x1eacc0…1eae54 (5, 74) Dummy {f00=0x009c, f01=0x0190, f02=»US DONE IN TIODM z PQRFP EQU *-ORDERS $ P DATA DMRFP READ FILE PARAMETERS 2 P EJECT Z P************** h P* DMTASK * ~ P************** P* PDMTASK EQU * P* P* SET UP A14 STACK P* P INH P CF
0x1eae54…1eafe8 Dummy {f00=0x009c, f01=0x0190, f02=»D RFP,OPEN,STARTINDEXED P LD A4,FDBADF,A6 DATA FILE * P CM FDBKA,A4 MARK 1ST PASS INDEXED DEL B PDMT020 EQU * p P* < P* LOOP ENTRY FOR INDEXED READ,INDEXED NEXT,INDEXED DEL P* START, AND SEQ READ P* P LD A7,DWTOR,A1
0x1eafe8…1eb17c Dummy {f00=0x009c, f01=0x018e, f02=» P LD A2,ECBCW,A9 P LD A3,ECBCW+2,A9 REC NR P CC A2,FDBLRN,A1 @ P RF(L) SQR430 NO EOF X P RF(G) SQR410 EOF t P CW A3,FDBLRN+1,A1 P RF(NG) SQR430 NO EOF PSQR410 EQU * P LDKL A1,EOFERR EOF P ABL DMTERX ERR
0x1eb17c…1eb310 Dummy {f00=0x009c, f01=0x0190, f02=» $ P CF A14,GTBKBU GET BLOCK BUFFER P LDR A2,A2 , $ P RF(N) DMT030 NO DATA IN BUFFER > P EJECT f P* t " P* DELAYED BUFFER IS WRITTEN ~ & P* IF IT IS NOT THE WANTED BLOCK P* P LC A7,BUFOR,A3 DELAY FLAG P ANK A7,/3
0x1eb310…1eb4a4 Dummy {f00=0x009c, f01=0x0190, f02=»NR z P ST A7,ECBCW,A8 P LD A7,BUFSNR+2,A3 " P ST A7,ECBCW+2,A8 < P LDK A7,/95 WRITE WAIT V P LKM t P DATA 15 4 P CF A14,DMTIOT RET CODE CHECK AND RESET SECT NR P LDR A1,A1 P ABL(NZ) DMTERR ERR " P CF A14,DMTRBU REL
0x1eb4a4…1eb638 Dummy {f00=0x009c, f01=0x018e, f02=»BUFFER | P* P LDK A7,/91 PHYSICAL READ P LKM : P DATA 15 FM READ BLOCK F 4 P CF A14,DMTIOT CHECK RETURN CODES FROM DISC I/O d P LDR A1,A1 P ABL(NZ) DMTERR P LD A5,ECBBA,A8 P RF DMT090 . PDMT070 EQU * RIGHT DELAY
0x1eb638…1eb7cc Dummy {f00=0x009c, f01=0x018e, f02=» P LDR A5,A3 & P ADKL A5,BUFSTA SKIP BUFFER HEADER * P ST A5,ECBBA,A8 PUT BUFFER ADDR IN ECB @ PDMT090 EQU * n P LDR A1,A6 P LD A7,DWTOR,A6 P* A7 = INTERNAL ORDER CODE P ANK A7,/3F ( P ABI ORDERS,A7 DMTASK FUNCTION TABLE
0x1eb7cc…1eb960 Dummy {f00=0x009c, f01=0x0190, f02=» " P* A7 = ORDER CODE ALL ORDERS P* (A8 = FDBECB ADDRESS ) * P* (A9 = USER ECB ADDRESS ) L P EJECT p PDMSQRE EQU * SEQUENTIAL READ ~ P* PDMRDRE EQU * RANDOM READ P* PDMSTDI EQU * START DIRECT P* P* CH
0x1eb960…1ebaf4 (5, 75) Dummy {f00=0x009c, f01=0x0190, f02=»N A1 x P RF(NE) DMT200 USED P CWK A7,QRR ( P RF(E) DMT190 RANDOM READ < P CWK A7,QSTDIR ^ P RF(NE) DMT250 NOT START t P LC A1,DWTOPT,A6 P ANK A1,7 OPTION P RF(NZ) DMT250 NOT EQUAL P RF DMT230 EQUAL =2 PDMT190
0x1ebaf4…1ebc88 Dummy {f00=0x009c, f01=0x0190, f02=»START P LD A2,ECBRL,A9 REQ LGTH P CW A2,FDBRLE,A6 RECORD LGTH . P RF(NG) DMT220 R P LD A2,FDBRLE,A6 MAX LGTH h & PDMT220 ST A2,ECBEL,A9 SET EFF LGTH P* P* MOVE THE RECORD P* P CF A14,DMTREM P* 0 P*
0x1ebc88…1ebe1c Dummy {f00=0x009c, f01=0x0190, f02=» AT SEQ READ | P* P* GET NEXT RECORD P* : P LD A2,ECBCW+2,A9 REC NR D P ADK A2,1 d P RF(O) DMT260 OVERFLOW v P RF DMT270 PDMT260 ANKL A2,/7FFF P IM ECBCW,A9 CARRY PDMT270 ST A2,ECBCW+2,A9 PDMT280 EQU *
0x1ebe1c…1ebfb0 Dummy {f00=0x009c, f01=0x0190, f02=»A14,EATEST P LDR A4,A4 P ABL(N) DMEAER PROTECT ERROR & P IFT INDXAC=1 J P LD A4,DWTOR,A6 ORDER ` P ANK A4,/3F ~ P CWK A4,QSTIND P ABL(E) DMT400 START INDEXED P XIF P LDR A1,A2 P LDR A2,A3 REC NR P EJE
0x1ebfb0…1ec144 Dummy {f00=0x009c, f01=0x018e, f02=» LDR A1,A6 FDB ADDRESS P LC A3,FDBDBR,A6 DELAY P ANK A3,/10 < P RF(NZ) DMT295 KEEP BUFFER P P LD A3,ECBBA,A8 r P SUKL A3,BUFSTA BUFFER ADDR P* P* RELEASE BLOCK BUFFER P* P CF A14,DMTRBU PDMT295 EQU *
0x1ec144…1ec2d8 Dummy {f00=0x009c, f01=0x0190, f02=» PDMREWR EQU * RANDOM REWRITE P* , PDMRDDE EQU * RANDOM DELETE 6 P* X PDMINS EQU * INDEXED INSERT b P* PDMDEL EQU * INDEXED DELETE P* PDMIRW EQU * INDEXED REWRITE P* P* TEST STATUS P LD A10,
0x1ec2d8…1ec46c Dummy {f00=0x009c, f01=0x0190, f02=» P LD A3,ECBCW+2,A9 LOG REC NR P LDK A4,0 ( P CCR A4,A10 : P RF(E) DMS010 FREE N P IFT INDXAC=1 h P LDR A4,A7 ~ P SUK A4,QINS P RF(E) DMS008 INDEXED INSERT P XIF P LDR A4,A7 P SUK A4,QRW P RF(E) DMS008
0x1ec46c…1ec600 Dummy {f00=0x009c, f01=0x018e, f02=»D z P RF DMERR PDMS010 EQU * P IFT INDXAC=1 0 P LDR A4,A7 F P SUK A4,QIRW X " P RF(Z) DMERND INDEXED REWRITE l P LDR A4,A7 P SUK A4,QDEL P RF(Z) DMERND INDEXED DELETE P XIF P LDR A4,A7 P SUK A4,QREWR
0x1ec600…1ec794 (5, 76) Dummy {f00=0x009c, f01=0x018e, f02=» P CF A14,EATEST P LDR A4,A4 RTN CODE P RF(N) DMEAER EA OTHER TASK 6 PDMS100 EQU * Z P LDK A3,0 STATUS FREE n P IFT INDXAC=1 P LDR A2,A7 P SUK A2,QIRW " P RF(E) CHK010 INDEXED REWRITE P LDR A2,A7 P SUK A2,
0x1ec794…1ec928 Dummy {f00=0x009c, f01=0x0190, f02=» P SUK A2,QDEL P RF(E) CHK010 INDEXED DELETE P XIF < P LDR A2,A7 H P SUK A2,QRD Z P ABL(E) DMT350 RANDOM DELETE n P RF DMT310 P IFT INDXAC=1 P EJECT PCHK010 EQU * F P* INDEXED REWRITE,INDEXED INSERT AND INDEX
0x1ec928…1ecabc Dummy {f00=0x009c, f01=0x0190, f02=»QU * P SUK A5,2 $ P RF(N) CHK100 ALL INDEX CHECKED P LDR A2,A1 FDB ADD F P ADR A2,A5 ` ( P LD A6,FDBAI1,A2 FDB ADDR INDEX FILE r P RB(Z) CHK040 NO INDEX P LD A2,DWTOR,A1 P ANK A2,/3F ORDER INDEX P CWK A2,QINS $ P
0x1ecabc…1ecc50 Dummy {f00=0x009c, f01=0x0190, f02=»/4 * P RB(NZ) CHK040 NO CHECK ON DEL CURRENT ! PCHK050 EQU * ! 8 P* ! L P IFT MMUPAG=1 ! V P LDR A7,A1 SAVE A1 ! l * P LD A1,FDBKA,A6 GET KEY START ADDRESS ! P AD A1,ECBBA,A9 ! 2 P LDKL A2,FDBKEY GET KEY SAVE AREA DISPLACEMENT ! P ADR A
0x1ecc50…1ecde4 Dummy {f00=0x009c, f01=0x0190, f02=»A7 GET TTAB ADDRESS ! , P CF A14,MOV:US MOVE KEY TO FDB KEY AREA " P LDR A1,A7 RESTORE A1 " L P LDR A2,A13 RESTORE A2 " j * P LD A3,FDBKA,A6 GET KEY START ADDRESS " P XIF " P* " P IFT INDXAC=1 " P IFT MMUPAG=0 " " P LD A2,FDBKA,A6
0x1ecde4…1ecf78 Dummy {f00=0x009c, f01=0x0190, f02=»A1 " P ADR A3,A11 KEY IN FILE # P LDK A7,0 # * " P LD A6,FDBRLE,A6 RECORD LENGTH # < P SUK A6,6 KEY LENGTH # b P CF A14,CHKKEY COMPARE KEYS # ~ P CWR A6,A7 # * P RB(E) CHK040 KEY UNCHANGED CHECK NEXT # P LDR A6,A1 FDB ADDR # P LDKL A1,P
0x1ecf78…1ed10c Dummy {f00=0x009c, f01=0x0190, f02=»DEX # | P RF DMT310 $ P XIF $ P EJECT $ * " PDMERND LDKL A1,NODERR NO DATA $ 8 P RF DMERR $ ^ * PDMEAER EQU * RELEASE EA FOR ALL FILES $ p P SUR A9,A9 $ " P LC A9,FDBTNR,A6 USER TASK ID $ " P CF A14,RELPRO RELEASE PROTECT $ P LDKL A1,PRO
0x1ed10c…1ed2a0 Dummy {f00=0x009c, f01=0x0190, f02=»C=1 $ P CWK A7,QDEL % P RF(NE) DMT313 NOT INDEX DEL % P* % D " P* MOVE KEYS TO FDB KEY AREAS % N P* % t P LDK A5,8 % ~ PIXINS3 EQU * % P LDR A2,A6 FDB DATA % P ADR A2,A5 % P LD A3,FDBADF,A2 FDB INDEX % P RF(Z) IXINS4 NO IND
0x1ed2a0…1ed434 (5, 77) Dummy {f00=0x009d, f01=0x0190, f02=»A3 REC LGTH % P SUK A2,6 KEY LGTH & P ADKL A3,FDBKEY TO ADDR & . " P CF A14,DMTBM KEY TO FDB AREA & N PIXINS4 EQU * & t P SUK A5,2 & P RB(NZ) IXINS3 MORE INDEXS & P ABL DMXDEL INDEXED DEL & PDMT313 EQU * & P XIF & " P LD A2,FDBRL
0x1ed434…1ed5c8 Dummy {f00=0x009d, f01=0x0190, f02=» & P IFT MMUPAG=0 ' P XRR A4,A1 ' P ANK A4,/01 ' 0 ( P RF(E) DMT320 BOTH ODD OR BOTH EVEN ' D & P CF A14,DMTBM ONE ODD AND ONE EVEN ' p P RF DMT340 ' P* ' PDMT320 LDR A4,A3 ' P ANK A4,/01 ' P RF(E) DMT330 BOTH EVEN ' P SUK A
0x1ed5c8…1ed75c Dummy {f00=0x009d, f01=0x018e, f02=» P XIF ( P* ( P IFT MMUPAG=1 ( P LDR A3,A2 GET LENGTH ( 0 , P LDR A2,A4 GET RECEIVING BUFFER ADDRESS ( N & P LD A4,DWTTAB,A6 GET TTAB ADDRESS ( ~ 8 P CF A14,MOV:US MOVE RECORD FROM USER TO SYSTEM AREA ( P XIF ( P EJECT ( P* ( P
0x1ed75c…1ed8f0 Dummy {f00=0x009d, f01=0x0190, f02=» P RF(N) DMT390 DELAY NO WRITE ) P LDK A7,/95 PHYSICAL WRITE ) ( P* ) J P* WRITE BLOCK TO DISC ) T P* ) t ( P LDR A1,A6 FDB ADDRESS AS PARAMETER ) ~ P LKM ) P DATA 15 FM WRITE ) " P CF A14,DMTIOT CHECK DISC I/O ) P LDR A1,A1 ) P
0x1ed8f0…1eda84 Dummy {f00=0x009d, f01=0x0190, f02=»T400 EQU * ) " P LDR A1,A6 FDB ADDR DATA FILE * & P CF A14,CRNGET GET CURRENCY BUFFER * 8 P LDR A10,A2 BUFFER ADDR * b P LD A2,ECBCW,A9 * P LD A3,ECBCW+2,A9 LOG REC NR * P LD A7,DWTOR,A1 * P ANK A7,/3F ORDER INDEX * P LDK A4,QRW *
0x1eda84…1edc18 Dummy {f00=0x009d, f01=0x0190, f02=» * P CWR A7,A4 + P RF(E) DMT460 SEQ WRITE + P IFT INDXAC=1 + : P LDK A4,QIRW + P P CWR A7,A4 + d P RF(E) DMT420 IND REWR + v P LDK A4,QINS + P CWR A7,A4 + P RF(E) DMT460 INDEXED INSERT + P CWK A7,QSTIND + P RF(E) DMT406 STAR
0x1edc18…1eddac Dummy {f00=0x009d, f01=0x018e, f02=» P LDR A5,A3 , P SUK A5,1 , P RF(NN) DMT408 , ( P ANKL A5,/7FFF , > P SUK A4,1 , T PDMT408 EQU * , f " P ST A4,CRNCDF,A10 NEW CURRENCY , z P ST A5,CRNCDF+2,A10 , P RF DMT420 , PDMT409 EQU * , P ST A2,CRNCDF,A10 , & P ST A3,CRNCD
0x1eddac…1edf40 Dummy {f00=0x009d, f01=0x0190, f02=» P RF(Z) DMT470 NOT PROTECT - P* - & " P* CHECK IF EA IS SET ALREADY - 0 P* - V P CF A14,EATEST CHECK EA - ` P LDR A4,A4 - " P RF(NZ) DMT470 EA ALREADY SET - P* - P* SET EA - P* - P CF A14,EASETB - P RF DMT470 - PDM
0x1edf40…1ee0d4 (5, 78) Dummy {f00=0x009d, f01=0x0190, f02=»QU * - P IFT INDXAC=1 . P LDK A4,QINS . " P CWR A7,A4 . 6 " P ABL(E) DMINS2 INDEXED INSERT . H P XIF . n P EJECT . z " PDMTAEX LDK A1,0 CORRECT RETURN . P* . PDMTERR LC A3,FDBDBR,A6 . P ANK A3,/10 . P RF(NZ) DMTERX KEEP BUFFER .
0x1ee0d4…1ee268 Dummy {f00=0x009d, f01=0x0190, f02=» FDB DATA FILE . | P INH / P* A1 = RET CODE / " P* A6 = DWT ADDR / < P CF A15,TENDIO / V P ENB / l P LKM / x P DATA 3 / P IFT INDXAC=1 / P EJECT / $ PDMIRR EQU * INDEXED RANDOM READ / P* / PDMSTIN EQU * START INDEXED /
0x1ee268…1ee3fc Dummy {f00=0x009d, f01=0x0190, f02=»LE,A1 REC LGTH INDEX / P SUKL A11,6 KEY LENGTH 0 P LDR A13,A1 0 : P ADKL A13,FDBECB ECB ADDR 0 N $ P CF A14,FNDKEY GET INDEX RECORD 0 p ( PDMR006 EQU * FROM INDEXED READ NEXT 0 P LD A9,DWTECB,A1 0 P LDR A6,A1 FDB ADR 0 P LDKL A8,FDBECB 0
0x1ee3fc…1ee590 Dummy {f00=0x009d, f01=0x0190, f02=» P LC A4,DWTOPT,A6 1 P ANK A4,7 OPTION 1 P RF(Z) DMR007 EQUAL 1 4 " P ANKL A2,/FBFF IGNORE NOKEY =1 1 P PDMR007 EQU * 1 v P LDR A2,A2 RET CODE 1 $ P RF(NZ) DMI037 KEY NOT FOUND =4 1 $ P LD A2,FDBRRO,A1 RECORD ADDR =3 1 P ADKL A2,BUFSTA =
0x1ee590…1ee724 Dummy {f00=0x009d, f01=0x0190, f02=»* MOVE LOG REC NO TO ECB 1 P* 2 " P LDK A5,0 2 , P LC A5,3,A2 2 > P ST A5,ECBCW,A9 2 R P LC A5,4,A2 2 j P ECR A5,A5 2 ~ P LC A5,5,A2 2 P ST A5,ECBCW+2,A9 2 P* SET CRN 2 P* 2 $ P LD A11,FDBADF,A6 FDB DATA FILE 2 P LDR
0x1ee724…1ee8b8 Dummy {f00=0x009d, f01=0x0190, f02=»LE 2 t ( P CF A14,GTLGRN GET INDE X LOG REC NO 3 P LDK A5,QRR RANDOM READ 3 6 P LD A7,DWTOR,A11 3 V P ANK A7,/3F ORDER 3 n P SUK A7,QSTIND 3 P RF(NE) DMR025 INDEXED READ 3 P LDK A5,QSTIND START INDEXED 3 P SUK A3,1 3 P RF(NN) DMR025 N
0x1ee8b8…1eea4c Dummy {f00=0x009d, f01=0x0190, f02=»X FILE 3 t P LD A2,ECBCW,A9 REC NR DATA 4 P ST A2,CRNCDF,A10 4 2 P LD A2,ECBCW+2,A9 4 L P ST A2,CRNCDF+2,A10 4 f P LC A2,FWTFNR,A6 FILE NR 4 P SC A2,CRNCIF,A10 4 P LDR A6,A11 FDB DATA 4 P SC A5,DWTOR+1,A6 NEW ORDER 4 P LDKL A2,/CF
0x1eea4c…1eebe0 Dummy {f00=0x009d, f01=0x0190, f02=»*************************************** 4 " P LD A2,FDBRRO,A1 RECORD OFFSET 5 0 P LDR A3,A5 5 V P SUKL A3,BUFSTA 5 h PDMI100 EQU * 5 P ADR A2,A3 BUFFADR 5 P ADKL A2,BUFSTA 5 ( P AD A2,FDBRLE,A1 ADDR OF STATUS CHAR 5 P LDK A5,/FF USED MARK
0x1eebe0…1eed74 (5, 79) Dummy {f00=0x009d, f01=0x018e, f02=»* CHECK IF END OF FILE 5 P* 6 P LDR A9,A3 SAVE 6 * P CF A14,GTLGRN GET REC NR 6 B P CC A2,FDBLRN,A1 6 d P RF(L) DMI106 NOT EOF 6 | P RF(G) DMI105 EOF 6 P CW A3,FDBLRN+1,A1 6 P RF(L) DMI106 NOT EOF 6 PDMI105 LDR A3,A9 6 P LDK
0x1eed74…1eef08 Dummy {f00=0x009d, f01=0x0190, f02=» P* INDEX RECORD IS FOUND 7 P* 7 & P LD A9,DWTECB,A1 USER ECB 7 0 P* 7 R P* KEY RECORD FOUN 7 . P* CHECK IF NEXT RECORD HAS THE SAME KEY 7 x P* 7 " P LD A2,FDBRRO,A1 RECORD OFFSET 7 P ADKL A2,BUFSTA 7 P ADR A2,A3 REC ADDR 7
0x1eef08…1ef09c Dummy {f00=0x009d, f01=0x0190, f02=»R020 NEXT KEY NOT SAME 7 P LDKL A5,NXTKYS BIT 6 8 " P ORS A5,ECBRC,A9 NEXT KEY SAME 8 < PDMR020 EQU * 8 b P LDK A2,0 MARK FOUND 8 v . P ABL DMR006 CONT AS FOR INDEXED RAND READ 8 * PDMI037 LDKL A1,KEYERR KEY NOT FOUND =4 8 P RF DMI035 =4 8 P
0x1ef09c…1ef230 Dummy {f00=0x009d, f01=0x0190, f02=» 8 P LDKL A1,NODERR NO IDENT 9 PDMI035 EQU * 9 ( P LDR A3,A3 BUFFER ADDR 9 < P ABL(Z) DMTERX NO BUFFER 9 Z P ABL DMTERR ERROR AND BUFFER 9 z PDMI036 EQU * 9 P ANK A1,/27 9 " P RB(NZ) DMI035 BIT 10,13,14,15 9 " P LDKL A1,EOMERR GRAVE ERR AL
0x1ef230…1ef3c4 Dummy {f00=0x009d, f01=0x0190, f02=»*************************************** 9 P LC A3,FDBDBR,A6 : 0 P ANK A3,/10 : H P RF(NZ) DXI010 KEEP BUFFER : P LD A3,ECBBA,A8 : ~ P SUKL A3,BUFSTA : " P CF A14,DMTRBU RELEASE BUFFER : PDXI010 EQU * : P LDK A5,10 LOOPER : PDXI020
0x1ef3c4…1ef558 Dummy {f00=0x009d, f01=0x0190, f02=»A6 FDB DATA : P ADR A4,A5 ; P LD A1,FDBADF,A4 FDB INDEX ; & P RB(Z) DXI020 NO INDEX ; H P LD A2,DWTOR,A6 ORDER ; f P ST A2,DWTOR,A1 ; " P LD A2,DWTECB,A6 USER ECB ADDR ; P ST A2,DWTECB,A1 ; P ST A5,FDBKA,A6 SAVE COUNTER ; P SUK A7,QI
0x1ef558…1ef6ec Dummy {f00=0x009d, f01=0x0190, f02=»* ; PDMTAR5 EQU * < " P LD A6,FDBADF,A1 FDB DATA FILE < * P LD A5,FDBKA,A6 GET COUNTER OF INDEXES < D P RB DXI020 TAKE NEXT INDEX < r PDXI100 EQU * INDEXES READY < P LDK A1,0 RET CODE < P SUK A7,QINS INDEXED INSERT < P ABL(E) DMTERX READY
0x1ef6ec…1ef880 Dummy {f00=0x009d, f01=0x0190, f02=» P* GET KEY IN USER BUFFER = P* = & P LD A4,FDBADF,A1 DATA FDB = 0 P LD A4,DWTECB,A4 USER ECB = R P LD A8,ECBBA,A4 USER BUFFER = t P AD A8,FDBKA,A1 KEY ADDR = P RF INS010 = P XIF = P IFT INDXAC=1 = P* = $ PDMDELX EQU * DELET
0x1ef880…1efa14 (5, 80) Dummy {f00=0x009d, f01=0x0190, f02=» * = P LDR A12,A8 > $ P LD A11,FDBRLE,A1 RECORD LENGTH > P SUKL A11,6 KEY LENGTH > F P LDR A13,A14 > d 0 P ADKL A13,2 ECB ADDR TO RECORD BUFFER AREASS > x $ P CF A14,FNDKEY GET INDEX RECORD > P LDR A6,A1 FDB ADDR > P LDR A1,A2 RET CODE >
0x1efa14…1efba8 Dummy {f00=0x009d, f01=0x018e, f02=»OR,A6 > P ANK A1,/3F ? P SUK A1,QDEL ? " & P ABL(E) DEL000 DELETE INDEX RECORD ? 6 P* ? ` ( P* SET RC BIT 6 TO USER IF NEXT KEY ? j " P* IS SAME IN REQUESTED INDEX ? P* ? P LDR A2,A2 ? $ P RF(NZ) INS050 NEXT KEY NOT SAME ? " P LDKL A4
0x1efba8…1efd3c Dummy {f00=0x009d, f01=0x0190, f02=» ? P LDR A1,A6 FDB @ P LD A2,FDBRRO,A1 REC OFFS @ P RF INS100 @ @ PINS080 EQU * @ R P CF A14,RDNXTR GET NEXT REC @ f P RF INS100 OK @ P ABL DEL045 ERROR @ PINS100 EQU * @ P ADR A2,A3 @ P ADKL A2,BUFSTA @ P AD A2,FDBRLE,A1
0x1efd3c…1efed0 Dummy {f00=0x009d, f01=0x0190, f02=»INS080 GET FIRST RE C IN NXT SECT @ PINS150 EQU * A * P LC A5,-4,A2 DUPL KEY CHAR A > P CWR A5,A11 KEY LENGTH A ` $ P RB(E) INS080 NEXT SAME GET NEXT A ~ P* A P* UPDATE LAST SAME RECORD A P* A P SC A11,-4,A2 NEXT SAME A P LD A7,FDB
0x1efed0…1f0064 Dummy {f00=0x009d, f01=0x0190, f02=»WRITE,WAIT A P LKM B P DATA 15 FM B P CF A14,DMTIOZ IO CHECK B 2 P LDR A1,A1 B R P ABL(NZ) DMTERR B d P* B | P* GET NEXT RECORD B P* B PINS160 EQU * B " P LDR A7,A5 NR OF SAME IN NEXT B P LDR A1,A6 FDB B P CF A14,RDNX
0x1f0064…1f01f8 Dummy {f00=0x009d, f01=0x0190, f02=»A6 USER ECB ADDR B P XIF C P IFT INDXAC=1 C $ PINS050 EQU * C : P* C N ( P* CREATE AN INDE XRECORD IN AREA 1 C X P* C P LDR A1,A12 FROM ADDR C P* C P LDR A3,A14 C P ADK A3,2 TO ADDR C P LDR A2,A11 KEY LENGTH C P CF A1
0x1f01f8…1f038c Dummy {f00=0x009d, f01=0x0190, f02=» NR OF SAME CHAR C P ADK A3,1 D " P LDR A7,A3 ADDR OF LOG REC NR D * P LD A2,ECBCW,A5 D P * P LD A3,ECBCW+2,A5 REC NR DATA FILE REC D h P SCR A2,A7 D P ADK A7,2 D P SCR A3,A7 D P ECR A3,A3 D P SUK A7,1 D P SCR A3,A7 LOG REC NR D
0x1f038c…1f0520 Dummy {f00=0x009d, f01=0x0190, f02=»X D r P* E , P* SAVE RECORD NR FOR FIRST MOVED INDEX E P* E D P ST A2,-28,A14 E N P ST A3,-26,A14 E d P EJECT E z P* E : P* BELOW IS A NEW INDEX RECORD INSERTED AND FOLLOWING E $ P* USED RECORDS ROLLED FORWARD E $ P* A6,A11,A13 I
0x1f0520…1f06b4 (5, 81) Dummy {f00=0x009e, f01=0x0190, f02=»* A10 = AREA ADDR E " P* A11 = RECORD LENGTH INDEX F , P* A12 = AREA INDEX 0=BUFAR1,1=BUFAR2 F B $ P* A13 = BUFFER ADDRESS BLOCK F r P* F PINS190 EQU * F P LDKL A12,1 BUFADR2 F PINS200 EQU * F P LDK A1,0 F P LDR A12,A12 F
0x1f06b4…1f0848 Dummy {f00=0x009e, f01=0x0190, f02=» F ( P ADR A10,A1 RECORD BUFFER AREA ADDR G P* G 4 P* SAVE LAST RECORD G > P* G Z P LDR A1,A13 G d P ADKL A1,BUFSTA G x . P AD A1,FDBMRO,A6 ADDR OF LAST REC IN SECT G P LDR A2,A11 G P LDR A3,A10 G " P CF A14,DMTBM SAVE LAST RECORD
0x1f0848…1f09dc Dummy {f00=0x009e, f01=0x0190, f02=»A1 G P LD A2,FDBMRO,A6 H P SU A2,FDBRRO,A6 NR OF CHAR H " P LDR A3,A1 H F P ADR A3,A11 TO ADDR H X P CF A14,DMTBMR MOVE H t P* INSERT NEW RECORD H P* H P LDKL A1,RECBFZ BUFFER SIZE H P SLL A1,1 BYTE NO H P LDR A12,A12 H
0x1f09dc…1f0b70 Dummy {f00=0x009e, f01=0x018e, f02=»R H ~ P LDR A2,A11 NR OF CHAR I P LDR A3,A5 TO ADDR I ( P CF A14,DMTBM MOVE I B P* WRITE BUFFER I P* I t P LDR A8,A14 USE STACK AS ECB I ~ P SUKL A8,24 I " P LC A2,FWTFNR,A6 VOL DEV CODE I P ANK A2,/FF I P STR A2,A8 I P LDR
0x1f0b70…1f0d04 Dummy {f00=0x009e, f01=0x0190, f02=» P ST A2,ECBRL,A8 J P LD A2,FDBSNR,A6 SECTOR NR J P ST A2,ECBCW,A8 SECTOR NR J > P LD A3,FDBSNR+2,A6 J ` P ST A3,ECBCW+2,A8 SECT NR J z P LDK A7,/95 WRITE , WAIT J P LKM J P DATA 15 FM J P LDR A1,A6 FDB INDEX J P CF A14,DMTIOZ I
0x1f0d04…1f0e98 Dummy {f00=0x009e, f01=0x0190, f02=» LDR A2,A10 RECORD AREA ADDR J P ADR A2,A11 REC LGTH K $ " P SUK A2,1 ADDR OF STATUS CHAR K @ P LD A4,FDBMRO,A6 K f ( P ST A4,FDBRRO,A6 MAX OFFSET IN SECT K ~ P CCR A1,A2 K P RF(Z) INS400 FREE RECORD K P* K P* GET NEXT BLOCK K P* K
0x1f0e98…1f102c Dummy {f00=0x009e, f01=0x0190, f02=» P RF DEL045 ERR L PINS260 EQU * L P LDR A13,A3 NEW BUFFER ADDR L . P LDR A12,A12 L R ( P RB(Z) INS190 SWITCH RECORD BUFFERS L f P SUR A12,A12 L P RB INS200 L P EJECT L PINS400 EQU * L P* L ( P* UPDATE LRN IF EOF IS ENCOUNTERED
0x1f102c…1f11c0 Dummy {f00=0x009e, f01=0x0190, f02=»EOF L P CW A3,FDBLRN+1,A1 M P RF(NG) INS430 NO EOF M & PINS410 EQU * M D " P SC A2,FDBLRN,A6 LLAST REC NR M X P ST A3,FDBLRN+1,A6 M ~ P LDKL A1,EOFRC END OF FILE M P ORS A1,ECBRC,A9 TO USER M P EJECT M PINS430 EQU * M P* M 0 P
0x1f11c0…1f1354 (5, 82) Dummy {f00=0x009e, f01=0x0190, f02=»NR MOVED M | P LD A10,-28,A14 N & P LD A11,-26,A14 FIRST REC NR MOVED N ( * P CF A14,CRNUPD ADD 1 TO RECORD NUMBERS N R PINS440 EQU * N P LDR A1,A5 FDB INDEX N P LDR A3,A13 BUFFER ADDR N P CF A14,DMTRBU REL BUFFER N * P ABL DMTAR5 ONE INDEX
0x1f1354…1f14e8 Dummy {f00=0x009e, f01=0x0190, f02=»DEL010 EQU * N " P ABL(NZ) DMI036 KEY NOT FOUND O P* O : P* CHECK RECORD NR DATA REC O D P* O h PDEL020 EQU * O r P LD A1,FDBRRO,A6 O P ADR A1,A3 O P AD A1,FDBRLE,A6 O " P ADK A1,7 BUFSTA-3=ADDR REC NR O P LCR A2,A1 O P CC A2,E
0x1f14e8…1f167c Dummy {f00=0x009e, f01=0x018e, f02=»CW+2,A12 O P RF(E) DEL200 RECORD FOUND P PDEL030 EQU * P 2 P EJECT P F P* P T P* CHECK IF NEXT KEY SAME P ^ P* P P CC A11,-1,A1 KEY LENGTH P $ P RB(NE) DEL010 NEXT KEY NOT SAME P P LDR A1,A6 FDB INDEX P PDEL040 EQU * P ( P CF A1
0x1f167c…1f1810 Dummy {f00=0x009e, f01=0x0190, f02=» P P* Q P* CHECK IF RECORD IS USED Q P* Q 6 P LDR A13,A3 NEW BUFFER ADDR Q @ P ADR A2,A3 Q d P ADKL A2,BUFSTA Q v $ P AD A2,FDBRLE,A1 ADDR OF STATUS Q P LDK A5,/FF Q P CCR A5,A2 Q P RB(E) DEL020 USED Q P LD A4,FDBMRO,A1 Q
0x1f1810…1f19a4 Dummy {f00=0x009e, f01=0x0190, f02=» BIT 6 IF NEXT KEY SAME Q P* R P LDK A7,0 R * P LC A7,-1,A1 NR OF SAME CHAR R < 2 P ST A7,16,A14 SAVE IN RECORD BUFFER AFTER ECB R ` P CWR A11,A7 KEY LENGTH R $ P RF(NE) DEL220 NEXT KEY NOT SAME R P LDKL A4,NXTKYS R $ P ORS A4,ECBRC,A12 NE
0x1f19a4…1f1b38 Dummy {f00=0x009e, f01=0x018e, f02=» P LDR A3,A13 S P ADKL A3,BUFSTA S P AD A3,FDBRRO,A6 TO ADDR S 0 P LDR A1,A3 S P P ADR A1,A11 FROM ADDR S b P LD A2,FDBMRO,A6 S P SU A2,FDBRRO,A6 NR OF CHAR S P CF A14,DMTBM MOVE S P* S P* SET LAST RECORD FREE S P* S
0x1f1b38…1f1ccc Dummy {f00=0x009e, f01=0x0190, f02=» P* T P LDR A1,A6 FDB ADDR T P CF A14,GTLGRN GET REC NR T * P LDR A10,A2 T L " P LDR A11,A3 FIRST REC NR MOVED T ` P LD A12,FDBRRO,A6 OLD OFFSET T P LD A4,FDBMRO,A6 T P ST A4,FDBRRO,A6 MAX OFFSET T $ P CF A14,GTLGRN LAST REC NR MOVED T
0x1f1ccc…1f1e60 Dummy {f00=0x009e, f01=0x018e, f02=»FFERS T t $ P LDKL A12,1 MARK BUFFER CHANGED U PDEL240 EQU * U 6 P LD A4,FDBRRO,A5 U J $ P RF(NZ) DEL290 NOT FIRST RECORD U b P LDR A1,A5 FDB U P CF A14,GTLGRN GET REC NR U P LDR A1,A2 U P LDR A2,A3 U P LDK A6,0 U P LDK A7,1 U $
0x1f1e60…1f1ff4 (5, 83) Dummy {f00=0x009e, f01=0x0190, f02=» P LDR A5,A6 FDB ADDR V P LDR A1,A1 V P RF(NZ) DEL600 FILE START V 2 P LDR A8,A14 V T P ADKL A8,2 ECB ADDR V h P LDR A12,A12 V $ P RF(Z) DEL245 BUFFER NOT CHANGED V P* V P* WRITE SECTOR V P* V P LDK A7,/95 WRITE WAIT V
0x1f1ff4…1f2188 Dummy {f00=0x009e, f01=0x0190, f02=»12,A12 BUFFER NOT CHANGED YET V PDEL245 EQU * W & P LDR A3,A13 W : " P CF A14,DMTRBU RELEASE BUFFER W N P* W t P* GET PREVIOUS SECTOR W ~ P* W P LDR A1,A5 FDB ADDR W P LDK A3,0 W P CF A14,RDNXTR GET SECTOR W P RF DEL250 OK W
0x1f2188…1f231c Dummy {f00=0x009e, f01=0x018e, f02=»,FDBMRO,A5 W P RF DEL300 X PDEL290 EQU * X $ P SU A4,FDBRLE,A5 X 8 P SUK A4,1 X P PDEL300 EQU * X b * P ST A4,FDBRRO,A5 PREVIOS RECORD OFFSET X v P ADKL A4,BUFSTA X P ADR A4,A13 RECORD ADDR X & P AD A4,FDBRLE,A5 STATUS CHAR ADDR X P L
0x1f231c…1f24b0 Dummy {f00=0x009e, f01=0x018e, f02=» P LD A1,FDBADF,A5 FDB DATA F Y " P CF A14,CRNGET GET CRN BUFFER Y ( " P LC A1,FWTFNR,A5 INDEX FILE NR Y N $ P CC A1,CRNCIF,A2 LAST REF INDEX Y t P RF(NE) DEL350 NOT THIS IND Y P* Y P* UPDATE CURRENCY Y P* Y P LDR A8,A2 CRN ADDR Y
0x1f24b0…1f2644 Dummy {f00=0x009e, f01=0x018e, f02=» Y . P LC A2,17,A14 NR OF SAME IN DELETED RECORD Z " P* WAS SAVED AT LABEL DEL200 Z : P CC A2,-4,A9 Z ` P RF(NL) DEL600 Z t ( P SC A2,-4,A9 MAKE NR OF SAME SMALLER Z P RF DEL700 WRITE SECTOR Z PDEL600 EQU * Z P LDR A12,A12 Z $ P RF(Z) DEL
0x1f2644…1f27d8 Dummy {f00=0x009e, f01=0x40f0, f02=» Z z P LDK A7,/95 WRITE WAIT [ P LKM [ & P DATA 15 FM [ 2 P LDR A1,A5 FDB ADDR [ F P CF A14,DMTIOZ IO CHECK [ b P LDR A1,A1 [ P ABL(NZ) DMTERR [ PDEL900 EQU * [ P ABL INS440 [ P XIF [ P END [ @ [ 12,A12 Z $ P RF(Z) DEL
0x1f27d8…1f296c 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* +
0x1f296c…1f2b00 Dummy {f00=0x009e, f01=0x0190, f02=»'TT' TASK DEFINITION BLOCK? l P RF(NE) BTT95 m $ P LDKL A2,BTT20 m : P SUKL A2,REL m P P ADR A2,A13 m d P ABR A2 m x PBTT95 EQU * m P =4 m P =4 m P =4 m P =4 m P =4 m P =4 m P =4 m P =4 m
0x1f2b00…1f2c94 (5, 84) Opaque[0x194]
0x1f2c94…1f2e28 # DirEnt {nam=»DRCD01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x13d8, f03=0x0000}
0x1f2c94…1f2e28 IdxSect {
0x1f2c94…1f2e28 f00 = 0x009e // 0x1f2c94 @0x0
0x1f2c94…1f2e28 f01 = 0x0016 // 0x1f2c96 @0x2
0x1f2c94…1f2e28 gno = [ // 0x1f2c98 @0x4
0x1f2c94…1f2e28 [0x00]: C0x009e.0x3.0
0x1f2c94…1f2e28 [0x01]: C0x009f.0x0.0
0x1f2c94…1f2e28 [0x02]: C0x009f.0x1.0
0x1f2c94…1f2e28 [0x03]: C0x009f.0x2.0
0x1f2c94…1f2e28 [0x04]: C0x009f.0x3.0
0x1f2c94…1f2e28 [0x05]: C0x00a0.0x0.0
0x1f2c94…1f2e28 [0x06]: C0x00a0.0x1.0
0x1f2c94…1f2e28 [0x07]: C0x00a0.0x2.0
0x1f2c94…1f2e28 [0x08]: C0x00a0.0x3.0
0x1f2c94…1f2e28 [0x09]: C0x00a1.0x0.0
0x1f2c94…1f2e28 [0x0a]: C0x00a1.0x1.0
0x1f2c94…1f2e28 ]
0x1f2c94…1f2e28 }
0x1f2e28…1f2fbc Dummy {f00=0x009e, f01=0x0190, f02=» 2 P IDENT DRCD01 REL 10.0 80-04-10 870105041000 P : P* B P* L 2 P********************************************** V P* $ P* PHILIPS TERMINAL SYSTEM PTS P* 8 P* DRCD01 = DRIVER FOR ONE/TWO DISC UNITS PTS 6877 P*
0x1f2fbc…1f3150 Dummy {f00=0x009e, f01=0x0190, f02=» 0 P* THIS DISC DRIVER HANDLES UP TO TWO DISC , P* DRIVES PTS 6877 CONNECTED TO CPU VIA < P* BUILT IN DMA CHANNEL l P* P* * P* THE FOLLOWING ORDERS ARE TREATED : P* P* /00 TEST STATUS P* /01 BASIC R
0x1f3150…1f32e4 Dummy {f00=0x009e, f01=0x0190, f02=» P* P EJECT DRCD01 P* $ P* . P********************* 8 P* * V P* ENTRIES * t P* * P********************* P* & P ENTRY CDADR DRIVER ADDRESS BLOCK P ENTRY
0x1f32e4…1f3478 Dummy {f00=0x009e, f01=0x0190, f02=» P* P************* P* EXTERNALS * ( P************* > P* T P* ^ P EXTRN TDISP DISPATCHER h P EXTRN TENDIO END I/O . P EXTRN SAVE8 SAVE REGS. A1-A8 ON A15 STACK , P EXTRN NVLCHK CHECK IF NEW VOLUME LOADED 0 P
0x1f3478…1f360c Dummy {f00=0x009e, f01=0x0190, f02=» NAMES IN DWT v . P EXTRN INXDWT DOUBLED INDEX + DWT ADDRESS P EXTRN DISIOE REQUEST ERROR H & P EXTRN INIFLG INITIALIZATION FLAG l * P EXTRN PFPOST PWF POST PROCESSING FLAG * P EXTRN INTSAV SAVE AREA LAST INTERRUPT P EXTRN SETIMP TIMER
0x1f360c…1f37a0 Dummy {f00=0x009e, f01=0x0190, f02=» DWTA4 SAVE AREA A4 EXTRN DWTA5 SAVE AREA A5 & P EXTRN DWTORD SAVE AREA FOR ORDER > $ P EXTRN ECBBA ECB BUFFER ADDRESS h & P EXTRN ECBRL ECB REQUESTED LENGTH & P EXTRN ECBEL ECB EFFECTIVE LENGTH P EXTRN ECBRC ECB RETURN CODE ( P
0x1f37a0…1f3934 (5, 85) Dummy {f00=0x009f, f01=0x0190, f02=» P************************** P* * & P* CONDITIONAL ASSEMBLY * H P* * j P************************** P* P* 6 P* READ AFTER WRITE MAY BE INCLUDED FOR ORDER /15 P* BY SETTI
0x1f3934…1f3ac8 Dummy {f00=0x009f, f01=0x0190, f02=»* IF X:A := 2 P* PX:A EQU 1 " PNUNITS EQU X:A 4 P* J P* T . P* A PROGRAM VERSION USING TOSS MMU PAGING ^ * P* IS OBTAINED BY SETTING MMUPAG EQU 1. P* PMMUPAG EQU 0 P* PCPU852 EQU 1 P* P EJE
0x1f3ac8…1f3c5c Dummy {f00=0x009f, f01=0x0190, f02=» * P************************* P* > & PCUADR EQU /17 CONTROL UNIT ADDRESS H " PCUAD1 EQU CUADR ADDRESS UNIT 1 r & PCUAD2 EQU CUADR+/20 ADDRESS UNIT 2 PDEVIND EQU 10 DEVICE INDEX PRY3 EQU 3 3 RETRIES * PPHSECL E
0x1f3c5c…1f3df0 Dummy {f00=0x009f, f01=0x0190, f02=» EQU /A800 SEEK COMMAND CODE & PREDCOM EQU /0800 READ COMMAND CODE $ ( PVERCOM EQU /3800 VERIFY COMMAND CODE N ( PWRICOM EQU /1800 WRITE COMMAND CODE z 4 PWHACOM EQU /22C0 WRITE SECTOR MARKS COMMAND CODE " PTIME EQU 1000 1 MIN 40 SECONDS * PMAXC
0x1f3df0…1f3f84 Dummy {f00=0x009f, f01=0x018e, f02=»NG FACTOR z P* P EJECT DRCD01 P* 2 P* < P* DRIVER ADDRESS BLOCK F P* f P* p $ P DATA 0 INDICATES NO MMU BUFFER z " P DATA DEVIND DISC DEVICE INDEX & PCDADR DATA CDAD ACTIVATION ADDRESS " P DATA 0 ABORT ROUTINE
0x1f3f84…1f4118 Dummy {f00=0x009f, f01=0x0190, f02=» P EJECT DRCD01 P* P* $ P**************************** . P* * R P* ACTIVATION * v P* * P**************************** P* PCDAD EQU * P LDK A5,DW
0x1f4118…1f42ac Dummy {f00=0x009f, f01=0x0190, f02=»OUNTER j . P CF A15,NVLCHK CHECK IF NEW VOLUME LOADED P* SAVE INDEX AND ORDER @ P ADK A7,0 SET CR ` ( P RF(NZ) CDA:00 NOT TEST STATUS ORDER x P* P EJECT DRCD01 P* P* P********************* P*
0x1f42ac…1f4440 Dummy {f00=0x009f, f01=0x018e, f02=»A8 NVL BIT & P IM DWTSAV,A6 INDICATE TEST STATUS " P CF A5,VO:NAM READ VOLUME NAME < P ANK A1,1 b P RF(NZ) TESEND NOT OPERABLE t P LD A8,DWTECB,A6 ECB ADDRESS 6 P CF A15,VOLNAM TRANSFER VOLUME NAME TO USER BUFFER P LDK A1,0 RESET RE
0x1f4440…1f45d4 (5, 86) Dummy {f00=0x009f, f01=0x0190, f02=» ~ P* , P*************************************** , P* * B , P* NEW VOLUME LOADED CHECK * r , P* ORDER CODE CHECK * , P* * , P******
0x1f45d4…1f4768 Dummy {f00=0x009f, f01=0x0190, f02=» P* PCDA:00 EQU * ( P ADK A1,0 CHECK IF NEW VOLUME LOADED & P RF(NZ) DENDIO PERFORM ENDIO R P SUK A7,1 v P RF(Z) CD:010 BASIC READ P SUK A7,4 P RF(Z) CD:000 BASIC WRITE P SUK A7,12 P RF(Z) CD:010 PHYSICAL R
0x1f4768…1f48fc Dummy {f00=0x009f, f01=0x0190, f02=»ABL DISIOE REQUEST ERROR P* ( PINCLEN EQU * REQUESTED LENGTH ERROR * P LDKL A1,/8008 V PDENDIO EQU * l P ABL END:IO P* P* P EJECT DRCD01 P* P* & P********************************* & P*
0x1f48fc…1f4a90 Dummy {f00=0x009f, f01=0x0190, f02=»*********** z P* P* PFORMAT EQU * ( ( P LDKL A1,SEEKCO SEEK OPERATION CODE < , P ST A1,DWTSEK,A6 TO SEEK OPERATION AREA h P CF A5,SEEKZ CYLINDER 0 P RF FOR:50 PFOR:10 EQU * P CF A5,SEEK PFOR:50 EQU * $ P C
0x1f4a90…1f4c24 Dummy {f00=0x009f, f01=0x018e, f02=» + MAX CYLINDER NUMBER j P RB(NZ) FOR:10 NEXT CYLINDER P LDKL A2,MAXCYL-1 821 B P IFT NUNITS=1 ` $ P ST A2,DWTCYL,A6 CYLINDER NUMBER v P XIF P IFT NUNITS=2 P CF A15,INXDWT $ P ST A2,DWTCYL,A4 CYLINDER NUMBER P XIF
0x1f4c24…1f4db8 Dummy {f00=0x009f, f01=0x0190, f02=» 0 ,* * 0 ,* INPUT ECB-PARAMETER CHECK * 8 0 ,* * l 0 ,******************************************** * * PCD:000 EQU * P LDK A7,5 IN
0x1f4db8…1f4f4c Dummy {f00=0x009f, f01=0x0190, f02=»R LDK A2,0 CLEAR REGISTER ( $ LD A1,ECBRL,A8 GET REQUESTED LENGTH * $ P RB(Z) INCLEN INCORRECT REQUEST V ECR A2,A1 DIVIDE BY 256 ~ $ ANK A1,/FF REST AFTER DIVISION $ P RB(NZ) INCLEN INCORRECT REQUEST 4 / ST A2,DWTLOS,A6 SAVE NUMB
0x1f4f4c…1f50e0 Dummy {f00=0x009f, f01=0x018e, f02=»ECT REQUEST | * P EJECT DRCD01 * 4 * > " * GET PHYSICAL SECTOR NUMBER H P* GET BUFFER ADDRESS n P* PREPARE SECTOR MASK * * P IFT MMUPAG=0 . P LD A2,ECBBA,A8 GET 16 BIT BUFFER ADDRESS P
0x1f50e0…1f5274 (5, 87) Dummy {f00=0x009f, f01=0x0190, f02=» n P ANK A1,3 P SRL A2,1 P MS 2,DWTBA,A6 , P XIF B . ) ML 2,ECBCW1,A8 GET LOGICAL SECTOR NUMBER N ( P LDK A3,0 DIVIDE MOST SIGN PART BY 3 PCD:100 EQU * P ADK A3,1 P SUK A1,3 P RB(NN) CD:100 P ADK A1,3
0x1f5274…1f5408 Dummy {f00=0x009f, f01=0x0190, f02=»T h " P CF A5,MASKPR PREPARE IO MASK P ANK A7,4 ORDER CHECK 0 P RF(Z) REA:00 READ ORDER N EJECT DRCD01 n * * $ P******************************** $ P* * $ P* WRITE SECTORS *
0x1f5408…1f559c Dummy {f00=0x009f, f01=0x0190, f02=» t P SUK A3,7 ( P RF(Z) WRI:50 TOTAL PHYSICAL SECTOR PWRI:10 EQU * F < P ML 3,DWTBSE,A6 GET IDENTITY OF SECTORS IN DRIVER BUFFER Z $ P OR A3,DWTMAS,A6 GET SECTOR MASK P SUK A3,7 0 P RF(NZ) WRI:20 NOT COMPLETE PHYSICAL SECTOR $ P
0x1f559c…1f5730 Dummy {f00=0x009f, f01=0x0190, f02=»T SECTORS IN DRIVER BUFFER | P* " P EJECT DRCD01 , P* B P* L PWRI:20 EQU * V & P IM DWTTRA,A6 INDICATE NO TRANSFER j . P CF A5,READ READ SECTORS TO DRIVER BUFFER P* PWRI:30 EQU * * P CF A5,WRITE WRITE ONE PHYSICAL SECT
0x1f5730…1f58c4 Dummy {f00=0x009f, f01=0x0190, f02=» IF PHYSICAL WRITE | PWRI:35 EQU * P XIF . P CF A5,UPDATE : 2 P LD A1,DWTLOS,A6 GET NUMBER OF LOGICAL SECTORS P " P RF(Z) REA:50 LAST SECTOR DONE & P CF A5,MASK00 PREPARE SECTOR MASK P LD A1,DWTMAS,A6 GET MASK P SUK A1,7 (
0x1f58c4…1f5a58 Dummy {f00=0x009f, f01=0x0190, f02=» ML 4,DWTBA,A6 SAVE PARAMETERS FOR READ AFTER WRITE P MS 4,DWTRAW,A6 < P IFT MMUPAG=1 T P LD A1,DWTSEC+2,A6 j P ST A1,DWTRAW+8,A6 P XIF P LDK A3,7 P ST A3,DWTMAS,A6 SECTOR MASK PWRI:55 EQU * P CF A5,WRITE P
0x1f5a58…1f5bec Dummy {f00=0x009f, f01=0x0190, f02=»RA,A6 P XIF . P LD A1,DWTLOS,A6 NUMBER OF LOGICAL SECTORS P SUK A1,3 L ( P RB(NN) WRI:55 NEXT PHYSICAL SECTOR ^ P IFT RAW=1 P* P EJECT DRCD01 P* P* P LD A2,DWTOR,A6 P ANK A2,/10 P RF(Z) WRI:7
0x1f5bec…1f5d80 Dummy {f00=0x009f, f01=0x0190, f02=»A6 P ST A1,DWTSEC+2,A6 P XIF $ P IFT RAW=1 0 PWRI:60 EQU * B P CF A5,CIOLOD V P CF A5,VERIFY l P CF A5,UPDAT . P LD A1,DWTLOS,A6 NUMBER OF LOGICAL SECTORS P SUK A1,3 ( P RB(NN) WRI:60 NEXT PHYSICAL SECTOR P X
0x1f5d80…1f5f14 (5, 88) Dummy {f00=0x009f, f01=0x0190, f02=»10 LAST SECTORS * P EJECT DRCD01 " P* 8 P* B $ P******************************** L $ P* * t $ P* READ SECTORS * $ P* * $ P****************************
0x1f5f14…1f60a8 Dummy {f00=0x009f, f01=0x018e, f02=»S,A6 SECTOR MASK . P LD A1,DWTLOS,A6 NUMBER OF LOGICAL SECTORS P RF(Z) REA:50 IO READY J P SUK A1,3 h 0 P RB(NN) REA:00 AT LEAST ONE PHYSICAL SECTOR z P CF A5,MASK00 P CF A5,READ P CF A5,UPDATE P LDK A1,0 RESET RETURN COD
0x1f60a8…1f623c Dummy {f00=0x009f, f01=0x0190, f02=» * * * READ SECTOR N * " * * @ ********************* ^ * | * PREAD EQU * P CF A5,CIOLOD 6 P CM DWTBSE+4,A6 CLEAR BUFFER IND. IN CASE OF ERROR * % LDKL A3,REDCOM GET RE
0x1f623c…1f63d0 Dummy {f00=0x009f, f01=0x0190, f02=» EXECUTE READ P ANK A1,/F ! $ RF(Z) RET34 OK. NO RETURN CODE ! ( * ! P * IO ERROR IN READING ! Z * ! x P IM DWTRE2,A6 ! $ SUK A4,1 DECREMENT RETRYCOUNTER ! 4 P RB(P) READ10 3:RD RETRY IN THIS STATE NOT DONE ! $ LDK A4,RY3 REIN
0x1f63d0…1f6564 Dummy {f00=0x009f, f01=0x0190, f02=»COP,A6 ! 0 + ANK A2,/C0 LAST RETRY WITH EARLY- OR LATE- " RF(NZ) RET31 DATA STROBE ? " B 0 , LDKL A3,/8000 PREPARE FOR EARLY DATA STROBE " f ORS A3,DWTCOP,A6 " 4 / RB READ10 RETRY 3 TIMES WITH EARLY DATA STROBE " RET31 EQU * " ANK A2,
0x1f6564…1f66f8 Dummy {f00=0x009f, f01=0x0190, f02=»ATA STROBE " b 2 . RB READ10 RETRY 3 TIMES WITH LATE DATA STROBE # RET32 EQU * # H LDKL A3,/3FFF # , ( ANS A3,DWTCOP,A6 RESET LATE DATA STROBE # r LC A2,DWTCOP+2,A6 # 2 - ANK A2,/C0 LAST RETRY CARRIAGE+ OR CARRIAGE- # RF(NZ) RET33 # ( $
0x1f66f8…1f688c Dummy {f00=0x009f, f01=0x018e, f02=» DRCD01 # P* $ P* $ RET33 EQU * $ $ ANK A2,/80 $ 8 , P RF(Z) RET35 LAST RETRY WAS A CARRIAGE- $ L LDKL A3,/C000 $ | : 5 XRS A3,DWTCOP+2,A6 CHANGE FROM CARRIAGE+TO CARRIAGE- $ , ' RB READ10 RETRY 3 TIMES WITH CARRIAGE- $ PRET35 EQ
0x1f688c…1f6a20 Dummy {f00=0x009f, f01=0x0190, f02=» P EJECT DRCD01 % P* % P* % $ P************************** % . P* * % P P* WRITE SECTOR N * % r P* * % P************************** % P* % PWRITE EQU * % P CF A5,CIOLOD %
0x1f6a20…1f6bb4 (5, 89) Dummy {f00=0x00a0, f01=0x0190, f02=»F A5,CIO % P ANK A1,/F & P RF(Z) WRIT50 WRITE OK & " " P IM DWTRE2,A6 RETRY PERFORMED & @ P SUK A4,1 & f P RB(NZ) WRIT20 RETRY & x P RB REA:50 NO MORE RETRIES & PWRIT50 EQU * & P RTN A5 & P* & P IFT RAW=1 & P EJECT DRCD01 &
0x1f6bb4…1f6d48 Dummy {f00=0x00a0, f01=0x0190, f02=» * & P**************************** ' P* ' D PVERIFY EQU * ' N * P LDKL A3,VERCOM ORDER CODE FOR VERIFY ' b P ORS A3,DWTCOP,A6 ' P RB READ00 ' P* ' P XIF ' P EJECT DRCD01 ' P* ' P* ' . P* SEEK,SEE
0x1f6d48…1f6edc Dummy {f00=0x00a0, f01=0x0190, f02=»EXCIO ' P* ( P* ( PSEEKZ EQU * ( " 6 P LDK A2,DWTSEZ GET EFFECTIVE ADDRESS TO SEEK 0 OP. ( 6 P RF EXCIO ( p P* ( P* ( PHOMEAD EQU * ( . P LDK A2,DWTWHA GET WRITE HOME ADDRESS OP. ( P RF EXCIO ( P* ( P* ( PCIO EQ
0x1f6edc…1f7070 Dummy {f00=0x00a0, f01=0x0190, f02=» ( P ST A4,DWTA4,A6 SAVE A4 ) P LD A3,PFPOST ) ( ( P RF(NZ) CIOAB PWF POST PROCESSING ON ) > P IFT NUNITS=2 ) j 0 P CF A15,INXDWT GET INDEXED DWT DISPLACEMENT ) P EX DWTCIO,A4 ) P XIF ) P IFT NUNITS=1 ) P EX DWTCIO,A6 ) P XIF )
0x1f7070…1f7204 Dummy {f00=0x00a0, f01=0x0190, f02=» DRCD01 ) * * * * . )***************************************** * $ . )* * * V . )* SUBROUTINE CIOLOD * * . )* PREPARE CIO WORK AREA * * . )*
0x1f7204…1f7398 Dummy {f00=0x00a0, f01=0x0190, f02=» * z P* A2 = WORK REGISTER + P* A3 = MASK + & " P* A4 = CIO WORK AREA POINTER + < P* A7 = USER BUFFER POINTER + b " P* A8 = DRIVER BUFFER POINTER + * + $ P* DWTTRA = TRANSFER INDICATOR + < P* DWTMAS = MASK INDICATING SECTORS TO/FR
0x1f7398…1f752c Dummy {f00=0x00a0, f01=0x0190, f02=» P LDR A4,A6 GET DWT ADDRESS , ( P ADK A4,DWTCOP CIO WORK AREA ADDRESS , & * P LDKL A8,BUFFER DRIVER BUFFFER ADDRESS , R $ P LD A3,DWTMAS,A6 GET BUFFER MASK , P SRC A3,4 MASK IN POSITION , " P LDK A7,0 USER BUFFER POINTER , P* , P EJECT DRCD01
0x1f752c…1f76c0 Dummy {f00=0x00a0, f01=0x0190, f02=»LL A3,1 , P RF(NN) CIOL50 - , P LDKL A1,/C000+LOSECL NO TRANSFER ORDER - & ( P LD A2,DWTTRA,A6 TRANSFER INDICATOR - V P RF(NZ) CIOL55 NO TRANSFER - P* - P IFT MMUPAG=0 - P LDKL A1,/4080 - & P LDR A2,A7 BUFFER ADDRESS POINTER - " P AD
0x1f76c0…1f7854 (5, 90) Dummy {f00=0x00a0, f01=0x018e, f02=»R BUFFER POINTER - P LDKL A1,/804 SHIFTED . ( P DA DWTBA,A6 GET USER BUFFER ADDRESS . 6 P SLL A2,1 IN POSITION . b P SRC A1,4 IN POSITION . P MSR 2,A4 TO CIO WORK AREA . . P ADK A7,LOSECL UPDATE USER BUFFER POINTER . P XIF . P RB CIOL10
0x1f7854…1f79e8 Dummy {f00=0x00a0, f01=0x0190, f02=» . v . P ADKL A8,/100 UPDATE DRIVER BUFFERPOINTER / PCIOL55 EQU * / : P MSR 2,A4 TO CIO WORK AREA / N P RB CIOL10 / p PCIOL60 EQU * / P LDKL A1,/B000+LOSECL / " P ANS A1,DWTCOP+12,A6 CLEAR BIT / P LDKL A1,PHSECL / P ST A1,DWTCOP+2,A6 /
0x1f79e8…1f7b7c Dummy {f00=0x00a0, f01=0x0190, f02=»***** / l . )* * 0 . )* PUT SECTOR NUMBER * 0 @ . )* AND HEAD NUMBER IN POS. * 0 r . )* * 0 . )***************************************** 0
0x1f7b7c…1f7d10 Dummy {f00=0x00a0, f01=0x0190, f02=»FOR CIO 0 x * PERFORM SEEK 1 * 1 ( * P ML 2,DWTSEC,A6 PHYSICAL SECTOR NUMBER 1 2 P DVK 115 1 ` 0 P* A1 = REST = HEAD NUMBER * SECTOR NUMBER 1 p ( P* A2 = QUOTIENT = CYLINDER NUMBER 1 $ P LDR A3,A2 SAVE CYLINDER NUMBER 1 P LDR A2,A1 1
0x1f7d10…1f7ea4 Dummy {f00=0x00a0, f01=0x0190, f02=»WTCOP,A6 COP WORK AREA 1 P LDR A2,A1 SECTOR NUMBER 2 P MUK INLACE INTERLACING 2 > P SLC A3,1 2 ^ & P RF(NN) CIOP10 EVEN CYLINDER NUMBE 2 p P ADK A2,12 SKEW FACTOR 2 P* 2 P EJECT DRCD01 2 P* 2 P* 2 PCIOP10 EQU * 2 4 P DVK 23
0x1f7ea4…1f8038 Dummy {f00=0x00a0, f01=0x0190, f02=»CYLINDER NUMBER IN POSITION 2 ~ P IFT NUNITS=2 3 $ P CF A15,INXDWT 3 : P CW A3,DWTCYL,A4 3 P P RF(E) CIOP50 SAME CYLINDER 3 h * P ST A3,DWTCYL,A4 SAVE CYLINDER NUMBER 3 P XIF 3 P IFT NUNITS=1 3 P CW A3,DWTCYL,A6 3 P RF(E) CIOP50 SAME C
0x1f8038…1f81cc Dummy {f00=0x00a0, f01=0x018e, f02=»REA 3 t * 4 P EJECT DRCD01 4 P* 4 , P* SEEK CYLINDER 4 6 P* 4 P P* 4 Z P LDK A4,RY3 RETRIES 4 d PSE:010 EQU * 4 P CF A5,SEEK SEEK CYLINDER N 4 P ANK A1,2 4 $ P RF(Z) CIOP50 OK. SEEK COMPLETED 4 P IM DWTRE2,A6 4 & P
0x1f81cc…1f8360 Dummy {f00=0x00a0, f01=0x0190, f02=» & P RB(Z) SE:010 CYLINDER ZERO FOUND 5 * 5 . PSE:020 EQU * 5 8 P RF END:SE SEEK ERROR END IO 5 L PCIOP50 EQU * 5 p P RTN A5 5 P* 5 P EJECT DRCD01 5 P* 5 P* 5 * P************************************* 5 * P*
0x1f8360…1f84f4 (5, 91) Dummy {f00=0x00a0, f01=0x0190, f02=»********************* 5 P* 6 < P* UPDATES : DWTBSE PRESENT SECTORS IN DRIVER BUFFER 6 ( @ P* DWTLOS NUMBER OF LOGICAL SECTORS LEFT IN IO 6 h . P* DWTBA USER BUFFER POINTER 6 2 P* DWTSEC PHYSICAL SECTOR POI
0x1f84f4…1f8688 Dummy {f00=0x00a0, f01=0x0190, f02=»MASK 6 t P C1R A3,A3 COMPLIMENT 7 P ANK A3,7 3 BITS 7 * P LD A1,DWTOR,A6 GET INDEX 7 B P ANKL A1,/100 UNIT NUMBER 7 d P DA DWTSEC,A6 SECTOR NUMBER 7 P MS 3,DWTBSE,A6 SAVE 7 PUPDAT EQU * 7 $ P LD A1,DWTMAS,A6 GET SECTOR MASK 7 P LDK A
0x1f8688…1f881c Dummy {f00=0x00a0, f01=0x0190, f02=» 7 j PUPDA10 EQU * 8 P SLL A1,1 8 P RB(NZ) UPDA00 MORE SECTORS 8 . P* 8 R P EJECT DRCD01 8 P* 8 r P* 8 | " P LD A3,DWTLOS,A6 UPDATE DWTLOS 8 P SUR A3,A2 8 P ST A3,DWTLOS,A6 8 P* 8 P IFT MMUPAG=1 8 P SLL A2,7 UPDATE D
0x1f881c…1f89b0 Dummy {f00=0x00a0, f01=0x0190, f02=» SLL A2,8 8 * P ADS A2,DWTBA,A6 UPDATE BUFFER POINTER 9 P XIF 9 @ P* 9 L P IFT RAW=1 9 V P LD A1,DWTTRA,A6 9 h * P RF(Z) UPDA50 UPDATE EFFECTIVE LENGTH 9 P LD A7,DWTOR,A6 GET ORDER 9 P ANK A7,/10 9 P RF(NZ) UPDA60 9 P XIF 9 P*
0x1f89b0…1f8b44 Dummy {f00=0x00a0, f01=0x0190, f02=»PAG=0 9 , P ADS A2,ECBEL,A8 UPDATE EFFECTIVE LENGTH : P XIF : > PUPDA60 EQU * : J P* : ^ P LDK A1,0 : h P LDK A2,1 : z P DA DWTSEC,A6 : P MS 2,DWTSEC,A6 : P* : P RTN A5 : P EJECT DRCD01 : P* : P* : 0 P**********
0x1f8b44…1f8cd8 Dummy {f00=0x00a0, f01=0x0190, f02=»* : f 0 P* SET BITS FOR LOGICAL * ; 0 P* SECTORS IN PHYSICAL * ; > 0 P* * ; r 0 P******************************************* ; P* ; P* A1 = POSITION IN SECTOR ; " P
0x1f8cd8…1f8e6c Dummy {f00=0x00a0, f01=0x0190, f02=»BER OF SECTORS ; | P SUK A3,2 < P LDK A3,4 1 0 0 < ( & P RF(N) MASK10 1 SECTOR LEFT IN IO < B P LDK A3,6 1 1 0 < l & P RF(Z) MASK10 2 SECTORS LEFT IN IO < P LDK A3,7 1 1 1 < PMASK10 EQU * < P SUK A1,1 < P RF(Z) MASK20 0 1 0 <
0x1f8e6c…1f9000 Dummy {f00=0x00a0, f01=0x0190, f02=» SAVE MASK < P RTN A5 = * = " P EJECT DRCD01 = , P* = B P* = L P************************* = V P* * = x P* PERFORM END IO * = P* * = P************************* = P* =
0x1f9000…1f9194 (5, 92) Dummy {f00=0x00a0, f01=0x0190, f02=» IFT NUNITS=2 = P CF A15,INXDWT > P LDKL A3,/FFFF > , * P ST A3,DWTCYL,A4 DUMMY CYLINDER NUMBER > B P XIF > p PEND:00 EQU * > | P LD A2,DWTRE2,A6 > P CW A2,DWTRE1,A6 > P RF(E) END:IO > , P ST A2,DWTRE1,A6 GRAND TOTAL OF RETRIES > $ P O
0x1f9194…1f9328 Dummy {f00=0x00a0, f01=0x0190, f02=» > PEND:30 EQU * ? P LDK A1,1 ? P ST A1,DWTST,A6 ? . P RB END:IO ? F P* ? X P EJECT DRCD01 ? b P* ? x P* ? P********************** ? P* * ? P* RECOVERY ROUTINE * ? P* * ? P****
0x1f9328…1f94bc Dummy {f00=0x00a0, f01=0x0190, f02=» P* @ P IFT CPU852=0 @ " P MSR 8,A15 SAVE A1-A8 ON STACK @ $ P XIF @ J P* @ V P LDKL A6,DWCD01 @ ` " P LDK A5,DWTSB3 GET STACK BASE @ x P ADR A5,A6 @ P LDKL A1,-1 @ & P ST A1,DWTSAV,A6 INDICATE RECOVERY @ P CM DWTST,A6 UNIT BUSY @
0x1f94bc…1f9650 Dummy {f00=0x00a0, f01=0x0190, f02=»FT NUNITS=2 @ P CM DWTOR,A6 1ST UNIT A " P CF A5,SEEKZ TEST IF OPERABLE A 2 P ANK A1,1 A X P RF(NZ) CDON26 NOT OPERABLE A j P LDK A1,1 A P SC A1,DWTOR,A6 2ND UNIT A P XIF A " P CF A5,SEEKZ TEST IF OPERABLE A P ANK A1,1 A P RF(
0x1f9650…1f97e4 Dummy {f00=0x00a0, f01=0x0190, f02=» CF A5,VO:NAM A P IFT NUNITS=2 B P LDK A1,1 2ND UNIT B , P SC A1,DWTOR,A6 B F P CF A5,VO:NAM B ^ P XIF B t , P IM DWTST,A6 INDICATE VOLUME NAMES READ B P CM DWTSAV,A6 RECOVERY DONE B P* B $ P LD A8,DWTECB,A6 GET ECB ADDRESS B P R
0x1f97e4…1f9978 Dummy {f00=0x00a0, f01=0x0190, f02=» A7,/3F B P* C ( P CM ECBEL,A8 RESET EFFECTIVE LENGTH C P ABL CDAD REPEAT REQUEST C F P* C f P EJECT DRCD01 C p P* C P* READY INTERRUPT C P* C PCDREDY LD A1,TIMER C " P RF(Z) CDON50 NO TIMER ACTIVE C P* C P IFT N
0x1f9978…1f9b0c Dummy {f00=0x00a0, f01=0x0190, f02=» P XIF D P* D P EJECT DRCD01 D P* D 2 P* D < PCDON26 EQU * D F ( P LDKL A4,TIMER TIMER POINTER ADDRESS D Z P LDR* A3,A4 D " P RF(Z) CDON30 NO TIMER ACTIVE D P LDKL A1,-TIME D P STR A1,A3 RESTART TIMER D P RB T:DISP D P
0x1f9b0c…1f9ca0 Dummy {f00=0x00a0, f01=0x0190, f02=»* TIME OUT D P* E PCDON40 LDKL A6,DWCD01 E P CM TIMER E < PCDON50 EQU * E N P CM DWTST,A6 UNIT BUSY E b P LDKL A1,-1 E & P ST A1,DWTSAV,A6 INDICATE RECOVERY E " P LDK A5,DWTSB3 GET STACK BASE E P ADR A5,A6 E P RB CDON05 E P
0x1f9ca0…1f9e34 (5, 93) Dummy {f00=0x00a1, f01=0x0190, f02=» * E | P* * F P*********************** F , P* F L P* F V PIHCD EQU * F ` $ P ST P,INTSAV SAVE LAST INTERRUPT F r & P MSR 8,A15 SAVE REGISTERS ON STACK F P LDKL A6,DWCD01 DWT ADDRESS F P SST A1,CUADR GET STATUS F P
0x1f9e34…1f9fc8 Dummy {f00=0x00a1, f01=0x0190, f02=»IHCD50 EQU * F P ANK A1,/F G $ P LD A8,DWTECB,A6 GET ECB ADDRESS G & P LDR A3,A1 RETURN CODE G N P LD A2,DWTSAV,A6 G l " P RF(NZ) IHCD70 VO:NAM CALLING G P ANK A3,1 G P RB(NZ) END:IO NOT OPERABLE G PIHCD70 EQU * G & P LD A5,DWTA5,A6 GET
0x1f9fc8…1fa15c Dummy {f00=0x00a1, f01=0x0190, f02=»AM EQU * G P CF A5,SEEKZ H P ANK A1,3 H $ P RF(NZ) VO:NA7 ERROR H 6 " P LDR A7,A5 SAVE STACK POINTER H R P MLK 5 H x * P DATA /800,PHSECL,/4000+LOSECL+LOSECL H P DATA BUFFER,/8000+LOSECL H P MS 5,DWTCOP,A6 H $ P LDR A5,A7 RESTORE STACK P
0x1fa15c…1fa2f0 Dummy {f00=0x00a1, f01=0x0190, f02=») VO:NA7 ERROR H P LD A1,DWTOR,A6 I P ANKL A1,/100 UNIT NUMBER I . P LDK A2,0 I P P LDK A3,6 I b 2 P MS 3,DWTBSE,A6 UPDATE DRIVER BUFFER INDICATOR I t P LDKL A2,BUFFER I P LDK A3,/FC FILE CODE I P LD A1,DWTSAV,A6 I P RF(N) VO:NA5 I
0x1fa2f0…1fa484 Dummy {f00=0x00a1, f01=0x018e, f02=» I P* J P* J P LDK A1,0 RESET RETURN CODE J P LDK A3,0 CYLINDER NUMBER J @ P RF VO:NA8 J b PVO:NA7 EQU * J t P LDK A1,6 CLEAR SEX BYTES J P CF A15,VOLCLR J P LDR A1,A3 RETURN CODE J ( P LDKL A3,/FFFF DUMMY CYLINDER NUMBER J
0x1fa484…1fa618 Dummy {f00=0x00a1, f01=0x0190, f02=» P ST A3,DWTCYL,A4 K P XIF K P RTN A5 K ( P* K 8 P* K B P* TIMER POINTER K L P* K f PTIMER DATA 0 K p P* K P EJECT DRCD01 K P* K P* K * P************************************* K * P*
0x1fa618…1fa7ac Dummy {f00=0x00a1, f01=0x0190, f02=»***** K p P* L P* L PDWCD01 EQU * L " P DATA 0 L 6 P DATA /8000 DWT STATUS L F P DATA 0 ECB ADDRESS L d P DATA 0 ORDER L " P DATA CDADR ACTIVATION ADDRESS L P DATA 0 TTAB ADDRESS L $ P DATA 0 WAIT/ACTIVATE INDICATOR L P DATA 0
0x1fa7ac…1fa940 Dummy {f00=0x00a1, f01=0x0190, f02=» L P* M PDWTTRA EQU *-DWCD01 M P DATA 0 M . ( P DATA 0,0,0 SAVE AREA FOR REGISTERS M > 0 PDWTBSE EQU *-DWCD01 DRIVER BUFFER INDICATOR M j P DATA 0,0,0 M PDWTSAV EQU *-DWCD01 M P DATA 0 M P* M P EJECT DRCD01 M P* M P
0x1fa940…1faad4 (5, 94) Dummy {f00=0x00a1, f01=0x0190, f02=»TRE1 EQU *-DWCD01 GRAND TOTAL RETRY COUNTER M P DATA 0 N 4 , PDWTRE2 EQU *-DWCD01 TOTAL RETRY COUNTER N D P DATA 0 N t . P DATA /FFFF,/FFFF,/FFFF VOLUME NAME UNIT 1 N P IFT NUNITS=2 N . P DATA /FFFF,/FFFF,/FFFF VOLUME NAME UNIT 2 N P XIF N *
0x1faad4…1fac68 Dummy {f00=0x00a1, f01=0x0190, f02=»GICAL SECTOR COUNTER N z P DATA 0 O . PDWTSEC EQU *-DWCD01 PHYSICAL SECTOR NUMBER O , P DATA 0,0 O ^ , PDWTMAS EQU *-DWCD01 LOGICAL SECTOR MASK O p P DATA 0 O P* O P EJECT DRCD01 O P* O P* CIO WORK AREAS O P* O , PDWTCIO EQU
0x1fac68…1fadfc Dummy {f00=0x00a1, f01=0x0190, f02=» P XIF P , PDWTSEK EQU *-DWCD01 SEEK OPERATION AREA P P DATA SEEKCO P @ 4 PDWTSEZ EQU *-DWCD01 SEEK TO ZERO OPERATION AREA P T P DATA SEZCOM P : PDWTWHA EQU *-DWCD01 WRITE HOME ADDRESS AND SECTOR MARK P P DATA WHACOM P P DATA PHSECL P P D
0x1fadfc…1faf90 Dummy {f00=0x00a1, f01=0x0190, f02=»+/804 INTERRUPT BIT SET P P DATA PHSECL Q & PDWTCOP EQU *-DWCD01 CIO WORK AREA Q 4 P DATA 0,0,0,0 Q ^ P DATA 0,0,0,0 Q t P* Q P EJECT DRCD01 Q P* Q P* Q 0 PDWTCYL EQU *-DWCD01 PRESENT CYLINDER NUMBER Q P DATA /FFFF UNIT 1 Q
0x1faf90…1fb124 Dummy {f00=0x00a1, f01=0x410e, f02=»1-2 STACK Q ~ P IFT RAW=1 R 2 PDWTRAW EQU *-DWCD01 READ AFTER WRITE SAVE AREA R $ P DATA 0,0,0,0 R Z P IFT MMUPAG=1 R p P DATA 0 R P XIF R P IFT MMUPAG=1 R PECBCD1 EQU * R P DATA 0,0,0,0,0,0,0 R P XIF R P* R END R @
0x1fb124…1fb2b8 Dummy {f00=0x00a1, f01=0x2008, f02=» S ************* | * & "* INPUT: PHYSICAL SECTOR NUMBER ( 8 4* OUTPUT: INTERLACED SECTOR NUMBER AND HEAD NUMBER R $ * IN POSITION FOR CIO * PERFORM SEEK * CIOPRE EQU * * END @
0x1fb2b8…1fb44c Dummy {f00=0x00a1, f01=0x0190, f02=» C P* D PDELETE EQU * DELETE FILE D P* TO BE IMPLEMENTED D 2 EJECT FMTASK D P * D h * D r ********** D | * FMRDFP * D ********** D * D P* D 2 P* FILE MANAGEMENT ADMINISTRATION FUNCTIONS: D P* READ FIL
0x1fb44c…1fb5e0 Dummy {f00=0x00a1, f01=0x0190, f02=»K D l P* A9 = USER ECB ADDRESS E P* A10 = FPB ADDRESS E , * E H & !FMRDFP EQU * READ FILE PARAMETERS E R P ANK A1,/FF ORDER OPTION E | ( P RF(NZ) FM:RQE ILLEGAL ORDER OPTION E 2 P CF A14,RDVTOC READ VTOC RECORD (FIRST EXTENT) E P ADK A1,0
0x1fb5e0…1fb774 (5, 95) Opaque[0x194]
0x1fb774…1fb908 # DirEnt {nam=»DRDC07«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1430, f03=0x0000}
0x1fb774…1fb908 IdxSect {
0x1fb774…1fb908 f00 = 0x00a1 // 0x1fb774 @0x0
0x1fb774…1fb908 f01 = 0x0022 // 0x1fb776 @0x2
0x1fb774…1fb908 gno = [ // 0x1fb778 @0x4
0x1fb774…1fb908 [0x00]: C0x00a1.0x2.0
0x1fb774…1fb908 [0x01]: C0x00a1.0x3.0
0x1fb774…1fb908 [0x02]: C0x00a2.0x0.0
0x1fb774…1fb908 [0x03]: C0x00a2.0x1.0
0x1fb774…1fb908 [0x04]: C0x00a2.0x2.0
0x1fb774…1fb908 [0x05]: C0x00a2.0x3.0
0x1fb774…1fb908 [0x06]: C0x00a3.0x0.0
0x1fb774…1fb908 [0x07]: C0x00a3.0x1.0
0x1fb774…1fb908 [0x08]: C0x00a3.0x2.0
0x1fb774…1fb908 [0x09]: C0x00a3.0x3.0
0x1fb774…1fb908 [0x0a]: C0x00a4.0x0.0
0x1fb774…1fb908 [0x0b]: C0x00a4.0x1.0
0x1fb774…1fb908 [0x0c]: C0x00a4.0x2.0
0x1fb774…1fb908 [0x0d]: C0x00a4.0x3.0
0x1fb774…1fb908 [0x0e]: C0x00a5.0x0.0
0x1fb774…1fb908 [0x0f]: C0x00a5.0x1.0
0x1fb774…1fb908 [0x10]: C0x00a5.0x2.0
0x1fb774…1fb908 ]
0x1fb774…1fb908 }
0x1fb908…1fba9c Dummy {f00=0x00a1, f01=0x0190, f02=» 2 P IDENT DRDC07 REL 10.0 80-03-14 870105041000 P : P REL 10.1 80-02-13 B P =1, OLLES POWER UP ^ P REL 10.1 79-10-26 | P P P* 2 P********************************************* P* $ P* PHILIPS TERMINAL S
0x1fba9c…1fbc30 Dummy {f00=0x00a1, f01=0x0190, f02=» P* P* P* P* " 2 P********************************************* , P* b P* l P* v P* P* P EJECT P* P* P* ENTRY POINTS P* P* 2 P ENTRY DC07AD ADDRESS BLOCK TERMINAL REQ
0x1fbc30…1fbdc4 Dummy {f00=0x00a1, f01=0x0190, f02=»W0700 DWT FOR DC TASK P* P* ( P* EXTERNAL REFERENCES 2 P* P P* Z " P EXTRN TDISP DISPATCHER ENTRY d ( P EXTRN SAVE8 SAVE A1-A8 ON A15 STACK $ P EXTRN TENDIO COMPLETE I/O EVENT P EXTRN DISIOE REQUEST ERROR P EXTRN
0x1fbdc4…1fbf58 Dummy {f00=0x00a1, f01=0x0190, f02=» MONITOR JOB ~ * P EXTRN DC:MIN MOVE DATA TO USER BUFFER , P EXTRN DC:MOT MOVE DATA FROM USER BUFFER B " P EXTRN DISEND COMPLETE REQUEST r * P EXTRN PFPOST WAIT FOR POWER UP IF SET P EJECT P* P* P* P* 6 P* STANDARD
0x1fbf58…1fc0ec Dummy {f00=0x00a1, f01=0x0190, f02=»ADDRESS AS GIVEN AT PARAMETER TRANSFER (BIT #08-#15) ~ $ P* DWTST BIT #00: NO REQUEST < P* d P* n P* ECB PARAMETERS x P* P* PECBBA EQU 2 BUFFER ADDRESS PECBRL EQU 4 REQUESTED LENGTH PECBEL EQU 6 EFFECTIVE LENGTH
0x1fc0ec…1fc280 Dummy {f00=0x00a1, f01=0x0190, f02=»*********************** ^ P* P* CONDITIONAL ASSEMBLY * P* H N P************************************************************************* R P* , P* A PROGRAM VERSION USING TOSS PAGING IS & P* OBTAINED BY SETTING MMUPAG EQU 1 P
0x1fc280…1fc414 (5, 96) Dummy {f00=0x00a1, f01=0x0190, f02=»U 0 j P* PCPU852 EQU 1 P* * P* DWT DISPLACEMENTS 4 P* P 0 PDWTDRD EQU /10 START OF DRIVER DEFINED PART Z P IFT MMUPAG=0 PSTART EQU DWTDRD P XIF P IFT MMUPAG=1 PSTART EQU DWTDRD+4 P XIF 4 PDWTT
0x1fc414…1fc5a8 Dummy {f00=0x00a1, f01=0x0190, f02=»NCHOR n 8 PDWTBTP EQU START+/06 TIMER POINTER FOR BUFFER QUEUE , PDWTTIM EQU START+/08 REQUEST TIMER VALUE J P EJECT z P* P* * P* PARAMETERS FOR CONDITIONAL ASSEMBLY P* P* & PX:A EQU 130 RECEIVE BUFFER LENGTH P
0x1fc5a8…1fc73c Dummy {f00=0x00a1, f01=0x0190, f02=» " PX:D EQU 300 POLL TIMEOUT VALUE PTIMPOL EQU X:D * ( PX:E EQU 14 NUMBER OF RECEIVE BUFFERS @ , PRBUFNR EQU X:E VARIABLE BETWEEN 3 AND 14 l PX:F EQU 0 , PHFDUP EQU X:F FULL(=1),HALF(=X:F)DUPLEX PX:G EQU 0 ( PP6805 EQU X:G COMPUTER 6
0x1fc73c…1fc8d0 Dummy {f00=0x00a1, f01=0x0190, f02=»LCIN EQU X'0A' P XIF PX:I EQU 1000 " $ PTBUFL EQU X:I MMU BUFFER LENGTH 6 P IFF P6805=1 ^ 0 PCHLCUT EQU CHLCIN+/10 OUTPUT DEVICE ADDRESS r P XIF P IFT P6805=1 PCHLCUT EQU CHLCIN+1 P XIF P* P* P*
0x1fc8d0…1fca64 Dummy {f00=0x00a1, f01=0x0190, f02=»LING P* P* P* P* PARAMETERS * P* > P* A7=ORDER H P* Z P* /02: READ d P* /06: WRITE x P* /37: TRANSFER PARAMETERS " P* /39: SET REQUEST TIMER VALUE P* P EJECT P* P* P* CONSTA
0x1fca64…1fcbf8 Dummy {f00=0x00a1, f01=0x0190, f02=»STCU DATA 0 CURRENT STATUS $ PDCWRQ DATA 0 WRITE REQUEST QUEUE " , PDCTPGP DATA 0 TIMER POINTER GENERAL POLL J P* z P* DC TASK ADDRESS P* $ P DATA 0 INDICATES NO MMU BLOCKS P DATA DEVIND DEVICE INDEX , PDC07DC DATA DCACTD ADD
0x1fcbf8…1fcd8c Dummy {f00=0x00a1, f01=0x0190, f02=»H =2 | P* P* DRIVER ADDRESS BLOCK P* 4 P DATA BUFLEN MMU BUFFER SIZE > P DATA DEVIND DEVICE INDEX b $ PDC07AD DATA DCACT ADDRESS BLOCK & P DATA ABORT ABORT ROUTINE ADDRESS , P DATA DCRBUF ANCHOR RECEIVE BUFFER POOL P D
0x1fcd8c…1fcf20 Dummy {f00=0x00a1, f01=0x0190, f02=»SECONDS | P EJECT P* P* CIO START-IN COMMANDS ( P* L PCICMO EQU /2 CONNECT MODEM V " PCIDISC EQU /1 DISCONNECT MODEM x PCIWAIC EQU /3 WAIT FOR CALLL * PCIREPC EQU /5 RECEIVE ON PROG.CHANNEL 2 PCIAREP EQU /4 RECEIVE ON
0x1fcf20…1fd0b4 (5, 97) Dummy {f00=0x00a2, f01=0x0190, f02=» CIO START-OUT COMMANDS P* " $ PCINRTS EQU 1 NO REQUEST TO SEND , $ PCIT4WP EQU 2 4-WIRE PROG.CHANNEL T $ PCIT2WP EQU 3 2-WIRE PROG.CHANNEL | $ PCIT4WM EQU /A 4-WIRE MUX.CHANNEL $ PCIT2WM EQU /B 2-WIRE MUX.CHANNEL PCIIDLE EQU 4 TRANSMI
0x1fd0b4…1fd248 Dummy {f00=0x00a2, f01=0x0190, f02=»ATUS DATA 0 (=1):N(S)FAIL,(=2):N(R) FAIL , PBUFNUL DATA 0 BUFFER OVERFLOW INDICATOR 0 $ PSWITCH DATA 0 OUTPUT BUFFER FLAG ` $ PTRMACT DATA 0 OUTPUT ACTIVE FLAG P IFF MMUPAG=0 6 PSWMMU DATA 0 FLAG TO INDIC.USER BUFFER MVD/NOT MVD P XIF
0x1fd248…1fd3dc Dummy {f00=0x00a2, f01=0x0190, f02=» AREA n . PFIELD1 DATA 0 ADDRESS + C-FIELD RECEPTION PWRDWT DATA 0 WRITING DWT @ $ P RES 15 STACK FOR INPUT PROCESS ` $ PSTBIN RES 1 INPUT STACK POINTER $ P RES 15 STACK FOR OUTPUT PROCESS $ PSTBUT RES 1 OUTPUT STACK POINTER P*
0x1fd3dc…1fd570 Dummy {f00=0x00a2, f01=0x0190, f02=»VRCNT DATA 0 RECEIVE STATE VARIABLE PNSCNT DATA 0 SEND COUNTER , PNRCNT DATA 0 RECEIVE COUNTER N $ PLNRCNT DATA 0 LAST ACCEPTED N(R) r P EJECT P* P* P* PROCEDURE EQUATES P* P* P* COMMANDS P*
0x1fd570…1fd704 Dummy {f00=0x00a2, f01=0x0190, f02=»MASKS ON RECEIVED FRAMES P* PRRMSK EQU 1 RECEIVE READY * " PRNRMSK EQU 5 RECEIVE NOT READY L PREJMSK EQU 9 REJECT COMMAND r PIMSK EQU 1 INFORMATION FRAME " PUIMSK EQU 3 UNNUMBERED I-FRAME P* P* SENDING FRAMES P*
0x1fd704…1fd898 Dummy {f00=0x00a2, f01=0x0190, f02=»RECEIVE | PCMDR EQU /97 INVALID COMMAND PREJ EQU /19 FRAME REJECTION 4 P EJECT X P* f P* p $ P* ACTIVATION FROM TERMINAL TASKS z P* PDCACT EQU * P LDK A1,0 PRESET RETURN CODE P SUK A7,/02 P RF(Z) DCRD READ
0x1fd898…1fda2c Dummy {f00=0x00a2, f01=0x0190, f02=»9-/37 SET REQUEST TIMER VALUE * P RF(Z) REQTIM SET REQUEST TIMER VALUE & P RF DCA100 T P EJECT f P* t P* ~ P* ACTIVATION FROM DCTASK P* P* PDCACTD EQU * P SUK A7,/02 P RF(E) DCRDDC READ P SUK A7,/3
0x1fda2c…1fdbc0 Dummy {f00=0x00a2, f01=0x018e, f02=» @ P************************************************************ P* L P* ABORT ROUTINE V P* p P************************ z P & PABORT LD A1,DWTTP,A6 TIMER POINTER " P RF(Z) AB:10 NO TIMER RUNNING P CM* DWTTP,A6 KILL TIM
0x1fdbc0…1fdd54 (5, 98) Dummy {f00=0x00a2, f01=0x0190, f02=» h P SUK A1,4 . P RF(NZ) AB:RTN NO ACTION IF NOT READ/WRITE P L . P CF A15,REMOVW REMOVE DWT FROM WRITE QUEUE T $ P LD A2,WRDWT WRITING DWT ADDRESS P CWR A2,A6 P RF(NE) AB:RTN NOT THIS DWT P CM WRDWT RESET WRITING DWT P
0x1fdd54…1fdee8 Dummy {f00=0x00a2, f01=0x0190, f02=» P RTN A15 P XIF P EJECT $ P* 2 P* < P* READ FROM DCTASK F P* ` P* j P* REQUEST FROM DC-TASK t P* COMPLETE WHEN: & P* STATUS CHANGE ON DC EQUIPMENT $ P* SPONTANOUS MESSAGE RECEPTION P* PDC
0x1fdee8…1fe07c Dummy {f00=0x00a2, f01=0x0190, f02=» EJECT P* P* P* TRANSFER PARAMETERS " P* @ P* J > P* REQUEST FROM DC-TASK: TRANSFER TERMINAL COMPUTER ADDRESS T : P* FROM TERMINALS: TRANSFER TERMINAL ADDRESSES P* P* & PDCTP LD A2,ECBCW,A8 GET PARAMETE
0x1fe07c…1fe210 Dummy {f00=0x00a2, f01=0x018e, f02=»K CONCERNED | P* P CWK A6,DW0700 DC-TASK ? P RF(E) DCTP30 YES > P CHECK IF DWT IN DC:TAB X P LD A1,DCTAB START OF DC:TAB z " P AD* A1,DCTAB NEXT FREE ENTRY PDCTP23 EQU * P SUK A1,2 BACKWARDS P CW A1,DCTAB AT STAR
0x1fe210…1fe3a4 Dummy {f00=0x00a2, f01=0x0190, f02=» j PDCTP25 EQU * FIND FREE SLOT * P LD A1,DC:IN GET DC:TAB INPUT POINTER , ( P CWK A1,DC:END TABLE ALREADY FULL ? Z $ P ABL(E) DISIOE YES REQUEST ERROR $ P STR A6,A1 INSERT DWT IN DC:TAB P LDK A1,2 . P ADS A1,DC:IN UPDATE DC:TAB INPU
0x1fe3a4…1fe538 Dummy {f00=0x00a2, f01=0x0190, f02=» CF A15,TENDIO COMPLETE REQUEST PDCRTN EQU * ( P ABL TDISP GOTO DISPATCHER < P EJECT ^ P* l P* v P* WRITE P* P* P* COMPLETE WHEN: P* SUCCESFUL TRANSMISSION P* TIME OUT P* P* PDC
0x1fe538…1fe6cc Dummy {f00=0x00a2, f01=0x0190, f02=»N ILLEGAL LENGTH *** 9.1 ** P XIF . P CF A15,TIMEWR SET TIMER : P CF A15,INSWQ QUEUE REQUEST Z P RB DCRTN ~ P EJECT P* P* P* P* READ P* P* P* COMPLETE WHEN: P* MESSAGE RECEIV
0x1fe6cc…1fe860 Dummy {f00=0x00a2, f01=0x0190, f02=») DCRD10 NOT EMPTY P* P* $ P* . P CF A15,TIMERE START TIMER 8 P* Z P* d P* n P RB DCRTN x P* P* P* BUFFER WAITING IN QUEUE P* P* PDCRD10 EQU * P LDR* A2,A1 GET NEXT ONE , P
0x1fe860…1fe9f4 (5, 99) Dummy {f00=0x00a2, f01=0x018e, f02=»CB v P ADK A1,6 ADJUST ADDRESS & P LDR A4,A1 RECEIVE BUFFER ADDRESS * P LDK A1,0 T , P CF A15,DC:MIN MOVE DATA TO USER BUFFER f P LD A1,DWTBQ,A6 P RB(NZ) DCRTN . P LD A1,DWTBTP,A6 QUEUE EMPTY, STOP TIMING P RB(Z) DCRTN
0x1fe9f4…1feb88 Dummy {f00=0x00a2, f01=0x0190, f02=» P* PREQTIM EQU * " P LD A2,ECBCW,A8 TIMEOUT VALUE & . P ST A2,DWTTIM,A6 SAVE TIMEOUT VALUE IN DWT L P RB DCTP30 ~ P EJECT J P********************************************************************* P* : P* ILLEGAL SIZE OF
0x1feb88…1fed1c Dummy {f00=0x00a2, f01=0x0190, f02=»EN EQU * 2 P LDKL A1,/8008 REQUEST ERROR + ILLEGAL LENGTH P ABL DISEND F P EJECT Z P* h P* r P* | P* TIMER HANDLING PART P* P* P* P* READ TIMER=TIMERR P* PTIMERE EQU * P LDR A1,A6
0x1fed1c…1feeb0 Dummy {f00=0x00a2, f01=0x0190, f02=» PTIMERR DATA 0 ! ( P ST A4,DWTTP,A6 STORE TIMER POINTER ! P RF TIME10 ! J P* ! P* TIMEOUT READ TIMER ! f P* ! PTOUTRE EQU * ! P LDR A6,A1 FETCH DWT ! P CM DWTTP,A6 ! P* ! PTOUTR1 EQU * ! " P LDK A1,/40 INDICATE TIME
0x1feeb0…1ff044 Dummy {f00=0x00a2, f01=0x0190, f02=»D A2,DWTTIM,A6 GET TIMEOUT VALUE ! P RF(Z) TIME10 NO TIMING " ( P ST A2,TIMWR " H P CF A15,SETIME " P DATA TOUTWR " r PTIMWR DATA 0 " P ST A4,DWTTP,A6 " PTIME10 EQU * " P IFT CPU852=1 " P ADKL A15,4 " P ABR* A15 " P XIF "
0x1ff044…1ff1d8 Dummy {f00=0x00a2, f01=0x0190, f02=» P LDR A6,A1 FETCH DWT # P CM DWTTP,A6 # P LD A2,DWTECB,A6 # 4 P LD A4,ECBBA,A2 FETCH BUFFER # N * P CF A15,REMOVW REMOVE FROM WRITE QUEUE # r P RB TOUTR1 # P EJECT # P* # P* # P* STOP REQUEST TIMING # P* # & P* REMAINING
0x1ff1d8…1ff36c Dummy {f00=0x00a2, 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 RTN A5 $ P EJECT $ P* $ P* GET RECEIVE BUFFER $ P* $ $ P* CALLING SEQUENCE: CF A15,GRBUF $ P* A4=0
0x1ff36c…1ff500 Dummy {f00=0x00a2, f01=0x018e, f02=» A2,DCRBUF RECEIVE BUFFERS $ PGBUF INH % " P LDR* A4,A2 % 2 P RF(Z) GBUF10 NO BUFFER FREE % F . P LDR* A3,A4 REMOVE BUFFER FROM FREE CHAIN % j P STR A3,A2 % PGBUF10 EQU * % P IFT CPU852=1 % P ADKL A15,4 % P ABR* A15 % P XIF %
0x1ff500…1ff694 (5, 100) Dummy {f00=0x00a2, f01=0x018e, f02=» P* A4 CONTAINS BUFFER ADDRESS & $ P* CALLING SEQUENCE: CF A15,RRBUF & ( P* A2 AND A3 ARE DESTROYED & P P* & r P* & | ( PRRBUF LDKL A2,DCRBUF RECEIVE BUFFERS & PRBUF INH & PRBUF10 EQU * & P LDR* A3,A2 & P RF(Z) RBUF20 & P LDR A2,
0x1ff694…1ff828 Dummy {f00=0x00a2, f01=0x0190, f02=» & P* ' ( P* INSERT DWT IN WRITE REQUEST QUEUE ' P* ' > P* A2,A3,A4 DESTROYED ' H P* A6=DWT ' d P* ' t ( PINSWQ LDKL A2,DCWRQ GET QUEUE ANCHOR ' ~ P LDK A4,DWTWQ ' PINSWQ2 LDR* A3,A2 ' $ P RF(Z) INSWQ3 END OF QUEUE FOUND ' P LDR A
0x1ff828…1ff9bc Dummy {f00=0x00a2, f01=0x0190, f02=» RETURN ' P* ( P* ( * P* REMOVE DWT FROM WRITE REQUEST QUEUE ( $ P* ( R P* A2,A3,A4 DESTROYED ( P* A6=DWT ( x P* ( * PREMOVW LDKL A2,DCWRQ GET QUEUE ANCHOR ( , P LDK A4,DWTWQ GET DWT-LINK TO BE REMOVED ( P ADR A4,A6 ( PREM10
0x1ff9bc…1ffb50 Dummy {f00=0x00a2, f01=0x018e, f02=» ( PREM15 LDR* A3,A4 REMOVE ) P STR A3,A2 ) ( P RB GBUF10 RETURN ) : P EJECT ) T P* ) b P* ) l $ P* QUEUE ALLOCATED RECEIVE BUFFER ) v P* ) P* A4=BUFFER ADDR ) P* A2,A3 DESTROYED ) P* ) PQRBUF EQU * ) 4 P LDKL A2,DW0700+
0x1ffb50…1ffce4 Dummy {f00=0x00a2, f01=0x0190, f02=» P RB QR100 * & PQR200 STR A4,A2 INSERT INTO QUEUE * " P CMR A4 INDICATE END OF QUEUE * @ P RTN A5 * f P EJECT * v P* * P* * 2 P* CHECK IF UNEXPECTED MESSAGE OR STATUS CHANGE * P* * 4 P* REGISTERS A1,A2,A3,A4,A6 AND A8 ARE DESTROYED
0x1ffce4…1ffe78 Dummy {f00=0x00a2, f01=0x018e, f02=» CW A1,DWTOR,A6 * P RF(NE) CKM110 NO + $ P LD A8,DWTECB,A6 ECB ADDR TO A8 + 2 * P LD A3,DWTWQ,A6 A3=ADDR TO READ QUEUE + Z " P RF(Z) CKM200 NO READ IN QUEUE + , P LDR* A2,A3 A2=ADDR TO NEXT READ BUFFER + . P ST A2,DWTWQ,A6 STORE THIS ADDR INTO QUEUE
0x1ffe78…20000c Dummy {f00=0x00a2, f01=0x0190, f02=» + . P ST A4,ECBCW,A8 STORE LINE DEVICE ADDRESS , P ADK A3,6 ADDRESS DATA PART , : & P LDR A4,A3 RECEIVE BUFFER ADDRESS , ^ P LDK A1,0 , , P CF A15,DC:MIN MOVE DATA TO USER ADDRESS , P RF CKM110 , 8 PCKM200 LD A1,DCSTCU NO MESSAGE RECEIVED,CHEC
0x20000c…2001a0 Dummy {f00=0x00a2, f01=0x0190, f02=»TATUS , t * P ORKL A1,/2000 INDICATE STATUS CHANGE - PCKM100 EQU * - < 0 P CF A15,TENDIO COMPLETE READ GENERAL REQUEST - P PCKM110 EQU * - P IFT CPU852=1 - P ADKL A15,4 - P ABR* A15 - P XIF - P IFT CPU852=0 - P RTN A15 - P X
0x2001a0…200334 (5, 101) Dummy {f00=0x00a3, f01=0x0190, f02=»FOR - ~ P* OUTPUT PROCESS . P* . $ P* . . PBRM EQU * BASIC RECEIVE MODE . 8 ( P LDKL A5,STBIN LOAD INPUT STACK BASE . P CF A5,RDFRAM READ ONE FRAME . P RB(NZ) BRM INVALID FRAME . & P LC A1,FIELD1 GET CLUSTER ADDRESS . P CC A1,DW0700+1
0x200334…2004c8 Dummy {f00=0x00a3, f01=0x0190, f02=» RF(NZ) BRM100 . P* / P* / P* SNRM RECEIVED / * P* / B P* / L P LDK A1,1 / V . P ST A1,MODE INDICATE NORMAL RESPONSE MODE / h P CF A5,RESCON RESET COUNTERS / PBRM050 EQU * / P LDK A1,1 LOAD 'UA' / P RF BRMTRA / P* /
0x2004c8…20065c Dummy {f00=0x00a3, f01=0x0190, f02=» P* 0 P* 0 PBRM105 EQU * 0 & P CM MODE INDICATE DISCONNECT MODE 0 , P RB BRM050 0 V PBRM110 EQU * 0 h P LD A2,MODE 0 | P RF(NZ) BRM120 NRM OR CMDR 0 P* 0 P* 0 * P* DISCONNECT MODE, REQUEST FOR ONLINE 0 P* 0 P* 0 P
0x20065c…2007f0 Dummy {f00=0x00a3, f01=0x0190, f02=» P* NORMAL RESPONSE MODE 1 P* TRANSACTIONS 1 " P* 1 < P ANK A1,/F IGNORE COUNTERS 1 F P LDR A2,A1 GET C-FIELD 1 h P XRK A2,RNRMSK 1 P RF(NZ) BRM130 1 P* 1 P* RNR RECEIVED 1 P* 1 P* 1 8 P CF A5,UPDCON UPDATE COUNTERS AND
0x2007f0…200984 Dummy {f00=0x00a3, f01=0x0190, f02=»-BIT OFF 1 P LDK A1,3 LOAD 'RR' 2 P LD A2,DCRBUF 2 , & P RF(NZ) BRMTRA OK READY TO RECEIVE 2 B P LDK A1,5 LOAD RNR 2 l P RF BRMTRA 2 P* 2 PBRM130 EQU * 2 P LDR A2,A1 GET MASK 2 P XRK A2,RRMSK 2 P RF(Z) BRM140 2 P LDR A2,A1
0x200984…200b18 Dummy {f00=0x00a3, f01=0x0190, f02=»DATE COUNTERS AND CHECK OUTPUT QUEUE 2 P CF A5,TSTNR CMDR ? 3 , PBRM145 EQU * 3 H P LC A1,FIELD1+1 GET C-FIELD 3 P ANK A1,/10 CHECK POLL-BIT 3 P RB(Z) BRM P-BIT OFF 3 ( P LDK A1,6 INDICATE POLL-BIT RECEIVED 3 P RF BRMTRA 3 P* 3 P E
0x200b18…200cac Dummy {f00=0x00a3, f01=0x0190, f02=» BRM170 I-FRAME 3 P LC A1,FIELD1+1 GET C-FIELD 4 P ANK A1,/EF EXCLUDE POLL-BIT 4 < P LDR A2,A1 4 ` P XRK A2,UIMSK UI ? 4 r P RF(Z) BRM155 YES 4 P LDR A2,A1 4 P XRK A2,SIM SIM ? 4 P RF(NZ) BRM156 NO 4 PBRM155 EQU * 4 P LC A1,F
0x200cac…200e40 Dummy {f00=0x00a3, f01=0x018e, f02=» 4 P* 5 PBRM156 EQU * 5 P LDK A2,0 PRESENT CONTERS 5 & . P LDK A3,/80 FAIL CODE (CMDR MODE SETTING) 5 H P CF A5,PRCMDR INIT CMDR 5 z PBRM160 EQU * 5 P LDK A2,2 5 " P ST A2,MODE INDICATE CMDR MODE 5 P LDK A1,4 LOAD 'CMDR' 5 P* 5
0x200e40…200fd4 (5, 102) Dummy {f00=0x00a3, f01=0x0190, f02=» 5 P* 6 P* 6 P* I-FRAME RECEIVED 6 P* 6 6 P* 6 @ PBRM170 EQU * 6 J P LD A1,BUFNUL 6 ^ " P RB(NZ) BRM NO BUSY STATEMENT 6 t " P CF A5,UPDCON UPDATE COUNTERS 6 ( P LD A1,STATUS CHECK UNEXPECTED N(S) 6 P ANK A1,1 N(S) OK? 6 P R
0x200fd4…201168 Dummy {f00=0x00a3, f01=0x0190, f02=»0 P-BIT OFF 6 ( P LDK A1,6 INDICATE POLL-BIT RECEIVED 7 ( P CF A15,QMTRM QUEUE FOR TRANSMISSION 7 @ PBRM180 EQU * 7 l & P CF A15,GRBUF ALLOCATE LINK BUFFER 7 P* 7 & P* HERE TO PROCESS AVAILABLE FRAME 7 P* A4=BUFFER 7 P* 7 P LC A2,+5,
0x201168…2012fc Dummy {f00=0x00a3, f01=0x0190, f02=»JECT 7 P* 8 , P* SUBTERMINAL ADDRESS IS NOT CONTAINED 8 P* IN DCTAB SUBSET. 8 F * P* QUEUE INCOMMING MESSAGE TO DC-TASK 8 d ( P* AND CHECK IF REQUEST PENDING 8 P* 8 . P ST A2,+4,A4 SAVE WRONG SUB TRMNL. ADDRESS 8 P CF A5,QRBUF Q
0x2012fc…201490 Dummy {f00=0x00a3, f01=0x0190, f02=»-DUPLEX:SEND REJ WITHOUT TESTING POLL-BIT 8 $ P* HALF-DUPLEX:WAIT POLL-BIT 9 2 P* 9 Z PBRM185 EQU * 9 d P CM STATUS RESTORE STATUS 9 x * P LDKL A1,HFDUP GET FULL OR HALF DUPLEX 9 P RB(Z) BRM145 WAIT POLL 9 & P LDK A1,/FF INDICATE REJ TOBE SE
0x201490…201624 Dummy {f00=0x00a3, f01=0x0190, f02=»WTST,A6 GET STATUS 9 P RF(N) COMP30 NO REQUEST : P LD A1,DWTOR,A6 GET ORDER : : P SUK A1,2 : P RF(NZ) COMP30 NOT READING : n PCOMP25 EQU * : & P LD A8,DWTECB,A6 GET ECB ADDRRESS : P LD A1,+2,A4 GET LENGTH : P SUK A1,1 UPDATE LENGTH :
0x201624…2017b8 Dummy {f00=0x00a3, f01=0x0190, f02=»UFFER DATA : z P LDK A1,0 ; , P CF A15,DC:MIN MOVE DATA TO USER BUFFER ; $ P ABL BRM BASIS RECEIVE MODE ; T P EJECT ; x P* ; P* QUEUE RECEIVED MESSAGE ; P* ; PCOMP30 EQU * ; * P LDK A2,DWTBQ GET PROPER QUEUE ANCHOR ; P ADR A2,A6
0x2017b8…20194c Dummy {f00=0x00a3, f01=0x018e, f02=»A1,DWTBQ,A6 ; P LDR* A2,A1 FIRST IN QUEUE < P RF(NZ) COMP35 < 6 P LDR A1,A6 < L . P CF A15,SETIME START BUF SUPERVISION TIMER < ^ P DATA COMP40,TIMBUF < P ST A4,DWTBTP,A6 < PCOMP35 ABL BRM < P* < P* TIME OUT ENTRY < P* < P
0x20194c…201ae0 Dummy {f00=0x00a3, f01=0x0190, f02=» < n $ P CM DWTBQ,A6 CLEAR QUEUE ANCHOR = PCOMP42 EQU * = 0 2 P LDKL A2,DW0700+DWTWQ GET DC-TASK QUEUE ANCHOR = D PCOMP43 EQU * = z P LDR* A3,A2 = P RF(Z) COMP44 END OF QUEUE = P LDR A2,A3 = P RB COMP43 = PCOMP44 EQU * = . P STR A1,A2 I
0x201ae0…201c74 (5, 103) Dummy {f00=0x00a3, f01=0x0190, f02=» = " P* HERE TO TEST N(R) VALIDITY > P* > . PTSTNR EQU * > 8 P LD A1,STATUS GET STATUS > L P ANK A1,2 WRONG N(R)? > l P RF(NZ) TSTNRX YES > P RTN A5 > 0 P********** INIT CMDR PARAMETERS *********** > PTSTNRX EQU * > P CM STATUS R
0x201c74…201e08 Dummy {f00=0x00a3, f01=0x0190, f02=»IL CODE IN A3 > P CF A5,PRCMDR INIT FIELDS ? P ABL BRM160 ? 8 P EJECT ? L P* ? Z , P* HERE TO INITIALIZE CMDR OUTPUT FIELDS ? d P* ? PPRCMDR EQU * ? " P LDK A1,CMDR LOAD 'CMDR'+F-BIT ? & P LDKL A4,DLOBUF GET BUFFER ADDRESS ? P ADK A
0x201e08…201f9c Dummy {f00=0x00a3, f01=0x0190, f02=» P ADK A4,1 @ $ P SCR A2,A4 SAVE PRESENT COUNTERS @ P ADK A4,1 @ > $ P SCR A3,A4 SAVE FAIL PARAMETERS @ P P RTN A5 @ x P EJECT @ P* @ P* @ P* HDLC OUTPUT PROCESS @ P* @ . P* QUEUED AS MONITOR JOB FROM INPUT PROCESS @ P* @
0x201f9c…202130 Dummy {f00=0x00a3, f01=0x0190, f02=» PENDING @ l P* A P* A PTRM EQU * A $ P INH SET INHIBIT A 6 " P LDKL A5,STBUT LOAD STACKBASE A P " P IM TRMACT OUTPUT IN PROGRESS A v P LDR A7,A1 SAVE PARAMETER A P CCK A1,/FF00 REJ ? A P RF(NE) TRM050 NO A " P LDK A1,REJ LOAD 'RE
0x202130…2022c4 Dummy {f00=0x00a3, f01=0x0190, f02=» TRM150 CHECK APPLICATION QUEUE A P SUK A1,1 B * P RF(Z) TRM100 UA ON QUEUE B < P SUK A1,1 B ^ P RF(Z) TRM120 ROL ON QUEUE B p P SUK A1,1 B P RF(Z) TRM130 RR ON QUEUE B P SUK A1,1 B P RF(Z) TRM140 CMDR ON QUEUE B P SUK A1,1 B
0x2022c4…202458 Dummy {f00=0x00a3, f01=0x0190, f02=»T B ~ P* C P* C PTRM100 EQU * C P LDK A1,UA LOAD 'UA'+F C 2 PTRM110 EQU * C P " P CF A5,TRSFR SEND SHORT FRAME C d P RF TRMEND C P* C P* C P* ROL SHOULD BE SENT C P* C P* C PTRM120 EQU * C P LDK A1,ROL LOAD 'RO
0x202458…2025ec Dummy {f00=0x00a3, f01=0x0190, f02=»R'+F C ~ PTRM135 EQU * D 0 P LD A2,VRCNT GET NEXT EXPECTED SEND COUNTER D P SLL A2,5 ADJUST IT D T P ORR A1,A2 INSERT IN RR D p P RB TRM110 D P* D P* D P* CMDR SHOULD BE SENT D P* D P* D PTRM140 EQU * D & P LDKL A4,DLO
0x2025ec…202780 Dummy {f00=0x00a3, f01=0x0190, f02=» ( P* CHECK APPLICATION QUEUE AND SEND E P* I-FRAME OR RR-FRAME E 0 P* E N P* E X PTRM150 EQU * E b P LD A6,DCRBUF E v " P RF(NZ) TRM190 OK CHECK QUEUE E P* E P* E * P* RNR SHOULD BE SENT, BUFFER SHORTAGE E P* E P* E P
0x202780…202914 (5, 104) Dummy {f00=0x00a3, f01=0x0190, f02=» E ( P LD A6,DCWRQ CHECK APPLICATION QUEUE F " P RB(Z) TRM130 NOTHING IN QUEUE F 4 P EJECT F Z P* F h P* F r P* F | " P* HERE TO TRANSMIT AN IFRAME F P* F PTRM300 EQU * F " P SUK A6,DWTWQ GET DWT ADDRESS F . P LDKL A4,DLOBUF GET OUTP
0x202914…202aa8 Dummy {f00=0x00a3, f01=0x0190, f02=»TED LENGTH F v P ADK A3,1 ADJUST LENGTH G " P ST A6,WRDWT SAVE WRITING DWT G 2 $ P LDR* A1,A6 GET SUB-TERM ADDRESS G X P ANK A1,/FF G P* G P IFF MMUPAG=0 G * P LDKL A4,MMUBUF GET MMU BUFFER ADDRESS G P LD A7,SWMMU GET MMU FLAG G * P RF(
0x202aa8…202c3c Dummy {f00=0x00a3, f01=0x0190, f02=»TA TO MMU BUFFER G z PTRM320 EQU * H P XIF H , P* H 8 * P LD A7,ECBBA,A8 OUTPUT BUFFER ADDRESS H B ( P ADK A7,1 USE FREE-WORD TO INSERT IT H p P SCR A1,A7 H $ P SUK A7,2 INIT OUTPUT ADDRESSING H P ST A7,SWITCH H T P**************** INITIALIZ
0x202c3c…202dd0 Dummy {f00=0x00a3, f01=0x0190, f02=»********** WHEN DONE,UPDATE PROTOCOL COUNTERS ***** H P LD A1,VSCNT UPDATE V(S) I > P ADK A1,1 I ^ P ANK A1,7 MODULO 7 I p P ST A1,VSCNT I " P ST A1,CPCNT UPDATE CHECKPINT I P* I P* DISPATCH I P* I PTRMEND EQU * I P LD A2,QOU
0x202dd0…202f64 Dummy {f00=0x00a3, f01=0x0190, f02=»WK A2,COMQE I $ P RF(NE) TRME10 NOT END OF QUEUE J ( P LDKL A2,COMQ-2 RESET OUTPUT POINTER J < PTRME10 EQU * J h P ADK A2,2 J | P ST A2,QOUT J P ABL TRM J P EJECT J P* J " P* PREPARE C-FIELD FOR I-FRAME J P* J P* J PPRCF
0x202f64…2030f8 Dummy {f00=0x00a3, f01=0x0190, f02=»NT GET N(S) J P SLL A2,1 K P ORR A1,A2 K & & P STR A1,A4 STORE C-FIELD IN BUFFER K 8 P RTN A5 K b P EJECT K r P* K P* K , P* QUEUEING FACILITY FOR HDLC TRANSMITTER K 2 P* ON ENTRY A1 CONTAINS REQUESTED HDLC COMMAND K P* K PQMTR
0x2030f8…20328c Dummy {f00=0x00a3, f01=0x0190, f02=»TIME K P DATA TRM,1 AFTER 100 MS L P RF QMRTN L , P* L > P* PUT COMMAND ON QUEUE L H P* L f PQMTRM10 EQU * L p P LD A2,QIN L P CWK A2,COMQE L ( P RF(NE) QMTRM20 STILL SPACE IN QUEUE L " P LDKL A2,COMQ-2 RESET POINTER L PQMTRM20
0x20328c…203420 Dummy {f00=0x00a3, f01=0x0190, f02=»1 L P ADKL A15,4 M P ABR* A15 M P XIF M 0 P IFT CPU852=0 M < P RTN A15 M R P XIF M b P* M n P EJECT M x P* M P* RESET PROCEDURE COUNTERS M P* M P* M PRESCON EQU * M P CM VSCNT M P CM VRCNT M P LDK A1,7
0x203420…2035b4 (5, 105) Dummy {f00=0x00a4, f01=0x0190, f02=»DATE PROCEDURE COUNTERS M P* AND CHECK OUTPUT QUEUE N P* N @ * P* ON ENTRY A1 CONTAINS CURRENT C-FIELD N J P* N x P* N PUPDCON EQU * N P LC A1,FIELD1+1 GET C-FIELD N P LDR A2,A1 SAVE C-FIELD N P ANK A2,1 N ( P RF(NZ) UPD100 NOT
0x2035b4…203748 Dummy {f00=0x00a4, f01=0x0190, f02=»CK IT N P RF(NE) UPD080 INVALID O P IM VRCNT INCREMENT VARIABLE O , P LDK A2,7 O P P ANS A2,VRCNT MODULO 7 O b P RF UPD100 O PUPD080 EQU * O P LDK A2,1 O & P ORS A2,STATUS INDICATE WRONG N(S) O PUPD100 EQU * O P LDR A2,A1 GET C-F
0x203748…2038dc Dummy {f00=0x00a4, f01=0x0190, f02=»NSMISSION DONE O | P ST A2,NRCNT STORE N(R) P P LD A6,WRDWT GET WRITING DWT P 6 , P CW A2,CPCNT TRANSMISSION ACKNOWLEDGED ? P Z P RF(NE) UPD130 NO P 2 P ST A2,LNRCNT YES,SAVE LAST ACKNOWLEDGED N(R) P P* P P* P P* UPDATE OUTPUT QUEUE P
0x2038dc…203a70 Dummy {f00=0x00a4, f01=0x0190, f02=»K COMPLETE REQUEST P ~ P RTN A5 Q P* Q * ( P* LAST TRANSMISSION NOT ACKNOWLEDGED Q 4 P* Q ` P* Q j PUPD130 EQU * Q t ( P****** TEST IF VALID N(R) ********* Q P CW A2,LNRCNT VALID ? Q P RF(NE) UPD205 NO Q , P ST A2,VSCNT STORE NEXT N(S)
0x203a70…203c04 Dummy {f00=0x00a4, f01=0x0190, f02=»US Q P RTN A5 R P* R * P* HERE ,NO TRANSMISSION HAS BEEN DONE R $ . P* SO,JUST CHECK SYNCHRONOUS N(R) SEQUENCE R R PUPD210 EQU * R P* R P CW A2,VSCNT R " P RB(NE) UPD205 WRONG SEQUENCE R P RTN A5 R P EJECT R P* R P* R
0x203c04…203d98 Dummy {f00=0x00a4, f01=0x018e, f02=» EQU * R $ P LD A8,DWTECB,A6 GET ECBADDRESS S P LD A2,DWTST,A6 S 6 P RF(N) CWR200 NO REQUEST S N P LD A2,DWTOR,A6 GET ORDER S n P SUK A2,6 S P S $ P RF(NZ) CWR200 NOT WRITE REQUEST S * PCWR100 CF A5,CTIME STOP REQUEST TIMING S P ST A2,E
0x203d98…203f2c Dummy {f00=0x00a4, f01=0x0190, f02=» S P RTN A5 T P EJECT T P* T & P* T 0 * P* TRANSMIT SHORT FRAME WITHOUT I-FIELD T : , P* ON ENTRY A1 CONTAINS COMMAND/RESPONSE T h P* T P* T PTRSFR EQU * T & P LDKL A4,DLOBUF GET BUFFER ADDRESS T P SC A1,+1,A4 STORE C-FIELD T
0x203f2c…2040c0 Dummy {f00=0x00a4, f01=0x0190, f02=» ONE FRAME T " P* ON ENTRY : A3 = FRAME LENGTH U $ P* A4 = BUFFER ADDRESS U 8 P* U ` P* U j PWRFRAM EQU * U t P LD A1,DW0700 GET CU ADDRESS U $ P SCR A1,A4 STORE FIRST IN BUFFER U P LDR A1,A3 U P ANK A1,1 U < P RF(Z) WRF100 AL
0x2040c0…204254 (5, 106) Dummy {f00=0x00a4, f01=0x0190, f02=»POWER UP U x & P ADK A1,CIT4WP TRANSMIT 4-WIRE, PC V , P CIO A1,1,CHLCUT START CHLC TRANSMITTER V : PWRF105 EQU * V j P CF A5,WRITE SEND THE FRAME V ~ PWRF110 EQU * V P LDK A1,CINRTS V ( P CIO A1,1,CHLCUT NO REQUEST TO SEND V " P CF A15,STREGO S
0x204254…2043e8 Dummy {f00=0x00a4, f01=0x0190, f02=» , P* ON EXIT CR = (Z) IF THE FRAME IS VALID W $ P* AND A4 CONTAINS BUFFER ADDRESS W 4 P* W P* W f PRDFRAM EQU * W p P LD A4,DCRBUF GET BUFFER W , P RF(NZ) RDF001 BUFFERS STILL AVAILABLES W , P IM BUFNUL SET BUFFER OVERFLOW INDICATOR W P R
0x2043e8…20457c Dummy {f00=0x00a4, f01=0x0190, f02=» W n PRDF002 EQU * X P LD A1,PFPOST X $ P RF(NZ) RDF010 WAIT FOR POWER UP X 2 P LDK A1,CIREPC RECEIVE ON PC X Z $ P CIO A1,1,CHLCIN START RECEIVER X ~ PRDF010 EQU * X P LDK A7,0 X P CF A5,READ READ THE FRAME X P RF(Z) RDF110 VALID FRAME
0x20457c…204710 Dummy {f00=0x00a4, f01=0x0190, f02=»DF115 X P ADK A4,2 GET BUFFER ADDRESS Y P STR A3,A4 SAVE LENGTH Y 2 PRDF115 EQU * Y P P LDK A1,0 Y d PRDF120 EQU * Y v P ADK A5,4 Y P LDR A1,A1 Y P ABR* A5 Y P EJECT Y P* Y P* Y P* INPUT INTERRUPT HANDLER Y P* Y
0x204710…2048a4 Dummy {f00=0x00a4, f01=0x0190, f02=»E REGISTERS Y P XIF Z P* Z P CF A15,LDREGI Z * " P INR A2,0,CHLCIN READ 16 BITS Z @ P RF(NA) IHLC10 NOT ACCEPTED Z f P* Z P IFF LOGG=0 Z P CF A5,LOGIN Z P* Z P XIF Z P* Z P* Z " P* STORE FIRST WORD IN FIELD1 Z
0x2048a4…204a38 Dummy {f00=0x00a4, f01=0x0190, f02=»ORE ADDRESS + C-FIELD Z | P RF READ [ PNFIRST EQU * [ . P LD A1,BUFNUL [ B , P RF(NZ) READ BUSY DO NOT ACCEPT ANY DATA [ X P SC A2,1,A4 [ P ECR A2,A2 [ P SCR A2,A4 [ P ADK A4,2 INCREMENT POINTER [ P ADK A3,2 INCREMENT COUNTER [ * P
0x204a38…204bcc Dummy {f00=0x00a4, f01=0x0190, f02=»INTER [ z P LDK A7,1 INDICATE OVERFLOW P RF READ 2 P* B P* INR NOT ACCEPTED L P* f PIHLC10 EQU * p & P CM TESTCF RESET FIRST WSORD TEST P CF A5,SSTIN PERFORM SST P ADK A5,4 P LDR A7,A7 P ABR* A5 P EJECT
0x204bcc…204d60 Dummy {f00=0x00a4, f01=0x018e, f02=» P RF(NA) SSTI20 NOT ACCEPTED ] P IFF LOGG=0 ] ( P CF A5,LOGSST ] < P XIF ] R P LDR A1,A2 SAVE STATUS ] ^ P ANK A1,2 ] | P RF(Z) SSTI10 ] P* ] P* THROUGHPUT ERROR ] P* ] P RF SSTI20 ] PSSTI10 EQU * ] P LDR A1,A2 ] 4
0x204d60…204ef4 (5, 107) Dummy {f00=0x00a4, f01=0x0190, f02=» ] d P ST A2,DCSTCU ^ * P CF A15,CKMESS CHECK IF STATUS CHANGE ^ P CF A15,STREGI ^ L P CF A15,SETIME ^ b P DATA SSTI16,1 ^ x P ABL TDISP ^ PSSTI16 EQU * ^ P CF A15,LDREGI ^ PSSTI20 EQU * ^ $ P LDK A7,1 INDICATE INVALID FRAME ^ P R
0x204ef4…205088 Dummy {f00=0x00a4, f01=0x018e, f02=»,/0F00 ^ 8 P RF(Z) SSTI40 ALL BITS IN LAST INTERRUPT SIGNIFICANT _ P SUK A3,1 ADJUST LENGTH _ J PSSTI40 RTN A5 _ j PSSTI50 EQU * _ P LDR A1,A2 _ P ANKL A1,/1004 _ P RB(Z) SSTI20 _ P LDK A7,2 RETRY START INPUT _ P RTN A5 _ P E
0x205088…20521c Dummy {f00=0x00a4, f01=0x0190, f02=» P MSR 8,A15 SAVE REGISTERS ` P XIF ` & P IFT CPU852=1 ` 2 P CF A15,SAVE8 ` H P XIF ` ^ P* ` j P CF A15,LDREGO ` t P LCR A2,A4 ` P SLL A2,8 ` & P LC A2,+1,A4 INIT OUTPUT REGISTER ` P OTR A2,0,CHLCUT SEND THEM ` P RF(NA) IHLCU1
0x20521c…2053b0 Dummy {f00=0x00a4, f01=0x0190, f02=»UFFER ` h P* a , P LD A7,SWITCH LOAD USE BUFFE ADD ESS a P RF(Z) IHLCUX I-FRAME a H " P LDR A4,A7 INIT FIRST PASSAGE a f P CM SWITCH CLEAR INDICATOR a PIHLCUX EQU * a P ADK A4,2 INCREMENT POINTER a P SUK A3,2 DECREMENT COUNTER a *
0x2053b0…205544 Dummy {f00=0x00a4, f01=0x0190, f02=»IT EQU * a " P CF A15,STREGO SAVE REGISTERS b P ABL TDISP b 6 P EJECT b H P* b V P* CHECK SST b ` P* b t PIHLCU1 EQU * b ~ P SST A2,CHLCUT PERFORM SST b P RF(NA) IHLCU2 NOT ACCEPTED b P* b P IFF LOGG=0 b P CF A5,LOGSST b
0x205544…2056d8 Dummy {f00=0x00a4, f01=0x0190, f02=» b r P* c P* MODEM NOT OPERABLE c P* c . , P CF A15,STREGO SAVE REGISTERS 79-03-27 c 8 , P CF A15,SETIME START TIMER 79-03-27 c h , P DATA IHLCU5,1 79-03-27 c ( P ABL TDISP DISPATCH 79-03-27 c P* c P* TIMEOUT
0x2056d8…20586c Dummy {f00=0x00a4, f01=0x0190, f02=»RROR c P* d PIHLCU3 EQU * d P LDK A7,1 d * PIHLCU2 EQU * d < P RTN A5 d P P EJECT d ` P* d n P* d x P* READ FROM THE LINE d P* d P* d PREAD EQU * d " P CF A15,STREGI SAVE REGISTERS d P ABL TDISP d P* d P*
0x20586c…205a00 Dummy {f00=0x00a4, f01=0x0190, f02=»CT d P* e P* e P* STORE INPUT REGISTER A3-A8 e P* e B P* e L PSTREGI ST A3,LCI3 e V P ST A4,LCI4 e p P ST A5,LCI5 e P ST A6,LCI6 e P ST A7,LCI7 e P ST A8,LCI8 e PRTNA15 EQU * e P* e P IFT CPU852=1 e P
0x205a00…205b94 (5, 108) Dummy {f00=0x00a4, f01=0x0190, f02=»RESTORE INPUT REGISTER A3-A8 e P* f $ P* f . PLDREGI LDKL A3,0 f 8 PLCI3 EQU *-2 f P P LDKL A4,0 f d PLCI4 EQU *-2 f v P LDKL A5,0 f PLCI5 EQU *-2 f P LDKL A6,0 f PLCI6 EQU *-2 f P LDKL A7,0 f PLCI7 EQU *-2 f P LDKL A8,0 f
0x205b94…205d28 Dummy {f00=0x00a4, f01=0x0190, f02=»STREGO ST A3,LCO3 f P ST A4,LCO4 g P ST A5,LCO5 g . P ST A6,LCO6 g B P ST A7,LCO7 g V P ST A8,LCO8 g j P RB RTNA15 g ~ P EJECT g P* g P* g $ P* RESTORE OUTPUT REGISTER A3-A8 g P* g P* g PLDREGO LDKL A3,0 g PLC
0x205d28…205ebc Dummy {f00=0x00a4, f01=0x0190, f02=»L A7,0 g PLCO7 EQU *-2 h P LDKL A8,0 h " PLCO8 EQU *-2 h 4 P RB RTNA15 h H P EJECT h Z P* h h < P* FIND DWT CONTAINING SUBTERMINAL ADDRESS AS GIVEN IN A2 h r P* h $ P* CALLING SEQUENCE: CF A5,FINTER h P* A2=SUBTERMINAL ADDRESS h P* A1
0x205ebc…206050 Dummy {f00=0x00a4, f01=0x018e, f02=»DCTAB ADDRESS TO END OF DC:TAB h PFINT10 SUK A1,2 i & P LDK A3,0 DEFAULT VALUE i > P CW A1,DCTAB END OF TABLE i ^ ( P RF(E) FINT20 SUBTERMINAL NOT FOUND i P LDR* A3,A1 LOAD DWT ADDRESS i , P CWR* A2,A3 COMPARE SUBTERMINAL ADDRESS i & P RB(NE)
0x206050…2061e4 Dummy {f00=0x00a4, f01=0x0190, f02=» PDC07ON EQU * j P IFT CPU852=1 j P CF A15,SAVE8 SAVE A1-A8 j . P XIF j N P IFT CPU852=0 j Z P MSR 8,A15 SAVE REGISTERS j p P XIF j P* j & P LDKL A2,COMQ RESET COMMAND QUEUE j P ST A2,QIN j P ST A2,QOUT j ( P LD A2,DCTPGP GE
0x2061e4…206378 Dummy {f00=0x00a4, f01=0x0190, f02=» j " P LDKL A5,STBIN LOAD STACK BASE k P LDK A1,CIDISC k . & P CIO A1,1,CHLCIN DISCONNECT MODEM k D P CF A5,READ k n P LDK A1,CICMO CONNECT MODEM k P CIO A1,1,CHLCIN k $ P CF A5,READ WAIT FOR MODEM READY k PDRDC20 ABL BRM k P EJECT k
0x206378…20650c Dummy {f00=0x00a4, f01=0x0190, f02=»L TIME OUT k v * P CF A15,CKMESS CHECK IF STATUS CHANGE l " P CF A15,SPTIM START POLLTIMER l @ P ABL TDISP l f P* l x 4 P* RESTART POLL TIMER WHEN POLL HAS BEEN RECEIVED l P* l $ PCPTIM CM DCONOF INDICATE POLLING l P LDKL A2,-TIMPOL l P ST*
0x20650c…2066a0 Dummy {f00=0x00a4, f01=0x0190, f02=» $ PSPTIM CF A15,SETIME START TIMER m P DATA PTOUT,TIMPOL m , & P ST A4,DCTPGP STORE TI,ER POINTER m F P* m p P IFT CPU852=1 m z P ADKL A15,4 m P ABR* A15 m P XIF m P IFT CPU852=0 m P RTN A15 m P XIF m P EJECT m P* m
0x2066a0…206834 (5, 109) Dummy {f00=0x00a5, f01=0x0190, f02=» DATA /8000 STATUS m P DATA 0 ECB ADDRESS n P DATA 0 ORDER n 6 * P DATA DC07DC POINTER TO ADDRESS BLOCK n L P DATA 0 TTAB ADDRESS n z $ P DATA 0 WAIT/ACTIVATE INDICATOR n P DATA 0 TASK QUEUE n P* n P IFT MMUPAG=1 n P DATA 0 USER ECB
0x206834…2069c8 Dummy {f00=0x00a5, f01=0x018e, f02=»EUE n p P DATA 0 BUFFER QUEUE ANCHOR o * P DATA 0 TIMER POINTER FOR BUFFER QUEUE o 0 P DATA 0 REQUEST TIMER VALUE o ^ P o P IFT MMUPAG=1 o PDC:ECB EQU * MMU ECB o P o P DATA 0,0,0,0,0,0 o P XIF o P* o P EJECT o P* o
0x2069c8…206b5c Dummy {f00=0x00a5, f01=0x0190, f02=» P DATA *+2 FREE BUFFER ANCHOR p P IFT RBUFNR=14 p ( P DATA *+RLINK p > P RES RBUFL+3 p T P DATA *+RLINK p h P RES RBUFL+3 p ~ P DATA *+RLINK p P RES RBUFL+3 p P DATA *+RLINK p P RES RBUFL+3 p P DATA *+RLINK p P RES RBUFL+3
0x206b5c…206cf0 Dummy {f00=0x00a5, f01=0x0190, f02=»ATA *+RLINK p P RES RBUFL+3 q P DATA *+RLINK q ( P RES RBUFL+3 q > P DATA *+RLINK q R P RES RBUFL+3 q h P DATA *+RLINK q | P RES RBUFL+3 q P XIF q P IFT RBUFNR=13 q P DATA *+RLINK q P RES RBUFL+3 q P DATA *+RLINK q P
0x206cf0…206e84 Dummy {f00=0x00a5, f01=0x018e, f02=»+3 q P DATA *+RLINK r P RES RBUFL+3 r P DATA *+RLINK r 4 P RES RBUFL+3 r J P DATA *+RLINK r ^ P RES RBUFL+3 r t P DATA *+RLINK r P RES RBUFL+3 r P DATA *+RLINK r P RES RBUFL+3 r P DATA *+RLINK r P RES RBUFL+3 r P X
0x206e84…207018 Dummy {f00=0x00a5, f01=0x0190, f02=» P RES RBUFL+3 s P DATA *+RLINK s P RES RBUFL+3 s . P DATA *+RLINK s B P RES RBUFL+3 s X P DATA *+RLINK s l P RES RBUFL+3 s P DATA *+RLINK s P RES RBUFL+3 s P DATA *+RLINK s P RES RBUFL+3 s P DATA *+RLINK s P RES RBU
0x207018…2071ac Dummy {f00=0x00a5, f01=0x018e, f02=»*+RLINK s P RES RBUFL+3 t P DATA *+RLINK t $ P RES RBUFL+3 t : P DATA *+RLINK t N P RES RBUFL+3 t d P DATA *+RLINK t x P RES RBUFL+3 t P DATA *+RLINK t P RES RBUFL+3 t P DATA *+RLINK t P RES RBUFL+3 t P DATA *+RLINK t
0x2071ac…207340 Dummy {f00=0x00a5, f01=0x0190, f02=» t P DATA *+RLINK u P RES RBUFL+3 u P DATA *+RLINK u 2 P RES RBUFL+3 u H P DATA *+RLINK u P RES RBUFL+3 u r P DATA *+RLINK u P RES RBUFL+3 u P DATA *+RLINK u P RES RBUFL+3 u P DATA *+RLINK u P RES RBUFL+3 u P DAT
0x207340…2074d4 (5, 110) Dummy {f00=0x00a5, f01=0x0190, f02=» RES RBUFL+3 u P DATA *+RLINK v P RES RBUFL+3 v * P DATA *+RLINK v > P RES RBUFL+3 v T P DATA *+RLINK v h P RES RBUFL+3 v ~ P DATA *+RLINK v P RES RBUFL+3 v P DATA *+RLINK v P RES RBUFL+3 v P XIF v P IFT RBUFNR=8 v P
0x2074d4…207668 Dummy {f00=0x00a5, f01=0x0190, f02=»INK v P RES RBUFL+3 w P DATA *+RLINK w P RES RBUFL+3 w 6 P DATA *+RLINK w J P RES RBUFL+3 w ` P XIF w t P IFT RBUFNR=7 w P DATA *+RLINK w P RES RBUFL+3 w P DATA *+RLINK w P RES RBUFL+3 w P DATA *+RLINK w P RES RBU
0x207668…2077fc Dummy {f00=0x00a5, f01=0x0190, f02=»*+RLINK w P RES RBUFL+3 x P DATA *+RLINK x $ P RES RBUFL+3 x : P DATA *+RLINK x N P RES RBUFL+3 x d P DATA *+RLINK x x P RES RBUFL+3 x P XIF x P IFT RBUFNR=5 x P DATA *+RLINK x P RES RBUFL+3 x P DATA *+RLINK x P RES
0x2077fc…207990 Dummy {f00=0x00a5, f01=0x0190, f02=»ATA *+RLINK x P RES RBUFL+3 y P XIF y ( P IFT RBUFNR=3 y 4 P DATA *+RLINK y J P RES RBUFL+3 y ` P XIF y t P DATA *+RLINK y P RES RBUFL+3 y P DATA 0 y P RES RBUFL+3 y P* y P IFF MMUPAG=0 y & PMMUBUF RES TBUFL+1 MMU WOR
0x207990…207b24 Dummy {f00=0x00a5, f01=0x0190, f02=»ES 6 OUTPUT BUFFER y P* z P* z $ " P* HDLC CIRCULAR COMMAND QUEUE z . P* z T P* z ^ PQIN DATA COMQ INPUT POINTER z h " PQOUT DATA COMQ OUTPUT POINTER z P* z P* z & PCOMQ EQU * CIRCULAR COMMAND QUEUE z P DATA 0,0,0,0,0 z P
0x207b24…207cb8 Dummy {f00=0x00a5, f01=0x0190, f02=» z P* { P IFF LOGG=0 { PLOGSST EQU * { & P LDKL A1,/5555 { : P RF LOG10 { P PLOGOUT EQU * { b P LDK A1,0 { v P RF LOG10 { PLOGIN EQU * { P LDKL A1,/1111 { PLOG10 ST A3,SAVE3 { P ST A2,SAVE2 { P LD A3,LOGPNT { P
0x207cb8…207e4c Dummy {f00=0x00a5, f01=0x0190, f02=» PLOGEXI ST A3,LOGPNT | P LD A2,SAVE2 | P LD A3,SAVE3 | 4 PLOGE10 RTN A5 | H P EJECT | ^ P* | l P* | v PLOGPNT DATA LOGSTA | PLOGSTA EQU * | P RES 400 | PLOGEND EQU *-6 | PSAVE2 DATA 0 | PSAVE3 DATA 0 | P XIF | P
0x207e4c…207fe0 Dummy {f00=0x00a5, f01=0x40cc, f02=»OINTER | t " PDCTAB DATA DC:TAB ENTRY POINT } * PDC:TAB DATA 2 DC-TAB'S VARIABLE LENGTH } 4 * P DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 } b PDC:END EQU * END OF TABLE } P* } P END } @ } | PSAVE2 DATA 0 | PSAVE3 DATA 0 | P XIF | P
0x207fe0…208174 (5, 111) Dummy {f00=0x00a5, f01=0x2008, f02=» ~ PLOGEND EQU *-4 J PSAVE2 DATA 0 J $ PSAVE3 DATA 0 J 8 P XIF J L P* J X P* J b P* J l P END J v@ J I | P ADK A3,2 I P CWK A3,LOGEND I P RF(L) LOGEXI I P LDKL A3,LOGSTA I PLOGEXI ST A3,LOGPNT I P LD A2,S
0x208174…208308 Dummy {f00=0x00a5, f01=0x0190, f02=» A4,/01 & ( P RF(E) DMT320 BOTH ODD OR BOTH EVEN ' & P CF A14,DMTBM ONE ODD AND ONE EVEN ' < P RF DMT340 ' f P* ' x PDMT320 LDR A4,A3 ' P ANK A4,/01 ' P RF(E) DMT330 BOTH EVEN ' P SUK A2,1 BOTH ODD ' P LCR A4,A1 ' P SCR A4,A3 '
0x208308…20849c Dummy {f00=0x00a5, f01=0x0190, f02=» A3,A2 GET LENGTH ' , P LDR A2,A4 GET RECEIVING BUFFER ADDRESS ( & P LD A4,DWTTAB,A6 GET TTAB ADDRESS ( J 8 P CF A14,MOV:US MOVE RECORD FROM USER TO SYSTEM AREA ( t P XIF ( P EJECT ( P* ( PDMT340 EQU * ( P* ( P* SET STATUS USED (
0x20849c…208630 Dummy {f00=0x00a5, f01=0x018e, f02=»YSICAL WRITE ( P* ) P* WRITE BLOCK TO DISC ) P* ) > ( P LDR A1,A6 FDB ADDRESS AS PARAMETER ) H P LKM ) t P DATA 15 FM WRITE ) " P CF A14,DMTIOT CHECK DISC I/O ) P LDR A1,A1 ) P RF(NZ) DMTERR ) P RF DMT400 ) P EJECT ) P
0x208630…2087c4 Dummy {f00=0x00a5, f01=0x018e, f02=» & P CF A14,CRNGET GET CURRENCY BUFFER * P LDR A10,A2 BUFFER ADDR * . P LD A2,ECBCW,A9 * N P LD A3,ECBCW+2,A9 LOG REC NR * f P LD A7,DWTOR,A1 * P ANK A7,/3F ORDER INDEX * P LDK A4,QRW * P CWR A7,A4 * P RF(E) DMT420 RANDOM WRITE *
0x2087c4…208958 Dummy {f00=0x00a5, f01=0x0190, f02=» * v P IFT INDXAC=1 + P LDK A4,QIRW + P CWR A7,A4 + 2 P RF(E) DMT420 IND REWR + D P LDK A4,QINS + b P CWR A7,A4 + v P RF(E) DMT460 INDEXED INSERT + P CWK A7,QSTIND + P RF(E) DMT406 START INDEXED + P XIF + P LDK A4,QSTDIR +
0x208958…208aec Dummy {f00=0x00a5, f01=0x0190, f02=»T408 + P ANKL A5,/7FFF , P SUK A4,1 , " PDMT408 EQU * , 4 " P ST A4,CRNCDF,A10 NEW CURRENCY , H P ST A5,CRNCDF+2,A10 , n P RF DMT420 , PDMT409 EQU * , P ST A2,CRNCDF,A10 , & P ST A3,CRNCDF+2,A10 CRN DATA FILE , PDMT420 EQU * , P
0x208aec…208c80 Dummy {f00=0x00a5, f01=0x018e, f02=»CHECK IF EA IS SET ALREADY , P* - " P CF A14,EATEST CHECK EA - , P LDR A4,A4 - L " P RF(NZ) DMT470 EA ALREADY SET - ^ P* - P* SET EA - P* - P CF A14,EASETB - P RF DMT470 - PDMT460 EQU * - P* - P* UPDATE LRN - P*
0x208c80…208e14 (5, 112) Opaque[0x194]
0x208e14…208fa8 # DirEnt {nam=»DRDC13«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x14b8, f03=0x0000}
0x208e14…208fa8 IdxSect {
0x208e14…208fa8 f00 = 0x00a5 // 0x208e14 @0x0
0x208e14…208fa8 f01 = 0x0018 // 0x208e16 @0x2
0x208e14…208fa8 gno = [ // 0x208e18 @0x4
0x208e14…208fa8 [0x00]: C0x00a5.0x3.0
0x208e14…208fa8 [0x01]: C0x00a6.0x0.0
0x208e14…208fa8 [0x02]: C0x00a6.0x1.0
0x208e14…208fa8 [0x03]: C0x00a6.0x2.0
0x208e14…208fa8 [0x04]: C0x00a6.0x3.0
0x208e14…208fa8 [0x05]: C0x00a7.0x0.0
0x208e14…208fa8 [0x06]: C0x00a7.0x1.0
0x208e14…208fa8 [0x07]: C0x00a7.0x2.0
0x208e14…208fa8 [0x08]: C0x00a7.0x3.0
0x208e14…208fa8 [0x09]: C0x00a8.0x0.0
0x208e14…208fa8 [0x0a]: C0x00a8.0x1.0
0x208e14…208fa8 [0x0b]: C0x00a8.0x2.0
0x208e14…208fa8 ]
0x208e14…208fa8 }
0x208fa8…20913c Dummy {f00=0x00a5, f01=0x0190, f02=» 2 P IDENT DRDC13 REL 10.0 80-03-14 870105041000 P : P REL 10.1 79-12-07 B P =1, OLLES POWER UP ^ P REL 10.1 79-10-26 | P* 2 P********************************************* P* $ P* PHILIPS TERMINAL SYSTEM PTS
0x20913c…2092d0 Dummy {f00=0x00a5, f01=0x0190, f02=» SIMULATION OF SINGLE ADDRESS TRIBUTARY STATION : P* TT ADDRESS ALWAYS 60 HERE (NOT SIGNIFI.) B 4 P* SERVICE FRAME USED : ACK NAK,BSY P* P* P* 2 P*********************************************
0x2092d0…209464 Dummy {f00=0x00a5, f01=0x0190, f02=» REQUESTS l " P ENTRY IH1301 INPUT INTERRUPT " P ENTRY IH1302 OUTPUT INTERRUPT 8 " P ENTRY DC13ON POWER ON ROUTINE ^ P ENTRY DW1300 DWT FOR DCTASK P* P* P* EXTERNAL REFERENCES P* P* " P EXTRN TDISP DISPATCHER EN
0x209464…2095f8 Dummy {f00=0x00a5, f01=0x0190, f02=»RN SETIME SET TIMER P EXTRN DWTST DWT STATUS P EXTRN DWTOR DWT ORDER < P EXTRN DWTECB DWT ECB Z * P EXTRN INTSAV SAVE AREA LAST INTERRUPT x $ P EXTRN ECBBA ECB BUFFER ADDRESS $ P EXTRN ECBRL ECB REQUEST LENGTH * P EXTRN ECBEL ECB E
0x2095f8…20978c Dummy {f00=0x00a5, f01=0x0190, f02=»FFER n , P EXTRN DC:MOT MOVE DATA FROM USER BUFFER 0 P EXTRN DISEND COMPLETE REQUEST AND DISPATCH < P EXTRN SETTIM START TIMER p * P EXTRN PFPOST WAIT FOR POWER UP IF SET P EJECT P* P* P* P* 6 P* STANDARD INTER
0x20978c…209920 Dummy {f00=0x00a5, f01=0x018e, f02=»S AS GIVEN AT PARAMETER TRANSFER (BIT #08-#15) x $ P* DWTST BIT #00: NO REQUEST 6 ( P* DWTTP TIMERPOINTER, ORDER PROCESS ^ " P* DWTWQ WRITE/GET BUFFER QUEUE P* P EJECT P******************** P* * P* PARAMETERS FOR CONDITIO
0x209920…209ab4 (5, 113) Dummy {f00=0x00a6, f01=0x0190, f02=» j PX:B EQU /60 " PDCFC EQU /60 DC TASK FILE CODE PX:C EQU 1 B PLOGG EQU 1 INTERRUPT LOGGING T PX:D EQU 2 x 0 PRBUFNR EQU 3 NUMBER OF RECEIVE BUFFERS(2-4) PX:E EQU 45 & PTIMPOL EQU 045 POLL TIMEOUT VALUE PX:F EQU 0
0x209ab4…209c48 Dummy {f00=0x00a6, f01=0x0190, f02=»EVICE ADDRESS OF RECEIVER P XIF " PX:H EQU 500 . $ PTBUFL EQU 300 MMU BUFFER LENGTH B P* j P IFT P6805=0 t 8 PCHLCUT EQU CHLCIN+/10 DEVICE ADDRESS OF TRANSMITTER P XIF P IFT P6805=1 8 PCHLCUT EQU CHLCIN+/01 DEVICE ADDRESS
0x209c48…209ddc Dummy {f00=0x00a6, f01=0x0190, f02=»************** & PMMUPAG EQU 0 0=NO TOSS MMU-PAGING P* @ P* J , PCPU852 EQU 1 0=EXTENDED INSTRUCTION SET T P* P* 2 PDEVIND EQU -2 DEVICE INDEX DATA COMMUNICATION P* P* * PBUFLEN EQU TBUFL+TBUFL MMU BUFFER SIZE
0x209ddc…209f70 Dummy {f00=0x00a6, f01=0x0190, f02=»DRDC13 P* 0 P******************************************** " PSWBT00 EQU /8000 REQUEST ERROR L * PSWBT02 EQU /2000 STATUS CHANGE DC-TASK r * PSWBT09 EQU /0040 TIMEOUT ERROR DC-TASK PSWBT10 EQU /0020 CARRIER OFF $ PSWBT15 EQU /0001 MODEM
0x209f70…20a104 Dummy {f00=0x00a6, f01=0x0190, f02=» EJECT 0 P******************************************** P* B * P* DWTREQ IS AN INTERNAL VARIABLE USED L ( P* AS A REQUEST VECTOR AND MAY HAVE z P* THE FOLLOWING VALUES. P* 0 P******************************************** B P* D
0x20a104…20a298 Dummy {f00=0x00a6, f01=0x0190, f02=» " A BSY TO BE SENT ~ , P* DWTREQ = /0002 " A NAK TO BE SENT . P* DWTREQ = /0001 " AN ACK TO BE SENT N 0 P******************************************** P EJECT P******************** P* P* DWT DISPLACEMENTS P*
0x20a298…20a42c Dummy {f00=0x00a6, f01=0x0190, f02=»FT MMUPAG=1 PSTART EQU DWTDRD+4 P XIF . P* : P* D 4 PDWTTP EQU START+/00 TIMER POINTER ORDER PROCESS N . PDWTWQ EQU START+/02 WRITE/GET BUFFER QUEUE $ PDWTSQ EQU START+/04 STATUS QUEUE & PDWTRQ EQU START+/06 RECEIVE QUEUE ,
0x20a42c…20a5c0 Dummy {f00=0x00a6, f01=0x0190, f02=»* P* P* REQUEST HANDLING P* . P* 8 P* B P* PARAMETERS L P* ` P* A7=ORDER j P* | P* /02: READ P* /06: WRITE P* /37: TRANSFER PARAMETERS $ P* /39: SET REQUEST TIMEOUT VALUE P* P EJECT
0x20a5c0…20a754 (5, 114) Dummy {f00=0x00a6, f01=0x0190, f02=» /16 PSTX EQU /02 PETX EQU /03 . PEOT EQU /04 L PSP EQU /20 j PKC EQU /43 PKNUL EQU /00 PACK EQU /06 PNAK EQU /15 P*
0x20a754…20a8e8 Dummy {f00=0x00a6, f01=0x0190, f02=»CODE-F1 FOR HEADER r B PDCONOF DATA 0 LINE STATUS 1=OK,0=OFF,2=RESTART * PDCSTOL DATA 0 OLD DC EQUIPMENT STATUS b PDCSTCU DATA 0 CURRENT STATUS , PDCTPGP DATA 0 TIMER POINTER GENERAL POLL PCURDWT RES 1 CURRENT DWT & PSVRD
0x20a8e8…20aa7c Dummy {f00=0x00a6, f01=0x0190, f02=» RES 1 P EJECT P* & P* 0 $ P* ACTIVATION FROM TERMINAL TASKS : P* b PDCACT EQU * l P LDK A1,0 PRESET RETURN CODE P SUK A7,/02 P RF(Z) DCRD READ SPECIFIC P SUK A7,/06-/02 P RF(Z) DCWR P S
0x20aa7c…20ac10 Dummy {f00=0x00a6, f01=0x0190, f02=» P* P********** P* $ P* ACTIVATION FROM DCTASK . P* P P********** Z P* l PDCACTD EQU * v " P SUR A1,A1 PRESET RETURN CODE P SUK A7,/02 P RF(E) DCRDDC READ P SUK A7,/37-/02 $ P RF(E) DCTP TRANSF
0x20ac10…20ada4 Dummy {f00=0x00a6, f01=0x0190, f02=»* P********** P* $ P DATA 0 INDICATES NO MMU BUFFER & P DATA DEVIND DEVICE INDEX N * PDC13DC DATA DCACTD ACTIVATION ADDRESS p & P DATA ABORT ABORT ROUTINE ADDRESS & P DATA DCRBUF RECEIVE BUFFER ANCHOR P DATA 6 HEADER LENGTH
0x20ada4…20af38 Dummy {f00=0x00a6, f01=0x0190, f02=»FLEN MMU BUFFER SIZE P DATA DEVIND DEVICE INDEX ( PDC13AD DATA DCACT ACTIVATION ADDRESS > P DATA ABORT ABORT ROUTINE j & P DATA DCRBUF RECEIVE BUFFER ANCHOR P DATA 6 HEADER LENGTH =2 P EJECT P********** P* P* READ
0x20af38…20b0cc Dummy {f00=0x00a6, f01=0x0190, f02=»MESSAGE RECEPTION P* P********** $ P* 6 PDCRDDC EQU * @ , P CF A15,CKMESS CHECK IF MESSAGE RECEIVED T P EJECT P* P* PDCRTN EQU * P ABL TDISP GO TO DISPATCHER P* P* P* TRANSFER PARAMETERS
0x20b0cc…20b260 Dummy {f00=0x00a6, f01=0x0190, f02=»RAMETER v ( P STR A2,A6 SAVE IN FIRST WORD OF DWT P CWK A6,DW1300 DCTASK DWT ? < , P RF(E) DCTP40 YES!SHOULD'NT BE IN DC:TAB ` * P LD A1,DC:IN GET DC:TAB INPUT POINTER ( P CWK A1,DC:END TABLE ALREADY FULL ?? & P ABL(E) DISIOE YES!! REQUEST E
0x20b260…20b3f4 (5, 115) Dummy {f00=0x00a6, f01=0x018e, f02=»4,2 ADDRESS TO NEXT ENTRY ( P CW A4,DCTAB ALL ENTRIES CHECKED ?? " ( P RF(E) DCTP30 YES!! DWT NOT IN TABLE N P CWR* A6,A4 IN TABLE ? z P RF(E) DCTP40 YES !! P RB DCTP20 CHECK NEXT ENTRY PDCTP30 EQU * $ P STR A6,A1 INSERT DWT IN DC:
0x20b3f4…20b588 Dummy {f00=0x00a6, f01=0x0190, f02=» P LDK A1,0 PENDIO EQU * $ P CF A15,TENDIO COMPLETE REQUEST . P RB DCRTN V P EJECT h P* v P* P* WRITE P* P* P* COMPLETE WHEN: P* SUCCESFUL TRANSMISSION P* TIME OUT P* P*
0x20b588…20b71c Dummy {f00=0x00a6, f01=0x0190, f02=»LEN YES!! P XIF P CF A15,TIMEWR SET TIMER P LDKL A2,/0100 > 8 P ORS A2,DWTREQ,A6 INDICATE WRITE REQUEST OUTSTANDING T & P CM DWTTRY,A6 CLEAR RETRY-COUNTER P RB DCRTN P* P* P* P* READ P* P*
0x20b71c…20b8b0 Dummy {f00=0x00a6, f01=0x0190, f02=»CB z . P LD A4,DWTRQ,A6 AND RECEIVE MESSAGE QUEUE " P RF(Z) DCRD20 NOTHING IN QUEUE < ( P LDR* A2,A4 TAKE THE FIRST IN QUEUE b P ST A2,DWTRQ,A6 P LDK A1,0 RESET RETURN CODE P ADK A4,6 " P LD A3,-4,A4 EFFECTIVE LENGTH P ST A3
0x20b8b0…20ba44 Dummy {f00=0x00a6, f01=0x0190, f02=» P RB DCRTN $ PDCRD20 CF A15,TIMERE START TIMER P RB DCRTN B P EJECT T P******************** b P* ~ P* SET REQUEST TIMEOUT VALUE P* P******************** P* PREQTIM EQU * " P LD A2,ECBCW,A8 TIMEOUT
0x20ba44…20bbd8 Dummy {f00=0x00a6, f01=0x0190, f02=»:LEN LDKL A1,/8008 REQUEST ERROR + ILLEGAL LENGTH P ABL DISEND COMPLETE REQUEST : P XIF ^ P* j P* t P EJECT ~ P******************** P* P* TIMER HANDLING PART P* P******************** P* P* READ
0x20bbd8…20bd6c Dummy {f00=0x00a6, f01=0x0190, f02=»ET REQUEST TIME VALUE ~ P RF(Z) TIME10 NO TIMING P ST A2,TIMERR > P CF A15,SETIME T P DATA TOUTRE j PTIMERR DATA 0 ~ ( P ST A4,DWTTP,A6 STORE TIMER POINTER PTIME10 EQU * P RF GBUF10 RETURN TO CALLER P* P******
0x20bd6c…20bf00 Dummy {f00=0x00a6, f01=0x018e, f02=»6,A1 FETCH DWT $ P CM DWTTP,A6 CLEAR TIMER POINTER PTOUTR1 EQU * > & P LDK A1,/40 INDICATE TIMEOUT ERROR R & P CM DWTREQ,A6 CLEAR REQUEST VECTOR | $ PTOUTR2 RB ENDIO COMPLETE REQUEST P* P******************** P* P* WRITE T
0x20bf00…20c094 (5, 116) Dummy {f00=0x00a6, f01=0x018e, f02=» d P RB(Z) TIME10 NO TIMING P ST A2,TIMWR ( P CF A15,SETIME < P DATA TOUTWR R PTIMWR DATA 0 f P ST A4,DWTTP,A6 z P RB TIME10 P EJECT P******************** P* P* TIMEOUT WRITE TIMER P* P********
0x20c094…20c228 Dummy {f00=0x00a6, f01=0x0190, f02=» P* P* STOP REQUEST TIMING P* , & P* REMAINING TIME IS RETURNED IN A2 6 P* ` P* j PCTIME EQU * t P INH & P LD A2,DWTTP,A6 GET TIMER POINTER P RF(Z) CTIM10 NOT RUNNING " P LDR* A2,A2 GET REMAINING TIME P N
0x20c228…20c3bc Dummy {f00=0x00a6, f01=0x0190, f02=»**** P* P* GET RECEIVE BUFFER P* 4 & P* CALLING SEQUENCE: CF A15,GRBUF > P* h $ P* A4 = 0 IF NO AVAILABLE BUFFER r & P* ELSE A4 CONTAINS BUFFER ADDRESS P* A2 AND A3 ARE DESTROYED P* P********************
0x20c3bc…20c550 Dummy {f00=0x00a6, f01=0x0190, f02=» . P LDR* A3,A4 REMOVE BUFFER FROM FREE CHAIN ! P STR A3,A2 ! 6 * PGBUF10 ADKL A15,4 ADJUST STACK POINTER ! H P ABR* A15 RETURN TO CALLER ! v P EJECT ! P******************** ! P* ! & P* QUEUE ALLOCATED RECEIVE BUFFER ! P* ! P* A4 =
0x20c550…20c6e4 Dummy {f00=0x00a6, f01=0x018e, f02=» ON TERMINAL DWT ! , P ADK A2,DWTRQ BEGINNING OF RECEIVE QUEUE " PQR100 EQU * " H P LDR* A3,A2 " $ P RF(Z) QR200 END OF QUEUE FOUND " p P LDR A2,A3 " P RB QR100 " & PQR200 STR A4,A2 INSERT INTO QUEUE " P CMR A4 INDICATE OF QUEUE " P
0x20c6e4…20c878 Dummy {f00=0x00a6, f01=0x018e, f02=» " , P* REGISTERS A1 - A4,A6,A8 ARE DESTROYED # P* # 8 P******************** # B P* # ^ PCKMESS LDKL A6,DW1300 # h 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) CKM110 NO
0x20c878…20ca0c Dummy {f00=0x00a6, f01=0x0190, f02=» 0 P LDR* A2,A3 A2 = ADDRESS TO NEXT READ BUFFER $ 0 P ST A2,DWTRQ,A6 STORE THIS ADDRESS ON QUEUE $ 8 " P ADK A3,6 MOVE POINTER TO TEXT $ l , P ST A3,ECBBA,A8 SAVE THIS ADDRESS IN ECB $ P LD A4,-4,A3 $ . P ST A4,ECBEL,A8 STORE NUMBER OF CHARACTERS $ P
0x20ca0c…20cba0 Dummy {f00=0x00a6, f01=0x0190, f02=»IN MOVE DATA TO USER BUFFER $ PCKM110 RB GBUF10 RETURN % $ P* % D 8 PCKM200 LD A1,DCSTCU NO MESSAGE RECEIVED,CHECK STATUS % N , P OR A1,DCONOF TAKE CARE OF POLL TIMEOUT % P CW A1,DCSTOL % P ST A1,DCSTOL % & P RB(E) CKM110 NO CHANGE OF STATUS
0x20cba0…20cd34 (5, 117) Dummy {f00=0x00a7, f01=0x0190, f02=»************** % P* & P* ABORT ROUTINE & P* & 8 P******************** & B P* & ^ & PABORT LD A1,DWTTP,A6 TIMER POINTER & h " P RF(Z) AB:10 NO TIMER RUNNING & P CM* DWTTP,A6 KILL TIMER & P CM DWTTP,A6 & $ PAB:10 LD A1,DWTOR,A6 ORDER C
0x20cd34…20cec8 Dummy {f00=0x00a7, f01=0x0190, f02=» & f PAB:RTN EQU * ' P IFT CPU852=1 ' & P RB GBUF10 RETURN IN INHIBIT MODE ' 2 P XIF ' P IFF CPU852=1 ' h P RTN A15 ' ~ P XIF ' P EJECT ' P* ' P* ' P* STORE REGISTER A3-A8 ' $ P* CALLING SEQUENSE: CF A15,STREG ' P* '
0x20cec8…20d05c Dummy {f00=0x00a7, f01=0x018e, f02=»5 ' P ST A6,LCA6 ( P ST A7,LCA7 ( P ST A8,LCA8 ( 2 P RF RTNA15 RETURN ( F P EJECT ( ` PLDREG LDKL A3,0 ( n PLCA3 EQU *-2 ( P LDKL A4,0 ( PLCA4 EQU *-2 ( P LDKL A5,0 ( PLCA5 EQU *-2 ( P LDKL A6,0 ( PLCA6 EQU *-2 (
0x20d05c…20d1f0 Dummy {f00=0x00a7, f01=0x018e, f02=» P EJECT ) P* ) P* ) $ P* RECEIVE A FRAME AND DECODE IT ) & P* ) N P* ) X * PBRM LDKL A5,STB LOAD STACK BASE FOR A5 ) b P LD A2,PFPOST ) $ P RF(NZ) BRM100 WAIT FOR POWER UP ) * P LDKL A2,/100+SYN SPECIFY SYN PATTERN ) $ P CIO A2,1,CH
0x20d1f0…20d384 Dummy {f00=0x00a7, f01=0x0190, f02=» P RB(NE) BRM100 NOT /FF * P CF A5,READ READ CHARACTER * " P CWK A2,/FF * D " P RB(NE) BRM100 NOT ANOTHER /FF * X , P ABL BRM920 HALT INPUT AND RESYNCHRONIZE * ~ P* * P* SOH RECEIVED * P* * PBRM200 LDK A7,0 CLEAR BCC * P CF A5,READP R
0x20d384…20d518 Dummy {f00=0x00a7, f01=0x0190, f02=»TRUCTION * x P* ABL(Z) BRM900 YES + P* + 0 P************* + : P ABL(Z) BRM920 YES + P " P ST A2,TERID STORE CURRENT ID + j P ANK A2,/1F + P CF A5,FINTER FIND DWT + P LDR A3,A3 OK? + P RB(Z) BRM100 NO + PBRM210 EQU * + $ P ST
0x20d518…20d6ac Dummy {f00=0x00a7, f01=0x0190, f02=» + P RF(Z) SELTRM SELECT ADDRESS , P ABL SCANQ1 POLL ADDRESS , , P* , L P** , V & P**** SELTRM : SCAN SELECTING FRAME , ` P* HOLD TEXT, ACK , NAK , P* , P* , PSELTRM EQU * , & P CF A5,VERHAD VERIFY SELECT FRAME , P ANK A7,/7F
0x20d6ac…20d840 Dummy {f00=0x00a7, f01=0x018e, f02=»E) BRM100 , P LDK A7,0 RESET BCC COUNTER - " P LD A6,CURDWT GET WORKING DWT - 6 P CF A5,READP IGNORE ADRT - P ABL(NZ) BRM100 - | P************* - P* - 0 P* THIS IS TO TEST IF A FRAME IS CONSTITUTED - P* OF A SELECT MESSAGE ONLY -
0x20d840…20d9d4 (5, 118) Dummy {f00=0x00a7, f01=0x0190, f02=» P CWK A2,KNUL . P RF(E) SELTXT TEXT . P CWK A2,ACK . 2 P RF(E) SELACK ACK . F P CWK A2,NAK . ` P ABL(E) SELNAK NAK . t P ABL BRM100 . PSELTXT EQU * . P . P CF A5,READP FC1 . P ABL(NZ) BRM100 . P CF A5,READP FC2 . P A
0x20d9d4…20db68 Dummy {f00=0x00a7, f01=0x0190, f02=» AVAILABLE . ~ P* / P********** / P* / . * P LD A4,DCRBUF GET BUFFER CHAIN POINTER / 8 . P RF(Z) SELT03 SEND BUSY AND RESYNCHRONISE / f $ P ADK A4,6 ADJUST BUFFER POINTER / & P RF SELT20 OTHERWISE READ MESSAGE / PSELT03 EQU * / P LD A6,CUR
0x20db68…20dcfc Dummy {f00=0x00a7, f01=0x0190, f02=»ID GET TERMINAL ID / P LDR A1,A4 0 * P SCR A2,A1 STORE IT AS FIRST CHARACTER 0 . PSELT04 EQU * 0 P CF A5,READP GET CHARACTER 0 p P RF(NZ) SELT06 0 P CWK A2,ETX END OF TEXT ? 0 P RF(E) SELT10 YES 0 PSELT05 EQU * 0 P CWK A2,/5A 0
0x20dcfc…20de90 Dummy {f00=0x00a7, f01=0x0190, f02=» SELT06 FUFFER OVERFLOW 0 P LDR A1,A4 1 & P ADR A1,A3 COMPUTE BUFFER ADDRESS 1 2 P SCR A2,A1 STORE CHARACTER 1 " P ADK A3,1 ADEJUSTE POINETEURE 1 ~ P RB SELT04 1 P** SUCH A PROGRESS !!! 1 PSELT10 EQU * 1 P CF A5,READP READ BCC 1 P
0x20de90…20e024 Dummy {f00=0x00a7, f01=0x0190, f02=» ADK A4,6 ADJUST BUFFER PONTER 1 P LD A2,DWTST,A6 GET STATUS 2 & $ P RF(N) SELT40 GO IF WRONG ORDER 2 H P LDK A2,/2 2 p P CW A2,DWTOR,A6 READ ORDER ? 2 P RF(NE) SELT40 NO READ ORDER 2 $ P LD A8,DWTECB,A6 GET ECB ADDRESS 2 P LD A3,SVRDL GET READ
0x20e024…20e1b8 Dummy {f00=0x00a7, f01=0x0190, f02=» P CF A5,CTIME STOP TIMER 3 P LDK A1,0 RESET RETURN CODE 3 $ , P CF A15,DC:MIN MOVE DATA TO USER BUFFER 3 H P ABL BRM100 3 x PSELT06 EQU * 3 P LDK A3,2 NAK TO BE SENT 3 P ST A3,DWTREQ,A6 STORE IT 3 P ABL BRM100 3 P EJECT 3 P
0x20e1b8…20e34c Dummy {f00=0x00a7, f01=0x0190, f02=»DP GET ETX 3 P CWK A2,ETX ETX ? 4 P ABL(NE) SELAC1 NO 4 , P CF A5,READP GET BCC 4 F P ANK A7,/7F BCC OK ? 4 b P ABL(NZ) BRM100 NO 4 ~ ( P LD A2,DWTREQ,A6 GET REQUEST VECTOR 4 $ P ABL(NN) BRM100 NO EXPECTED ACK 4 P CM DWTREQ,A6 4 P CM DW
0x20e34c…20e4e0 Dummy {f00=0x00a7, f01=0x0190, f02=»5,TENDIO COMPLETE REQUEST 4 P ABL BRM100 5 " PSELAC1 EQU * 5 6 P CM DWTREQ,A6 5 J P CM DWTTRY,A6 5 ` P LD A2,DWTOR,A6 5 v P CWK A2,6 5 P ABL(NE) SELT:2 5 P LDK A1,0 5 P CF A15,TENDIO 5 P***************** 5 P* 5 P* A
0x20e4e0…20e674 (5, 119) Dummy {f00=0x00a7, f01=0x018e, f02=»ER 5 f 0 P ABL(Z) SELT03 NO BUFFER AVAILABLE,SEND BUSY 6 $ P ADK A4,6 ADJUST BUFFER POINTER 6 > P LD A3,TERID GET TERMINAL ID 6 f " P LDR A1,A4 GET BUFFER ADDRESS 6 P SCR A3,A1 STORE TERMINAL ID 6 * P LDK A3,1 INITIATE LENGTH ACCUMULATOR 6 . P ABL S
0x20e674…20e808 Dummy {f00=0x00a7, f01=0x018e, f02=» 6 Z P* 7 P********** 7 P* 7 $ PSELT40 EQU * 7 . P LD A3,SVRDL GET READ LENGTH 7 B " P ST A3,-4,A4 STORE READ LENGTH 7 f P SUK A4,6 GET BUFFER BASE 7 ( P CF A5,QRBUF QUEUE BUFFER FOR DCTASK 7 P ABL BRM100 7 P EJECT 7 PSELNAK EQU *
0x20e808…20e99c Dummy {f00=0x00a7, f01=0x018e, f02=» P* IT IS REMOVED 8 P** 8 P* 8 & P* BRM900 EQU * 8 0 P* CF A5,READ 8 H P* CWK A2,/FF 8 ^ P* ABL(E) BRM900 8 t P* BRM910 CF A5,READ 8 P* CWK A2,/FF 8 $ P* ABL(NE) BRM100 NOT SECOND FF 8 P* 8 P*********** 8 PBR
0x20e99c…20eb30 Dummy {f00=0x00a7, f01=0x0190, f02=» 8 P CF A5,VERHAD VERIFY HEADER 9 P ANK A7,/7F 9 , P ABL(NZ) BRM100 BAD BCC 9 @ P IM WPOLL 9 ` P CF A5,CPTIM 9 r P ABL BRM100 9 PSCANQ EQU * 9 P ABL TREOT 9 PSCPOLL EQU * 9 P CM WPOLL 9 $ P LD A6,CURDWT GET CURRENT DWT 9
0x20eb30…20ecc4 Dummy {f00=0x00a7, f01=0x018e, f02=»BSY ? 9 | P RF(Z) SCTXT : P SUK A4,1 : " P RF(Z) SCACK =1, ACK : 4 P SUK A4,1 : P P RF(Z) SCNAK =2, NAK : b P RF SCBSY =3, BUSY : ~ PSCTXT EQU * : P ANKL A3,/100 : P ABL(Z) TRQF10 : P ABL TRTEXT TRANSMIT TEXT : PSCACK EQU * :
0x20ecc4…20ee58 Dummy {f00=0x00a7, f01=0x018e, f02=» : P* ; 2 P**** VERHAD : VERIFY HEADER FRAME POLL-SELECT ; P* ; H P* ; R PVERHAD EQU * ; P CF A5,READP GET CODE ; p P XRK A2,KNUL ; P RF(NZ) VERH10 ; PVERH1 CF A5,READP ; P XRK A2,STX GET STX ; P RF(NZ) VERH10 ; P CF
0x20ee58…20efec Dummy {f00=0x00a7, f01=0x0190, f02=» " P* TRANSMIT PROCEDURE RESPONSES < P* < * P* < 4 P EJECT < > P* < L P* < V P* TRANSMIT SYNC SEQUENCE < ` P* < P* < PTRSYNC EQU * < P LD A2,PFPOST < $ P RF(NZ) TRS050 WAIT FOR POWER UP < & P CIO A2,1,CHLCUT START TRANSMITTER
0x20efec…20f180 Dummy {f00=0x00a7, f01=0x0190, f02=» SEND SYN < P SUK A3,1 = P RB(NZ) TRS100 = $ P RTN A5 = : & P****** TRHEAD : TRANSMIT HEADER = J . P* CODE=HEADER, F1=HEADER+1 = t P* = PTRHEAD EQU * = , P CF A5,TRSYNC SEND 4 SYN = , P LDK
0x20f180…20f314 (5, 120) Dummy {f00=0x00a7, f01=0x0190, f02=» CF A5,WRITEP SEND -ADRT- = P LDK A2,0 > * P LC A2,HEADER SEND CODE > < P CF A5,WRITEP > P LDK A2,0 > P LC A2,HEADER+1 SEND FC1 > * P CF A5,WRITEP SEND F1 > P LDK A2,SP > , P
0x20f314…20f4a8 Dummy {f00=0x00a7, f01=0x0190, f02=»A5 RETURN TO CALL > ~ P* ? " P* ? , 0 P****** TRACK : TRANSMIT ACK-SP-SP FRAME ? 6 P* ? j P* ? t PTRACK EQU * ? ~ * P LDKL A2,/0620 ACK-SP. ? PTRACK1 ST A2,HEADER ? . P CF A5,TRHEAD
0x20f4a8…20f63c Dummy {f00=0x00a7, f01=0x0190, f02=» RETURN ? | P* @ P* @ " 0 P****** TRNAK : TRANSMIT NAK-SP-SP FRAME @ , P* @ ` P* @ j PTRNAK EQU * @ t ( P LDKL A2,/1520 NAK-SP @ P RB TRACK1 @ P* @ ( P****** TRETX : TRANSMIT ETX/B
0x20f63c…20f7d0 Dummy {f00=0x00a7, f01=0x0190, f02=» @ t P LDR A2,A7 A , P CF A5,WRITEP -SEND BCC A ( P RTN A5 A X P* A t P* A ~ 2 P****** TREOT : TRANSMIT END-OF-FRAME AND A . P* STOP TRANSMIT PROCESS A P* A PTREOT EQU
0x20f7d0…20f964 Dummy {f00=0x00a7, f01=0x0190, f02=» CF A5,WRITE A P LDK A2,/7F -PAD- B " ( P CF A5,WRITE -PAD- B < 0 P CIO A2,0,CHLCUT STOP PROCESS B h & P SST A2,CHLCUT SST B P ABL BRM B P* B P* B $ P****** TRTEXT
0x20f964…20faf8 Dummy {f00=0x00a7, f01=0x0190, f02=»TIME B P CM DWTREQ,A6 C P CM DWTTRY,A6 C " P LDK A1,/40 C 8 P CF A15,TENDIO C L P ABL TRQF10 C b PTRT080 EQU * C v P LDKL A2,/8020 NUL-SP C P ST A2,HEADER C . P CF A5,TRHEAD SEND HEADER C P LD A2,DWT
0x20faf8…20fc8c Dummy {f00=0x00a7, f01=0x0190, f02=» P ST A4,ECBBA,A2 D . P CF A15,DC:MOT MOVE DATA FROM USER BUFFER D P XIF D N P LD A4,ECBBA,A2 D Z $ P ADK A4,2 ADJUST BUFFER POINTER D r P SUK A3,2 ADJUST LENGTH D 0 PTRT100 LCR A2,A4 GET CHARACTER D 4 P ADK A4,1
0x20fc8c…20fe20 Dummy {f00=0x00a7, f01=0x0190, f02=»20 YES- SKIP IT D z P CF A5,WRITEP E PTRT120 EQU * E 2 0 P SUK A3,1 MORE TO SEND ? E N P RB(NZ) TRT100 E 2 P CF A5,TRETX NO- SEND ETX/BCC E PTRT130 EQU * E 2 P LD A6
0x20fe20…20ffb4 (5, 121) Dummy {f00=0x00a8, f01=0x018e, f02=» E 0 PTRERR CF A5,CTIME CLEAR T.O. REQUEST IF ANY F P CM DWTREQ,A6 CLEAR REQUEST F < P LDKL A1,/8000 REQUEST ERROR F ` $ P CF A15,TENDIO COMPLETE REQUEST F P ABL SCANQ F P EJECT F PTRBSY EQU * F P LDKL A2,/6F20 BUSY-SPACE F P ABL T
0x20ffb4…210148 Dummy {f00=0x00a8, f01=0x018e, f02=» P EJECT G P* G P* G P* RECEIVER INTERRUPT G & P* G D P* G N $ PIH1301 CF A15,SAVE8 SAVE A1 - A8 G X * P CF A15,LDREG RESTORE DC REGS A3 - A8 G P INR A2,0,CHLCIN READ CHAR G , P RF(NA) IHIN20 NOT ACCEPTED,CHECK STATUS G P IFF LOG
0x210148…2102dc Dummy {f00=0x00a8, f01=0x0190, f02=» G P* H P* H P* TRANSMITTER INTERRUPT H P* H > P* H H $ PIH1302 CF A15,SAVE8 SAVE A1 - A8 H R * P CF A15,LDREG RESTORE DC REGS A3 - A8 H z P RB IHIN10 H P EJECT H P* H P* H & P* SST INSTRUCTION AND STATUS CHECK H P*
0x2102dc…210470 Dummy {f00=0x00a8, f01=0x0190, f02=»ADY H l P* I PSST SST A1,CHLCIN I P LDR A2,A1 I 0 P IFF LOGG=0 I B & P CF A5,LOGSST LOG SST INFORMATION I V P XIF I 6 P ANK A2,2 TEST IF MODEM NOT READY/THROUGHPUT ERROR I P RF(NZ) SST100 NO PROBLEM I P ORS A2,DCSTCU FLAG ERROR I
0x210470…210604 Dummy {f00=0x00a8, f01=0x0190, f02=» RB SST PERFORM SST INSTRUCTION AND STATUS CHECK I P EJECT J 8 P* J F P* J P , P* WRITE FROM OR READ ONE CHARACTER TO A2 J Z P* J P* J PWRITE EQU * J $ P OTR A2,0,CHLCUT SEND CHARACTER J P RF(A) WRIT10 J P RF READ J PWRIT10 E
0x210604…210798 Dummy {f00=0x00a8, f01=0x0190, f02=» P EJECT K P* K P* K P*** WRITEP K & P* K 8 P* WRITE A2 WITH PARITY K B P* K b P* K l PWRITEP ECR A1,A2 K v P ORK A2,/80 K PWRI100 SLL A1,1 K P RB(P) WRI100 K P RF(Z) WRI101 K P XRK A2,/80 K P RB WRI100 K
0x210798…21092c Dummy {f00=0x00a8, f01=0x018e, f02=» TO A2 AND CHECK PARITY K ~ P* L P* L * PREADP CF A5,READ L 4 P CWK A2,SYN L L P RB(E) READP L ` P ECR A1,A2 L t PRE100 SLL A1,1 L P RF(Z) RE110 L P RB(NN) RE100 L P XRK A2,/80 L P RB RE100 L PRE110 LDR A1,A2 L P ANK
0x21092c…210ac0 Dummy {f00=0x00a8, f01=0x0190, f02=» L P* M < P* FIND DWT CONTAINING SUBTERMINAL ADDRESS AS GIVEN IN A2 M P* M R $ P* CALLING SEQUENCE: CF A5,FINTER M P* A2=SUBTERMINAL ADDRESS M P* A4 DESTROYED M " P* A3#0: DWT TO FOUND TERMINAL M P* M PFINTER EQU * M P LD A4,DCT
0x210ac0…210c54 (5, 122) Dummy {f00=0x00a8, f01=0x0190, f02=»TAB M x ( P RF(E) FINT20 SUBTERMINAL NOT FOUND N P LDR* A3,A4 LOAD DWT ADDRESS N 8 , P CWR* A2,A3 COMPARE SUBTERMINAL ADDRESS N & P RB(NE) FINT10 TAKE NEXT TERMINAL N PFINT20 RTN A5 N P EJECT N P* N P* N P* POWER ON FUNCTIONS N
0x210c54…210de8 Dummy {f00=0x00a8, f01=0x0190, f02=»DRDC20 ABL BRM N P* O P* O 4 P******* CLREQ : CLEAR PENDING REQUEST AT O * : P* POWER ON,BY KILLING REQ. VECTOR O b P* O P O PCLREQ EQU * O P LD A4,DCTAB O P AD* A4,DCTAB END OF TABLE O * PCLRQ10 SUK A
0x210de8…210f7c Dummy {f00=0x00a8, f01=0x0190, f02=»Q10 O P CM DWTREQ,A6 P P CF A5,CTIME P " P LDKL A1,/2040 P 6 P CF A15,TENDIO P L P RB CLRQ10 P b P LD A2,DCTPGP P t P RF(NZ) CLRQ20 P $ P CF A15,SPOTIM START POLL TIMER P PCLRQ20 RTN A5 P P EJECT P P********** P P* P 4 P
0x210f7c…211110 Dummy {f00=0x00a8, f01=0x0190, f02=» LDKL A2,-TIMPOL P P ST* A2,DCTPGP RESTART TIMER Q * P CF A15,CKMESS CHECK IF STATUS CHANGE Q < P RTN A5 Q j P* Q z P********** Q P* Q P* START POLL TIMER Q P* Q P********** Q P* Q $ PSPOTIM CF A15,SETTIM START TIMER Q
0x211110…2112a4 Dummy {f00=0x00a8, f01=0x0190, f02=»* Q P* POLL TIMEOUT R P* R " P********** R , P* R > ( PPTOUT LDKL A5,STB LOAD AS STACK BASE R H P LDK A2,/40 R t ( P ST A2,DCONOF INDICATE POLL TIMEOUT R * P CF A15,CKMESS CHECK IF STATUS CHANGE R $ P CF A15,SPOTIM START POLL TIMER R
0x2112a4…211438 Dummy {f00=0x00a8, f01=0x0190, f02=» ST A2,SAVE2 R P ORKL A2,/F000 S P RF LOG10 S * PLOGOUT ST A2,SAVE2 S < P ORKL A2,/0F00 S V P RF LOG10 S l PLOGIN CWK A2,/FF S ~ P RF(E) LOGE10 S P ST A2,SAVE2 S PLOG10 ST A3,SAVE3 S P LD A3,LOGPNT S P STR A2,A3 S P ADK A
0x211438…2115cc Dummy {f00=0x00a8, f01=0x0190, f02=»AVE3 S PLOGE10 RTN A5 T P EJECT T " P* T 0 P* T : PLOGPNT DATA LOGSTA T D PLOGSTA EQU * T ^ P RES 300 T r PLOGEND EQU *-4 T PSAVE2 DATA 0 T PSAVE3 DATA 0 T P XIF T P* T P* T P* T P******************** T P*
0x2115cc…211760 Dummy {f00=0x00a8, f01=0x0190, f02=» T P DATA *+2 FREE BUFFER ANCHOR U P IFF RBUFNR=2 U , P DATA *+RLINK U B P RES RBUFL+3 U X P IFF RBUFNR=3 U l P DATA *+RLINK U P RES RBUFL+3 U P XIF U P DATA *+RLINK U P RES RBUFL+3 U P DATA 0 END OF CHAIN U P RES RBUFL
0x211760…2118f4 (5, 123) Dummy {f00=0x00a8, f01=0x0190, f02=»* U P* DEVICE WORK TASK V P* FOR DC-TASK V & P* V < P********** V F P* V X PDW1300 EQU * TABLE ENTRY V b P DATA 0 CU LINE ADDRESS V P DATA /8000 STATUS V P DATA 0 ECB ADDRESS V P DATA 0 ORDER V * P DATA DC13DC POINTER TO AD
0x2118f4…211a88 Dummy {f00=0x00a8, f01=0x0190, f02=» DATA 0 USER ECB ADDRESS V P DATA DC:ECB MMU ECB ADDRESS W P XIF W D P DATA 0 TIMER POINTER W P P DATA 0 WRITE QUEUE W n , P DATA 0 STATUS QUEUE(NOT USED BY DCTASK) W " P DATA 0 RECEIVE MESSAGE QUEUE W " P DATA 0 REQUEST TIMEOUT VALUE W P D
0x211a88…211c1c Dummy {f00=0x00a8, f01=0x410c, f02=»IF W P EJECT X P* X P* X " PDC:IN DATA DC:TAB+2 X , P* X H PDCTAB DATA DC:TAB X R P* X l " PDC:TAB DATA 2 LENGTH OF DC:TAB X v * P DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 X P* X PDC:END EQU * X P* X P* X P END X @
0x211c1c…211db0 Dummy {f00=0x00a8, f01=0x2008, f02=» Y R P DATA 0 RETRY COUNTER S P IFT MMUPAG=1 S . PDC:ECB EQU * MMU ECB S D P DATA 0,0,0,0,0,0 S ` P XIF S z P EJECT S P* S P* S PDC:IN DATA DC:TAB+2 S P* S PDCTAB DATA DC:TAB S P* S " PDC:TAB DATA 2 LENGTH O
0x211db0…211f44 Dummy {f00=0x00a8, f01=0x0190, f02=» , ( } R @ t $ D L v A x CRT SYSLDX 8 $ @ M " z J H D !pC P # N / N G T WP@ P P V P T ;P$ MT wP { r H D ! V T P P V P P +P oT P T T W H
0x211f44…2120d8 Dummy {f00=0x00a8, f01=0x0190, f02=»R W& T V H D !oJ P PT * 3 P ;P I sT Tr P, U H D ! } P, U %P MP WW a eP0 m u P U^ ^ H D ! P P$ P R& P =T mT q sWJ yT } W> , P R P W H D !` P Z
0x2120d8…21226c Dummy {f00=0x00a8, f01=0x40c0, f02=» T W R T W T T AP T P P T P$ P U P H D ! W P P W +P 5P MP [P sP T P T !P %W 9P AP J }R T @ T mT q sWJ yT } W> , P R P W H D !` P Z
0x21226c…212400 Dummy {f00=0x00a8, f01=0x2008, f02=»
0x212400…212594 (5, 124) Opaque[0x194]
0x212594…212728 # DirEnt {nam=»DRDC15«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1518, f03=0x0000}
0x212594…212728 IdxSect {
0x212594…212728 f00 = 0x00a8 // 0x212594 @0x0
0x212594…212728 f01 = 0x002e // 0x212596 @0x2
0x212594…212728 gno = [ // 0x212598 @0x4
0x212594…212728 [0x00]: C0x00a8.0x3.0
0x212594…212728 [0x01]: C0x00a9.0x0.0
0x212594…212728 [0x02]: C0x00a9.0x1.0
0x212594…212728 [0x03]: C0x00a9.0x2.0
0x212594…212728 [0x04]: C0x00a9.0x3.0
0x212594…212728 [0x05]: C0x00aa.0x0.0
0x212594…212728 [0x06]: C0x00aa.0x1.0
0x212594…212728 [0x07]: C0x00aa.0x2.0
0x212594…212728 [0x08]: C0x00aa.0x3.0
0x212594…212728 [0x09]: C0x00ab.0x0.0
0x212594…212728 [0x0a]: C0x00ab.0x1.0
0x212594…212728 [0x0b]: C0x00ab.0x2.0
0x212594…212728 [0x0c]: C0x00ab.0x3.0
0x212594…212728 [0x0d]: C0x00ac.0x0.0
0x212594…212728 [0x0e]: C0x00ac.0x1.0
0x212594…212728 [0x0f]: C0x00ac.0x2.0
0x212594…212728 [0x10]: C0x00ac.0x3.0
0x212594…212728 [0x11]: C0x00ad.0x0.0
0x212594…212728 [0x12]: C0x00ad.0x1.0
0x212594…212728 [0x13]: C0x00ad.0x2.0
0x212594…212728 [0x14]: C0x00ad.0x3.0
0x212594…212728 [0x15]: C0x00ae.0x0.0
0x212594…212728 [0x16]: C0x00ae.0x1.0
0x212594…212728 ]
0x212594…212728 }
0x212728…2128bc Dummy {f00=0x00a8, f01=0x0190, f02=» 2 P IDENT DRDC15 PRR 10.0 80-05-07 870105041000 P : P =11, DC:MIN HEADER LENGTH B P REL 10.1 80-01-25 f P =10,WRONG LABEL IF SALCUZ P REL 10.1 79-12-04 & P =9, OLLES POWER UP+MODEM NOT OP P REL 10.1 79-10-26 P
0x2128bc…212a50 Dummy {f00=0x00a8, f01=0x0190, f02=» ACK IN CONVERSATIONAL MODE P REL 9.1 79-07-19 $ * P =6, DCTASK BUFFER ADDRESS DESTROYED @ P REL 9.1 79-05-23 n $ P =5, INCOMPLETE POLL SEQUENCE P REL 9.1 79-05-23 P =3, TRANSFER PARAMETER P PRR 9.1 79-04-06
0x212a50…212be4 Dummy {f00=0x00a8, f01=0x0190, f02=»TRUCTION P PRR 9.1 78-11-14 P REL 8.2 78-11-14 , P H P* P P* Z 2 P********************************************* d P* $ P* PHILIPS TERMINAL SYSTEM PTS P* * P* DRDC15: DRIVER DATA COMMUNICATION . P*
0x212be4…212d78 Dummy {f00=0x00a8, f01=0x0190, f02=»************************************************ P EJECT 8 P* F P* P P* ENTRY POINTS Z P* p 2 P ENTRY DC15AD ADDRESS BLOCK TERMINAL REQUESTS z " P ENTRY IH1501 INPUT INTERRUPT " P ENTRY IH1502 OUTPUT INTERRUPT " P ENTRY DC15O
0x212d78…212f0c Dummy {f00=0x00a8, f01=0x0190, f02=»XTRN TDISP DISPATCHER ENTRY ( P EXTRN SAVE8 SAVE A1-A8 ON A15 STACK $ $ P EXTRN TENDIO COMPLETE I/O EVENT P P EXTRN DISIOE REQUEST ERROR x P EXTRN SETIME SET TIMER P EXTRN DWTST DWT STATUS P EXTRN DWTOR DWT ORDER P EXTRN DWTECB
0x212f0c…2130a0 Dummy {f00=0x00a8, f01=0x0190, f02=»TABLE r $ P EXTRN ECBBA ECB BUFFER ADDRESS & P EXTRN ECBRL ECB REQUESTED LENGTH 6 & P EXTRN ECBEL ECB EFFECTIVE LENGTH ` P EXTRN ECBRC ECB RETURN CODE " P EXTRN ECBCW ECB CONTROL WORD * P EXTRN DC:MIN MOVE DATA TO USER BUFFER , P EXTRN
0x2130a0…213234 (5, 125) Dummy {f00=0x00a9, f01=0x0190, f02=» P EJECT P* P* P* & P* 0 6 P* STANDARD INTERFACE PART FOR DATA COMMUNICATION : P* t P* ~ P* P* P* DWT CONTENTS P* J P* DWTCHP TERMINAL ADDRESS AS GIVEN AT PARAMETER TRANSFER (BIT #08-#15)
0x213234…2133c8 Dummy {f00=0x00a9, f01=0x018e, f02=»Y l P* P* & PX:A EQU 2000 RECEIVE BUFFER LENGTH PRBUFL EQU X:A H PX:B EQU /60 DCTASK FILE CODE ^ PDC15FC EQU /60 $ PX:C EQU 1 IF 1 INTERRUPT LOGGING PLOGG EQU X:C " PX:D EQU 600 POLL TIMEOUT VALUE PTIMPOL EQU X:D
0x2133c8…21355c Dummy {f00=0x00a9, f01=0x0190, f02=» & PX:G EQU 254 TRANSMIT BLOCK LENGTH PTBLEN EQU X:G . ( PX:H EQU 0 CODE , 0=ASCII , 1=EBCDIC D PCODE EQU X:H p * PX:I EQU 0 IF 1 SPECIFIC POLL HANDLING PSPECP EQU X:I , PX:J EQU 1 IF = 1 LINE SPEED SET TO HIGH ( P IF = 0 LINE
0x21355c…2136f0 Dummy {f00=0x00a9, f01=0x0190, f02=»RECEIVE BUFFERS (2-5) | PRBUFNR EQU X:L . PX:M EQU 1 IF = 1 PTS 6805 ADAPTION SALCUZ 4 PP6805 EQU X:M f PX:N EQU /02 | P IFT P6805=0 , PLCUIN EQU X:N DEVICE ADDRESS OF RECEIVER P XIF P IFT P6805=1 , PLCUIN EQU /0A DEVICE
0x2136f0…213884 Dummy {f00=0x00a9, f01=0x0190, f02=»NG TO DC TASK t PMESPAS EQU X:P 4 PX:Q EQU 0 IBM-3270 EMULATION PACKAGE, IF NOT = 0 , PEM3270 EQU X:Q d PX:R EQU 1000 z $ PTBUFL EQU X:R MMU BUFFER LENGTH * PBINTRM EQU 0 IF 1 BINARY TRANSMISSION , PTSTREQ EQU 0 IF 1 TEST REQUEST HANDL
0x213884…213a18 Dummy {f00=0x00a9, f01=0x018e, f02=»CK RESPONSE TO A SELECT | 0 P SEQUENCE, NOWACK SHOULD BE SET TO "ONE". , P ONLY WORKING IF STAT IS SET TO "ONE". T P IFT P6805=0 SALCUZ < PLCUUT EQU LCUIN+/10 DEVICE ADDRESS OF TRANSMITTER SALCUZ P XIF SALCUZ P IFT P6805=1 <
0x213a18…213bac Dummy {f00=0x00a9, f01=0x018e, f02=» P EJECT P* P* . P***************************************** * P* P* CONDITIONAL ASSEMBLY f P* . P***************************************** P* . P* A PROGRAM VERSION USING TOSS MMU PAGING * P* IS OBTAINE
0x213bac…213d40 Dummy {f00=0x00a9, f01=0x0190, f02=» . P* SET IS OBTAINED BY SETTING CPU852 EQU 0. P* : PCPU852 EQU 1 D P* X 2 PDEVIND EQU -2 DEVICE INDEX DATA COMMUNICATION b * PBUFLEN EQU TBUFL+TBUFL MMU BUFFER SIZE P* P EJECT P* P* DWT DISPLACEMENTS P*
0x213d40…213ed4 (5, 126) Dummy {f00=0x00a9, f01=0x0190, f02=» IFT MMUPAG=1 PSTART EQU DWTDRD+4 P XIF 0 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+/06 RECEIVE QUEUE . PDWTBUF
0x213ed4…214068 Dummy {f00=0x00a9, f01=0x0190, f02=»* P EJECT P* P* REQUEST HANDLING " P* < P* F P* P P* A7=ORDER Z P* l P* /02: READ v P* /06: WRITE P* /37: TRANSFER PARAMETERS P* /38: SET STATUS $ P* /39: SET REQUEST TIMEOUT VALUE P*
0x214068…2141fc Dummy {f00=0x00a9, f01=0x0190, f02=»MENT STATUS v PDCSTCU DATA 0 CURRENT STATUS $ PDCWRQ DATA 0 WRITE REQUEST QUEUE 8 , PDCTPGP DATA 0 TIMER POINTER GENERAL POLL ` & PDCLCI DATA 0 DC UNIT INPUT STATUS P EJECT P* P* DC TASK ADDRESS BLOCK P* $ P DATA 0 INDI
0x2141fc…214390 Dummy {f00=0x00a9, f01=0x0190, f02=»DRESS t $ P DATA DCRBUF REC. BUFFER ANCHOR P DATA 6 HEADER LENGTH =11 6 P* X P* DRIVER ADDRESS BLOCK b P* P DATA BUFLEN MMU BUFFER SIZE P DATA DEVIND DEVICE INDEX ( PDC15AD DATA DCACT ACTIVATION ADDRESS 4 P DATA ABORT
0x214390…214524 Dummy {f00=0x00a9, f01=0x0190, f02=»SUBROUTINE STACK FOR INTERRUPTS PSTB RES 1 ( " P RES 1 AND FOR TRANSFER PARAM : PSTB2 RES 1 ` P r P IFT SPEED=1 z PLSPEED EQU /0200 P XIF P IFT SPEED=0 PLSPEED EQU 0 P XIF P EJECT P* P* $ P
0x214524…2146b8 Dummy {f00=0x00a9, f01=0x0190, f02=» A7,A7 =4 & P RF(Z) ANYMSG ANY MESSAGE ORDER =4 P XIF < P SUK A7,/02 H P RF(Z) DCRD READ SPECIFIC P SUK A7,/06-/02 ~ P RF(Z) DCWR P SUK A7,/37-/06 $ P RF(Z) DCTP TRANSFER PARAMETERS P IFF STAT=0 P SUK A7,/3
0x2146b8…21484c Dummy {f00=0x00a9, f01=0x0190, f02=»T=0 P SUK A7,/39-/37 $ P RF(Z) REQTIM SET REQUEST TIMER $ P XIF L P RF DCA100 X P EJECT j P* x P* P* ACTIVATION FROM DCTASK P* P* PDCACTD EQU * $ P SUR A1,A1 PRESET RETURN CODE =4 P IFT EM3270=
0x21484c…2149e0 Dummy {f00=0x00a9, f01=0x0190, f02=» SUK A7,/37-/02 $ P RF(E) DCTP TRANSFER PARAMETERS P @ PDCA100 EQU * REQUEST ERROR H P ABL DISIOE INVALID ORDER j P* P* P* READ FROM DCTASK P* P* P* REQUEST FROM DC-TASK P* COMPLETE WHEN: & P*
0x2149e0…214b74 (5, 127) Dummy {f00=0x00a9, f01=0x018e, f02=»AGE RECEIVED t PDCRTN EQU * P ABL TDISP GO TO DISPATCHER ( P IFT EM3270=1 =4 L P EJECT f . P***************************************** t P* P* ANY MESSAGE ORDER P* " P***************************** P 2 PAN
0x214b74…214d08 Dummy {f00=0x00a9, f01=0x0190, f02=» P EJECT P* P* P* TRANSFER PARAMETERS & P* D P* N > P* REQUEST FROM DC-TASK: TRANSFER TERMINAL COMPUTER ADDRESS X : P* FROM TERMINALS: TRANSFER TERMINAL ADDRESSES P* P* P IFF CODE=1 & PDCTP LD
0x214d08…214e9c Dummy {f00=0x00a9, f01=0x0190, f02=»CTP10 ( P LC A2,TASCII,A2 TRANSLATE TO ASCII P SLL A2,8 : PDCTP10 EQU * L $ P LC A3,ECBCW+1,A8 GET TCP OR DV ` P ANK A3,/FF ( P LC A2,TASCII,A3 TRANSLATE TO ASCII P XIF ( P STR A2,A6 SAVE IN FIRST WORD OF DWT P P
0x214e9c…215030 Dummy {f00=0x00a9, f01=0x0190, f02=»T A3,DWTCUR,A6 P XIF " P CWK A6,DW1500 DCTASK DWT ??? " 2 P RF(E) DCTP30 YES!!! SHOULD NOT BE IN DC:TAB H * P LD A1,DC:IN GET DC:TAB INPUT POINTER ~ * P CWK A1,DC:END TABLE ALREADY FULL ???? & P ABL(E) DISIOE YES!! REQUEST ERROR P EJE
0x215030…2151c4 Dummy {f00=0x00a9, f01=0x0190, f02=»4,2 ADDR. TO NEXT ENTRY =3 * P CW A4,DCTAB ALL ENTRIES CHECKED?? =3 " * P RF(E) DCTP25 YES.DWT NOT IN TABLE =3 P 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
0x2151c4…215358 Dummy {f00=0x00a9, f01=0x0190, f02=»TAB LENGTH t P IFT STAT=1 P LDK A1,4 DEVICE END & P ORS A1,DWTST,A6 B ( P CF A15,INSSQ INSERT IN STATUS QUEUE Z P XIF PDCTP30 EQU * P SUR A1,A1 RETURN CODE ::= 0 PENDIO EQU * $ P CF A15,TENDIO COMPLETE REQUEST P R
0x215358…2154ec Dummy {f00=0x00a9, f01=0x0190, f02=» v P* TIME OUT P* P* & PDCWR EQU * 0 P IFT MMUPAG=1 B $ P LD A1,ECBRL,A8 REQUESTED LENGTH X " P CWK A1,BUFLEN ILLEGAL LENGTH? P RF(G) IL:LEN YES!! P XIF P CF A15,TIMEWR SET TIMER P CF A15,INSWQ QUEUE REQUE
0x2154ec…215680 Dummy {f00=0x00a9, f01=0x018e, f02=» | P* TIME OUT P* P* & PDCRD EQU * 0 P LD A8,DWTECB,A6 GET ECB B . P LD A4,DWTRQ,A6 AND RECEIVE MESSAGE QUEUE b " P RF(Z) DCRD10 NOTHING IN QUEUE P P P ( P LDR* A2,A4 TAKE THE FIRST IN QUEUE P ST A2,DWT
0x215680…215814 (5, 128) Dummy {f00=0x00a9, f01=0x0190, f02=» * P CF A15,DC:MIN MOV DATA TO USER BUFFER P RB DCRTN 2 P D $ PDCRD10 CF A15,TIMERE START TIMER L P RB DCRTN t P EJECT P* P* P* SET STATUS P* P* P IFF STAT=0 PDCSS EQU * * P LD A1,ECBCW,A8 GE
0x215814…2159a8 Dummy {f00=0x00a9, f01=0x0190, f02=»DCTP30 COMPLETE REQUEST PDCSS20 EQU * P LD A1,DWTST,A6 4 P ANK A1,9 L ( P RB(Z) DCSS10 WACK HAS NOT BEEN SENT ^ PDCSS30 EQU * , P CF A15,INSSQ INSERT DWT IN STATUS QUEUE P LDK A1,4 SET DE P RB DCSS10 P XIF P EJE
0x2159a8…215b3c Dummy {f00=0x00a9, f01=0x0190, f02=»T VALUE z $ P ST A2,DWTTIM,A6 SAVE IT IN DWT P RB DCTP30 TENDIO & DISPATCH 8 P P* d ( P* ILLEGAL APPLICATION BUFFER SIZE n P* P 8 PIL:LEN LDKL A1,/8008 REQUEST ERROR + ILLEGAL LENGTH P ABL DISEND COMPLETE REQUEST
0x215b3c…215cd0 Dummy {f00=0x00a9, f01=0x018e, f02=»* PTIMERE EQU * ! P LDR A1,A6 ! . P LD A2,DWTTIM,A6 GET REQUEST TIMEOUT VALUE ! 0 P RF(Z) TIME10 NO TIMING ! b P ST A2,TIMERR ! P CF A15,SETIME ! P DATA TOUTRE ! PTIMERR DATA 0 ! ( P ST A4,DWTTP,A6 STORE TIMER POINTER ! PTIME
0x215cd0…215e64 Dummy {f00=0x00a9, f01=0x0190, f02=» P CM DWTTP,A6 " PTOUTR1 EQU * " " P LDK A1,/40 INDICATE TIME OUT " , $ PTOUTR2 RB ENDIO COMPLETE REQUEST " R P* " z P* WRITE TIMER=TIMWR " P* " PTIMEWR LDR A1,A6 " . P LD A2,DWTTIM,A6 GET REQUEST TIMEOUT VALUE " P RB(Z) TIME10 NO TIM
0x215e64…215ff8 Dummy {f00=0x00a9, f01=0x0190, f02=» EJECT " P* # P* TIMEOUT WRITE TIMER # P* # 6 PTOUTWR EQU * # @ P LDR A6,A1 FETCH DWT # T P CM DWTTP,A6 # p * P CF A15,REMOVW REMOVE FROM WRITE QUEUE # P* # & P* THIS INSTRUCTION DOES NOT BELONG # P* TO THE STANDARD INTERFACE #
0x215ff8…21618c Dummy {f00=0x00a9, f01=0x0190, f02=»FDWTUT # P* $ P* $ P RB TOUTR1 $ " P EJECT $ 4 P* $ B P* $ L P* STOP REQUEST TIMING $ V P* $ t & P* REMAINING TIME IS RETURNED IN A2 $ ~ P* $ P* $ PCTIME EQU * $ & P LD A2,DWTTP,A6 GET TIMER POINTER $ P RF(Z) CTIM10
0x21618c…216320 Dummy {f00=0x00a9, f01=0x0190, f02=» EQU * $ P RF GBUF10 % P EJECT % P* % . P* GET RECEIVE BUFFER % 8 P* % T $ P* CALLING SEQUENCE: CF A15,GRBUF % ^ P* A4=0 IF NO BUFFER IS FREE % & P* ELSE A4 CONTAINS BUFFER ADDRESS % P* A2 AND A3 ARE DESTROYED % P* % P* % (
0x216320…2164b4 (5, 129) Dummy {f00=0x00aa, f01=0x0190, f02=» BUFFER FROM FREE CHAIN % ~ P STR A3,A2 & * PGBUF10 ADKL A15,4 ADJUST STACK POINTER & 2 P ABR* A15 RETURN TO CALLER & ` P EJECT & P* & P* & ( P* INSERT DWT IN WRITE REQUEST QUEUE & P* & P* A2,A3,A4 DESTROYED & P* A6=DWT & P*
0x2164b4…216648 Dummy {f00=0x00aa, f01=0x0190, f02=»ND & r P LDR A2,A3 ' P RB INSWQ2 ' PINSWQ3 ADR A4,A6 ' . P STR A4,A2 INSERT IN QUEUE ' F " P CMR A4 INDICATE END OF QUEUE ' h P RB GBUF10 RETURN ' P* ' P* ' * P* REMOVE DWT FROM WRITE REQUEST QUEUE ' P* ' P* A2,A3,A4 DESTROYED
0x216648…2167dc Dummy {f00=0x00aa, f01=0x0190, f02=»M06 EQU * ' P ADR A4,A6 ( PREM10 LDR* A3,A2 ( & & P RB(Z) GBUF10 NOT ON QUEUE: RETURN ( > P CWR A3,A4 ( h P RF(E) REM15 ( z P LDR A2,A3 GET NEXT ( P RB REM10 ( PREM15 LDR* A3,A4 REMOVE ( P STR A3,A2 ( P RB GBUF10 RETURN ( P
0x2167dc…216970 Dummy {f00=0x00aa, f01=0x018e, f02=» ( P* ) ( PINSSQ LDKL A2,DCSTQ GET QUEUE ANCHOR ) P LDK A4,DWTSQ ) > P RB INSWQ2 ) T P* ) f P* ) p " P* REMOVE DWT FROM STATUS QUEUE ) z P* ) P* A2,A3,A4 DESTROYED ) P* A6=DWT ) P* ) * PREMOVS LDKL A2,DCSTQ GET QUEUE ANCHOR )
0x216970…216b04 Dummy {f00=0x00aa, f01=0x0190, f02=» ) P* A4=BUFFER ADDR * P* A2,A3 DESTROYED * P* * : PQRBUF EQU * * D P IFT MESPAS=1 * X ( P LDKL A2,DW1500 QUEUE ON DC-TASK DWT * n P XIF * P IFT MESPAS=0 * $ P LDR A2,A6 QUEUE ON TERMINAL DWT * P XIF * , P ADK A2,DWTRQ BEGINNING
0x216b04…216c98 Dummy {f00=0x00aa, f01=0x018e, f02=» & PQR200 STR A4,A2 INSERT INTO QUEUE + " P CMR A4 INDICATE END OF QUEUE + . P RTN A5 + T P EJECT + d P* + r P* + | 2 P* CHECK IF UNEXPECTED MESSAGE OR STATUS CHANGE + P* + 4 P* REGISTERS A1,A2,A3,A4,A6 AND A8 ARE DESTROYED + P* + P
0x216c98…216e2c Dummy {f00=0x00aa, f01=0x0190, f02=» + ~ P RF(NE) CKM110 NO , $ P LD A8,DWTECB,A6 ECB ADDR TO A8 , " * P LD A3,DWTRQ,A6 A3=ADDR TO READ QUEUE , J " P RF(Z) CKM200 NO READ IN QUEUE , x P , P , , P LDR* A2,A3 A2=ADDR TO NEXT READ BUFFER , . P ST A2,DWTRQ,A6 STORE THIS ADDR INTO QUEUE
0x216e2c…216fc0 Dummy {f00=0x00aa, f01=0x018e, f02=»S OF CHARACTERS , t P LD A4,-2,A3 - . P ST A4,ECBCW,A8 STORE LINE DEVICE ADDRESS - , P - ^ P LDK A1,0 RESET RETURN CODE - f & P LDR A4,A3 RECEIVE BUFFER ADDRESS - , P CF A15,DC:MIN MOVE DATA TO USER BUFFER - * PCKM110 ADKL A15,4 ADJUST STACK POINT
0x216fc0…217154 (5, 130) Dummy {f00=0x00aa, f01=0x0190, f02=» - f P CW A1,DCSTOL . P ST A1,DCSTOL . & P RB(E) CKM110 NO CHANGE OF STATUS . 4 * P ORKL A1,/2000 INDICATE STATUS CHANGE . ^ 0 P CF A15,TENDIO COMPLETE READ GENERAL REQUEST . P RB CKM110 . P EJECT . P . @ P********************************
0x217154…2172e8 Dummy {f00=0x00aa, f01=0x0190, f02=»TTP,A6 TIMER POINTER . " P RF(Z) AB:10 NO TIMER RUNNING / P CM* DWTTP,A6 KILL TIMER / B P CM DWTTP,A6 / b P / v $ PAB:10 LD A1,DWTOR,A6 ORDER CODE / ~ P SUK A1,2 / * P RF(Z) AB:RTN READ REQUEST. NO ACTION / P SUK A1,4 / . P RF(NZ) AB:RTN N
0x2172e8…21747c Dummy {f00=0x00aa, f01=0x0190, f02=»WR A2,A6 / P RF(NE) AB:RTN NOT THIS DWT 0 P CM XACK RESET ACK EXPECTED 0 4 P CM FDWTUT RESET WRITING DWT 0 X 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 XIF 0 P IFF CPU852=1 0
0x21747c…217610 Dummy {f00=0x00aa, f01=0x0190, f02=»: CF A15,STREG 0 ~ P* 1 P* RESTORE 1 $ P* CALLING SEQUENCE: CF A15,LDREG 1 2 P* 1 Z P* 1 d PSTREG ST A3,LCA3 1 n P ST A4,LCA4 1 P ST A5,LCA5 1 P ST A6,LCA6 1 P ST A7,LCA7 1 P ST A8,LCA8 1 P RF RTNA15 RETURN 1 P EJE
0x217610…2177a4 Dummy {f00=0x00aa, f01=0x018e, f02=»A6,0 1 PLCA6 EQU *-2 2 P LDKL A7,0 2 PLCA7 EQU *-2 2 2 P LDKL A8,0 2 F PLCA8 EQU *-2 2 X PRTNA15 EQU * 2 l P ADKL A15,4 2 P ABR* A15 2 P EJECT 2 P* 2 P* 2 P* TIMER VALUES 2 P* 2 P* 2 ( PTIMPRO EQU 30 PROCEDUR
0x2177a4…217938 Dummy {f00=0x00aa, f01=0x0190, f02=» 2 PSTX EQU /02 3 PETX EQU /03 3 PETB EQU /17 3 0 PITB EQU /1F 3 D PSOH EQU /01 3 X PENQ EQU /05 3 l PDLE EQU /10 3 PEOT EQU /04 3 PNAK EQU /15 3 PESC EQU /1B 3 PSBA EQU /11 3 PGP EQU /22 3 PRDBCOM EQU /32 3
0x217938…217acc Dummy {f00=0x00aa, f01=0x0190, f02=»1 3 P IFT MSV1=0 4 PWACK EQU /3B 4 P XIF 4 2 P IFT CODE=0 4 > P IFT MSV1=1 4 R 0 PWACK EQU /BF =WABT - SIEMENS MSV1 PROCEDURE 4 f P XIF 4 P IFT CODE=1 4 PPAR EQU /00 4 PWACK EQU /2C 4 PRVI EQU /40 4 PACK0 EQU /18 4
0x217acc…217c60 Dummy {f00=0x00aa, f01=0x018e, f02=»PROCEDURE WORK AREAS 4 P* 5 P* 5 & * PFDWTIN RES 1 CURRENT DWT FOR RECEPTION 5 0 . PFDWTUT RES 1 CURRENT DWT FOR TRANSMISSION 5 ^ PXACK DATA 0 ACK EXPECTED 5 PXSEL DATA 0 SELECTED 5 PXETX DATA 0 ETX SENT 5 2 PXSTA DATA 0 STATUS SENT / MESSAG
0x217c60…217df4 (5, 131) Dummy {f00=0x00aa, f01=0x0190, f02=» & PTPM DATA 0 IF =1 TRANSPARENT TEXT 6 P* 6 . PFECB RES 1 WRITING ECB 6 8 ( PFECBBA RES 1 WRITING BUFFER ADDRESS 6 V & PFECBRL RES 1 WRITING BUFFER LENGTH 6 PFBAX DATA 0 BUFFER INDEX 6 0 PFBLST DATA 0 START OF LAST TRANSMITTED BLOCK 6 $ PDCSTQ DA
0x217df4…217f88 Dummy {f00=0x00aa, f01=0x0190, f02=» P* 7 $ P* 3270 SENSE/STATUS INFORMATION 7 P* 7 6 P* 7 @ P IFF STAT=0 7 J . PSSTAB EQU * S/S 0 : NO STATUS,DB,DE,DB+DE 7 ^ P* 7 P* 7 P DATA /4248 7 P DATA /4242 7 P* 7 2 PNOIR EQU /20 S/S 1 : NO INTERVENTION REQUIRED 7
0x217f88…21811c Dummy {f00=0x00aa, f01=0x0190, f02=» 7 j P* 8 P IFT CODE=0 8 PSYNC EQU /16 8 & P XIF 8 : P IFT CODE=1 8 F PSYNC EQU /32 8 Z P XIF 8 n P IFT P6805=0 8 z PCBCARR EQU /100+LSPEED 8 P XIF 8 P IFT P6805=1 8 PCBSTOP EQU /00 8 P IFT CODE=0 8 PPARITY EQU /0C 8
0x21811c…2182b0 Dummy {f00=0x00aa, f01=0x018e, f02=»ROL UNIT SST STATUS BITS 8 P* 9 PSBNOOP EQU /01 NOT OPERABLE 9 * $ PSBTHRU EQU /02 THROUGHPUT ERROR 9 N PSBCARR EQU /20 CARRIER OFF 9 v P IFT P6805=0 9 & PSBERR EQU /23 SBNOOP+SBTHRU+SBCARR 9 P XIF 9 P IFT P6805=1 9 PSBPARI EQU /04 9
0x2182b0…218444 Dummy {f00=0x00aa, f01=0x0190, f02=» " P* ENTERED EVERY TIME A MESSAGE : & P* IS EXPECTED FROM THE MASTER SIDE : * P* : T P* : ^ PBRM EQU * : h P LDKL A5,STB LOAD STACKBASE : z P CM SYNSW CLEAR SYN-SWITCH : " P CM TPM CLEAR TRANSPARENT TEXT : , P CF A5,CSYNCI START INPUT WITH SYN
0x218444…2185d8 Dummy {f00=0x00aa, f01=0x0190, f02=»* CHECK IF IT IS A CONTROL CHARACTER : P* ; . P LDR A1,A2 ; 8 P SUK A1,STX ; J P RF(Z) BRM300 STX RECEIVED ; ^ 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,DLE-ENQ ;
0x2185d8…21876c Dummy {f00=0x00aa, f01=0x0190, f02=»* CHECK IF IT IS A POLL OR A SELECT SEQUENCE ; P* < 6 P IFT MSV1=0 < @ P LDR A8,A2 < T P CF A5,READP READ CHARACTER < f P CWR A2,A8 < $ P RF(NE) BRM150 INVALID SEQUENCE < P XIF < P LDK A3,0 < P CC A2,DW1500+1 < P RF(E) BRM110
0x21876c…218900 Dummy {f00=0x00aa, f01=0x0190, f02=»ST STA < | P RB(NZ) BRM PARITY ERROR = P LDR A8,A2 = . P IFT MSV1=0 = @ P CF A5,READP READ 2:ND STA = T P CWR A2,A8 = v $ P RF(NE) BRM150 INVALID SEQUENCE = P XIF = P CF A5,READP READ ENQ = P SUK A2,ENQ = $ P RF(NE) BRM150 INVALID SEQ
0x218900…218a94 (5, 132) Dummy {f00=0x00aa, f01=0x0190, f02=» 0 P* CHECK IF IT IS A SELECT OR A POLL ADDRESS > P* > 8 P LDK A1,1 > B P ST A1,CACK LOAD ACK-COUNTER > T P LDR A2,A8 > x P SUK A3,2 > P RF(Z) BRM120 SELECTING > P* > P* > P* POLLING > P* > P CWK A8,GP > P ABL(E) GP
0x218a94…218c28 Dummy {f00=0x00aa, f01=0x0190, f02=»FIC POLL > | P RB BRM INVALID POLL ? P* ? , P* ? 6 P* SELECTING ? @ P* ? T PBRM120 EQU * ? ^ & P CF A5,FINTER CHECK IF STA PRESENT ? r P LDR A6,A3 LOAD DWT TO A6 ? P RF(NZ) BRM130 STA FOUND ? P IFT MSV1=1 ? P RB BRM INVALID ADDRES
0x218c28…218dbc Dummy {f00=0x00aa, f01=0x0190, f02=»JECT ? P* @ P* @ P* THROUGHPUT ERROR @ P* @ < PBRM140 EQU * @ F ( P CM XSTA INDICATE "INVALID MESSAGE" @ Z & P LDKL A5,STB LOAD STACKBASE TO A5 @ , P CF A5,CSYNCI START INPUT WITH SYNC DEF @ P* @ P* @ $ P* WAIT FOR MARK HOL
0x218dbc…218f50 Dummy {f00=0x00aa, f01=0x0190, f02=» RF(NZ) BRM160 YES @ P ANK A2,/7F A P SUK A2,/7F A . P RB(NZ) BRM150 NO A B PBRM160 EQU * A P CF A5,CHALTI HALT INPUT A p P RB BRM A P EJECT A P* A P* A P* EOT HAS BEEN RECEIVED A P* A P* A PBRM200 EQU * A &
0x218f50…2190e4 Dummy {f00=0x00aa, f01=0x0190, f02=» BRM220 ACK IS NOT EXPECTED A " P LD A6,FDWTUT GET WRITING DWT B $ P RF(Z) BRM210 NO ONE WRITING B J P LDK A1,2 SET RC=2 B n ( P CF A5,CWRITE COMPLETE WRITE REQUEST B PBRM210 EQU * B " P CM XACK RESET 'ACK EXPECTED' B PBRM220 EQU * B P CM XS
0x2190e4…219278 Dummy {f00=0x00aa, f01=0x0190, f02=» EQU * B P CF A5,HPTIM C P IFT TPMODE=1 C " P RB BRM150 INVALID SEQENCE C 8 PBRM302 EQU * C Z P XIF C n P LD A1,XSEL C z P RF(Z) BRM315 NOT SELECTED C P LD A1,DCRBUF C ( P*********************CHAINED COMMAND C & P RB(Z) BRM150 NO BUFFE
0x219278…21940c Dummy {f00=0x00aa, f01=0x018e, f02=» MESSAGE OK C PBRM310 EQU * D ( P CM XSTA INDICATE 'INVALID MESSAGE' D ( PBRM312 EQU * D T P CF A5,TRNAK SEND NAK D h P ABL BRM D PBRM315 EQU * D P IFT RCOM=1 D P LD A1,XACK D & P RF(Z) BRM316 ACK IS NOT EXPECTED D P LD A1,DCRBU
0x21940c…2195a0 Dummy {f00=0x00aa, f01=0x0190, f02=» D b P LDR* A2,A6 GET STA E P XIF E $ P IFT RCOM=1 E 0 , P CF A5,PRREC PREPARE FOR TEXT RECEPTION E D P LDK A1,0 SET RC=0 E t ( P CF A5,CWRITE COMPLETE WRITE REQUEST E P CM CACK PRESET ACK-1 =7 E P RB BRM305 READ THE MESSAGE E P XIF E (
0x2195a0…219734 (5, 133) Dummy {f00=0x00ab, f01=0x0190, f02=» SUK A2,ENQ =8 E P XIF =8 F ( P RB(Z) BRM312 FORWARD ABORT SEQUENCE F * P RB BRM220 F V PBRM320 EQU * F h P IM XSTA INDICATE MESSAGE OK F | $ P LD A4,DCRBUF GET BUFFER ADDRESS F P ADK A4,6 F P CW A4,FBLST F " P RF(NE) BRM325 NOT FIRST B
0x219734…2198c8 Dummy {f00=0x00ab, f01=0x0190, f02=»ET COMMAND CODE F P SUK A4,1 G P SUK A1,RDBCOM G * ( P RF(Z) RDBUF READ MODIFIED RECEIVED G @ P SUK A1,RDMCOM-RDBCOM G l & P RF(Z) RDMOD READ BUFFER RECEIVED G P XIF G PBRM325 EQU * G P SUK A7,1 G & P RF(Z) BRM340 MESSAGE ENDED BY ETB
0x2198c8…219a5c Dummy {f00=0x00ab, f01=0x018e, f02=»PREPARE FOR CHAINED COMMAND G P* H $ P IFT RCOM=1 H . P LDR* A2,A6 H B P LC A2,TEBCDIC,A2 H V P LD A1,DCRBUF H p P RF(Z) BRM326 H P ST A2,+4,A1 H P XIF H PBRM326 EQU * H P CWK A6,DW1500 H , P RF(E) BRM330 MESSAGE IS MENT FOR
0x219a5c…219bf0 Dummy {f00=0x00ab, f01=0x0190, f02=» & P RF(Z) BRM327 ANY MESSAGE ORDER =4 I P XIF =4 I . P LDK A2,2 I @ P CW A2,DWTOR,A6 I R " P RF(NE) BRM330 NO READ REQUEST I j PBRM327 EQU * I P LDK A1,0 SET RC=0 I $ P LD A8,DWTECB,A6 GET ECB ADDRESS I P LD A3,-4,A4 GET LENGTH I * P S
0x219bf0…219d84 Dummy {f00=0x00ab, f01=0x0190, f02=» I P* J P* J 0 P* CHECK IF START PRINTER BIT SET IN CCC/WCC J P* J P P* J Z P IFT STAT=1 J d P LC A2,+2,A4 GET WCC/CCC J x P ANK A2,/FF J P LC A2,TEBCDI,A2 TRANSLATE J P ANK A2,8 J P RF(Z) BRM328 J P LD A2,DWTST,A6 GE
0x219d84…219f18 Dummy {f00=0x00ab, f01=0x018e, f02=»R =4 J | , P RF(NZ) BRM329 NOT ANY MESSAGE ORDER =4 K & P SUK A4,6 ADJUST BUFFER ADDRESS =4 K < ( P CF A5,QRBUF QUEUE MESSAGE ON DWT =4 K f P RF BRM32A =4 K P XIF =4 K PBRM329 EQU * =4 K P K P LDK A1,0 RESET RETURN CODE K & P CF A15,DC:M
0x219f18…21a0ac Dummy {f00=0x00ab, f01=0x0190, f02=» P EJECT L PBRM330 EQU * L P IFT EM3270=1 =4 L & P LD A1,DWTST,A6 STATUS =4 L @ P RF(N) BRM335 NO REQUEST =4 L b P LD A1,DWTOR,A6 ORDER =4 L , P RF(NZ) BRM335 NOT ANY MESSAGE ORDER =4 L & P CF A15,TENDIO COMPLETE REQUEST =4 L PBRM335 E
0x21a0ac…21a240 Dummy {f00=0x00ab, f01=0x0190, f02=»DCTASK READ IF ANY L x PBRM340 EQU * M P CF A5,TRACK SEND ACK 0/1 M . P ABL BRM M P PBRM345 EQU * M ` P IFT STAT=1 M t P LD A1,DWTST,A6 M P ANK A1,8 M $ P RB(Z) BRM340 ACK SHOULD BE SENT M P CF A5,TRWACK SEND WACK M P RF BRM410 M
0x21a240…21a3d4 (5, 134) Dummy {f00=0x00ab, f01=0x0190, f02=»VED M l P* N P* N P IFF RCOM=0 N $ PRDBUF EQU * READ BUFFER COMMAND N 4 PRDMOD EQU * N " P CM XSEL RESET SELECT EXPECTED N p 4 P LD A6,FDWTIN DWT-ADDRESS FOR ADDRESSED TERMINAL N $ P LD A4,DWTBUF,A6 BUFFER ADDRESS N $ P SUK A4,2 SDJUST B
0x21a3d4…21a568 Dummy {f00=0x00ab, f01=0x0190, f02=»RS A1,CACK INCREMENT ACK COUNTER N P ABL POL127 O ( P XIF O < P EJECT O H P* O V P* O ` P* ENQ HAS BEEN RECEIVED O j P* O P* O PBRM400 EQU * O & P CF A5,HPTIM STOP PROCEDURE TIMER O P LD A1,XACK O , P RF(NZ) BRM510 RETRANSMI
0x21a568…21a6fc Dummy {f00=0x00ab, f01=0x0190, f02=»10 EQU * O P ABL BRM P P EJECT P P* P . P* P 8 P* NAK HAS BEEN RECEIVED P B P* P b P* P l PBRM500 EQU * P v & P CF A5,HPTIM STOP PROCEDURE TIMER P P LD A1,XACK P P RF(NZ) BRM510 ACK EXPECTED P P OR A1,XSEL P " P RB(Z) B
0x21a6fc…21a890 Dummy {f00=0x00ab, f01=0x0190, f02=»A P 0 P ABL(NZ) POL050 STATUS HAS BEEN TRANSMITTED Q P XIF Q > 0 P LD A1,FBLST GET START POINT FOR LAST BLOCK Q J & P SU A1,FECBBA COMPUTE BUFFER INDEX Q ~ P ST A1,FBAX Q P ABL POL130 Q P EJECT Q P* Q P* Q P* DLE HAS BEEN RECEIVE
0x21a890…21aa24 Dummy {f00=0x00ab, f01=0x0190, f02=»FT TPMODE=1 Q P CF A5,READ R P CWK A2,STX R ( * P ABL(Z) BRM302 YES - TRANSPARENT TEXT R < P XIF R j P RB BRM410 R v PBRM605 EQU * R & P CF A5,READ READ SECOND CHARACTER R P IFF P6805=1 =8 R P CWK A2,ACK0+PAR R P XIF =8 R P
0x21aa24…21abb8 Dummy {f00=0x00ab, f01=0x018e, f02=»D A1,CACK GET ACKCOUNTER R P RF(Z) BRM630 ACK,0 EXPECTED S PBRM610 EQU * S D P CF A5,TRENQ SEND ENQ S X & P CF A5,SPTIM START PROCEDURE TIMER S v P RB BRM410 S PBRM620 EQU * S P CWK A2,ACK1 S P RF(NE) BRM650 S P* S P* ACK , 1 RECE
0x21abb8…21ad4c Dummy {f00=0x00ab, f01=0x0190, f02=» P RF(Z) BRM640 ETX NOT SENT T P EJECT T & P* T 4 , P* ACK HAS BEEN RECEIVED TO AN ETX BLOCK T > P* T n P LDK A1,0 SET RC=0 T x PBRM635 EQU * T P IFF STAT=0 T P LD A2,XSTA T . P RF(NZ) BRM670 STATUS HAS BEEN TRANSMITTED T P XIF T
0x21ad4c…21aee0 Dummy {f00=0x00ab, f01=0x0190, f02=»SET READ BUFFER T P XIF U P RB BRM410 U $ PBRM640 EQU * U 6 P LDK A1,1 U J & P XRS A1,CACK INCREMENT ACK COUNTER U P ABL POL130 U PBRM650 EQU * U P IFF P6805=1 =8 U P CWK A2,RVI+PAR U P XIF =8 U P IFT P6805=1 =8 U P
0x21aee0…21b074 (5, 135) Dummy {f00=0x00ab, f01=0x0190, f02=» U $ P RF(NZ) BRM660 ETX HAS BEEN SENT V P LDK A1,2 SET RC=2 V 0 P RB BRM635 V J PBRM660 EQU * V P LDK A1,0 SET RC=0 V p P RB BRM635 V P IFF STAT=0 V P EJECT V P* V P* V " P* STATUS HAS BEEN TRANSMITTED V P* V P* V
0x21b074…21b208 Dummy {f00=0x00ab, f01=0x0190, f02=»T' V v " P CM XACK CLEAR 'ACK EXPECTED' W P LD A1,DWTST,A6 GET STATUS W 0 P ANK A1,4 W R P RB(Z) BRM636 NOT DE W d P LDKL A1,/8000 W " P ANS A1,DWTST,A6 CLEAR STATUS W P RB BRM636 W P XIF W P EJECT W P* W P* W P* SELECT HAS
0x21b208…21b39c Dummy {f00=0x00ab, f01=0x018e, f02=» STAT=0 W P LD A1,DWTST,A6 GET STATUS X P LDR A3,A1 X 2 P ANK A1,1 X D $ P RF(Z) SEL110 NO PENDING STATUS X V P CF A5,TRRVI SEND RVI X ~ P XIF X P IFF STAT=1 X P RF SEL110 X P XIF X PSEL100 EQU * X P ABL BRM X PSEL110 EQU
0x21b39c…21b530 Dummy {f00=0x00ab, f01=0x018e, f02=» " P RF(Z) SEL111 DEVICE NOT BUSY Y P CF A5,TRWACK TRANSMIT WACK Y * P ABL BRM Y N PSEL111 EQU * Y ^ P XIF Y r P LD A1,DCRBUF Y ~ $ P RF(NZ) SEL120 BUFFER AVAILABLE Y PSEL115 EQU * Y P IFF STAT+NOWACK=2 Y P CF A5,TRWACK SEND WACK Y
0x21b530…21b6c4 Dummy {f00=0x00ab, f01=0x0190, f02=» P CF A5,TRACK SEND ACK,0 Z P RB SEL100 Z $ P EJECT Z 6 P* Z D P* Z N P* PREPARE FOR TEXT RECEPTION Z X 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,TEBCD
0x21b6c4…21b858 Dummy {f00=0x00ab, f01=0x0190, f02=» Z r P RTN A5 [ P EJECT [ 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
0x21b858…21b9ec Dummy {f00=0x00ab, 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
0x21b9ec…21bb80 Dummy {f00=0x00ab, 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
0x21bb80…21bd14 (5, 136) Dummy {f00=0x00ab, 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
0x21bd14…21bea8 Dummy {f00=0x00ab, 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 EJECT _ P* _ P* _ & P* SPECIFIC POLL HAS BEEN RECEIVED _ P* _ P* _ PSPOLL EQ
0x21bea8…21c03c Dummy {f00=0x00ab, f01=0x0190, f02=»IM CHECK POLLTIMER _ P LDR A6,A7 RESTORE A6 ` P IFT STAT=1 ` 8 P LD A1,DWTST,A6 GET STATUS ` L P ANK A1,7 ` n " 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
0x21c03c…21c1d0 Dummy {f00=0x00ab, f01=0x0190, f02=» P XIF a P RB POL115 SEND EOT a P EJECT a , P* a : P* a D 8 P* CHECK IF THERE IS A WRITE REQUEST TO BE COMPLETED a N 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
0x21c1d0…21c364 Dummy {f00=0x00ab, f01=0x0190, f02=»QUEST a z P SUK A2,2 b ( P RF(NZ) CWR900 NOT EXCHANGE REQUEST b P LDR A1,A1 b L 2 P RF(NZ) CWR100 TRANSMISSION ERROR, RC NOT ZERO b ^ 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
0x21c364…21c4f8 Dummy {f00=0x00ab, f01=0x0190, f02=»PLETE REQUEST b ~ PCWR150 EQU * c * P CF A15,REMOVW REMOVE FROM WRITE QUEUE c * PCWR200 EQU * c X PCWR900 EQU * c l " P CM XACK RESET 'ACK EXPECTED' c P CM FDWTUT c P RTN A5 c P EJECT c P* c P* c P* READ ONE TEXT BLOCK c P
0x21c4f8…21c68c Dummy {f00=0x00ab, f01=0x0190, f02=» ( P* 2 : IF CORRECT ETB BLOCK RECEIVED d P* d 0 PRDMESS EQU * d : $ P LD A4,DCRBUF GET BUFFER ADDRESS d N P ADK A4,6 RESERVE HEADER d v 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
0x21c68c…21c820 Dummy {f00=0x00ab, f01=0x0190, f02=» PRDM075 EQU * e P CM XSTA e P LDK A7,0 RESET LRC e ( P e D P IFT IBMCHR=1 e L P IFF TPMODE=1 e b P LD A1,FBAX e x " P RF(NZ) RDM100 NOT FIRST BLOCK e P CF A5,READP e P RF(NZ) RDM120 PARITY ERROR e P CWK A2,ESC e P RF(NE) RD
0x21c820…21c9b4 (5, 137) Dummy {f00=0x00ac, f01=0x018e, f02=»A5,READP READ ONE CHARACTER e P RF(NZ) RDM120 PARITY ERROR f $ PRDM110 EQU * f H P XIF f P IFT TPMODE=1 f h & P IM TPM INDICATE TRANSPARENT TEXT f ~ PRDM100 CF A5,READ f P CWK A2,DLE CHECK IF DLE f P RF(NE) RDM112 NO f 0 P CF A5,READ
0x21c9b4…21cb48 Dummy {f00=0x00ac, f01=0x0190, f02=» f r " P CWK A2,DLE CHECK IF 2:ND DLE g * P RF(E) RDM115 YES - STORE DLE AS DATA g . P CWK A2,ETX CHECK IF ETX g P RF(E) RDM130 YES g | P CWK A2,ETBEBC CHECK IF ETB g P RF(E) RDM160 YES g P CWK A2,ITB CHECK IF ITB g P RF(E) RDM175 YES g
0x21cb48…21ccdc Dummy {f00=0x00ac, f01=0x0190, f02=»05 EQU * g P CF A5,READ h P CWK A2,DLE h $ P RB(NE) RDM105 h 8 P CF A5,READ h N P CWK A2,ETX h b $ P RF(E) RDM110 YES - END OF BLOCK h v P CWK A2,ETBEBC h $ P RF(E) RDM110 YES - END OF BLOCK h P RB RDM105 h PRDM110 EQU * h $ P CM TP
0x21ccdc…21ce70 Dummy {f00=0x00ac, f01=0x0190, f02=» P XIF i P IFF TPMODE=1 i P CWK A2,ETX i & P RF(E) RDM130 ETX RECEIVED i : P CWK A2,ETB i P RF(E) RDM160 ETB RECEIVED i p P CWK A2,ITB i P RF(E) RDM170 ITB RECEIVED i P CWK A2,ENQ i 2 P RF(E) RDM120 SKIP IF ENQ EMBEDDED IN MESSAG
0x21ce70…21d004 Dummy {f00=0x00ac, f01=0x0190, f02=»A2 i P SUK A1,DC1+3 j P RF(P) RDM115 NOT DC1-DC3 j P ADK A1,3 j B P RF(N) RDM115 NOT DC1-DC3 j T P SLL A1,6 j v P LDR A8,A1 j * P CF A5,READP 8-BIT CHAR GET NEXT PART j P RF(NZ) RDM120 PARITY ERROR j * P SUK A2,/20 ASSEMBLE TO ONE
0x21d004…21d198 Dummy {f00=0x00ac, f01=0x018e, f02=»R j v $ P IM FBAX INCREMENT BUFFER INDEX k P LD A1,FBAX k 2 P CWK A1,RBUFL+RBUFL k F P RB(NG) RDM100 NOT OVERFLOW k b P IFT TPMODE=1 k P RF RDM135 k P XIF k P* k P* BUFFER OVERFLOW k P* k P RF RDM140 ABORT INPUT k PRD
0x21d198…21d32c Dummy {f00=0x00ac, f01=0x0190, f02=» P* l P* ETX RECEIVED l P* l $ PRDM130 EQU * l . $ P LD A1,DCRBUF GET BUFFER ADDRESS l B P LD A2,FBAX GET BUFFER INDEX l j 2 P ST A2,+2,A1 STORE EFFECTIVE LENGTH IN HEADER l P IFF CODE=1 l P CF A5,RDLRC l P RF(Z) RDM150 LRC WAS OK l
0x21d32c…21d4c0 Dummy {f00=0x00ac, f01=0x018e, f02=»CHECK IT l v P RF(E) RDM150 CRC WAS OK m P XIF m 0 P IFT TPMODE=1 m < $ PRDM135 CM TPM OUT OF TRANSP TEXT m R P XIF m z PRDM140 EQU * m & P LDK A3,1 INDICATE INVALID MESSAGE m PRDM150 EQU * m $ P LDR A7,A3 SAVE RESULT REGISTER m P CF A5,C
0x21d4c0…21d654 (5, 138) Dummy {f00=0x00ac, f01=0x0190, f02=» PRDM155 EQU * n P XIF n P RTN A5 n $ P* n 4 P* ETB RECEIVED n > P* n T PRDM160 EQU * n ^ P LDR A3,A3 n r " P RB(NZ) RDM130 ALREADY INVALID n " P LDK A3,2 INDICATE CORRECT ETB n P RB RDM130 n P* n P* ITB RECEIVED n P* n
0x21d654…21d7e8 Dummy {f00=0x00ac, f01=0x0190, f02=»F A5,RDCRC READ CRC AND CHECK IT n " P RB(NE) RDM120 CRC WAS NOT OK o ( P IFT TPMODE=1 o N * PRDM175 CM TPM OUT OF TRANSPARENT TEXT o d $ P CF A5,RDCRC READ AND CHECK CRC o P IM TPM o " P RB(NE) RDM105 CRC WAS NOT OK o PRDM180 CF A5,READ o
0x21d7e8…21d97c Dummy {f00=0x00ac, f01=0x0190, f02=»WK A2,STX o $ P RB(NE) RDM105 ILLEGAL CHARACTER p P XIF p : P RB RDM100 p F P EJECT p X P* p f P* TRANSMIT ACK 0 OR 1 p p P* p PTRACK LDK A2,1 p P LDK A3,ACK1 PRELOAD ACK1 p & P XRS A2,CACK INCREMENT ACK COUNTER p P RF(NZ) TRDLE
0x21d97c…21db10 Dummy {f00=0x00ac, f01=0x0190, f02=» RF TRDLE p P* q P* TRANSMIT RVI q P* q 2 P IFF STAT=0 q < PTRRVI LDK A3,RVI LOAD RVI q P P XIF q r P* q ~ P* TRANSMIT DLE q P* q PTRDLE LDK A2,DLE LOAD DLE q " P SC A2,RESEND PUT INSAVE AREA q P SC A3,RESEND+1 q P
0x21db10…21dca4 Dummy {f00=0x00ac, f01=0x0190, f02=»* TRANSMIT EOT q P* r PTREOT LDK A3,EOT LOAD EOT r P RF TREN10 r B P* r T P* TRANSMIT ENQ r ^ P* r t PTRENQ LDK A3,ENQ LOAD ENQ r ~ P* r ( PTREN10 SC A3,RESEND PUT IN SAVE AREA r P LDK A2,/FF r P SC A2,RESEND+1 r $ PTRREP
0x21dca4…21de38 Dummy {f00=0x00ac, f01=0x0190, f02=»CTER r r P CF A5,WRITEP SEND IT s PTRRE10 LDK A2,/FF s * P CF A5,WRIT05 SEND PAD s D P LDK A2,/FF s b P CF A5,WRIT05 s v P CF A5,CHALTO HALT OUTPUT s P IFF LOGG=0 s ( P CF A5,LOGSST LOG TRANSMITTER STATUS s P XIF s P RTN A5 s
0x21de38…21dfcc Dummy {f00=0x00ac, f01=0x0190, f02=» s v P IFF TPMODE=1 t P IFT TSTREQ=1 t P* t 4 P* t > P* TEST REQUEST HANDLING t H P* t h P* t r P LD A4,FBAX t | ( P RF(NZ) TRT050 NOT START OF MESSAGE t P t 2 P LD A1,XRB READ BUFFER COMMAND IN PROCESS ??? t P RF(NZ) TRT050
0x21dfcc…21e160 Dummy {f00=0x00ac, f01=0x0190, f02=» t p P LDK A2,SOH u P CF A5,WRITE SEND SOH u P LDK A7,0 RESET BCC u : P LDK A2,'%' u V P CF A5,WRITE SEND % u j P LDK A2,'/' u P CF A5,WRITE SEND / u P LDK A2,STX u P CF A5,WRITE SEND STX u ( P ST A4,FBLST REMEMBER START OF B
0x21e160…21e2f4 (5, 139) Dummy {f00=0x00ac, f01=0x0190, f02=» u PTRT050 EQU * v P* v P* v & P* v 0 P XIF v : P IFT TPMODE=1 v F P LDK A2,DLE v P CF A5,WRIDLE SEND DLE v p P XIF v P LDK A2,STX v P CF A5,WRITE SEND STX v P LDK A7,0 RESET LRC v $ P LD A4,FECBBA GET BUFFER ADDRESS
0x21e2f4…21e488 Dummy {f00=0x00ac, f01=0x0190, f02=» A3,0 RESET CHARACTER COUNTER v P LD A1,FBAX GET BUFFER INDEX w & " P RF(NZ) TRT100 NOT FIRST BLOCK w J P LC A2,DW1500+1 GET TCA w p P CF A5,WRITEP SEND TCA w P LDR* A2,A6 GET STA w P CF A5,WRITEP SEND STA w P IFT IBMCHR=1 w P IFF RCOM=
0x21e488…21e61c Dummy {f00=0x00ac, f01=0x0190, f02=»2,/20 w P CF A5,WRITEP x P XIF x $ P IFT RCOM=1 x 0 P x D & P LD A1,XRB READ BUFFER COMMAND ??? x L P RF(Z) TRT070 NO!! x v P x P ******************** x " P LDK A2,X'2D' AID FOR DISPLAY x PTRT060 CF A5,WRITEP SEND AID x P x $
0x21e61c…21e7b0 Dummy {f00=0x00ac, f01=0x0190, f02=» x PTRT070 EQU * y P XIF y P y ( P LDK A3,2 y 0 PTRT100 EQU * y B P IFT TPMODE=1 y V P IM TPM TRANSPARENT TEXT y l PTRT105 EQU * y P XIF y P LCR A2,A4 GET ONE CHARACTER y P ADK A4,1 INCREMENT POINTER y P ANK A2,/7F y P
0x21e7b0…21e944 Dummy {f00=0x00ac, f01=0x0190, f02=»******************** y h P* z , P* CHECK IF ATTRIBUTE CHARACTER OR NULL z & P* z V 4 P*********************************************** z ` P z & P CWK A2,X'20' ATTRIBUTE CHARACTER z P RF(L) TRT101 YES!!! z P XIF z P IFT DMRK=1 z P C
0x21e944…21ead8 Dummy {f00=0x00ac, f01=0x0190, f02=» z t " P RF(NE) TRT103 NO,GO TO TRT103 { P LDK A2,/19 { . PTRT103 EQU * { B P CWK A2,X'7F' NULL ?? { V P RF(NE) TRT105 { t P SUK A2,1 { P XIF { P IFT RCOM=1 { P RF TRT105 { P { PTRT101 EQU * { P { P LDK A2,SF { " P CF
0x21ead8…21ec6c Dummy {f00=0x00ac, f01=0x018e, f02=»TRIBUTE { t P ANK A1,1 | P ANK A2,/1E MASK | " P SLL A2,1 | : & P ORR A2,A1 IBM ATTRIBUTE COMPOSED | L " P ORK A2,/40 BIT ALWAYS SET ONE | v P LC A2,TASCII,A2 | & P CWK A2,/18 CHECK SPECIAL ATTRIBUT | P RF(NE) TRT104 | P LDK A2,/30 | P
0x21ec6c…21ee00 Dummy {f00=0x00ac, f01=0x0190, f02=» P IFF TPMODE=1 } P CWK A2,/07 } ( P RF(L) TRT110 ILLEGAL CODE : SKIP IT } . P XIF } Z P CF A5,WRITEP SEND CHARACTER } f PTRT110 EQU * } $ P IM FBAX INCREMENT BUFFER INDEX } & P LD A1,FECBRL GET REQUESTED LENGTH } P CW A1,FBAX } " P RF(
0x21ee00…21ef94 (5, 140) Dummy {f00=0x00ac, f01=0x0190, f02=»5 NOT FULL BLOCK } P XIF ~ P RB(L) TRT100 NOT FULL BLOCK ~ $ P IFT RCOM=1 ~ H , P LDK A1,SBA CHECK IF SBA AT END OF BLOCK ~ P CC A1,-2,A4 ~ P RF(E) TRT115 YES ~ P CC A1,-1,A4 ~ P RF(NE) TRT116 NO SEND ETB ~ ( P LCR A2,A4 GET FIRST BYT
0x21ef94…21f128 Dummy {f00=0x00ac, f01=0x0190, f02=» SECOND BYTE AFTER SBA ~ | P CF A5,WRITEP SEND IT P IM FBAX INCREMENT INDEX < P XIF PTRT116 EQU * h P IFT TPMODE=1 | P LDK A2,DLE $ P CF A5,WRIDLE SEND AN EXTRA DLE P XIF P LDK A2,ETB LOAD ETB PTRT120 EQU *
0x21f128…21f2bc Dummy {f00=0x00ac, f01=0x0190, f02=»RITEP SEND LRC P XIF P IFT CODE=1 " P LDR A8,A7 SAVE CURRENT CRC 6 P LDR A2,A7 Z P ANK A2,/FF l " P CF A5,WRIT05 SEND CRC BYTE 1 P ECR A2,A8 P ANK A2,/FF " P CF A5,WRIT05 SEND CRC BYTE 2 P XIF P ABL TRRE1
0x21f2bc…21f450 Dummy {f00=0x00ac, f01=0x018e, f02=» $ P CF A5,WRIDLE SEND AN EXTRA DLE P XIF , P LDK A2,ETX LOAD ETX 8 P RB TRT120 SEND ETX AND LRC T P EJECT x P* P* P* TRANSMIT STATUS MESSAGE P* P* P IFF STAT=0 PTRSTA EQU * $ P IM XSTA INDICAT
0x21f450…21f5e4 Dummy {f00=0x00ac, f01=0x0190, f02=» P LDK A7,0 REST LRC P LDK A2,'%' P CF A5,WRITEP SEND '%' 2 P LDK A2,'R' P P CF A5,WRITEP SEND 'R' d P LDK A2,STX P CF A5,WRITE SEND STX P LC A2,DW1500+1 P CF A5,WRITEP SEND TCA P LDR* A2,A6 P CF A5,WRI
0x21f5e4…21f778 Dummy {f00=0x00ac, f01=0x0190, f02=»E r P CF A5,WRITEP SEND S/S 0 P LDK A2,NOIR PRELOAD S/S 1 * P LD A1,DWTST,A6 GET STATUS L P ANK A1,5 n P RF(Z) TRST10 NOT 'IR' P ANK A1,4 P RF(NZ) TRST10 NO IR IF DE P LDK A2,IR PTRST10 EQU * P CF A5,WRITEP SE
0x21f778…21f90c Dummy {f00=0x00ac, f01=0x0190, f02=» P* PTRSYNC EQU * ( P CF A5,CHALTI HALT INPUT IF NOT DONE " , P CF A5,CSYNCO START OUTPUT WITH SYNC DEF N * P CF A5,READ WAIT FOR OUTPUT INTERRUPT ~ P* P* P* SEND 4 SYN-CHARACTERS P* P LDK A3,4 PTRS100 EQU *
0x21f90c…21faa0 Dummy {f00=0x00ac, f01=0x0190, f02=» EJECT P* P* 0 P* CSYNCI :SEND SYNC-PATTERN FOR INPUT DATA " P* V PCSYNCI EQU * ` P LD A2,PFPOST t $ P RF(NZ) CSYN:I WAIT FOR POWER UP P CF A5,CHALTI STOP INPUT & P ST A5,DCLCI SET INPUT ACTIVE FLAG P IFT P6805=1
0x21faa0…21fc34 (5, 141) Dummy {f00=0x00ad, f01=0x018e, f02=»LCUIN SEND INPUT SYNC-PATTERN TO LC P XIF , P IFT P6805=0 8 * P LDKL A2,CBCARR+SYNC DEF SYNC-PATTERN L 2 P CIO A2,1,LCUIN SEND INPUT SYNC-PATTERN TO LC z P XIF PCSYN:I EQU * P RTN A5 RETURN TO CALLER P EJECT P* P
0x21fc34…21fdc8 Dummy {f00=0x00ad, f01=0x0190, f02=» P XIF P CIO A2,0,LCUIN HALT INPUT & P CM DCLCI CLEAR INPUT ACTIVE FLAG 2 P SST A2,LCUIN READ STATUS P IFF LOGG=0 ~ $ P CF A5,LOGSST LOGG INPUT STATUS P XIF P RTN A5 RETURN TO CALLER P EJECT P* P* 0 P
0x21fdc8…21ff5c Dummy {f00=0x00ad, f01=0x0190, f02=» p P IFT P6805=1 * P LDK A2,PARITY CHAR PARITY CHECK BY CU P CIO A2,1,LCUUT CIO START J P RF(A) CSYNC1 ACCEPTED l $ P SST A2,LCUUT TRY TO READ STATUS * P ABL BRM NOT ACCEPTED TIMEOUT REQUEST PCSYNC1 EQU * " P LDK A2,SYNC DEF SYN
0x21ff5c…2200f0 Dummy {f00=0x00ad, f01=0x0190, f02=»IF PCSYN:O EQU * P RTN A5 RETURN TO CALLER P EJECT > P* L P* V $ P* CHALTO : HALT OUTPUT CHANNEL ` P* PCHALTO EQU * P IFT P6805=1 P LDK A2,CBSTOP STOP FUNCTION P XIF P CIO A2,0,LCUUT HALT OUTPUT
0x2200f0…220284 Dummy {f00=0x00ad, f01=0x0190, f02=» P EJECT P* P* P* RECEIVER INTERRUPT & P* D P* N PIH1501 EQU * X P ST P,INTSAV l P IFT CPU852=1 P CF A15,SAVE8 SAVE A1-A8 P XIF P P IFF CPU852=1 P MSR 8,A15 SAVE A1-A8 =1 P XIF
0x220284…220418 Dummy {f00=0x00ad, f01=0x0190, f02=» LOGG=0 ( P CF A5,LOGIN LOG RECEIVED CHARACTER P XIF < P C2 TPM H 8 P RF(NZ) IHLC10 DO NOT SKIP SYNC IN TRANSPARENT TEXT X P C2 SYNSW 0 P RF(NZ) IHLC05 DO NOT SKIP SYNS IN BCC FRAME P CWK A2,SYNC P RF(E) READ PIHLC05
0x220418…2205ac Dummy {f00=0x00ad, f01=0x0190, f02=»C A2,TASCII,A2 TRANSLATE TO ASCII P XIF * PIHLC10 EQU * 6 P LDR A1,A2 J * P ORKL A1,/FF00 SET FLAG FOR CARRIER ON & P ST A1,DCLCI SET INPUT ACTIV FLAG P CM DCSTCU CLEAR SST SAVE PIHIN10 EQU * P RTN A5 RETURN TO CALLER
0x2205ac…220740 Dummy {f00=0x00ad, f01=0x0190, f02=»* P* PIH1502 EQU * P ST P,INTSAV ( P IFT CPU852=1 < P CF A15,SAVE8 SAVE A1 - A8 R P XIF t P P IFF CPU852=1 P MSR 8,A15 SAVE A1-A8 =1 P XIF * P CF A15,LDREG RESTORE DC REGS A3 - A8 P RB IHIN10
0x220740…2208d4 (5, 142) Dummy {f00=0x00ad, f01=0x0190, f02=»IT 13=PARITY ERROR (6805 ONLY) SALCUZ , P* BIT 14=THROUGHPUT ERROR . , P* BIT 15=MODEM NOT READY ^ P* PSST EQU * P SST A2,LCUIN GET STATUS P LDR A1,A2 P IFT LOGG=1 & P CF A5,LOGSST LOGG SST I
0x2208d4…220a68 Dummy {f00=0x00ad, f01=0x018e, f02=»S x * P RF(Z) SST125 INPUT NOT ACTIVE IGNORE ( P RF(N) SST100 INPUT ACTIVE WITH DATA 8 * P LDKL A2,CBCARR+SYNC DEF SYNC PATTERN d & P CIO A2,1,LCUIN START INPUT AGAIN $ P RF SST125 RETURN TO DISPATCHER P XIF P IFT P6805=1 P RF
0x220a68…220bfc Dummy {f00=0x00ad, f01=0x018e, f02=» 0 P RF(Z) SST125 NOT ACTIVE IGNORE CARRIER OFF P RF SST100 ACTIVE 8 PSST075 EQU * R P LDR A2,A1 f $ P ANK A2,SBTHRU THROUGHPUT ERROR x P ABL(NZ) BRM140 YES P* PSST100 EQU * P LDR A2,A1 P ANK A2,SBNOOP NOT OPRABLE
0x220bfc…220d90 Dummy {f00=0x00ad, f01=0x0190, f02=» $ P ABL TDISP RETURN TO DISPATCHER P* 0 PSST150 EQU * : P CF A15,LDREG LOAD REGISTERS N PSST200 EQU * r P LDR A2,A1 . P ANK A2,SBCARR CHECK STATUS IF CARRIER OFF P RF(Z) SST225 NO 4 P XRK A1,SBCARR CHECK STATUS IF ONLY CA
0x220d90…220f24 Dummy {f00=0x00ad, f01=0x0190, f02=» IF STATUS CHANGE | PSST250 EQU * P RTN A5 RETURN TO CALLER . P EJECT N P* P* f , P* WRITE FROM OR READ ONE CHARACTER TO A2 p P* P* PWRITE EQU * P IFT CODE=1 P C2 TPM & P RF(Z) WRIT02 NOT TRANSPAREN
0x220f24…2210b8 Dummy {f00=0x00ad, f01=0x0190, f02=»05 PWRIT02 EQU * P ANK A2,/FF P CWK A2,/FF 2 0 P RF(E) WRIT05 NO TRANSLATION OF TRAILING PAD F * P LC A2,TEBCDIC,A2 TRANSLATE TO EBCDIC z P XIF PWRIT05 EQU * " P OTR A2,0,LCUUT SEND CHARACTER P RF(A) WRIT10 P RF
0x2210b8…22124c Dummy {f00=0x00ad, f01=0x0190, f02=»RCCAL CALCULATE CRC P XIF PWRIT15 EQU * ( P IFF LOGG=0 < & P CF A5,LOGOUT LOG OUTPUT CHARACTER P P XIF z P* PREAD CF A15,STREG P ABL TDISP P IFT CODE=1 PWRIDLE EQU * P OTR A2,0,LCUUT " P RB(NA) READ
0x22124c…2213e0 Dummy {f00=0x00ad, f01=0x0190, f02=»PARITY ~ P* P* P IFT CODE+P6805=0 SALCUZ " PWRITEP ANK A2,/FF D P ECR A1,A2 ^ P ORK A2,/80 p PWRI100 SLL A1,1 P RB(P) WRI100 P RB(Z) WRITE WRITE P XRK A2,/80 P RB WRI100 P XIF P IFF CODE+
0x2213e0…221574 (5, 143) Dummy {f00=0x00ad, f01=0x0190, f02=» TO A2 AND CHECK PARITY ~ P* P* * PREADP CF A5,READ 4 P IFT CODE+P6805=0 SALCUZ L P ECR A1,A2 n PRE100 SLL A1,1 P RF(Z) RE110 P RB(NN) RE100 P XRK A2,/80 P RB RE100 PRE110 LDR A1,A2 P ANK A2,/7
0x221574…221708 Dummy {f00=0x00ad, f01=0x018e, f02=»0 P ABR* A5 P* P* $ P EJECT . P* < < P* FIND DWT CONTAINING SUBTERMINAL ADDRESS AS GIVEN IN A2 F P* $ P* CALLING SEQUENCE: CF A5,FINTER P* A2=SUBTERMINAL ADDRESS P* A4 DESTROYED " P* A3#0: DWT TO FOUND TERMI
0x221708…22189c Dummy {f00=0x00ad, f01=0x0190, f02=» , P* FINTEP - CHECK SPECIFIC POLL ADDRESS P* 4 . PRBYTE DATA 0 IF 1 COMPARE WITH RIGTH BYTE > P* p P* z PFINTEP EQU * P IFT MSV1=0 PFINTER EQU * P XIF P IM RBYTE P IFT MSV1=1 PFINTER EQU * P X
0x22189c…221a30 Dummy {f00=0x00ad, f01=0x0190, f02=»ULT VALUE P CW A4,DCTAB END OF TABLE ( P RF(E) FINT20 SUBTERMINAL NOT FOUND 4 P LDR* A3,A4 LOAD DWT ADDRESS ` P IFT MSV1=1 $ P AD A3,RBYTE CHOOSE ADDRESS TYPE * P CCR A2,A3 COMPARE SUBTERMINAL ADDRESS P XIF P IFT MSV1=0
0x221a30…221bc4 Dummy {f00=0x00ad, f01=0x0190, f02=»NKL A3,/FFFE P RTN A5 P EJECT $ P* 2 P* < P* POWER ON FUNCTIONS F P* b P* l PDC15ON EQU * v P IFT CPU852=1 P CF A15,SAVE8 SAVE A1-A8 P XIF P P IFF CPU852=1 P MSR 8,A15 SAVE A1-A8 =1
0x221bc4…221d58 Dummy {f00=0x00ad, f01=0x0190, f02=»DRDC05 SUK A1,2 P CW A1,DCTAB P RF(E) DRDC06 END OF TABLE , P LDR* A6,A1 GET DWT ADDRESS N 0 P ORS A5,DWTST,A6 STORE DEVICE END FOR DEVICE r ( P CF A15,INSSQ INSERT IN STATUS QUEUE P RB DRDC05 PDRDC06 EQU * P XIF * P CM
0x221d58…221eec Dummy {f00=0x00ad, f01=0x0190, f02=»OINTER r " P RF(NZ) DRDC20 ALREADY STARTED * PDRDC10 CF A15,SPOTIM START POLL TIMER 4 PDRDC20 ABL BRM b P EJECT x P* P* POLL TIME OUT P* ( PPTOUT LDKL A5,STB LOAD A5 STACK BASE P LDK A2,/40 ( P ST A2,DCONOF INDICATE
0x221eec…222080 Dummy {f00=0x00ad, f01=0x0190, f02=»* RESTART POLL TIMER WHEN POLL HAS BEEN RECEIVED P* 8 PCPTIM EQU * B . P LD A1,DCONOF CHECK THE ON-/OFF LINESWITCH V & P ANK A1,/40 IF IT IS POLL TIME OUT P RF(Z) CPTIM1 NO . P AN A1,DCSTOL IS OLD STATUS POLL TIME OUT P RF(Z) CPTIM
0x222080…222214 (5, 144) Dummy {f00=0x00ad, f01=0x0190, f02=»IMER x * P CF A15,CKMESS CHECK IF STATUS CHANGE P RTN A5 : P* J P* START POLL TIMER T P* n $ PSPOTIM CF A15,SETIME START TIMER x P DATA PTOUT,TIMPOL & P ST A4,DCTPGP STORE TIMER POINTER P ADKL A15,4 P ABR* A15
0x222214…2223a8 Dummy {f00=0x00ad, f01=0x0190, f02=»SETIME P DATA PRTOUT,TIMPRO $ P ST A4,DCTPP SAVE TIMER POINTER * P RTN A5 R P* b P* PROCEDURE TIMEOUT l P* PPRTOUT CM DCTPP P LDR A6,A1 RELOAD A6 P LDKL A5,STB LOAD STACK BASE , P CF A5,CHALTI HALT INPUT IF OP
0x2223a8…22253c Dummy {f00=0x00ad, f01=0x0190, f02=»IMER r PPRT10 ABL BRM P EJECT " P* 0 P* STOP PROCEDURE TIMER : P* X ( PHPTIM LD A1,DCTPP GET TIMER POINTER b P RF(Z) HPT10 NOT RUNNING P CM* DCTPP STOP TIMER P CM DCTPP PHPT10 RTN A5 P EJECT P IFT COD
0x22253c…2226d0 Dummy {f00=0x00ad, f01=0x0190, f02=» PCRCCAL EQU * P ST A1,CRCSAV P ST A2,CRCSAV+2 2 P ST A3,CRCSAV+4 J P LDK A1,8 b PCRC100 LDR A3,A7 t P SRL A7,1 P XRR A3,A2 P SRL A2,1 P ANK A3,1 P RF(Z) CRC110 P XRKL A7,/A001 PCRC110 S
0x2226d0…222864 Dummy {f00=0x00ad, f01=0x0190, f02=» P EJECT P* P* ( P* READ CRC CHARACTERS AND CHECK THEM * P* CR = (E) IF CRC WAS OK V P* v P* $ PRDCRC LDR A6,A7 SAVE CURRENT CRC $ P IM SYNSW DO NOT SKIP SYNCS NOW P CF A5,READ READ BYTE 1 P LD A8,CRCSAV+
0x222864…2229f8 Dummy {f00=0x00ad, f01=0x0190, f02=» P XRR A2,A8 P ADK A5,4 . P CWR A2,A6 COMPARE RECEIVED WITH COMPUTED , P ABR* A5 ^ P XIF n P IFT CODE=0 z P* & P* RDLRC READ LRC CHARACTER " P* CR=0 IF LRC OK P* PRDLRC IM SYNSW P
0x2229f8…222b8c Dummy {f00=0x00ad, f01=0x0190, f02=» ABR* A5 P P XIF P EJECT $ P* 2 P* < " P* DEVICE WORK TABLE FOR DCTASK F P* l P* v PDW1500 EQU * TABLE ENTRY P DATA 0 CU LINE ADDRESS P DATA /8000 STATUS P DATA 0 ECB ADDRESS P DATA 0 ORDER
0x222b8c…222d20 Dummy {f00=0x00ad, f01=0x0190, f02=» ~ P* P IFT MMUPAG=1 P DATA 0 USER ECB ADDRESS ( P DATA DC:ECB MMU ECB ADDRESS H P XIF l P* x P DATA 0 TIMER POINTER ( P DATA 0 WRITE QUEUE OR BUFFER QUEUE . P DATA 0 STATUS QUEUE (NOT USED BY DC-TASK) " P DATA 0 RE
0x222d20…222eb4 (5, 145) Dummy {f00=0x00ae, f01=0x0190, f02=» r P* P IFT MMUPAG=1 PDC:ECB EQU * MMU ECB ( P DATA 0,0,0,0,0,0 D P XIF ^ P* j P EJECT t P* P* P* DC RECEIVE BUFFER POOL P* PRLINK EQU RBUFL+RBUFL+8 P* PDCRBUF EQU * P DATA *+2
0x222eb4…223048 Dummy {f00=0x00ae, f01=0x0190, f02=»ES RBUFL+3 P IFF RBUFNR=4 P DATA *+RLINK ( P RES RBUFL+3 > P XIF R P DATA *+RLINK ^ P RES RBUFL+3 t P DATA 0 END OF CHAIN P RES RBUFL+3 P P IFF MMUPAG=0 & PMMUBUF RES TBUFL+1 MMU WORK BUFFER P XIF
0x223048…2231dc Dummy {f00=0x00ae, f01=0x0190, f02=» P ORKL A2,/F000 P RF LOG10 PLOGOUT ST A2,SAVE2 , P ORKL A2,/0F00 F P RF LOG10 PLOGIN CWK A2,/FF n P RF(E) LOGE10 P ST A2,SAVE2 PLOG10 ST A3,SAVE3 P LD A3,LOGPNT P STR A2,A3 P ADK A3,2 P CWK
0x2231dc…223370 Dummy {f00=0x00ae, f01=0x0190, f02=»10 RTN A5 P EJECT P* P* * PLOGPNT DATA LOGSTA 4 PLOGSTA EQU * N P RES 300 b PLOGEND EQU *-4 r PSAVE2 DATA 0 PSAVE3 DATA 0 P XIF P* P* P* P IFT RCOM=1 P EJECT < P************
0x223370…223504 Dummy {f00=0x00ae, f01=0x0190, f02=»ND COLUMN NUMBER j P* > P********************************************************** " P d PLINCOL EQU * l " P LDR A2,A3 COPY CURSOR ADDRESS P SRL A2,6 P ANK A2,X'3F' & P LC A2,LICO:T,A2 ASCII LINE NUMBER " P CF A5,WRITEP SE
0x223504…223698 Dummy {f00=0x00ae, f01=0x0190, f02=»UMN NUMBER z P RTN A5 RETURN P* ( P* 2 P* < P EJECT F P T P PLICO:T EQU * d * P DATA /2041,/4243,/4445,/4647 /00-/07 x * P DATA /4849,/5B2E,/3C28,/2B21 /08-/0F * P DATA /264A,/4B4C,/4D4E,/4F50 /10-/17 * P DATA
0x223698…22382c Dummy {f00=0x00ae, f01=0x4166, f02=»A /3031,/3233,/3435,/3637 /30-37 ( P DATA /3839,/3A23,/4027,/3D22 /38-3F ( P XIF T P EJECT ` P n PDC:IN DATA DC:TAB+2 v PDCTAB DATA DC:TAB " PDC:TAB DATA 2 LENGTH OF DC:TAB * P DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 * P DATA 0,
0x22382c…2239c0 Dummy {f00=0x00ae, f01=0x2008, f02=» H P X ` h p x
0x2239c0…223b54 (5, 146) Dummy {f00=0x00ae, f01=0x0190, f02=»C-PATTERN TO LC r P XIF P IFT P6805=0 $ * P LDKL A2,CBCARR+SYNC DEF SYNC-PATTERN 8 2 P CIO A2,1,LCUIN SEND INPUT SYNC-PATTERN TO LC f P XIF PCSYN:I EQU * P RTN A5 RETURN TO CALLER P EJECT P* P* " P* CHALTI
0x223b54…223ce8 Dummy {f00=0x00ae, f01=0x0006, f02=») ) )
0x223ce8…223e7c Dummy {f00=0x00ae, f01=0x0190, f02=» @ @ IDENT DRDC15 PRR 10.0 80-05-06 870105041000 . * DC15AD IH1501 IH1502 DC15ON DW1500 H DC15AD z , ( ! , ( I P P 1P P W P DIS
0x223e7c…224010 Dummy {f00=0x00ae, f01=0x0190, f02=» B Y P @ , ( @ @ ` @ P 0P _ % " DWTST R TENDIO b , ( A A Y _` t DWTECB ECBEL , ( _j X P 0 Y P DC:MIN , (
0x224010…2241a4 Dummy {f00=0x00ae, f01=0x0190, f02=» ) Y _b X P A , ( E Y W Y @_ X X * , ( c A Y _& Y @ Z , ( 0 A A _: X P ( y Y , ( W (P 0 ) > ( , ( P _ ) 1_
0x2241a4…224338 Dummy {f00=0x00ae, f01=0x0190, f02=»@ X P , Y L C L , ( 9! C > @ @ * , ( P U @ A X _" X P y Z , ( s Y X P T @ T A , ( A > A A A A A , ( W
0x224338…2244cc Dummy {f00=0x00ae, f01=0x0190, f02=» P ~ , ( / ! T A P A T ! R , ( O ! T ! T ! A N , ( o P " ! _ ! T ~ , ( A B ! ! @ T " , ( H ! _ ! A @ P @ P !
0x2244cc…224660 Dummy {f00=0x00ae, f01=0x0190, f02=» X6_Z n , ( B / A @ @ T 1 R 0 2P TEBCDI > , ( O P P A @ 8 H @ P , ( m P E P X R X T , ( ! P C C P * & ! " H " P X * Y
0x224660…2247f4 (5, 147) Opaque[0x194]
0x2247f4…224988 # DirEnt {nam=»DRDI01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x15d0, f03=0x0000}
0x2247f4…224988 IdxSect {
0x2247f4…224988 f00 = 0x00ae // 0x2247f4 @0x0
0x2247f4…224988 f01 = 0x0008 // 0x2247f6 @0x2
0x2247f4…224988 gno = [ // 0x2247f8 @0x4
0x2247f4…224988 [0x00]: C0x00ae.0x2.0
0x2247f4…224988 [0x01]: C0x00ae.0x3.0
0x2247f4…224988 [0x02]: C0x00af.0x0.0
0x2247f4…224988 [0x03]: C0x00af.0x1.0
0x2247f4…224988 ]
0x2247f4…224988 }
0x224988…224b1c Dummy {f00=0x00ae, f01=0x0190, f02=» 2 P IDENT DRDI01 REL 10.0 80-03-14 870105041000 P : P* B P* L < P******************************************************* V P* $ P* PHILIPS TERMINAL SYSTEM PTS P* * P* DRDI01 = DRIVER INDICATOR DISPLAY P*
0x224b1c…224cb0 Dummy {f00=0x00ae, 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
0x224cb0…224e44 Dummy {f00=0x00ae, 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:
0x224e44…224fd8 Dummy {f00=0x00ae, 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*
0x224fd8…22516c Dummy {f00=0x00ae, 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
0x22516c…225300 Dummy {f00=0x00ae, 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
0x225300…225494 (5, 148) Dummy {f00=0x00ae, 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*
0x225494…225628 Dummy {f00=0x00ae, 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
0x225628…2257bc Dummy {f00=0x00ae, f01=0x0190, f02=»* SETTING X:A=0 P* PX:A EQU 0 $ PORD7 EQU X:A 6 P* J P* T 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
0x2257bc…225950 Dummy {f00=0x00ae, f01=0x0190, f02=» BY SETTING X:B=1 ~ P* PX:B EQU 0 $ PFLASH EQU X:B 6 P* L P* V . P* A PROGRAM VERSION USING TOSS MMU PAGING ` * P* IS OBTAINED BY SETTING MMUPAG EQU 1. P* PMMUPAG EQU 0 P* P* 6 P* A PROGRAM VERSION US
0x225950…225ae4 Dummy {f00=0x00ae, f01=0x0190, f02=» P* P* P* MMU BUFFER SIZE P* 4 PX:C EQU 4 > PDVBLEN EQU X:C P P* f P* p P********************* z P* DWT-DISPLACEMENTS * P********************* P* P* 0 PDWTDRD EQU /10 START OF DRIVER D
0x225ae4…225c78 Dummy {f00=0x00ae, f01=0x0190, f02=»+4 P XIF P* " PDWTDIB EQU START+/02 SAVE AREA 2 PDWTFLA EQU START+/08 SAVE AREA FOR FLASH IMAGE F & PDWTTP EQU START+/0A TIMER POINTER | PTIME EQU 5 FLASH TIME P* P EJECT P* P* A C D I P* > P*
0x225c78…225e0c Dummy {f00=0x00ae, f01=0x0190, f02=»CREDIT=1 P CCK A7,/0707 P RF(E) ADI050 ORDER /07 & P XIF F P IFT ORD7+CREDIT=2 R P CCK A7,/0606 l 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
0x225e0c…225fa0 Dummy {f00=0x00ae, f01=0x018e, f02=»0 P SLL A3,4 P ORR A4,A3 LAMPCODES IN A4 PADI005 EQU * > P IFT FLASH=1 R P CCK A7,/3939 f P RF(E) FLA05 | P XIF P IFT CREDIT=0 P SUK A7,5 P XIF P IFT CREDIT=1 P SUK A7,/37 P XIF P R
0x225fa0…226134 (5, 149) Dummy {f00=0x00af, f01=0x018e, f02=» P* P* P IFT FLASH=1 P* , P* FLASH ORDER /39 6 P* V P* ` , PFLA05 ORS A4,DWTFLA,A6 SAVE FLASH IMMAGE j & P LD A1,DWTTP,A6 GET TIMER POINTER ( P RF(NZ) FLA10 TIMER ALREADY STARTED P LDK A4,DWTTP START TIME
0x226134…2262c8 Dummy {f00=0x00af, f01=0x0190, f02=» & P ANRS A4,A6 CHECK ON-OFF INDICATOR PFLA10 EQU * . P LD A4,DWTFLA,A6 B & P LDR* A2,A6 CHECK ON-OFF INDICATOR Z 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
0x2262c8…22645c Dummy {f00=0x00af, f01=0x018e, f02=»DR A6,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 h P ST* A1,DWTTP,A6 P LDK A4,/40 " P XRRS A4,A6 SWITCH 0N-OFF FLAG P RB FLA10 PFLA30 CM DWTTP,A6
0x22645c…2265f0 Dummy {f00=0x00af, f01=0x0190, f02=» . P ANS A4,DWTDIB,A6 RESET BITS IN DWT-BUFFER P IFT FLASH=1 6 0 P ANS A4,DWTFLA,A6 RESET BITS IN FLASH IMAGE J P XIF ~ P RF ADI030 P* P* P EJECT P* P* P* ORDER 05: TURN ON LAMPS P* P*
0x2265f0…226784 Dummy {f00=0x00af, f01=0x0190, f02=»FLASH IMAGE p P XIF . PADI030 LC A2,DWTDIB,A6 GET FIRST CHARACTER PADI035 LDK A1,1 R 6 P SC A1,DWTST+1,A6 SET START VALUE IN BYTE COUNTER j P LDR* A3,A6 TWO OUTPUTS ? P ANK A3,/10 P RF(NZ) IHDI10 NO P RF IHDI20 YES
0x226784…226918 Dummy {f00=0x00af, f01=0x0190, f02=» LDK A3,0 & PADI060 CF A15,GETCHR GET CHARACTER P LDR A1,A1 LAST CHARACTER ? < P RF(Z) ADI070 YES ` P LDR A4,A2 z P SRL A4,4 $ P SUK A4,3 UNDEFINED CHARACTER ? P RF(L) ADI100 YES P CWK A4,3 UNDEFINED ? P RF(G) ADI
0x226918…226aac Dummy {f00=0x00af, f01=0x0190, f02=»TER v < PADI070 SC A1,DWTST+1,A6 SET START VALUE IN BYTE COUNTER P RF IHDI10 SEND CHARACTERS L P* n P* x P* CODE CHECK ERROR P* ( PADI100 LDK A1,CCERR SET RETURN CODE P ORS A1,8,A8 IN ECB " P RB ADI060 GET NEXT CH
0x226aac…226c40 Dummy {f00=0x00af, f01=0x0190, f02=» d P* PIHDI EQU * P LDR A1,A1 RETURN CODE $ P RF(NE) ENDIO YES END I/O B P LD A4,DWTST,A6 GET STATUS d 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 PARAME
0x226c40…226dd4 (5, 150) Dummy {f00=0x00af, f01=0x0190, f02=» YES. PERFORM ENDIO PIHDI10 LDKL A2,DWTDIB P ADR A2,A6 : P LD A4,DWTST,A6 N P ANK A4,/FF f P ADR A2,A4 z 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 CHAR
0x226dd4…226f68 Dummy {f00=0x00af, f01=0x0190, f02=»O P ORK A2,/40 INDICATE BELL P* , . POUTPUT IM DWTST,A6 INCREMENT BYTE COUNTER 6 & PIHDI20 CF A15,OUTLIN OUTPUT CHAR. h PEXIT ABL TDISP 2 PENDIO ABL DISEND PERFORM END I/O AND DISPATCH P* P EJECT P* P* R C
0x226f68…2270fc Dummy {f00=0x00af, f01=0x0190, f02=»E INFORMATION ` , P* OM PROGRAM DISPLAY IS ALSO RESTORED P* F P* P PRCDI EQU * Z P IFT CPU852=1 l & 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
0x2270fc…227290 Dummy {f00=0x00af, f01=0x4018, f02=» P P @ OM PROGRAM DISPLAY IS ALSO RESTORED P* F P* P PRCDI EQU * Z P IFT CPU852=1 l & 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
0x227290…227424 Dummy {f00=0x00af, 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
0x227424…2275b8 Dummy {f00=0x00af, f01=0x0190, f02=»ND STATUS DATA 0 CHANNEL STATUS * 0 * : EJECT D * R * * L I N E 2 f * | $ PDWA42 EQU DWA41+1 DEVICE ADDRESS * * PCWTA42 EQU * TABLE ENTRY DATA 0 LAST OUTPUT DWT , P DATA
0x2275b8…22774c Dummy {f00=0x00af, f01=0x0190, f02=»A 0 QUEUE P CIO A1,0,DWA42 CIO HALT P SST A2,DWA42 SEND STATUS 2 DATA 0 CHANNEL STATUS T * r * | EJECT * * * L I N E 3 * $ PDWA43 EQU DWA41+2 DEVICE ADDRESS * * PCWTA
0x22774c…2278e0 Dummy {f00=0x00af, f01=0x0190, f02=» OTR A2,0,DWA43 OTR P CIO A1,1,DWA43 CIO START DATA 0 QUEUE > P CIO A1,0,DWA43 CIO HALT T P SST A2,DWA43 SEND STATUS t DATA 0 CHANNEL STATUS * * EJECT * * * L I N E 4 * $
0x2278e0…227a74 (5, 151) Opaque[0x194]
0x227a74…227c08 # DirEnt {nam=»DRDN01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x15f0, f03=0x0000}
0x227a74…227c08 IdxSect {
0x227a74…227c08 f00 = 0x00af // 0x227a74 @0x0
0x227a74…227c08 f01 = 0x0006 // 0x227a76 @0x2
0x227a74…227c08 gno = [ // 0x227a78 @0x4
0x227a74…227c08 [0x00]: C0x00af.0x2.0
0x227a74…227c08 [0x01]: C0x00af.0x3.0
0x227a74…227c08 [0x02]: C0x00b0.0x0.0
0x227a74…227c08 ]
0x227a74…227c08 }
0x227c08…227d9c Dummy {f00=0x00af, f01=0x0190, f02=» 2 P IDENT DRDN01 REL 10.0 80-03-14 870105041000 P : P* B P* L 8 P*************************************************** V P* $ P* PHILIPS TERMINAL SYSTEM PTS P* ( P* DRDN01 = DRIVER NUMERIC DISPLAY P* P*
0x227d9c…227f30 Dummy {f00=0x00af, f01=0x018e, f02=»DRIVER HANDLES THE NUMERIC DISPLAY 0 P* ON INDICATOR UNIT PTS 6241 CONNECTED TO * & P* THE SYSTEM VIA CHLT OR CHRT. ^ P* 0 P* THE DISPLAY MAY BE USED AS AN ORDINARY 0 P* OUTPUT DEVICE WHERE NUMERIC INFORMATION 0 P* ARE DISPL
0x227f30…2280c4 Dummy {f00=0x00af, f01=0x0190, f02=» ` P* KEYBOARD DRIVER DRKB01. P* , 0 P* THE DRIVER CONSISTS OF FOLLOWING PARTS: 6 P* j & P* A C D N ACTIVATION PART t P* ( P* I H D N INTERRUPT HANDLER P* ( P* R C D N RECOVERY ROUTINE
0x2280c4…228258 Dummy {f00=0x00af, f01=0x0190, f02=»: j P* ( P* ORDER 05: ERASE NUMERIC DISPLAY ( P* 06: WRITE NUMERIC DISPLAY @ P* l P* v P* NORMAL REGISTER USAGE: P* $ P* REGISTER: A1 = RETURN CODE ( P* A2 = OUTPUT CHARACTER $ P*
0x228258…2283ec Dummy {f00=0x00af, f01=0x0190, f02=»T-ADDRESS z P* A7 = ORDER $ P* A8 = ECB-ADDRESS 4 P* P* f P* SYSTEM ADAPTATION p P* 2 P* BY MEANS OF CONDITIONAL ASSEMBLY ORDER 06 0 P* WRITE NUMERIC DISPLAY MAY BE EXCLUDED. 0 P* T
0x2283ec…228580 Dummy {f00=0x00af, f01=0x0190, f02=» P* P*********** P* ENTRIES * & P*********** : P* N P* X ( P ENTRY DNAD ADDRESS TO ADDRESS-BLOCK b P* P* 0 P******************************************** 0 P* EXTERNAL TOSS MODULE ENTRIES * 0
0x228580…228714 (5, 152) Dummy {f00=0x00af, f01=0x018e, f02=»OM ECB r $ P EXTRN DISIOE I/O REQUEST ERROR P EXTRN TENDIO END I/O 6 P EXTRN OUTPUT SEND CHARACTER T < P EXTRN LDREG RESTORE REGISTERS A4,A3,A5,A7,A8 AND RETURN x & P EXTRN SAVE8 SAVE REGISTERS A1-A8 & P EXTRN ECHRTN RETURN FROM ECHOING
0x228714…2288a8 Dummy {f00=0x00af, f01=0x0190, f02=» P* P EXTRN DWTST STATUS EXTRN DWTBC BYTE COUNTER . EXTRN DWTECB ECB ADDRESS P P EJECT DRDN01 r P* P* P************************** P* CONDITIONAL ASSEMBLY * P************************** P*
0x2288a8…228a3c Dummy {f00=0x00af, f01=0x0190, f02=»WRIT EQU X:A ORDER 6 P* 8 P* THIS DRIVER CAN BE MADE TO HANDLE CREDIT ORDERS & P* BY SETTING CREDIT = 1 b . P* ORDER 05 IS THEN REPLACED BY ORDER /31 P* PCREDIT EQU 0 P* . P* A PROGRAM VERSION USING TOSS MMU PAGING
0x228a3c…228bd0 Dummy {f00=0x00af, f01=0x0190, f02=»TENDED INSTRUCTION p . P* SET IS OBTAINED BY SETTING CPU852 EQU 0. P* L PCPU852 EQU 1 V P* j P* t P***************** ~ P* CONSTANTS * P***************** P* " PCCERR EQU /4 CODE CHECK ERROR P* & P*
0x228bd0…228d64 Dummy {f00=0x00af, f01=0x0190, f02=»************ P* TABLES * P************** * P* @ P* J P DATA DVBLEN MMU BUFFER SIZE T P DATA 2 DEVICE INDEX x PDNAD EQU * ADDRESS BLOCK P DATA ACDN ACTIVATION PART " P DATA 0 ABORT ROUTINE ADDRESS P DATA IHDN
0x228d64…228ef8 Dummy {f00=0x00af, f01=0x0190, f02=»RDN01 P* P* A C D N P* , 2 P* ACDN = ACTIVATION DRIVER NUMERIC DISPLAY 6 P* l , P* THE FOLLOWING ORDERS ARE THREATED: v P* ( P* ORDER 05: ERASE NUMERIC DISPLAY , P* ORDER 06: WRITE ON NUMERIC DISPLAY
0x228ef8…22908c Dummy {f00=0x00af, f01=0x0190, f02=»AY V P* PACDN EQU * P IFT CREDIT=0 & P SUK A7,5 ORDER 5? < P RF(E) ADN010 V P XIF l P IFT CREDIT=1 x P SUK A7,/31 P RF(Z) ADN010 P ADK A7,/2C P XIF P* P IFT DNWRIT=1 P* P SUK A
0x22908c…229220 Dummy {f00=0x00af, f01=0x0190, f02=»1 P* P* ORDER 05 P* * PADN010 EQU * 4 P LDK A2,/40 ERASE DISPLAY H P CF A5,OUTPUT SEND CHARACTER j P RF ENDIO P* P* ORDER 06 P* P IFT DNWRIT=1 P* & PADN015 LDK A3,0 RESET BUFFER I
0x229220…2293b4 (5, 153) Dummy {f00=0x00b0, f01=0x0190, f02=»N01 P* P* CHECK CHARACTER P* 2 P LDR A4,A2 < P SUK A4,/3F BLANK? N P RF(E) ADN025 h P ADK A4,6 KEY > /39? ~ P RF(P) ADN030 P ADK A4,9 KEY < /30 P RF(N) ADN030 PADN025 EQU * P CF A5,OUTPUT SEND
0x2293b4…229548 Dummy {f00=0x00b0, f01=0x0190, f02=» P* P XIF P* PENDIO CF A15,TENDIO END I/O $ PEXIT ABL TDISP H P* ^ P EJECT DRDN01 h P* P* I H D N P* P* INTERRUPT P* PIHDN EQU * P LD A4,DWTST,A6 BUSY? P RB(N) EXIT
0x229548…2296dc Dummy {f00=0x00b0, f01=0x0190, f02=» P ABL LDREG P* P EJECT DRDN01 P* 8 P* R C D N B P* V P* RECOVERY ` P* v PRCDN EQU * P IFT CPU852=1 & P CF A15,SAVE8 SAVE A1-A8 ON STACK P XIF P* P IFT CPU852=0 " P MSR 8,A15
0x2296dc…229870 Dummy {f00=0x00b0, f01=0x0190, f02=»ACTER z P CF A5,OUTPUT SEND ERASE P LD A8,DWTECB,A6 . P RB(E) ENDIO F * P RB ACDN RETURN TO ACTIVATINO PARTONI Z P* P EJECT DRDN01 P* P* E C H O D N P* P* ECHO-ROUTINE P* PECHODN EQU *
0x229870…229a04 Dummy {f00=0x00b0, f01=0x40dc, f02=»EAR? P RF(NE) ECH040 NO P LDK A2,/40 ERASE DISPLAY & & PECH040 CF A5,OUTPUT SEND CHARACTER H 0 PECH050 ABL ECHRTN RETURN TO KEYBOARD DRIVER r P* P* P* P END P @ CHO-ROUTINE P* PECHODN EQU *
0x229a04…229b98 Dummy {f00=0x00b0, f01=0x2008, f02=» KSPACE? P RF(E) ECH050 P SUK A3,/10 CLEAR? . P RF(NE) ECH040 NO H P LDK A2,/40 ERASE DISPLAY b & PECH040 CF A5,OUTPUT SEND CHARACTER 0 PECH050 ABL ECHRTN RETURN TO KEYBOARD DRIVER P END P @ O D N P
0x229b98…229d2c Dummy {f00=0x00b0, f01=0x0190, f02=» & P RF IAS070 GO TO INTERRUPT HANDLER 4 P* 4 . PEXITL EQU * 4 8 P IFT LOGING=1 4 L ( P CF A15,INFLG1 GET LINE INFORMATION 4 b P CF A15,LOGG **LOGG INPUT** 4 P XIF 4 P* 4 PEXIT EQU * 4 P ABL TDISP 4 * 4 P EJECT 4 P* 4
0x229d2c…229ec0 Dummy {f00=0x00b0, f01=0x018e, f02=» A2,/FF 4 " P LCR A7,A6 LEFT BYTE OF DWTCHP 5 P ANK A7,/70 DEVICE NUMBER 5 6 * P SUK A7,/20 OUTPUT TO KEYBOARD LAMPS? 5 X P RF(Z) IAS050 YES 5 P* 5 P LDR A2,A2 SAVED CHARACTER 5 $ P RF(Z) IAS060 NO CHARACTER SAVED 5 P* 5 P CWK A2,/8
0x229ec0…22a054 (5, 154) Opaque[0x194]
0x22a054…22a1e8 # DirEnt {nam=»DRDU01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1608, f03=0x0000}
0x22a054…22a1e8 IdxSect {
0x22a054…22a1e8 f00 = 0x00b0 // 0x22a054 @0x0
0x22a054…22a1e8 f01 = 0x0026 // 0x22a056 @0x2
0x22a054…22a1e8 gno = [ // 0x22a058 @0x4
0x22a054…22a1e8 [0x00]: C0x00b0.0x1.0
0x22a054…22a1e8 [0x01]: C0x00b0.0x2.0
0x22a054…22a1e8 [0x02]: C0x00b0.0x3.0
0x22a054…22a1e8 [0x03]: C0x00b1.0x0.0
0x22a054…22a1e8 [0x04]: C0x00b1.0x1.0
0x22a054…22a1e8 [0x05]: C0x00b1.0x2.0
0x22a054…22a1e8 [0x06]: C0x00b1.0x3.0
0x22a054…22a1e8 [0x07]: C0x00b2.0x0.0
0x22a054…22a1e8 [0x08]: C0x00b2.0x1.0
0x22a054…22a1e8 [0x09]: C0x00b2.0x2.0
0x22a054…22a1e8 [0x0a]: C0x00b2.0x3.0
0x22a054…22a1e8 [0x0b]: C0x00b3.0x0.0
0x22a054…22a1e8 [0x0c]: C0x00b3.0x1.0
0x22a054…22a1e8 [0x0d]: C0x00b3.0x2.0
0x22a054…22a1e8 [0x0e]: C0x00b3.0x3.0
0x22a054…22a1e8 [0x0f]: C0x00b4.0x0.0
0x22a054…22a1e8 [0x10]: C0x00b4.0x1.0
0x22a054…22a1e8 [0x11]: C0x00b4.0x2.0
0x22a054…22a1e8 [0x12]: C0x00b4.0x3.0
0x22a054…22a1e8 ]
0x22a054…22a1e8 }
0x22a1e8…22a37c Dummy {f00=0x00b0, f01=0x0190, f02=» 2 P IDENT DRDU01 REL 10.0 80-03-14 870105041000 P : P* B P* L 6 P************************************************** V P* $ P* PHILIPS TERMINAL SYSTEM PTS P* . P* DRDU01 = DRIVER FOR ONE/TWO DISC UNITS P* 0 P
0x22a37c…22a510 Dummy {f00=0x00b0, f01=0x0190, f02=»**************** n P* P* " 0 P* THIS DISC DRIVER HANDLES UP TO TWO DISC , 4 P* DRIVES X1215,X1216 CONNECTED TO CPU VIA IOP ` P* ON MULTIPLEX CHANNEL P* P* * P* THE FOLLOWING ORDERS ARE TREATED : P* P*
0x22a510…22a6a4 Dummy {f00=0x00b0, f01=0x0190, f02=»L WRITE ~ P* /1F FORMAT VOLUME P* 0 P EJECT DRDU01 DRDU01 : P* Z P* d P*********** n P* ENTRIES * P*********** P* P* $ P ENTRY DUADR ACTIVATION ADDRESS P ENTRY DUON RECOVERY ROUTINE 2
0x22a6a4…22a838 Dummy {f00=0x00b0, f01=0x0190, f02=»DLER DISC UNIT NO. 2 v . P ENTRY DWDU01 DWT ADDRESS DISC UNIT NO. 1 P EJECT DRDU01 N P* f P* p P************* z P* EXTERNALS * P************* P* P* P EXTRN TDISP DISPATCHER P EXTRN TENDIO END I/O
0x22a838…22a9cc Dummy {f00=0x00b0, f01=0x0190, f02=» DWT SET NVL p 6 P EXTRN VOLNAM VOLUME NAME FROM DWT TO USER BUFFER , P EXTRN VOLCLR CLEAR VOLUME NAMES IN DWT N . P EXTRN INXDWT DOUBLED INDEX + DWT ADDRESS ~ P EXTRN DISIOE REQUEST ERROR & P EXTRN INIFLG INITIALIZATION FLAG * P EXTRN PFP
0x22a9cc…22ab60 Dummy {f00=0x00b0, f01=0x0190, f02=»RN DWTST STATUS EXTRN DWTECB ECB ADDRESS $ EXTRN DWTOR DWT INDEX AND ORDER : EXTRN DWTA2 SAVE AREA A2 b EXTRN DWTA4 SAVE AREA A4 EXTRN DWTA5 SAVE AREA A5 & ! EXTRN DWTSB1 STACK BASE 1 IN DWT & ! EXTRN DWTSB2 STACK BA
0x22ab60…22acf4 (5, 155) Dummy {f00=0x00b0, f01=0x0190, f02=»CATORS l P EXTRN DWTVOL VOLUME NAMES P EXTRN DWTTAB TTAB ADDRESS 0 $ P EXTRN ECBBA ECB BUFFER ADDRESS R & P EXTRN ECBRL ECB REQUESTED LENGTH z & P EXTRN ECBEL ECB EFFECTIVE LENGTH P EXTRN ECBRC ECB RETURN CODE ( P EXTRN ECBCW1 ECB 1:ST
0x22acf4…22ae88 Dummy {f00=0x00b0, f01=0x0190, f02=» v P* * P* CONDITIONAL ASSEMBLY * * P* * L P************************** n P* P* 6 P* READ AFTER WRITE MAY BE EXCLUDED FOR ORDER /15 P* BY SETTING X:A = 0 P* PX:
0x22ae88…22b01c Dummy {f00=0x00b0, f01=0x0190, f02=» PX:B EQU 1 PNUNITS EQU X:B P* , P* 6 . P* A PROGRAM VERSION USING TOSS MMU PAGING @ * P* IS OBTAINED BY SETTING MMUPAG EQU 1. r P* PMMUPAG EQU 0 P* P* 6 P* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION
0x22b01c…22b1b0 Dummy {f00=0x00b0, f01=0x0190, f02=»* A PROGRAM VERSION USING THE INSTRUCTION SET OF 2 P* CPU 857 IS OBTAINED BY SETTING CPU857 EQU 1 8 P* n PX:E EQU 0 x PCPU857 EQU X:E P* P* P* PROGRAM VERSION FOR FORMAT , P* A2 IS OBTAINED BY SETTING VERSA2 EQU 1 , P
0x22b1b0…22b344 Dummy {f00=0x00b0, f01=0x0190, f02=» X:D P* P EJECT DRDU01 DRDU01 P* 6 P* @ P************* J P* CONSTANTS * ` P************* v P* P* 0 PDAF1 EQU /28 DEVICE ADDRESS FIXED DISC NO. 1 4 PDAC1 EQU /08 DEVICE ADDRESS CARTRIDGE DISC NO. 1
0x22b344…22b4d8 Dummy {f00=0x00b0, f01=0x0190, f02=» ADDRESS x & PCUADR EQU /08 CONTROL UNIT ADDRESS P* : : PMAXSEC EQU 6528 MAX NO OF SECTORS ON UNPACKED PTS 6875 D , PSECLEN EQU 256 SECTOR LENGTH, CHARACTERS * PPHSECL EQU 384 PHYSICAL SECTOR LENGTH PQRETRY EQU 4 NO OF RETRIES PTIME E
0x22b4d8…22b66c Dummy {f00=0x00b0, f01=0x0190, f02=»TES NO MMU BUFFER " P DATA DEVIND DISC DEVICE INDEX & PDUADR DATA DUAD ACTIVATION ADDRESS @ " P DATA 0 ABORT ROUTINE ADDRESS j P* P IFT VERSA3=1 PBUFFER RES 193 P XIF P* P IFT VERSA3=0 PBUFFER RES 25 P
0x22b66c…22b800 Dummy {f00=0x00b0, f01=0x0190, f02=» ~ P* * P* ACTIVATION * " P* * < P***************** V P* p P* z PDUAD EQU * " P CM DWTRTY,A6 RETRY INDICATOR 0 P CM DWTFBU,A6 RESET DRIVER BUFFER INDICATOR P LDK A1,0 P LC A1
0x22b800…22b994 (5, 156) Dummy {f00=0x00b0, f01=0x0190, f02=»P) DUERR FAULT IN INDEX P* PDUA:00 EQU * * P* > P LDK A5,DWTSB3 H P ADR A5,A6 LOAD STACK BASE ^ P IFT MMUPAG=1 ( P MLR 2,A8 GET 18 BIT BUFFER ADDRESS P SLC A1,4 MOST SIGN. BITS P ANK A1,3 P SRL A2,1 WORD ADD
0x22b994…22bb28 Dummy {f00=0x00b0, f01=0x0190, f02=» INDEX AND ORDER P ADK A7,0 SET CR ( P RF(NZ) DUA:05 NOT TEST STATUS ORDER 0 P* P EJECT DRDU01 f P* | P* P********************* P* * P* TEST STATUS * P* * P
0x22bb28…22bcbc Dummy {f00=0x00b0, f01=0x018e, f02=» OR SECOND UNIT p P LDK A2,1 * P ST A2,DWTSAV,A6 INDICATE TEST STATUS * " P CF A5,VO:NAM READ VOLUME NAME X P ADK A1,0 ~ P RF(NZ) TESEND NOT OPERABLE , P LD A2,DWTORD,A6 RESTORE INDEX AND ORDER P ST A2,DWTOR,A6 P LD A8,DWTEC
0x22bcbc…22be50 Dummy {f00=0x00b0, f01=0x0190, f02=» P LDKL A2,-1 . P ST A2,DWTSAV,A6 INDICATE TEST STATUS DONE P ABL END:IO PERFORM ENDIO J P* l P EJECT DRDU01 v P* , P*************************************** , P* * , P* NEW VOLUME L
0x22be50…22bfe4 Dummy {f00=0x00b0, f01=0x0190, f02=»******************************* P* ( . P* INPUT: A1=NVL RETURN CODE FROM NVLCHK 2 P* A7=ORDER CODE d P* P* PDUA:05 EQU * ( P ADK A1,0 CHECK IF NEW VOLUME LOADED " P ABL(NZ) END:IO PERFORM TENDIO P SUK A7,1
0x22bfe4…22c178 Dummy {f00=0x00b0, f01=0x0190, f02=»EAD x P SUK A7,4 P RF(Z) DUA:10 PHYSICAL WRITE P SUK A7,10 B P RF(Z) FORMAT FORMAT VOLUME T P* x " PDUERR ABL DISIOE REQUEST ERROR P* ( PINCLEN EQU * REQUESTED LENGTH ERROR P LDKL A1,/8008 P ABL END:20 P
0x22c178…22c30c Dummy {f00=0x00b0, f01=0x018e, f02=»* v P* * P************************** , P* N P* X PFORMAT EQU * b 0 P LDK A7,204 NUMBER OF CYLINDERS ON PTS 6875 v " P LD A1,ECBCW1,A8 GET DISC TYPE P IFT VERSA2+VERSA3=2 P ECR A2,A1 P XIF
0x22c30c…22c4a0 Dummy {f00=0x00b0, f01=0x0190, f02=» P LDKL A3,BUFFER " P LDKL A1,/C001 WRITE ONE WORD P ANK A2,3 B P SUK A2,3 T P RF(NZ) FORM05 A1 OR A2 f " P LDKL A1,/C0C1 WRITE 386 BYTES P ADKL A3,PHSECL PFORM05 EQU * " P ST A1,DWTFBU,A6 SAVE 1ST WER P XIF
0x22c4a0…22c634 (5, 157) Dummy {f00=0x00b1, f01=0x0190, f02=»1 . P LDKL A3,BUFFER+PHSECL POSITION FOR CYL ID P XIF < P* H $ P STR A3,A6 DRIVER BUFFER POINTER R P IFT NUNITS=2 z P CF A5,INXUNI P CM DWTCYL,A2 CYLINDER ZERO P XIF P IFT NUNITS=1 P CM DWTCYL,A6 CYLINDER ZERO
0x22c634…22c7c8 Dummy {f00=0x00b1, f01=0x0190, f02=»FT NUNITS=2 P CF A5,INXUNI GET UNIT INDEX P XIF 8 P CF A5,SEEK SEEK CYLINDER D P SLL A1,5 STATUS f P RF(NN) FORM40 SEEK ERROR ~ P IFT NUNITS=2 P CF A5,INXUNI P LD A1,DWTCYL,A2 P XIF P IFT NUNITS=1 P L
0x22c7c8…22c95c Dummy {f00=0x00b1, f01=0x0190, f02=»N EVEN CYLINDERS t ( P* WRITE SECTOR 8 ON ODD CYLINDERS P ORK A3,1 ORDER CODE: WRITE D P* h P IFT VERSA2+VERSA3=2 r P LD A1,DWTFBU,A6 GET 1ST WER P XIF P* P IFT VERSA2=1 P IFT VERSA3=0 P LDKL A1,/C002
0x22c95c…22caf0 Dummy {f00=0x00b1, f01=0x0190, f02=» LDKL A2,BUFFER P CF A5,CIO:50 CIO:50 SECTOR P ANK A1,/1F < P RF(NZ) FORM40 WRITE ERROR P P IFT NUNITS=2 r P CF A5,INXUNI P IM DWTCYL,A2 P XIF P IFT NUNITS=1 P IM DWTCYL,A6 P XIF ( P SUK A7,1 DECREM
0x22caf0…22cc84 Dummy {f00=0x00b1, f01=0x0190, f02=» DWT n PFORM40 EQU * P CF A5,SEEKZ SEEK CYLINDER 0 P SLL A1,6 D P RF(N) FORM50 SEEK ERROR V P SUK A4,1 RETRY COUNTER v P RB(NZ) FORM30 RETRY PFORM50 EQU * $ P LDK A1,2 SEEK ERROR RETURN CODE P ABL END:IO PERFORM END IO
0x22cc84…22ce18 Dummy {f00=0x00b1, f01=0x0190, f02=» * ~ 6 P* CHECK IF ALLOWED SECTOR LENGTH, BUFFER SIZE * ( 6 P* AND SECTOR NUMBER * b 6 P* SAVE BUFFER ADDRESS AND SET SECTOR COUNTER * 6 P* *
0x22ce18…22cfac Dummy {f00=0x00b1, f01=0x0190, f02=»* DWTUBU=USER BUFFER POINTER P* . P* 8 PDUA:10 EQU * B $ P LD A3,ECBRL,A8 REQUESTED LENGTH V P RB(Z) INCLEN ~ 6 P ECR A7,A3 DIVIDE BY 256 TO GET NUMBER OF SECTORS & P ANK A3,/FF SET CONDITION REGISTER 4 P RB(NZ) INCLEN N
0x22cfac…22d140 Dummy {f00=0x00b1, f01=0x018e, f02=»ER n P CW A3,DWTSMX,A2 * P RB(NL) DUERR INCORRECT SECTOR NUMBER " P ADR A3,A7 P P CW A3,DWTSMX,A2 b ( P RB(G) INCLEN SECTOR NUMBER OVERFLOW z P* P IFT MMUPAG=0 P LD A1,ECBBA,A8 ( P ST A1,DWTUBU,A6 USER BUFFER POINTER
0x22d140…22d2d4 (5, 158) Dummy {f00=0x00b1, f01=0x0190, f02=» p " P* * " P* DISC VERSION SEPARATION * . " P* * T " P***************************** z P* P* P LD A2,DWTFOR,A2 P SUK A2,2 P RF(Z) RW:800 VERSION A2 P XIF
0x22d2d4…22d468 Dummy {f00=0x00b1, f01=0x0190, f02=» * * P* * * P* GET PHYSICAL SECTOR NUMBER BY * N * P* DIVIDE BY 3 * | * P* * * P************************************* P*
0x22d468…22d5fc Dummy {f00=0x00b1, f01=0x0190, f02=»A1=REMAINER=LOGICAL SECTOR POSITION 2 P* A2=QUOTIENT=PHYSICAL SECTOR NUMBER ON DISC , P XIF b P* n P IFT VERSA3=1 x P IFT CPU852=1 P LD A1,ECBCW2,A8 P LDR A3,A1 SECTOR NUMBER P LDK A2,0 PDVK:00 EQU * P ADR A
0x22d5fc…22d790 Dummy {f00=0x00b1, f01=0x0190, f02=» A1,A2 REST AFTER LOOP P SUK A2,1 ! PDVK:10 EQU * ! 0 P ADK A2,1 ! D P SUK A1,3 DIVIDE BY 3 ! V P RB(NN) DVK:10 ! t P ADK A1,3 REST ! , P* A1=REMAINER=LOGICAL SECTOR POSITION ! 2 P* A2=QUOTIENT=PHYSICAL SECTOR NUMBER ON DISC ! P*
0x22d790…22d924 Dummy {f00=0x00b1, f01=0x0190, f02=» * ! * P* SAVE PHYSICAL SECTOR NUMBER * " ( * P* AND SECTOR POSITION * " V * P* BRANCH ACCORDING TO SECTOR * " * P* POSITION * " * P* * "
0x22d924…22dab8 Dummy {f00=0x00b1, f01=0x0190, f02=»OR NUMBER / 3 " v P* # P* # P ADR A2,A2 # * * P STR A2,A6 SAVE PHYSICAL SECTOR NUMBER # < P SUK A1,1 # j P IFT RAW=1 # | * P ST A1,DWTSEP,A6 SAVE SECTOR POSITION # 2 P ST A2,DWTSEI,A6 SAVE 1ST PHYS. SECTOR NUMBER # P XIF # P* # P
0x22dab8…22dc4c Dummy {f00=0x00b1, f01=0x0190, f02=» , , XXXX, # * $ EJECT DRDU01 $ $ * $ : * P************************************* $ D * P* * $ r * P* READ/WRITE FROM SECTOR IN * $ * P* POSITION , , xxxx, * $ * P*
0x22dc4c…22dde0 Dummy {f00=0x00b1, f01=0x0190, f02=»FT RAW=1 $ , P IM DWTSEI,A6 SAVE FOR READ AFTER WRITE % P XIF % @ P* % L P IFT VERSA3=1 % V P CF A5,IOROUT % l P DATA /0084 % P SUK A7,1 % P RF RW:300 % P* % P EJECT DRDU01 % P* % * P************************************
0x22dde0…22df74 (5, 159) Dummy {f00=0x00b1, f01=0x0190, f02=» * % n * P* * & * P************************************* & : P* & h P* & r PRW:200 EQU * & | P CF A5,IOROUT & P DATA /0048 & P SUK A7,2 NUMBER OF SECTORS & P RF(N) RW:230 1 SECTOR IN IO & $ P RF(NZ
0x22df74…22e108 Dummy {f00=0x00b1, f01=0x0190, f02=» XX,XX , & P CF A5,IOROUT ' P DATA /0040 ' , P RF RW:600 ' @ PRW:260 EQU * , XX,XXXXXX, ' R P CF A5,IOROUT ' v P DATA /80C0 ' P* ' P EJECT DRDU01 ' P* ' ( P************************************ ' ( P*
0x22e108…22e29c Dummy {f00=0x00b1, f01=0x0190, f02=» * ' z ( P************************************ ( P* ( B P* ( L PRW:300 EQU * ( V P SUK A7,3 SECTOR COUNTER ( j 0 P RF(NG) RW:500 LESS THAN FOUR SECTORS IN IO ( P CF A5,IOROUT ( P DATA /80C0 ( P CF A5,IOROUT ( P DATA /80C
0x22e29c…22e430 Dummy {f00=0x00b1, f01=0x0190, f02=» * ( z ( P* READ/WRITE ON THE LAST SECTORS * ) ( P* IN IO * ) B ( P* * ) n ( P************************************ ) P* ) P* ) PRW:500 EQU * ) P RF(Z) RW:580 3 SECTORS )
0x22e430…22e5c4 Dummy {f00=0x00b1, f01=0x018e, f02=»T ) P DATA /0080 * P RF RW:600 * PRW:560 EQU * ,XXXXXX,XX , * 0 P CF A5,IOROUT * T P DATA /80C0 * j P CF A5,IOROUT * ~ P DATA /0040 * P RF RW:600 * PRW:580 EQU * ,XXXXXX,XXXXXX, * P CF A5,IOROUT * P DATA /80C0 * P
0x22e5c4…22e758 Dummy {f00=0x00b1, f01=0x0190, f02=» * P************************ + P* * + ( P* READ AFTER WRITE * + H P* * + h P************************ + P* + 0 P* DWTSEI=1:ST PHYSICAL SECTOR NUMBER IN IO + 8 P* 1ST POS IN DWT=LAST PHYSICAL S
0x22e758…22e8ec Dummy {f00=0x00b1, f01=0x0190, f02=» & P RF(NZ) RW:700 NOT PHYSICAL WRITE , P LDKL A2,-/100 , . , P LD A1,DWTSEP,A6 GET 1ST SECTOR POSITION , D P RF(Z) RW:645 , XX, , t P RF(P) RW:640 , XXXX, , P ADK A2,/80 , PRW:640 EQU * , P ADK A2,/80 , PRW:645 EQU * , , P ST A2,E
0x22e8ec…22ea80 Dummy {f00=0x00b1, f01=0x018e, f02=»ET NUMBER OF PHYSICAL SECTORS , P STR A1,A6 - & P* - 8 P EJECT DRDU01 - B P* - X P* - b PRW:650 EQU * - l P CF A5,IOROUT - P DATA /40C0 - P IMR A6 NEXT PHYSICAL SECTOR - P LDKL A1,PHSECL - " P ADS A1,ECBEL,A8 UPDATE ECBEL -
0x22ea80…22ec14 (5, 160) Dummy {f00=0x00b1, f01=0x0190, f02=» P IFT VERSA3=1 . PRW:700 EQU * . P LDK A1,0 RETURN CODE . . P ABL END:20 ENDIO . L P* . f P XIF . p P* . | P EJECT DRDU01 . P* . P IFT VERSA2=1 . P* . P* . & P********************************* . & P*
0x22ec14…22eda8 Dummy {f00=0x00b1, f01=0x0190, f02=»********* . x P* / P* / PRW:800 EQU * / & P CF A5,DIV31 / : P IFT RAW=1 / N @ P ST A7,DWTSEI,A6 SAVE NUMBER OF SECTORS FOR READ AFTER WRITE / ` P XIF / P* / P IFT VERSA2=1 / PRW:850 EQU * / P CF A5,IOROUT / " P DATA /A080 IN
0x22eda8…22ef3c Dummy {f00=0x00b1, f01=0x0190, f02=»SECTORS IN IO / | P* 0 P EJECT DRDU01 0 P* 0 6 P* 0 @ P IFT RAW=1 0 J P LD A7,DWTOR,A6 GET ORDER 0 P ANK A7,/FF 0 ~ P SUK A7,/15 0 P* 0 P IFT VERSA3=1 0 & P RB(NZ) RW:700 NOT PHYSICAL WRITE 0 P XIF 0 P* 0 P I
0x22ef3c…22f0d0 Dummy {f00=0x00b1, f01=0x018e, f02=» 0 . P CM ECBEL,A8 PREPARE FOR READ AFTER WRITE 1 P LD A7,DWTSEI,A6 1 : P CF A5,DIV31 1 R P* 1 f P EJECT DRDU01 1 p P* 1 P* 1 PRW:900 EQU * 1 P CF A5,IOROUT 1 P DATA /E080 READ AFTER WRITE 1 P SUK A7,1 1 P RB(NZ) RW:900
0x22f0d0…22f264 Dummy {f00=0x00b1, f01=0x0190, f02=» 1 PRW:905 EQU * 2 P LDK A1,0 RESET RETURN CODE 2 P ABL END:20 2 @ P XIF 2 T P* 2 ` P EJECT DRDU01 2 j P* 2 4 P*********************************************** 2 4 P* * 2 4 P* IOROUT PER
0x22f264…22f3f8 Dummy {f00=0x00b1, f01=0x0190, f02=» * 2 j 4 P*********************************************** 3 P* 3 J & P* INPUT : ONE DATA WORD AFTER CF 3 T * P* BIT 0 :INDICATES DIRECT IO 3 ~ 0 P* BIT 1 :INDICATES READ AFTER WRITE 3 * P* BIT 2 :INDICATES FORMAT A2 3
0x22f3f8…22f58c Dummy {f00=0x00b1, f01=0x018e, f02=» WILL BE CHECKED BY A READ 3 r @ P* DWTBSE CONTAINS THE PRESENT SECTOR IN THE DRIVER BUFFER 4 " & P* DWTRTY INDICATES RETRIES DONE 4 f H P* DWTSWD SAVED WORD FROM USER BUFFER WHEN IO NOT VIA DRIVER BUFFER 4 P* 4 PIOROUT EQU * 4 * P LDR* A3,A6 GE
0x22f58c…22f720 Dummy {f00=0x00b1, f01=0x0190, f02=» 4 t P SLL A4,2 5 P RF(NN) SEE:05 FORMAT A3 5 P ADK A3,0 5 : P XIF 5 L P* 5 X P EJECT DRDU01 5 b P* 5 x P* 5 P IFT VERSA2=1 5 " P RF(NZ) SEE:05 NOT CYLINDER 0 5 P CF A5,SEEKZ 5 P SLL A1,6 5 P RF(N) SEE:20 ERROR 5
0x22f720…22f8b4 (5, 161) Dummy {f00=0x00b2, f01=0x018e, f02=»FT NUNITS=1 5 P CM DWTCYL,A6 6 P RF VA2BR 6 * P XIF 6 < P* 6 H P EJECT DRDU01 6 R P* 6 h P* 6 r PSEE:05 EQU * 6 | P IFT NUNITS=2 6 P CF A5,INXUNI 6 * P CW A3,DWTCYL,A2 COMPARE WITH PRESENT 6 P XIF 6 P IFT NUNITS=1 6
0x22f8b4…22fa48 Dummy {f00=0x00b2, f01=0x018e, f02=» P IFT VERSA2=0 7 P IFT VERSA3=1 7 " P RF(E) SEE:90 HEAD IN POSITION 7 0 P XIF 7 V P* 7 b P IFT VERSA2+VERSA3=2 7 l $ P RF(NE) SEE:07 NOT SAME CYLINDER 7 P ADK A4,0 7 P RF(N) VA2BR FORMAT A2 7 P RF SEE:90 7 P* 7 P EJECT DRDU
0x22fa48…22fbdc Dummy {f00=0x00b2, f01=0x0190, f02=» P XIF 8 P* 8 P IFT NUNITS=2 8 " P ST A3,DWTCYL,A2 NEW CYLINDER 8 0 P XIF 8 V $ P LDK A4,QRETRY NUMBER OF RETRIES 8 b PSEE:10 EQU * 8 P IFT NUNITS=2 8 $ P CF A5,INXUNI DOUBLED UNIT INDEX 8 P XIF 8 P CF A5,SEEK 8 P SLC A1,5 RE
0x22fbdc…22fd70 Dummy {f00=0x00b2, f01=0x0190, f02=»ZERO 8 z P SLC A1,6 RETURN CODE 9 P RF(N) SEE:20 ERROR 9 * P IM DWTRTY,A6 INDICATE RETRY 9 F P SUK A4,1 RETRY COUNTER 9 j P RB(NZ) SEE:10 TRY AGAIN 9 PSEE:20 EQU * 9 P LDKL A3,/FFFF 9 P IFT NUNITS=2 9 P CF A5,INXUNI 9 * P ST A3,D
0x22fd70…22ff04 Dummy {f00=0x00b2, f01=0x0190, f02=»1,/02 RETURN CODE 9 P RF SEE:35 END IO : P* : 4 P EJECT DRDU01 : > P* : T P* : ^ PSEE:30 EQU * : h P IFT NUNITS=2 : | P CF A5,INXUNI : P XIF : P IFT VERSA2+VERSA3=2 : P LD* A1,4,A5 GET DATA WORD : P SLL A1,2 : P RF(
0x22ff04…230098 Dummy {f00=0x00b2, f01=0x0190, f02=»* : P LDK A3,0 ; P CF A5,SKEW ; P LDKL A1,/8002 READ 2 WORDS ; 0 * P LDKL A2,BUFFER READ TO DRIVER BUFFER ; T P CF A5,CIO:50 ; P ANK A1,/1F ERROR CHECK ; P RF(NZ) SEE:32 ; P LD A3,BUFFER GET CYL ID ; P IFT NUNITS=2 ; P CF
0x230098…23022c Dummy {f00=0x00b2, f01=0x0190, f02=»A6 CHECK IF SAME CYLINDER ; P XIF < " P IFT VERSA2=1 < . " P RB(NE) SEE:15 NOT SAME CYL ID < D PVA2BR EQU * < j P ABL VA2:00 < ~ P XIF < P* < P IFT VERSA3=1 < P EJECT DRDU01 < P* < P* < P* FORMAT A3 < P* < P
0x23022c…2303c0 Dummy {f00=0x00b2, f01=0x018e, f02=»A6 < P XIF = P* = P IFT VERSA3=1 = P SLL A3,5 GET SECTOR NUMBER = 6 $ P ST A3,DWTBSE,A6 SAVE FOR BSELOD = Z P LDK A3,0 = . P CF A5,SKEW TO READ SECTOR 0 OR 8 ON DISC = 0 P IM DWTFBU,A6 INDICATE READ TO DRIVER BUFFER = P CF A5,READ =
0x2303c0…230554 (5, 162) Dummy {f00=0x00b2, f01=0x0190, f02=» = ~ P XIF > P* > PSEE:32 EQU * > P IM DWTRTY,A6 INDICATE RETRY > 2 P SUK A4,1 RETRY COUNTER > V P RB(NZ) SEE:15 RETRY > v PSEE:35 EQU * > P ABL END:10 > P* > P IFT VERSA3=1 > P* > P EJECT DRDU01 > P* > P* >
0x230554…2306e8 Dummy {f00=0x00b2, f01=0x0190, f02=»3=1 > P IFT NUNITS=1 ? ( P LD A3,DWTCYL,A6 GET CYLINDER NUMBER ? " P XIF ? N P IFT VERSA3=1 ? Z , P CW A3,BUFFER+PHSECL COMPARE WITH CYL ID ? p P RB(NE) SEE:15 RETRY ? P* ? P EJECT DRDU01 ? P* ? P************************* ? P
0x2306e8…23087c Dummy {f00=0x00b2, f01=0x0190, f02=»************************* ? P* @ " PSEE:90 EQU * @ , P LD A4,DWTOR,A6 GET ORDER @ @ P ANK A4,4 @ b P RF(Z) READ00 READ ORDER @ t P LD* A2,4,A5 @ 0 P RF(N) WRIT20 WRITE DIRECT FROM USER BUFFER @ P SLL A2,1 @ P IFT RAW=1 @ " P RF(N) R
0x23087c…230a10 Dummy {f00=0x00b2, f01=0x0190, f02=» @ j 0 P IM DWTFBU,A6 INDICATE READ TO DRIVER BUFFER A $ P CF A5,REA:00 READ BEFORE WRITE A < P* A d P EJECT DRDU01 A n P* A P* A PWRIT10 EQU * A P LD* A2,4,A5 GET DATA WORD A P LDR A4,A2 A , P ANK A4,/C0 GET NUMBER OF WORDS TO MOVE
0x230a10…230ba4 Dummy {f00=0x00b2, f01=0x018e, f02=» P IFT NUNITS=2 B P CF A5,INXUNI B ( P LD A2,DWTCYL,A2 GET CYLINDER NUMBER B 0 P XIF B P IFT VERSA3=1 B h P IFT NUNITS=1 B ~ ( P LD A2,DWTCYL,A6 GET CYLINDER NUMBER B P XIF B P IFT VERSA3=1 B . P ST A2,BUFFER+PHSECL PUT IN DRIVER BUF
0x230ba4…230d38 Dummy {f00=0x00b2, f01=0x0190, f02=» B P EJECT DRDU01 C P* C P* C ( PWRIT20 EQU * C 2 P IFT MMUPAG=0 C F * P LDKL A2,PHSECL PHYSICAL SECTOR LENGTH C 0 P ADS A2,DWTUBU,A6 UPDATE USER BUFFER POINTER C . P LD* A4,DWTUBU,A6 GET WORD IN USER BUFFER C P ST A4,DWTSWD,A6 SAVE WO
0x230d38…230ecc Dummy {f00=0x00b2, f01=0x0190, f02=» ( P ST* A2,DWTUBU,A6 PUT IN USER BUFFER D P XIF D 0 P IFT VERSA3=1 D < P IFT MMUPAG=0 D R P IFT NUNITS=1 D h P LD A2,DWTCYL,A6 D ~ ( P ST* A2,DWTUBU,A6 PUT IN USER BUFFER D P XIF D P* D P IFT VERSA3=1 D P IFT MMUPAG=1 D P IFT
0x230ecc…231060 Dummy {f00=0x00b2, f01=0x0190, f02=» P IFT NUNITS=1 E ( P LD A4,DWTCYL,A6 GET CYLINDER NUMBER E P XIF E F P IFT VERSA3=1 E R P IFT MMUPAG=1 E h 0 P ML 2,DWTBA1,A6 GET PHYSICAL BUFFER ADDRESS E ~ P RF(Z) WRIT30 SYSTEM AREA E ( P TS -30,A15 SAVE REGISTERS ON STACK E ( P TL DWTP
0x231060…2311f4 (5, 163) Dummy {f00=0x00b2, f01=0x0190, f02=»,PHSECL,A2 PUT CYL ID IN POSITION E P TL -30,A15 GET REGISTERS F * P RF WRIT40 F L PWRIT30 EQU * F ^ P SLL A2,1 BYTE ADDRESS F r * P LD A3,PHSECL,A2 GET WORD TO BE SAVED F ( P ST A4,PHSECL,A2 CYL ID IN POSITION F PWRIT40 EQU * F P ST A3,DWT
0x2311f4…231388 Dummy {f00=0x00b2, f01=0x0190, f02=»TE FROM USER BUFFER F v 0 P CF A5,WRI:00 WRITE SECTOR FROM USER BUFFER G . P CF A5,REWORD RESTORE WORD TO USER BUFFER G P P RF SEE:95 G P* G P EJECT DRDU01 G P* G P* G P IFT RAW=1 G PREADWR EQU * G " P CF A5,REA:10 READ AFTER W
0x231388…23151c Dummy {f00=0x00b2, f01=0x018e, f02=»EAD20 DIRECT READ G 0 P IM DWTFBU,A6 INDICATE READ TO DRIVER BUFFER H ( P CF A5,REA:00 READ TO DRIVER BUFFER H N P LD* A1,4,A5 GET DATA WORD H z P SLL A1,1 H P LDR A4,A1 H 2 P ANKL A4,/180 GET NUMBER OF BYTES TO BE MOVED H P ANK A1,/18 GET PO
0x23151c…2316b0 Dummy {f00=0x00b2, f01=0x018e, f02=» 0 P ADS A3,DWTUBU,A6 UPDATE USER BUFFER POINTER I P XIF I 8 P* I D P IFT VERSA3=1 I N . P CM DWTFBU,A6 INDICATE READ TO USER BUFFER I d & P CF A5,REA:00 READ TO USER BUFFER I PSEE:95 EQU * I * P IMR A6 UPDATE PHYSICAL SECTOR POINTER I P XIF I
0x2316b0…231844 Dummy {f00=0x00b2, f01=0x018e, f02=» P SLL A2,1 J " P ADS A2,ECBEL,A8 UPDATE ECBEL J P* J < P IFT MMUPAG=1 J F P LDK A1,0 J P SRL A2,1 WORD MODE J n 0 P DA DWTBA1,A6 UPDATE PHYSICAL BUFFER ADDRESS J & P CF A5,MMULOG GET LOGICAL ADDRESS J P XIF J P* J PSEE:97 EQU
0x231844…2319d8 Dummy {f00=0x00b2, f01=0x0190, f02=» J P* K P* K $ P******************************** K $ P* * K D $ P* DISC FORMAT A2 * K l $ P* * K $ P******************************** K P* K P* K PVA2:00 EQU * K
0x2319d8…231b6c Dummy {f00=0x00b2, f01=0x0190, f02=»A5,INLACE INTERLACE AND SKEW K P* L $ P IFT MMUPAG=0 L . P LDKL A1,/8080 1ST WER L D P IFT RAW=1 L b P LD* A2,4,A5 L t P SLL A2,1 L ( P RF(NN) VA2:20 NOT READ AFTER WRITE L P LDKL A2,BUFFER L P RF VA2:35 L PVA2:20 EQU * L P XIF
0x231b6c…231d00 Dummy {f00=0x00b2, f01=0x018e, f02=» L P IFT RAW=1 M P IFT MMUPAG=1 M P LD* A2,4,A5 M 0 P SLL A2,1 M D ( P RF(NN) VA2:20 NOT READ AFTER WRITE M V P LDKL A1,/8080 M P LDKL A2,BUFFER M P RF VA2:35 M PVA2:20 EQU * M P XIF M P* M P IFT VERSA2=1 M P LD A2
0x231d00…231e94 (5, 164) Dummy {f00=0x00b2, f01=0x0190, f02=» P* N P IFT VERSA2=1 N P IFT MMUPAG=1 N $ " P LDKL A1,/080C 1ST WER SHIFTED N : P XIF N ` P* N l P IFT VERSA2=1 N v " P ADK A3,1 ORDER CODE FOR WRITE N P* N P EJECT DRDU01 N P* N P* N PVA2:30 EQU * N P* N P IFT
0x231e94…232028 Dummy {f00=0x00b2, f01=0x0190, f02=»A DWTBA1,A6 N " P SRC A1,4 1ST WER IN POSITION O " P SLL A2,1 2ND WER IN POSITION O : P XIF O ` P* O l P IFT VERSA2=1 O v PVA2:35 EQU * O P CF A5,CIO:50 O P ANK A1,/1F O P RF(Z) VA2:40 IO ERROR O P IM DWTRTY,A6 O P SUK A4,1
0x232028…2321bc Dummy {f00=0x00b2, f01=0x0190, f02=»* A3,A6 GET PHYSICAL SECTOR NUMBER O P ADK A3,1 NEXT SECTOR P * P LDR A2,A3 P H P CWK A2,31 P Z " P RF(NE) VA2:50 NOT CYLINDER 0 P l & P ADK A3,2 CYLINDER 0 TO CYLINDER 1 P PVA2:50 EQU * P P ANK A2,/1F P P RF(NZ) VA2:60 SAME CYLINDER P P
0x2321bc…232350 Dummy {f00=0x00b2, f01=0x0190, f02=» VERSA3=1 P EJECT DRDU01 Q * Q ( P**************************** Q 2 P* * Q V P* SUBROUTINES FOR WRITE * Q z P* FROM USER BUFFER: * Q P* FROM DRIVER : * Q P* * Q
0x232350…2324e4 Dummy {f00=0x00b2, f01=0x0190, f02=» P CF A5,INXUNI R P XIF R P IFT VERSA3=1 R & * P CF A5,INLACE INTERLACE SECTOR NUMBER R < CF A5,WRITE CIO R j ANK A1,/1F RETURN CODE ? R P CF A5,BSELOD R P RF(Z) WRI:80 NO RETURN CODE R P IM DWTRTY,A6 INDICATE RETRY R & ! SUK A
0x2324e4…232678 Dummy {f00=0x00b2, f01=0x0190, f02=»QU * R P ABL END:10 ERROR END IO S P* S , P IFT VERSA3=1 S 6 P* S L PWRI:80 EQU * S V P RTN A5 S j * S z P EJECT DRDU01 S P* S & P********************************* S & P* * S & P* SUBROUTINES
0x232678…23280c Dummy {f00=0x00b2, f01=0x0190, f02=» * S v & P********************************* T P* T : PREA:00 EQU * T D P LD A3,DWTOR,A6 GET INDEX T X P ANKL A3,/300 T z P SLL A3,6 IN POSITION T " P ORR* A3,A6 ADD SECTOR NUMBER T $ P CW A3,DWTBSE,A6 ALLREADY READ ? T P RF(E) REA:8
0x23280c…2329a0 Dummy {f00=0x00b2, f01=0x0190, f02=»SA3=1 T * P CF A5,INLACE INTERLACE SECTOR NUMBER U P CF A5,READ READ SECTOR U < P ANK A1,/F U 0 P CF A5,BSELOD UPDATE DRIVER BUFFER INDICATOR U n P RF(Z) REA:30 NO RETURN CODE U PREA:25 EQU * U P IM DWTRTY,A6 INDICATE RETRY U & P SUK A4,1
0x2329a0…232b34 (5, 165) Dummy {f00=0x00b3, f01=0x0190, f02=»30 EQU * U P LD A2,DWTFBU,A6 V ( P RF(NZ) REA:40 READ TO DRIVER BUFFER V ( P IFT MMUPAG=0 V T 6 P LD* A3,DWTUBU,A6 GET CYLINDER ID FROM USER BUFFER V j P RF REA:50 V P XIF V P* V P IFT VERSA3=1 V P IFT MMUPAG=1 V ( P ML 2,DWTBA1,A6
0x232b34…232cc8 Dummy {f00=0x00b3, f01=0x0190, f02=»,DWTUBU,A6 GET LOGICAL BUFFER POINTER V P EL A3,PHSECL,A3 GET CYL ID W . P TL -30,A15 RESET REGISTERS W R P RF REA:50 W v PREA:35 EQU * W " P SLL A2,1 ADDRESS TO BYTE MODE W P LD A3,PHSECL,A2 GET CYL ID W P RF REA:50 W P XIF W P* W
0x232cc8…232e5c Dummy {f00=0x00b3, f01=0x0190, f02=»,INXUNI W P CW A3,DWTCYL,A2 X P XIF X ( P IFT VERSA3=1 X 4 P IFT NUNITS=1 X J P CW A3,DWTCYL,A6 X ` P XIF X x P IFT VERSA3=1 X $ P RF(E) REA:90 RIGHT CYLINDER ID X P LDK A1,2 SEEK ERROR X P* X P EJECT DRDU01 X P* X P
0x232e5c…232ff0 Dummy {f00=0x00b3, f01=0x0190, f02=»TO BE MOVED X | P IFT MMUPAG=0 Y P NGR A2,A4 Y * @ P ADS A2,DWTUBU,A6 RESET USER BUFFER POINTER FOR DIRECT MOVE Y < P XIF Y P IFT VERSA3=1 Y & P CF A5,MOVRED MOVE TO USER BUFFER Y PREA:90 EQU * Y P RTN A5 Y P* Y EJECT DRDU01
0x232ff0…233184 Dummy {f00=0x00b3, f01=0x0190, f02=»FOR MOVING WORDS * Y & P* USER BUFFER TO DRIVER BUFFER: Z * P* MOVWRI * Z H * P* DRIVER BUFFER TO USER BUFFER * Z v * P* MOVRED * Z * P* * Z * P********
0x233184…233318 Dummy {f00=0x00b3, f01=0x018e, f02=»NGTH Z ~ * A3 USED [ P* [ " PMOVRED EQU * [ , P ADKL A1,BUFFER [ @ P IFT MMUPAG+CPU857=0 [ X 2 P LD A2,DWTUBU,A6 PRESENT POINT IN USER BUFFER [ t P XIF [ P* [ P IFT VERSA3=1 [ P IFT CPU852+MMUPAG=0 [ P IFT CPU857=1 [ , P
0x233318…2334ac Dummy {f00=0x00b3, f01=0x0190, f02=» P IFT VERSA3=1 P IFT CPU852=0 P IFT MMUPAG=1 0 0 P LD A2,DWTBA2,A6 GET PHYSICAL BUFFER ADDRESS F P SLL A2,1 BYTE MODE z P TS -30,A15 SAVE REGISTERS P TL DWTPAG,A6 ( P LD A2,DWTUBU,A6 GET LOGICAL ADDRESS P MVSU A4
0x2334ac…233640 Dummy {f00=0x00b3, f01=0x0190, f02=» ADKL A2,BUFFER DRIVER BUFFER POINTER P IFT MMUPAG+CPU857=0 ] . 2 P LD A1,DWTUBU,A6 PRESENT POINT IN USER BUFFER ] J P XIF ] P* ] P IFT VERSA3=1 ] P IFT CPU852+MMUPAG=0 ] P IFT CPU857=1 ] , P LD A1,DWTUBU,A6 GET USER BUFFER POINTER ]
0x233640…2337d4 (5, 166) Dummy {f00=0x00b3, f01=0x0190, f02=» P IFT MMUPAG=1 ^ 0 P LD A1,DWTBA2,A6 GET PHYSICAL BUFFER ADDRESS ^ P SLL A1,1 BYTE MODE ^ N P TS -30,A15 SAVE REGISTERS ^ j P TL DWTPAG,A6 ^ ( P LD A1,DWTUBU,A6 GET LOGICAL ADDRESS ^ P MVUS A4 ^ P XIF ^ P* ^ P IFT VERSA3=1 ^
0x2337d4…233968 Dummy {f00=0x00b3, f01=0x0190, f02=»1 ^ P IFT MMUPAG=1 _ P TL -30,A15 RESET REGISTERS _ P XIF _ D P* _ P P IFT VERSA3=1 _ Z P IFT MMUPAG+CPU857=0 _ p P IFT CPU852=1 _ P* _ P EJECT DRDU01 _ P* _ P* _ PMOV:10 EQU * _ LDR* A3,A1 _ STR A3,A2
0x233968…233afc Dummy {f00=0x00b3, f01=0x0190, f02=»852=0 _ P IFT MMUPAG+CPU857=0 ` ( P MSR 12,A15 SAVE REGISTERS ON STACK ` * P LDR A11,A4 NUMBER OF BYTES ` V P LDR A10,A2 OUTPUT ADDRESS ` z P LDR A9,A1 INPUT ADDRESS ` $ P LDKL A12,16 BYTES IN EACH LOOP ` PMOV:15 EQU * ` P MLR 8,A9 `
0x233afc…233c90 Dummy {f00=0x00b3, f01=0x0190, f02=» STACK ` n P XIF a P* a P IFT VERSA3=1 a $ RTN A5 a : * a J P XIF a T P* a ` P IFT VERSA2=1 a j P EJECT DRDU01 a P* a P* a P*************************** a P* * a P* DIV31
0x233c90…233e24 Dummy {f00=0x00b3, f01=0x0190, f02=» a h 0 P* OUTPUT: 1ST DWT = PHYSICAL SECTOR NUMBER b P* b < PDIV31 EQU * b F P* b Z P IFT CPU852=1 b d . P LD A1,ECBCW2,A8 GET LOGICAL SECTOR NUMBER b z P LDR A3,A1 b P LDK A2,0 b PDIV:20 EQU * b P ADR A2,A3 I0:=I0+I1 b P SRL A3,
0x233e24…233fb8 Dummy {f00=0x00b3, f01=0x018e, f02=»3,A1 b P ADK A3,31 c P RF(P) DIV:30 c P ADK A2,1 NEXT CYLINDER c 4 PDIV:30 EQU * c T P ADK A2,0 c h P RF(Z) DIV:50 CYLINDER 0 c z P ADR A1,A2 c P ADK A1,1 c P* c P EJECT DRDU01 c P* c P* c PDIV:50 EQU * c 0 P S
0x233fb8…23414c Dummy {f00=0x00b3, f01=0x0190, f02=» c & P LD A2,ECBCW2,A8 GET SECTOR NUMBER d & P STR A2,A6 PHYSICAL SECTOR NUMBER d 2 P LDK A1,0 d P DVK 31 d n P ADK A2,0 d ~ P RF(Z) DIV:10 CYLINDER 0 d P ADK A2,1 d PDIV:10 EQU * d & P ADRS A2,A6 PHYSICAL SECTOR NUMBER d P RTN A5
0x23414c…2342e0 Dummy {f00=0x00b3, f01=0x0190, f02=»* d p & P* SUBROUTINES FOR * e & P* INTERLACING AND/OR * e 4 & P* SKEWING * e ^ & P* * e & P********************************* e P* e B P* OUTPUT : A3 CONTAINING INTERLAC
0x2342e0…234474 (5, 167) Dummy {f00=0x00b3, f01=0x0190, f02=»3,A3 e $ P ADR A3,A1 INTERLACING FACTOR 3 f PSKEW EQU * f 4 P IFT NUNITS=2 f F ( P LD A2,DWTCYL,A2 GET CYLINDER NUMBER f P XIF f P IFT NUNITS=1 f ( P LD A2,DWTCYL,A6 GET CYLINDER NUMBER f P XIF f P ANK A2,1 f P RF(Z) INLAC5 EVEN C
0x234474…234608 Dummy {f00=0x00b3, f01=0x0190, f02=» P* g P IFT NUNITS=2 g P EJECT DRDU01 g $ P* g : P* g D P********** g N P* INXUNI * g ` P********** g r P* g 4 P* OUTPUT A2=DOUBLED UNIT INDEX + DWT ADDRESS g P* g PINXUNI EQU * g P LC A2,DWTOR,A6 g P ANK A2,2 g
0x234608…23479c Dummy {f00=0x00b3, f01=0x0190, f02=»******************************** g . P* * h ( . P* MMULOG : GET LOGICAL ADDRESS AND * h Z . P* PAGE * h . P* * h . P************************
0x23479c…234930 Dummy {f00=0x00b3, f01=0x018e, f02=»1,6 IN POSITION h P ST A1,DWTPAG,A6 PAGE i P ADKL A1,/400 NEXT PAGE i 6 ( P ST A1,DWTPAG+2,A6 PSEUDO MMU TABLE i V P SRL A2,3 i $ P ST A2,DWTUBU,A6 LOGICAL ADDRESS i P RTN A5 i P* i P XIF i P* i P EJECT DRDU01 i P* i
0x234930…234ac4 Dummy {f00=0x00b3, f01=0x0190, f02=» P* j $ P******************************* j P* j 6 * P* INPUT A1=RETURN CODE (AFTER READ) j @ . P* OUTPUT DWTBSE=DRIVER BUFFER INDICATOR j n P* j PBSELOD EQU * j & P LDR* A3,A6 GET READ SECTOR NUMBER j " PBSEL00 EQU * FROM SEEK VERIFY j
0x234ac4…234c58 Dummy {f00=0x00b3, f01=0x0190, f02=»40 READ ERROR j P LD A2,DWTOR,A6 GET INDEX k P ANKL A2,/300 k 8 P SLL A2,6 k N P ORR A2,A3 k ` PBSEL40 EQU * k r 4 P ST A2,DWTBSE,A6 UPDATE DRIVER BUFFER INDICATOR k PBSEL50 EQU * k P RTN A5 k P* k P EJECT DRDU01 k P* k
0x234c58…234dec Dummy {f00=0x00b3, f01=0x0190, f02=»UFFER * k v , P* IF NECESSARY * l , P* * l F , P*************************************** l v P* l * P* INPUT: DWTFSW=SAVED WORD INDICATOR l P* DWTSWD=SAVED WORD l , P*
0x234dec…234f80 Dummy {f00=0x00b3, f01=0x0190, f02=»A3,DWTSWD,A6 l P IFT MMUPAG=1 m & P ML 2,DWTBA1,A6 GET BUFFER ADDRESS m * P RF(Z) REWO20 SYSTEM AREA m T P TS -30,A15 SAVE REGISTERS m v $ P TL DWTPAG,A6 SET MMU REGISTERS m 0 P LD A2,DWTUBU,A6 GET LOGICAL BUFFER ADDRESS m ( P ES A3,PHSECL,A2 RES
0x234f80…235114 (5, 168) Dummy {f00=0x00b3, f01=0x018e, f02=»ECL,A2 RESTORE WORD m P XIF n P* n ( P IFT VERSA3=1 n 2 P IFT MMUPAG=0 n H ( P ST* A3,DWTUBU,A6 RESTORE SAVED WORD n ^ P XIF n P* n P IFT VERSA3=1 n ( P CM DWTFSW,A6 INDICATE NO SAVED WORD n PREWO50 EQU * n P RTN A5 n P*
0x235114…2352a8 Dummy {f00=0x00b3, f01=0x0190, f02=» P* SEEK CYLINDER * o P* * o P******************* o < P* o X P* o b PSEEK EQU * o l P IFT NUNITS=2 o ~ $ P LD A3,DWTCYL,A2 CYLINDER NUMBER o P XIF o P IFT NUNITS=1 o P LD A3,DWTCYL,A6 o P XIF o P SLL A
0x2352a8…23543c Dummy {f00=0x00b3, f01=0x018e, f02=»T o x P* p P EJECT DRDU01 p P* p * P* p 4 & P********************************** p > & P* * p h & P* CIO: READ AND WRITE * p & P* * p & P**********************************
0x23543c…2355d0 Dummy {f00=0x00b3, f01=0x0190, f02=» p P LDKL A1,/80C1 1ST WER q P RF CIO:20 q & PWRITE EQU * q 8 P LDKL A1,/C0C1 1ST WER q L P ADK A3,1 ORDER CODE q j PCIO:20 EQU * q P LD A2,DWTFBU,A6 q , P RF(NZ) CIO:30 IO FROM/TO DRIVER BUFFER q ( P LD A2,DWTUBU,A6 USER BUFFER POINTER q
0x2355d0…235764 Dummy {f00=0x00b3, f01=0x0190, f02=» IFT VERSA3=1 q P IFT MMUPAG=1 r PREAD EQU * r , " P LDKL A1,/0C18 1ST WER SHIFTED r > P RF CIO:20 r d PWRITE EQU * r v " P LDKL A1,/0C1C 1ST WER SHIFTED r P ADK A3,1 ORDER CODE r PCIO:20 EQU * r P LD A2,DWTFBU,A6 r , P RF(NZ) CIO:30 I
0x235764…2358f8 Dummy {f00=0x00b3, f01=0x0190, f02=»30 EQU * r * P LDKL A2,BUFFER DRIVER BUFFER ADDRESS s PCIO:40 EQU * s > " P SRC A1,4 1ST WER IN POSITION s R P XIF s x P* s PCIO:50 EQU * s P WER A1,WER1 s P WER A2,WER1+1 s P* s P EJECT DRDU01 DRDU01 s P* s P* s
0x2358f8…235a8c Dummy {f00=0x00b3, f01=0x0190, f02=» INDEXED DWT ADDRESS s ~ $ P EX DWTCIO,A4 EXECUTE CIO-START t & P ABL(3) END:30 CU ADDRESS UNKNOWN t D PCIOAB EQU * t n " P ST A5,DWTA5,A6 A5 t ( P ST A7,DWTA2,A6 SAVE SECTOR COUNTER t P* t & PT:DISP ABL TDISP GO TO DISPATCHER t P
0x235a8c…235c20 Dummy {f00=0x00b3, f01=0x018e, f02=»UTINE * t P* * u P********************** u . P* u L P* u V PDUON EQU * u ` P* u r P IFT CPU852=1 u | & P CF A15,SAVE8 SAVE A1-A8 ON STACK u P XIF u P* u P IFT CPU852=0 u " P MSR 8,A15 SAVE A1-A8 ON STACK u
0x235c20…235db4 (5, 169) Dummy {f00=0x00b4, f01=0x0190, f02=» $ P CM DWTSAV,A6 INDICATE RECOVERY v & P LD A1,INIFLG INITIALIZATION FLAG v , P RF(NZ) DUON05 NOT POWER UP v V P* v z P EJECT DRDU01 v P* v P* v P CM DWTOR,A6 1ST UNIT v " P CF A5,SEEKZ TEST IF OPERABLE v P ANK A1,1 v P RF(
0x235db4…235f48 Dummy {f00=0x00b4, f01=0x0190, f02=» v P RF(NZ) DUON26 NOT OPERABLE w P XIF w , P* w 8 P EJECT DRDU01 w B P* w Z P* w d PDUON05 EQU * w n P CM DWTOR,A6 w " P CF A5,VO:NAM READ VOLUME NAME w P ANK A1,1 w P RF(Z) DUON07 NO ERROR w $ P CM DWTOR,A6 PREPARE FOR VOL
0x235f48…2360dc Dummy {f00=0x00b4, f01=0x0190, f02=»WTOR,A6 w P CF A5,VO:NAM x P ANK A1,1 x & P RF(Z) DUON08 NO ERROR x 8 P LDK A1,2 OTHER DISC UNIT x V P SC A1,DWTOR,A6 x x P LDK A1,12 x P CF A15,VOLCLR x PDUON08 EQU * x P XIF x , P IM DWTST,A6 INDICATE VOLUME NAMES READ x P
0x2360dc…236270 Dummy {f00=0x00b4, f01=0x0190, f02=»DDRESS x v P RF(Z) END:IO NO REQUEST ON? y P* y 2 $ PDUON10 LD A7,DWTORD,A6 GET ORDER y < , P ST A7,DWTOR,A6 RESTORE INDEX AND ORDER y d P ANK A7,/3F y P* y P IFT VERSA3=1 y , P CF A5,REWORD RESTORE WORD IF NECESSARY y P XIF y P* y
0x236270…236404 Dummy {f00=0x00b4, f01=0x0190, f02=»DY INTERRUPT y P* z PDUREDY LD A1,TIMER z " P RF(Z) DUON50 NO TIMER ACTIVE z 8 P* z ^ P IFT NUNITS=1 z h P CM* TIMER KILL TIMER z ~ P RF DUON40 z P XIF z P* z P IFT NUNITS=2 z P RB T:DISP TIMER ACTIVE z P XIF z P*
0x236404…236598 Dummy {f00=0x00b4, f01=0x0190, f02=» RF(Z) DUON30 NO TIMER ACTIVE z P LDKL A1,-TIME { & P STR A1,A3 RESTART TIMER { < P RB T:DISP { P* { n P* { x $ PDUON30 CF A15,SETIMP START TIMER { , P DATA DUON40,TIME TIME OUT ADDRESS, TIME { P RB T:DISP { P* { P* TIME OUT {
0x236598…23672c Dummy {f00=0x00b4, f01=0x0190, f02=» RECOVERY { z " P LDK A5,DWTSB3 GET STACK BASE | P ADR A5,A6 | 8 P RB DUON05 | J P* | P EJECT DRDU01 DRDU01 | f P* | P* | P*********************** | P* * | P* INTERRUPT HANDLER * | P*
0x23672c…2368c0 Dummy {f00=0x00b4, f01=0x018e, f02=»TSAV SAVE LAST INTERRUPT | P* } 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 DISC UNIT NO. 1 } P* } P EJE
0x2368c0…236a54 (5, 170) Dummy {f00=0x00b4, f01=0x0190, f02=» } " P RB(N) DUREDY READY INTERRUPT ~ P SRL A1,1 ~ . P LDR A2,A1 ~ @ P ANKL A2,/200 SEEK ERROR ~ R P RF(Z) IHDU30 ~ r & P ANKL A1,/440F MOVE SEEK ERROR BIT ~ P ORK A1,/02 ~ PIHDU30 EQU * ~ P LD A8,DWTECB,A6 ECB ADDRESS ~ P LD A2,DWT
0x236a54…236be8 Dummy {f00=0x00b4, f01=0x0190, f02=»DWTA5,A6 RELOAD REGISTERS A5 ~ ( P LD A4,DWTA4,A6 A4 $ & P LD A7,DWTA2,A6 GET SECTOR COUNTER P P RTN A5 z P* P EJECT DRDU01 DRDU01 P* P* P******************* P* * P* PERFO
0x236be8…236d7c Dummy {f00=0x00b4, f01=0x018e, f02=» LDK A1,1 NOT OPERABLE * P ST A1,DWTST,A6 INDICATE RECOVERY DONE P RF END:IO L PEND:10 EQU * ^ P* r P IFT RAW=1 | . P LD* A7,DWTSB3-2,A6 GET 1ST RETURN ADDRESS P SLL A7,1 " P RF(N) END:20 READ AFTER WRITE P LD A7,DWTORD,A6
0x236d7c…236f10 Dummy {f00=0x00b4, f01=0x018e, f02=» n P XIF P* PEND:20 EQU * P LDKL A2,/FF00 2 P ANS A2,ECBEL,A8 H ( P LD A2,DWTRTY,A6 GET RETRY INDICATOR ` " P RF(Z) END:IO NO RETRIES DONE * P ORKL A1,/100 SET BIT 7 IN RETURN CODE P EJECT DRDU01 P* P*
0x236f10…2370a4 Dummy {f00=0x00b4, f01=0x0190, f02=» P* PVO:NAM EQU * P CF A5,SEEKZ SEEK SECTOR 0 " P ANK A1,1 F 6 P RF(NZ) VO:NA8 SEEK-,THROUGHPUT ERROR,NOT OPERABLE X P CMR A6 SECTOR 0 P IFT NUNITS=2 P CF A5,INXUNI P CM DWTCYL,A2 CYLINDER 0 P XIF P IFT N
0x2370a4…237238 Dummy {f00=0x00b4, f01=0x018e, f02=» BUFFER t P CF A5,READ P ANK A1,3 $ 0 P CF A5,BSELOD UPDATE DRIVER BUFFER INDICATOR 6 P XIF j P* v P IFT VERSA3=0 $ P LDKL A1,/8019 READ SECTOR ZERO $ P LDKL A2,BUFFER TO DRIVER BUFFER P CF A5,CIO:50 P ANK A1,3 ER
0x237238…2373cc Dummy {f00=0x00b4, f01=0x018e, f02=» x P LD A1,DWTSAV,A6 P RF(Z) VO:NA6 ( P LDKL A3,/80F0 INDICATE TEST STATUS 6 PVO:NA6 EQU * b 2 P CF A15,VOLGET VOLUMR NAME TO DWT INDICATE NVL v P EJECT DRDU01 P* P* PDUNA40 EQU * P LDK A1,1 6 P LDK A7,1
0x2373cc…237560 Dummy {f00=0x00b4, f01=0x0190, f02=» x 4 P LD A2,BUFFER+40 CHECK IF RELEASE 10 OR GREATER P CWK A2,/2031 @ $ P RF(NE) DUNA70 REL LESS THAN 10 V : P LD A2,BUFFER+48 GET FORMAT AND DEVICE TYPE PARAMETER ~ 4 PTRANPA EQU * LABEL FOR TRANSFER PARAMETER ORDER * P CF A15,INXDWT GET I
0x237560…2376f4 (5, 171) Dummy {f00=0x00b4, f01=0x018e, f02=»AMETER p ( P LDKL A1,6324 SECTORS ON VERSION A2 P SUK A3,2 FORMAT ? : P RF(Z) DUNA60 VERSION A2 T P RF(N) DUNA50 VERSION A1 t P ADK A1,204 VERSION A3 PDUNA50 EQU * P ADKL A1,9588-6324 PDUNA60 EQU * P SUK A2,1 P R
0x2376f4…237888 Dummy {f00=0x00b4, f01=0x018e, f02=» h 4 P LDK A1,0 RESET RETURN CODE FOR TRANSFER PARAM. * P ADK A7,0 CHECK IF TRANSFER PARAMETER @ P RB(Z) END:20 n P* P EJECT DRDU01 P* P* * P LD A4,DWTA4,A6 RESTORE RETRY COUNTER P LC A1,DWTOR,A6 P ADK A1,1
0x237888…237a1c Dummy {f00=0x00b4, f01=0x0190, f02=» PVO:NA9 EQU * P RTN A5 P* ( P* TIMER POINTER 2 P* L PTIMER DATA 0 TIMER POINTER V P* x P EJECT DRDU01 DRDU01 P* P* * P************************************* * P*
0x237a1c…237bb0 Dummy {f00=0x00b4, f01=0x0190, f02=»*** n P* P* PDWDU01 EQU * " P DATA 0 PHYSICAL SECTOR NUMBER 4 P DATA /8000 DWT STATUS Z P DATA 0 ECB ADDRESS x P DATA 0 ORDER " P DATA DUADR ACTIVATION ADDRESS P DATA 0 TTAB ADDRESS $ P DATA 0 WAIT/ACTIVATE INDICA
0x237bb0…237d44 Dummy {f00=0x00b4, f01=0x0190, f02=» ADDRESS | XIF P* PDWTFSW EQU *-DWDU01 & P DATA 0 B ( P DATA 0,0,0 SAVE AREA FOR REGISTERS R PDWTBSE EQU *-DWDU01 ~ P DATA 0 , PDWTUBU EQU *-DWDU01 USER BUFFER POINTER P DATA 0 PDWTSWD EQU *-DWDU01 P D
0x237d44…237ed8 Dummy {f00=0x00b4, f01=0x018e, f02=»0 FIXED 4 P DATA /8000 NEW VOLUME LOADED INDICATOR CARTR. 1 P DATA /C000 FIXED H 0 P DATA /8000 NEW VOLUME LOADED IND. CARTR. 2 b 2 P DATA /FFFF,/FFFF,/FFFF VOLUME NAME 1ST FIXED 6 P DATA /FFFF,/FFFF,/FFFF VOLUME NAME 1ST CARTRIDGE P*
0x237ed8…23806c Dummy {f00=0x00b4, f01=0x0190, f02=» P XIF P* P EJECT DRDU01 P* 4 P* > PDWTSAV EQU *-DWDU01 H P DATA -1 d 8 PDWTFBU EQU *-DWDU01 FLAG INDICATING IO TO DRIVER BUF t P DATA 0 " PDWTCIO EQU *-DWDU01 CIO-START P CIO A3,1,DAF1 P CIO A3,1,DA
0x23806c…238200 Dummy {f00=0x00b4, f01=0x0190, f02=» DATA /FFFF CYLINDER NUMBER P* $ P IFT NUNITS=2 . P DATA /FFFF 2ND UNIT D P XIF ` P* l PDWTSMX EQU *-DWDU01 v & P DATA 1 MAX SECTORS ON FIXED DISC $ P DATA 1 MAX SECTORS ON CARTRIDGE P* P IFT NUNITS=2 P DAT
0x238200…238394 (5, 172) Dummy {f00=0x00b4, f01=0x0190, f02=»0 DISC FORMAT CARTRIDGE P* P IFT NUNITS=2 * P DATA 0 @ P DATA 0 P P XIF ` P* l P DATA 0,0 STACK v P DATA 0,0 STACK P DATA 0,0 PDWTSB3 EQU *-DWDU01-2 P* P IFT RAW=1 PDWTSEP EQU *-DWDU01
0x238394…238528 Dummy {f00=0x00b4, f01=0x40ec, f02=»0,0,0,0,0,0,0 PDWTBA1 EQU *-DWDU01 P DATA 0 2 PDWTBA2 EQU *-DWDU01 B P DATA 0 ^ PDWTPAG EQU *-DWDU01 MMU PAGE n P DATA 0 P DATA 0 P XIF P* P* P* P END @ PDWTSEP EQU *-DWDU01
0x238528…2386bc Dummy {f00=0x00b4, f01=0x2008, f02=» -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 . @
0x2386bc…238850 Dummy {f00=0x00b4, f01=0x018e, f02=»A FAULT? | , P -THE FIRST HOLE MUST NOT BE IN ROW 1! P SUK A1,4 NO! @ P CWK A1,5 A1=FIRST HOLE V P RF(G) FAULT DATA FAULT? v , P -THE FIRST HOLE MUST NOT BE IN ROW 8! P LD A3,HOLE2 P SUK A3,10 P RF(NZ) FAULT DATA FAULT?
0x238850…2389e4 Dummy {f00=0x00b4, f01=0x0190, f02=» " P CONVERSION TABLE 2 , P ************************************* . P ROWS ON CARD ^ P ------------ v PTABLE2 DATA ':#' 2,8 3,8 P DATA /4027 4,8 5,8 P DATA '="' 6,8 7,8 , P *****************************
0x2389e4…238b78 Dummy {f00=0x00b4, f01=0x0190, f02=»======================== ` F P THREE HOLES P EJECT DRCR01 j P* PSCAN3 LD A1,HOLE1 P SUK A1,2 P RF(P) FAULT DATA FAULT? 0 P -THE FIRST HOLE MUST BE WITHIN THE FIRST
0x238b78…238d0c Dummy {f00=0x00b4, f01=0x0190, f02=»LT 0 P -THE 2:ND HOLE MUST BE WITHIN ROW 2 TO 7! P ADK A1,9 > $ P ADK A1,1 SCAN FOR THE 3:RD HOLE P P SLL A3,1 x P RB(P) *-4 P SUK A1,10 3:RD HOLE FOUND! P RF(NZ) FAULT DATA FAULT? & P -THE 3:RD HOLE MUST BE IN ROW 8
0x238d0c…238ea0 Dummy {f00=0x00b4, f01=0x0190, f02=»ABLE3,A3 CHOOSE TABLE P AD A3,HOLE2 P SUK A3,4 2 P LCR A1,A3 D P LDR A3,A1 V P RF PUTCHA h P EJECT DRCR01 z P* P* " P CONVERSION TABLE 3 , P ************************************* PTABLE3 DATA
0x238ea0…239034 (5, 173) Opaque[0x194]
0x239034…2391c8 # DirEnt {nam=»DRDY01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x16a0, f03=0x0000}
0x239034…2391c8 IdxSect {
0x239034…2391c8 f00 = 0x00b5 // 0x239034 @0x0
0x239034…2391c8 f01 = 0x0018 // 0x239036 @0x2
0x239034…2391c8 gno = [ // 0x239038 @0x4
0x239034…2391c8 [0x00]: C0x00b5.0x0.0
0x239034…2391c8 [0x01]: C0x00b5.0x1.0
0x239034…2391c8 [0x02]: C0x00b5.0x2.0
0x239034…2391c8 [0x03]: C0x00b5.0x3.0
0x239034…2391c8 [0x04]: C0x00b6.0x0.0
0x239034…2391c8 [0x05]: C0x00b6.0x1.0
0x239034…2391c8 [0x06]: C0x00b6.0x2.0
0x239034…2391c8 [0x07]: C0x00b6.0x3.0
0x239034…2391c8 [0x08]: C0x00b7.0x0.0
0x239034…2391c8 [0x09]: C0x00b7.0x1.0
0x239034…2391c8 [0x0a]: C0x00b7.0x2.0
0x239034…2391c8 [0x0b]: C0x00b7.0x3.0
0x239034…2391c8 ]
0x239034…2391c8 }
0x2391c8…23935c Dummy {f00=0x00b5, f01=0x0190, f02=» 2 P IDENT DRDY01 REL 10.0 80-03-14 870105041000 P : . P =7,CUR.POS FOR ALL ORDERS EXCEPT ERASE B P PRR 10.0 79-12-07 t 4 P =6,CORRECTION OF SPECIAL CHARTACTER HANDLING P REL 10.1 79-10-19 P =5,ABORT ROUTINE P REL 1
0x23935c…2394f0 Dummy {f00=0x00b5, f01=0x0190, f02=».1 79-04-06 , P =2,ERASE ONLY TO LAST POS. OF SCREEN P PRR 9.1 79-01-31 D . P =1 DRIVER ADAPTAD TO HANDLE PTS 6385 ` P PRR 9.1 79-01-12 P P* 6 P************************************************** P* $ P*
0x2394f0…239684 Dummy {f00=0x00b5, f01=0x0190, f02=» P* P* 6 P************************************************** P* R P* : P* THIS DRIVER HANDLES OUTPUT TO THE VIDEO DISPLAYS f @ P* PTS 6344, PTS 6342 AND TO THE PLASMA DISPLAYS PTS 6351 P* AND PTS 6386 6 P* T
0x239684…239818 Dummy {f00=0x00b5, f01=0x0190, f02=»HO-FUNCTIONS d : P* WHICH MAKES IT POSSIBLE TO USE THE DISPLAY AS AN : P* ECHO-DEVICE TO ANY KEYBOARD, THAT RUNS UNDER THE R ( P* GENERAL KEYBOARD DRIVER DRKB01. P* P* 0 P* THE DRIVER CONSISTS OF FOLLOWING PARTS: P*
0x239818…2399ac Dummy {f00=0x00b5, f01=0x018e, f02=»ERY ROUTINE x P* & P* E C H O D Y ECHO FUNCTIONS P* H P R P Z P b P* j * P* THE FOLLOWING ORDERS ARE TREATED: t P* P* ORDER 00: TEST STATUS P* 05: BASIC WRITE " P* 06: STANDARD
0x2399ac…239b40 Dummy {f00=0x00b5, f01=0x0190, f02=» P* NORMAL REGISTER USAGE P* & " P* REGISTER A1 = RETURN CODE 0 ( P* A2 = OUTPUT CHARACTER V $ P* A3 = BUFFER INDEX $ P* A4 = WORK REGISTER " P* A5 = STACK BASE " P* A6
0x239b40…239cd4 (5, 174) Dummy {f00=0x00b5, f01=0x0190, f02=»* SYSTEM ADAPTATION P* < P* DISPLAY TYPE MUST BE DEFINED IN FIRST WORD IN DWT. ( P* h * P* --------------------------------- r P* BIT: 10 11 P* -------------- " P* 0 0 PTS 6344 * P* 0
0x239cd4…239e68 Dummy {f00=0x00b5, f01=0x0190, f02=» BY MEANS OF CONDITIONAL ASSEMBLY THE DRIVER: 4 P* -CAN HANDLE GRAFIC MODE FOR PTS 6351 OR NOT 8 , P* -IS ADAPTED TO CONTROL ONLY PTS 6344 p : P* -CAN USE LOWER CASE CHAR. GENERATOR COLUMN 6 AND 7 8 P* -CAN SUPPRESS ECHOING OF END OF RECORD
0x239e68…239ffc Dummy {f00=0x00b5, f01=0x0190, f02=»JECT P* P* P* P* * P*********** 4 P* ENTRIES * H P*********** P* p P* z P* ( P ENTRY DYAD ADDRESS TO ADDRESSBLOCK 0 P ENTRY ECHODY DEVICE-DEPENDENT ECHO-ROUTINE P* P* P*
0x239ffc…23a190 Dummy {f00=0x00b5, f01=0x0190, f02=»******************* z P* P* & $ P EXTRN DISIOE I/O REQUEST ERROR 0 . P EXTRN OUTPUT SUBROUTINE TO SEND CHARACTER X P EXTRN TDISP DISPATCHER > P EXTRN LDREG LOAD REGISTERS A4, A3, A5, A7, A8 AND RETURN P EXTRN TENDIO END I/O .
0x23a190…23a324 Dummy {f00=0x00b5, f01=0x0190, f02=» ECB-BUFFER p P EJECT P* " P************************ , P* DWT PARAMETERS * L P************************ l P* P EXTRN DWTST STATUS EXTRN DWTBC BYTE COUNTER P EXTRN DWTOR ORDER P* P EJECT P**
0x23a324…23a4b8 Dummy {f00=0x00b5, f01=0x018e, f02=»RESS t " PULSTAR EQU /12 UNDERLINE START " PULSTOP EQU /13 UNDERLINE STOP 2 & PLISTAR EQU /1E LOW INTENSITY START X & PLISTOP EQU /1F LOW INTENSITY STOP PBACKSP EQU /08 BACKSPACE PLF EQU /0A LINE FEED PHOME EQU /0B CURSOR HOME ( P
0x23a4b8…23a64c Dummy {f00=0x00b5, f01=0x0190, f02=» z PSTX EQU /82 START OF MESSAGE PETB EQU /97 END OF MESSAGE , PETX EQU /03 LAST DUMMY N . PRETURN EQU /12 RETURN TO ALPHANUMERIC MODE l * PESCAPE EQU /11 ESCAPE TO GRAPHIC MODE " PPOINT EQU /2E POINT CHARACTER 2 PEQU EQU 6 THRESHOLD FO
0x23a64c…23a7e0 Dummy {f00=0x00b5, f01=0x0190, f02=»** ~ P* RETURN CODES * P******************** & P* B " PCCERR EQU /4 CODE CHECK ERROR L ( POPERR EQU /1 NOT OPERABLE, POWER OFF r P* P EJECT P* P* . P***************************************** . P* CONDITI
0x23a7e0…23a974 (5, 175) Dummy {f00=0x00b5, f01=0x0190, f02=»VER CAN HANDLE GRAFIC MODE FOR PTS 6351 t P* 0 PX:A EQU 0 : PGRAFIC EQU X:A L P* b < P* BY SETTING X:B = 1 THE DRIVER HANDLES ONLY PTS 6344 l P* PX:B EQU 1 PWHATDY EQU X:B P* P* 8 P* BY SETTING X:C TO
0x23a974…23ab08 Dummy {f00=0x00b5, f01=0x0190, f02=» 8 P* BY MEANS OF CONDITIONAL ASSEMBLY IT IS POSSIBLE 8 P* TO SUPPRESS ECHOING OF END OF RECORD CHARACTER. @ 8 P* THIS IS ATTAINED BY SETTING THE CONSTANT X:G=0 | P* PX:D EQU 0 PEORECH EQU X:D P* 0 P* BY SETTING THE C
0x23ab08…23ac9c Dummy {f00=0x00b5, f01=0x0190, f02=»QU X:E P EJECT P* 2 P* BY SETTING X:F = 1, CURSOR WILL BE STEADY & P* INSTEAD OF BLINKING PX:F EQU 0 | PSTEADY EQU X:F P* < P* THIS DRIVER CAN BE ADAPTED TO MEMORY MANAGEMENT UNIT P* BY SETTING MMUPAG = 1
0x23ac9c…23ae30 Dummy {f00=0x00b5, f01=0x0190, f02=» SETTING CPU852 EQU 0. | P* PCPU852 EQU 1 ( P* < 8 P* BY MEANS OF CONDITIONAL ASSEMBLY IT IS POSSIBLE F < P* TO CHOOSE BETWEEN NINE (9) DIFFERENT CHARACTER SETS. P P P* CODE COUNTRY P P* 0 GB/NL/B P* 1
0x23ae30…23afc4 Dummy {f00=0x00b5, f01=0x0190, f02=» PX:G EQU 0 PCOUNTRY EQU X:G P* . & P* MEMORY MANAGEMENT BUFFER SIZE 8 P* b P* l PX:H EQU 64 v PDVBLEN EQU X:H P* P EJECT P* P* $ P******************************** $ P* DWT-DISPLACEMENT
0x23afc4…23b158 Dummy {f00=0x00b5, f01=0x0190, f02=» P IFT MMUPAG=0 PSTART EQU DWTDRD P XIF 2 P* > P IFT MMUPAG=1 H PSTART EQU DWTDRD+4 ^ P XIF x P* . PDWTAP EQU START+/12 HEAD POSITION POINTER " PDWTPOS EQU START+/15 POSITIONS PDWTLIN EQU START+/14 LINES & P
0x23b158…23b2ec Dummy {f00=0x00b5, f01=0x0190, f02=» P* P* P DATA DVBLEN BUFFER LENGTH P DATA 2 DEVICE INDEX : PDYAD EQU * ADDRESS BLOCK V P DATA ACDY ACTIVATION DRIVER v $ P DATA ABDY ABORT ROUTINE ADDRESS P DATA IHDY INTERRUPT HANDLER P DATA RCDY RECOVERY ROUTINE .
0x23b2ec…23b480 Dummy {f00=0x00b5, f01=0x0190, f02=»E,/1F14 P EJECT P* P* A C D Y ( P* < * P* ACDY = ACTIVATION DRIVER DISPLAY F P* t H P* ORDER 00: TEST STATUS. DUMMY IS SENT TO DISPLAY AND RETURN CODE ~ 2 P* IS SET IF DISPLAY NOT OPERABLE P*
0x23b480…23b614 (5, 176) Dummy {f00=0x00b5, f01=0x0190, f02=»* F P* ORDER 06: STANDARD WRITE. CHARACTERS ARE SENT TO DISPLAY FROM < P* ECB-BUFFER AFTER INDIVIDUAL CODE CHECK. T P* L P* IF A PREDEFINED NUMBER OF CHARACTERS (SEE CONSTANT 'EQU') J P* ARE FOUND E
0x23b614…23b7a8 Dummy {f00=0x00b5, f01=0x0190, f02=» IFT GRAFIC=1 B P* ORDER 07: WRITE GRAPHIC DISPLAY. THE DISPLAY IS SWITCHED @ P* TO GRAPHIC MODE AND INFORMATION IN ECB-BUFFER * P* IS SENT TO THE DISPLAY. P* P XIF : P* ORDER /B: CURSOR POSITIONING AN
0x23b7a8…23b93c Dummy {f00=0x00b5, f01=0x0190, f02=» ON DISPLAY b @ P* IS ERASED. THEN STANDARD WRITE (SEE ORDER 6) P* IS EXECUTED. X P* | < P* ORDER 31: ERASE. THE DISPLAY IS ERASED ON THE LINE < P* WHERE THE CURSOR IS POSITIONED THE NUMBER @ P*
0x23b93c…23bad0 Dummy {f00=0x00b5, f01=0x0190, f02=» IN THE CURSOR POSITION. THE CURSOR RE- * P* MAINS IN THAT POSITION. < PACDY EQU * j P LDK A3,0 START BUFFER INDEX | P LDK A4,0 COUNTER P LDR A7,A7 ORDER 0 ? P ABL(E) ADY410 YES P LDK A2,STX START OF MES
0x23bad0…23bc64 Dummy {f00=0x00b5, f01=0x0190, f02=»F(E) ACDY02 NO P IFT GRAFIC=1 P CWK A7,7 ORDER ' ? , P ABL(E) ADY500 H P XIF ^ P IFT WHATDY=0 j . P LDK A2,/12 INDICATE SWITCH TO ALPHA MODE P CF A5,OUTPUT P* P XIF P* PACDY02 EQU * P CWK A7,5 OR
0x23bc64…23bdf8 Dummy {f00=0x00b5, f01=0x0190, f02=» YES P SUK A7,/26 ORDER ERASE ? P ABL(E) ADY160 YES . P* H & PDYERR ABL DISIOE I/O REQUEST ERROR R P EJECT | : P* ACTIONS SPECIFIED BY USER IN RIGHT BYTE IN BUFFER P* ARE CARRIED OUT. 0 P* /2B NO MOVING OF P
0x23bdf8…23bf8c Dummy {f00=0x00b5, f01=0x0190, f02=» VALUE CR, LF P* PACDY20 EQU * " $ P LD A2,4,A8 GET REQUESTED LENGTH 6 P RF(E) ACDY25 ^ P LDK A3,2 START BUFFER INDEX t " P LD A2,2,A8 GET BUFFER ADDRESS & P LC A2,1,A2 GET CONTROL CHARACTER P ANK A2,/FF PACDY25 EQU *
0x23bf8c…23c120 Dummy {f00=0x00b5, f01=0x0190, f02=»CATE LINE FEED " P ADK A2,1 DOUBLE LINE FEEED ? P RF(NE) ACDY30 < ( P ADK A4,1 INDICATE DOUBLE LINE FEED R P ~ P $ PACDY30 LDK A2,CR CARRIAGE RETURN PACDY35 LDK A1,1 2 P SC A1,DWTAP+1,A6 RESET HEAD POSITION COUNTER 8 P*
0x23c120…23c2b4 (5, 177) Dummy {f00=0x00b6, f01=0x0190, f02=»1 & P RF(N) ACDY90 START SECTION ENDED? P LC A1,DWTLIN,A6 LINES 4 P CC A1,DWTAP,A6 LAST LINE ? R P RF(L) ACDY55 v ( P LDKL A2,/100 INCREMENT LINE COUNTER P ADS A2,DWTAP,A6 & PACDY55 LDK A2,LF LINE FEED TO SEND P RB ACDY50
0x23c2b4…23c448 Dummy {f00=0x00b6, f01=0x0190, f02=» P* & P* GET, CHECK AND SEND CHARACTER P* (IF ORDER 5 NO CHECK) 8 P* Z PACDY70 EQU * d P IFT WHATDY=0 x & P LDR* A4,A6 GET CHANNEL PARAMETER P ANK A4,/10 $ P RF(NZ) ACDY75 NOT 6344 OR 6386 P XIF P LD A4,2
0x23c448…23c5dc Dummy {f00=0x00b6, f01=0x018e, f02=»75 EQU * P CF A5,OUTPUT 2 PACDY80 CF A15,POSUPD POSITION COUNTER UPDATING & P IFT TRASPA=1 ( P LD A1,2,A8 GET BUFFER ADDRESS (BA) r ( P LD A2,4,A8 GET REQUESTED LENGTH(RL) $ P ADR A1,A2 GET ADD END OF BUFFER PSKIP05 CWK A2,2
0x23c5dc…23c770 Dummy {f00=0x00b6, f01=0x0190, f02=» | PSKIP07 SUK A2,1 DECR RL ! P RB SKIP05 GET NEXT ! ( PSKIP20 CWK A2,4 ! D P RF(NG) SKIP30 RL < 5 ! P LC A4,-2,A1 GET CHAR ! z $ P CCK A4,/1111 TABULATION CHAR ? ! P RF(NE) SKIP25 NO! ! P SUK A1,2 DECR BA ! P SUK A2,2 DECR RL !
0x23c770…23c904 Dummy {f00=0x00b6, f01=0x018e, f02=» RB(Z) SKIP07 YES! SKIP IT! ! P SUK A4,/C LOW INT. START? " $ P RB(Z) SKIP07 YES! " F P SUK A4,1 LOW INT. STOP? " ` P RB(Z) SKIP07 YES! " P* " " PSKIP30 ST A2,4,A8 STORE NEW RL " P XIF " PACDY90 LDK A4,0 " 6 PADY100 CF A15,GETCHR GET C
0x23c904…23ca98 Dummy {f00=0x00b6, f01=0x018e, f02=» P ANK A2,/7F # P LDK A1,5 SET TABLE POINTER # " P CC A2,TABSPE,A1 FAST OUTPUT? # < P RF(E) ADY125 # b P SUK A1,1 NO! # x " P LDR* A7,A6 CHANNEL PARAMETER # P ANK A7,/30 GRAFIC DISPLAY ? # P RF(E) ADY110 NO # P LDK A1,5 SET TABLE PONT
0x23ca98…23cc2c Dummy {f00=0x00b6, f01=0x0190, f02=» # | P LDK A4,/80 $ , PADY120 ORRS A4,A6 SET LOW INTENSITY MODE $ P LDK A4,0 $ L P RB ACDY50 $ ^ $ PADY122 CCK A2,/1212 UNDERLINE ? $ p P RF(NE) ADY125 $ " P LDK A4,/40 SET UNDERLINE MODE $ P RB ADY120 $ & PADY125 CCK A2,/1414 FAST OUTPUT ?
0x23cc2c…23cdc0 Dummy {f00=0x00b6, f01=0x0190, f02=» A2,A4 $ P LD A4,4,A8 REQ LENGTH % P SUR A4,A3 NUMBER OF CHARS % , P RF(Z) ADY127 NONE % N P* % h P IFT WHATDY=0 % r & P LDR* A7,A6 GET CHANNEL PARAMETER % P ANK A7,/10 % 2 P RF(NZ) OTHER OTHER DISPLAY THAN 6344 OR 6386? % P XIF % P
0x23cdc0…23cf54 (5, 178) Dummy {f00=0x00b6, f01=0x0190, f02=» % PADY128 EQU * & P SUK A1,1 GET NEXT & P RB(NN) ADY110 NOT AT END & 6 P LDR A1,A2 MOVE CHARACTER & X P SUK A1,/11 TAB CHAR? (11) & z P RF(E) ADY140 & P SUK A1,/F LESS THAN /20 ? & " P RF(N) ADY130 CODE CHECK ERROR & P SUK A1,/3F
0x23cf54…23d0e8 Dummy {f00=0x00b6, f01=0x0190, f02=»ACTER BETWEEN /40 TO /5F & P XIF ' P RB ACDY70 ' , P* ' > P* ' H P IFT WHATDY=0 ' R POTHER EQU * ' h P************************ ' | P* A3 = INDEX ' P* A1 = CHARACTER ' P* A4 = NUMBER ' P************************ ' P LC A2,DWT
0x23d0e8…23d27c Dummy {f00=0x00b6, f01=0x0190, f02=»OS AND ' v P ANK A3,/FF ( P ST A4,10,A8 SAVE LENGTH ( " P SUR A3,A2 COMPARE ( B P RF(NN) OT030 LENGTH OK ( P ADR A4,A3 ( | P ST A4,10,A8 SAVE LENGTH ( 0 P ADK A4,1 ADJUST NUMBER OF OUTPUT CHARACTERS ( POT030 EQU * ( & P LDR A3,A1 SAVE CH
0x23d27c…23d410 Dummy {f00=0x00b6, f01=0x018e, f02=» ( P LD A4,10,A8 GET ACT. LENGTH ) POT040 LDK A2,BACKSP ) , P CF A5,OUTPUT SENDBACKSPACE ) H P SUK A4,1 DECREMENT LENGTH ) l P RB(P) OT040 ) P RB ADY127 ) P XIF ) P EJECT ) P* ) P* CODE CHECK ERROR ) P* ) PADY130 E
0x23d410…23d5a4 Dummy {f00=0x00b6, f01=0x0190, f02=» ) PADY140 EQU * * , P CF A15,GETCHR GET FIRST ASCII CHARACTER * P LDR A4,A2 * L . P CF A15,GETCHR GET SECOND ASCII CHARACTER * ^ P ANK A2,/F * P ANK A4,/F * P RF(E) ADY144 * 0 PADY143 ADK A2,/A FROM DECIMAL TO HEXADECIMAL * P SUK A4,1
0x23d5a4…23d738 Dummy {f00=0x00b6, f01=0x0190, f02=» SUR A2,A4 AND REQUESTS POSITION COUNTER * & P TO GET NUMBER OF SPACES TO SEND + 0 P RB(NP) ADY100 + Z P LDR A4,A2 + p & PADY145 LDK A2,CURRIG CURSOR RIGHT + PADY146 CF A5,OUTPUT + , P CF A15,POSUPD POSITION COUNTER UPDATING + P SUK A4,1 READY
0x23d738…23d8cc Dummy {f00=0x00b6, f01=0x0190, f02=»A8 GET NUMBER OF CHAR TO ERASE + P IFT WHATDY=0 , & " P LDR* A1,A6 CHANNEL PARAMETER , < P ANK A1,/10 GRAFIC DISPLAY? , b P RF(NE) ADY166 YES =2 , P XIF , & P CF A5,ERA GET LENGTH TO ERASE =2 , P LDK A3,/20 , P CF A5,FASTER FAST OUTPUT
0x23d8cc…23da60 Dummy {f00=0x00b6, f01=0x0190, f02=» & P CF A5,ERA GET LENGTH TO ERASE =2 - P* - . $ PADY170 SUK A4,1 DECR NO OF CHAR - 8 P RF(N) ADY180 ERASE READY - ` P LDK A2,/20 SPACE - P CF A5,OUTPUT SEND IT - P RB ADY170 - PADY180 LD A4,10,A8 - & P CF A5,ERA GET LENGTH TO ERASE =2
0x23da60…23dbf4 (5, 179) Dummy {f00=0x00b6, f01=0x0190, f02=»EMENT =2 - , P RB(N) ADY165 CURSOR IN ORIGIN POSITION . P LDK A2,BACKSP CURSOR LEFT . @ P CF A5,OUTPUT SEND IT . b P RB ADY186 AGAIN . P XIF . P EJECT . P* . * P* ORDER /B CURSOR POSITIONING PART . P* . PADY200 EQU * . P
0x23dbf4…23dd88 Dummy {f00=0x00b6, f01=0x0190, f02=» IF VIDEO (6344) SET CURSOR ADDRESS DIRECT . P XIF / 2 * P LD A4,10,A8 GET REQUESTED CURSOR POS / > . P ST A4,DWTAP,A6 UPDATE LINE & POS COUNTER / l P CF A5,CURPOS SET CURSOR / P RF ADY380 / P IFT WHATDY=0 / P* GET LINE / * PADY205 LC A4
0x23dd88…23df1c Dummy {f00=0x00b6, f01=0x0190, f02=»END OF LINE / l PADY207 EQU * 0 $ P LC A3,DWTAP,A6 GET ACTUAL LINE 0 ( PADY210 CWR A4,A3 0 P . P RF(N) ADY250 REQUESTED LINE ABOVE ACTUAL 0 h P RF(E) ADY300 SAME LINE 0 P LDK A2,LF LINE FEED 0 * P ADK A3,1 INCREMENT ACTUAL LINE NUMBER 0 PADY2
0x23df1c…23e0b0 Dummy {f00=0x00b6, f01=0x0190, f02=»ADY250 LDK A2,HOME HOME 0 & P LDK A3,1 RESET ACTUAL LINE NUMBER 1 " P ST A3,DWTAP,A6 RESET POSITION 1 J P RB ADY230 1 p 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 REQUESTED POSITIO
0x23e0b0…23e244 Dummy {f00=0x00b6, f01=0x0190, f02=»WK A4,1 FIRST POSITION ? 1 P RF(NE) ADY305 NO 2 P CWR A4,A3 FIRST LINE ? 2 : P RF(NE) ADY305 NO 2 Z P LDK A2,HOME CURSOR GO HOME 2 t P RF ADY330 2 * PADY305 RF(NL) ADY307 REQ. POS NOT ZERO 2 P LDK A4,1 2 0 PADY307 LC A3,DWTAP+1,A6 GET AC
0x23e244…23e3d8 Dummy {f00=0x00b6, f01=0x0190, f02=»DS 2 l P RF(E) ADY370 POSITION FOUND 3 P RF(N) ADY340 BACK 3 . P LDK A2,CURRIG CURSOR RIGHT 3 H & P ADK A3,1 UPDATE POSITION COUNTER 3 l PADY330 CF A5,OUTPUT SEND 3 P RB ADY310 3 . PADY340 SUR A3,A4 ACTUAL POS. - WANTED POS. 3 , P CWR A3,A4 COM
0x23e3d8…23e56c Dummy {f00=0x00b6, f01=0x0190, f02=»N 3 p P RB ADY330 4 " PADY345 LDK A2,BACKSP BACKSPACE 4 P CF A5,OUTPUT SEND 4 B P SUK A3,1 LAST BACKSPACE ? 4 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 BUFFER INDEX 4 P A
0x23e56c…23e700 Dummy {f00=0x00b6, f01=0x0190, f02=»* 4 P EJECT 5 P* 5 P* 5 " 8 P* SEND LAST DUMMY, SET CURSOR POSITION IN CONTROL 5 , 4 P* WORD, LOAD A1 WITH RETURN CODE AND END I/0. 5 h P* 5 PADY405 EQU * 5 & P LDR* A1,A6 GET CHANNEL PARAMETER 5 P ANK A1,/30 6344 ? 5 P RF(NE
0x23e700…23e894 (5, 180) Dummy {f00=0x00b6, f01=0x0190, f02=»ERLINE STOP 5 ~ P CF A5,OUTPUT 6 * PADY406 ANK A4,/80 LOW INTENSITY MODE ? 6 * P RF(E) ADY407 6 X & P LDK A2,LISTOP LOW INTENSITY STOP 6 n P CF A5,OUTPUT 6 PADY407 EQU * 6 $ P LDK A2,ETB END OF TEXT MESSAGE 6 P CF A5,OUTPUT SEND CHARACTER 6
0x23e894…23ea28 Dummy {f00=0x00b6, f01=0x0190, f02=»1 =7 6 P RF(Z) ADY415 ORDER ERASE =7 7 * P LD A4,DWTAP,A6 GET CURSOR POSITION =4 7 2 , P ST A4,10,A8 SAVE CURSOR POS. IN ECB =4 7 ` PADY415 EQU * 7 P ADK A7,/31-5 =7 7 ( P RF(NE) ADY420 NOT ORDER BASIC WRITE 7 P LDKL A4,/101 HOME POSITION 7
0x23ea28…23ebbc Dummy {f00=0x00b6, f01=0x0190, f02=» IFT GRAFIC=1 7 P* 8 P EJECT 8 P* 8 . P* GRAPHIC PART 8 8 P* 8 R PADY500 EQU * 8 P LDK A2,/11 8 p ( P CF A5,OUTPUT SWITCH TO GRAFIC MODE 8 & PADY510 CF A15,GETCHR GET CHARACTER 8 P LDR A1,A1 BUFFER EMPTY 8 P RB(E) ADY400
0x23ebbc…23ed50 Dummy {f00=0x00b6, f01=0x018e, f02=»DATA MESSAGE 8 P* 9 P* ADDRESS MESSAGE 9 P* 9 : P* SET FIRST OUT PUT IN A2 9 D P* AND SECOND IN A4 9 h P* 9 P SLL A1,4 9 P LDR A4,A2 9 P SRL A4,4 9 P ORR A4,A1 9 P ANK A2,/F 9 P ANK A4,/7F 9 P ORK A2,/2
0x23ed50…23eee4 Dummy {f00=0x00b6, f01=0x0190, f02=» 9 j P RB ADY510 : P EJECT : P* : ( P* DATA MESSAGE : 2 P* : L " P* FIRST OUTPUT IS SET IN A2 : V P* AND SECOND IN A4 : | P* : PADY530 SLL A1,13 : P LDR A4,A2 : P SLL A2,5 : P ORR A1,A2 : P LDK A7,10 : P LDK
0x23eee4…23f078 Dummy {f00=0x00b6, f01=0x018e, f02=»1 : P RB ADY540 ; PADY560 LDR A4,A2 ; P SRL A4,4 ; 4 P ANK A4,/3F ; F P ANK A2,/F ; Z P ORK A2,/60 ; l P RB ADY515 ; P* ; P XIF ; P* ; P EJECT ; P* ; , P* UPDAPP = SUBROUTINE TO UPDATE HEAD ; , P*
0x23f078…23f20c Dummy {f00=0x00b6, f01=0x0190, f02=» ; j 2 P ADS A3,DWTAP,A6 UPDATE HEAD POSITION POINTER < P LDK A3,0 < > , P SC A3,DWTBC,A6 RESET POSITION COUNTER < P P RTN A15 < P* < 6 P* POSUPD = SUBROUTINE TO UPDATE ACTUAL POSITION < 0 P* POINTER WHEN REQUEST RUNNING. < > P
0x23f20c…23f3a0 Dummy {f00=0x00b6, f01=0x0190, f02=» P ANK A2,/FF = 2 P AD A2,DWTAP,A6 INCLUDE HEAD POSITION POINTER = P ANK A2,/FF = N " P CC A2,DWTPOS,A6 END OF ROW ? = b P RF(P) POSU10 = , P IM DWTST,A6 INCREMENT POSITION COUNTER = PPOSU10 RTN A15 = P EJECT = P* = P* I H D Y
0x23f3a0…23f534 (5, 181) Dummy {f00=0x00b7, f01=0x0190, f02=»ODE ? = P RF(N) IHDY10 > . P LDR A1,A1 RETURN CODE FROM CHANNEL UNIT ? > $ P RB(NE) ADY420 YES > V 4 PIHDY10 ABL LDREG RELOAD A3-A5 AND RETURN VIA A5 > p P EJECT > P* > P* R C D Y > P* > ( P* RCDY = RECOVERY ROUTINE DISPLAY >
0x23f534…23f6c8 Dummy {f00=0x00b7, f01=0x0190, f02=» P* A6 = DWT-ADDRESS ? P* A7 = ORDER ? " P* A8 = ECB-ADDRESS ? : PRCDY EQU * ? X P IFT CPU852=1 ? j & 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
0x23f6c8…23f85c Dummy {f00=0x00b7, f01=0x0190, f02=» =1 ? P =1 @ P =1 @ P =1 @ * P* @ 8 P IFT WHATDY=0 @ B P* @ X " P LDR* A2,A6 CHANNEL PARAMETER @ b " P ANK A2,/10 GRAPHIC DISPLAY ? @ P RF(E) RCDY10 NO @ . P LDK A2,RETURN RETURN TO ALPHANUMERIC MODE @ P CF A5,OUTPUT @
0x23f85c…23f9f0 Dummy {f00=0x00b7, f01=0x0190, f02=»A4 LRC-ERROR IN BLOCK ? @ P RF(NE) RCDY20 A P IFT WHATDY=0 =1 A 6 P IFF STEADY+COUNTRY=0 =1 A P * P LDR* A2,A6 GET CHANNEL PARAMETERS =1 A r " P ANK A2,/20 PTS 6385/6386 ? =1 A P RF(Z) RCDY14 NO =3 A * P LDK A3,100 SET UP TRANSFER COUNTER =3
0x23f9f0…23fb84 Dummy {f00=0x00b7, f01=0x0190, f02=»R INF =3 A x & P SUK A3,1 DEC TRANSFER COUNTER =3 B , P RB(P) RCDY12 NOT ENOUGH OF TRANSFERS =3 B : . P LDK A2,CTYCOD SEND 'SET COUNTRY CODE' =1 B j P CF A5,OUTPUT =1 B * P LDK A2,COUNTRY SEND 'COUNTRY CODE' =1 B P ORK A2,/30 =1 B P CF A5,OUTPU
0x23fb84…23fd18 Dummy {f00=0x00b7, f01=0x0190, f02=»CLEHOM CLEAR AND HOME B P CF A5,OUTPUT SEND C P LDKL A2,/101 C 8 6 P ST A2,DWTAP,A6 SET HEAD LINE-AND-POSITION COUNTER C N P LDR A3,A3 GET OLD STATUS C P RB(N) ENDIO NOT BUSY C " P LDK A1,OPERR SET RETURN CODE C PRCDY15 ABL ADY420 C P
0x23fd18…23feac Dummy {f00=0x00b7, f01=0x0190, f02=»DY25 NO C ( P LDK A1,2 INDICATE THROUGHPUT ERROR D P RB RCDY15 D < & PRCDY25 LDK A2,STX START OF MESSAGE D N P CF A5,OUTPUT D x 4 P LC A4,DWTBC,A6 GET NUMBER OF POSITIONS TO BACK D P ANK A4,/FF D P RF(E) RCDY30 D . P CF A5,BACCAN SEND BACKS
0x23feac…240040 Dummy {f00=0x00b7, f01=0x0190, f02=»* D 0 P* ECHODY = DEVICE-DEPENDENT ECHO-ROUTINE E P* E > PECHODY EQU * E H P LDR A7,A7 EOR? E P RF(N) ECDY17 YES E t P LDR A3,A2 SAVE CHARACTER E P* E P IFT EORECH=0 E P* E P SUK A2,/80 E $ P RF(NN) ECDY20 NOT TO BE E
0x240040…2401d4 (5, 182) Dummy {f00=0x00b7, f01=0x0190, f02=» RF(E) ECDY50 CLEAR E & PECDY10 CF A5,OUTPUT SEND CHARACTER F , P CF A15,POSUPD POSITION COUNTER UPDATING F F P RF ECDY20 F v 4 PECDY17 CF A15,UPDAPP UPDATE HEAD CURSOR POINTER F ( PECDY20 ABL ECHRTN RETURN TO KEYBOARD F P* F P* BACKSPACE F
0x2401d4…240368 Dummy {f00=0x00b7, f01=0x018e, f02=»DK A4,1 INDICATE ONE BACKSTEP F P CF A5,BACCAN BACK G & P RB ECDY20 G @ P EJECT G R P* G ` P* CLEAR G j P* G | PECDY50 EQU * G ( P LC A4,DWTBC,A6 GET POSITION COUNTER G P ANK A4,/FF G P RB(E) ECDY20 FIRST POSITION G P IFT WHATD
0x240368…2404fc Dummy {f00=0x00b7, f01=0x0190, f02=» P RB ECDY20 H P XIF H * PECDY60 LDR A3,A4 SAVE POSITION COUNTER H " 6 P LD A4,DWTAP,A6 GET HEAD LINE-AND-POSITION COUNTER H P P CF A5,CURPOS SET CURSOR H P LDR A4,A3 GET POS COUNTER H P ADK A4,1 UPDATE POS COUNTER H P LDK A3,/20 H P CF
0x2404fc…240690 Dummy {f00=0x00b7, f01=0x0190, f02=»* H 0 P* BACCAN = SUBROUTINE TO POSITION CURSOR I 0 P* AT THE PLACE BEFORE REQUEST IF I > 0 P* CLEAR OR BACKWARDS ONE STEP IF I r P* BACKSPACE. I P* I PBACCAN EQU * I P LDR A3,A4 I ( P LC A2,DWTBC,A6 GE
0x240690…240824 Dummy {f00=0x00b7, f01=0x0190, f02=»T POSITION I | P RF(NP) BACA10 NO J $ P LDK A2,SPACE DESTRUCTIVE SPACE J , P RF BACA20 J T " PBACA10 LDK A2,BACKSP BACKSPACE J f P CF A5,OUTPUT SEND J $ P LDK A2,SPACE DESTRUCTIVE SPACE J P CF A5,OUTPUT SEND J P LDK A2,BACKSP BACKSPACE J P
0x240824…2409b8 Dummy {f00=0x00b7, f01=0x0190, f02=»ON COUNTER J r P RTN A5 K P EJECT K " 4 P*********************************************** K 0 4 P* CHECK = SUBROUTIN TO CHECK USER BUFFER IN * K h 4 P* ORDER TO GET A REASON FOR USING * K 4 P* 'FAST OUTPUT FACILITY' ON 6344 *
0x2409b8…240b4c Dummy {f00=0x00b7, f01=0x018e, f02=» P* L P* L P LD A1,4,A8 L P SUR A1,A3 END OF BUFFER? L , P ABL(NP) ACDY75 YES! L N , P LDR A7,A2 SAVE CHER TO SEND (AND CHECK) L j ( P LDR A2,A4 SAVE BUFFER ADDRESS+INDEX L P LDK A4,1 RESET COUNTER L $ PNEXT ADK A4,1 INCREMENT COUNTER L
0x240b4c…240ce0 Dummy {f00=0x00b7, f01=0x0190, f02=» P RB(E) NEXT YES! M POUT EQU * M 6 P CWK A4,EQU CONDITION FOR FAST OUTPUT FULLFILLED? M . P RF(L) NOFAST NO! M h & P********************************** M & P* UPDATE ACTUAL POSITION POINTER * M , PFASTOK LC A2,DWTBC,A6 GET HEAD POSITION M P A
0x240ce0…240e74 (5, 183) Dummy {f00=0x00b7, f01=0x0190, f02=» MAXNUMBER OF CHAR/LINE M | P SUR A3,A2 AND COMPARE N P SUR A3,A4 N > P RF(NN) HIT N P P ADR A4,A3 N d P ADK A4,1 N v ( PHIT ADS A4,DWTST,A6 UPDATE POSITION N P*********************** N P* EXECUTE FAST OUTPUT * N P LDR A3,A7 GET CHAR
0x240e74…241008 Dummy {f00=0x00b7, f01=0x0190, f02=» ( P AD A4,DWTAP,A6 INC HEAD POS POINTER O P CF A5,CURPOS O 0 " P***************************** O F " P* RESTORE A3 (BUFFER INDEX) * O l * P LD A3,DWTBIN,A6 RESTORE BUFFER INDEX O P SUK A3,1 O P ABL ACDY90 READ NEXT CHAR O P* O . PNOFAST LDR
0x241008…24119c Dummy {f00=0x00b7, f01=0x0190, f02=»T FAST OUTPUT O f 4 P* AT ENTRY A4 = NUMBER OF CHARACTERS P P* P N PFASTER EQU * P X P CWK A4,/60 P l . P RF(L) FAS010 NUMBER OF CHAR NOT TOO LONG P P LDK A4,/59 P PFAS010 EQU * P P ADK A4,/20 ADD CONSTANT P P LDK A2,FASTO
0x24119c…241330 Dummy {f00=0x00b7, f01=0x0190, f02=»ND P P RTN A5 Q P EJECT Q P* Q ( P* Q 2 * P* CURPOS = SUBROUTINE TO SET CURSOR Q < > P* AT ENTRY A4 = CURSOR POS (POSITION AND LINE) Q j P* Q PCURPOS EQU * Q P ADKL A4,/1F1F CONVERT Q P LDK A2,SCADD SET CURSOR Q P
0x241330…2414c4 Dummy {f00=0x00b7, f01=0x0190, f02=» * Q P LDR A2,A4 R & P CF A5,OUTPUT OUTPUT POSITION (X) R P LDR A2,A4 R F P RF(NN) CURR10 Y < /80! R X P LDK A2,/7F R x P RF CURR15 R PCURR10 EQU * R P SRL A2,8 SHIFT RIGHT R PCURR15 EQU * R P CF A5,OUTPUT OUTPUT LINE(Y) R P
0x2414c4…241658 Dummy {f00=0x00b7, f01=0x018e, f02=»=2 R P* =2 S 0 P* AT ENTRY A4 = CHAR TO ERASE FROM USER =2 S . P* AT EXIT A4 = CHAR TO END OF SCREEN =2 S L P* =2 S ~ PERA EQU * =2 S " P LD A2,DWTPOS,A6 MAX CHAR. =2 S P ANK A2,/FF GET MAX CHAR. =2 S 0 P LC A3,DWTAP+1,A6 CURRENT PO
0x241658…2417ec Dummy {f00=0x00b7, f01=0x4156, f02=» P CWR A4,A2 OUTSIDE SCREEN =2 T P RF(L) ERAEND NO =2 T ( . P LDR A4,A2 OUTSIDE SCREEN MODIFY LENGTH =2 T D P LDKL A3,/FFFF SET OVER =4 T v " PERAEND EQU * END SUBROUTINE =2 T P RTN A5 RETURN =2 T PABDY EQU * T , P CF A15,UPDAPP UPDATE CURSOR P
0x2417ec…241980 Dummy {f00=0x00b7, f01=0x2008, f02=» U NE) BACA10 7 P NGR A3,A3 NEGATE REGISTER 7 , P ADS A3,DWTST,A6 UPDATE POSITION COUNTER 7 < P RTN A5 7 l P END 7 |@ 7 6 t P* 6 PBACCAN EQU * 6 P LDR A3,A4 6 " PBACA10 LDK A2,BACKSP BACKSPACE 6 P CF A5,OUTPUT SEND 6 $ P LDK
0x241980…241b14 (5, 184) Dummy {f00=0x00b7, f01=0x018e, f02=»E E x P* F PTRM190 EQU * F ( P LD A6,DCWRQ CHECK APPLICATION QUEUE F ( " P RB(Z) TRM130 NOTHING IN QUEUE F T P EJECT F z P* F P* F P* F " P* HERE TO TRANSMIT AN IFRAME F P* F PTRM300 EQU * F " P SUK A6,DWTWQ GET DWT ADDRESS
0x241b14…241ca8 Dummy {f00=0x00b7, f01=0x0190, f02=» F n ( P LD A3,ECBRL,A8 GET REQUESTED LENGTH G P ADK A3,1 ADJUST LENGTH G 4 " P ST A6,WRDWT SAVE WRITING DWT G T $ P LDR* A1,A6 GET SUB-TERM ADDRESS G z P ANK A1,/FF G P* G P IFF MMUPAG=0 G * P LDKL A4,MMUBUF GET MMU BUFFER ADDRESS G P LD
0x241ca8…241e3c Dummy {f00=0x00b7, f01=0x0190, f02=»,A8 G * P CF A15,DC:MOT MOVE DATA TO MMU BUFFER H PTRM320 EQU * H : P XIF H N P* H Z * P LD A7,ECBBA,A8 OUTPUT BUFFER ADDRESS H d ( P ADK A7,1 USE FREE-WORD TO INSERT IT H P SCR A1,A7 H $ P SUK A7,2 INIT OUTPUT ADDRESSING H P ST A7,SWITCH H
0x241e3c…241fd0 Dummy {f00=0x00b7, f01=0x0190, f02=» H f P CF A5,WRFRAM I > P************** WHEN DONE,UPDATE PROTOCOL COUNTERS ***** I P LD A1,VSCNT UPDATE V(S) I ` P ADK A1,1 I P ANK A1,7 MODULO 7 I P ST A1,VSCNT I " P ST A1,CPCNT UPDATE CHECKPINT I P* I P* DISPATCH I P* I
0x241fd0…242164 Dummy {f00=0x00b7, f01=0x018e, f02=» LDR* A1,A2 GET COMMAND I P CWK A2,COMQE J $ P RF(NE) TRME10 NOT END OF QUEUE J 6 ( P LDKL A2,COMQ-2 RESET OUTPUT POINTER J ^ PTRME10 EQU * J P ADK A2,2 J P ST A2,QOUT J P ABL TRM J P EJECT J P* J " P* PREPARE C-FIELD FOR I-FRAM
0x242164…2422f8 Dummy {f00=0x00b7, f01=0x0190, f02=» J P ORR A1,A2 K P LD A2,VSCNT GET N(S) K P SLL A2,1 K 8 P ORR A1,A2 K J & P STR A1,A4 STORE C-FIELD IN BUFFER K P RTN A5 K P EJECT K P* K P* K , P* QUEUEING FACILITY FOR HDLC TRANSMITTER K 2 P* ON ENTRY A1 CONTAINS REQUESTED
0x2422f8…24248c Dummy {f00=0x00b7, f01=0x0190, f02=»NSMITTER K P* L P CF A15,SETIME L P DATA TRM,1 AFTER 100 MS L 0 P RF QMRTN L P P* L b P* PUT COMMAND ON QUEUE L l P* L PQMTRM10 EQU * L P LD A2,QIN L P CWK A2,COMQE L ( P RF(NE) QMTRM20 STILL SPACE IN QUEUE L " P LDKL A2,C
0x24248c…242620 Dummy {f00=0x00b7, f01=0x0190, f02=» PQMRTN EQU * M P IFT CPU852=1 M P ADKL A15,4 M . P ABR* A15 M B P XIF M T P IFT CPU852=0 M ` P RTN A15 M v P XIF M P* M P EJECT M P* M P* RESET PROCEDURE COUNTERS M P* M P* M PRESCON EQU * M P CM VSCNT
0x242620…2427b4 (5, 185) Opaque[0x194]
0x2427b4…242948 # DirEnt {nam=»DRFD01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1700, f03=0x0000}
0x2427b4…242948 IdxSect {
0x2427b4…242948 f00 = 0x00b8 // 0x2427b4 @0x0
0x2427b4…242948 f01 = 0x0022 // 0x2427b6 @0x2
0x2427b4…242948 gno = [ // 0x2427b8 @0x4
0x2427b4…242948 [0x00]: C0x00b8.0x0.0
0x2427b4…242948 [0x01]: C0x00b8.0x1.0
0x2427b4…242948 [0x02]: C0x00b8.0x2.0
0x2427b4…242948 [0x03]: C0x00b8.0x3.0
0x2427b4…242948 [0x04]: C0x00b9.0x0.0
0x2427b4…242948 [0x05]: C0x00b9.0x1.0
0x2427b4…242948 [0x06]: C0x00b9.0x2.0
0x2427b4…242948 [0x07]: C0x00b9.0x3.0
0x2427b4…242948 [0x08]: C0x00ba.0x0.0
0x2427b4…242948 [0x09]: C0x00ba.0x1.0
0x2427b4…242948 [0x0a]: C0x00ba.0x2.0
0x2427b4…242948 [0x0b]: C0x00ba.0x3.0
0x2427b4…242948 [0x0c]: C0x00bb.0x0.0
0x2427b4…242948 [0x0d]: C0x00bb.0x1.0
0x2427b4…242948 [0x0e]: C0x00bb.0x2.0
0x2427b4…242948 [0x0f]: C0x00bb.0x3.0
0x2427b4…242948 [0x10]: C0x00bc.0x0.0
0x2427b4…242948 ]
0x2427b4…242948 }
0x242948…242adc Dummy {f00=0x00b8, f01=0x0190, f02=» 2 P IDENT DRFD01 REL 10.0 80-03-14 870105041000 P : P* B 2 P********************************************** L P* " P* PHILIPS TERMINAL SYSTEM PTS P* ( P* DRFD01 = DRIVER FOR FLEXIBLE DISK P* P* P* P*
0x242adc…242c70 Dummy {f00=0x00b8, f01=0x0190, f02=»FOUR DAISY n . P* CHAINED FLEXIBLE DISK DRIVES PTS 6879, 0 P* CONNECTED TO CPU VIA CHANNEL UNIT CHFD ON D & P* MULTIPLEX OR PROGRAMMED CHANNEL x P* P* P EJECT DRFD01 P* P* ORDERS: P* P* /00 TEST STATUS
0x242c70…242e04 Dummy {f00=0x00b8, f01=0x0190, f02=»* /06 SEQUENTIAL WRITE -IBM DISC ONLY- P* /11 PHYSICAL READ H P* /15 PHYSICAL WRITE f P* /21 OPEN P* /22 CLOSE P* /24 WRITE DELETED DATA P* /26 LOCK D P* /31 REWIND
0x242e04…242f98 Dummy {f00=0x00b8, f01=0x0190, f02=» A5 STACK BASE P* A6 DWT-ADDRESS P* A7 ORDER 6 P* A8 ECB-ADDRESS L P EJECT DRFD01 h P* P*********** P* * P* ENTRIES * P* * P*********** P* $ P ENTRY FDADR AC
0x242f98…24312c Dummy {f00=0x00b8, f01=0x0190, f02=»CT DRFD01 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 PERF
0x24312c…2432c0 Dummy {f00=0x00b8, f01=0x018e, f02=»TO DWT AND SET NVL v . P EXTRN NVLCHK CHECK FOR NEW VOLUME LOADED EXTRN DWTST STATUS L EXTRN DWTECB ECB ADDRESS h " P EXTRN DWTUEC USER ECB ADDRESS $ EXTRN DWTOR DWT INDEX AND ORDER ( P EXTRN DWTORD ORDER/INDEX SAVE AREA P EXT
0x2432c0…243454 (5, 186) Dummy {f00=0x00b8, f01=0x0190, f02=» ( P EXTRN SAVE8 SAVE A1-A8 ON A15 STACK P EXTRN SETIMP TIMER 0 & P EXTRN INTSAV INTERRUPT SAVE AREA L & P EXTRN PFPOST PWF POST PROC. FLAG v & P EXTRN TASCII EBCDIC TO ASCII TAB & P EXTRN TEBCDIC ASCII TO EBCDIC TAB 0 P EXTRN SPDLCI OPEN/C
0x243454…2435e8 Dummy {f00=0x00b8, f01=0x0190, f02=»TIVE LENGTH z $ P EXTRN ECBCW1 ECB CONTROL WORD 1 $ P EXTRN ECBCW2 ECB CONTROL WORD 2 < P EJECT DRFD01 d P* | P************************ P* * P* CONDITIONAL ASSEMBLY * P* * P**
0x2435e8…24377c Dummy {f00=0x00b8, f01=0x0190, f02=»X:A EQU 1 PCHAN EQU X:A P* & 2 P* A PROGRAM VERSION INCLUDING TOSS DISC FORMAT 0 ( P* IS OBTAINED BY SETTING TOSS EQU 1. f P* PX:B EQU 0 PTOSS EQU X:B P* 2 P* A PROGRAM VERSION INCLUDING IBM DISC FORMAT ( P* IS O
0x24377c…243910 Dummy {f00=0x00b8, f01=0x0190, f02=»G h * P* IS OBTAINED BY SETTING MMUPAG EQU 1. P* 8 PMMUPAG EQU 0 B P* V 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* P EJECT D
0x243910…243aa4 Dummy {f00=0x00b8, f01=0x0190, f02=» INCLUDED BY SETTING OPCLOS =1 n P* & PX:D EQU 0 0 POPCLOS EQU X:D B P* X P EJECT DRFD01 b P* z P* P* MMU BUFFER SIZE P* P* P IFT MMUPAG=0 PDVBLEN EQU 256 P XIF P* P IFT MMU
0x243aa4…243c38 Dummy {f00=0x00b8, f01=0x0190, f02=» PDEVIND EQU 10 P* P EJECT DRFD01 $ P* < P************* F P* * P* CONSTANTS * r P* * P************* P* & PCUADR EQU 09 CONTROL UNIT ADDRESS & PMUXADR EQU CUADR+CUADR MUX-ADDRE
0x243c38…243dcc Dummy {f00=0x00b8, f01=0x018e, f02=»BM EQU 1923 MAX SECTOR NUMBER IBM DISC ( PBOE EQU 28 BEGIN OF EXTENT POSITION . & PEOE EQU 34 END OF EXTENT POSITION Z $ PEOD EQU 74 END OF DATA POSITION PTIME EQU 20 DELAY - POWER ON & POPENTI EQU 10 DELAY AT OPEN ORDERS P* $ PDIXT
0x243dcc…243f60 Dummy {f00=0x00b8, f01=0x0190, f02=» P* * P* TABLES * P* * ( P********** : P* L P IFF CHAN+IBM=0 V ( P DATA DVBLEN+DVBLEN MMU BUFFER SIZE n P XIF P* P IFT CHAN=0 P IFT IBM=0 " P DATA 0 INDICATE NO MMU BUFFER P XIF P
0x243f60…2440f4 (5, 187) Dummy {f00=0x00b8, f01=0x0190, f02=»JECT DRFD01 P* P*************** P* * 8 P* TEST STATUS * P P* * h P*************** P* PTESTST EQU * P IFF IBM+TOSS=0 P CF A15,NVLCHK " P STR A1,A6 SAVE NVL INDICATOR
0x2440f4…244288 Dummy {f00=0x00b8, f01=0x0190, f02=» LDKL A2,/7FFF RESET REQUEST ERROR BIT P ANRS A2,A6 . P* B P IFF TOSS+IBM=0 L " P CF A5,VO:NAM GET VOLUME NAME d , P LD A1,DWTORD,A6 RESTORE INDEX AND ORDER P ST A1,DWTOR,A6 P CF A15,VOLNAM P ABL END:RC P XIF P
0x244288…24441c Dummy {f00=0x00b8, f01=0x0190, f02=» * P* ACTIVATION * P* * ( P************** > P* T PFDAD EQU * ACTIVATION ENTRY ^ P IFT MMUPAG=1 P IFT CHAN=0 P CM BUFFLG,A6 P XIF P* $ P LD A2,DWTOR,A6 INDEX AND ORDER 0 P ST A2,D
0x24441c…2445b0 Dummy {f00=0x00b8, f01=0x0190, f02=» P* P IFT OPCLOS=1 P* $ & P* CHECK IF OPEN OR CLOSE ORDER . P* X P LDR A1,A7 ORDER b P SUK A1,/21 z P RF(Z) OPEN OPEN P SUK A1,1 " P RF(NZ) FD:ORD NOT CLOSE ORDER P* P EJECT P* P********
0x2445b0…244744 Dummy {f00=0x00b8, f01=0x0190, f02=»BIT d 2 P* ZERO OF THE SOP LIGHTS EXTERNAL REGISTER P* B " P LDKL A1,/8000 MASK FOR BIT 0 L & P ORS A1,SPDLCI SET OPEN/CLOSE BIT r P RF OPEN10 P* P EJECT P* P******** P* * P* OPEN * P* *
0x244744…2448d8 Dummy {f00=0x00b8, f01=0x0190, f02=» b P* POPEN EQU * " P LDKL A1,/7FFF MASK FOR BIT 0 $ ( P ANS A1,SPDLCI CLEAR OPEN/CLOSE BIT J P* v POPEN10 EQU * 0 P LD A1,SPDLCI SOP LIGHTS AND OPEN/CLOSE DATA " P OTR A1,0,SOPDA OPEN FD DRIVE P* * P* WAIT FOR DR
0x2448d8…244a6c Dummy {f00=0x00b8, f01=0x0190, f02=»A6 SAVE DWT-ADDR P CF A15,SETIMP WAIT . P DATA OPENRE,OPENTI START ADDR, WAIT TIME 4 P ABL TDISP EXIT f P* ~ POPENRE EQU * P LDR A6,A1 GET DWT-ADDR , P CM DWTTP2,A6 INDICATE NO TIMER RUNNING P LDK A1,0 RETURN CODE (
0x244a6c…244c00 Dummy {f00=0x00b8, f01=0x0190, f02=» PFD:ORD EQU * P LC A2,DIXTAB,A3 , P SC A2,DWTA3+1,A6 SAVE DRIVE INDEX MASK 4 P* d P IFT IBM+TOSS=2 n P AN A2,DWTLAB,A6 ( P SC A2,DWTFIB+1,A6 INDICATE TOSS/IBM P XIF P* P CF A5,SETCIO A3,A4 AFFECTED P*
0x244c00…244d94 (5, 188) Dummy {f00=0x00b8, f01=0x0190, f02=»38 " P RF(N) INTEST READ/WRITE ORDER P SUK A3,18 0 P ABL(NP) LOAD LOAD/UNLOAD B P XIF d P* p P IFT IBM=1 z P SUK A3,1 P RF(Z) INTEST BASIC READ P SUK A3,1 " P RF(Z) IBMCHK SEQUENTIAL READ P SUK A3,3 P
0x244d94…244f28 Dummy {f00=0x00b8, f01=0x018e, f02=»WRITE t P SUK A3,11 P RF(Z) IBMCHK REWIND P SUK A3,7 < P ABL(NP) LOAD LOAD/UNLOAD N P XIF p P* | PIBMCHK EQU * P IFT TOSS+IBM=2 P LD A4,DWTFIB,A6 & P ABL(NZ) IBMDSK IBM DISC HANDLING P XIF P*
0x244f28…2450bc Dummy {f00=0x00b8, f01=0x018e, f02=» $ PREQERR ABL DISIOE REQUEST ERROR P* 0 0 PINCLEN EQU * INCORRECT REQUESTED LENGTH EXIT : P LDKL A1,/8008 RETURN CODE n P* PDIS:EN EQU * . P ABL DISEND PERFORM TENDIO AND GO TO TDISP P* P EJECT DRFD01 P*
0x2450bc…245250 Dummy {f00=0x00b8, f01=0x0190, f02=» P ADK A1,0 $ P RB(NZ) DIS:EN NEW VOLUME LOADED P XIF > P* J P LD A3,ECBRL,A8 T 2 P RB(Z) INCLEN INCORRECT INPUT PARAMETER ECBRL l ( P SRC A3,7 NUMBER OF PHYSICAL SECTORS 2 P RB(N) INCLEN INCORRECT INPUT PARAMETER ECBRL P CWK
0x245250…2453e4 Dummy {f00=0x00b8, f01=0x0190, f02=»S=2 P LD A4,DWTFIB,A6 P RF(NZ) INTES5 IBM-DISC $ P XIF D P* P P IFT TOSS=1 Z P LDR A4,A3 n 6 P SRC A4,1 CHECK IF EVEN NUMBER OF PHYSICAL SECTORS 2 P RB(N) INCLEN INCORRECT INPUT PARAMETER ECBRL 6 P SLL A2,1 TRANSFER TOSS-
0x2453e4…245578 Dummy {f00=0x00b8, f01=0x0190, f02=»YSICAL SECTOR NUMBER ~ P RB(N) REQERR REQUEST ERROR P SUKL A4,MAXSEC @ P RB(NN) REQERR REQUEST ERROR X P ADR A4,A3 | " P RB(P) INCLEN INCORRECT LENGTH , P ST A3,DWTNOS,A6 SAVE NUMBER OF SECTORS 2 P ST A2,DWTCW2,A6 DWTCW2 CONTAINING P
0x245578…24570c Dummy {f00=0x00b8, f01=0x0190, f02=» A2,A8 P ANK A2,/30 4 P ST A2,DWT:BF,A6 SAVE BITS 0-1 IN 18-BIT ADDRESS " P XIF Z P* f P EJECT DRFD01 p P* P* MULTIPLE SECTOR IO ENTRY P* PFD:000 EQU * P IFT MMUPAG=1 P IFT CHAN=0 P LD A2,DWT:B
0x24570c…2458a0 Dummy {f00=0x00b8, f01=0x0190, f02=») FD:005 FOUR PHYS. SEC. IO P* $ PFD:003 SUK A2,128 . P SUK A4,1 H P ADK A3,1 Z P RB(NZ) FD:003 l P* PFD:005 EQU * . P ST A4,DWTSIO,A6 SECTORS IN ONE IO ON DISC ( P ST A2,DWTRL,A6 UPDATE DWTRL FOR BIO . P ST A3,DWT
0x2458a0…245a34 (5, 189) Dummy {f00=0x00b9, f01=0x0190, f02=» " P LD A2,DWTBA,A6 BUFFER ADDRESS P LD A1,DWT:BF,A6 * , P RF(NZ) FD:007 BUFFER NOT IN SYSTEM AREA B P LDR A3,A2 r P RF(NN) FD:009 6 P AD A3,DWTRL,A6 CHECK IF 64K LIMIT WILL BE PASSED P RF(N) FD:009 NO P* P EJECT DRFD01
0x245a34…245bc8 Dummy {f00=0x00b9, f01=0x018e, f02=» SC A1,DWT:PA,A6 6 BIT PHYSICAL BUFFER ADDRESS ( P ADK A1,/4 CREATE ONE MORE MMU ENTRY 6 P SC A1,DWT:PA+2,A6 b P ANKL A2,/FFF | P LDR A1,A2 ( P ORK A1,1 INDICATE ADDRESS NOT ZERO P* 8 PFD:009 ST A1,DWT:LA,A6 16 BIT LOGICAL BUFFER A
0x245bc8…245d5c Dummy {f00=0x00b9, f01=0x018e, f02=» P RF(Z) FD:060 BASIC READ P SUK A1,4 $ P RF(Z) FD:015 BASIC WRITE 6 P SUK A1,12 X P RF(Z) FD:060 PHYSICAL READ j P SUK A1,4 P RF(Z) FD:013 PHYSICAL WRITE * P SUK A1,15 CHECK IF WRITE DELETED DATA P* PRQ:ERR EQU *
0x245d5c…245ef0 Dummy {f00=0x00b9, f01=0x0190, f02=» P* ! & P LDK A4,1 WRITE DELETED DATA ORDER ! & PFD:013 EQU * PHYSICAL WRITE ORDER ! 8 P ADK A4,4 ! b " PFD:015 EQU * BASIC WRITE ORDER ! t P ADK A4,1 ! " P CF A5,BIO PREPARATION FOR CIO ! P* ! P IFT MMUPAG=1 ! P IFT CHAN=0 ! P I
0x245ef0…246084 Dummy {f00=0x00b9, f01=0x0190, f02=» ! 4 P LD A1,DWT:LA,A6 GET FLAG/LOGICAL BUFFER ADDRESS " ( P RF(Z) FD:019 BUFFER IN SYSTEM AREA " @ P LDR A7,A3 REQUESTED LENGTH " l P LDR A8,A2 SAVE A2 " & P LDKL A4,BUF DRIVER BUFFER ADDRESS " P LDR A2,A4 " & P TS -30,A15 SAVE RUNNING TASK MMU
0x246084…246218 Dummy {f00=0x00b9, f01=0x0190, f02=»TACK " r P LDR A2,A8 RESTORE A2 # 0 P CM BUFFLG,A6 INDICATE BUFFER IN SYSTEM AREA # * PFD:019 EQU * # ^ P XIF # r P* # ~ P IFT TOSS+IBM=2 # P LD A1,DWTFIB,A6 # P RF(Z) FD:018 NOT IBM # P XIF # P* # P IFT IBM=1 # , P LDR A7,A3
0x246218…2463ac Dummy {f00=0x00b9, f01=0x0190, f02=»* # " P CF A5,FD:WRITE PERFORME WRITE $ * P ANKL A3,/200 CHECK IF WRITE PROTECTED $ 0 P RF(Z) FD:020 $ ^ P LDK A3,/40 INDICATE ERROR $ t , P ORRS A3,A6 UPDATE TEMPORARY RETURN CODE $ PFD:020 EQU * $ P RF FD:100 GOTO FDMSIO $ P* $ P EJECT
0x2463ac…246540 Dummy {f00=0x00b9, f01=0x0190, f02=»************* $ P* % PFD:060 CF A5,BIO % P* % 8 P IFT MMUPAG=1 % B P IFT CHAN=0 % X P IFT TOSS+IBM=2 % l P LD A1,DWTFIB,A6 % P RF(Z) FD:070 TOSS DISC % & P LDKL A4,BUF DRIVER BUFFER ADDRESS % 0 P CM BUFFLG,A6 INDICATE BUFFER IN S
0x246540…2466d4 (5, 190) Dummy {f00=0x00b9, f01=0x0190, f02=»080 BUFFER IN SYSTEM AREA % & P LDKL A4,BUF DRIVER BUFFER ADDRESS & " 0 P CM BUFFLG,A6 INDICATE BUFFER IN SYSTEM AREA & L P XIF & P* & P IFT MMUPAG=1 & P IFT IBM=1 & P IFT TOSS+CHAN=0 & & P LDKL A4,BUF DRIVER BUFFER ADDRESS & 0 P CM BUFF
0x2466d4…246868 Dummy {f00=0x00b9, f01=0x0190, f02=»OSS+IBM=2 & P LD A1,DWTFIB,A6 ' P RF(Z) FD:090 NOT IBM ' * P XIF ' H P* ' T P IFT IBM=1 ' ^ P IFT MMUPAG=0 ' p ( P LD A4,DWTBA,A6 ASCII OUTPUT ADDRESS ' P XIF ' P* ' P IFT IBM=1 ' P LD A7,DWTRL,A6 REQ. LEN ' P CF A5,ASCII '
0x246868…2469fc Dummy {f00=0x00b9, f01=0x0190, f02=»FT TOSS+IBM=2 ' P LD A1,DWTFIB,A6 ( P RF(Z) FD:100 TOSS DISC ( . P XIF ( N P* ( Z P IFT MMUPAG=1 ( d P IFF CHAN+IBM=0 ( z 4 P LD A2,DWT:LA,A6 GET FLAG/LOGICAL BUFFER ADDRESS ( ( P RF(Z) FD:100 BUFFER IN SYSTEM AREA ( $ P LD A7,DWTRL,A6 RE
0x2469fc…246b90 Dummy {f00=0x00b9, f01=0x018e, f02=»U TABLE ( t 2 P MVSU A7 MOVE BUFFER FROM SYSTEM TO USER AREA ) & P TL -30,A15 RESTORE MMU FROM STACK ) F P XIF ) p PFD:100 EQU * ) | P ABL FDMSIO ) P* ) P EJECT DRFD01 ) P* ) P******** ) P* * ) P* LOAD * ) P* *
0x246b90…246d24 Dummy {f00=0x00b9, f01=0x0190, f02=» P RF(Z) LOAD00 LOAD ORDER * P ADK A3,17 * $ $ P RB(NZ) RQ:ERR ERROR IF NOT LOCK * 6 P* * ^ PLOAD00 EQU * * h P LDK A2,/14 LOCK * | P CF A5,FD:REA * P ANK A3,1 * & P RF(NZ) LOA:80 ENDIO NOT OPERABLE * P* * P IFT TOSS+IBM=2 * P
0x246d24…246eb8 Dummy {f00=0x00b9, f01=0x0190, f02=» A3,/26 * P RF(Z) LOA:65 LOCK ORDER + P CF A5,VO:NAM + 0 " P CF A5,LD:RC CHECK RETURN CODE + F P EJECT DRFD01 + l P* + P* READ DATA SET LABEL + P* + P LD A2,ECBCW2,A8 SECTOR NO + P SUK A2,7 + P RF(N) LOA:85 REQUEST ERROR +
0x246eb8…24704c Dummy {f00=0x00b9, f01=0x0190, f02=»UF + P CF A5,FD:REA , P SLL A1,4 CHECK NO DATA BIT , P RF(NN) LOA:60 NOT NO DATA , D 0 P ORK A3,/10 INDICATE ILLEGAL DATA SET LABEL , f PLOA:60 EQU * , P CF A5,LD:RC , P ENB , * P LD A3,ECBCW2,A8 DATA SET LABEL SECTOR , P LDK A1,DWTD
0x24704c…2471e0 Dummy {f00=0x00b9, f01=0x0190, f02=»OE , $ P CF A5,STDWT STORE BOE NO IN DWT - P SUK A3,1 CRN - 2 P LDK A1,DWTCRN - H P CF A5,STDWT - ^ P ADK A4,EOE-BOE EOE ADDRESS - r P CF A5,LOGSEC - P LDK A1,DWTEOE - $ P CF A5,STDWT STORE EOE NO IN DWT - P ADK A4,EOD-EOE EOD ADDRESS -
0x2471e0…247374 (5, 191) Dummy {f00=0x00b9, f01=0x018e, f02=» STORE EOD NO IN DWT - P* . PLOA:65 EQU * . & P LDKL A3,/400 . : , P ORRS A3,A6 UPDATE TEMPORARY RETURN CODE . P P* . PLOA:70 EQU * . P XIF . P LD A2,DWTA3,A6 . " P ORS A2,DWTLC,A6 INDICATE LOCK . PLOA:80 EQU * . P ABL END:RC
0x247374…247508 Dummy {f00=0x00b9, f01=0x018e, f02=» P XIF / P* / P EJECT DRFD01 / P* / 2 P* / < P IFF TOSS+IBM=0 / F P* / ^ P* ERROR , UNLOCK / h 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
0x247508…24769c Dummy {f00=0x00b9, f01=0x018e, f02=» & P LDKL A4,BUF DRIVER BUFFER ADDRESS 0 P RTN A5 0 . P XIF 0 > P* 0 J P EJECT DRFD01 0 T P* 0 l P********** 0 v P* * 0 P* UNLOAD * 0 P* * 0 P********** 0 P* 0 PUNLOAD EQU * 0 P IFT IBM=1 0 P* 0
0x24769c…247830 Dummy {f00=0x00b9, f01=0x0190, f02=» 4 P ST A7,12,A8 STORE EOD-NO IN CONTROL WORD OF ECB 1 P* 1 < , P* READ DATA SET LABEL TO DRIVER BUFFER 1 F P* 1 v P CF A5,DSLIO PREPARE FOR I/O 1 & P CF A5,FD:REA READ DATA SET LABEL 1 $ P CF A5,UNL:RC RETURN CODE CHECK 1 P ENB 1 P* 1
0x247830…2479c4 Dummy {f00=0x00b9, f01=0x018e, f02=»BY 26 1 P* 2 P LDK A1,0 2 PUNL:10 SUK A7,26 2 * P RF(N) UNL:20 2 B P ADK A1,1 2 X P RB UNL:10 2 j P* 2 | P EJECT DRFD01 2 P* 2 P* 2 PUNL:20 ADK A7,27 2 P* 2 P* A1 = BINARY TRACK NO 2 * P* A7 = SECTOR NO W
0x2479c4…247b58 Dummy {f00=0x00b9, f01=0x018e, f02=» 2 P SUK A4,1 3 P SRL A3,8 LEFT BYTE 3 P SCR A3,A4 STORE IN BUFFER 3 6 P LDR A7,A1 TRACK 3 X ( P CF A5,BINDEC DEC EBCDIC-CODED IN A3 3 p P SUK A4,3 3 P STR A3,A4 TRACK INTO BUF 3 F P INH INHIBIT INTERRUPTS
0x247b58…247cec Dummy {f00=0x00b9, f01=0x0190, f02=» ( P CF A5,FD:WRITE WRITE DATA SET LEBEL 4 $ P CF A5,UNL:RC CHECK RETURN CODE 4 0 P CF A5,DSOPCH 4 X P CMR A2 INDICATE NOT OPEN 4 n P* 4 P EJECT DRFD01 4 P* 4 P* UNLOCK 4 P* 4 P XIF 4 PUNL:70 EQU * 4 P LDK A2,/C UNL
0x247cec…247e80 Dummy {f00=0x00b9, f01=0x0190, f02=»A6 INDICATE UNLOCK IN DWT 4 P RB LOA:80 END:IO 5 " P* 5 < P IFT IBM=1 5 F P* 5 X P* UNLOAD RETURN CODE CHECK 5 b P* 5 PUNL:RC EQU * 5 P ANKL A3,/207 5 P RF(Z) RTN:A5 NO RETURN CODE 5 P ANKL A3,/200 5 & P RF(Z) RTN:A5 NOT WR
0x247e80…248014 (5, 192) Dummy {f00=0x00b9, f01=0x0190, f02=»A3,A6 UPDATE TEMPORARY RETURN CODE 5 PRTN:A5 EQU * 6 * P RTN A5 6 > P* 6 N P EJECT DRFD01 6 X P* 6 p P* 6 z ( PIBMDSK EQU * IBM DISK HANDLING ENTRY 6 P IFT IBM=1 6 . P CF A15,NVLCHK CHECK IF NEW VOLUME LOADED 6 P ADK A1,0 6 & P A
0x248014…2481a8 Dummy {f00=0x00b9, f01=0x0190, f02=» 6 r P LC A1,DWTOR+1,A6 ORDER CODE 7 P SUK A1,49 7 , P RF(Z) REWIND REWIND FILE 7 > * P LD A3,ECBRL,A8 CHECK REQUESTED LENGTH 7 ` P SUK A3,SECLEN 7 $ P ABL(NZ) INCLEN INCORRECT LENGTH 7 P ADK A1,43 7 $ P RF(Z) SQWRITE SEQUENTIAL WRITE 7 P A
0x2481a8…24833c Dummy {f00=0x00b9, f01=0x0190, f02=» P* SEQUENTIAL READ * 8 P******************* 8 P* 8 < . P ADK A2,DWTCRN-DWTEOD A2 = ADDRESS TO CRN 8 F P LDR* A3,A2 CRN 8 x P ADK A3,1 CRN+1 8 ( P ST A3,ECBCW2,A8 STORE CRN+1 IN ECB 8 P CWK A3,MAXIBM 8 P RF(P) FD:DIS REQUEST ERROR 8
0x24833c…2484d0 Dummy {f00=0x00b9, f01=0x0190, f02=»D AT BY CRN+1 8 p P* 9 P IFT MMUPAG=0 9 ( P LD A4,ECBBA,A8 USER BUFFER ADDRESS 9 6 P XIF 9 b P* 9 n P IFT IBM=1 9 x P LDK A7,SECLEN 9 $ P CF A5,ASCII TRANSFORM TO ASCII 9 P* 9 P EJECT DRFD01 9 P* 9 P* 9 P IFT MMUPA
0x2484d0…248664 Dummy {f00=0x00b9, f01=0x0190, f02=»A1,BUF DRIVER BUFFER ADDRESS 9 & P LD A2,DWTUEC,A6 USER ECB ADDRESS : $ ( P EL A2,ECBBA,A2 USER BUFFER ADDRESS : N P LDK A7,SECLEN LENGTH : z ( P MVSU A7 MOVE SECTOR TO USER BUFFER : , P TL -30,A15 RESTORE MMU TABLE FROM STACK : P XIF : P* :
0x248664…2487f8 Dummy {f00=0x00b9, f01=0x0190, f02=»SQR:10 LDKL A1,/1000 RETURN CODE : P RF END:IO ; ( P* ; : P EJECT DRFD01 ; D P* ; P******************* ; f P* SEQUENTIAL WRITE * ; P******************* ; P* ; PSQWRIT EQU * ; P* ; P* CHECK IF END OF EXTENT ; P* ;
0x2487f8…24898c Dummy {f00=0x00b9, f01=0x0190, f02=» P RF(P) FD:DIS REQUEST ERROR < P CWR* A7,A2 < ( P RF(G) ENDEOE END OF EXTENT < < P* < ` P IFT MMUPAG=1 < j ( P TS -30,A15 SAVE RUNNING TASK'S MMU < " P LD A7,DWTTAB,A6 TTAB ADDRESS < P TL TTB:MT,A7 LOAD MMU TABLE < & P LD A1,DWTUEC,A6 U
0x24898c…248b20 Dummy {f00=0x00b9, f01=0x0190, f02=» * P MVUS A7 MOVE SECTOR TO DRIVER BUFFER = , P TL -30,A15 RESTORE MMU TABLE FROM STACK = 2 P XIF = b P* = n P IFT IBM=1 = x P LDK A4,5 BIO WRITE = P CF A5,BIOSQ = P LDK A7,SECLEN = , P CF A5,EBCDIC TRANSFORM AND MOVE TO BUF = P* =
0x248b20…248cb4 (5, 193) Dummy {f00=0x00ba, f01=0x0190, f02=»D = v , P ORRS A1,A6 UPDATE TEMPORARY RETURN CODE > PSQW:05 EQU * > : P CF A5,DSOPCH > N PSQW:10 EQU * > d 2 P ANKL A3,/207 WRITE PROTECTED OR NOT OPERABLE > x P RF(NZ) END:RC > * P IMR A2 EOD=EOD+1 OR CRN=CRN+1 IN DWT > P LDK A2,SECLEN > , P
0x248cb4…248e48 Dummy {f00=0x00ba, f01=0x0190, f02=» P EJECT DRFD01 ? P* ? P********** ? & P* REWIND * ? 8 P********** ? J P* ? PREWIND EQU * ? f P LDR A3,A2 SAVE EOD ADDRESS ? z P LDK A1,DWTBOE ? P CF A5,DSPAD ? P LDR* A4,A2 BOE ? P STR A4,A3 EOD = BOE ? P LDK A1,DWTC
0x248e48…248fdc Dummy {f00=0x00ba, f01=0x0190, f02=» XIF ? P* @ P EJECT DRFD01 @ P* @ . P***************** @ 8 P* * @ R P* PERFORM ORDER * @ l P* * @ P***************** @ P* @ P* @ P* INPUT: A2 BIO CONTENTS @ 0 P* A3 NO OF B
0x248fdc…249170 Dummy {f00=0x00ba, f01=0x0190, f02=»DS,WRITE @ ~ P XIF A P IFT CHAN=1 A " P LDK A1,0 INDICATOR WRITE MODE A 0 P XIF A V P RF FD:800 A b P* A t PFD:REA EQU * A ~ P IFT CHAN=1 A P LDK A1,1 READ MODE A P XIF A P IFT CHAN=0 A P LDKL A1,/8000 WORDS READ A P XIF
0x249170…249304 Dummy {f00=0x00ba, f01=0x0190, f02=» P IFT MMUPAG=1 B 2 P LD A7,BUFFLG,A6 CHECK WHAT BUFFER TO READ TO B ( P RF(Z) FD:810 BUFFER IN SYSTEM AREA B P 0 P LD A7,DWT:BF,A6 BITS 0-1 IN 18-BIT ADDRESS B | P ECR A7,A7 B P ORR A1,A7 B PFD:810 EQU * B P XIF B P* B P IFT CHAN=
0x249304…249498 Dummy {f00=0x00ba, f01=0x0190, f02=»* B P EJECT DRFD01 C P* C " . P* PUT BUFFER START AND END ADDRESS IN DWT C , P* C ^ " P ST A1,DWTRW,A6 INDICATE MODE C h P ST A4,DWTUB,A6 C P ADR A3,A4 C " P ST A3,DWTUBE,A6 END ADDRESS+2 C P XIF C & P ST A5,DWTA5,A6 SAVE STACK POI
0x249498…24962c Dummy {f00=0x00ba, f01=0x0190, f02=»IO A2,1,CUADR CIO START C ( P RF(3) END:30 DEVICE ADDRESS UNKNOWN D P RF T:DISP D L P* D ^ P EJECT DRFD01 D h P* D * P************************************* D P* D < P* FDMSIO - UPDATE PARAMETERS FOR MULTIPLE SECTOR IO * D * P*
0x24962c…2497c0 Dummy {f00=0x00ba, f01=0x0190, f02=» SECTOR NUMBER D | P LDR* A1,A6 RETURN CODE E & P ANK A1,/7F GET ERROR RETURN CODE E 6 P RF(NZ) END:RC E ` 0 P LD A2,DWTSIO,A6 GET NUMBER OF SECTORS DONE E v $ P ADS A2,DWTCW2,A6 UPDATE DWTCW2 E P LD A2,DWTRL,A6 E " P ADS A2,ECBEL,A8 UPDATE ECBEL
0x2497c0…249954 (5, 194) Dummy {f00=0x00ba, f01=0x018e, f02=» ADR A2,A4 UPDATE BUFFER POINTER E P ST A2,DWTBA,A6 F ( & P RF(N) FDMSI1 NOT PASSED 64K LIMIT F @ P ADK A4,0 F j ( P RF(NN) FDMSI1 NOT PASSED 64K LIMIT F | P LDK A2,/10 F & P ADS A2,DWT:BF,A6 UPDATE BITS 0-1 F PFDMSI1 EQU * F P XIF F P*
0x249954…249ae8 Dummy {f00=0x00ba, f01=0x018e, f02=» F ` P* G P EJECT DRFD01 G P* G * P********** G 4 P* * G F P* END:IO * G X P* * G j P********** G | P* G P IFT IBM=1 G $ PENDEOE EQU * END OF EXTENT EXIT G P LDKL A1,/2000 RETURN CODE G P RF END:IO G P X
0x249ae8…249c7c Dummy {f00=0x00ba, f01=0x0190, f02=» P* H $ PEND:30 EQU * CU ADDRESS UNKNOWN H P LDK A1,1 NOT OPERABLE H 6 * P ST A1,DWTST,A6 INDICATE RECOVERY DONE H T P RB END:IO H P EJECT DRFD01 H P* H P******************** H P* * H P* RECOVERY ROUTINE * H
0x249c7c…249e10 Dummy {f00=0x00ba, f01=0x0190, f02=»STACK H t P XIF I P* I P IFT CPU852=0 I $ " P MSR 8,A15 SAVE A1-A8 ON STACK I : P XIF I ` P* I l P LDKL A6,DWFD01 DWT ADDRESS I v P CM DWTST,A6 I P IM DWTA2,A6 SET FDON FLAG I P* I P EJECT I P* I P* DELAY 2 SEC I P
0x249e10…249fa4 Dummy {f00=0x00ba, f01=0x0190, f02=»SP I PFDON10 LDK A4,DWTTP J P ADR A4,A6 J & P LDR A1,A6 SAVE A6 J 8 P CF A15,SETIMP J R P DATA FDON20,TIME J h P* J PF:DISP EQU * J P RB T:DISP J P* J P* TIME OUT ROUTINE J P* J PFDON20 LDR A6,A1 J P CM DWTTP,A6 J
0x249fa4…24a138 Dummy {f00=0x00ba, f01=0x0190, f02=» MMUPAG=1 J P IFT CHAN=0 K $ P CM BUFFLG,A6 RESET BUFFER FLAG K & P XIF K N P* K Z P IFF TOSS+IBM=0 K d 4 P IM DWTST2,A6 SET RECOVERY/READY INT. INDICATOR K | P LDK A3,3 4 VOLUMES K P* K P EJECT DRFD01 K P* K P* K P* R
0x24a138…24a2cc Dummy {f00=0x00ba, f01=0x0190, f02=» SC A4,DWTA3+1,A6 SAVE IT K P CF A5,SETCIO L " P LDK A2,/14 L 8 P CF A5,FD:REA LOCK L L P ANK A3,1 L f P RF(Z) FDON19 OPERABLE L x P LDK A1,6 NOT OPERABLE L $ P CF A15,VOLCLR CLEAR VOLUME NAME L & P RF FDON21 CONTINUE WITH NEXT DISC L P*
0x24a2cc…24a460 Dummy {f00=0x00ba, f01=0x0190, f02=» PFDON21 EQU * M P LDK A2,/C M P CF A5,FD:REA UNLOCK M * P LDK A3,0 M F , P LC A3,DWTOR,A6 GET INDEX FOR LAST VOL. M X P SUK A3,1 M P RB(NN) FDONLD NEXT VOLUME M P CM DWTOR,A6 M ( P CM DWTST2,A6 INDICATE VOLUMES READ M , P IM DWTST,A6
0x24a460…24a5f4 (5, 195) Dummy {f00=0x00ba, f01=0x0190, f02=»QUEST FOR OPEN ORDER IF RUNNING M z P* N ( " P LD A4,DWTTP2,A6 TIMER POINTER N 2 P RF(Z) FDON09 NOT RUNNING N X P CMR A4 STOP TIMER N z $ P CM DWTTP2,A6 INDICATE NO TIMER N PFDON09 EQU * N P* N 6 P* OPEN FD TO MAKE FOLLOWING LOCK ORDER POSS
0x24a5f4…24a788 Dummy {f00=0x00ba, f01=0x0190, f02=»EN/CLOSE FLAG N ~ P ORS A2,DWTOCF,A6 SAVE O ( P XRRS A2,A4 SET STATUS WORD TO OPEN O 4 P LDR* A2,A4 O ` & P OTR A2,0,SOPDA SET DRIVE TO OPEN O t P* O PFDON23 EQU * O P XIF O P* O P EJECT O P* O P* LOCK DOORS O P* O
0x24a788…24a91c Dummy {f00=0x00ba, f01=0x018e, f02=»WTA3,A6 SAVE O P* P P EJECT P P* P , P* PUT DRIVE NO IN CIO INSTR P 6 P* P Z P SRN A2,A3 DRIVE NO IN A3 P d * P CF A5,SETCIO PUT DRVE NO IN CIO-INSTR P P LDK A2,/14 LOCK P P CF A5,FD:REA P P LD A2,DWTA3,A6 DRIVE IND. P P ANK
0x24a91c…24aab0 Dummy {f00=0x00ba, f01=0x0190, f02=» P RB(NE) FDON25 Q P* Q P IFT OPCLOS=1 Q $ P* Q : D P* RESTORE OPEN/CLOSE STATUS TO SAME VALUE AS BEFORE POWER OFF Q D P* Q $ P LD A2,DWTOCF,A6 OPEN/CLOSE FLAG Q " P ORS A2,SPDLCI TO STATUS WORD Q P CM DWTOCF,A6 CLEAR FLAG Q $ P LD
0x24aab0…24ac44 Dummy {f00=0x00ba, f01=0x0190, f02=» ANY REQUEST Q P* R P CM DWTA2,A6 RESET FDON FLAG R PFDON60 EQU * R B P LD A8,DWTECB,A6 R V 0 P ABL(Z) END:IO NO REQUEST, RETURN VIA TENDIO R n P* R P* RETRY REQUEST R P* R P IM DWTRTY,A6 INDICATE RETRY R P LD A7,DWTORD,A6 R ,
0x24ac44…24add8 Dummy {f00=0x00ba, f01=0x0190, f02=»VATE R P* S P EJECT DRFD01 S P* S . P******************** S 8 P* * S T P* READY INTERRUPT * S p P* * S P******************** S P* S PFDRE EQU * S P LD A2,DWTA2,A6 S * P RB(NZ) F:DISP P
0x24add8…24af6c Dummy {f00=0x00ba, f01=0x0190, f02=» XIF S P* T P IFF TOSS+IBM=0 T P CM DWTST,A6 SET UNIT BUSY T . P RB FDONVL READ VOLUME NAMES T P P XIF T t P* T P EJECT DRFD01 T P* T P********************* T P* * T P* INTERRUPT HANDLER * T P*
0x24af6c…24b100 Dummy {f00=0x00ba, f01=0x0190, f02=»2=1 T * P CF A15,SAVE8 SAVE REGISTERS ON STACK U P XIF U : P* U F P IFT CPU852=0 U P " P MSR 8,A15 SAVE A1-A8 ON STACK U f P XIF U P* U P LDKL A6,DWFD01 DWT ADDRESS U P IFT CHAN=1 U P ENB U & P LD A1,DWTUB,A6 GET BUFFER POINTER
0x24b100…24b294 (5, 196) Dummy {f00=0x00ba, f01=0x0190, f02=»0 READY INTERRUPT U P LD A3,PFPOST V , P RF(NZ) IHDISP POST PROCESSING FLAG SET V 0 ( P LD A3,DWTRW,A6 READ/WRITE INDICATOR V ` P RF(NZ) IH050 READ V P* V P EJECT DRFD01 V P* V P* V PIH010 EQU * V $ P LDR* A3,A1 ONE WORD FROM
0x24b294…24b428 Dummy {f00=0x00ba, f01=0x018e, f02=» V P CIO A2,0,CUADR CIO HALT W PIHDISP EQU * W ( P ABL TDISP GOTO DISPATCHER W < P* W ^ PIH050 EQU * W h P INR A3,0,CUADR READ W | P RB(NA) IH005 W " P STR A3,A1 ONE WORD TO BUFFER W $ P ADK A1,2 UPDATE BUFFER POINTER W P SUK A2,2 W
0x24b428…24b5bc Dummy {f00=0x00ba, f01=0x0190, f02=» P XIF X P* X P EJECT DRFD01 X P* X 2 P* X < P IFT CHAN=0 X F P SST A3,CUADR STATUS X Z P XIF X v P LD A8,DWTECB,A6 ECB ADDRESS X " P LD A5,DWTA5,A6 STACK POINTER X P LDR A2,A3 STATUS X P SLL A2,1 X P RB(N) FDRE READ
0x24b5bc…24b750 Dummy {f00=0x00ba, f01=0x0190, f02=»1,5 DATA FAULT, NOT OPERABLE X P RF(Z) IH:10 RETURN CODE OK Y $ P ORK A3,4 Y H PIH:10 EQU * Y Z P* Y n P EJECT DRFD01 Y x P* Y & P* TRANSFORM RETURN CODE, CU - ECB Y P* Y P ANKL A3,/FF37 Y P RF(Z) IH:80 Y P LDR A1,A3 Y "
0x24b750…24b8e4 Dummy {f00=0x00ba, f01=0x0190, f02=»T BIT 13 ALSO Y PIH:70 EQU * Z P LDR A4,A1 Z * P ANKL A4,/0400 BIT 5 Z < P SLC A4,7 TO BIT 14 Z X P ORR A3,A4 Z t P* Z P IFT TOSS+IBM=0 Z P LDR A4,A1 Z P ANKL A4,/2000 BIT 2 Z P SLL A4,1 TO BIT 1 Z P ORR A3,A4 Z P XIF Z
0x24b8e4…24ba78 Dummy {f00=0x00ba, f01=0x0190, f02=»1,5 TO BIT 0 Z P ORR A3,A1 [ , P ORRS A3,A6 UPDATE TEMPORARY RETURN CODE [ & P ANKL A3,/F7FF [ V PIH:80 EQU * [ l P LDR A1,A3 [ P RTN A5 [ P* [ P EJECT DRFD01 [ P* [ 0 P******************************************* [ 0 P*
0x24ba78…24bc0c Dummy {f00=0x00ba, f01=0x018e, f02=» * [ j 0 P******************************************* P* B P******* L P* * P* BIO * l P* * | P******* P* P* INPUT: A8 ECB ADDRESS P* A4 ORDER P* > P* OUTPUT: A2 BITS 0-12
0x24bc0c…24bda0 Dummy {f00=0x00ba, f01=0x0190, f02=» PBIO EQU * ] & P LD A1,DWTCW2,A6 GET SECTOR NUMBER ] ( P SLL A1,3 PUT IN RIGHT BIO POSITION ] D 6 P LD A2,DWTSIO,A6 GET NUMBER OF SECTORS IN THIS IO ] p P SRC A2,2 ] P ORR A2,A1 COMPLETE BIO ] & P ADR A2,A4 COMPLETE BIO WITH ORDER ] " P L
0x24bda0…24bf34 (5, 197) Dummy {f00=0x00bb, f01=0x0190, f02=» ] P***************** ^ P* * ^ " P* BIOSQ * ^ < P* * ^ V P***************** ^ p P* ^ P* INPUT: A8 ECB ADDRESS ^ P* A4 ORDER ^ P* ^ > P* OUTPUT: A2 BITS 0-12 OF CONTROL WORD U
0x24bf34…24c0c8 Dummy {f00=0x00bb, f01=0x0190, f02=» ^ P IFT IBM=1 _ & P LD A2,ECBCW2,A8 GET SECTOR NUMBER _ ( P SLL A2,3 PUT IN RIGHT BIO POSITION _ D & P ADR A2,A4 COMPLETE BIO WITH ORDER _ p P* _ P IFT MMUPAG=0 _ & P LD A4,ECBBA,A8 GET BUFFER ADDRESS _ P XIF _ P* _ P IFT IBM=1 _
0x24c0c8…24c25c Dummy {f00=0x00bb, f01=0x0190, f02=»GTH _ t P RTN A5 ` P XIF ` P* ` ( P EJECT DRFD01 ` 2 P* ` H P****************** ` R P* VO:NAM * ` l P****************** ` P* ` P* ` PVO:NAM EQU * ` P IFT TOSS+IBM=2 ` P LDK A3,36 LENGTH ` P XIF ` P*
0x24c25c…24c3f0 Dummy {f00=0x00bb, f01=0x018e, f02=»O ` P LDKL A4,BUF READ TO BUFFER a P CF A5,FD:REA a . P ANK A3,/17 FATAL ERROR a D P RF(NZ) VOL:40 a d P IFT IBM=1 a z P LD A2,BUF+32 a P CWK A2,'TO' a P RF(NE) VOL:10 IBM DISC a P LD A2,BUF+34 GET NEXT WORD a P CWK A2,'SS' a
0x24c3f0…24c584 Dummy {f00=0x00bb, f01=0x0190, f02=» a P EJECT DRFD01 b P* b P* b * P IFT TOSS=1 b 4 P LDKL A2,BUF b H P IFT IBM=1 b P RF VOL:20 b n P XIF b P* b P IFT IBM=1 b PVOL:10 EQU * b P LDK A3,10 LENGTH b P LDK A2,/30 BIO b P LDKL A4,BUF READ TO BUFFE
0x24c584…24c718 Dummy {f00=0x00bb, f01=0x0190, f02=»L A1,/400 b , P ORRS A1,A6 UPDATE TEMPORARY RETURN CODE c P LDK A7,10 NO OF CHARACTERS c B 2 P CF A5,ASCII TRANSFER IBM VOLUME NAME TO ASCII c f 0 P LDKL A2,BUF+4 START ADDRESS OF VOLUME NAME c P XIF c P* c P EJECT DRFD01 c P* c P
0x24c718…24c8ac Dummy {f00=0x00bb, f01=0x0190, f02=»US c t * P ORKL A3,/8000 INDICATE NO NEW NVL SET d PVOL:30 EQU * d 8 . P CF A15,VOLGET VOLUME NAME TO DWT SET NVL d L P LD A8,DWTECB,A6 d ~ P LDK A3,0 d PVOL:40 EQU * d P RTN A5 d P XIF d P* d P IFT IBM=1 d P EJECT DRFD01 d
0x24c8ac…24ca40 Dummy {f00=0x00bb, f01=0x0190, f02=» P* ASCII CODE e . P* INPUT STRING ADDRESS IS BUF e $ & P* INPUT: A7 NO OF CHARACTERS e V P* A4 = BUFFER ADDRESS e P* OUTPUT: A1 CHANGED e P* A4 = BUFFER ADDRESS e P* A7 CHANGED e P
0x24ca40…24cbd4 (5, 198) Dummy {f00=0x00bb, f01=0x0190, f02=»NB e P ADR A4,A7 f PASC:10 EQU * f P SUK A4,1 f 0 P LCR A1,A4 EBCDIC CHARACTER f B P ANK A1,/FF f f ( P LC A1,TASCII,A1 TRANSFORM TO ASCII f z 0 P SCR A1,A4 PUT ASCII CHAR. IN OUTPUT BUFFER f P SUK A7,1 f P RB(P) ASC:10 f P RF EB
0x24cbd4…24cd68 Dummy {f00=0x00bb, f01=0x0190, f02=»CDIC TRANSFORMES A STRING FROM ASCII TO f P* EBCDIC CODE g 0 8 P* OUTPUT STRING IS PUT IN DRIVER BUFFER g R P* g & P* INPUT: A7 NO OF CHARACTERS g P* A4 = BUFFER ADDRESS g P* g P* OUTPUT: A1 CHANGED
0x24cd68…24cefc Dummy {f00=0x00bb, f01=0x0190, f02=»A4,BUF DRIVER BUFFER ADDRESS g P XIF h $ P* h 0 P IFT IBM=1 h : P ADR A4,A7 h L PEBC:10 EQU * h ^ P SUK A4,1 h r P LCR A1,A4 GET ASCII CHAR. h P ANK A1,/FF h P LC A1,TEBCDIC,A1 h P SC A1,BUF-1,A7 h P SUK A7,1 h P RB(P) EBC
0x24cefc…24d090 Dummy {f00=0x00bb, f01=0x0190, f02=»CT DRFD01 h P* i P********** i P* LOGSEC * i 0 P********* i B P* i T @ P* FUNCTION: LOGSEC TRANSFORMS PHYSICAL SECTOR TO STANDARD i ^ , P* LOGICAL SECTOR (BINARY). i < P* FORMAT OF PHYS. SEC. TT0SS (EBCDIC COD
0x24d090…24d224 Dummy {f00=0x00bb, f01=0x0190, f02=» A3 BINARY SECTOR NO i . P* A4 ADDRESS TO PHYS. SEC. + 4 j P* j P PLOGSEC EQU * j Z P CF A5,DECBIN j n P LDR A3,A1 SAVE j P ADK A4,2 j P* j P* MULTIPLY BY 26 j P* j P SLL A3,5 *32 j P LDR A2,A1 j P SLL
0x24d224…24d3b8 Dummy {f00=0x00bb, f01=0x0190, f02=» j P EJECT DRFD01 k P* k P* CHECK SECTOR NO k * P* k D P LDR A1,A3 k N P SUK A1,25 k ` P RF(NP) LOG:10 k r P CWK A4,BUF+EOD+4 EOD k P RF(E) LOG:02 YES! k P SUKL A1,1898 k P RF LOG:04 k P* k " P* CHECK EOD LESS/EQUA
0x24d3b8…24d54c Dummy {f00=0x00bb, f01=0x0190, f02=»OINTER k x P RTN A5 l P* l P* FATAL ERROR l ( P* l > ( PLOG:05 ADK A5,4 ADJUST STACK POINTER l H " PLOG:10 LDK A1,/10 RETURN CODE l t , P ORRS A1,A6 UPDATE TEMPORARY RETURN CODE l P INH INHIBIT INTERRUPTS l P ABL LOA:90 ERROR ROUTINE l
0x24d54c…24d6e0 Dummy {f00=0x00bb, f01=0x0190, f02=»NSFORMS TWO EBCDIC CODED DIGITS TO l x D P* BINARY. RANGE OF EBCDIC CODE /F0 - /F9 IS CHECKED m * , P* INPUT: A4 ADDRESS TO FIRST DIGIT m r P* OUTPUT: A1 BINARY m P* WORKING REG: A2,A7 m P* m PDECBIN LDK A1,0 m P LDK A
0x24d6e0…24d874 (5, 199) Dummy {f00=0x00bb, f01=0x0190, f02=»NOT DIGIT m P ADK A2,9 n P SUK A7,1 n $ P RF(Z) DEC:30 n 6 & P ADK A4,1 ADDRESS TO SECOND DIGIT n L PDEC:20 SUK A2,1 n v P RB(N) DEC:10 NEXT DIGIT n P ADK A1,/A MULTIPLY BY 10 n P RB DEC:20 n PDEC:30 ADR A1,A2 n P RTN A5 n
0x24d874…24da08 Dummy {f00=0x00bb, f01=0x0190, f02=»PUT DRIVE NO IN CIO INSTRUCTION n P* o ( 8 P* INPUT: A3 DRIVE NO , (BITS 0-13 MUST BE ZEROES o 2 P* o n P* OUTPUT: A3 CHANGED o x P* A4 CHANGED o P* o PSETCIO LDKL A4,/FFCF o P ANS A4,FD:CIO o P SLL A3,4 o P ORS A
0x24da08…24db9c Dummy {f00=0x00bb, f01=0x0190, f02=»**** o P* p : P* FUNCTION: BINDEC TRANSFORMS A BINARY NUMBER TO TWO p 0 P* EBCDIC-CODED DIGITS (DECIMAL) p T P* p P* INPUT: A7 BINARY NUMBER p P* p . P* OUTPUT: A3 EBCDIC CODED DECIMAL DIGITS p P* A7 CHANGED
0x24db9c…24dd30 Dummy {f00=0x00bb, f01=0x0190, f02=»7,10 p P SLL A3,8 q * P ORR A3,A7 DECIMAL CONVERTED NO IN A3 q P ORKL A3,/F0F0 EBCDIC CODED q L P RTN A5 q p P* q P EJECT DRFD01 q P********* q P* DSLIO * q P********* q P* q 4 P* FUNCTION: PREPARE FOR READING DATA
0x24dd30…24dec4 Dummy {f00=0x00bb, f01=0x0190, f02=» A3 128 q ( P* A4 DRIVER BUFFER ADDRESS r P* A6 DWT ADDRESS r F P* A1 IS CHANGED r h P* r PDSLIO LDK A1,DWTDSS r P CF A5,DSPAD r P LDR* A2,A2 r P SLL A2,3 r P LDK A3,128 r P LDKL A4,B
0x24dec4…24e058 Dummy {f00=0x00bb, f01=0x0190, f02=» FUNCTION: GET EOD-NO AND EOD-NO ADDRESS IN DWT r P* s 8 P* INPUT: A6 DWT ADDRESS s B P* s d P* OUTPUT: A2 EOD ADDRESS s n , P* A7 EOD-NO (0=NOT OPEN) s P* A1 CHANGED s PDSOPCH LDK A1,DWTEOD s P CF A5,DSPAD s
0x24e058…24e1ec Dummy {f00=0x00bb, f01=0x0190, f02=»* s P* t 2 P* FUNCTION: GET ABSOLUTE ADDRESS OF SPECIFIED t 6 P* TYPE OF DATA FOR CORRESPONDING DRIVE t J P* t P* INPUT: A1 DWT OFFSET t P* A6 DWT ADDRESS t P* t " P* OUTPUT: A2 ADDRESS TO DATA t P*
0x24e1ec…24e380 Dummy {f00=0x00bb, f01=0x0190, f02=»2,A1 t P RTN A5 u P* u P EJECT DRFD01 u & P* u > P********* u H P* STDWT * u Z P********* u l P* u ~ : P* FUNCTION: STORE INPUT WORD IN DWT-AREA DEPENDING OF u P* DRIVE NO u P* u ( P* INPUT: A1 OFFSET TO
0x24e380…24e514 (5, 200) Dummy {f00=0x00bb, f01=0x0190, f02=»NGED u z 0 P* A2 ADDRESS TO WORD IN DWT AREA v P* A3 UNCHANGED v @ P* A6 UNCHANGED v b P* v PSTDWT EQU * v P CF A5,DSPAD v P STR A3,A2 v P RTN A5 v P XIF v P* v P EJECT DRFD01 v P*
0x24e514…24e6a8 Dummy {f00=0x00bb, f01=0x0190, f02=»FT TOSS=1 v P IFT IBM=0 w " P DATA 0,0,0 VOLUME NAME BUFFER w $ P IFT MMUPAG+CHAN=2 w J P RES DVBLEN-3 MMU BUFFER w d P XIF w P* w P IFT TOSS+IBM=0 w P IFT MMUPAG+CHAN=2 w P RES DVBLEN MMU BUFFER w P XIF w P* w P EJECT
0x24e6a8…24e83c Dummy {f00=0x00bb, f01=0x0190, f02=»* w | P********************* x P* x ( PDWFD01 EQU * x 2 ( PDWTRCW EQU *-DWFD01 TEMP RETURN CODE x F P DATA 0 x r P DATA /8000 DWT STATUS x P DATA 0 ECB ADDRESS x P DATA 0 ORDER x " P DATA FDADR ACTIVATION ADDRESS x P DATA 0 TTAB-ADD
0x24e83c…24e9d0 Dummy {f00=0x00bb, f01=0x0190, f02=» ECB ADDRESS x z DATA DEVECB MMU ECB ADDRESS y XIF y 8 P* y D PDWTA3 EQU *-DWFD01 y N P DATA 0 y h P DATA 0 SAVE AREA y x P DATA 0 y P DATA 0 y " P DATA 0,0,0,0 STACK (3 LEVELS) y P DATA 0 ORDER SAVE AREA y P* y P EJECT
0x24e9d0…24eb64 Dummy {f00=0x00bb, f01=0x0190, f02=»ATA /8000 NVL INDICATOR 2 y P DATA /8000 NVL INDICATOR 3 z " ( PDWTVO0 EQU *-DWFD01 VOLUME NAME NO 0 z F P DATA /FFFF,/FFFF,/FFFF z r ( PDWTVO1 EQU *-DWFD01 VOLUME NAME NO 1 z P DATA /FFFF,/FFFF,/FFFF z ( PDWTVO2 EQU *-DWFD01 VOLUME NAME NO 2 z
0x24eb64…24ecf8 Dummy {f00=0x00bb, f01=0x0190, f02=»TATUS WORD z v P DATA 0 { P XIF { " PDWTA5 EQU *-DWFD01 { . P DATA 0 { H * PDWTRTY EQU *-DWFD01 RETRY REQUEST FLAG { X P DATA 0 { $ PDWTTP EQU *-DWFD01 TIMER POINTER { P DATA 0 { P* { P EJECT DRFD01 { P* { P* { P IFT
0x24ecf8…24ee8c Dummy {f00=0x00bb, f01=0x018e, f02=»TOR { l P DATA 0 | P* | P IFT OPCLOS=1 | & . PDWTTP2 EQU *-DWFD01 TIMER POINTER FOR OPEN | < P DATA 0 | n 4 PDWTOCF EQU *-DWFD01 OPEN/CLOSE FLAG AT POWER ON | ~ P DATA 0 | P XIF | P* | P EJECT DRFD01 | P* | P* | P
0x24ee8c…24f020 Dummy {f00=0x00bb, f01=0x0190, f02=» | f P DATA 0 } , PDWTRW EQU *-DWFD01 READ/WRITE INDICATOR } P DATA 0 } H P XIF } X P* } d P IFT IBM=1 } n , PDWTBOE EQU *-DWFD01 BEGINNING OF EXTENT } P DATA 0,0,0,0 } $ PDWTEOD EQU *-DWFD01 END OF DATA } P DATA 0,0,0,0 } & PDWTE
0x24f020…24f1b4 (5, 201) Dummy {f00=0x00bc, f01=0x0190, f02=»QU *-DWFD01 DATA SET LABEL SECTOR } P DATA 0,0,0,0 ~ * P XIF ~ @ P* ~ L P EJECT DRFD01 ~ V P* ~ n P* ~ x & PDWTBA EQU *-DWFD01 BUFFER POINTER ~ P DATA 0 ~ ( PDWTRL EQU *-DWFD01 LENGTH IN SUB IO ~ P DATA 0 ~ & PDWTCW2 EQU *-DWF
0x24f1b4…24f348 Dummy {f00=0x00bc, f01=0x0190, f02=»F SECTORS IN SUB IO ~ t P DATA 0 P* , P IFT IBM+TOSS=2 6 & PDWTFIB EQU *-DWFD01 IBM INDICATOR N P DATA 0 x P XIF P* P EJECT DRFD01 P* P* P IFT MMUPAG=1 PDWT:BF EQU *-DWFD01 $ P DATA 0 SAVE
0x24f348…24f4dc Dummy {f00=0x00bc, f01=0x4136, f02=»ATA 0 6 BIT PHYSICAL BUFFER ADDRESS P DATA 0 SECOND MMU ENTRY , P* L PDWT:LA EQU *-DWFD01 V * P DATA 0 16 BIT LOGICAL BUFFER ADDRESS r P XIF P* P IFT MMUPAG=1 PDEVECB EQU * P DATA 0,0,0,0,0,0,0 P XIF P
0x24f4dc…24f670 Dummy {f00=0x00bc, f01=0x2008, f02=» END @
0x24f670…24f804 Dummy {f00=0x00bc, f01=0x0190, f02=»LCIN I ~ 4 P RB SST PERFORM SST INSTRUCTION AND STATUS CHECK J P EJECT J D P* J R P* J , P* WRITE FROM OR READ ONE CHARACTER TO A2 J f P* J P* J PWRITE EQU * J $ P OTR A2,0,CHLCUT SEND CHARACTER J P RF(A) WRIT10 J P RF READ J
0x24f804…24f998 Dummy {f00=0x00bc, f01=0x0190, f02=»BL TDISP J P EJECT K P* K P* K ( P*** WRITEP K 2 P* K D P* WRITE A2 WITH PARITY K N P* K n P* K x PWRITEP ECR A1,A2 K P ORK A2,/80 K PWRI100 SLL A1,1 K P RB(P) WRI100 K P RF(Z) WRI101 K P XRK A2,/80 K P R
0x24f998…24fb2c Dummy {f00=0x00bc, f01=0x0190, f02=»AD CHARACTER TO A2 AND CHECK PARITY K P* L , P* L 6 PREADP CF A5,READ L @ P CWK A2,SYN L X P RB(E) READP L l P ECR A1,A2 L PRE100 SLL A1,1 L P RF(Z) RE110 L P RB(NN) RE100 L P XRK A2,/80 L P RB RE100 L PRE110 LDR A1,A2
0x24fb2c…24fcc0 Dummy {f00=0x00bc, f01=0x0190, f02=» P EJECT M P* M < P* FIND DWT CONTAINING SUBTERMINAL ADDRESS AS GIVEN IN A2 M P* M $ P* CALLING SEQUENCE: CF A5,FINTER M f P* A2=SUBTERMINAL ADDRESS M P* A4 DESTROYED M " P* A3#0: DWT TO FOUND TERMINAL M P* M PFINTER EQU * M P
0x24fcc0…24fe54 (5, 202) Opaque[0x194]
0x24fe54…24ffe8 # DirEnt {nam=»DRGP01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1788, f03=0x0000}
0x24fe54…24ffe8 IdxSect {
0x24fe54…24ffe8 f00 = 0x00bc // 0x24fe54 @0x0
0x24fe54…24ffe8 f01 = 0x000e // 0x24fe56 @0x2
0x24fe54…24ffe8 gno = [ // 0x24fe58 @0x4
0x24fe54…24ffe8 [0x00]: C0x00bc.0x1.0
0x24fe54…24ffe8 [0x01]: C0x00bc.0x2.0
0x24fe54…24ffe8 [0x02]: C0x00bc.0x3.0
0x24fe54…24ffe8 [0x03]: C0x00bd.0x0.0
0x24fe54…24ffe8 [0x04]: C0x00bd.0x1.0
0x24fe54…24ffe8 [0x05]: C0x00bd.0x2.0
0x24fe54…24ffe8 [0x06]: C0x00bd.0x3.0
0x24fe54…24ffe8 ]
0x24fe54…24ffe8 }
0x24ffe8…25017c Dummy {f00=0x00bc, f01=0x0190, f02=» 2 P IDENT DRGP01 REL 10.0 80-03-14 870105041000 P : P PRR 10.0 79-12-07 B * P =3,CORRECTION OF MMU BUFFER EQUATE ^ P REL 9.1 79-04-06 & P =1-2,GEN UPDATE TO 8.2+ STATUS P REL 8.2 79-03-16 P =2,IMPROV. OF TEST ORDE
0x25017c…250310 Dummy {f00=0x00bc, f01=0x0190, f02=»************************************** P* . $ P* PHILIPS TERMINAL SYSTEM PTS 8 P* ` ( P* DRGP01 = DRIVER GENERAL PRINTER j P* P* P* P* P* P* 6 P*************************************************
0x250310…2504a4 Dummy {f00=0x00bc, f01=0x0190, f02=». Z P* 8 P* THE DRIVER ALSO INCLUDES DEVICE DEPENDENT ECHO 6 P* FUNCTIONS, WHICH MAKES IT POSSIBLE TO USE THE P 6 P* GENERAL PRINTER AS AN ECHO DEVICE TO ANY KEY- 4 P* BOARD, THAT RUNS UNDER THE GENERAL KEYBOARD P* DRIVER
0x2504a4…250638 Dummy {f00=0x00bc, f01=0x0190, f02=» P* ( P* I H G P INTERRUPT HANDLER P* : ( P* R C G P RECOVERY ROUTINE D P* p & P* E C H O G P ECHO FUNCTIONS z P* P EJECT P* * P* THE FOLLOWING ORDERS ARE TREATED: P* P* ORDER
0x250638…2507cc Dummy {f00=0x00bc, f01=0x0190, f02=» P* " P* REGISTER A1 = RETURN CODE ( P* A2 = OUTPUT CHARACTER 4 $ P* A3 = BUFFER INDEX ` $ P* A4 = WORK REGISTER " P* A5 = STACK BASE " P* A6 = DWT-ADDRESS P*
0x2507cc…250960 Dummy {f00=0x00bc, f01=0x0190, f02=» ECHO OF BACKSPACE (GPBSP) AND CLEAR ~ ( P* (GPCLR) KEYS SHOULD BE DEFINED. , P* X 8 P* BY MEANS OF CONDITIONAL ASSEMBLY THE DRIVER IS b 0 P* ADAPTED TO HANDLE FOLLOWING FUNCTIONS. P* --ROOMLESS POINT : P* --ACCEPTANCE OF SPE
0x250960…250af4 (5, 203) Dummy {f00=0x00bc, f01=0x0190, f02=»ECHOING OF END OF RECORD CHARACTER * P** --SUPPRESION OF TRAILING BLANKS * @ P* --END OF REQUEST WHEN PRINTER HARDWARE BECOMES INACTIVE X P* 6 P* THE CHARACTER CODES FOR ROOMLESS POINT DIGITS F P* IS DEFINED IN A SPECIAL TABLE. STAN
0x250af4…250c88 Dummy {f00=0x00bc, f01=0x0190, f02=»*** P* P* P* ( P ENTRY GPAD ADDRESS TO ADDRESSBLOCK * 0 P ENTRY ECHOGP DEVICE-DEPENDENT ECHO-ROUTINE V P* P* P* P* . P***************************************** . P* EXTERNAL TOSS MODULE ENTRIES
0x250c88…250e1c Dummy {f00=0x00bc, f01=0x0190, f02=»T SUBROUTINE TO SEND CHARACTER P EXTRN TDISP DISPATCHER & > P EXTRN LDREG LOAD REGISTERS A4, A3, A5, A7, A8 AND RETURN F P EXTRN TENDIO END I/O . P EXTRN SAVE8 SAVE 8 REGISTERS ON A15 STACK 0 P EXTRN ECHRTN RETURN TO KEYBOARD AFTER ECHO
0x250e1c…250fb0 Dummy {f00=0x00bc, f01=0x0190, f02=»ETERS * P************************ P* 2 P* < P EXTRN DWTST STATUS F EXTRN DWTBC BYTE COUNTER b P EXTRN DWTOR ORDER P EXTRN DWTA3 SAVE AREA A3 P* P EJECT P* P* P************* P* CONS
0x250fb0…251144 Dummy {f00=0x00bc, f01=0x0190, f02=»T OF MESSAGE PETB EQU /97 END OF MESSAGE PETX EQU /03 LAST DUMMY 6 PCR EQU /0D CARRIAGE RETURN T PLF EQU /0A LINE FEED v PFFED EQU /0C FORM FEED PSPACE EQU /20 SPACE 0 PPROUT EQU /04 PAPER OUT OR READY SWITCH OFF P*
0x251144…2512d8 Dummy {f00=0x00bc, f01=0x0190, f02=»****************************** P* & 2 P* IT IS POSSIBLE TO EXCLUDE ROOMLESS POINT 0 $ P* FUNCTION BY SETTING X:A = 0 f P* PX:A EQU 1 PCROOM EQU X:A P* 4 P* ACCEPTANCE OF SPECIAL CHARACTER /13 CAN BE 0 P* I
0x2512d8…25146c Dummy {f00=0x00bc, f01=0x0190, f02=»RACTER /14 CAN BE r 0 P* INCLUDED IN THE DRIVER BY SETTING X:C=1 P* N PX:C EQU 0 X PFJOTON EQU X:C j P* . P* IT IS POSSIBLE TO EXCLUDE ECHOING OF , P* AN EXTRA SPACE AFTER EACH CHARACTER P* BY SETTING X:D=0 P
0x25146c…251600 Dummy {f00=0x00bc, f01=0x0190, f02=»S POSSIBLE f 8 P* TO SUPPRESS ECHOING OF END OF RECORD CHARACTER. 8 P* THIS IS ATTAINED BY SETTING THE CONSTANT X:E=0. N P* PX:E EQU 0 PEORECH EQU X:E P* 4 P* SUPPRESSING OF SPACES IN RIGHT HAND OF LINE P* BY SE
0x251600…251794 (5, 204) Dummy {f00=0x00bc, f01=0x0190, f02=»OR UNIT OR PRINTER HARDWARE * P* IS INACTIVE CAN BE CHOSEN BY SETTING $ P* THE CONSTANT RECEND = 1 R PX:G EQU 0 t PRECEND EQU X:G P* . P* A PROGRAM VERSION USING TOSS MMU PAGING * P* IS OBTAINED BY SETTING MMUPAG EQU 1. P*
0x251794…251928 Dummy {f00=0x00bc, f01=0x0190, f02=»PU852 EQU 0. r P* PCPU852 EQU 1 P* 2 P* MMU BUFFER SIZE < P* X PX:H EQU 120 b PDVBLEN EQU X:H v P* =1 , P* SPECIAL CONDITION FOR ABIS PRINTER =1 PABIS EQU 0 =1 P EJECT P* P* $ P****
0x251928…251abc Dummy {f00=0x00bc, f01=0x0190, f02=»DWTDRD EQU /10 START OF DRIVER DEFINED PART P* 4 P IFT MMUPAG=0 > PSTART EQU DWTDRD T P XIF l P* x P IFT MMUPAG=1 PSTART EQU DWTDRD+4 P XIF P* . PDWTAP EQU START+/12 HEAD POSITION POINTER P* * P****
0x251abc…251c50 Dummy {f00=0x00bc, f01=0x0190, f02=»* PGPBSP EQU /2D BACK SPACE PGPCLR EQU /3F CLEAR * P* F P******************** P P* RETURN CODES * l P******************** P* 0 PPAROUT EQU /20 PAPER OUT OR READY SWITCH OFF " PCCERR EQU /4 CODE CHECK ERROR " P
0x251c50…251de4 Dummy {f00=0x00bc, f01=0x0190, f02=» P* TABLES * P********** P* , P* 6 P IFT CROOM=1 @ P* T PROMTAB EQU * ^ * P TABLE FOR ROOMLESS POINT CHARACTERS r ( P DATA /2122,/2426,/3B3C,/3E40,/5E5F P* P XIF P* P* P* " P DATA DV
0x251de4…251f78 Dummy {f00=0x00bc, f01=0x0190, f02=»ORT ROUTINE ADDRESS P DATA IHGP INTERRUPT HANDLER P DATA RCGP RECOVERY ROUTINE @ . P DATA ECHOGP DEVICE-DEPENDENT ECHO-ROUTINE d P EJECT P* P* A C G P P* 2 P* ACGP = ACTIVATION DRIVER GENERAL PRINTER P*
0x251f78…25210c Dummy {f00=0x00bc, f01=0x0190, f02=» X H P* RETURN CODE IS ALSO SET IF TIME-OUT IS SIGNALLED FROM P* CHANNEL UNIT. T P* x > P* ORDER 05: BASIC WRITE. CHARACTER ARE SENT TO PRINTER " P* FROM ECB-BUFFER P* F P* ORDER 06: STAND
0x25210c…2522a0 Dummy {f00=0x00bc, f01=0x018e, f02=» * P LDK A2,STX START OF MESSAGE P LDR A3,A7 =1 . P RF(Z) ACGP10 ORDER 0 =2 D P SUK A3,5 =1 d P RF(E) ACGP09 ORDER 5 =1 z P SUK A3,1 =1 ( P ABL(NE) DISIOE I/O REQUEST ERROR =1 * P LD A3,4,A8 ORDER 6 GET REQ LENGTH =1
0x2522a0…252434 (5, 205) Dummy {f00=0x00bd, f01=0x0190, f02=» PACGP01 SUK A3,/2B =1 $ P RF(E) ACGP06 CONTROL CHAR 2B =1 " P CF A5,OUTPUT SEND STX =1 J P LDK A2,CR =1 l P CF A5,OUTPUT =1 P IFT ABIS=1 =1 P LDK A2,FFED =1 P CWK A3,/31-/2B =1 $ P RF(E) ACGP03 CONTROL CHAR 31 =1
0x252434…2525c8 Dummy {f00=0x00bd, f01=0x0190, f02=» =1 P LDK A2,LF =1 , PACGP03 LDK A1,1 RESET HEAD POS COUNTR =1 " P ST A1,DWTAP,A6 =1 R * PACGP06 LDK A3,2 START BUFFER INDEX =1 n PACGP09 CF A5,OUTPUT =1 P RF ACGP19 =1 P EJECT =2 P* =2 P* ORDER 00: TEST
0x2525c8…25275c Dummy {f00=0x00bd, f01=0x0190, f02=»/02 =2 v P CF A5,OUTPUT =2 * P LDK A2,0 SEND CHAR /00=END OF TEST =2 ( P CF A5,OUTPUT =2 V P RF AGP410 =2 p P EJECT P* & P* GET, CHECK AND SEND CHARACTER P* (IF ORDER 5 NO CHECK) P* PACGP17 CF A5,OUTPUT
0x25275c…2528f0 Dummy {f00=0x00bd, f01=0x0190, f02=»TST,A6 P IFT SUPSPA=1 4 P CF A15,SKIPSP SKIP SPACES IN END OF ECB-BUFFER $ P XIF P LDK A4,0 h 6 PACGP20 CF A15,GETCHR GET CHARACTER FROM ECB-BUFFER z P LDR A1,A1 LAST CHARACTER? P RF(NP) AGP400 YES P LDR A1,A2 P SUK A
0x2528f0…252a84 Dummy {f00=0x00bd, f01=0x0190, f02=»T HEAD POSITION POINTER | P RB ACGP17 * PACGP22 SUK A1,8 TABULATION CHARACTER ? 2 P RF(E) ACGP40 ` P IFT ABIS=1 =1 v P CWK A2,/07 BELL ? =1 P RB(E) ACGP09 =1 P XIF =1 P* P IFT TRETON=0 P IFT FJOTON=0
0x252a84…252c18 Dummy {f00=0x00bd, f01=0x018e, f02=» SUK A1,3 /14? P RB(E) ACGP17 P SUK A1,/C LESS THAN /20 ? , P* N P XIF X P* d P* n P IFT TRETON=1 x P IFT FJOTON=0 P* P SUK A1,2 /13 ? P RB(E) ACGP17 P SUK A1,/D LESS THAN /20 ? P XIF
0x252c18…252dac Dummy {f00=0x00bd, f01=0x018e, f02=» P RB(E) ACGP17 P SUK A1,/C LESS THAN /20 ? P* @ P XIF J P* V & P RF(N) ACGP30 YES,CODE CHECK ERROR ` & P SUK A1,/8E ROOMLESS POINT? (AE) P RF(E) AGP100 P ADK A1,/4F GREATER THAN /5F P RB(NP) ACGP17 NO P
0x252dac…252f40 Dummy {f00=0x00bd, f01=0x018e, f02=» l P RB ACGP17 PACGP24 EQU * 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 PACGP26 ADK A1,3 P RB(NZ) ACGP17 NOT LINE FEED P SUK A1,1 * P ADS A1,DW
0x252f40…2530d4 (5, 206) Dummy {f00=0x00bd, f01=0x0190, f02=» P LDK A1,CCERR P ORS A1,8,A8 RETURN CODE P RB ACGP20 : P EJECT L P* Z P* TABULATION d P* | PACGP40 EQU * , P CF A15,GETCHR GET FIRST ASCII CHARACTER P LDR A4,A2 . P CF A15,GETCHR GET SECOND ASCII CHARACTER
0x2530d4…253268 Dummy {f00=0x00bd, f01=0x0190, f02=»B(NE) ACGP43 8 PACGP44 SU A2,DWTAP,A6 SUBTRACT HEAD POSITION POINTER P LC A4,DWTBC,A6 P , P SUR A2,A4 AND REQUESTS POSITION COUNTER h & P TO GET NUMBER OF SPACES TO SEND P RB(NP) ACGP20 P LDR A4,A2 : PACGP45 LDK A2,SPACE LOOP ALSO
0x253268…2533fc Dummy {f00=0x00bd, f01=0x0190, f02=» P LDR A3,A3 RECOVERY? P RB(NE) ACGP20 $ * P SC A4,DWTBC,A6 RESET POSITION POINTER : P LDK A3,2 START BUFFER INDEX h P RB ACGP19 P EJECT P* P* ROOMLESS POINT P* PAGP100 EQU * P* P IFT CROOM=1
0x2533fc…253590 Dummy {f00=0x00bd, f01=0x0190, f02=» P* ! P IFF CROOM=1 ! P* ! & P ANK A2,/7F ! 0 P* ! D P XIF ! N P* ! Z P RB ACGP17 ! d P EJECT ! v P* ! P* ! ( P* SEND LAST DUMMY , LOAD A1 WITH ! P* RETURN CODE AND END I/O ! P* ! PAGP400 EQU * ! P L
0x253590…253724 Dummy {f00=0x00bd, f01=0x0190, f02=» ! P IFT ABIS=1 =1 " P ANK A2,/4 PAPER IN ? =1 " P RF(NZ) AGP420 YES =1 " @ " P LDK A1,/20 SET RETURN CODE =1 " ^ P XIF =1 " PAGP420 EQU * " 0 P CF A15,UPDAPP UPDATE HEAD POSITION COUNTER " PENDIO CF A15,TENDIO END I/O " $ PEXIT A
0x253724…2538b8 Dummy {f00=0x00bd, f01=0x018e, f02=»CT " P* # P* # , P* UPDAPP = SUBROUTINE TO UPDATE HEAD # , P* POSITION POINTER WHEN END # N ( P* OF REQUEST IS REACHED # ~ PUPDAPP EQU * # ( P LC A3,DWTBC,A6 GET POSITION COUNTER # 2 P ADS A3,DWTAP,A6 UPDATE HEAD P
0x2538b8…253a4c Dummy {f00=0x00bd, f01=0x0190, f02=» # P* $ P* $ * P* SKIPSP = SUBROTINE TO SKIP SPACES $ ( P* IN END OF ECB-BUFFER. $ J 6 P* REQUESTED LENGTH IN ECB IS UPDATED. $ v & P* A1,A2,A4 - WORK REG $ P* $ PSKIPSP EQU * $ ( P LD A1,2,A8 GET
0x253a4c…253be0 Dummy {f00=0x00bd, f01=0x018e, f02=» RF(NG) SKIP30 RL < 3 $ P SUK A1,1 DECR. BA % P LCR A4,A1 GET CHAR % 8 P CCK A4,/2020 SPACE ? % T P RF(NE) SKIP20 NO % r PSKIP07 SUK A2,1 DECR RL % P RB SKIP05 GET NEXT % PSKIP20 CWK A2,4 % P RF(NG) SKIP30 RL < 5 % P LC A4,-2,
0x253be0…253d74 (5, 207) Dummy {f00=0x00bd, f01=0x0190, f02=» P RB SKIP07 GET NEXT & P* & " PSKIP30 ST A2,4,A8 STORE NEW RL & * P RTN A15 & P P XIF & ` P EJECT & l P* & z P* I H G P & P* & P* INTERRUPT & P* & PIHGP EQU * & P LD A4,DWTST,A6 BUSY? & P RB(N) EXIT NO & P
0x253d74…253f08 Dummy {f00=0x00bd, f01=0x018e, f02=»ANNEL UNIT ? & r P IFT RECEND=0 ' P RB(NZ) EXIT ' * P XIF ' > P IFT RECEND=1 ' J P RB(NZ) AGP430 ' ` P XIF ' v P ' 4 PIHGP10 ABL LDREG RELOAD A3-A5 AND RETURN VIA A5 ' PIHGP20 LDR A1,A1 =2 ' , P RB(Z) IHGP10 TEST ORDER AND TIME OUT =2 '
0x253f08…25409c Dummy {f00=0x00bd, f01=0x0190, f02=» P* ( PECHOGP EQU * ( P LDK A4,COSPAC ( " P LDR A7,A7 EOR? ( 8 P RF(N) ECGP17 YES ( P P* ( j P IFT EORECH=0 ( t P* ( P SUK A2,/80 EOR-CHARACTER ( P RF(NN) ECGP20 YES ( P ADK A2,/80 ( P* ( P XIF ( P* ( P LDR
0x25409c…254230 Dummy {f00=0x00bd, f01=0x0190, f02=» ( | P SUK A1,/3 CR =1 ) P RF(E) ECGP10 YES =1 ) P SUK A1,/B =1 ) < P RF(E) ECGP50 CLEAR ) R 8 P SUK A1,/20-/8-/10 CHECK THAT CHAR IS WITHIN /20-/5F ) n P RF(N) ECGP20 ) P SUK A1,/5F-/20 ) P RF(P) ECGP20 ) & PECGP10 CF A5,OUTPUT SEND C
0x254230…2543c4 Dummy {f00=0x00bd, f01=0x0190, f02=»CLEAR SECTION ) x P* * P IFT COSPAC=1 * P* * 6 P LDK A2,SPACE NO SEND SPACE * @ P RB ECGP10 * d P* * v P XIF * P* * 6 PECGP17 CF A15,UPDAPP UPDATE HEAD POSITION POINTER * ( PECGP20 ABL ECHRTN RETURN TO KEYBOARD * P EJECT *
0x2543c4…254558 Dummy {f00=0x00bd, f01=0x0190, f02=» CANCEL * P* + PECGP50 EQU * + " P LDK A2,GPCLR CLEAR CHARACTER + 0 P LDK A4,3 + V P RB ECGP10 + h PECGP60 LDK A2,LF LINE FEED + z P LC A3,DWTBC,A6 + P ANK A3,/FF + " PECGP70 CF A5,OUTPUT SEND CHAR. + P LDK A2,/08 BACKSPACE +
0x254558…2546ec Dummy {f00=0x00bd, f01=0x0190, f02=» P* , P* R C G P , P* , " 0 P* RCGP = RECOVERY ROUTINE GENERAL PRINTER , , P* , ` P* , j ( P* RECOVERY IS CARRIED OUT ONLY IF , t P* ORDER 6 IS RUNNING , P* , P* ON ENTRY: , P* , P* A6 = DWT-ADDRESS , P
0x2546ec…254880 Dummy {f00=0x00bd, f01=0x0190, f02=» XIF , P* - P IFT CPU852=0 - " P MSR 8,A15 SAVE A1-A8 ON STACK - , P XIF - R P* - ^ P LD A2,DWTST,A6 BUSY ? - h P RB(N) EXIT NO - ( P LDK A2,SOH RESET PRINT BUFFER CODE - P CF A5,OUTPUT SEND IT - P CWK A7,5 - P RF(E) RCGP10 -
0x254880…254a14 (5, 208) Dummy {f00=0x00bd, f01=0x0190, f02=» 0 P LC A2,DWTST,A6 GET LEFT BYTE OF STATUS WORD . P ANK A2,/4 LINE FEED DONE ? . 8 P ABL(E) ACGP NO . P LDK A2,SPACE . t P CF A5,OUTPUT SEND SPACE . P LDK A2,STX . P CF A5,OUTPUT SEND STX . P LDK A2,CR CARRIAGE RETURN . P LDK A3,0
0x254a14…254ba8 Dummy {f00=0x00bd, f01=0x4018, f02=» . P END / @ / LEFT BYTE OF STATUS WORD . P ANK A2,/4 LINE FEED DONE ? . 8 P ABL(E) ACGP NO . P LDK A2,SPACE . t P CF A5,OUTPUT SEND SPACE . P LDK A2,STX . P CF A5,OUTPUT SEND STX . P LDK A2,CR CARRIAGE RETURN . P LDK A3,0
0x254ba8…254d3c Dummy {f00=0x00bd, 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 & (
0x254d3c…254ed0 Dummy {f00=0x00bd, f01=0x0190, f02=» VALUE l P RF(Z) TIME10 NO TIMING ! P ST A2,TIMERR ! . P CF A15,SETIME ! D P DATA TOUTRE ! Z PTIMERR DATA 0 ! n ( P ST A4,DWTTP,A6 STORE TIMER POINTER ! PTIME10 EQU * ! P RF GBUF10 RETURN ! P* ! P* TIMEOUT READ TIMER ! P* !
0x254ed0…255064 Dummy {f00=0x00bd, f01=0x0190, f02=»R2 RB ENDIO COMPLETE REQUEST ! P* " $ P* WRITE TIMER=TIMWR " . P* " J PTIMEWR LDR A1,A6 " T . P LD A2,DWTTIM,A6 GET REQUEST TIMEOUT VALUE " l P RB(Z) TIME10 NO TIMING " P ST A2,TIMWR " P CF A15,SETIME " P DATA TOUTWR " PTIMWR DATA 0
0x255064…2551f8 Dummy {f00=0x00bd, 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 # (
0x2551f8…25538c Dummy {f00=0x00bd, f01=0x0190, f02=»* STOP REQUEST TIMING # P* $ & P* REMAINING TIME IS RETURNED IN A2 $ ( P* $ R P* $ PCTIME EQU * $ f & P LD A2,DWTTP,A6 GET TIMER POINTER $ z P RF(Z) CTIM10 NOT RUNNING $ P LDR* A2,A2 $ " P NGR A2,A2 GET REMAINING TIME $ P CM* DWT
0x25538c…255520 Dummy {f00=0x00bd, f01=0x0190, f02=» $ $ P* CALLING SEQUENCE: CF A15,GRBUF % P* A4=0 IF NO BUFFER IS FREE % 0 & P* ELSE A4 CONTAINS BUFFER ADDRESS % T P* A2 AND A3 ARE DESTROYED % ~ P* % P* % ( PGRBUF LDKL A2,DCRBUF RECEIVE BUFFERS % PGBUF INH % P LDR* A4,A2 % P RF(
0x255520…2556b4 (5, 209) Opaque[0x194]
0x2556b4…255848 # DirEnt {nam=»DRGP02«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x17c0, f03=0x0000}
0x2556b4…255848 IdxSect {
0x2556b4…255848 f00 = 0x00be // 0x2556b4 @0x0
0x2556b4…255848 f01 = 0x0014 // 0x2556b6 @0x2
0x2556b4…255848 gno = [ // 0x2556b8 @0x4
0x2556b4…255848 [0x00]: C0x00be.0x0.0
0x2556b4…255848 [0x01]: C0x00be.0x1.0
0x2556b4…255848 [0x02]: C0x00be.0x2.0
0x2556b4…255848 [0x03]: C0x00be.0x3.0
0x2556b4…255848 [0x04]: C0x00bf.0x0.0
0x2556b4…255848 [0x05]: C0x00bf.0x1.0
0x2556b4…255848 [0x06]: C0x00bf.0x2.0
0x2556b4…255848 [0x07]: C0x00bf.0x3.0
0x2556b4…255848 [0x08]: C0x00c0.0x0.0
0x2556b4…255848 [0x09]: C0x00c0.0x1.0
0x2556b4…255848 ]
0x2556b4…255848 }
0x255848…2559dc Dummy {f00=0x00be, f01=0x0190, f02=» 2 P IDENT DRGP02 REL 10.0 80-03-14 870105041000 P : * P =1,IMPROVEMENT OF FORM LENGTH CON- B * P TROL & FORM FEED FUNCTION ON CONT. p & P STATIONARY. PRR 10.0 79-12-07 " P =2,XIF MOVED TO RIGHT PLACE P PRR 10.0 80-01-25
0x2559dc…255b70 Dummy {f00=0x00be, f01=0x0190, f02=» < P* PHILIPS TERMINAL SYSTEM PTS * < P* * D 4 P* DRGP02 = DRIVER GENERAL PRINTER * < P* * < P*
0x255b70…255d04 Dummy {f00=0x00be, f01=0x0190, f02=»*********************************** | P* , 4 P* THIS DRIVER HANDLES GENERAL PRINTER PTS 8081 6 P* n 4 P* THE DRIVER CONSISTS OF THE FOLLOWING PARTS : x P* $ P* A C T P : ACTIVATION PART P* & P* I H T P : INTERRUPT HA
0x255d04…255e98 Dummy {f00=0x00be, f01=0x0190, f02=» TREATED: t P* $ P* ORDER 00 : TEST STATUS P* ORDER 06 : WRITE D * P* ORDER 0B : POSITION DOCUMENT f . P* ORDER 24 : SET PRINTER PARAMETERS ( P* ORDER 38 : RELEASE DOCUMENT P* , P* THE FOLL
0x255e98…25602c Dummy {f00=0x00be, f01=0x0190, f02=»T OUT ` ( P* BIT 13 : CODE CHECK ERROR $ P* BIT 15 : NOT OPERABLE : P* b P* l P* NORMAL REGISTER USAGE: v P* " P* REGISTER A1: WORK REGISTER " P* A2: INPUT/OUTPUT $ P* A3: BUFFER PO
0x25602c…2561c0 Dummy {f00=0x00be, f01=0x0190, f02=» A7: ORDER P* A8: ECB-ADDRESS P* 8 P* B P EJECT L P* Z P* d 0 P******************************************* n P* P* ENTRIES P* 0 P******************************************* P* P*
0x2561c0…256354 (5, 210) Dummy {f00=0x00be, f01=0x0190, f02=»EXTERNALS P* 0 P******************************************* P* P P* Z , P EXTRN TDISP DISPATCHING FROM INTERRUPT d $ P EXTRN DISIOE DISPATCH I/O ERROR & P EXTRN DISEND END I/O AND DISPATCH & P EXTRN OUTPUT OUTPUT ONE CHARACTER
0x256354…2564e8 Dummy {f00=0x00be, f01=0x0190, f02=»XTRN DWTST DWT STATUS DISPLACEMENT & P EXTRN DWTECB DWT ECB DISPLACEMENT * ( P EXTRN DWTOR DWT ORDER DISPLACEMENT T 2 P EXTRN STREG STORE REG = GET STATUS INPUT CHAR ( P EXTRN INIFLG SYSTEM START INDICATOR P EJECT P* P* . P
0x2564e8…25667c Dummy {f00=0x00be, f01=0x0190, f02=» P* P* $ PSTB EQU /82 START OF TEXT BLOCK " PETB EQU /97 END OF TEXT BLOCK @ " PSPEC EQU /2E SPECIAL CHARACTER f PSTX EQU /02 START OF TEXT PETX EQU /03 END OF TEXT PLF EQU /0A LINE FEED PFF EQU /0C FORM FEED PCR
0x25667c…256810 Dummy {f00=0x00be, f01=0x0190, f02=»QUENCE INTRODUCER z PREP EQU /62 REPEAT * PVPR EQU /65 VERTICAL POSITION RELATIVE 4 " PINFF EQU /74 INPUT FRONT FEED b . PVPFF EQU /71 VERTICAL POSITION FRONT FEED " PEJFF EQU /38 EJECT FRONT FEED ( PSNV EQU /77 SELECT NATIONAL VERSION
0x256810…2569a4 Dummy {f00=0x00be, f01=0x0190, f02=»0 DEVICE CONTROL STRING PST EQU /5C STRING TERMINATOR PDEL EQU /7F DELETE D PZERO EQU /30 ZERO ^ PNEG EQU /FF x P EJECT P* P* > P********************************************************* P* P* CONTROL
0x2569a4…256b38 Dummy {f00=0x00be, f01=0x0190, f02=»* P* PCSREP EQU * REPEAT P BYTE ESC,CSI . P BYTE ZERO,ZERO D P BYTE ZERO,REP P BYTE NEG,NEG r * PCSVPR EQU * VERTICAL POSITION RELATIVE P BYTE ESC,CSI P BYTE ZERO,ZERO P BYTE ZERO,VPR P BYTE NEG,NEG
0x256b38…256ccc Dummy {f00=0x00be, f01=0x0190, f02=»POSITION FRONT FEED z P BYTE ESC,CSI P BYTE ZERO,ZERO 2 P BYTE VPFF,NEG J " PCSEJFF EQU * EJECT FRONT FEED ` P BYTE ESC,EJFF P BYTE NEG,NEG P EJECT PCSSNV EQU * P SELECT NATIONAL VERSION P BYTE ESC,CSI
0x256ccc…256e60 Dummy {f00=0x00be, f01=0x0190, f02=»YTE SLPL,NEG * P BYTE NEG,NEG & PCSRIS EQU * RESET TO INITIAL STATE . P BYTE ESC,RIS X P BYTE NEG,NEG n $ PCSDSR EQU * DEVICE STATUS REPORT P BYTE ESC,CSI P BYTE /35,DSR P BYTE NEG,NEG P EJECT P* P*
0x256e60…256ff4 (5, 211) Dummy {f00=0x00be, f01=0x0190, f02=»***************************************** P* 2 P* < P* F 4 P* THE STANDARD NATIONAL CHARACTER SET IS CHOOSEN P 8 P* BY SETTING X:A TO 1-15 ACCORDING TO THE LIST BELOW P* P* 4 P* NCV=1 GERMANY,AUSTRIA,LUXEMBOURG,SWITZERLAND
0x256ff4…257188 Dummy {f00=0x00be, f01=0x0190, f02=» =4 SPAIN,MEXICO,ARGENTINA,VENEZUELA P =5 ITALY,SWITZERLAND . P =6 SWEDEN,FINLAND N P =7 DENMARK,NORWAY l P =8 PORTUGAL,BRAZIL P =9 YUGOSLAVIA P =10 USA,CANADA,AUSTRALIA $ P =11 SWEDEN (SPECIAL VERSION)
0x257188…25731c Dummy {f00=0x00be, f01=0x0190, f02=»02 GREAT BRITAIN AS STANDARD PSTDNCV EQU X:A $ P EJECT : P* H P* R , P* THE FRONT FEED DEVICE CAN BE EXCLUDED P* BY SETTING X:B = 0 P* P* PX:B EQU 1 $ PFFDEV EQU X:B FRONT FEED DEVICE P* P*
0x25731c…2574b0 Dummy {f00=0x00be, f01=0x0190, f02=»PAGLEN EQU X:C P* P* . P* THE STANDARD NUMBER OF LINES IS DEFINED * & P* BY SETTING X:D = NUMBER OF LINES P* P* PX:D EQU 36 * PDOCLEN EQU X:D P EJECT P* P* P* P* MMU BUFFER SIZE
0x2574b0…257644 Dummy {f00=0x00be, f01=0x0190, f02=»G h * P* IS OBTAINED BY SETTING MMUPAG EQU 1 P* 8 P* B PMMUPAG EQU 0 L P* ` P* j P* t 6 P* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION ~ . P* SET IS OBTAINED BY SETTING CPU852 EQU 0 P* P* PCPU852 EQU
0x257644…2577d8 Dummy {f00=0x00be, f01=0x0190, f02=»* 0 P******************************************* P* > P* H P* R 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+4
0x2577d8…25796c Dummy {f00=0x00be, f01=0x0190, f02=»EQU START+/16 PRINTER PAPER LENGTH . PDWTDL EQU START+/18 DOCUMENT PAPER LENGTH * 0 PDWTALN EQU START+/1A ACTUAL LINE ON DOCUMENT 4 PDWTRLN EQU START+/1C REQUESTED LINE ON DOCUMENT 2 PDWTRC EQU START+/1F RETURN CODE (ACKUMULATED) 0 PDWTSTR EQU
0x25796c…257b00 Dummy {f00=0x00be, f01=0x0190, f02=»CTUAL COLUMN DOCUMENT z , PDWTACP EQU START+/27 ACTUAL COLUMN PAPER * PDWTCO1 EQU START+/2A COLUMN COUNTER 1 N * PDWTCO2 EQU START+/2B COLUMN COUNTER 2 | , PDWTSYST EQU START+/30 SYSTEM START IND. 2 PDWTLFD EQU START+/32 LINE/FORM FEED INDICATOR
0x257b00…257c94 (5, 212) Dummy {f00=0x00be, f01=0x0190, f02=» 0 P******************************************* P* < & PECBBA EQU 2 BUFFER ADDRESS IN ECB F ( PECBRL EQU 4 REQUESTED LENGTH IN ECB p ( PECBEL EQU 6 EFFECTIVE LENGTH IN ECB " PECBRC EQU 8 RETURN CODE IN ECB $ PECBCW EQU 10 CONTROL WORD
0x257c94…257e28 Dummy {f00=0x00be, f01=0x0190, f02=»********************************* P* * P* 4 P DATA DVBLEN MMU BUFFER SIZE > P DATA 2 DEVICE INDEX b PGPAD8 EQU * ADDRESS BLOCK ~ P DATA ACTP ACTIVATION DRIVER " P DATA 0 ABORT ROUTINE ADDRESS P DATA IHTP INTERRUPT HANDLER
0x257e28…257fbc Dummy {f00=0x00be, f01=0x0190, f02=»6,/2424 PTPLEN EQU *-TPTAB P * P 2 P EJECT : P* H P* R P* A C T P P* p 2 P* THIS IS THE ACTIVATION PART OF THE DRIVER z > P* CHECKS VALIDITY OF ORDERS AND JUMPS TO ORDER PROCESSOR P* P* P*
0x257fbc…258150 Dummy {f00=0x00be, f01=0x018e, f02=» LC A2,DWTOR,A6 GET DWT INDEX P ANK A2,1 MASK & * P LC A3,DWTST+1,A6 GET OLD DEVICE VALUE < P ANK A3,/FE j P ORR A3,A2 ~ " P SC A3,DWTST+1,A6 STORE INDEX & P ADR A7,A2 ADD DWT INDEX TO ORDER * P SC A7,DWTOR+1,A6 STORE MODIFIED ORDER
0x258150…2582e4 Dummy {f00=0x00be, f01=0x0190, f02=» P RB(NN) ACT010 TRY NEXT P* $ P ABL DISIOE ILLEGAL ORDER . P* P P* Z PACT020 EQU * d P ADR A3,A3 GET INDEX x P ABI TPFUC,A3 EXECUTE ORDER P EJECT PTPFUC EQU * P IFT FFDEV=1 4 P DATA TSTSTA,WRTDOC,POSDOC
0x2582e4…258478 Dummy {f00=0x00be, f01=0x0190, f02=»T STATUS ~ P* P* PTSTSTA EQU * TEST STATUS $ P CF A5,RESREC D * P CF A5,GTSTAT GET STATUS FROM PRINTER Z P ABL DISEND END REQUEST P EJECT P IFT FFDEV=1 P* P* P* ORDER 06: WRITE DOCUMENT P*
0x258478…25860c Dummy {f00=0x00be, f01=0x0190, f02=» P RF(NZ) WRDO05 YES P LDKL A3,/2000 * P TM A1,A3 DOCUMENT OUT ? 8 P RF(Z) WRDO06 NO X , P LDKL A3,/8000 YES SET BIT 0 (REQ ERROR) p P ORS A3,ECBRC,A8 P ABL DISEND END REQUEST PWRDO05 EQU * * PWRDO06 LDK A3,1
0x25860c…2587a0 Dummy {f00=0x00be, f01=0x0190, f02=» RF(NZ) WRDO15 ( P LDK A3,1 SET UP ECB BUFFER POINTER * P CF A15,GETCHR GET CONTROL CHARACTER B P CWK A2,/31 CTRL CHAR=/31 ? p * P ABL(NE) POSERR NO,DOC NOT POSITIONED P LD A3,DWTDL,A6 * ( P ST A3,DWTRLN,A6 FIRST LINE ON DOC. , P
0x2587a0…258934 (5, 213) Dummy {f00=0x00bf, f01=0x0190, f02=» n P LD A3,DWTRLN,A6 & P ST A3,DWTALN,A6 SET DWTALN=DWTRLN P J 0 PWRDO15 LDKL A2,CSSNV SELECT NATIONAL VERSION R 6 P LDK A3,DWTDCS DOCUMENT CHARACTER SET DISPLACEMENT , P CF A5,SEND SEND SELECT NATIONAL VERSION P * =1 P * =1
0x258934…258ac8 Dummy {f00=0x00bf, f01=0x0190, f02=»NTINOUS STATIONARY z P* P* $ PWRTCON EQU * . P * B $ P CF A5,GTSTAT GET DEVICE STATUS P P LDKL A3,/2000 * x P TM A1,A3 END OF PAPER? P RF(Z) WRCO05 NO. P ABL ENDIO END REQUEST " PWRCO05 LDK A3,1 NOT OPERABLE?
0x258ac8…258c5c Dummy {f00=0x00bf, f01=0x0190, f02=» 2 P LDK A3,DWTPCS PRINTER CHAR. SET DISPLACEMENT , P CF A5,SEND SEND SELECT NATIONAL VERSION : P U =1 j P U =1 z P U =1 P* P* GET CONTROL CHARACTER P* , PWRT01 LDK A3,1 SET UP ECB BUFFER POINTER ( P CF A15,GE
0x258c5c…258df0 Dummy {f00=0x00bf, f01=0x018e, f02=»D ? n P RF(Z) WRT04 NO ! P CF A5,RESREC YES ! $ " P CWK A2,/2B CTRL. CHAR.=/2B ? ! > P RF(NE) WRT08 NO ! d $ P LC A1,DWTOR+1,A6 GET DWT INDEX ! ~ P ANK A1,1 DOCUMENT ? ! P RF(NZ) WRT09 YES ! P RF WRT07 NO ! & PWRT04 CWK A2,/2B CTR
0x258df0…258f84 Dummy {f00=0x00bf, f01=0x0190, f02=» ! | & P LD A4,DWTCO1,A6 GET ACTUAL COLUMN " * P CF A5,KONVER CONVERT BINARY TO ASCII " 2 P " ` > P SC A2,DWTACP,A6 STORE THE VALUE IN ACTUAL COLUMN PAPER D " h J P ST A4,DWTACP+2,A6 STORE THE VALUE IN ACTUAL COLUMN PAPER DISPLACEMENT " PWRT07 LDK A2,/20
0x258f84…259118 Dummy {f00=0x00bf, f01=0x0190, f02=»END SEND REPEAT " ( P LDK A3,2 SET UP ECB BUFFER POINTER # P RF WRT15 # D , PWRT03 LD A4,DWTCO2,A6 GET ACTUAL COLUMN # V * P CF A5,KONVER CONVERT BINARY TO ASCII # > P SC A2,DWTACD,A6 STORE THE VALUE IN ACTUAL COLUMN DOC. DI # J P SC A4,DWTACD+2,A6
0x259118…2592ac Dummy {f00=0x00bf, f01=0x0190, f02=»LDK A2,/20 SEND SPACE # P CF A5,OUTPUT $ P LDKL A2,CSREP REPEAT $ 4 6 P LDK A3,DWTACD ACTUAL COLUMN DOCUMENT DISPLACEMENT $ R P CF A5,SEND SEND REPEAT $ ( P LDK A3,2 SET UP ECB BUFFER POINTER $ P RF WRT15 $ ( PWRT08 LC A1,DWTLFD,A6 GET INDI
0x2592ac…259440 Dummy {f00=0x00bf, f01=0x0190, f02=»* $ P RF(Z) WRT13 NO % P* % " P CWK A2,/30 TWO LINE FEED ? % , P RF(E) WRT11 YES % P P* % j P CWK A2,/31 FORM FEED ? % t P RF(E) WRT12 YES % P RF WRT16 * % * PWRT11 LD A1,DWTRLN,A6 GET REQ LINE NO % ( P CF A5,BINARY CONV ASCII
0x259440…2595d4 (5, 214) Dummy {f00=0x00bf, f01=0x018e, f02=»A5,BINARY CONV ASCII TO BINARY % " PTWO SUK A3,1 INCR REQ LINE NO & ( P LDR A4,A3 * & N ( P CF A5,KONVER CONV BINARY TO ASCII & d ( P ST A4,DWTRLN,A6 STORE REQ LINE NO & P* & , P LDKL A2,CSVPFF VERTICAL POS FRONT FEED & , P LDK A3,DWTRLN REQ
0x2595d4…259768 Dummy {f00=0x00bf, f01=0x0190, f02=» P RF WRT12 ' P* ' P* ' * PWRT13 CWK A2,/30 CONTINOUS STATIONARY ' * $ P RF(E) WRT05 TWO LINE FEED,YES ' X P* ' P CWK A2,/31 FORM FEED ? ' P RF(NE) WRT10 NO ' P* ' P LDK A2,FF SEND FORM FEED ' P CF A5,OUTPUT * ' P
0x259768…2598fc Dummy {f00=0x00bf, f01=0x0190, f02=»UTPUT ' ( PWRT12 LC A1,DWTLFD,A6 GET INDICATOR ( , P ORK A1,/4 INDICATE LINE/FORM FEED DONE ( : & P SC A1,DWTLFD,A6 STORE INDICATOR ( j ( PWRT14 LC A2,DWTOR+1,A6 GET DWT INDEX ( P ANK A2,1 DOCUMENT? ( P RF(NZ) WRT45 YES ( . P CM DWTCO1,A6 CLEA
0x2598fc…259a90 Dummy {f00=0x00bf, f01=0x0190, f02=»T ( P ) PWRT15 LDK A3,2 * ) P RF WRT20 * ) , . PWRT17 SUK A3,/02 ECB BUFFER POINTER = /02 ) @ P RF(Z) WRT18 YES. ) r ( P LDK A2,CR NO. SEND CARRIAGE RETURN ) P CF A5,OUTPUT ) " PWRT18 CF A5,GTSTAT GET STATUS ) P RF ENDIO END REQUES
0x259a90…259c24 Dummy {f00=0x00bf, f01=0x0190, f02=» LDR A4,A2 ) P* * @ P* EXAMINE CHARACTER AND SEND DEPENDING ON TYPE OF CHARACTER * P* * ` P * j P SUK A4,/20 CHAR < /20? * r ( P RB(N) WRT20 YES GET A NEW CHARACTER * P SUK A4,/5F CHAR < /7F? * P RF(N) WRT25 YES. * P SUK A4,/2F NO.
0x259c24…259db8 Dummy {f00=0x00bf, f01=0x0190, f02=» * P RB WRT20 + PWRT30 LDK A2,/2E + PWRT25 LDR A4,A1 + 2 P CF A5,OUTPUT SEND CHARACTER + J $ P LC A2,DWTOR+1,A6 GET DWT INDEX + n P ANK A2,1 DOCUMENT? + P RF(NZ) WRT40 YES + & P IM DWTCO1,A6 INC.COLUMN COUNTER 1 + P RB WRT20 + , P
0x259db8…259f4c Dummy {f00=0x00bf, f01=0x0190, f02=» SC A2,DWTLFD,A6 RESET LF/FF IND. + P ABL DISEND END REQUEST , * P , J P EJECT , R P IFT FFDEV=1 , ` P* , t P* , ~ $ P* ORDER 0B : POSITION DOCUMENT , 0 P* CONTROL WORD CONTAINS REQUESTED LINE NO , P* , P* , " PPOSDOC EQU * POS
0x259f4c…25a0e0 Dummy {f00=0x00bf, f01=0x0190, f02=» RF(NZ) POS020 YES , * P LDKL A2,CSSNV SELECT NATIONAL VERSION - $ P LDK A3,DWTDCS DOCUMENT VERSION - J P CF A5,SEND SEND SNV - r P * =1 - P * =1 - P * =1 - & P LD A4,ECBCW,A8 GET REQUESTED LINE - P ANK A4,/FF - & P RF(Z) POSER
0x25a0e0…25a274 (5, 215) Dummy {f00=0x00bf, f01=0x0190, f02=»LINE - v P RF(G) POSERR YES . P ADK A3,1 CORRECT POSITION . & P SUR A4,A3 INVERT LINE NO. . H ( P NGR A4,A4 GET PRINTER REQ. LINE NO. . j * P CF A5,KONVER CONVERT BINARY TO ASCII . ( P ST A4,DWTRLN,A6 SET REQUESTED LINE . $ P LD A4,DWTALN,A6 GET ACT
0x25a274…25a408 Dummy {f00=0x00bf, f01=0x0190, f02=»TRLN REQUESTED LINE NUMBER DISPLACEMENT . & P CF A5,SEND SEND INPUT FRONT FEED / 0 PPOS010 EQU * / Z P CF A5,GTSTAT GET STATUS / n P LDR A2,A1 GET RETURN CODE / ( P ANKL A2,/2000 PAPER DOCUMENT OUT ? / 8 P RB(NZ) POS005 YES WAIT FOR DOCUMENT TO BE I
0x25a408…25a59c Dummy {f00=0x00bf, f01=0x0190, f02=»ISEND / PPOS030 EQU * 0 0 P LDKL A2,CSVPFF VERTICAL POSITION FRONT FEED 0 " 6 P LDK A3,DWTRLN REQUESTED LINE NUMBER DISPLACEMENT 0 V 2 P CF A5,SEND SEND VERTICAL POSITION FRONT FEED 0 P RB POS010 0 P XIF =2 =2 0 PPOSERR EQU * 0 P LDKL A1
0x25a59c…25a730 Dummy {f00=0x00bf, f01=0x0190, f02=»T PARAMETERS 0 x P* 1 P* 1 $ PDOCPAR EQU * DOCUMENT PARAMETERS 1 ( P LDK A1,0 CLEAR A1 1 P P CF A5,RESREC 1 l ( P LD A4,ECBCW,A8 GET NUMBER OF LINES 1 P SRL A4,8 GET LINES 1 $ P RF(Z) DOC010 NO CHANGE OF LINES 1 P CWK A4,/10 INDEX TO B
0x25a730…25a8c4 Dummy {f00=0x00bf, f01=0x0190, f02=»T A4,DWTDL,A6 SET PAGE LENGTH FOR DOCUMENT 1 PDOC010 EQU * 2 2 4 P LD A4,ECBCW,A8 GET NATIONAL CHARACTER VARIATION 2 F P ANK A4,/FF 2 ~ 6 P RF(Z) DOC020 NO CHANGE OF NATIONAL CHARACTER SET 2 P CWK A4,/F INDEX TO BIG 2 P RB(G) POSERR YES 2 " P A
0x25a8c4…25aa58 Dummy {f00=0x00bf, f01=0x0190, f02=»UMENT 2 f PDOC020 EQU * 3 P RB ENDIO END REQUEST 3 " P XIF 3 @ P EJECT 3 L P* 3 Z P* 3 d 6 P* ORDER 24 : SET CONTINUOUS STATIONARY PARAMETERS 3 n P* 3 P* 3 6 PCSTPAR EQU * SET PARAMETERS CONTINUOUS STATIONARY 3 P LDK A1,0 CLEAR A1
0x25aa58…25abec Dummy {f00=0x00bf, f01=0x0190, f02=»INES 3 t P CWK A4,/10 INDEX TO BIG 4 P RB(G) POSERR YES 4 , * P ADR A4,A4 ADJUST INDEX TO LINE TABLE 4 F 2 P LD A4,LINNUM,A4 GET LINES ACCORDING TO INDEX 4 t 2 P ST A4,DWTPL,A6 SET PAGE LENGTH FOR CONT.STAT. 4 ( P LDKL A2,CSSLPL SELECT PAGELENGTH =1 4
0x25abec…25ad80 Dummy {f00=0x00bf, f01=0x0190, f02=»8 GET NATIONAL CHARACTER VARIATION 4 P ANK A4,/FF 5 * . P RF(Z) CST020 NO CHANGE OF NAT. CHAR. SET 5 > P CWK A4,/F INDEX TO BIG 5 p P RB(G) POSERR YES 5 0 P ADR A4,A4 ADJUST INDEX TO NAT. CHAR. TABLE 5 6 P LD A4,NCVTAB,A4 GET NAT. CHAR. SET ACC. T
0x25ad80…25af14 (5, 216) Dummy {f00=0x00bf, f01=0x0190, f02=» 5 P* 6 P EJECT 6 P IFT FFDEV=1 6 P* 6 4 P* 6 > " P* ORDER 38 : RELEASE DOCUMENT 6 H P* 6 n P* 6 x PRELDOC EQU * 6 P CF A5,RESREC 6 2 P LDKL A2,CSEJFF CONTROL SEQ. EJECT FRONT FEED 6 P CF A5,SEND SEND SEQUENCE 6 * P CF
0x25af14…25b0a8 Dummy {f00=0x00bf, f01=0x0190, f02=»Y AGAIN 6 z P ANKL A1,/8000 REQUEST ERROR 7 $ P CM DWTALN,A6 RESET ACTUAL LINE 7 4 & P CM DWTRLN,A6 RESET REQUESTED LINE 7 P ABL ENDIO END REQUEST 7 P XIF 7 P EJECT 7 P* 7 P* 7 P* I H T P 7 P* 7 P* 7 . P* INTERRUPT HAND
0x25b0a8…25b23c Dummy {f00=0x00bf, f01=0x0190, f02=» DISPATCH 7 ~ & P ABL LDREG RETURN TO READ ROUTINE 8 P EJECT 8 < P* 8 J P* 8 T P* R C T P 8 ^ P* 8 p : P* RECOVERY ROUTINE REPEATS RUNNING REQUEST AT POWER ON 8 z P* 8 P* 8 PRCTP EQU * 8 P CF A15,SAVE8 SAVE A1 - A8 8 $ P LC A4,D
0x25b23c…25b3d0 Dummy {f00=0x00bf, f01=0x018e, f02=»INE/FORM FEED DONE 8 x B P SC A4,DWTLFD,A6 * * 9 < P RF RCTP07 * * 9 b & PRCTP05 LDK A4,0 RESET INDICATORS 9 P ST A4,DWTLFD,A6 * 9 * PRCTP07 LDKL A1,/7FFF SET DEVICE
0x25b3d0…25b564 Dummy {f00=0x00bf, f01=0x0190, f02=» 0 P LD A1,DWTSYST,A6 INTERN. SYSTEM START IND. : $ P RF(NZ) RCTP10 NO SYSTEM START : 8 P * : ` . P IM DWTSYST,A6 SET SYSTEM START INDICATOR : n P * : 0 P LDKL A4,STDNCV GET STANDARD NAT. CHAR. SET : * P CF A5,KONVER CONVERT BIANARY TO ASCII
0x25b564…25b6f8 Dummy {f00=0x00bf, f01=0x0190, f02=»LENGTH : r * P CF A5,KONVER CONVERT BINARY TO ASCII ; . P ST A4,DWTPL,A6 SET PAGE LENGTH CONT.STAT. ; < ( P LDKL A2,CSSLPL SELECT PAGELENGTH =1 ; n 0 P LDK A3,DWTPL PRINTER PAPER LENGTH DISPL. =1 ; * P CF A5,SEND SEND SELECT PAGELENGTH =1 ; 6 P LDKL A4,DOC
0x25b6f8…25b88c Dummy {f00=0x00bf, f01=0x0190, f02=» PRCTP10 EQU * < $ P CM DWTALN,A6 RESET ACTUAL LINE < , P LDKL A1,/200 INDICATE POWER OFF OCCURED < @ P ORS A1,DWTST,A6 < p $ P LD A1,DWTECB,A6 RUNNING REQUEST < , P ABL(NZ) ACT005 YES , REPEAT THE REQUEST < P ABL DISEND DISPATCH < P EJECT <
0x25b88c…25ba20 Dummy {f00=0x00bf, f01=0x0190, f02=»* AND ANALYZES THE DEVICE STATUS SENT FROM THE PRINTER < P* = > P* AT EXIT A1 = RETURN CODE = H P* = j P* = t PGTSTAT EQU * = ~ " P CM DWTRC,A6 RESET RETURN CODE = P LDK A2,ESC ESCAPE = P CF A5,OUTPUT SEND ESC = , P LDK A2,CSI CONTROL SE
0x25ba20…25bbb4 (5, 217) Dummy {f00=0x00c0, f01=0x0190, f02=»RT = r P CF A5,OUTPUT SEND DSR > P LDR* A2,A6 > ( P ANK A2,/F * > < P CWK A2,/C PTS 8000 ? > R P RF(L) GTST05 NO > p P SUK A2,/F SALCUZ ? > P RF(Z) GTST05 YES > P LDK A2,ETX END OF TEXT > P CF A5,OUTPUT SEND ETX > ( PGTST05 LDKL
0x25bbb4…25bd48 Dummy {f00=0x00c0, f01=0x0190, f02=»/FF GET CHARACTER > $ P CCK A2,/5C5C STRING TERMINATOR ? P RF(E) GTSEND YES ? B $ P LCR A3,A4 GET MASK RETURN CODE ? P ANR A2,A3 ? * P LDKL A3,/3AC0 SHIFT LEFT CIRCULAR A2 ? P LC A3,1,A4 A3 TIMES ? $ P EXR A3 EXECUT SHIFT INSTRUCTION ? 2 P
0x25bd48…25bedc Dummy {f00=0x00c0, f01=0x0190, f02=»ND EQU * ? $ P LD A1,DWTRC,A6 GET RETURN CODE @ P RTN A5 @ 8 P EJECT @ H P* @ V : P* THIS ROUTINE CONVERTS A BINARY VALUE TO ASCII CODE @ ` P* @ P* REGISTERS : @ P* A1= WORK REGISTER @ P* A4= BINARY INPUT @ P* A2,A4= ASCII
0x25bedc…25c070 Dummy {f00=0x00c0, f01=0x018e, f02=» P RF(L) KONV05 NO A P SUKL A4,100 A & P LDKL A2,/100 LEFT BYTE OF A2=X=1 A 0 * PKONV05 CWK A4,10 ARE THERE ANY TENS ? A Z P RF(L) KONV04 NO A P SUK A4,10 A 2 P ADK A2,/1 NUMBER OF TENS IN RIGHT B. OF A2=Y A P RB KONV05 NEXT A " PKONV04 O
0x25c070…25c204 Dummy {f00=0x00c0, f01=0x0190, f02=» . P ANK A2,/FF KEEP X IN R. BYTE OF A2. ASCII B P ORR A4,A1 YZ IN A1. ASCII B 6 P RTN A5 B X P EJECT B h P* B v P* RESET RECORVERY B P* B PRESREC EQU * B " P LD A4,DWTST,A6 DEVICE STATUS B P ANKL A4,/200 RECOVERY? B P RF(E) RES
0x25c204…25c398 Dummy {f00=0x00c0, f01=0x0190, f02=» B P* C , P* THIS ROUTINE SENDS AN CONTROL SEQUENCE C P* TO THE PRINTER C B P* C Z P* C d P* AT ENTRY : C n " P* A2 = CONTROL SEQUENCE ADRESS C 4 P* A3 = DWT-DISPLACEMENT TO LINE NO,CHAR.SET,ETC C P* C P* C P* AT EXIT : C P
0x25c398…25c52c Dummy {f00=0x00c0, f01=0x0190, f02=»EMENT C n , P ST A2,DWTSTR,A6 CONTROL SEQUENCE ADRESS D PSEND10 EQU * D > 0 P LD A3,DWTSTR,A6 GET CONTROL SEQUENCE ADRESS D R P LCR A2,A3 GET CHARACTER D P ANK A2,/FF MAKE CHARACTER D & P SLL A2,8 END OF CONTROL SEQUENCE D P RF(N) SENDEND YES,RET
0x25c52c…25c6c0 Dummy {f00=0x00c0, f01=0x018e, f02=»T SEND CHARACTER D PSEND20 EQU * E . P IM DWTSTR,A6 INC. CONTROLSEQUENCE ADRESS E , P RB SEND10 GET NEXT E ^ PSEND30 EQU * E z * P LD A3,DWTDISP,A6 GET DWT-DISPLACEMENT E P ADR A3,A6 GET PROPER VALUE E P LCR A2,A3 GET CHARACTER E P CF A5,O
0x25c6c0…25c854 (5, 218) Dummy {f00=0x00c0, f01=0x0190, f02=» E P EJECT F P* F P* F P* BINARY F * P* F : 8 P* THIS ROUTINE CONVERTS ASCII CODE TO A BINARY VALUE F D P* F P* REGISTERS: F P* A1= ASCII INPUT F P* A2= WORK REGISTER F P* A3= BINARY OUTPUT F P* F P* F P* F
0x25c854…25c9e8 Dummy {f00=0x00c0, f01=0x0190, f02=»3,A2 F P SLL A2,3 G P ADR A3,A2 G P ANK A1,/F G 0 P ADR A3,A1 MAX. LINE BINARY G B P RTN A5 G f P EJECT G v " PLINNUM EQU *-2 NUMBER OF LINES G " P DATA /3132,/3135,/3138,/3234 G " P DATA /3235,/3330,/3333,/3335 G " P DATA /3336,/3438,
0x25c9e8…25cb7c Dummy {f00=0x00c0, f01=0x416a, f02=»ATION YABLE G j " P DATA /3031,/3032,/3033,/3034 H " P DATA /3035,/3036,/3037,/3038 H : " P DATA /3039,/3130,/3131,/3131 H ` P DATA /3133,/3134,/3135 H 8 PTAB EQU * MASK TABLE FOR STATUS REPORT FROM PRINTER H P DATA /C0,/C0,/C0,/2CC * H P DAT
0x25cb7c…25cd10 Dummy {f00=0x00c0, f01=0x2008, f02=» I * 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
0x25cd10…25cea4 Dummy {f00=0x00c0, f01=0x0190, f02=»UNTER q t P LD A1,FBAX GET BUFFER INDEX r " P RF(NZ) TRT100 NOT FIRST BLOCK r 2 P LC A2,DW1500+1 GET TCA r X P CF A5,WRITEP SEND TCA r x P LDR* A2,A6 GET STA r P CF A5,WRITEP SEND STA r P IFT IBMCHR=1 r P IFF RCOM=1 r " P LDK A2,/27 SE
0x25cea4…25d038 Dummy {f00=0x00c0, f01=0x0190, f02=»TEP r P XIF s P IFT RCOM=1 s P s , & P LD A1,XRB READ BUFFER COMMAND ??? s 4 P RF(Z) TRT070 NO!! s ^ P s x P ******************** s " P LDK A2,X'2D' AID FOR DISPLAY s PTRT060 CF A5,WRITEP SEND AID s P s $ P LD* A3,DWTCUR,A6 CURS
0x25d038…25d1cc Dummy {f00=0x00c0, f01=0x0190, f02=» P XIF t P t P LDK A3,2 t PTRT100 EQU * t * P LCR A2,A4 GET ONE CHARACTER t > P ADK A4,1 INCREMENT POINTER t b P ANK A2,/7F t P IFT RCOM=1 t & P LD A1,XRB READ BUFFER COMMAND ??? t P RF(Z) TRT105 NO!! t P t @ P**************
0x25d1cc…25d360 Dummy {f00=0x00c0, f01=0x018e, f02=»********************************* t P u * & P CWK A2,X'20' ATTRIBUTE CHARACTER u 2 P RF(L) TRT101 YES!!! u P XIF u x P IFT DMRK=1 u P CWK A2,/7E LINE FEED ? u " P RF(NE) TRT102 NO,GO TO TRT102 u P LDK A2,/0A u PTRT102 EQU * u P C
0x25d360…25d4f4 (5, 219) Opaque[0x194]
0x25d4f4…25d688 # DirEnt {nam=»DRIC01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1810, f03=0x0000}
0x25d4f4…25d688 IdxSect {
0x25d4f4…25d688 f00 = 0x00c0 // 0x25d4f4 @0x0
0x25d4f4…25d688 f01 = 0x000a // 0x25d4f6 @0x2
0x25d4f4…25d688 gno = [ // 0x25d4f8 @0x4
0x25d4f4…25d688 [0x00]: C0x00c0.0x2.0
0x25d4f4…25d688 [0x01]: C0x00c0.0x3.0
0x25d4f4…25d688 [0x02]: C0x00c1.0x0.0
0x25d4f4…25d688 [0x03]: C0x00c1.0x1.0
0x25d4f4…25d688 [0x04]: C0x00c1.0x2.0
0x25d4f4…25d688 ]
0x25d4f4…25d688 }
0x25d688…25d81c Dummy {f00=0x00c0, f01=0x0190, f02=» 2 P IDENT DRIC01 REL 10.0 80-03-14 870105041000 P : P* B P* L 2 P********************************************** V P* $ P* PHILIPS TERMINAL SYSTEM PTS P* 0 P* DRIC01 = INTERTASK COMMUNICATION HANDLER P* P*
0x25d81c…25d9b0 Dummy {f00=0x00c0, f01=0x0190, f02=»THE INTERTASK COMMUNICATION x P* $ P EJECT DRIC01 . P* F P* ORDERS: P P* d P* /02 READ, NOT ADDRESSED n " P* /06 WRITE, NOT ADDRESSED P* /0A READ, ADDRESSED P* /0B WRITE, ADDRESSED P* /39 SET T
0x25d9b0…25db44 Dummy {f00=0x00c0, f01=0x0190, f02=» CODE P* A8 ECB ADDRESS , P* A12 ADDRESS TO DRIVER ADDRESS BLOCK * P* Z P EJECT DRIC01 d P* | P* P*********** P* ENTRIES * P*********** P* P* P ENTRY ITAD ADDRESS BLOCK 0 P ENTRY
0x25db44…25dcd8 Dummy {f00=0x00c0, f01=0x0190, f02=»*********** P* P* P EXTRN TDISP DISPATCHER ( P EXTRN TENDIO ENDIO H P EXTRN DISIOE REQUEST ERROR d & P EXTRN DISEND TENDIO AND DISPATCH P EXTRN DWTST DWT STATUS P EXTRN DWTECB ECB ADDRESS & P EXTRN DWTADR DRIVER
0x25dcd8…25de6c Dummy {f00=0x00c0, f01=0x0190, f02=» FNDTID FIND TTAB ADDRESS FROM TID P EXTRN TTB:ST TASK STATUS * " P EXTRN TTB:TD TERMINAL DEVICES L 4 P EXTRN IHRTN RTN A15 WITHOUT ENABLING INTERRUPTS r $ P EXTRN ECBBA ECB BUFFER ADDRESS & P EXTRN ECBRL ECB REQUESTED LENGTH & P EXTRN ECBEL
0x25de6c…25e000 Dummy {f00=0x00c0, f01=0x0190, f02=»************************* P* " P* CONDITIONAL ASSEMBLY , P* J . P***************************************** T P* . P* A PROGRAM VERSION USING TOSS MMU PAGING * P* IS OBTAINED BY SETTING MMUPAG EQU 1. P* PMMUPAG EQU 0
0x25e000…25e194 (5, 220) Dummy {f00=0x00c0, f01=0x018e, f02=» PCPU852 EQU 1 P* P* MMU BUFFER SIZE & P* @ PX:A EQU 50 J PDVBLEN EQU X:A P* r P* INTERTASK DEVICE INDEX | P* PDEVIND EQU 8 P* P EJECT DRIC01 P* P* P*********************
0x25e194…25e328 Dummy {f00=0x00c0, f01=0x0190, f02=» P* P IFT MMUPAG=0 PSTART EQU DWTDRD $ P XIF < P* H P IFT MMUPAG=1 R PSTART EQU DWTDRD+4 h P XIF P* & PDWTTP EQU START+/00 TIMER POINTER PDWTIME EQU START+/02 TIME 6 PDWTANC EQU START+/04 POINTER TO FIRS
0x25e328…25e4bc Dummy {f00=0x00c0, f01=0x0190, f02=»******* P* ADDRESS BLOCK * P***************** * P* D P* N ( P DATA DVBLEN+DVBLEN MMU BUFFER SIZE X ( P DATA DEVIND INTERTASK DEVICE INDEX & PITAD DATA ICAD ACTIVATION ADDRESS P DATA ITABRT ABORT ADDRESS P* P*
0x25e4bc…25e650 Dummy {f00=0x00c0, f01=0x0190, f02=»* INTERTASK DRIVER BUFFER (MMU) P* ( PIT:BUF EQU * 2 P IFT MMUPAG=1 F P RES DVBLEN+1 MMU BUFFER P XIF ~ P* P EJECT DRIC01 P* P* A C T I V A T I O N P* PICAD EQU * P LDR A1,A7 ORDER CODE TO
0x25e650…25e7e4 Dummy {f00=0x00c0, f01=0x0190, f02=» A1,4 P RF(Z) RD:ADR READ ADDRESSED P SUK A1,1 2 " P RF(Z) WR:ADR WRITE ADDRESSED D P SUK A1,/2E j P RF(NZ) DIS:OE REQUEST ERROR ~ P* P* S E T T I M E O U T P* P LD A2,ECBCW,A8 GET TIME P ST A2,DWTIME,A6
0x25e7e4…25e978 Dummy {f00=0x00c0, f01=0x0190, f02=» E S S E D | P* PRD:ADR EQU * READ, ADDRESSED " PWR:ADR EQU * WRITE, ADDRESSED @ P* f $ P* FIND TTAB OF ADDRESSED TASK p P* P LD A7,ECBCW,A8 TID & P CF A15,FNDTID TTAB ADDRESS TO A2 P ADK A2,0 SET CR P RF(Z) D
0x25e978…25eb0c Dummy {f00=0x00c0, f01=0x0190, f02=»SS BLOCK x 6 P XRK A7,1 IF INPUT, POINT TO OUTPUT BLOCK AND V.V. P* J P EJECT DRIC01 T P* l $ P* FIND DWT OF ADDRESSED TASK v P* 0 PITC:05 ADK A2,4 ADDRESS TO NEXT DWT ADDRESS P SUK A1,4 P RF(N) DIS:OE NOT FOUND
0x25eb0c…25eca0 Dummy {f00=0x00c0, f01=0x0190, f02=» A2,A4 P LD A1,DWTST,A2 ANY REQUEST P RF(N) ITC:40 NO! 2 P* L . P LD A1,DWTQUE,A2 GET QUEUE ANCHOR ADDRESS V " P CWR A1,A6 CHECK QUEUE ANCHOR . P RF(E) ITC:10 REQUEST ISSUED FOR THIS TASK P* P ANK A7,1 P RF(Z) ITC:3
0x25eca0…25ee34 (5, 221) Dummy {f00=0x00c1, f01=0x0190, f02=»BORT TIMER AND REMOVE DWT FROM QUEUE z P ANK A7,1 , P RF(Z) RD:N05 READ > P* X P EJECT DRIC01 b P* z P* MOVE BUFFER P* PITC:15 EQU * P LD A8,DWTECB,A6 SENDING ECB $ P ENB GIVE OTHER TASKS A CHANCE P L
0x25ee34…25efc8 Dummy {f00=0x00c1, f01=0x0190, f02=»,A9 P RF(NG) ITC:20 , P LDK A1,8 RETURN CODE (INCORRECT LENGTH) " P LD A3,ECBRL,A9 R P RF(NP) DIS:OE j P* PITC:20 EQU * P IFT MMUPAG=1 6 P LDKL A4,ITAD GET ADDRESS TO DRIVER ADDRESS BLOCK * P CW A3,BUFLEN,A4 CHECK MMU
0x25efc8…25f15c Dummy {f00=0x00c1, f01=0x0190, f02=»CHER VIA TENDIO t P* PITC:25 EQU * " P XIF 6 P* B P L $ P ST A3,ECBEL,A8 EFFECTIVE LENGTH T $ P ST A3,ECBEL,A9 EFFECTIVE LENGTH | P* P EJECT DRIC01 P* P* P IFT MMUPAG=0 * P LD A4,ECBBA,A8 SENDING
0x25f15c…25f2f0 Dummy {f00=0x00c1, f01=0x0190, f02=» ADK A4,1 P ADK A7,1 P SUK A3,1 $ P RB(P) ITC:30 6 P XIF L P* X P CF A15,TENDIO END WRITE b P LDR A6,A2 P* P IFT MMUPAG=1 . P LD A3,ECBBA,A8 GET SENDING BUFFER ADDRESS P ANK A3,1 & P RF(Z) ITC:30 BU
0x25f2f0…25f484 Dummy {f00=0x00c1, f01=0x0190, f02=» SUK A3,2 A3 := /FFFE 8 P ANS A3,ECBBA,A9 MAKE RECEIVING BUFFER ADDRESS EVEN P XIF Z P* f " PEND:IO CF A15,TENDIO END READ p P* PT:DISP ABL TDISP P* P EJECT DRIC01 P* P* PITC:35 EQU * P CWK A
0x25f484…25f618 Dummy {f00=0x00c1, f01=0x0190, f02=»ED REQUEST p P* PITC:50 EQU * P LD A3,DWTIME,A6 TIME 0 P RF(Z) TWR:30 N P ADK A3,1 d " P RF(Z) ITC:70 NO TIMING WANTED v P SUK A3,1 P RF(N) DIS:OE NEGATIVE TIME 6 P LDR A1,A6 DWTOUT = PARAM. WHEN WRITE, ELSE DWTIN
0x25f618…25f7ac Dummy {f00=0x00c1, f01=0x018e, f02=»SS v PTIME DATA 0 P* P EJECT DRIC01 ( P* @ ( P* INSERT IN QUEUE WITHIN PRIORITY J P* v PITC:70 EQU * . P ST A2,DWTQUE,A6 STORE QUEUE ANCHOR IN DWT " P LD A5,DWTTAB,A6 TTAB ADDRESS P LD A1,TTB:ST+1,A5 LEVEL
0x25f7ac…25f940 Dummy {f00=0x00c1, f01=0x0190, f02=» PITC:80 LDR A4,A2 SAVE P LDR* A2,A2 NEXT IN QUEUE " P RF(Z) ITC:90 END FOUND D " P LD A5,DWTTAB,A2 TTAB ADDRESS d & P CC A1,TTB:ST+1,A5 COMPARE LEVELS P RB(NL) ITC:80 P* $ PITC:90 STR A2,A6 INSERT IN QUEUE P STR A6,A4
0x25f940…25fad4 (5, 222) Dummy {f00=0x00c1, f01=0x0190, f02=»A D D R E S S E D ~ P* $ PRD:NAD EQU * READ, NOT ADDRESSED $ < P LD A2,DWTANC,A6 CHECK QUEUE OF ADDRESSED WRITE REQUESTS L $ P RF(NZ) RD:N10 ANYTHING IN QUEUE : P LD A2,WR:QUE CHECK QUEUE OF NOT ADDRESSED WRITE REQ. P RF(Z) RD:N20 QUEUE EM
0x25fad4…25fc68 Dummy {f00=0x00c1, f01=0x018e, f02=»TIM2 ABORT TIMER IF ANY P* PRD:N05 EQU * * " P XRR A2,A6 EXCHANGE A2 AND A6 > P XRR A6,A2 d P XRR A2,A6 v P RB ITC:15 P* ( PRD:N10 LDR* A3,A2 REMOVE FROM QUEUE ( P ST A3,DWTANC,A6 UPDATE QUEUE ANCHOR P RB RD:N00
0x25fc68…25fdfc Dummy {f00=0x00c1, f01=0x0190, f02=» * P* W R I T E, N O T A D D R E S S E D P* 6 & PWR:NAD EQU * WRITE, NOT ADDRESSED @ < P LD A2,DWTANC,A6 CHECK QUEUE OF ADDRESSED READ REQUESTS j $ P RF(NZ) WR:N10 ANYTHING IN QUEUE 8 P LD A2,RD:QUE CHECK QUEUE OF NOT ADDRESSED READ REQ.
0x25fdfc…25ff90 Dummy {f00=0x00c1, f01=0x0190, f02=»:N05 CF A15,ABTIM2 ABORT TIMER IF ANY P RB ITC:15 . P* @ ( PWR:N10 LDR* A3,A2 REMOVE FROM QUEUE J ( P ST A3,DWTANC,A6 UPDATE QUEUE ANCHOR v P RB WR:N05 P* , PWR:N20 LDKL A2,WR:QUE GET WR:QUE ADDRESS P RB ITC:50 P*
0x25ff90…260124 Dummy {f00=0x00c1, f01=0x0190, f02=» r P LDR A2,A6 $ P CF A15,ITAB10 REMOVE FROM QUEUE P* B PTWR:30 EQU * L P CMR A6 RESET QUEUE LINK ` P LDK A1,/40 RETURN CODE P RB END:IO P* P EJECT DRIC01 P* P* I T A B R T P* . P* THIS SU
0x260124…2602b8 Dummy {f00=0x00c1, f01=0x0190, f02=» t P* " P* OUTPUT: A1-A4 ARE DESTROYED P* 8 PITABRT EQU * B P LDR A2,A6 V P* h PITAB05 EQU * r P CF A15,ABTIM ABORT TIMER P* P* REMOVE DWT FROM QUEUE P* PITAB10 EQU * & P LD A1,DWTQUE,A2 GET QUE
0x2602b8…26044c Dummy {f00=0x00c1, f01=0x018e, f02=»D WRITE REQUEST v : P ADK A1,DWTANC POINT TO ADDRESS OF FIRST DWT IN QUEUE P* V P EJECT DRIC01 ` P* x P* PITAB20 LDR A4,A1 SAVE P LDR* A1,A1 NEXT IN QUEUE P CWR A1,A2 SEARCHED DWT P RB(NE) ITAB20 NO! " P L
0x26044c…2605e0 Dummy {f00=0x00c1, f01=0x0190, f02=» P RF IH:RTN P XIF P* " P IFT CPU852=0 , P RTN A15 B P XIF R P* ^ P EJECT DRIC01 h P* P* A B T I M P* . P* SUBROUTINE FOR ABORTING TIMER (IF ANY). P* P* INPUT: A2 = DWT ADDRESS P
0x2605e0…260774 (5, 223) Dummy {f00=0x00c1, f01=0x415a, f02=»WTTP $ P ADR A1,A2 TIMER POINTER ADDRESS P LDR* A3,A1 4 " P RF(Z) IH:RTN NO TIMER ACTIVE H P CM* 0,A1 n " P CMR A1 INDICATE NO TIMER SET P* P IFT CPU852=1 PIH:RTN ABL IHRTN P XIF P* P IFT CPU852=0
0x260774…260908 Dummy {f00=0x00c1, 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
0x260908…260a9c Dummy {f00=0x00c1, f01=0x0190, f02=» CF A14,CRNGET CURRENCY P LDK A3,0 NEW STATUS P LC A4,CRNSTA,A2 OLD STATUS < P SC A3,CRNSTA,A2 ` ( P ABI TIODMF,A5 BRANCH TO DM FUNCTION x P* " P* A1 = FDB ADDRESS DATA FILE $ P* A2 = CURRENCY BUFFER ADDRESS & P* A4 = OLD
0x260a9c…260c30 Dummy {f00=0x00c1, f01=0x0190, f02=» USER ORDER WORD P* A8 = USER ECB ADDRESS P EJECT : PRDSTAT EQU * READ STATUS H P SC A4,CRNSTA,A2 STATUS CHAR h P ANK A4,/FF " P ST A4,ECBCW,A8 RETURN STATUS P CM ECBCW+2,A8 P LDK A1,0 RET CODE OK P ABL TIODMX
0x260c30…260dc4 Dummy {f00=0x00c1, f01=0x0190, f02=»DKL A3,/700 P TM A3,A7 ( P RB(NZ) TIOD19 NOT OPTION SEQUENTIAL & P SRL A7,10 INDEX * 2 R P ABL(Z) SEQREA SEQ READ n & P ABL IXRDNX INDEXED SEQ READ NEXT PREADDI EQU * DIRECT READ P SRL A7,10 INDEX * 2 & P ABL(Z) RANREA DIREC
0x260dc4…260f58 Dummy {f00=0x00c1, f01=0x0190, f02=»IXINS EQU * P RB TIOD19 P XIF & P EJECT 2 PWRITE EQU * WRITE ORDERS @ P LC A3,FDBDBR,A6 ` P ANK A3,/3 SHARABILITY x & P RB(Z) TIOD19 ONLY INPUT ACCEPTED P LDKL A4,/100 " P LC A3,FDBNIF,A6 NR OF INDEXES P ANK A3,/FF
0x260f58…2610ec Dummy {f00=0x00c1, f01=0x018e, f02=»ITE t P RB TIOD19 ERR PWRITE2 EQU * INDEXED " P TM A4,A7 > " P ABL(NZ) IXINS INDEXED INSERT P P RB TIOD19 NOT ALLOWED v P EJECT PREWRIT EQU * REWRITE ORDERS P* PDELETE EQU * DELETE ORDERS P* P LC A3,FDBDB
0x2610ec…261280 Dummy {f00=0x00c1, f01=0x0190, f02=» P RF(Z) REW010 NO INDEX P LDK A3,2 " P ADS A3,DWTOR,A6 ORDER INDEX 4 PREW010 EQU * X P LDKL A4,/400 l P TM A4,A7 P RF(NZ) REW020 CURRENT P SRL A7,8 P SUK A7,1 P RB(NZ) TIOD19 ERROR P ABL TIODMB DIRECT
0x261280…261414 (5, 224) Opaque[0x194]
0x261414…2615a8 # DirEnt {nam=»DRKB01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1838, f03=0x0000}
0x261414…2615a8 IdxSect {
0x261414…2615a8 f00 = 0x00c1 // 0x261414 @0x0
0x261414…2615a8 f01 = 0x0012 // 0x261416 @0x2
0x261414…2615a8 gno = [ // 0x261418 @0x4
0x261414…2615a8 [0x00]: C0x00c1.0x3.0
0x261414…2615a8 [0x01]: C0x00c2.0x0.0
0x261414…2615a8 [0x02]: C0x00c2.0x1.0
0x261414…2615a8 [0x03]: C0x00c2.0x2.0
0x261414…2615a8 [0x04]: C0x00c2.0x3.0
0x261414…2615a8 [0x05]: C0x00c3.0x0.0
0x261414…2615a8 [0x06]: C0x00c3.0x1.0
0x261414…2615a8 [0x07]: C0x00c3.0x2.0
0x261414…2615a8 [0x08]: C0x00c3.0x3.0
0x261414…2615a8 ]
0x261414…2615a8 }
0x2615a8…26173c Dummy {f00=0x00c1, f01=0x0190, f02=» 2 P IDENT DRKB01 REL 10.0 80-03-14 870105041000 P : P* B P* L 0 P******************************************* V P* $ P* PHILIPS TERMINAL SYSTEM PTS P* P* DRKB01 = DRIVER KEYBOARD P* P* P* P
0x26173c…2618d0 Dummy {f00=0x00c1, f01=0x018e, f02=»M NUMERIC n . P* AND ALPHANUMERIC KEYBOARDS PTS 6231, ( P* 6232, 6233, 6234, 6331,AND 6342 D , P* CONNECTED TO CPU VIA CHLT OR CHRT. p P* , P* ONLY INPUT DATA FROM DEPRESSED KEYS $ P* ARE HANDLED BY THE DRIVER. P*
0x2618d0…261a64 Dummy {f00=0x00c1, f01=0x0190, f02=» 0 P* THE DRIVER CONSISTS OF FOLLOWING PARTS: P* 8 " P* A C K B : ACTIVATION PART B P* h $ P* I H K B : INTERRUPT HANDLER r P* P* E C H O : ECHO HANDLER P* $ P* R C K B : RECOVERY ROUTINE P* P EJE
0x261a64…261bf8 Dummy {f00=0x00c1, f01=0x018e, f02=» STANDARD READ P* ORDER 03: NUMERIC READ & P* ORDER 04: RESET INPUT BUFFER : P* d P* n P* NORMAL REGISTER USAGE : x P* " P* REGISTER A1 : RETURN CODE & P* A2 : INPUT CHARACTER $ P* A3 :
0x261bf8…261d8c Dummy {f00=0x00c1, f01=0x0190, f02=» P* A7 : ORDER " P* A8 : ECB-ADDRESS $ P* J P EJECT T P* b P* l P* SYSTEM ADAPTATION v P* 4 P* KEYBOARD TYPE MUST BE DEFINED IN FIRST WORD : P* IN DWT. BIT 10 IS RELEVANT FOR ALPHANUMERIC R
0x261d8c…261f20 Dummy {f00=0x00c1, f01=0x0190, f02=»6232, 6331 AND 6342 x < P* BIT 11 = 0 FOR ALL KEYBOARDS BUT PTS 6342 AND 6234 & P* BIT 11 = 1 FOR PTS 6234,6342 P* 8 P* CODES FOR SPECIAL CHARACTERS CLEAR, BACKSPACE, 8 P* MULTIPLE ZERO AND STANDARD EOR MUST BE DEFINED P
0x261f20…2620b4 (5, 225) Dummy {f00=0x00c2, f01=0x0190, f02=» IS WANTED, TIMER POINTER , P* IN DWT MUST BE SET UNEQUAL TO ZERO. " 2 P* STANDARD VALUE FOR TIME-OUT IS 30 SECONDS R 4 P* SINCE LAST DEPRESSED KEY. IF ANOTHER VALUE * P* IS WANTED FOR A SYSTEM, INDICATOR $ P* IN DRIVER MUST BE CHA
0x2620b4…262248 Dummy {f00=0x00c2, f01=0x0190, f02=» 8 P* NOTE !!! THAT LENGTH MUST BE THE SAME FOR ALL P* DWT:S IN SYSTEM @ P EJECT P* j 8 P* BY MEANS OF CONDITIONAL ASSEMBLY IT IS POSSIBLE t 8 P* TO EXCLUDE FROM THE DRIVER FOLLOWING FUNCTIONS: P* P* -----ECHO-FUN
0x262248…2623dc Dummy {f00=0x00c2, f01=0x0190, f02=»* AND CONVERSION TABLES 4 P* BY MEANS OF CONDITIONAL ASSEMBLY IT IS ALSO ( 4 P* POSSIBLE TO GIVE A KEY THE MEANING OF TWO, ` P* THREE OR MORE ZEROES. P* 6 P* THE DRIVER IS PREPARED TO HANDLE THE SPECIAL 0 P* NORWA
0x2623dc…262570 Dummy {f00=0x00c2, f01=0x0190, f02=»MBLING THE DRIVER CONDITIONALLY THIS P* FUNCTION IS INCLUDED. , P EJECT N P* P* f P************** p P* ENTRIES * P************** P* P ENTRY KBAD ADDRESS-BLOCK ( P ENTRY EOQUEU QUEUE POINTER ROUTINE (
0x262570…262704 Dummy {f00=0x00c2, f01=0x0190, f02=»XTERNAL TOSS MODULE ENTRIES * 2 P********************************************** 0 P* f $ P EXTRN DISIOE I/0 REQUEST ERROR p . P EXTRN DISEND END I/O AND GO TO DISPATCHER P EXTRN TENDIO END I/O " P EXTRN TDISP DISPATCHER ENTRY
0x262704…262898 Dummy {f00=0x00c2, f01=0x0190, f02=»EGE RETURN FROM ECHO HANDLING P EXTRN LDREGF & P EXTRN SETIME SET TIME < P EXTRN SETIMP SET TIME Z " P EXTRN SAVE8 SAVE 8 REGISTERS x " P EXTRN ECHRTN RETURN FROM ECHO P EXTRN ECHO ECHO ROUTINE P EXTRN ECHEND END OF ECHO P*
0x262898…262a2c Dummy {f00=0x00c2, f01=0x0190, f02=» P EXTRN DWTST STATUS EXTRN DWTBC BYTE COUNTER $ & " EXTRN DWTADR DRIVER ADDRESS BLOCK F P EXTRN DWTA3 SAVE AREA A3 p EXTRN DWTA4 SAVE AREA A4 EXTRN DWTA5 SAVE AREA A5 & ! EXTRN DWTSB2 STACK BASE 2 IN DWT P EXTRN D
0x262a2c…262bc0 Dummy {f00=0x00c2, f01=0x0190, f02=» P* * POVMASK EQU /2 OVERFLOW IN INPUT BUFFER P* @ . PX:F EQU 8 LENGTH OF CIRCULAR INPUT BUFFER J 2 PDWTLNG EQU X:F NUMBER OF BYTES IN DECIMAL FORM | P* P* TIME BEFORE TIME-OUT P* " PTIME EQU 300 TIME OUT CONSTANT
0x262bc0…262d54 (5, 226) Dummy {f00=0x00c2, f01=0x0190, f02=» * j , P**************************************** P* : . P* TIME OUT FUNCTION MAY BE EXCLUDED BY D P* SETTING X:A = 0. v P* PX:A EQU 0 PCTIMUT EQU X:A P* * P* ECHO FUNCTION MAY BE EXCLUDED BY P* SETTI
0x262d54…262ee8 Dummy {f00=0x00c2, f01=0x0190, f02=»NG X:C = 0. P* PX:C EQU 1 PCSTAND EQU X:C 0 P* F . P* DOUBLE ZERO MAY BE INCLUDED IN SYSTEM P ( P* BY SETTING X:D = 2. SETTING X:D , P* = 3 GIVES A THREE ZERO FUNCTION AND 4 P* X:D = 4 GIVES FOUR-ZERO FUNCTION AND
0x262ee8…26307c Dummy {f00=0x00c2, f01=0x0190, f02=» P* 8 P* BY SETTING X:E = 1 FOLLOWING POWER OFF FUNCTION ( P* CAN BE INCLUDED IN THE DRIVER. N > P* IF THERE IS A READ REQUEST, THIS IS COMPLETED WITH -2 z @ P* SET IN THE CONTROL WORD OF ECB. IF NOT A POWER OFF FLAG B P* IS
0x26307c…263210 Dummy {f00=0x00c2, f01=0x0190, f02=» PPOWOFF EQU X:E P** P** ( 4 P* BY SETTING X:G TO 1 THE CODE CONVERSION VIA 2 2 P* "8-BIT" SETTING AND CONVERSION TABLES IS j P* INCLUDED IN THE DRIVER. P** PX:G EQU 0 PCONVER EQU X:G P P* P
0x263210…2633a4 Dummy {f00=0x00c2, f01=0x0190, f02=»Y ORDER /31 p < P* BY SETTING CREDIT=1 THIS DRIVER INDEX THE EOR-KEYS B P* IN THE FOLOWING WAY: THE FIRST KEY IN THE EOR-KEY-TABLE T @ P* IS GIVEN INDEX =1, THE SECOND EOR-KEY IS GIVEN INDEX=1 , P* AND SO ON. (INDEX= 1,2,3,4,... )
0x2633a4…263538 Dummy {f00=0x00c2, f01=0x0190, f02=»ING NOLJE=1 THIS DRIVER IS PREPARED 0 P* TO HANDLE THE NORWAY-CASE WITH BETWEEN , . P* THEMSELVES DEPENDENT KEYBOARDS ON THE ` P* SAME SELECTOR UNIT. P* PNOLJE EQU 0 P* . P* A PROGRAM VERSION USING TOSS MMU PAGING
0x263538…2636cc Dummy {f00=0x00c2, f01=0x0190, f02=»ED INSTRUCTION l . P* SET IS OBTAINED BY SETTING CPU852 EQU 0. P* H PCPU852 EQU 1 R P* f P* p P* MMU BUFFER SIZE z P* P* PX:J EQU 10 PDVBLEN EQU X:J P* P* P* MMU KEY TABLE SIZE P*
0x2636cc…263860 Dummy {f00=0x00c2, f01=0x0190, f02=»* DWT-DISPLACEMENT * P*************************** $ P* H P* R 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+4
0x263860…2639f4 (5, 227) Dummy {f00=0x00c2, f01=0x018e, f02=»TUTQ EQU START+/1A POINTER TO LAST PLACE IN QUEUE & PDWTSQ EQU START+/1C START OF QUEUE : ( PDWTEQ EQU DWTSQ+DWTLNG END OF QUEUE d P* . P***************************************** . P* SPECIAL KEYS DEFINED IN DWT * . P**********
0x2639f4…263b88 Dummy {f00=0x00c2, f01=0x0190, f02=» j & PKBEOF EQU START+/16 EOR-CHARACTER , PKBMZ EQU START+/17 DOUBLE ZERO CHARACTER 2 P* b P EJECT l P* z P* P************** P* TABLES * P************** P* P DATA DVBKTB KEY TABLE SIZE P DATA DVBL
0x263b88…263d1c Dummy {f00=0x00c2, f01=0x0190, f02=»S t P DATA IHKB INTERRUPT HANDLER P* . P IFF POWOFF=1 8 P* N P DATA 0 NO RECOVERY X P* t P XIF ~ P* P* P IFT POWOFF=1 P* P DATA RCKB RECOVERY ROUTINE P EJECT P* P* P*
0x263d1c…263eb0 Dummy {f00=0x00c2, f01=0x0190, f02=» EQU * P IFT CPU852=1 & P CF A15,SAVE8 SAVE A1-A8 ON STACK $ P XIF N P* Z P IFT POWOFF=1 d P IFT CPU852=0 z " P MSR 8,A15 SAVE A1-A8 ON STACK P XIF P* P IFT POWOFF=1 P LD A3,DWTST,A6 BUSY ? P RF(NN)
0x263eb0…264044 Dummy {f00=0x00c2, f01=0x0190, f02=»TERS r P RF AKB202 P* P XIF ( P* 4 P EJECT > P* L P* V P* A C K B ` P* t P* ACTIVATION PART: ~ P* 0 P* CHECKS VALIDITY OF ORDERS AND EXAMINES , P* INPUT BUFFER TO SEE IF SOME QUEUED
0x264044…2641d8 Dummy {f00=0x00c2, f01=0x0190, f02=» P LDK A1,0 P LDK A3,0 START BUFFER INDEX P LDR A4,A7 : " P RF(NG) AKB100 ILLEGEAL ORDER L P IFT NOLJE=1 r P CWK A7,/37 SELECT KEYBOARD P RF(E) AKBSEL P XIF P IFT CSTAND=0 P SUK A4,2 , P RF(Z) AKB100 STANDA
0x2641d8…26436c Dummy {f00=0x00c2, f01=0x0190, f02=»F(Z) CRE:10 SKIP INPUT BUFFER P ADK A4,/2D & PCRE:10 EQU * : P XIF N P RF(Z) AKB110 ORDER 4 Z P RF(N) AKB200 ORDER 1,2 OR 3 x * PAKB100 ORKL A1,/8000 I/O REQUEST ERROR P ABL ENDI10 P EJECT P* P* $ P* ORD
0x26436c…264500 Dummy {f00=0x00c2, f01=0x0190, f02=»Q,A6 RESET OUTPUT QUEUE P ABL ENDI05 END I/O P IFT NOLJE=1 < P* P P* Z " P* ORDER 37 SELECT KEYBOARD d P* PAKBSEL LDKL A2,/FF7F * P ANRS A2,A6 RESET ALLOW BITS IN DWTCHP P ABL ENDI10 P XIF P EJECT
0x264500…264694 (5, 228) Dummy {f00=0x00c2, f01=0x0190, f02=»D A2,DWTST,A6 P ANKL A2,/200 POWER OFF ? P RF(E) AKB205 8 P XRS A2,DWTST,A6 RESET BIT N P XIF p PAKB202 EQU * | P IFT CREDIT-POWOFF=-1 " P LDKL A1,-2 INDICATE POWER ON P ST A1,10,A8 P XIF P IFT CREDIT+POWOFF=2
0x264694…264828 Dummy {f00=0x00c2, f01=0x018e, f02=» EQU * P* P IFT CTIMUT=1 P* . P LDR* A1,A6 8 P ANK A1,/40 TIMING ? L , P RF(E) AKB210 NO TIMING FOR THIS DEVICE h P LD A4,DWTTP,A6 P RF(E) AKBTIM P LDKL A4,-TIME P ST* A4,DWTTP,A6 P RF AKB210 PAK
0x264828…2649bc Dummy {f00=0x00c2, f01=0x0190, f02=» 0 P DATA AKBTUT,TIME TIME OUT ROUTINE AND TIME . P ST A4,DWTTP,A6 STORE TIMER ADDRESS IN DWT 8 P* j P XIF t P* & PAKB210 LD A2,4,A8 REQUESTED LENGTH , PAKB220 RF(E) AKB380 RESET A1 AND END I/O P LDR A3,A3 FIRST TIME ? P RF(
0x2649bc…264b50 Dummy {f00=0x00c2, f01=0x0190, f02=»RACTER v " P SUK A1,1 NEXT CHAR. POSITION ! P SUK A2,1 LAST ? ! 4 P RB(NE) AKB230 NO ! L P EJECT ! f P* ! t , P* READ CHARACTER FROM INPUT BUFFER OR ! ~ & P* WAIT FOR KEY-BOARD INTERRUPT ! P* ! PAKB240 EQU * ! P LD A1,DWTUTQ,A6 !
0x264b50…264ce4 Dummy {f00=0x00c2, f01=0x0190, f02=» ! r P LDK A1,OVMASK OVERFLOW SET " P RF ENDIO " , . PAKB250 CW A1,DWTINQ,A6 SOMETHING IN QUEUE? " > P RF(NE) AKB260 " p " P CF A5,STREG NOTHING IN QUEUE " P IFT CTIMUT=1 " * P LDR A1,A1 CHECK TIME OUT RETURN CODE " P RF(Z) AKB270 NO TIME-OU
0x264ce4…264e78 Dummy {f00=0x00c2, f01=0x0190, f02=»T OUT QUEUE POINTER " x & P ST A1,DWTUTQ,A6 STORE NEW POINTER # PAKB270 LDR A4,A7 # F P SUK A4,2 # ^ P RF(NN) AKB310 ORDER 2 OR 3 # p P EJECT # P* # P* # P* ORDER 1 BASIC READ # P* # 0 P CF A15,STORE STORE CHARACTER IN ECB-BUF
0x264e78…26500c Dummy {f00=0x00c2, f01=0x0190, f02=» P RB AKB220 $ P EJECT $ P* $ $ P* $ . 2 P* ORDER 2 OR 3 STANDARD AND NUMERIC READ $ 8 P* $ n 6 P* CHECK IF READ CHARACTER IS FOUND IN KEY-TABLE $ x P* $ P* $ ( PAKB310 LD A1,10,A8 KEY-TABLE ADDRESS $ P RF(Z) AKB359 NO KEYTA
0x26500c…2651a0 Dummy {f00=0x00c2, f01=0x0190, f02=» SUK A4,1 $ , P RF(N) AKB360 KEY NOT FOUND IN KEY-TABLE % P SUK A1,1 NEXT KEY % B P CCR A2,A1 EOR-CHARACTER? % P RB(NE) AKB355 NO % ~ P IFT CREDIT=0 % P ADR A4,A4 YES DOUBLE INDEX % P XIF % P IFT CREDIT=1 % ( P ADK A4,1 INDEX STAR
0x2651a0…265334 (5, 229) Dummy {f00=0x00c3, f01=0x0190, f02=»70 % P* & P* & 4 PAKB359 CC A2,KBEOF,A6 STANDARD END OF RECORD KEY & P RB(E) AKB358 YES & V P EJECT & p P* & ~ * P* CHARACTER NOT FOUND IN KEY-TABLE. & P* CHECK CHARACTER CODE. & P* & PAKB360 EQU * & P CF A5,CHEK CHECK
0x265334…2654c8 Dummy {f00=0x00c3, f01=0x0190, f02=»CTER & P RF AKB363 ' PAKB361 EQU * ' P LDR* A4,A6 ' 2 P ANK A4,/10 PTS 6234 ? ' F P RF(E) AKB362 ' d P LDR A4,A2 ' z P ANK A4,/80 ' P RF(NE) AKB362 ' P LDR A4,A2 ' P RF AKB363 ' PAKB362 EQU * ' P LDR A4,A2 CHARACTER '
0x2654c8…26565c Dummy {f00=0x00c3, f01=0x0190, f02=» P XIF ( P CC A4,KBCLR,A6 CLEAR? ( P RF(E) KBCL10 ( . P CC A4,KBBSP,A6 BACKSPACE? ( D P RF(E) KBSP10 ( f P LDR A1,A1 RETURN CODE? ( | ( P RF(NE) AKB369 YES,STORE AND END I/O ( P CF A15,STORE ( PAKB365 EQU * ( P IFT CECHO=1 ( P C
0x26565c…2657f0 Dummy {f00=0x00c3, f01=0x0190, f02=» ( p P RF ENDIO AND END I/O ) 6 PAKB369 CF A15,STORE STORE CHARACTER IN ECB BUFFER ) & P RF ENDIO END I/O REQUEST ) ` P EJECT ) P* ) P* ) ( P* CHECK CODE OF END OF RECORD KEY ) P* ) P* ) PAKB370 EQU * ) P IFT CECHO=1 )
0x2657f0…265984 Dummy {f00=0x00c3, f01=0x0190, f02=» CF A5,ECHO ECHO CHARACTER ) P* * " P XIF * , P* * 8 PAKB380 LDK A1,0 RETURN CODE * B P EJECT * f P* * t P* * ~ , P* THIS IS A COMMON END OF THE DRIVER * P* * 2 P* SET EFFECTIVE LENGTH AND PERFORM END I/O * $ P* ON KEYBOARD
0x265984…265b18 Dummy {f00=0x00c3, f01=0x0190, f02=»E) ENDI05 NO TIMING ON THIS DEVICE * P CM* DWTTP,A6 RESET TIMER + * P CM DWTTP,A6 + L P XIF + ` P* + l , PENDI05 ST A3,6,A8 STORE EFFECTIVE LENGTH + v PENDI10 EQU * + P* + P IFT CECHO=1 + P LDR A4,A1 SAVE A1 + ( P CF A5,ECHEND END I/O
0x265b18…265cac Dummy {f00=0x00c3, f01=0x018e, f02=» P* , P* MULTIPLE ZERO , P* , ( P IFF CMULTZ=0 , 2 PKBMZ10 EQU * , H ( P LDK A4,CMULTZ LOAD NUMBER OF ZEROES , , PKBMZ20 LDK A2,/30 ZERO TO STORE AND ECHO , P SUK A4,1 , P RB(L) AKB240 ALL DONE , P LDR A1,A4 SAVE A4 , , P CF A1
0x265cac…265e40 Dummy {f00=0x00c3, f01=0x0190, f02=» , x P XIF - P* - P* - P IFF CMULTZ=0 - ( P* - > " P CW A3,4,A8 LENGTH OVERFLOW ? - H P RB(L) KBMZ20 NO - n . PKBMZ25 SUK A4,1 ANY MORE ZEROES TO STORE ? - P RB(L) AKB368 NO - P INH - * P LD A1,DWTUTQ,A6 GET OUTQUEUE POINTER -
0x265e40…265fd4 (5, 230) Dummy {f00=0x00c3, f01=0x0190, f02=» A1,A6 - P SUK A1,1 . P RF KBMZ40 . 2 PKBMZ30 ADR A1,A6 GET PREIOUS POINTER POSITION . 2 P SUK A1,1 . h , PKBMZ40 CW A1,DWTINQ,A6 ANY SPACE LEFT ? . z P RF(E) KBMZ90 NO NOT REALY. . 0 P ST A1,DWTUTQ,A6 STORE NEW OUTQUEUE POINTER . & P LDK A
0x265fd4…266168 Dummy {f00=0x00c3, f01=0x0190, f02=»INDICATE BUFFER OWERFLOW . P SCR A4,A1 / $ P ST A1,DWTUTQ,A6 UPPDATE POINTER / 2 ( P LDK A1,/A SET RETURN CODE FOR BOTH / Z * P RB ENDIO LENGTH AND THRUGHPUT ERRORS / P XIF / P* / P* CLEAR / P* / & PKBCL10 LDK A3,0 RESET BUFFER INDEX
0x266168…2662fc Dummy {f00=0x00c3, f01=0x0190, f02=»RACTER? / v P RF(Z) KBSP15 0 $ P SUK A3,1 DECREMENT BUFFER INDEX 0 & P LDK A2,/00 CLEAR ECB-BUFFER 0 N P CF A15,STORE 0 r P SUK A3,1 DECREMENT INDEX 0 * PKBSP15 LDK A2,/8 CHANGE CHARACTER-CODE 0 P RB AKB365 0 P EJECT 0 P* 0 P* C
0x2662fc…266490 Dummy {f00=0x00c3, f01=0x0190, f02=»ARACTER 0 P* A3 = BUFFER INDEX 1 P* A6 = DWT-ADDRESS 1 . P* A7 = ORDER 1 L P* 1 d P* 1 n P* ON EXIT: 1 x P* 1 P* A1 = RETURN CODE 1 P* 1 PCHEK EQU * 1 P STR A2,A15 SAVE A2 ON STACK 1 P ANK A2,/FF 1 "
0x266490…266624 Dummy {f00=0x00c3, f01=0x0190, f02=»NK A1,/20 1 ( P ORK A1,/5F 5F OR 7F AS UPPER LIMIT 2 P LDK A4,/20 LOWER LIMIT 2 > P RF CHEK08 2 ^ P* 2 p P XIF 2 z P* 2 PCHEK05 ANK A1,/10 2 P RF(NE) CHEK06 2 P ANK A2,/3F RESET BIT 9 2 " PCHEK06 LDK A1,/39 UPPER LIMIT 2 P L
0x266624…2667b8 Dummy {f00=0x00c3, f01=0x018e, f02=»RROR 2 v P LDR* A1,A15 3 PCHEK10 LDK A1,0 RETURN CODE 3 PCHEK20 RTN A5 3 D P* 3 Z P* 3 d P* CODE CHECK ERROR 3 n P* 3 . PCHERRO LDK A1,4 SET RETURN CODE AND RETURN 3 " P LDR* A2,A15 RELOAD CHARACTER 3 P RB CHEK20 3 P EJECT 3
0x2667b8…26694c Dummy {f00=0x00c3, f01=0x0190, f02=» P* 4 PIHKB EQU * 4 P IFT NOLJE=1 4 P LDR* A3,A6 GET ALLOW BITS 4 4 P ANK A3,/C0 4 V 4 P RF(E) IHNOL3 INPUT ALLOWED FROM BOTH KEYBOARDS 4 j P LDK A4,1 4 P ANK A3,/80 4 P RF(E) IHNOL1 4 P LDK A4,5 4 PIHNOL1 LDR A3,A2 4 P
0x26694c…266ae0 Dummy {f00=0x00c3, f01=0x0190, f02=»4,A2 INPUT WORD 4 " P SRL A4,11 DEVICE ADDRESS * 2 5 P ANK A4,/E 5 > $ P CC A4,DWTBC,A6 8-BIT SETTING ? 5 P P RF(NE) IHKB03 5 x P LDR A3,A2 5 P ANK A3,/3F 5 P SUK A3,/30 5 P RF(N) IHKB01 5 P SUK A3,/A 5 P RF(N) IHKB02 5 PIH
0x266ae0…266c74 (5, 231) Dummy {f00=0x00c3, f01=0x018e, f02=» 5 ` P RF(E) IHKB04 6 P LDR A4,A2 6 P ANK A4,/FF 6 0 P SRL A4,3 LINE INDEX 6 D P ADR A3,A4 6 ` $ P LDR* A3,A3 COLUMN TABLE ADDRESS 6 r P RF(E) IHKB04 6 P LDR A4,A2 6 P ANK A4,/F 6 P ADR A3,A4 ADD ROW INDEX 6 P LCR A2,A3 GET CHARA
0x266c74…266e08 Dummy {f00=0x00c3, f01=0x018e, f02=» 6 P SUK A3,/22 7 P RF(Z) IHNOL6 7 P SUK A3,1 7 2 P RF(NZ) IHNOL8 7 D P RF IHNOL7 7 Z PIHNOL6 ADK A2,7 7 l PIHNOL7 ANKL A2,/FF3F 7 PIHNOL8 EQU * 7 P* 7 P XIF 7 P* 7 P LD A3,DWTST,A6 I/O REQUEST? 7 P RF(N) IHKB10 7
0x266e08…266f9c Dummy {f00=0x00c3, f01=0x0190, f02=» 7 P LD A3,DWTTP,A6 8 * P RF(E) IHKB05 NO TIMING ON THIS DEVICE 8 P LDKL A3,-TIME RESTART TIME 8 N P ST* A3,DWTTP,A6 8 r P* 8 P XIF 8 P* 8 , PIHKB05 ABL LDREG RETURN TO READ ROUTINE 8 PIHKB10 LD A1,DWTINQ,A6 8 P LCR A4,A1 8 "
0x266f9c…267130 Dummy {f00=0x00c3, f01=0x018e, f02=» CW A1,DWTUTQ,A6 OVERFLOW? 8 P RF(NE) IHKB20 NO! 9 " 0 P ORK A2,/FF SET OVERFLOW BIT IN INPUT BUFFER 9 < P RF IHKB30 9 p 0 PIHKB20 ST A1,DWTINQ,A6 STORE INQUEUE POINTER 9 4 PIHKB30 SCR A2,A3 STORE CHARACTER IN INPUT BUFFER 9 PEXIT ABL TDISP 9 P IFT
0x267130…2672c4 Dummy {f00=0x00c3, f01=0x0190, f02=» P SUK A3,4 : P RB(NE) IHNOL2 : $ PIHNOL4 ORRS A4,A6 SET ALLOW BIT : , P RB IHNOL2 : T P XIF : f P EJECT : r P* : P* : P* A K B T U T : P* : & P* THIS IS THE TIME-OUT ROUTINE : P* : P* : P IFT CTIMUT=1 :
0x2672c4…267458 Dummy {f00=0x00c3, f01=0x0190, f02=»1,/40 SET RETURN CODE : , P RB IHKB05 RESTORE REGISTERS AND END I/O ; P* ; N P XIF ; X P EJECT ; d P* ; r 4 P* STORE = SUBROUTINE TO STORE A CHARACTER IN ; | 6 P* ECB-BUFFER AND INCREMENT BUFFER INDEX ; P* ; P* ON ENTRY: ;
0x267458…2675ec Dummy {f00=0x00c3, f01=0x0190, f02=»FFER ADDRESS ; P ADR A4,A3 ADD BUFFER INDEX < ( P SCR A2,A4 STORE CHARACTER IN BUFFER < 8 $ P ADK A3,1 INCREMENT BUFFER INDEX < d P ANK A2,/7F < P RF EOQU20 RTN A15 AND ENB < P EJECT < P* < P* < 6 P* EOQUEU = SUBROUTINE TO GET NEXT
0x2675ec…267780 Dummy {f00=0x00c3, f01=0x416e, f02=»* ON EXIT: < P* = P* A1 = NEW QUEUE POINTER = PEOQUEU EQU * = D P INH = X P ADK A1,1 = d P SUR A1,A6 = v P CWK A1,DWTEQ END OF QUEUE? = P RF(NE) EOQU10 = * P LDK A1,DWTSQ SET QUEUE START ADDRESS = PEOQU10 ADR A1,A6 = ( P
0x267780…267914 (5, 232) Dummy {f00=0x00c3, f01=0x2008, f02=» > O 0 ( P CF A15,TENDIO END I/O OUTPUT DEVICE 1 > PERETUR LD A6,DWTWAT,A6 RELOAD DWT-ADDRESS OF INPUT DEVICE 1 > 4 PRETUR ABL LDREGE RELOAD A3-A5 AND RETURN VIA A5 1 P* 1 P XIF 1 P* 1 P END 1 @ 1 RESS TO ADDRESS-BLOCK 0 2 P A
0x267914…267aa8 Dummy {f00=0x00c3, f01=0x0190, f02=»D A2,ECBRL,A8 REQUESTED LENGTH & " P CWK A2,BUFLEN INVALID LENGTH? ' & " P ABL(G) RXINCL ILLEGAL LENGTH ' L & P LD A1,DWTTIM,A6 GET CONTROL WORD ' r P XIF ' P LD A1,DWTTIM,A6 ' ( P RF(Z) RD420 NO TIME OUT SUPERVISION ' P ST A1,RD410 ' P LDR A1,
0x267aa8…267c3c Dummy {f00=0x00c3, f01=0x0190, f02=»T A4,DWTRTI,A6 STORE TIMER POINTER ' PRD420 EQU * ( * IFT IDLELN=1 ( > 2 P CF A15,CLIDLE CLEAR IDLE LINE ACTIVITY TIMER ( T XIF ( ( P LD A1,DWTXST,A6 GET PROCEDURE STATE ( 0 P ABL(Z) BMM IN CONTROL STATE: START RECEIVER ( P SUK A1,1 . ( :
0x267c3c…267dd0 Dummy {f00=0x00c3, f01=0x0190, f02=»K DELAY - WAIT FOR ENQ OR EOT ( z ( P CF A15,CLPTIM STOP PROCEDURE TIMER ) & , P CM DWTACK,A6 RESET WACK DELAY INDICATOR ) R P CF A5,TRACK SEND ACK 0/1 ) P ABL BMM CONTINUE RECEPTION ) P EJECT ) P* ) P* ) P* READ REQUEST TIME OUT )
0x267dd0…267f64 Dummy {f00=0x00c3, f01=0x0190, f02=» CLEAR PROC TIMER ) $ P CF A15,CLMTIM CLEAR MODEM TIMER * P CF A5,CHALTI HALT INPUT & * B P CF A5,CHALTO OUTPUT * f ( P CM DWTSAV+4,A6 CLEAR STACK POINTER * IFT IDLELN=1 * 2 - CF A15,STIDLE START IDLE LINE ACTIVITY TIMER * XIF * P
0x267f64…2680f8 Dummy {f00=0x00c3, f01=0x0190, f02=», TEXT IS ENDED BY ETB * p : P* IF CONTROL CHARACTER = 0 , TEXT IS ENDED BY ETX + P* + PWR EQU * + f P ANK A1,1 CHECK STATUS + v , P ABL(Z) RXMNOP MODEM NOT OPERABLE - EXIT + P IFT MMUPAG=1 + $ P LD A1,ECBRL,A8 REQUESTED LENGTH + " P CWK A
0x2680f8…26828c Dummy {f00=0x00c3, f01=0x0190, f02=» CONTROL STATE: BID + P SUK A1,1 , P RF(Z) WR100 TRANSMIT MODE , . @ P ABL RXISEQ ILLEGAL SEQUENCE; TRYING TO WRITE WHEN RECEIVING , P P* , P* , P* SEND BID SEQUENCE , P* , P* , PBID LDK A1,1 , , P ST A1,DWTXST,A6 INDICATE TR
0x26828c…268420 Dummy {f00=0x00c3, f01=0x0190, f02=» , P ST A1,DWTRSN,A6 INDICATE ACK 0 EXPECTED - IFT IDLELN=1 - 4 2 P CF A15,CLIDLE CLEAR IDLE LINE ACTIVITY TIMER - J XIF - P ABL TRENQB SEND ENQ TO BID - P EJECT - P* - P* - P* START WRITE IF POSSIBLE - P* - P* - , P
0x268420…2685b4 (5, 233) Opaque[0x194]
0x2685b4…268748 # DirEnt {nam=»DRKB03«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1880, f03=0x0000}
0x2685b4…268748 IdxSect {
0x2685b4…268748 f00 = 0x00c4 // 0x2685b4 @0x0
0x2685b4…268748 f01 = 0x0010 // 0x2685b6 @0x2
0x2685b4…268748 gno = [ // 0x2685b8 @0x4
0x2685b4…268748 [0x00]: C0x00c4.0x0.0
0x2685b4…268748 [0x01]: C0x00c4.0x1.0
0x2685b4…268748 [0x02]: C0x00c4.0x2.0
0x2685b4…268748 [0x03]: C0x00c4.0x3.0
0x2685b4…268748 [0x04]: C0x00c5.0x0.0
0x2685b4…268748 [0x05]: C0x00c5.0x1.0
0x2685b4…268748 [0x06]: C0x00c5.0x2.0
0x2685b4…268748 [0x07]: C0x00c5.0x3.0
0x2685b4…268748 ]
0x2685b4…268748 }
0x268748…2688dc Dummy {f00=0x00c4, f01=0x018e, f02=» 2 P IDENT DRKB03 REL 10.0 80-03-14 870105041000 P : & P =1,CIRCULAR BUFFER SIZE CHANGED B P REL 9.1 79-05-23 l P* 0 P******************************************* P* $ P* PHILIPS TERMINAL SYSTEM PTS P* P* DR
0x2688dc…268a70 Dummy {f00=0x00c4, f01=0x0190, f02=» b P* P* 0 P* THIS DRIVER HANDLES INPUT FROM NUMERIC . P* AND ALPHANUMERIC KEYBOARDS PTS 6236, P , P* CONNECTED TO CPU VIA CHLT OR CHRT. P* : P* ONLY INPUT DATA FROM DEPRESSED KEYS AND KEY-LOCKS $ P* ARE HANDL
0x268a70…268c04 Dummy {f00=0x00c4, f01=0x0190, f02=» P* ECHOED. P* 0 P* THE DRIVER CONSISTS OF FOLLOWING PARTS: " P* V " P* A C K B : ACTIVATION PART ` P* $ P* I H K B : INTERRUPT HANDLER P* P* E C H O : ECHO HANDLER P* $ P* R C K B : RECOVERY
0x268c04…268d98 Dummy {f00=0x00c4, f01=0x0190, f02=»IC READ ~ P* ORDER 02: STANDARD READ P* ORDER 03: NUMERIC READ 4 & P* ORDER 31: RESET INPUT BUFFER X P* P* P* NORMAL REGISTER USAGE : P* " P* REGISTER A1 : RETURN CODE & P* A2 : INPUT CHARA
0x268d98…268f2c Dummy {f00=0x00c4, f01=0x0190, f02=» A6 : DWT-ADDRESS P* A7 : ORDER " P* A8 : ECB-ADDRESS @ P* f P* p P* z P* SYSTEM ADAPTATION P* 8 P* CODES FOR SPECIAL CHARACTERS CLEAR, BACKSPACE, 8 P* MULTIPLE ZERO AND STANDARD
0x268f2c…2690c0 Dummy {f00=0x00c4, f01=0x0190, f02=» P* , P* IF TIMING IS WANTED, TIMER POINTER , P* IN DWT MUST BE SET UNEQUAL TO ZERO. > 2 P* STANDARD VALUE FOR TIME-OUT IS 30 SECONDS n 4 P* SINCE LAST DEPRESSED KEY. IF ANOTHER VALUE * P* IS WANTED FOR A SYSTEM, INDICATOR $
0x2690c0…269254 (5, 234) Dummy {f00=0x00c4, f01=0x0190, f02=»D VALUE IS 7 CHARACTERS t 8 P* NOTE !!! THAT LENGTH MUST BE THE SAME FOR ALL P* DWT:S IN SYSTEM P EJECT x P* 8 P* BY MEANS OF CONDITIONAL ASSEMBLY IT IS POSSIBLE 8 P* TO EXCLUDE FROM THE DRIVER FOLLOWING FUNCTIONS: P
0x269254…2693e8 Dummy {f00=0x00c4, f01=0x0190, f02=»IFT-FUNCTION | , P* -----KEYBOARD LOCK IF NO KEYLOCK ON P* D P* ENTRIES N P* b P* l P ENTRY KBAD3 ADDRESS-BLOCK v P* P* P* & P* EXTERNAL TOSS MODULE ENTRIES P* P* P* $ P EXTRN DIS
0x2693e8…26957c Dummy {f00=0x00c4, f01=0x018e, f02=»TRY v 0 P EXTRN LDREG LOAD REGISTERS A2-A8 AND RETURN 4 P EXTRN STREG STORE REGISTERS AND GO TO DISPATCER @ , P EXTRN LDREGE RETURN FROM ECHOE HANDLING x P EXTRN LDREGF PANIK EXTERN P EXTRN SETIME SET TIME P EXTRN SETIMP SET TIME " P E
0x26957c…269710 Dummy {f00=0x00c4, f01=0x0190, f02=» r P* P* P* P* DWT PARAMETERS & P* B P* L P* V " P EXTRN DWTCHP CHANEL PARAMETER ` P EXTRN DWTST STATUS EXTRN DWTBC BYTE COUNTER & " EXTRN DWTADR DRIVER ADDRESS BLOCK P EXTRN DWTA3 SAVE AREA A3
0x269710…2698a4 Dummy {f00=0x00c4, f01=0x018e, f02=» DEVICE DWT ~ P EXTRN DWTTP TIMER POINTER P EXTRN DWTWAT SAVE INPUT DWT 6 P EJECT Z P* h P* r P* | P* CONSTANTS P* P* P* * POVMASK EQU /2 OVERFLOW IN INPUT BUFFER P* . PX:F EQU 8 LENGTH OF
0x2698a4…269a38 Dummy {f00=0x00c4, f01=0x0190, f02=» P* " PTIME EQU 300 TIME OUT CONSTANT P* 4 P EJECT > P* L P* V , P**************************************** ` , P* CONDITIONAL ASSEMBLY * , P**************************************** P* . P* TIME OUT
0x269a38…269bcc Dummy {f00=0x00c4, f01=0x0190, f02=»FUNCTION MAY BE EXCLUDED BY P* SETTING X:B = 0. $ P* B PX:B EQU 1 L PCECHO EQU X:B ^ P* t > P* BY SETTING X:E = 1 THE FOLOWING POWER OFF FUNCTION ~ & P* IS INCLUDED IN THE DRIVER. < P* IF THERE IS A READ REQU
0x269bcc…269d60 Dummy {f00=0x00c4, f01=0x018e, f02=»QUEST Z @ P* AFTER POWER ON IS COMPLETED WITH ZERO IN CONTROL WORD P* OF ECB R P* h P* r PX:E EQU 0 | PPOWOFF EQU X:E P* P* P* N P* BY SETTING X:H = 1 THE KEY A15IS USED AS A NUMERIC SHIFT ON KB 7
0x269d60…269ef4 (5, 235) Dummy {f00=0x00c4, f01=0x0190, f02=» P PX:I EQU 0 PKBLOCK EQU X:I P* 0 P* : . P* A PROGRAM VERSION USING TOSS MMU PAGING D * P* IS OBTAINED BY SETTING MMUPAG EQU 1. v P* PMMUPAG EQU 0 P* P* 6 P* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION
0x269ef4…26a088 Dummy {f00=0x00c4, f01=0x0190, f02=»* P* PX:J EQU 10 PDVBLEN EQU X:J & P* < P* F P* MMU KEY TABLE SIZE P P* n P* x PX:K EQU 10 PDVBKTB EQU X:K P* P EJECT P* P* P* DWT-DISPLACEMENT P* P* 0 P
0x26a088…26a21c Dummy {f00=0x00c4, f01=0x0190, f02=»MUPAG=1 PSTART EQU DWTDRD+4 P XIF * P* 6 * PDWTCON EQU START+/00 CONVERSION TABLE @ 8 PDWTINQ EQU START+/18 POINTER TO FIRST PLACE IN QUEUE n 8 PDWTUTQ EQU START+/1A POINTER TO LAST PLACE IN QUEUE & PDWTSQ EQU START+/1C START OF QUEUE
0x26a21c…26a3b0 Dummy {f00=0x00c4, f01=0x0190, f02=»KBBSP EQU START+/14 BACK-SPACE CHARACTER ( PKBCLR EQU START+/15 CLEAR CHARACTER 0 . PKBMZ2 EQU START+/17 DOUBLE ZERO CHARACTER PKBMZ3 EQU START+/16 P* P EJECT P* TABLES P* P* $ P DATA DVBKTB MMU KEY TABLE S
0x26a3b0…26a544 Dummy {f00=0x00c4, f01=0x0190, f02=» r " P DATA 0 ABORT ROUTINE ADDRESS P DATA IHKB INTERRUPT HANDLER . P IFT POWOFF=1 R P DATA RCKB RECOVERY ROUTINE h P XIF P IFT POWOFF=0 P DATA 0 NO RECOVERY P XIF P* P IFT POWOFF=1 P EJECT P*
0x26a544…26a6d8 Dummy {f00=0x00c4, f01=0x018e, f02=»N STACK v P XIF P* P IFT POWOFF=1 & P IFT CPU852=0 < " P MSR 8,A15 SAVE A1-A8 ON STACK R P XIF x P* P IFT POWOFF=1 P LD A3,DWTST,A6 BUSY? P RF(NN) RCKB10 P LDKL A1,/200 ( P ORS A1,DWTST,A6 INDICATE
0x26a6d8…26a86c Dummy {f00=0x00c4, f01=0x0190, f02=» P* ACKB P* : P* ACTIVATION PART: CHECS VALIDITY OF ORDERS AND & P* d @ P* EXAMINES INPUT BUFFER TO SEE IF SOME QUEUED CHARACTER n P* P* TO THREAT P* P* P* P* PACKB EQU *
0x26a86c…26aa00 Dummy {f00=0x00c4, f01=0x018e, f02=» LDR A4,A7 P RF(NG) AKB100 ILLEGAL ORDER P SUK A4,4 6 P RF(N) AKB200 ORDER 1,2 OR 3 H P SUK A4,/2D l P RF(Z) AKB110 ORDER 31 * PAKB100 ORKL A1,/8000 I/0 REQUEST ERROR P ABL ENDI10 P EJECT P* P* P*
0x26aa00…26ab94 (5, 236) Dummy {f00=0x00c4, f01=0x0190, f02=» ( P ST A2,DWTUTQ,A6 RESET OUTPUT QUEUE P ABL ENDIO 0 P* B P EJECT L P* Z P* d P* ORDER 1,2,3 n P* P* P* PAKB200 EQU * P IFT POWOFF=1 P LD A2,DWTST,A6 P ANKL A2,/200 POWER OFF? P
0x26ab94…26ad28 Dummy {f00=0x00c4, f01=0x0190, f02=»QUEST b P RF(E) AKB205 P CM 10,A8 INDICATE POWER OFF $ P RF AKB218 H P XIF Z PAKB205 EQU * f P IFT CTIMUT=1 z P LDR* A1,A6 P ANK A1,/40 TIMING? , P RF(E) AKB210 NO TIMING FOR THIS DEVICE! , P LD A4,DWTTP,A6 CHECK IF
0x26ad28…26aebc Dummy {f00=0x00c4, f01=0x0190, f02=»A4,DWTTP TIMER POINTER P ADR A4,A6 ADD DWT-ADDRESS P LDR A1,A6 @ P CF A15,SETIMP SET TIME R 0 P DATA AKBTUT,TIME TIME OUT ROUTINE AND TIME r . P ST A4,DWTTP,A6 STORE TIMER ADDRESS IN DWT P XIF P* P EJECT P* IF AN
0x26aebc…26b050 Dummy {f00=0x00c4, f01=0x0190, f02=»UFFER. d < P* IN CASE OF STANDARD OR NUMERIC READ MAKE ECB-CODE & P* AND END I/O. ELSE CONTINUE. N P* x P* PAKB210 EQU * " P LD A2,DWTST,A6 ANY KEY-LOCK? P ANK A2,/F P RF(Z) AKB219 P SLL A2,1 P SRN A2,
0x26b050…26b1e4 Dummy {f00=0x00c4, f01=0x018e, f02=» A4,A4 . PAKB212 XRS A4,DWTST,A6 RESET OLD KEY-FLAG P LDR A2,A4 @ P SLL A4,4 R P AN A4,DWTST,A6 d P STR A4,A15 SAVE A4 | P STR A3,A15 P SRN A2,A3 ORDER 1 " P ADR A3,A3 MAKE CHARACTER FLAG P LDR A4,A4 P RF(NE) AK
0x26b1e4…26b378 Dummy {f00=0x00c4, f01=0x0190, f02=» h P LDR* A4,A15 RESTORE A4 P CWK A7,1 ( $ P RF(E) AKB307 JUMP IF BASIC READ : " PAKB214 NGR A2,A1 MAKE ECB CODE b P LDR A4,A4 KEY FLAG P RF(E) AKB215 P SUK A2,4 , PAKB215 ST A2,10,A8 KEY-LOCK CODE IN ECB PAKB218 ABL A
0x26b378…26b50c Dummy {f00=0x00c4, f01=0x0190, f02=»40 N0! P LD A1,2,A8 BUFFER ADDRESS P SUK A1,1 0 P ADR A1,A2 B & PAKB230 SCR A3,A1 CLEAR ECB BUFFER T P SUK A1,1 ~ P SUK A2,1 P RB(NE) AKB230 PAKB240 EQU * P LD A1,DWTUTQ,A6 P LCR A2,A1 PAKB245 LDR A4,A2
0x26b50c…26b6a0 Dummy {f00=0x00c4, f01=0x0190, f02=»IX END I/O . PAKB250 CW A1,DWTINQ,A6 SOMETHING IN QUEUE? P RF(NE) AKB255 D " 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 $ P ABL ENDI05 END I/O AT TIME OUT
0x26b6a0…26b834 (5, 237) Dummy {f00=0x00c5, f01=0x0190, f02=»TORE NEW POINTER ~ PAKB257 EQU * P LDR A4,A7 , P SUK A4,2 > P RF(NN) AKB310 ORDER 2 OR 3 P P EJECT t P* P* P* ORDER 1 BASIC READ P* P* P* 6 PAKB305 CF A15,STORE STORE CHARACTER IN ECB-BUFFER
0x26b834…26b9c8 Dummy {f00=0x00c5, f01=0x0190, f02=»A2,DWTST,A6 MORE KEYS? P ANK A2,/F P RB(NZ) AKB210 0 P RB AKB225 F P EJECT X P* f P* p P* z 4 P* ORDER 2 OR 3 STANDARD AND NUMERIC READ P* B P* CHECK IF READ CHARACTER IS FOUND IN KEY-TABLE (IF ANY)
0x26b9c8…26bb5c Dummy {f00=0x00c5, f01=0x0190, f02=» LCR A4,A1 KEY-TABLE LENGTH IN A4 P ANK A4,/FF * & P ADR A1,A4 LAST PLACE IN KEY-TABLE > P ADK A1,1 h PAKB355 SUK A4,1 z , P RF(N) AKB360 KEY NOT FOUND IN KEY-TABLE P SUK A1,1 NEXT KEY P CCR A2,A1 EOR? P RB(NE) AKB355 NO!
0x26bb5c…26bcf0 Dummy {f00=0x00c5, f01=0x0190, f02=»2,/80 INDICATE EOR-CHARACTER " P CF A5,ECHO ECHO EOR-CHARACTER ! $ P XIF ! J P RF AKB380 ! V PAKB360 EQU * ! h P LDR A4,A2 ! | P CC A4,KBMZ2,A6 ! P RF(E) KBMZ20 ! P CC A4,KBMZ3,A6 ! P RF(E) KBMZ30 ! P CC A4,KBBSP,A6 ! P RF(E)
0x26bcf0…26be84 Dummy {f00=0x00c5, f01=0x018e, f02=»/20 CHEC CONVERTED CHARACTER ! P RF(N) AKB364 LESS THAN /20 " $ P SUK A4,/5F CHARACTER > /7F " H P RF(P) AKB364 YES " l P CWK A7,2 " $ P RF(E) AKB366 STANDARD READ OK " P ADK A4,/4F " P RF(N) AKB364 " P SUK A4,/A " " P RF(N) AKB36
0x26be84…26c018 Dummy {f00=0x00c5, f01=0x0190, f02=» P CF A5,ECHO # P XIF # P CW A3,4,A8 LENGTH OVERFLOW? # $ " PAKB367 ABL(L) AKB210 NO RETURN # H & PAKB368 LDK A1,8 YES SET ERROR CODE # n P RF ENDIO END I/O # P EJECT # PKBMZ30 EQU * TRIPPLE ZERO # P LDK A4,3 # P RF KBMZ25 # PKB
0x26c018…26c1ac Dummy {f00=0x00c5, f01=0x0190, f02=» P LDR A4,A1 $ P IFT CECHO=1 $ P CF A5,ECHO $ * P XIF $ > P CW A3,4,A8 $ J P RB(L) KBMZ25 $ ^ PKBMZ27 EQU * $ t P SUK A4,1 ANY MORE ZEROES $ $ P RB(L) AKB368 NO,SET RETURN CODE $ P INH $ * P LD A1,DWTUTQ,A6 GET OUTQUEUE POINTER $
0x26c1ac…26c340 Dummy {f00=0x00c5, f01=0x0190, f02=»DR A1,A6 $ P SUK A1,1 % P RF KBMZ40 % " 2 PKBMZ29 ADR A1,A6 GET PREIOUS POINTER POSITION % 4 P SUK A1,1 % j , 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
0x26c340…26c4d4 (5, 238) Dummy {f00=0x00c5, f01=0x0190, f02=»OWERFLOW % t P SCR A4,A1 & $ P ST A1,DWTUTQ,A6 UPPDATE POINTER & " ( P LDK A1,/A SET RETURN CODE FOR BOTH & J . PENDIX RF ENDIO LENGTH AND THRUGHPUT ERRORS & v P* & P* & P* & PKBCL10 EQU * CLEAR & P LDK A3,0 & P LDK A2,/18 & P R
0x26c4d4…26c668 Dummy {f00=0x00c5, f01=0x0190, f02=»LEAR LAST CHAR IN ECB-BUFFER & P CF A15,STORE ' $ P SUK A3,1 ' : PKBSP15 LDK A2,/8 ' L P RB AKB366 ' d P* ' v P* ' PAKB380 LDK A1,0 RETURN CODE ' P EJECT ' P* ' P* ' , P* THIS IS A COMMON END OF THE DRIVER ' P* ' 2
0x26c668…26c7fc Dummy {f00=0x00c5, f01=0x0190, f02=»* ' P INH ( P IFT CTIMUT=1 ( P LD A4,DWTTP,A6 ( , * P RF(E) ENDI05 NO TIMING ON THIS DEVICE ( D P CM* DWTTP,A6 RESET TIMER ( r P CM DWTTP,A6 ( P XIF ( P* ( , PENDI05 ST A3,6,A8 STORE EFFECTIVE LENGTH ( PENDI10 EQU * ( P* (
0x26c7fc…26c990 Dummy {f00=0x00c5, f01=0x018e, f02=» ABL DISEND ( P* ) P EJECT ) P* ) , P* ) 6 P* ) @ P* IHKB ) J P* ) P* ) f F P* THIS IS THE INTERRUPT HANDLER ENTERED FROM CHLT/CHRT DRIVER ) p P* ) P* ) P* ) PIHKB EQU * ) P ANK A2,/FF ) * P CF A15,KO
0x26c990…26cb24 Dummy {f00=0x00c5, f01=0x0190, f02=» P * P LD A3,DWTST,A6 NORMAL CHAR * P IFT KBLOCK=1 * 0 P ANK A3,/FF * F P RF(Z) EXIT * Z P LD A3,DWTST,A6 I/O REQUEST? * n P XIF * * P RF(N) IHKB15 NO READ REQUEST PENDING * " P SLL A3,7 INTERRUPT ALLOWED ? * 4 P RF(NN) IHKB15 NO, STO
0x26cb24…26ccb8 Dummy {f00=0x00c5, f01=0x018e, f02=»TIME RESTART TIME * P ST* A3,DWTTP,A6 + P XIF + 2 , PIHKB07 ABL LDREG RETURN TO READ ROUTINE + > , PIHKB12 CF A15,KEYSET SET KEY CODE IN DWT + n P LDR A3,A3 + P RF(Z) EXIT NO KEY CHANGE + P LD A3,DWTST,A6 + ( P RF(N) EXIT NO READ REQUEST PE
0x26ccb8…26ce4c Dummy {f00=0x00c5, f01=0x0190, f02=» + ~ P ADR A5,A6 , P ABL AKB210 , P , . PIHKB15 LD A1,DWTINQ,A6 , 6 P LCR A4,A1 , T " P XRK A4,/FF ALREADY OVERFLOW? , f P RF(E) EXIT YES , P LDR A3,A1 , 4 P CF A15,EOQUEU GET NEXT OUTQUEUE POINTER ADDRESS , P CW A1,DWTUTQ,A6 OVERFLOW?
0x26ce4c…26cfe0 Dummy {f00=0x00c5, f01=0x0190, f02=»WTINQ,A6 STORE INQUEUE POINTER , PIHKB30 SCR A2,A3 - & PEXIT ABL TDISP - > P* - T P EJECT - ^ P* - l P* - v P* - P* AKBTUT - P* - & P* THIS IS THE TIME-OUT ROUTINE - P* - P* - P* - P IFT CTIMUT=1 - PAK
0x26cfe0…26d174 (5, 239) Dummy {f00=0x00c5, f01=0x0190, f02=» RB(N) EXIT DISPATCH IF NO REQUEST ON - , P RB IHKB07 RESTORE REGISTER AND END I/O . . P XIF . ^ P EJECT . j P* . x P* . P* . P* . P* KEYSET . P* . P* . P* . , P* ON ENTRY: A4= NEG KEY-LOCK VALUE . P* .
0x26d174…26d308 Dummy {f00=0x00c5, f01=0x0190, f02=»A3,DWTST,A6 . P LDKL A2,/100 / PSET100 SRL A2,1 / * P ADK A4,2 IN A4: 1=OFF 0=ON / B P RB(N) SET100 / f $ P ANR A3,A2 CHEC OLD KEY POSITION / | " P RF(NZ) SET300 JUMP IF KEY ON / P LDR A4,A4 / P RF(NZ) SET500 / P RF SET400 / PSET3
0x26d308…26d49c Dummy {f00=0x00c5, f01=0x0190, f02=»ST,A6 / * P LDK A3,1 A3=1 IF KEY LOCK HAS CHANGED 0 PSET500 LDR* A4,A15 0 < P RTN A15 0 V P EJECT 0 f P* 0 t P* 0 ~ P* 0 P* KONVER 0 P* 0 * P* KONVER CONVERTS INPUT CHARACTER 0 P* 0 P* 0 ( P* ON ENTRY: A2= IN
0x26d49c…26d630 Dummy {f00=0x00c5, f01=0x0190, f02=»RACTER,POS IF CTRL,SHIFT 0 ` $ P* A5 IS DESTROYED! 1 P* 1 H P* 1 R PKONVER EQU * 1 P LDR A4,A2 1 p 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 P XIF 1 8 P STR A2,
0x26d630…26d7c4 Dummy {f00=0x00c5, f01=0x0190, f02=»/40 1 P RF(N) KON180 ALFANUMERIC 2 P SUK A4,/10 FUNCTION 2 . P RF(NN) KON110 NO 2 J P SUK A2,/40 YES 2 d PKON105 EQU * 2 | P ANK A5,/10 2 P SRL A5,3 2 P RF KON200 2 * PKON110 SUK A4,8 (UN)CTRL OR (UN)SHIFT 2 P RF(N) KON400 KEY-
0x26d7c4…26d958 Dummy {f00=0x00c5, f01=0x0190, f02=»1 2 P SUK A4,2 3 P RF(N) KON125 CONTROL OFF 3 $ P RF(E) KON140 NUMERICAL SHIFT ON 3 > " P RF KON160 NUMERICAL SHIFT OFF 3 f P XIF 3 PKON125 EQU * 3 P LDKL A2,/FFDF UNCTRL 3 PKON120 ANR A5,A2 3 PKON130 STR A5,A6 DWTCHP 3 P LDK A
0x26d958…26daec Dummy {f00=0x00c5, f01=0x0190, f02=»SHIFT NOT ON 3 P LDK A2,/90 4 P RF KON150 4 ( P XIF 4 : PKON145 EQU * 4 F P LDK A2,/10 SHIFT 4 Z PKON150 ORR A5,A2 4 t P RB KON130 4 PKON160 EQU * 4 P IFT NSHIFT=1 4 P LDR A4,A5 4 P ANK A4,/80 4 P RF(Z) KON165 4 P LDK
0x26daec…26dc80 Dummy {f00=0x00c5, f01=0x0190, f02=» A2,/20 CTRL 4 P RB KON150 5 PKON180 SUK A2,/20 FIND INDEX 5 & P ANK A5,/30 5 J P SRL A5,3 5 ^ P ADK A5,4 5 p 8 PKON200 LD A4,DWTCON,A6 GET CONVERSION TABLE ADDRESS 5 P ADR A4,A5 5 P LDR* A4,A4 5 P RF(Z) KON400 5 P ADR A4,A2 5
0x26dc80…26de14 (5, 240) Dummy {f00=0x00c5, f01=0x0190, f02=» PKON300 RTN A15 6 4 PKON400 LDR* A2,A15 NO CONVERSION, KEEP CHARACTER 6 P RB KON300 6 R P IFT NSHIFT=0 6 d PKON500 EQU * 6 z P LDR A4,A4 KEY CODE /7C 6 P RF(Z) KON600 YES 6 & P LDK A4,1 INDICATE SKIP CHARACTER 6 P RTN A15 6 PKON600
0x26de14…26dfa8 Dummy {f00=0x00c5, f01=0x0190, f02=» CHARACTER IN 6 n 6 P* ECB-BUFFER AND INCREMENT BUFFER INDEX 7 P* 7 P P* ON ENTRY: 7 Z P* 7 p P* A2 = CHARACTER TO STORE 7 z P* A3 = BUFFER INDEX 7 P* 7 P* 7 PSTORE EQU * 7 P LD A4,2,A8 BUFFER ADDRESS 7 P A
0x26dfa8…26e13c Dummy {f00=0x00c5, f01=0x0190, f02=» 7 ~ P LDR* P,A15 8 P EJECT 8 P* 8 * P* 8 4 6 P* EOQUEU = SUBROUTINE TO GET NEXT QUEUE POINTER 8 > P* 8 x P* ON ENTRY: 8 P* 8 P* A1 = QUEUE POINTER 8 P* A6 = DWT-ADDRESS 8 P* 8 P* ON EXIT: 8 P* 8
0x26e13c…26e2d0 Dummy {f00=0x00c5, f01=0x4078, f02=») EOQU10 8 * P LDK A1,DWTSQ SET QUEUE START ADDRESS 9 PEOQU10 ADR A1,A6 9 > P RB STORTN 9 V P END 9 h@ 9 t* 8 x P* ON ENTRY: 8 P* 8 P* A1 = QUEUE POINTER 8 P* A6 = DWT-ADDRESS 8 P* 8 P* ON EXIT: 8 P* 8
0x26e2d0…26e464 Dummy {f00=0x00c5, 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
0x26e464…26e5f8 Dummy {f00=0x00c5, f01=0x0190, f02=» PTRT112 EQU * CHAR /= SPACE k & P LD A1,DWTCMP,A6 COMPRESS MODE ? k ( P RF(Z) TRT114 NO k R . P CF A5,TRCOMP TRANSMIT COMPRESSED SPACES k l PTRT114 EQU * COMPRESS ENDED k P XIF k P IFT TRANSP=0 k P IFT CODE=1 k 2 P LC A2,TEB
0x26e5f8…26e78c Dummy {f00=0x00c5, f01=0x0190, f02=»RBCCN INSERT ONE DLE. NO CRC-CAL k P LDK A2,DLE l ( P XIF l < PTRT115 EQU * l H P CF A5,WRITEP SEND CHAR l P RB TRT100 NEXT CHAR l | P IFT TRANSP=0 l P IFT COMPRS=0 l . P* GROUP SEPARATOR, TRANSMIT SPACE COUNT l PTRT117 EQU *
0x26e78c…26e920 Dummy {f00=0x00c5, f01=0x0190, f02=» l | P ADK A4,1 INCR POINTER m P ANK A2,/7F CLEAN CHAR m ( $ P ORK A2,/40 SET SPACE CHAR BIT m H ( P CF A5,WRITEP TRANSMIT SPACE COUNT m p * P RB TRT100 GET NEXT CHAR TO TRANSMIT m P XIF m PTRT120 EQU * m P IFT TRANSP=1 m P LDK
0x26e920…26eab4 (5, 241) Opaque[0x194]
0x26eab4…26ec48 # DirEnt {nam=»DRLP01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x18c0, f03=0x0000}
0x26eab4…26ec48 IdxSect {
0x26eab4…26ec48 f00 = 0x00c6 // 0x26eab4 @0x0
0x26eab4…26ec48 f01 = 0x0008 // 0x26eab6 @0x2
0x26eab4…26ec48 gno = [ // 0x26eab8 @0x4
0x26eab4…26ec48 [0x00]: C0x00c6.0x0.0
0x26eab4…26ec48 [0x01]: C0x00c6.0x1.0
0x26eab4…26ec48 [0x02]: C0x00c6.0x2.0
0x26eab4…26ec48 [0x03]: C0x00c6.0x3.0
0x26eab4…26ec48 ]
0x26eab4…26ec48 }
0x26ec48…26eddc Dummy {f00=0x00c6, f01=0x0190, f02=» 2 P IDENT DRLP01 REL 10.0 80-03-14 870105041000 P : P* B P* L > P********************************************************** V P* $ P* PHILIPS TERMINAL SYSTEM PTS P* $ P* DRLP01 = DRIVER LINE PRINTER P* P*
0x26eddc…26ef70 Dummy {f00=0x00c6, f01=0x0190, f02=» THIS DRIVER HANDLES ONE LINE PRINTER PTS 6881 CONNECTED < P* TO CPU VIA CHLP ON MULTIPLEX CHANNEL OR PROGRAMMED B P* CHANNEL P* P EJECT DRLP01 P* P* P************************ P* ENTRIES *
0x26ef70…26f104 Dummy {f00=0x00c6, f01=0x0190, f02=»HLP INTERRUPT HANDLER P ENTRY LPON RECOVERY ROUTINE & P ENTRY DWLP01 DWT FOR LINE PRINTER B P l P t P | P* P* , P**************************************** , P* EXTERNAL TOSS MODULE ENTRIES * , P****************
0x26f104…26f298 Dummy {f00=0x00c6, f01=0x0190, f02=»GS ON STACK z P EXTRN DISIOE REQUEST ERROR EXTRN DWTST STATUS 8 EXTRN DWTBC BYTE COUNTER T EXTRN DWTECB ECB ADDRESS v $ EXTRN DWTOR DWT INDEX AND ORDER P EXTRN DWTA3 SAVE AREA A3 EXTRN DWTA4 SAVE AREA A4 EXT
0x26f298…26f42c Dummy {f00=0x00c6, f01=0x0190, f02=»POST PROCESSING FLAG ~ P EJECT DRLP01 P* 4 P* > " P***************************** H " P* CONSTANTS * n " P***************************** P* P* PDWALP EQU /0F & PMUXLP EQU DWALP+DWALP MUX ADDRESS
0x26f42c…26f5c0 Dummy {f00=0x00c6, f01=0x0190, f02=»SEMBLY P* . P***************************************** P* J 2 P* PROGRAMMED CHANNEL MAY BE USED INSTEAD OF T , P* MULTIPLEX CHANNEL BY SETTING X:A=1 P* PX:A EQU 0 PCHAN EQU X:A P* . P* A PROGRAM VERSION
0x26f5c0…26f754 (5, 242) Dummy {f00=0x00c6, f01=0x0190, f02=»M VERSION USING THE EXTENDED INSTRUCTION . P* SET IS OBTAINED BY SETTING CPU852 EQU 0. 0 P* b PCPU852 EQU 1 l P* P* MMU BUFFER SIZE P* PX:B EQU 67 PDVBLEN EQU X:B P* P* MMU DEVICE INDEX P* P
0x26f754…26f8e8 Dummy {f00=0x00c6, f01=0x0190, f02=»******* P* ORDERS * P*********************** 0 P* P P* ORDER /00: TEST STATUS. Z 8 P* A TST INSTRUCTION IS EXECUTED TO SEE ~ 0 P* IF LINE PRINTER IS OPERABLE. P* P* ORDER /05:
0x26f8e8…26fa7c Dummy {f00=0x00c6, f01=0x0190, f02=»HOUT ANY CHECK. d P* $ P* ORDER /06: STANDARD WRITE. " @ P* FIRST WORD IN ECB BUFFER CONTAINS A CONTROL J P* CHARACTER. < P* /2B: PRINT LINE WITHOUT ADVANCING PAPER : P* /30: ADV
0x26fa7c…26fc10 Dummy {f00=0x00c6, f01=0x0190, f02=»IVES A LINE FEED BEFORE n P* PRINTING. P* B P* L > P* CHARACTERS IN BUFFER SHOULD BE WITHIN THE V > P* INTERVAL /20-/5F. NO CHECK IS CARRIED OUT B P* BY DRIVER. AT THE END OF ECB
0x26fc10…26fda4 Dummy {f00=0x00c6, f01=0x0190, f02=» P EJECT DRLP01 P* P* & ( P************************************ 0 ( P* NORMAL REGISTER USAGE * ( P************************************ P* P* P* A1 = RETURN CODE P* A2 = WORK REGISTER P*
0x26fda4…26ff38 Dummy {f00=0x00c6, f01=0x018e, f02=» P* A8 = ECB ADDRESS P* & P* 0 $ P******************************** : $ P* TABLES * b $ P******************************** P* P* * P DATA DVBLEN+DVBLEN MMU BUFFER LENGTH P DATA DEVIND DEVICE
0x26ff38…2700cc Dummy {f00=0x00c6, f01=0x018e, f02=» P* P* A C T I V A T I O N P* . P* 8 PACLP EQU * B P LDK A1,/0D CARRIAGE RETURN T P LDR A7,A7 ORDER 0 ? x P RF(NE) ACLP05 NO P LDKL A4,DWTBC BYTE COUNTER P ADR A4,A6 ADD DWT ADDRESS $ P SCR A1,A4 STORE CAR
0x2700cc…270260 Dummy {f00=0x00c6, f01=0x0190, f02=» P SUK A7,5 ORDER 5 ? P RF(E) ACLP30 P SUK A7,1 ORDER 6 ? 6 P RF(E) ACLP10 R P* h PACERR ABL DISIOE r P* P EJECT DRLP01 P* P* PACLP10 EQU * P CWK A2,2 REQ. LENGTH < 2 ? P RF(NL) ACLP12 N
0x270260…2703f4 (5, 243) Dummy {f00=0x00c6, f01=0x0190, f02=» A3,A2 ADDED WITH REQ. LENGTH $ P SCR A1,A3 STORE PRINT CHARACTER & P ADK A2,1 N P LCR A3,A4 ` P ECR A3,A3 r & P LC A3,1,A4 GET CONTROL CHARACTER P ST A3,CONCHA P ANK A3,/FF $ P SUK A3,/2B SUPER POSITIONING ? P RF(NE)
0x2703f4…270588 Dummy {f00=0x00c6, f01=0x0190, f02=»DK A1,/0A LINE FEED * P SC A1,1,A4 SECOND CHARACTER IN BUFFER P SUK A3,5 TWO LINE FEEDS ? J P RF(E) ACLP20 YES l P LDK A1,/0C TOP OF FORM P SUK A3,1 WANTED ? P RF(E) ACLP20 YES P LDK A1,/0D CARRIAGE RETURN P* P
0x270588…27071c Dummy {f00=0x00c6, f01=0x0190, f02=» P SUK A7,6 ORDER 6 ? P RF(NE) ENDIO P LDR A2,A2 6 P RF(NN) ACLP35 H 4 P IM 6,A8 ADD FOR EXTRA CHAR. AT BUFFER END (/0D) ^ P* PACLP35 EQU * P LD A4,2,A8 BUFFER ADDRESS P LDKL A3,0 PCONCHA EQU *-2 2 P SC A3,1,A
0x27071c…2708b0 Dummy {f00=0x00c6, f01=0x0190, f02=»REQUEST x PEXIT ABL TDISP P* & P EJECT DRLP01 0 P* H P* R P* CIOSTA " P* SUBROUTINE TO SEND BUFFER p P* P* PCIOSTA EQU * P ST A5,DWTA5,A6 SAVE A5 P IFT CHAN=0 6 P ORKL A2,/4000 INDICAT
0x2708b0…270a44 Dummy {f00=0x00c6, f01=0x0190, f02=»EGISTER l 2 P WER A4,MUXLP+1 SECOND WRITE EXTERNAL REGISTER P XIF F P* R P IFT CHAN=1 ( P ST A4,DWTA3,A6 SAVE BUFFER ADDRESS p P ADR A4,A2 . P ST A4,DWTA4,A6 SAVE BUFFER END ADDRESS+1 P XIF P* P LD A1,PFPOST
0x270a44…270bd8 Dummy {f00=0x00c6, f01=0x0190, f02=»* P EJECT DRLP01 P* " P* , P* RECOVERY ROUTINE 6 P* T P* ^ PLPON EQU * h P IFT CPU852=1 z & 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
0x270bd8…270d6c Dummy {f00=0x00c6, f01=0x018e, f02=»T LP FREE P RF IHLP30 P* $ P EJECT DRLP01 . P* F P* P P* I N T E R R U P T Z P* x P* PIHLP EQU * $ P ST P,INTSAV SAVE LAST INTERRUPT P IFT CHAN=0 P IFT CPU852=1 & P CF A15,SAVE8 SAVE A1-A8
0x270d6c…270f00 Dummy {f00=0x00c6, f01=0x0190, f02=» P IFT CHAN=1 P STR A1,A15 P STR A2,A15 0 P LDKL A2,DWLP01 DWT-ADDRESS D 2 P LD A1,DWTA3,A2 POINTER AT NEXT BYTE IN BUFFER h P LCR A2,A1 NEXT BYTE " P OTR A2,0,DWALP WRITE ONE BYTE P RF(NA) IHLP20 NOT ACCEPTED P LDK
0x270f00…271094 (5, 244) Dummy {f00=0x00c6, f01=0x0190, f02=»BYTE x P CIO A2,0,DWALP CIO HALT PIHLP10 EQU * , P LDR* A2,A15 @ P LDR* A1,A15 T P RTN A15 h P* x P* P* PIHLP20 STR A3,A15 P STR A4,A15 P STR A5,A15 P STR A6,A15 P STR A7,A15 P STR A8,
0x271094…271228 Dummy {f00=0x00c6, f01=0x0190, f02=»A7,DWTOR,A6 ORDER P ANK A7,/FF P LD A8,DWTECB,A6 ECB ADDRESS . P* R P IFT CHAN=0 4 P RER A3,MUXLP GET NUMBER OF NOT TRANSFERED CHAR. p P ANKL A3,/FFF 8 P LD A2,4,A8 CALCULATE NUMB. OF TRANSFERED CHARACTERS P SUR A2,A3
0x271228…2713bc Dummy {f00=0x00c6, f01=0x0190, f02=» A7,6 ORDER 6? P RF(NE) IHLP35 P ADK A2,1 YES , PIHLP35 EQU * B 8 P SU A2,2,A8 CALCULATE NUMB. OF TRANSFERED CHARACTERS V P XIF " P ST A2,6,A8 STORE EFF. LENGTH $ P LD A5,DWTA5,A6 GET STACK VALUE P RTN A5 P* P E
0x2713bc…271550 Dummy {f00=0x00c6, f01=0x018e, f02=» P DATA 0 CHANNEL PARAMETER P DATA /8000 STATUS * P DATA 0 ECB ADDRESS D P DATA 0 ORDER ` ( P DATA LPADR ADDRESS TO ADDRESS BLOCK v P DATA 0 TTAB ADDRESS $ P DATA 0 WAIT/ACTIVATE INDICATOR P DATA 0 TERMINAL QUEUE IFT
0x271550…2716e4 Dummy {f00=0x00c6, f01=0x4130, f02=» t P DATA 0 SAVE AREA FOR A3 P DATA 0 SAVE AREA FOR A4 ( P DATA 0 SAVE AREA FOR A5 H P RES 4 DWT STACK h P* P IFT MMUPAG=1 PDEVECB EQU * P DATA 0 P DATA LP:BUF P DATA 0,0,0,0 PLP:BUF RES DVBLEN+1
0x2716e4…271878 Dummy {f00=0x00c6, 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
0x271878…271a0c Dummy {f00=0x00c6, f01=0x018e, f02=»* * EJECT * " * , * L I N E 3 6 * L $ PDWA43 EQU DWA41+2 DEVICE ADDRESS V * ~ * PCWTA43 EQU * TABLE ENTRY DATA 0 LAST OUTPUT DWT , P DATA 0 LAST OUTPUT CH./ NEXT OUTPUT CH. P INR A
0x271a0c…271ba0 Dummy {f00=0x00c6, f01=0x0190, f02=» P SST A2,DWA43 SEND STATUS DATA 0 CHANNEL STATUS & * D * N EJECT X * f * p * L I N E 4 z * $ PDWA44 EQU DWA41+3 DEVICE ADDRESS * * PCWTA44 EQU * TABLE ENTRY DATA 0 LAST OUTPU
0x271ba0…271d34 (5, 245) Opaque[0x194]
0x271d34…271ec8 # DirEnt {nam=»DRLT01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x18e0, f03=0x0000}
0x271d34…271ec8 IdxSect {
0x271d34…271ec8 f00 = 0x00c7 // 0x271d34 @0x0
0x271d34…271ec8 f01 = 0x0014 // 0x271d36 @0x2
0x271d34…271ec8 gno = [ // 0x271d38 @0x4
0x271d34…271ec8 [0x00]: C0x00c7.0x0.0
0x271d34…271ec8 [0x01]: C0x00c7.0x1.0
0x271d34…271ec8 [0x02]: C0x00c7.0x2.0
0x271d34…271ec8 [0x03]: C0x00c7.0x3.0
0x271d34…271ec8 [0x04]: C0x00c8.0x0.0
0x271d34…271ec8 [0x05]: C0x00c8.0x1.0
0x271d34…271ec8 [0x06]: C0x00c8.0x2.0
0x271d34…271ec8 [0x07]: C0x00c8.0x3.0
0x271d34…271ec8 [0x08]: C0x00c9.0x0.0
0x271d34…271ec8 [0x09]: C0x00c9.0x1.0
0x271d34…271ec8 ]
0x271d34…271ec8 }
0x271ec8…27205c Dummy {f00=0x00c7, f01=0x0190, f02=» 2 P IDENT DRLT01 REL 10.0 80-03-14 870105041000 P : & P =9,RTN FROM OUTLRT IN INH MODE B P PRR 10.1 79-09-03 l P =8,UPDATE TO 10.1 STATUS P REL 9.1 79-05-23 * P =7,CLT010 DUBLE DEF LABEL, RB - ABL P PRR 9.1 79-05-1
0x27205c…2721f0 Dummy {f00=0x00c7, f01=0x0190, f02=» =1-4, GEN UPDATE TO 8.2+ STATUS P REL 8.2 79-04-02 ( P =4,TIMER RESET CORRECTED D P REL 8.2 79-03-22 h P =3,NAK HANDLING CORRECTED P REL 8.2 79-03-16 P =2,IMPROV. OF TEST ORDER P REL 8.2 79-01-11 , P =
0x2721f0…272384 Dummy {f00=0x00c7, f01=0x0190, f02=»****************************** | P* & $ P* PHILIPS TERMINAL SYSTEM PTS 0 P* X $ P* DRLT01 = DRIVER CHANNEL UNIT b $ P* FOR LOCAL TERMINALS P* P* P* P* P* 2 P************************************
0x272384…272518 Dummy {f00=0x00c7, f01=0x0190, f02=»GISTER A2. IF DATA d D P* INPUT OR DATA REQUEST A BRANCH IS MADE TO INTERRUPT HANDLER P* FOR ACTUAL DEVICE. b D P* IF CONTROL CHARACTER, THIS IS EXAMINED AND NECESSARY ACTIONS P* ARE CARRIED OUT. P* < P* THE DRIVER ALSO INCLUD
0x272518…2726ac Dummy {f00=0x00c7, f01=0x0190, f02=»TART ON EVERY CHLT IN SYSTEM t P* $ 2 P* CONTROL WORK TABLES FOR THE CHANNELS ARE . P* INCLUDED IN THE DRIVER. d P EJECT P* P* P* . P* NORMAL REGISTER USAGE IN THE DRIVER:- P* P* A1 = RETURN CODE
0x2726ac…272840 Dummy {f00=0x00c7, f01=0x0190, f02=»WT-ADDRESS P* A7 = ORDER P* A8 = ECB-ADDRESS ( P* D P* N P* X P EJECT b P* p P*********** z P* ENTRIES * P*********** P* P* & P ENTRY CHLT1 INTERRUPT FROM CHLT01 & P ENTRY CHLT2 INTERRU
0x272840…2729d4 (5, 246) Dummy {f00=0x00c7, f01=0x0190, f02=» p P ENTRY CHLTON START OF CHLT 0 P ENTRY LOCHAN NUMBER OF LOCAL CHANNEL UNITS , 0 P ENTRY RECHAN NUMBER OF REMOTE CHANNEL UNITS ` P ENTRY REMFC DUMMY ENTRY P ENTRY DWREMU DUMMY ENTRY P* P EJECT P* . P****************
0x2729d4…272b68 Dummy {f00=0x00c7, f01=0x018e, f02=» P* & P EXTRN SAVE8 SAVE REGISTERS A1-A8 P EXTRN TDISP DISPATCHER < P EXTRN IHRET8 RESTORE A1-A8 " P EXTRN INTLT1 INTERRUPT TABLE " P EXTRN INTLT2 INTERRUPT TABLE " P EXTRN INTLT3 INTERRUPT TABLE " P EXTRN INTLT4 INTERRUP
0x272b68…272cfc Dummy {f00=0x00c7, f01=0x0190, f02=» . P EXTRN OUTLIN SEND CHAR. VIA SWITCH MODULE P* 6 P* @ ( P*********************************** J ( P* DWT PARAMETERS * v ( P*********************************** P EXTRN DWTST STATUS P EXTRN DWTOR ORDER ( P EXT
0x272cfc…272e90 Dummy {f00=0x00c7, f01=0x0190, f02=»TPUT QUEUE & P EXTRN DWTSB2 STACK BASE 2 IN DWT P EXTRN DWTTP TIMER POINTER < 0 P EXTRN INTADR INTERRUPT ADDRESS DISPLACEMENT ^ 0 P EXTRN RECADR RECOVERY ADDRESS DISPLACEMENT P* P EJECT P P* P************* P*
0x272e90…273024 Dummy {f00=0x00c7, f01=0x0190, f02=» t PDRQTIM EQU 30 P* P EJECT ( P* 6 P************************ @ P* CONDITIONAL ASSEMBLY * ` P************************ P* < P* A LOGG FUNCTION OF EVERY INPUT AND OUTPUT CHARACTER 8 P* MAY BE INCLUDED TO THE DRI
0x273024…2731b8 Dummy {f00=0x00c7, f01=0x0190, f02=»AL b . P* CHANNELS BY SETTING X:B TO 1,2,3 OR 4 P* < PX:B EQU 1 F PLOCHAN EQU X:B X P* n 8 P* ACKUMULATORS FOR NAK, RETRANSMISSION FAULT AND x 4 P* UNDEFINED CONTROL CHARACTERS ARE UPDATED IN 8 P* THE DRIVER. THIS FUNCTI
0x2731b8…27334c Dummy {f00=0x00c7, f01=0x018e, f02=» BY SETTING X:D = 1 A SOFTWARE TIME OUT HANDLING < P* MISSING DATA REQUESTS FROM PRINTERS CAN BE INCLUDED 8 P* IN THE DRIVER. x < P* AN ACKUMULATOR TO BE UPDATED EVERY TIME A SOFTWARE * P* TIME OUT OCCURS IS ALSO INCLUDED. P*
0x27334c…2734e0 Dummy {f00=0x00c7, f01=0x0190, f02=» . P* SET IS OBTAINED BY SETTING CPU852 EQU 0. P* : PCPU852 EQU 1 D P* X P EJECT b P p P x PRECHAN EQU 0 PREMFC EQU 0 PCWTRT1 EQU * PCWTRT2 EQU * PCWTRT3 EQU * PCWTRT4 EQU * PCWTRT5 EQU *
0x2734e0…273674 (5, 247) Dummy {f00=0x00c7, f01=0x0190, f02=»*********************************** ~ : P* C W T L T 1 * , : P***************************************************** j P* 4 P* CONTROL WORK TABLE FOR LOCAL TERMINAL NO. 1 P* P* PDWA1 EQU /
0x273674…273808 Dummy {f00=0x00c7, f01=0x0190, f02=»TLOW EQU *-CWTLT1 P DATA 0 LAST OUTPUT WORD * PCWTITA EQU *-CWTLT1 ADDRESS TO INTLT1 : P DATA INTLT1 h PCWTINR EQU *-CWTLT1 INR | P INR A2,0,DWA1 PCWTOTR EQU *-CWTLT1 OTR P OTR A2,0,DWA1 " PCWTCIS EQU *-CWTLT1 CIO-START
0x273808…27399c Dummy {f00=0x00c7, f01=0x0190, f02=»ATA 0 PCWTADD EQU *-CWTLT1 P* * P IFT ACKMUL=1 4 P* J P DATA 0 NAK-ACKUMULATOR T $ P DATA 0 RETR. FAULT-ACKUMULATOR t , P DATA 0 UNDEFINED-INTERRUPT-ACKUMULATOR PACKTIM EQU *-CWTLT1 ( P DATA 0 PRINTER TIMEOUT ACKUMULA
0x27399c…273b30 Dummy {f00=0x00c7, f01=0x0190, f02=» W T L T 2 * : P***************************************************** 8 P* v 4 P* CONTROL WORK TABLE FOR LOCAL TERMINAL NO. 2 P* PCWTLT2 EQU * P* P IFT LOCHAN=2 PDWA2 EQU /13 DEVIC
0x273b30…273cc4 Dummy {f00=0x00c7, f01=0x0190, f02=» INR A2,0,DWA2 INR P OTR A2,0,DWA2 OTR P CIO A2,1,DWA2 CIO-START 4 " P DATA 0 RETRANSMISSION COUNTER T P DATA 0 END OF QUEUE z P* P IFT ACKMUL=1 P* P DATA 0 NAK-ACKUMULATOR $ P DATA 0 RETR. FAULT-ACKUMULATOR , P
0x273cc4…273e58 Dummy {f00=0x00c7, f01=0x0190, f02=»2 P* P EJECT P XIF " P IFT LOCHAN=3 . PDWA2 EQU /13 DEVICE ADDRESS D P* h $ P DATA 0 LAST OUTPUT DWT-ADDRESS r P DATA 0 LAST OUTPUT WORD P DATA INTLT2 INTERRUPT TABLE P INR A2,0,DWA2 INR P OTR A2,0,DWA2 O
0x273e58…273fec Dummy {f00=0x00c7, f01=0x0190, f02=» P* P DATA 0 NAK-ACKUMULATOR $ P DATA 0 RETR. FAULT-ACKUMULATOR . , P DATA 0 UNDEFINED- INTERRUPT-ACKUMULATOR V ( P DATA 0 PRINTER TIMEOUT ACKUMULATOR P* P XIF P* P* P XIF P IFT LOCHAN=4 P* P
0x273fec…274180 Dummy {f00=0x00c7, f01=0x0190, f02=» OUTPUT DWT-ADDRESS P DATA 0 LAST OUTPUT WORD P DATA INTLT2 INTERRUPT TABLE < P INR A2,0,DWA2 INR ` P OTR A2,0,DWA2 OTR z P CIO A2,1,DWA2 CIO-START " P DATA 0 RETRANSMISSION COUNTER P DATA 0 END OF QUEUE P* P IFT ACK
0x274180…274314 (5, 248) Dummy {f00=0x00c7, f01=0x0190, f02=» h ( P DATA 0 PRINTER TIMEOUT ACKUMULATOR P* 4 P XIF > P EJECT J P* X P* b 6 P* CHANNEL UNIT WORK TABLE FOR LOCAL TERMINAL NO.3 l P* PCWTLT3 EQU * P IFT LOCHAN=3 PDWA3 EQU /23 DEVICE ADDRESS P* $ P
0x274314…2744a8 Dummy {f00=0x00c7, f01=0x0190, f02=»TR A2,0,DWA3 OTR P CIO A2,1,DWA3 CIO-START " P DATA 0 RETRANSMISSION COUNTER 8 P DATA 0 END OF QUEUE ^ P* z P IFT ACKMUL=1 P* P DATA 0 NAK-ACKUMULATOR $ P DATA 0 RETR. FAULT-ACKUMULATOR , P DATA 0 UNDEFINED- INTERRUPT
0x2744a8…27463c Dummy {f00=0x00c7, f01=0x0190, f02=» /23 DEVICE ADDRESS P* $ P DATA 0 LAST OUTPUT DWT-ADDRESS & P DATA 0 LAST OUTPUT WORD N P DATA INTLT3 INTERRUPT TABLE n P INR A2,0,DWA3 INR P OTR A2,0,DWA3 OTR P CIO A2,1,DWA3 CIO-START " P DATA 0 RETRANSMISSION COUNTER
0x27463c…2747d0 Dummy {f00=0x00c7, f01=0x0190, f02=»R r , P DATA 0 UNDEFINED- INTERRUPT-ACKUMULATOR ( P DATA 0 PRINTER TIMEOUT ACKUMULATOR : P* f P XIF p P EJECT | P* 4 P* CONTROL WORK TABLE FOR LOCAL TERMINAL NO. 4 P* PCWTLT4 EQU * P* P* P IFT LOCHA
0x2747d0…274964 Dummy {f00=0x00c7, f01=0x0190, f02=»INTLT4 INTERRUPT TABLE P INR A2,0,DWA4 INR P OTR A2,0,DWA4 OTR 8 P CIO A2,1,DWA4 CIO-START R " P DATA 0 RETRANSMISSION COUNTER r P DATA 0 END OF QUEUE P* P IFT ACKMUL=1 P* P DATA 0 NAK-ACKUMULATOR $ P DATA 0 RE
0x274964…274af8 Dummy {f00=0x00c7, f01=0x0190, f02=» P* P EJECT P* 2 P********************************************** * 2 P* C H T A B * ` 2 P********************************************** P* 6 P* THIS TABLE HOLDS ADDRESSES OF CONTROLLER WORK
0x274af8…274c8c Dummy {f00=0x00c7, f01=0x0190, f02=»CHTABE-* TABLE LENGTH P DATA CWTLT1 P DATA CWTLT2 4 P IFT LOCHAN=3 H P DATA CWTLT3 ^ P XIF r P IFT LOCHAN=4 ~ P DATA CWTLT3 P DATA CWTLT4 P XIF PCHTABE EQU * END OF TABLE P* P* P* P
0x274c8c…274e20 Dummy {f00=0x00c7, f01=0x0190, f02=»HANDLER FOR CHLT v P* P* C H L T 1 " P* INTERRUPT FROM CHLT1 8 P* X P XIF b P IFT LOCHAN=2 n PCHLT3 EQU * PCHLT4 EQU * P XIF P IFF LOCHAN=1 PCHLT1 EQU * $ P ST P,INTSAV SAVE LAST INTERRUPT
0x274e20…274fb4 (5, 249) Dummy {f00=0x00c8, f01=0x0190, f02=» 8,A15 SAVE A1-A8 ON STACK P XIF " P* . P IFF LOCHAN=1 8 . P LDKL A5,CWTLT1 SET CWT-ADDRESS FOR CHLT1 N P RF CLT010 P* P* C H L T 2 P* INTERRUPT FROM CHLT2 P* PCHLT2 EQU * $ P ST P,INTSAV SAVE LAST I
0x274fb4…275148 Dummy {f00=0x00c8, f01=0x0190, f02=»0 " P MSR 8,A15 SAVE A1-A8 ON STACK P XIF 0 P* < P IFF LOCHAN=1 F . P LDKL A5,CWTLT2 SET CWT-ADDRESS FOR CHLT2 P XIF P IFT LOCHAN=2 0 PCLT010 EX CWTINR,A5 EXECUTE INR-INSTRUCTION P* P XIF P* P IFT
0x275148…2752dc Dummy {f00=0x00c8, f01=0x0190, f02=»EQU * $ P ST P,INTSAV SAVE LAST INTERRUPT P IFT CPU852=1 6 & P CF A15,SAVE8 SAVE A1-A8 ON STACK L P XIF v P* P IFT LOCHAN=3 P IFT CPU852=0 " P MSR 8,A15 SAVE A1-A8 ON STACK P XIF P* P IFT LOCHAN=3 .
0x2752dc…275470 Dummy {f00=0x00c8, f01=0x0190, f02=» RF CLT010 P* ! P* ! P* C H L T 2 ! & P* INTERRUPT FROM CHLT3 ! < P* ! PCHLT3 EQU * ! f $ P ST P,INTSAV SAVE LAST INTERRUPT ! z P IFT CPU852=1 ! & P CF A15,SAVE8 SAVE A1-A8 ON STACK ! P XIF ! P* ! P IFT LOCHAN=4 !
0x275470…275604 Dummy {f00=0x00c8, f01=0x0190, f02=»DRESS FOR CHLT3 ! v P RF CLT010 " P* C H L T 4 " * P* INTERRUPT FROM CHLT4 " @ P* " ` PCHLT4 EQU * " j $ P ST P,INTSAV SAVE LAST INTERRUPT " ~ P IFT CPU852=1 " & P CF A15,SAVE8 SAVE A1-A8 ON STACK " P XIF " P* " P IFT LOCHAN=
0x275604…275798 Dummy {f00=0x00c8, f01=0x0190, f02=»T-ADDRESS FOR CHLT4 " z $ PCLT010 EX CWTINR,A5 EXECUTE INR # P XIF # D P* # P P IFT LOCHAN=1 # Z P* # p P* # z P* C H L T 1 # P* # P* INTERRUPT FROM CHLT1 # P* # PCHLT1 EQU * # PCHLT2 EQU * # PCHLT3 EQU * #
0x275798…27592c Dummy {f00=0x00c8, f01=0x0190, f02=» CPU852=0 # " P MSR 8,A15 SAVE A1-A8 ON STACK $ P XIF $ 8 P* $ D P IFT LOCHAN=1 $ N $ P LDKL A5,CWTLT1 GET CWT-ADDRESS $ d $ P ST P,INTSAV SAVE LAST INTERRUPT $ P INR A2,0,DWA1 $ P* $ P XIF $ P* $ P IFT LOGING=1 $ . P CF A15,
0x27592c…275ac0 Dummy {f00=0x00c8, f01=0x0190, f02=» $ P LDK A1,0 RESET RETURN CODE % P LDR A3,A2 INPUT WORD IN A3 % , P SRL A3,8 % P P LDR A4,A3 % b $ P ANK A3,/E 2 * LINE NUMBER IN A3 % t P SRL A4,3 % & P ANK A4,/E 2 * DEVICE NUMBER IN A4 % . P ABL(NE) CLT100 INPUT IS A DATA CHARACTER %
0x275ac0…275c54 (5, 250) Dummy {f00=0x00c8, f01=0x0190, f02=» =7(=3) % P* & P* & 0 P* CHECK QUEUE AND SEND IF SOMETHING THERE & $ P* & X & P LDR* A7,A5 LAST OUTPUT DWT IN A7 & b P CMR A5 RESET LAST OUTPUT & P LD A6,CWTEQ,A5 OUTPUT QUEUE & P RF(E) CLT020 & P STR A2,A15 SAVE A2 & $ P LD
0x275c54…275de8 Dummy {f00=0x00c8, f01=0x0190, f02=»ARACTER & z P LDR* A2,A15 RELOAD A2 ' P EJECT ' . P* ' < P* ' F 2 P* CHECK CONTROL CHARACTER AND UPDATE ERROR- ' P 2 P* ACKUMULATORS IF NAK, RETRANSMISSION FAULT ' ( P* OR UNDEFINED CONTROL CHARACTER ' P* ' PCLT020 EQU * ' P L
0x275de8…275f7c Dummy {f00=0x00c8, f01=0x0190, f02=» CLT028 ' P SUK A2,5 7 NAK ? =3 ( P RF(Z) CLT032 =3 ( , P* ( F P IFT ACKMUL=1 ( P P* ( f P =1 ( p P =1 ( ~ P LDK A7,2 ( $ P SUK A2,/16 RETRANSMISSION FAULT ( P RF(E) CLT025 ( " P ADK A7,2 UNDEFINED INTERRUPT ( PCLT025
0x275f7c…276110 Dummy {f00=0x00c8, f01=0x0190, f02=» ( P* ) P* ) 0 P* NAK, TIME-OUT, RETRANSMISSION FAULT OR ) $ P* UNDEFINED CONTROL CHARACTER ) P P* ) x : P* CHECK LAST OUTPUT AND TRY RECOVERY OF THAT DEVICE ) 4 P* ONE TIME. IF NOT SUCCESS GO TO DRIVER WITH ) P* MESSAGE NOT
0x276110…2762a4 Dummy {f00=0x00c8, f01=0x0190, f02=»TS SET ? ) j P RF(NE) CLT032 * 0 P LDKL A2,/1000 INDICATE RECOVERY TRIAL DONE * & , P XRS A2,DWTST,A6 SET BIT IN STATUS WORD * Z 0 PCLT030 LDK A3,2 INDICATE RECOVERY OF DEVICE * P LDK A4,1 =1 * P LDK A4,0 * P RF CPO025 * . PCLT032 LDK A1,NO
0x2762a4…276438 Dummy {f00=0x00c8, f01=0x0190, f02=» N A K * P* + B P* ERROR ACKUMULATOR AND RETRANSMISSION COUNTER IS UPDATED. + B P* LAST OUTPUT CHARACTER IS RETRANSMITTED BY CHANNEL DRIVER + ^ @ P* UP TO SIX TIMES AND IF STILL NO SUCCESS RETURN CODE NOT + , P* OPERABLE IS SENT TO DEVICE
0x276438…2765cc Dummy {f00=0x00c8, f01=0x018e, f02=»* + 2 P IM CWTRTC,A5 INCREMENT RETRANSMISSION COUNTER , P LD A4,CWTRTC,A5 GET COUNTER , @ P SUK A4,7 SEVEN TIMES ? , d P RB(E) CLT015 =7(=3) , * P LD A2,CWTLOW,A5 GET LAST OUTPUT WORD , P LDR A1,A5 , * P EX CWTOTR,A1 EXECUTE OTR-INSTRUCTION
0x2765cc…276760 Dummy {f00=0x00c8, f01=0x018e, f02=» P EJECT - P* - P* - P* ACK DATA = 07 - & P* - F 2 P* SIMULATE DATA REQUEST IF RETURN CODE FROM - P . P* CHLT OR DEVICE WITHOUT DATA REQUEST, - P* ELSE GO TO DISPATCHER - P* - PCLT040 EQU * - P LDKL A7,/EFFF -
0x276760…2768f4 (5, 251) Dummy {f00=0x00c8, f01=0x0190, f02=» , P LDR* A7,A6 DEVICE WITHOUT DATA REQUEST? . , P RF(N) CLT110 YES. SIMULATE DATA REQUEST . 4 P* . d P IFF SOFTIM=1 . n P* . PCLT062 EQU * . P RF EXIT . P* . P XIF . P* . P* . P IFT SOFTIM=1 . P* . P EJECT .
0x2768f4…276a88 Dummy {f00=0x00c8, f01=0x0190, f02=»S TO TIMER BLOCK . z P RF(E) CLT060 / P* / . P* RESTART TIMER / 8 P* / R " P LDKL A3,-DRQTIM RESTART TIMER / P ST* A3,DWTTP,A6 / P RF EXIT / P* / P* START TIMER / P* / PCLT060 LDR A1,A6 PARAMETER / P LDKL A4,DWTTP T
0x276a88…276c1c Dummy {f00=0x00c8, f01=0x0190, f02=»T ROUTINE AND DELAY / j PCLT062 EQU * 0 P RF EXIT 0 0 P 0 @ P EJECT 0 H P* 0 V P* 0 ` P* RESET TIMER IF STARTED 0 j P* 0 P =4 0 P =4 0 P =4 0 P =4 0 P =4 0 P EJECT 0 P* 0 6 P* TIME-OUT ROUT
0x276c1c…276db0 Dummy {f00=0x00c8, f01=0x0190, f02=»TTP,A6 RESET POINTER TO TIMER BLOCK 0 P LD A3,DWTST,A6 1 , P SLL A3,2 ECHO MODE ? 1 D P RF(N) CLT110 YES 1 b P* 1 | P IFT ACKMUL=1 1 P IFF LOCHAN=1 1 P* 1 " P LDR* A5,A6 CHANNEL PARAMETER 1 P ANK A5,/F 1 P SLL A5,1 2 * INDEX
0x276db0…276f44 Dummy {f00=0x00c8, f01=0x0190, f02=»* 1 P XIF 2 P IFT SOFTIM=1 2 P IFT ACKMUL=1 2 , P IFT LOCHAN=1 2 B P* 2 X $ P LDKL A5,CWTLT1 GET CWT-ADDRESS 2 b ( P IM ACKTIM,A5 INCREMENT ACKUMULATOR 2 P* 2 P XIF 2 P IFT SOFTIM=1 2 P* 2 $ P LD A7,DWTOR,A6 TEST ORDER ?
0x276f44…2770d8 Dummy {f00=0x00c8, f01=0x0190, f02=»RY =2 2 n P* 3 P XIF 3 P* 3 $ P EJECT 3 . P* 3 < P* POWER ON DATA = 03 3 F P* 3 h 6 P* RECOVERY ROUTINES ARE STARTED FOR EVERY DEVICE 3 r 6 P* ON ACTUAL LINE EXCEPT THOSE OCCUPYING CHANNEL 3 $ P* UNIT OR THOSE IN ECHO MODE. 3
0x2770d8…27726c Dummy {f00=0x00c8, f01=0x0190, f02=»SS 3 | P* A7 = ORDER 4 P* 4 " PCHPOWO EQU * 4 , P CF A15,GETLIN 4 @ $ P LDR* A2,A5 GET LAST OUTPUT DWT 4 V . P CM CWTRTC,A5 RESET RETRANSMISSION COUNTER 4 ~ P LDK A4,0 4 P LDR A3,A6 DEVICE COUNTER 4 P LDR A1,A8 ADDRESS POINTER 4 $ P R
0x27726c…277400 Dummy {f00=0x00c8, f01=0x0190, f02=» 4 P RF(N) CPO030 5 P SLC A6,1 5 " P LCR A7,A6 LEFT BYTE OF DWTCHP 5 0 P ANK A7,1 INPUT DEVICE ? 5 V P RF(NE) CPO025 YES 5 v P LDKL A7,/EFFF 5 ( P ANS A7,DWTST,A6 RESET RECOVERY BIT 5 P LC A7,DWTST,A6 5 P ANK A7,/20 ECHO MODE ? 5
0x277400…277594 (5, 252) Dummy {f00=0x00c8, f01=0x018e, f02=»SS TO ADDRESSBLOCK IN A7 5 t . P LD A7,RECADR,A7 ADDRESS TO RECOVERY IN A7 6 P RF(E) CPO030 NO RECOVERY 6 R P LDKL A5,DWTSB2 STACKBASE 6 t P ADR A5,A6 6 P INH 6 & P CFR A15,A7 GO TO RECOVERY ROUTINE 6 ( PCPO030 SUK A3,2 ALL DEVICES THREATED 6
0x277594…277728 Dummy {f00=0x00c8, f01=0x0190, f02=» ( PCLT100 CF A15,GETLIN GET DWT-ADDRESS 7 P SUR A6,A4 VALID INTERRUPT ? 7 0 P RB(N) EXIT 7 T P LDR A8,A8 7 h P RB(Z) EXIT EXIT NOT DEFINED 7 z P LDR* A6,A8 GET DWT 7 P RB(E) EXIT 7 P ANKL A6,/FFFE 7 . P LCR A7,A6 LEFT BYTE IN CHANNEL PARA
0x277728…2778bc Dummy {f00=0x00c8, f01=0x0190, f02=»10 LD A7,DWTOR,A6 SET ORDER IN A7 7 P ANK A7,/FF 8 * * P LD A8,DWTECB,A6 AND ECB-ADDRESS IN A8 8 > P IFT SOFTIM=1 8 l * P LC A3,DWTOCH,A6 GET LAST CHARACTER =4 8 P ANK A3,/7F =4 8 * P SUK A3,DUMMSP SPECIAL DUMMY=ETX ? =4 8 P RF(NE) CLT120 NO
0x2778bc…277a50 Dummy {f00=0x00c8, f01=0x0190, f02=» 8 n P RF(E) CLT120 NO =4 9 P INH =4 9 $ P CM* DWTTP,A6 RESET TIMER =4 9 6 2 P CM DWTTP,A6 RESET ADDRESS POINTER TO TIMER =4 9 Z PCLT120 EQU * =4 9 P XIF 9 4 P LD A3,DWTADR,A6 ADDRESS TO ADDRESS-BLOCK IN A3 9 P ENB 9 * P ABI INTADR,A3 G
0x277a50…277be4 Dummy {f00=0x00c8, f01=0x0190, f02=»RUPT HANDLER:- 9 r P* : ( P* A1 = ERROR CODE (A1=0 NOERROR) : B P* (A1=1 NOT OPERABLE , HARDWARE TIME-OUT) : L P* A6 = DWT-ADDRESS : P* : P* A7 = ORDER : P* : P* A8 = ECB-ADDRESS : P EJECT : P* :
0x277be4…277d78 Dummy {f00=0x00c8, f01=0x018e, f02=» NUMBER : p P* ; P* ON ENTRY:- ; P* ; 0 P* A3 = LINE NUMBER * 2 ; : P* A4 = DEVICE NUMBER * 2 ; Z P* ; | P* ON EXIT:- ; P* ; 6 P* A6 = TOTAL NUMBER OF DEVICES*2 ON ACTUAL LINE ; < P* A8 = ADDRESS IN 'INTLTX' WHERE DWT-A
0x277d78…277f0c Dummy {f00=0x00c8, f01=0x0190, f02=» ; | P ADR A8,A3 POSITION IN TABLE < , P LDR* A8,A8 ADDRESS TO TERMINAL SECTION < , ( P RF(Z) GTL010 RETURN IF NOT DEFINED < P LDR* A6,A8 GET ID-WORD < , P ANK A6,/FF TWO TIMES NUMBER OF DEVICES < 4 P ADR A8,A4 ADDRESS TO DEVICE WORK TABLE POSITION
0x277f0c…2780a0 Dummy {f00=0x00c8, f01=0x0190, f02=»T L R T < P* = : P* SUBROUTINE TO SEND ONE CHARACTER VIA CHANNEL UNIT. = P* = X < P* CHARACTER GIVEN IN A2 IS SENT VIA CHLT IF CONTROL = b 8 P* UNIT IS FREE. IN OTHER CASE DWT IS QUEUED ON A = P* OUTPUT QUEUE THREAD. = P* =
0x2780a0…278234 (5, 253) Dummy {f00=0x00c9, f01=0x0190, f02=» * = P* > P IFF LOCHAN=1 > P* > * " P LDR* A1,A6 CHANNEL PARAMETER > 4 P ANK A1,/F CHANNEL INDEX > Z P SLL A1,1 > z P ADK A1,2 > * P LD A1,CHTAB,A1 GET CWT-ADDRESS IN A1 > P* > P XIF > P* > P* > P IFT LOCHAN=1 >
0x278234…2783c8 Dummy {f00=0x00c9, f01=0x018e, f02=» RF(E) OUL050 YES > P EJECT ? P* ? ( P* QUEUE OUTPUT ? 2 P* ? L & POUL005 LD A4,CWTEQ,A1 OUTPUT QUEUE ? V P RF(E) OUL020 ? POUL010 CWR A6,A4 ? . P RF(E) OUL060 THIS DWT IS ALREADY IN QUEUE ? P LD A3,DWTOTQ,A4 ? & P RF(E) OUL030 EN
0x2783c8…27855c Dummy {f00=0x00c9, f01=0x018e, f02=» $ POUL030 ST A6,DWTOTQ,A4 QUEUE DWT @ * POUL040 CM DWTOTQ,A6 SET END OF THREAD @ , P RF OUL060 @ Z P EJECT @ l P* @ z P* SEND CHARACTER @ P* @ , POUL050 LDR* A3,A6 GET CHANNEL PARAMETERS @ P ANKL A3,/7F00 @ P ANK A2,/FF @ P ORR
0x27855c…2786f0 Dummy {f00=0x00c9, f01=0x0190, f02=» @ n P IFT LOGING=1 A 0 P CF A15,LOGG ** LOGG OF OUTPUT CHARACTER ** A P XIF A R 4 P ST A2,CWTLOW,A1 STORE LAST OUTPUT IN CWT =6(=3) A ^ 8 POUL060 SC A2,DWTOCH,A6 STORE OUTPUT CHARACTER IN DWT A POUL070 EQU * A P IFT CPU852=1 A ( P ABL IHRET8
0x2786f0…278884 Dummy {f00=0x00c9, f01=0x0190, f02=» . P ADKL A15,2 ...ADJUST STACK POINTER... =9 B P LDR* P,A15 ...AND RETURN =9 B 6 P XIF B Z P* B f P EJECT B p P* B ~ P* C H L T O N B P* B > P* SUBROUTINE TO RESET CWT AND PERFORM CIO-START OF EVERY B @ P* CHLT IN SYSTEM. THE SUBR
0x278884…278a18 Dummy {f00=0x00c9, f01=0x018e, f02=»10 SUK A1,2 ALL TREATED ? B P RF(NZ) CON020 NO TAKE NEXT C " P ABL RTNA15 RETURN AND ENB C F * PCON020 LD A5,CHTAB,A1 LOAD CWT-ADDRESS C h P RB(Z) CON010 C $ P EX CWTCIS,A5 EXECUTE CIO-START C P LDR* A6,A5 GET LAST DWT C P RB(Z) CON010 C
0x278a18…278bac Dummy {f00=0x00c9, f01=0x0190, f02=» C P* D P* D P IFT LOCHAN=1 D P* D 2 P CIO A2,1,DWA1 CIO-START D < P LD A6,CWTLT1 GET LAST DWT D P RF(Z) CON010 D ~ P CM CWTLT1 RESET LAST OUTPUT D P LDK A2,0 D " P CF A15,OUTLIN SEND CHARACTER D $ PCON010 ABL RTNA15 RETURN
0x278bac…278d40 Dummy {f00=0x00c9, f01=0x0190, f02=»MBLY IS SET EVERY INPUT AND D x $ P* OUTPUT CHARACTER ARE LOGGED E $ P* E L P* E V P* E ` P IFT LOGING=1 E j P* E PLOGG STR A1,A15 E P LD A1,POINT E P ADK A1,2 E & P CWK A1,BUFE BUFE IS MAX LOGG AREA E P RF(NE) L1 E ( P LDK
0x278d40…278ed4 (5, 254) Dummy {f00=0x00c9, f01=0x40ca, f02=»L A15,2 E P LDR* P,A15 RETURN F P* F * P* F 4 PPOINT DATA BUF LOGG POINTER F > P* F b PBUF RES 63 LOGG AREA F l PBUFE EQU * F P* F P XIF F P* F P END F @ F
0x278ed4…279068 Dummy {f00=0x00c9, f01=0x2008, f02=» G PPOINT DATA BUF LOGG POINTER 9 P* 9 2 PBUF RES 63 LOGG AREA 9 < PBUFE EQU * 9 X P* 9 j P XIF 9 t P* 9 P END 9 @ 9 A1,BUFE BUFE IS MAX LOGG AREA 8 P RF(NE) L1 8 ( P LDKL A1,BUF SET FIRST LOGG ADDRESS 8 PL1 ST A1,P
0x279068…2791fc Dummy {f00=0x00c9, f01=0x0190, f02=»SECTORS IN IO / | P* 0 P EJECT DRDU01 0 P* 0 6 P* 0 @ P IFT RAW=1 0 J P LD A7,DWTOR,A6 GET ORDER 0 P ANK A7,/FF 0 ~ P SUK A7,/15 0 P* 0 P IFT VERSA3=1 0 & P RB(NZ) RW:700 NOT PHYSICAL WRITE 0 P XIF 0 P* 0 P I
0x2791fc…279390 Dummy {f00=0x00c9, f01=0x018e, f02=» 0 . P CM ECBEL,A8 PREPARE FOR READ AFTER WRITE 1 P LD A7,DWTSEI,A6 1 : P CF A5,DIV31 1 R P* 1 f P EJECT DRDU01 1 p P* 1 P* 1 PRW:900 EQU * 1 P CF A5,IOROUT 1 P DATA /E080 READ AFTER WRITE 1 P SUK A7,1 1 P RB(NZ) RW:900
0x279390…279524 Dummy {f00=0x00c9, f01=0x0190, f02=» 1 PRW:905 EQU * 2 P LDK A1,0 RESET RETURN CODE 2 P ABL END:20 2 @ P XIF 2 T P* 2 ` P EJECT DRDU01 2 j P* 2 4 P*********************************************** 2 4 P* * 2 4 P* IOROUT PER
0x279524…2796b8 Dummy {f00=0x00c9, f01=0x0190, f02=» * 2 j 4 P*********************************************** 3 P* 3 J & P* INPUT : ONE DATA WORD AFTER CF 3 T * P* BIT 0 :INDICATES DIRECT IO 3 ~ 0 P* BIT 1 :INDICATES READ AFTER WRITE 3 * P* BIT 2 :INDICATES FORMAT A2 3
0x2796b8…27984c Dummy {f00=0x00c9, f01=0x018e, f02=» WILL BE CHECKED BY A READ 3 r @ P* DWTBSE CONTAINS THE PRESENT SECTOR IN THE DRIVER BUFFER 4 " & P* DWTRTY INDICATES RETRIES DONE 4 f H P* DWTSWD SAVED WORD FROM USER BUFFER WHEN IO NOT VIA DRIVER BUFFER 4 P* 4 PIOROUT EQU * 4 * P LDR* A3,A6 GE
0x27984c…2799e0 Dummy {f00=0x00c9, f01=0x0190, f02=» 4 t P SLL A4,2 5 P RF(NN) SEE:05 FORMAT A3 5 P ADK A3,0 5 : P XIF 5 L P* 5 X P EJECT DRDU01 5 b P* 5 x P* 5 P IFT VERSA2=1 5 " P RF(NZ) SEE:05 NOT CYLINDER 0 5 P CF A5,SEEKZ 5 P SLL A1,6 5 P RF(N) SEE:20 ERROR 5
0x2799e0…279b74 (5, 255) Opaque[0x194]
0x279b74…279d08 # DirEnt {nam=»DRMS02«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1930, f03=0x0000}
0x279b74…279d08 IdxSect {
0x279b74…279d08 f00 = 0x00c9 // 0x279b74 @0x0
0x279b74…279d08 f01 = 0x000e // 0x279b76 @0x2
0x279b74…279d08 gno = [ // 0x279b78 @0x4
0x279b74…279d08 [0x00]: C0x00c9.0x2.0
0x279b74…279d08 [0x01]: C0x00c9.0x3.0
0x279b74…279d08 [0x02]: C0x00ca.0x0.0
0x279b74…279d08 [0x03]: C0x00ca.0x1.0
0x279b74…279d08 [0x04]: C0x00ca.0x2.0
0x279b74…279d08 [0x05]: C0x00ca.0x3.0
0x279b74…279d08 [0x06]: C0x00cb.0x0.0
0x279b74…279d08 ]
0x279b74…279d08 }
0x279d08…279e9c Dummy {f00=0x00c9, f01=0x0190, f02=» 2 P IDENT DRMS02 REL 10.0 80-03-14 870105041000 P : P* B 6 P************************************************* L P* $ P* PHILIPS TERMINAL SYSTEM PTS P* ( P* DRMS02 = DRIVER MAGNETIC STRIPE P* P* P*
0x279e9c…27a030 Dummy {f00=0x00c9, f01=0x0190, f02=»R HANDLES INPUT/OUTPUT ON THE D P* M A G N E T I C S T R I P E U N I T (M S U) PTS 6266. & > P* THE MSU MUST BE CONNECTED TO THE CPU VIA CHLT OR CHRT. n P* @ P* TRACK 2 AND 3 ON STRIPES CAN BE READ AND TRACK 3 CAN BE P* WRITTE
0x27a030…27a1c4 Dummy {f00=0x00c9, f01=0x0190, f02=»ON OF DRIVER ` P* 0 P* THE DRIVER CONSISTS OF FOLLOWING PARTS: P* R $ P* A C M S : ACTIVATION PART $ P* ORDER PROCESSOR & P* I H M S : INTERRUPT HANDLER & P* O N M S : RECOVERY ROUTINE P*
0x27a1c4…27a358 Dummy {f00=0x00c9, f01=0x0190, f02=»RD WRITE ~ $ P* /0A READ CARD RANDOM READ P* /21 OPEN - 8 * P* /26 END OF OPERATION DSC0 CC=4 R $ P* /37 INSERT CARD DSC0 CC=0 P* P* * P* THE FOLLOWING RETURN CODE IS USED: P* P* BIT 0 REQUEST
0x27a358…27a4ec Dummy {f00=0x00c9, f01=0x0190, f02=» NEGATIVE ACKNOWLEDGEMENT " P* 14 THROUGHPUT ERROR $ P* 15 NOT OPERABLE J P* l P* v P* NORMAL USE OF REGISTERS: P* " P* REGISTER A1 RETURN CODE . P* A2 INPUT/OUTPUT CHARACTER $ P*
0x27a4ec…27a680 Dummy {f00=0x00c9, f01=0x0190, f02=» A6 DWT ADDRESS P* A7 ORDER " P* A8 ECB ADDRESS : P* ` P EJECT DRMS02 j P* P*********** P* ENTRIES * P*********** P* P ENTRY MSAD ADDRESS BLOCK P* P**********
0x27a680…27a814 (5, 256) Dummy {f00=0x00c9, f01=0x0190, f02=»STACK h 6 P EXTRN STREG STORE REGISTERS AND GO TO DISPATCHER 8 P EXTRN LDREG LOAD REGISTER AND RETURN TO USER VIA A5 H . P EXTRN OUTPUT SUBROUTINE TO SEND CHARACTER 2 P EXTRN DISIOE DISPATCH END I/O, REQUEST ERROR 2 P EXTRN GETCHR GET NEXT CHARA
0x27a814…27a9a8 Dummy {f00=0x00c9, f01=0x0190, f02=»TS | $ P EXTRN DWTST DWT SOFTWARE STATUS P EXTRN DWTECB ECB-ADDRESS 2 P EXTRN DWTOR ORDER T P EXTRN DWTSB2 STACK BASE n P* P* ECB DISPLACEMENTS P EXTRN ECBBA BUFFER ADDRESS " P EXTRN ECBRL REQUESTED LENGTH " P EXTRN E
0x27a9a8…27ab3c Dummy {f00=0x00c9, f01=0x0190, f02=» P************************ P* CONDITIONAL ASSEMBLY * $ P************************ D P* d P* n . P* A PROGRAM VERSION USING TOSS MMU PAGING x * P* IS OBTAINED BY SETTING MMUPAG EQU 1. P* PMMUPAG EQU 0 P* P* 6
0x27ab3c…27acd0 Dummy {f00=0x00c9, f01=0x0190, f02=» P* P* P* MMU BUFFER SIZE (BYTES) P* < PX:A EQU 108 F PDVBLEN EQU X:A Z P* p P EJECT DRMS02 z P* P************* P* CONSTANTS * P************* P* $ P* MAGNETIC STRIPE CHARACTERS
0x27acd0…27ae64 Dummy {f00=0x00c9, f01=0x0190, f02=» P* " P* STATUS MESSAGES FROM MSU $ PDOCINS EQU /C DOCUMENT INSERTED 4 " PDOCESC EQU /E DOCUMENT ESCAPED PWRWARN EQU 8 WRITE WARNING PRDERR EQU 9 READ ERROR PWRERR EQU /A WRITE ERROR PWROK EQU /B WRITE OKAY P*
0x27ae64…27aff8 Dummy {f00=0x00c9, f01=0x0190, f02=» t 0 PREATRD EQU 8 READ TRACK 3 GERMAN BOOK (DIN) 2 PENCTRD EQU 9 ENCODE TRACK 3 GERMAN BOOK (DIN) < P* r P* ORDERS TO DRIVER | PINCARD EQU /37 INSERT CARD $ PENOFOP EQU /26 END OF OPERATION P* P* MISCELLANEOUS " P
0x27aff8…27b18c Dummy {f00=0x00c9, f01=0x0190, f02=»OR t & PWARNRW EQU /20 READ/WRITE WARNING " PCARMIS EQU /2000 CARD MISSING 4 " PINCLEN EQU 8 INCORRECT LENGTH Z * PNEGACK EQU 4 NEGATIVE ACKNOWLEDGEMENT " PTHRERR EQU 2 THROUGHPUT ERROR PNOTOPE EQU 1 NOT OPERABLE P* P EJECT
0x27b18c…27b320 Dummy {f00=0x00c9, f01=0x0190, f02=»TART OF DRIVER DEFINED PART P* $ P IFT MMUPAG=0 . PSTART EQU DWTDRD D P XIF P* h P IFT MMUPAG=1 r PSTART EQU DWTDRD+4 P XIF P* P* @ PDWTFRT EQU START+/14 BIT 0 CREDIT CARD / GERMAN BOOK FLAG P*
0x27b320…27b4b4 (5, 257) Dummy {f00=0x00ca, f01=0x0190, f02=»S02 P* P********** P* TABLES * ( P********** : P* L P DATA DVBLEN MMU BUFFER SIZE V P DATA 2 MMU DEVICE INDEX z PMSAD EQU * P DATA ACMS ACTIVATION DRIVER " P DATA 0 ABORT ROUTINE ADDRESS P DATA IHMS INTERRU
0x27b4b4…27b648 Dummy {f00=0x00ca, f01=0x018e, f02=»0 z & PTABL EQU *-TAB-1 NUMBER OF ENTRIES P* 4 ( PMSFUN EQU * MAGNETIC STRIPE FUNCTION > P DATA WRITE,READ,INSERT j P DATA ENDOP,OPEN P EJECT DRMS02 P* P* P* A C M S P* 2 P* ACTIVATION PART: CHECKS
0x27b648…27b7dc Dummy {f00=0x00ca, f01=0x0190, f02=» 0 PACMS10 CC A7,TAB,A4 FIND OUT IF LEGAL ORDER P RF(E) ACMS20 VALID ORDER 8 P SUK A4,1 Z P RB(NN) ACMS10 TRY NEXT l P* P* 4 PMSERR ABL DISIOE DISPATCH END I/O,REQUEST ERROR P* PACMS20 EQU * P ADR A4,A4 GET IND
0x27b7dc…27b970 Dummy {f00=0x00ca, f01=0x0190, f02=»********************** t P* P* OPEN /21 ( P* < 2 P* THE DRIVER IS SET TO HANDLE EITHER CREDIT F 6 P* CARDS/AMERICAN PASSBOOKS OR GERMAN PASSBOOKS. | P* P* REGISTER INPUT: P* A6 = DWT ADDRESS P* A8 = ECB AD
0x27b970…27bb04 Dummy {f00=0x00ca, f01=0x0190, f02=»E v 2 P RF(NZ) OPEN10 NOT CREDIT CARD / AMERICAN BOOK " P LDKL A2,/7FFF MASK FOR BIT 0 @ 4 P ANS A2,DWTFRT,A6 CLEAR FORMAT FLAG, INDICATING f $ P* CREDIT CARD / AMERICAN BOOK P RF OPEN20 EXIT P* POPEN10 EQU * * P SUK A2,1 FO
0x27bb04…27bc98 Dummy {f00=0x00ca, f01=0x0190, f02=»AT FLAG, v P* INDICATING GERMAN BOOK P* 2 POPEN20 EQU * < P LDK A1,0 RETURN CODE P P RF ENDIO EXIT n P* P EJECT DRMS02 P* 6 P************************************************** P* P* INSERT CARD /1
0x27bc98…27be2c Dummy {f00=0x00ca, f01=0x0190, f02=»SERTED t P LC A2,DWTST+1,A6 GET STATUS P ANK A2,/FF 2 P RF(NE) INSE10 F PINSE05 EQU * P LDK A2,RESET GENERAL RESET p P CF A5,OUTPUT SEND IT * P CF A5,STREG WAIT FOR MESSAGE FROM MSU , PINSE10 CWK A2,DOCESC DOCUMENT ESCAPED ?
0x27be2c…27bfc0 Dummy {f00=0x00ca, f01=0x018e, f02=»0 P RF ENDIO * PINSE15 LDK A1,THRERR THROUGHPUT ERROR P EJECT DRMS02 J P* b $ P* END OF INPUT/OUTPUT REQUEST l P* PENDIO EQU * P ABL DISEND P EJECT DRMS02 P* 6 P********************************
0x27bfc0…27c154 (5, 258) Dummy {f00=0x00ca, f01=0x0190, f02=» PREAD EQU * P LC A2,DWTST+1,A6 GET STATUS P ANK A2,/FF > & P SUK A2,DOCINS DOCUMENT INSERTED? R P RF(NE) WRIT02 NO | P* P* $ P LDK A4,RTRIES NUMBER OF RETRIES PREAD10 EQU * P LDK A3,0 RESET BUFFER INDEX
0x27c154…27c2e8 Dummy {f00=0x00ca, f01=0x0190, f02=»D / AMERICAN PASSBOOK | $ P LD A2,ECBCW,A8 GET TRACK NUMBER P SUK A2,2 F P RB(N) MSERR TRACK < 2 X P CWK A2,1 v P RB(G) MSERR TRACK > 3 * P ADK A2,SELTRA COMPUTE TRACK TO SELECT P* 6 P CF A5,OUTPUT SEND READ TRACK COMMAND (/06
0x27c2e8…27c47c Dummy {f00=0x00ca, f01=0x0190, f02=»R INCORRECT LENGTH. EXIT z P* P SUK A4,1 MORE RETRIES? * & P RB(NN) READ10 YES, PERFORM RETRY J P RB ENDIO NO, EXIT t P* P EJECT DRMS02 P* PREAD20 EQU * P* READ GERMAN PASSBOOK P LDK A2,REATRD 2 P C
0x27c47c…27c610 Dummy {f00=0x00ca, f01=0x0190, f02=» P RB(E) ENDIO YES, EXIT P* " * P SC A4,DWTFRT+1,A6 SAVE RETRY COUNTER , P LDR A4,A1 SAVE RETURN CODE Z $ P CF A5,REABLK READ SECOND BLOCK ~ $ P CWK A1,INCLEN BUFFER OVERFLOW? P RB(E) ENDIO YES, EXIT P* P CWR A1,A4 . P
0x27c610…27c7a4 Dummy {f00=0x00ca, f01=0x0190, f02=»READ/WRITE WARNING" t * P RF READ40 CHECK IF MORE RETRIES LEFT P* J PREAD30 EQU * T 4 P* BOTH BLOCKS WERE OK OR BOTH WERE ERRONEOUS h P LDR A1,A1 BOTH OK? P RB(Z) ENDIO YES, EXIT P* PREAD40 EQU * . P* CHECK IF MO
0x27c7a4…27c938 Dummy {f00=0x00ca, f01=0x0190, f02=» RB(NN) READ10 YES, PERFORM RETRY P RB ENDIO NO, EXIT * P* D P EJECT DRMS02 N P* f 6 P************************************************** p P* P* READ DATA BLOCK P* 4 P* ONE DATA BLOCK IS READ FROM THE MSU. READING
0x27c938…27cacc Dummy {f00=0x00ca, f01=0x0190, f02=» P* P* REGISTER INPUT: P* A3 = BYTE INDEX ( " P* A5 = LOCAL STACK POINTER D P* A6 = DWT ADDRESS j P* A8 = ECB ADDRESS " P* A15 = SYSTEM STACK POINTER P* P* REGISTER OUTPUT: P* A1 = RETURN CODE
0x27cacc…27cc60 Dummy {f00=0x00ca, f01=0x0190, f02=» P CF A5,STREG FETCH DATA P CWK A2,RDERR READ ERROR? $ P RF(E) RB100 YES, EXIT F P* d " P CWK A2,CRWETX END CHARACTER? n P RF(E) RB110 YES, EXIT ( P CW A3,ECBRL,A8 BUFFER ALREADY FULL? P RF(NL) RB120 YES, EXIT P* P
0x27cc60…27cdf4 (5, 259) Dummy {f00=0x00ca, f01=0x0190, f02=» CHAR | P* P* > P* BLOCK TREATED. SET RETURN CODE AND EFFECTIVE LENGTH. " P* d PRB100 EQU * n P LDK A1,NEGACK READ ERROR $ P LD A3,ECBEL,A8 RESET BYTE INDEX P RF RB140 EXIT P* PRB110 EQU * P LDK A1,
0x27cdf4…27cf88 Dummy {f00=0x00ca, f01=0x0190, f02=» , P ST A3,ECBEL,A8 EFFECTIVE LENGTH TO ECB P* 8 PRB140 EQU * B P RTN A5 V P* f P EJECT DRMS02 p P* 6 P************************************************** P* P* WRITE CARD /06 P* 6 P************
0x27cf88…27d11c Dummy {f00=0x00ca, f01=0x0190, f02=»T STATUS | P ANK A2,/FF & P SUK A2,DOCINS DOCUMENT INSERTED? $ P RF(E) WRIT05 YES N & PWRIT02 LDKL A1,CARMIS CARD MISSING h PENDIO2 RB ENDIO P* P* PWRIT05 EQU * ( P CM DWTLRC,A6 CLEAR LRC-ACKUMULATOR P* 8 P
0x27d11c…27d2b0 Dummy {f00=0x00ca, f01=0x0190, f02=»REQUESTED LENGTH & P LD A3,DWTFRT,A6 FORMAT CODE FLAG ! P RF(N) WRIT07 GERMAN BOOK ! B P* ! d P EJECT DRMS02 ! n P* ! ( P* CREDIT CARD / AMERICAN PASSBOOK ! P SUK A2,104 ! & P RB(P) ENDIO ERROR IF LENGTH > MAX ! : P LDK A2,CRWSTX
0x27d2b0…27d444 Dummy {f00=0x00ca, f01=0x018e, f02=»UK A2,45 ! & P RB(P) ENDIO ERROR IF LENGTH > MAX " * P LDK A2,CRDSTX START CHAR GERMAN BOOK " : P* " h PWRIT09 EQU * " r P LDK A3,0 RESET BUFFER INDEX " P* " PWRIT10 EQU * " , P XRS A2,DWTLRC,A6 UPDATE LRC-ACKUMULATOR " P CF A5,OUTPUT SE
0x27d444…27d5d8 Dummy {f00=0x00ca, f01=0x0190, f02=» " ~ P CF A15,CDCHK VALID CODE? # P LDR A1,A1 # * P RB(Z) WRIT10 YES # < P RB WRIT15 # V P* # h P EJECT DRMS02 # r P* # PWRIT20 EQU * # & P LDK A2,CRWETX CARD END CHARACTER # P XRS A2,DWTLRC,A6 UPDATE LRC # P CF A5,OUTPUT SEND
0x27d5d8…27d76c Dummy {f00=0x00ca, f01=0x0190, f02=» SEND WRITE TRACK COMMAND # * P LDK A2,ENCTRD ASSUME GERMAN PASSBOOK $ $ ( P LD A1,DWTFRT,A6 IS IT GERMAN BOOK? $ R P RF(N) WRIT30 YES, CONTINUE $ ~ 6 P LDK A2,ENCTRA NO, SET CREDIT CARD / AMERICAN BOOK $ P* $ PWRIT30 EQU * $ * P CF A5,OUTPUT
0x27d76c…27d900 Dummy {f00=0x00ca, f01=0x018e, f02=» P RB(E) ENDIO2 YES, EXIT % P* % $ P SUK A4,1 MORE RETRIES? % . & P RB(NN) WRIT05 YES, PERFORM RETRY % N P* % x , P LDK A1,NEGACK RETURN CODE NEGATIVE ACK % & P CWK A2,WRERR WAS IT WRITE ERROR? % P RB(E) ENDIO2 YES, EXIT % P* % 2 P L
0x27d900…27da94 (5, 260) Dummy {f00=0x00ca, f01=0x0190, f02=» : P LDK A1,THRERR ILLEGAL STATUS FROM MSU. THROUGHPUT ERR & P RB ENDIO2 & B P* & T P EJECT DRMS02 & ^ P* & v 6 P************************************************** & P* & P* END OF OPERATION /26 & P* & 6 P************************
0x27da94…27dc28 Dummy {f00=0x00ca, f01=0x0190, f02=» P ANK A2,/FF ' P RF(NE) END10 ' $ PEND05 LDK A2,RESET GENERAL RESET ' . P CF A5,OUTPUT SEND CHARACTER ' V * P CF A5,STREG WAIT FOR MESSAGE FROM MSU ' z , PEND10 CWK A2,DOCINS DOCUMENT INSERTED ? ' P RB(E) END05 YES ' " P CWR A2,A4 DOCUMENT ESCA
0x27dc28…27ddbc Dummy {f00=0x00ca, f01=0x0190, f02=»HRERR THROUGHPUT ERROR ' PENDIO3 RB ENDIO2 ( P EJECT DRMS02 ( 6 P* ( N P* I H M S ( X P* ( l P* INTERRUPT HANDLER ( v P* ( P* ( PIHMS EQU * ( P ANK A2,/FF ( $ P LD A3,DWTST,A6 GET STATUS WORD ( P RF(NN) IHM100 BUS
0x27ddbc…27df50 Dummy {f00=0x00ca, f01=0x0190, f02=» DOCUMENT ESCAPED ( P RF(NE) EXIT ) PIHMS10 EQU * ) . & P SC A2,DWTST+1,A6 SET STATUS WORD ) B $ PEXIT ABL TDISP GO TO DISPATCHER ) l P* ) P EJECT DRMS02 ) P* ) P* DEVICE BUSY ) P* ) PIHM100 EQU * ) * P LDR A1,A1 RETURN
0x27df50…27e0e4 Dummy {f00=0x00ca, f01=0x0190, f02=» SUK A7,INCARD INSERT CARD ) P RF(E) IHRET YES * " P ADK A7,INCARD * : & P SUK A7,ENOFOP END OF OPERATION ? * P P RF(E) IHRET * z P LDR A4,A2 * & P SUK A4,DOCESC DOCUMENT ESCAPED ? * P RF(E) IHM140 YES * < PIHRET ABL LDREG LOAD REG. AND RETURN
0x27e0e4…27e278 Dummy {f00=0x00ca, f01=0x0190, f02=»NG * v PENDIO4 RB ENDIO3 + P EJECT DRMS02 + " P* + : P* + D P* R C M S + N P* + b P* RECOVERY ROUTINE + l P* + P* + PRCMS EQU * + P* + P IFT CPU852=1 + * P CF A15,SAVE8 SAVE A1-A8 ON A15 STACK + P XIF + P
0x27e278…27e40c Dummy {f00=0x00ca, f01=0x0190, f02=» WORD + r P LD A7,DWTST,A6 BUSY? , P RB(N) EXIT NO , , $ P LDK A1,THRERR THROUGHPUT ERROR , B P RB ENDIO4 , j P EJECT DRMS02 , | P* , . P* STORE = SUBROUTINE TO STORE CHARACTER , : P* IN ECB-BUFFER AND INCREMENT BUFFER INDEX. ,
0x27e40c…27e5a0 Dummy {f00=0x00ca, f01=0x0190, f02=» P ADK A3,1 INCR. INDEX - P RTN A15 - " P* - 2 P EJECT - < P* - J * P* CDCHK = CHECK IF CODE CHECK ERROR - T P* - P* AT ENTRY: A2=CHARACTER - $ P* AT EXIT: A1=RERURN CODE 0,2 - P* - PCDCHK EQU * - P LDR A1,A2 - P S
0x27e5a0…27e734 (5, 261) Dummy {f00=0x00cb, f01=0x0190, f02=» IS A CONTROL CHARACTER - ~ " P LD A1,DWTFRT,A6 CREDIT CARD? . P RF(NN) CDC10 YES . F P* . ` P* GERMAN PASSBOOK . j P CWK A2,/3E FIELD SEPARATOR? . P RF(E) CDC30 YES, OK . P RF CDC20 NO, ERROR . P* . PCDC10 EQU * . ( P* CRE
0x27e734…27e8c8 Dummy {f00=0x00cb, f01=0x417e, f02=»1,3 FIELD SEPARATOR? . P RF(Z) CDC30 YES, OK / P* / 8 PCDC20 EQU * / B P* ILLEGAL CHARACTER / V . P LDK A1,THRERR RET CODE := THROUGHPUT ERR / t " P ORS A1,ECBRC,A8 INSERT IN ECB / P RF CDC40 EXIT / P* / PCDC30 EQU * / P* VAL
0x27e8c8…27ea5c Dummy {f00=0x00cb, f01=0x2008, f02=» 0 ER INDEX. l P* PSTORE EQU * $ " P LD A7,ECBBA,A8 BUFFER ADDRESS 8 P ADR A7,A3 ADD BUFFER INDEX ^ P SCR A2,A7 STORE CHAR P ADK A3,1 INCR. INDEX P RTN A15 P* P END @ A1,2 THROUGPUT ERROR P R
0x27ea5c…27ebf0 Dummy {f00=0x00cb, f01=0x0190, f02=»G h * P* IS OBTAINED BY SETTING MMUPAG EQU 1. P* 8 PMMUPAG EQU 0 B P* V 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* P EJECT D
0x27ebf0…27ed84 Dummy {f00=0x00cb, f01=0x0190, f02=» INCLUDED BY SETTING OPCLOS =1 n P* & PX:D EQU 0 0 POPCLOS EQU X:D B P* X P EJECT DRFD01 b P* z P* P* MMU BUFFER SIZE P* P* P IFT MMUPAG=0 PDVBLEN EQU 256 P XIF P* P IFT MMU
0x27ed84…27ef18 Dummy {f00=0x00cb, f01=0x0190, f02=» PDEVIND EQU 10 P* P EJECT DRFD01 $ P* < P************* F P* * P* CONSTANTS * r P* * P************* P* & PCUADR EQU 09 CONTROL UNIT ADDRESS & PMUXADR EQU CUADR+CUADR MUX-ADDRE
0x27ef18…27f0ac Dummy {f00=0x00cb, f01=0x018e, f02=»BM EQU 1923 MAX SECTOR NUMBER IBM DISC ( PBOE EQU 28 BEGIN OF EXTENT POSITION . & PEOE EQU 34 END OF EXTENT POSITION Z $ PEOD EQU 74 END OF DATA POSITION PTIME EQU 20 DELAY - POWER ON & POPENTI EQU 10 DELAY AT OPEN ORDERS P* $ PDIXT
0x27f0ac…27f240 Dummy {f00=0x00cb, f01=0x0190, f02=» P* * P* TABLES * P* * ( P********** : P* L P IFF CHAN+IBM=0 V ( P DATA DVBLEN+DVBLEN MMU BUFFER SIZE n P XIF P* P IFT CHAN=0 P IFT IBM=0 " P DATA 0 INDICATE NO MMU BUFFER P XIF P
0x27f240…27f3d4 (5, 262) Opaque[0x194]
0x27f3d4…27f568 # DirEnt {nam=»DRMT01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1968, f03=0x0000}
0x27f3d4…27f568 IdxSect {
0x27f3d4…27f568 f00 = 0x00cb // 0x27f3d4 @0x0
0x27f3d4…27f568 f01 = 0x0012 // 0x27f3d6 @0x2
0x27f3d4…27f568 gno = [ // 0x27f3d8 @0x4
0x27f3d4…27f568 [0x00]: C0x00cb.0x1.0
0x27f3d4…27f568 [0x01]: C0x00cb.0x2.0
0x27f3d4…27f568 [0x02]: C0x00cb.0x3.0
0x27f3d4…27f568 [0x03]: C0x00cc.0x0.0
0x27f3d4…27f568 [0x04]: C0x00cc.0x1.0
0x27f3d4…27f568 [0x05]: C0x00cc.0x2.0
0x27f3d4…27f568 [0x06]: C0x00cc.0x3.0
0x27f3d4…27f568 [0x07]: C0x00cd.0x0.0
0x27f3d4…27f568 [0x08]: C0x00cd.0x1.0
0x27f3d4…27f568 ]
0x27f3d4…27f568 }
0x27f568…27f6fc Dummy {f00=0x00cb, f01=0x018e, f02=» 2 P IDENT DRMT01 REL 10.0 80-03-14 870105041000 P : P* B P* L : P***************************************************** V P* $ P* PHILIPS TERMINAL SYSTEM PTS P* 4 P* DRMT01 = DRIVER 1/2 " MAGNETIC TAPE RECORDER P
0x27f6fc…27f890 Dummy {f00=0x00cb, f01=0x0190, f02=» P* < P* THIS DRIVER HANDLES FOUR 1/2 " MAGNETIC TAPE RECORDERS @ P* CONNECTED TO CPU VIA IOP AND CHMT ON MULTIPLEXED CHANNEL. R P* P* : P* ONLY ONE RECORDER CAN BE WORKING AT A TIME EXCEPT AT P* UNLOAD. P* P*
0x27f890…27fa24 Dummy {f00=0x00cb, f01=0x0190, f02=»* A BLOCK SEQUENCE NUMBER. P* " P EJECT DRMT01 , P* D 2 P* THE DRIVER CONSISTS OF THE FOLLOWING PARTS: N P* " P* M T D A ACTIVATION ROUTINE P* $ P* O R D E R P R O C E S S O R S P* $ P* C O M M A N D H A N D
0x27fa24…27fbb8 Dummy {f00=0x00cb, f01=0x0190, f02=»M T 0 1 DEVICE WORK TABLE P* " P* ORDERS TREATED: , P* F & P* /00 TEST STATUS /33 STEP REVERSE P P* /02 READ /34 STEP FORWARD z P* /05 WRITE /37 LOAD P* /06 WRITE /38 UNLOAD & P* /22 WRITE TAPE MARK /3F RECOVER P* /31
0x27fbb8…27fd4c Dummy {f00=0x00cb, f01=0x0190, f02=» BOT/EOT 10: & P* 3: TAPE MARK 11: SEQUENCE ERROR P* @ & P* 4: 12: INCORRECT LENGTH J P* 5: 13: DATA ERROR t . P* 6: WRITE PROTECTED 14: THROUGPUT ERROR P* 7: 15: NOT OPERABLE P* P EJECT DRMT01 P
0x27fd4c…27fee0 Dummy {f00=0x00cb, f01=0x0190, f02=» $ P ENTRY MTDRON POWER ON RECOVERY P , P 4 P < P* D P* EXTERNALS N P* b P EXTRN TDISP DISPATCHER l $ P EXTRN DISEND DISPATCER END I/O * P EXTRN DISIOE DISPATCHER I/O REQ ERROR $ P EXTRN SAVE8 SAVE A1-A8 AND INH
0x27fee0…280074 (5, 263) Dummy {f00=0x00cb, f01=0x0190, f02=»S t P EXTRN DWTTAB TTAB ADDRESS " P EXTRN DWTUEC USER ECB ADDRESS , P EXTRN TTB:MT MMU TABLE R $ P EXTRN ECBBA ECB BUFFER ADDRESS r & P EXTRN ECBRL ECB REQUESTED LENGTH & P EXTRN ECBEL ECB EFFECTIVE LENGTH " P EXTRN ECBCW ECB CONTROL W
0x280074…280208 Dummy {f00=0x00cb, f01=0x0190, f02=» j P EJECT DRMT01 P P* ( P* CONSTANTS 2 P* F P P 0 PMTRTRY EQU 3 MAX NO OF RETRIES AT READ/WRITE X 0 PMTRTOT EQU 90 REWIND TIME OUT IN 2 SEC STEPS 0 PMTPTOT EQU 10 POWER FAIL TIME OUT IN 100 MS 6 PMTRBLK EQU 40 NO OF
0x280208…28039c Dummy {f00=0x00cb, f01=0x0190, f02=»MT EQU /0C CHMT ADDRESS 8 PMTIOPL EQU CHMT+CHMT IOP CTRL WORD 1 : BLOCK LENGTH < PMTIOPA EQU CHMT+CHMT+1 IOP CTRL WORD 2 : BUFFER ADDRESS P* P EJECT P* P* . P***************************************** P* P* CO
0x28039c…280530 Dummy {f00=0x00cb, f01=0x0190, f02=»G h * P* IS OBTAINED BY SETTING MMUPAG EQU 1. P* 8 PMMUPAG EQU 0 B P* V 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* P* P
0x280530…2806c4 Dummy {f00=0x00cb, f01=0x0190, f02=»DEVIND EQU 4 P* P EJECT DRMT01 P 6 P* > 6 P* MTDA ACTIVATION PART. ENTERED AFTER LKM-REQUEST. H 2 P* THE VALIDITY OF THE ORDER IS CHECKED AND A . P* BRANCH TO THE ORDER PROCESSOR IS MADE. P* P* ENTRY: P*
0x2806c4…280858 Dummy {f00=0x00cb, f01=0x0190, f02=» v P* P* A1: STATUS AFTER SELECT & P* A2: ACT CHANNEL STATUS ADDRESS 4 P* A3: REQUESTED LENGTH ^ P* A4: BUFFER ADDRESS ~ P* A5: STACK POINTER P* A6: DWT ADDRESS P* A7: MAX NO OF RETRIES P* A8: ECB ADDRESS
0x280858…2809ec Dummy {f00=0x00cb, f01=0x0190, f02=»UND P SUK A4,1 P RB(NZ) MTDA10 TRY NEXT P > $ PMTDA20 ABL DISIOE ILLEGAL ORDER F P n PMTDA30 ADR A4,A4 v P ADKL A4,MTORD-2 , P ST A4,MTREQ SAVE ADDRESS TO ORDER PNTR P , PMTDA40 LC A2,DWTOR,A6 GET CHANNEL NUMBER
0x2809ec…280b80 Dummy {f00=0x00cb, f01=0x0190, f02=» STATUS l 0 P CWK A4,MTNOL DOES THIS ORDER REQUIRE LENGTH P RF(NL) MTDA60 NO D P ^ ( P LD A3,ECBRL,A8 GET REQUESTED LENGTH f $ P LD A4,2,A2 CHECK IF SEQ NUMBERS P RF(N) MTDA50 NO P ADK A3,2 YES ADJUST LENGTH & PMTDA50 LDR A4,A3 C
0x280b80…280d14 (5, 264) Dummy {f00=0x00cb, f01=0x0190, f02=»ARACTERS p P , PMTDA60 LD A4,ECBBA,A8 GET BUFFER ADDRESS P H , P CWR* A2,A6 CHECK IF CH ALREADY SELECTED P P RF(E) MTDA70 YES P CF A5,SELC SELECT CHANNEL ( PMTDA70 CM MTEOT CLEAR EOT INDICATOR ( P LDK A7,MTRTRY GET MAX NO OF RER
0x280d14…280ea8 Dummy {f00=0x00cb, f01=0x018e, f02=»ENTRY: P* & P* A2: ACT CHANNEL STATUS ADDRESS P* A3: REQUESTED LENGTH B P* A4: BUFFER ADDRESS b P* A5: STACK POINTER P* A6: DWT ADDRESS P* A7: MAX NO OF RETRIES P* A8: ECB ADDRESS P* P* EXIT: ABL D
0x280ea8…28103c Dummy {f00=0x00cb, f01=0x018e, f02=» Z P* ARE UPDATED. P* P* ( P* TEST STATUS /00 2 P* L P V , PTEST LC A7,DWTOR,A6 SELECT TO GET STATUS ^ P ANK A7,/7 P CF A5,SELC P ABL ENDIO8 P EJECT DRMT01 P P* P* READ /02 P*
0x28103c…2811d0 Dummy {f00=0x00cb, f01=0x0190, f02=» " P ABL(N) ENDIO4 NO MORE RETRIES P CF A5,SKPR SKIP REVERSE * P RB READ TRY AGAIN J P d ( PREAD10 LDR A5,A1 CHECK IF TAPE MARK l P SLC A5,3 P ABL(N) ENDIO0 TAPE MARK $ PREAD20 LD A5,2,A2 CHECK SEQ MODE " P ABL(N) ENDIO1 NO SEQ
0x2811d0…281364 Dummy {f00=0x00cb, f01=0x0190, f02=»UNTER z P CCR A3,A5 * P RF(NE) READ30 NOT CORRECT SEQ NUMBER P ECR A3,A3 N P SUK A5,1 ` P CCR A3,A5 r $ P RF(E) ENDIO1 BOTH SEQ CHARS OK P P XIF P* P EJECT DRMT01 P* P* P IFT MMUPAG=1
0x281364…2814f8 Dummy {f00=0x00cb, f01=0x0190, f02=»TTB:MT,A5 LOAD MMU REGISTERS FROM TTAB P RER A5,MTIOPL . P ANKL A5,/FFF D P LD A3,ECBRL,A8 Z $ P SUR A3,A5 GET EFFECTIVE LENGTH r * P LD A5,DWTUEC,A6 GET USER ECB ADDRESS & P EL A5,ECBBA,A5 GET BUFFER ADDRESS P ADR A5,A3 P LDR
0x2814f8…28168c Dummy {f00=0x00cb, f01=0x0190, f02=» * . P TL 2,A15 RESTORE MMU REGISTERS FROM STACK $ P ADKL A15,32 ADJUST STACKPOINTER < & P CWR* A5,A2 CHECK SEQUENCE NUMBER d P ABL(E) ENDIO1 JUMP IF EQUAL P XIF P* P EJECT DRMT01 P* P* PREAD30 EQU * $ P
0x28168c…281820 Dummy {f00=0x00cb, f01=0x0190, f02=»L A5,1,A5 P ANKL A5,/FF00 P ORR A5,A3 ( P ECR A5,A5 : P RB READ25 L P XIF ^ P* j P EJECT DRMT01 t P P P* P* WRITE /05,/06 P* P " PWRIT LD A1,2,A2 CHECK SEQ MODE P RF(N) WRIT10 NO S
0x281820…2819b4 (5, 265) Dummy {f00=0x00cc, f01=0x0190, f02=»A3 " P SC A1,-1,A8 STORE SEQ NUMBER P ECR A1,A1 0 P SC A1,-2,A8 B P XIF V P* b P IFT MMUPAG=1 l & P LD A7,DWTTAB,A6 GET TTAB ADDRESS $ P SUKL A15,32 ADJUST STACKPOINTER * P TS 2,A15 SAVE MMU REGISTERS ON STACK $ P TL TT
0x2819b4…281b48 Dummy {f00=0x00cc, f01=0x0190, f02=»A3 GET ADDRESS TO SEQUENCE NUMBER P SRC A4,1 * " P RF(N) WRIT20 ADDRESS UNEVEN? < P SLC A4,1 NO, OK b & P ES A1,-2,A4 STORE SEQUENCE NUMBER z P* . PWRIT05 LD A4,ECBBA,A8 RESET BUFFER ADDRESS . P TL 2,A15 RESTORE MMU REGISTERS FROM STA
0x281b48…281cdc Dummy {f00=0x00cc, f01=0x0190, f02=»0) ENDIO1 STATUS,DATA OK P RF(1) ENDIO2 ILL STATUS P CF A5,SKPR SKIP REVERSE @ P CF A5,ERA4 ERASE 4" ` P SUK A7,1 | " P RF(N) ENDIO4 NO MORE RETRIES P ANK A1,/20 SAVE EOT P ORS A1,MTEOT P RB WRIT10 TRY AGAIN P*
0x281cdc…281e70 Dummy {f00=0x00cc, f01=0x018e, f02=» ANK A7,/FF P SLL A1,8 P ORR A1,A7 & P ESR A1,A4 8 P EL A7,-3,A4 J P ANKL A7,/FF00 ^ P ANK A6,/FF t P ORR A7,A6 P ES A7,-3,A4 P RB WRIT05 P XIF P* P EJECT DRMT01 P* P* WRITE TAPE MAR
0x281e70…282004 Dummy {f00=0x00cc, f01=0x0190, f02=» P RF(NN) WRTM10 NOT TAPE MARK P IMR A2 INCR SEQ COUNTER ( P RF ENDIO4 H P Z " PWRTM10 CF A5,SKPR SKIP REVERSE b P CF A5,ERA4 ERASE 4" P SUK A7,1 " P RF(N) ENDIO4 NO MORE RETRIES P ANK A1,/20 SAVE EOT P ORS A1,MTEOT
0x282004…282198 Dummy {f00=0x00cc, f01=0x0190, f02=»2 SET SEQ MODE P CF A5,ONLI SET ON-LINE P EJECT DRMT01 6 P N P* V P* REWIND /31 ` P* v P P " PRWND CMR A2 CLEAR SEQ COUNTER $ P CF A5,SBOW SEARCH BOT AND WAIT P RF ENDIO6 P P P*
0x282198…28232c Dummy {f00=0x00cc, f01=0x0190, f02=»E v P CF A5,OFLI SET OFF-LINE P ANKL A1,/FFFE SKIP BIT 15 * P RF ENDIO7 L P ^ P f P* n P* STEP REVERSE /33 x P* P PSTPR CF A5,SKPR SKIP REVERSE " PSTPR10 RF(1) ENDIO6 ILL STATUS P LDKL A3,-1 P ADR
0x28232c…2824c0 Dummy {f00=0x00cc, f01=0x0190, f02=» P* STEP FORWARD /34 P* P * PSTPF CF A5,SKPF SKIP FORWARD 2 P RF(1) ENDIO6 ILL STATUS V " PSTPF10 IMR A2 INCR SEQ COUNTER v PSTPF20 RF ENDIO6 P P P P* P* RECOVER /3F P* P PRECV CF A5
0x2824c0…282654 (5, 266) Dummy {f00=0x00cc, f01=0x0190, f02=»DIO0 IMR A2 INCREMENT SEQUENCE COUNTER P RF ENDIO4 . P* @ " PENDIO1 IMR A2 INCR SEQ COUNTER J P p P IFT MMUPAG=0 x 0 PENDIO2 RER A3,MTIOPA GET NEXT BUFFER ADDRESS P XIF P* P IFT MMUPAG=1 PENDIO2 RER A4,MTIOPL
0x282654…2827e8 Dummy {f00=0x00cc, f01=0x0190, f02=»RS l P RF(N) *+4 NO P SUK A3,2 YES ADJUST LENGTH P XIF D * P ST A3,ECBEL,A8 STORE EFFECTIVE LENGTH P PENDIO4 LDK A4,MTRTRY ~ P SUR A4,A7 GET NO OF RETRIES P 0 PENDIO5 ST A4,ECBCW,A8 STORE IN CONTROL WORD PENDIO6 LDR A7,
0x2827e8…28297c Dummy {f00=0x00cc, f01=0x0190, f02=»2,A2 & P OR A1,MTEOT PUT IN EOT INDICATOR P ORS A1,2,A2 SAVE STATUS 6 . PENDIO8 CM MTREQ INDICATE NO RUNNING ORDER V P* P EJECT DRMT01 P* P* MODIFY RETURN CODE P* P ADK A1,0 SET CR P RF(Z) ENDIOC NO ERROR
0x28297c…282b10 Dummy {f00=0x00cc, f01=0x0190, f02=» P* ! PENDIO9 EQU * ! P LDKL A3,/420 ! " P TM A1,A3 ! 8 P RF(Z) ENDIOA ! J P ORR A1,A2 SET BIT 2 ! ` & P ANKL A1,/FBDF RESET BIT 5 AND 10 ! | P* ! PENDIOA EQU * ! P SRL A2,2 ! P TM A1,A2 ! P RF(Z) ENDIOB ! P XRR A1,A2
0x282b10…282ca4 Dummy {f00=0x00cc, f01=0x0190, f02=»2,2 ! P TM A1,A2 " & P RF(Z) ENDIOC NOT WRITE PROTECTED " P LD A7,DWTOR,A6 ORDER CODE " H P ANK A7,/FF " j P SUK A7,/05 " ~ P RF(N) ENDIOC NO WRITE ORDER " P SUK A7,/22-/05 " P RF(P) ENDIOC NO WRITE ORDER " P ORK A1,/40 SET BIT 9
0x282ca4…282e38 Dummy {f00=0x00cc, f01=0x0190, f02=»* " 2 P* THE THING WAS NOT OPERABLE, CHECK IF A POWER # P* FAIL IS COMING ALONG. # @ P* # ` P # j PCKPWF SLC A7,1 # r P ST A7,MTSA7 SAVE REGISTERS # P ST A2,MTSA2 # P LDR A1,A6 # P LDKL A4,MTTIM # & P CF A15,SETIMP WAIT FOR POWER FA
0x282e38…282fcc Dummy {f00=0x00cc, f01=0x0190, f02=»A2 # P CM MTTIM INDICATE NO TIMER $ P RB ENDIO8 $ . P EJECT DRMT01 $ @ P $ X P* $ ` * P* SBOW SEARCH BOT AND WAIT FOR REWIND $ j P* $ P* ENTRY: $ P* $ P* A6: DWT ADDRESS $ P* $ P* EXIT: $ P* $ P* A1: STATUS
0x282fcc…283160 Dummy {f00=0x00cc, f01=0x0190, f02=» * PSBOW LDKL A1,-MTRTOT-1 SET UP TIME OUT % P ST A1,MTCTR % 2 P % F PSBOW10 CF A5,SBOT SEARCH BOT % N P SLC A1,2 CHECK IF READY % r " P RF(N) SBOW30 STILL REWINDING % P % PSBOW20 SRC A1,2 % P RTN A5 RETURN % P % & PSBOW30 IM MTCTR CH
0x283160…2832f4 (5, 267) Dummy {f00=0x00cc, f01=0x0190, f02=» " P CF A15,SETIMP WAIT 2 SECONDS & P DATA SBOW40,20 & * P ABL TDISP & B P & T , PSBOW40 LDR A6,A1 ENTERED EACH 2 SECONDS & " P LD A2,MTSA2 RESTORE REGISTERS & P LD A5,MTSA5 & P LD A7,MTSA7 & P CM MTTIM INDICATE NO TIMER & $ P RB SBOW10
0x2832f4…283488 Dummy {f00=0x00cc, f01=0x0190, f02=» P* ' * P* A2: IF SELC: ACTIVE CHANNEL ADDRESS ' ( P* A3: IF RBLK,WBLK: REQUSTED LENGTH ' < ( P* A4: IF RBLK,WBLK: BUFFER ADDRESS ' h P* A6: DWT ADDRESSS ' $ P* A7: IF SELC: CHANNEL NO (0-7) ' P* ' P* EXIT: RTN A5 ' P* ' P* A1
0x283488…28361c Dummy {f00=0x00cc, f01=0x0190, f02=» DWT ADDRESS ' P* A7: RESTORED ( P* A8: ECB ADDRESS ( , P* ( F , P* CR: =0: NOT ILL STATUS, NOT ILL DATA ( P 6 P* =1: ILL STATUS: REWINDING,HARD ERR,NOT OP ( F P* =2: NOT ILL STATUS, ILL DATA: NO DATA,DATA ERR,THRUPUT ERR ( P* (
0x28361c…2837b0 Dummy {f00=0x00cc, f01=0x0190, f02=» 4 P ANKL A6,/3000 GET BITS 16-17 IN BUFFER ADDRESS ) P ORR A3,A6 ) < P XIF ) N P* ) Z PRBLK20 EQU * ) d ( P WER A3,MTIOPL GIVE REQUESTED LENGTH ) x , P WER A4,MTIOPA AND BUFFER ADDRESS TO IOP ) P RF COMM ) P ) PWBLK LDK A1,/00 WRITE BLOCK
0x2837b0…283944 Dummy {f00=0x00cc, f01=0x018e, f02=» PERA4 LDK A1,/0C ERASE 4" * P RF COMM * $ P * 4 PSBOT LDK A1,/41 SEARCH BOT * < P RF COMM * ^ P * n PONLI LDK A1,/51 SET ON-LINE * v P RF COMM * P * POFLI LDK A1,/40 SET OFF-LINE * P RF COMM * P * PSKPR LDK A1,/21 SKIP REVER
0x283944…283ad8 Dummy {f00=0x00cc, f01=0x018e, f02=» & P LDK A3,2 SET UP BUFFER FOR SEQ NO + P LDKL A4,MTBUF + . P RB RBLK20 + D P + V " PSELC LDK A1,/60 SELECT CHANNEL + ^ P ORR A1,A7 + " P STR A2,A6 SAVE ACTIVE CHANNEL + P + PCOMM LD A3,PFPOST + " P RF(NZ) COMM15 PFINIT PENDING + P CIO
0x283ad8…283c6c Dummy {f00=0x00cc, f01=0x0190, f02=» PCOMM05 LD A3,ECBRL,A8 , P LD A4,ECBBA,A8 , " P ADK A5,4 , : $ P LDKL A6,DWMT01 GET DWT ADDRESS , L P LDK A1,1 NOT OPERABLE , t P ABR* A5 , P , P , $ PCOMM10 CM MTINT IND INT ALLOWED , & PCOMM15 ST A2,MTSA2 SAVE REGISTERS , P ST
0x283c6c…283e00 Dummy {f00=0x00cc, f01=0x0190, f02=»ER CHMT , z P* - P - PIHMT EQU * - " $ P ST P,INTSAV SAVE LAST INTERRUPT - 4 P IFT CPU852=1 - & P CF A15,SAVE8 SAVE A1-A8 ON STACK - r P XIF - P* - P IFT CPU852=0 - " P MSR 8,A15 SAVE A1-A8 ON STACK - P XIF - P* - P SST
0x283e00…283f94 (5, 268) Dummy {f00=0x00cc, f01=0x0190, f02=»20 - * P LDK A1,5 ILLEGAL INTERRUPT PARAMETER . P CF A15,HALT . 8 P . L * PIHMT20 LDKL A6,DWMT01 GET DWT ADDRESS . T $ P LD A8,DWTECB,A6 GET ECB ADDRESS . & P LD A5,MTSA5 RESTORE STACK POINTER . P LDK A2,/00 . , P LDKL A3,/2847 CHECK IF ILL STAT
0x283f94…284128 Dummy {f00=0x00cc, f01=0x0190, f02=») IHMT30 ILL STATUS . P LDK A2,/80 ILL DATA / P / 8 PIHMT30 SLC A2,2 / @ P ST A2,2,A5 UPDATE CR / X " P LD A2,MTSA2 RESTORE REGISTERS / v P LD A3,ECBRL,A8 / $ P LD A4,2,A2 CHECK IF SEQ NUMBERS / P RF(N) *+4 NO / P ADK A3,2 YES ADJUST L
0x284128…2842bc Dummy {f00=0x00cc, f01=0x0190, f02=»WER ON RECOVERY / | P* 0 P 0 " PMTDRON EQU * 0 * P IFT CPU852=1 0 > & P CF A15,SAVE8 SAVE A1-A8 ON STACK 0 T P XIF 0 ~ P* 0 P IFT CPU852=0 0 " P MSR 8,A15 SAVE A1-A8 ON STACK 0 P XIF 0 P* 0 P LDKL A6,DWMT01 0 P CM DWTST,
0x2842bc…284450 Dummy {f00=0x00cc, f01=0x0190, f02=»T TIMER 0 P CM MTTIM INDICATE NO TIMER 1 P 1 4 , PMTON05 LD A4,MTPWF CHECK IF PWF TIMER ON 1 < P RF(NZ) MTON10 YES 1 l P LDKL A4,MTPWF 1 P CF A15,SETIMP NO START IT 1 P DATA MTON20,MTPTOT 1 P 1 . PMTON10 LDKL A3,-MTPTOT WAIT FOR EVERYT
0x284450…2845e4 Dummy {f00=0x00cc, f01=0x0190, f02=» LD A8,DWTECB,A6 LOAD ECB ADDRESS 1 " P LDKL A5,MTSTB LOAD STACK BASE 2 * 0 P LDKL A2,MTCHS GET ADDRESS TO CHANNEL STATUS 2 P P 2 PMTON30 LD A1,2,A2 GET STATUS 2 P SRC A1,1 2 P RF(N) MTON40 OFF-LINE 2 $ P CF A5,MTRC RECOVER THIS CHANNEL 2 P
0x2845e4…284778 Dummy {f00=0x00cc, f01=0x0190, f02=» IF ACTIVE REQUEST 2 ~ P ABL(Z) DISEND NO RETURN 3 & P ABL MTDA40 REPEAT ACTIVE REQUEST 3 : P EJECT DRMT01 3 d P 3 | P* 3 : P* MTRC RECOVERY ROUTINE. THE TAPE IS POSITIONED BEFORE 3 0 P* THE BLOCK GIVEN BY THE SEQUENCE COUNTER. 3 8 P* IF UN
0x284778…28490c Dummy {f00=0x00cc, f01=0x0190, f02=»DDRESS TO CHANNEL STATUS 3 P* A6: DWT ADDRESS 4 P* 4 : P* EXIT: 4 D P* 4 T P* A1: STATUS AFTER RECOVERY 4 ^ $ P* A2: ADDRESS TO CHANNEL STATUS 4 P* A6: DWT ADDRESS 4 P* 4 P 4 P 4 & PMTRC LDR A7,A2 CALC CHANNEL NUMBER 4 P
0x28490c…284aa0 Dummy {f00=0x00cc, f01=0x0190, f02=» 4 t P CF A5,ONLI 5 P LDR* A3,A2 GET SEQ COUNTER 5 & P ABL(Z) SBOW TAPE SHOULD BE AT BOT 5 @ 8 P LDK A7,MTRBLK REVERSE TAPE TO AVOID ANY OLD BLOCKS 5 j PMTRC05 CF A5,SKPR 5 P SUK A7,1 5 P RB(NZ) MTRC05 5 P 5 * PMTRC10 CF A5,RSQN READ S
0x284aa0…284c34 (5, 269) Dummy {f00=0x00cd, f01=0x0190, f02=») MTRC20 NOT BOT 5 P CM MTBUF CLEAR SEQ NUMBER 6 P 6 : > PMTRC20 ANK A1,/E4 CHECK IF REW, DATA ERR, THRU ERR, NOT OP 6 B & P RF(NZ) MTRC70 ILLEGAL CONDITIONS 6 P 6 & P LD A3,MTBUF OK NICE SEQ NO FOUND 6 P ECR A7,A3 PUT IT RIGHT 6 ( P SUR* A7
0x284c34…284dc8 Dummy {f00=0x00cd, f01=0x0190, f02=» PMTRC30 NGR A7,A7 TRY FORWARD 7 PMTRC40 SUK A7,1 7 ( P RF(N) MTRC60 7 @ P CF A5,SKPF 7 V P RB MTRC40 7 j P 7 | PMTRC50 SUK A7,1 TRY REVERSE 7 P RF(N) MTRC60 7 P CF A5,SKPR 7 P RB MTRC50 7 P 7 & PMTRC60 CF A5,RSQN READ SEQ N
0x284dc8…284f5c Dummy {f00=0x00cd, f01=0x0190, f02=»GET STATUS OF CHANNEL 7 P SLC A3,3 8 & P RF(N) MTRC90 SHOULD BE TAPE MARK 8 0 P 8 Z $ PMTRC70 ABL OFLI RECOVERY FAILED 8 b P 8 ( PMTRC80 LD A3,MTBUF CHECK SEQ NUMBER 8 P ECR A3,A3 8 P ADK A3,1 8 P CWR* A3,A2 8 P RB(NE) MTRC70 NOT
0x284f5c…2850f0 Dummy {f00=0x00cd, f01=0x0190, f02=» P 9 PMTTAB DATA /0205,/0600,/2231 9 P DATA /3334,/3738,/3F00 9 0 P 9 P PMTLEN EQU *-1-MTTAB 9 X P 9 t , PMTORD DATA READ,WRIT,WRIT,TEST,WRTM,RWND 9 | " P DATA STPR,STPF,LOAD,UNLD,RECV 9 PMTNOL EQU *-8-8 9 P EJECT DRMT01 9 P* 9
0x2850f0…285284 Dummy {f00=0x00cd, f01=0x0190, f02=»T BIT0=READY 9 P DATA 0 ECB ADDRESS : 0 P DATA 0 DWTOR BIT0-7=INDEX, BIT10-15=ORDER : 2 P DATA MTADR DWTADR : f P DATA 0 DWTTAB : P DATA 0 DWTWAT : P DATA 0 DWTTQ : IFT MMUPAG=1 : & " DATA 0 SAVE AREA USER ECB ADDRESS : DATA
0x285284…285418 Dummy {f00=0x00cd, f01=0x0190, f02=»DATA 0 : PMTSA7 DATA 0 ; P DATA 0,0,0 SUBROUTINE STACK ; " PMTSTB DATA 0 DWTSB2 ; F P* ; b P IFT MMUPAG=1 ; l PDEVECB EQU * ; P DATA 0,0,0,0,0,0 ; P XIF ; P* ; $ P DATA 0 INDICATES NO MMU BUFFER ; P DATA 4 DEVICE INDEX ;
0x285418…2855ac Dummy {f00=0x00cd, f01=0x0190, f02=»OWED ; n " PMTPWF DATA 0 PWF TIMER POINTER < PMTTIM DATA 0 TIMER POINTER < 2 & PMTBUF DATA 0 BUFFER FOR SEQ NUMBER < T PMTEOT DATA 0 EOT INDICATOR < ~ P* < P EJECT DRMT01 < P < P* < P* CHANNEL STATUS WORDS < P* < & P* FIRST WORD
0x2855ac…285740 Dummy {f00=0x00cd, f01=0x40ba, f02=» CH0: SEQ NO, STATUS < P DATA 0,1 CH1: " = P DATA 0,1 CH2: " = 8 P DATA 0,1 CH3: " = T P = p PMTCHSE EQU * = x P* = P* = P* = P END = @ = < P < P* < P* CHANNEL STATUS WORDS < P* < & P* FIRST WORD
0x285740…2858d4 (5, 270) Dummy {f00=0x00cd, f01=0x2008, f02=» > , STATUS . ~ P DATA 0,1 CH1: " / P DATA 0,1 CH2: " / 4 P DATA 0,1 CH3: " / P P DATA 0,1 CH4: " / l P DATA 0,1 CH5: " / P DATA 0,1 CH6: " / P DATA 0,1 CH7: " / P / PMTCHSE EQU * / P / P END /
0x2858d4…285a68 Dummy {f00=0x00cd, f01=0x0190, f02=»EN/CLOSE FLAG N ~ P ORS A2,DWTOCF,A6 SAVE O ( P XRRS A2,A4 SET STATUS WORD TO OPEN O 4 P LDR* A2,A4 O ` & P OTR A2,0,SOPDA SET DRIVE TO OPEN O t P* O PFDON23 EQU * O P XIF O P* O P EJECT O P* O P* LOCK DOORS O P* O
0x285a68…285bfc Dummy {f00=0x00cd, f01=0x018e, f02=»WTA3,A6 SAVE O P* P P EJECT P P* P , P* PUT DRIVE NO IN CIO INSTR P 6 P* P Z P SRN A2,A3 DRIVE NO IN A3 P d * P CF A5,SETCIO PUT DRVE NO IN CIO-INSTR P P LDK A2,/14 LOCK P P CF A5,FD:REA P P LD A2,DWTA3,A6 DRIVE IND. P P ANK
0x285bfc…285d90 Dummy {f00=0x00cd, f01=0x0190, f02=» P RB(NE) FDON25 Q P* Q P IFT OPCLOS=1 Q $ P* Q : D P* RESTORE OPEN/CLOSE STATUS TO SAME VALUE AS BEFORE POWER OFF Q D P* Q $ P LD A2,DWTOCF,A6 OPEN/CLOSE FLAG Q " P ORS A2,SPDLCI TO STATUS WORD Q P CM DWTOCF,A6 CLEAR FLAG Q $ P LD
0x285d90…285f24 Dummy {f00=0x00cd, f01=0x0190, f02=» ANY REQUEST Q P* R P CM DWTA2,A6 RESET FDON FLAG R PFDON60 EQU * R B P LD A8,DWTECB,A6 R V 0 P ABL(Z) END:IO NO REQUEST, RETURN VIA TENDIO R n P* R P* RETRY REQUEST R P* R P IM DWTRTY,A6 INDICATE RETRY R P LD A7,DWTORD,A6 R ,
0x285f24…2860b8 Dummy {f00=0x00cd, f01=0x0190, f02=»VATE R P* S P EJECT DRFD01 S P* S . P******************** S 8 P* * S T P* READY INTERRUPT * S p P* * S P******************** S P* S PFDRE EQU * S P LD A2,DWTA2,A6 S * P RB(NZ) F:DISP P
0x2860b8…28624c Dummy {f00=0x00cd, f01=0x0190, f02=» XIF S P* T P IFF TOSS+IBM=0 T P CM DWTST,A6 SET UNIT BUSY T . P RB FDONVL READ VOLUME NAMES T P P XIF T t P* T P EJECT DRFD01 T P* T P********************* T P* * T P* INTERRUPT HANDLER * T P*
0x28624c…2863e0 Dummy {f00=0x00cd, f01=0x0190, f02=»2=1 T * P CF A15,SAVE8 SAVE REGISTERS ON STACK U P XIF U : P* U F P IFT CPU852=0 U P " P MSR 8,A15 SAVE A1-A8 ON STACK U f P XIF U P* U P LDKL A6,DWFD01 DWT ADDRESS U P IFT CHAN=1 U P ENB U & P LD A1,DWTUB,A6 GET BUFFER POINTER
0x2863e0…286574 (5, 271) Opaque[0x194]
0x286574…286708 # DirEnt {nam=»DRRT01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x19b0, f03=0x0000}
0x286574…286708 IdxSect {
0x286574…286708 f00 = 0x00cd // 0x286574 @0x0
0x286574…286708 f01 = 0x002a // 0x286576 @0x2
0x286574…286708 gno = [ // 0x286578 @0x4
0x286574…286708 [0x00]: C0x00cd.0x2.0
0x286574…286708 [0x01]: C0x00cd.0x3.0
0x286574…286708 [0x02]: C0x00ce.0x0.0
0x286574…286708 [0x03]: C0x00ce.0x1.0
0x286574…286708 [0x04]: C0x00ce.0x2.0
0x286574…286708 [0x05]: C0x00ce.0x3.0
0x286574…286708 [0x06]: C0x00cf.0x0.0
0x286574…286708 [0x07]: C0x00cf.0x1.0
0x286574…286708 [0x08]: C0x00cf.0x2.0
0x286574…286708 [0x09]: C0x00cf.0x3.0
0x286574…286708 [0x0a]: C0x00d0.0x0.0
0x286574…286708 [0x0b]: C0x00d0.0x1.0
0x286574…286708 [0x0c]: C0x00d0.0x2.0
0x286574…286708 [0x0d]: C0x00d0.0x3.0
0x286574…286708 [0x0e]: C0x00d1.0x0.0
0x286574…286708 [0x0f]: C0x00d1.0x1.0
0x286574…286708 [0x10]: C0x00d1.0x2.0
0x286574…286708 [0x11]: C0x00d1.0x3.0
0x286574…286708 [0x12]: C0x00d2.0x0.0
0x286574…286708 [0x13]: C0x00d2.0x1.0
0x286574…286708 [0x14]: C0x00d2.0x2.0
0x286574…286708 ]
0x286574…286708 }
0x286708…28689c Dummy {f00=0x00cd, f01=0x0190, f02=» 2 P IDENT DRRT01 REL 10.0 80-04-15 870105041000 P : " P =12,PRINTER RECOVERY ERROR B P REL 10.0 80-03-14 h ( P =11,RMT TST MISS, RST OF INT ALL P DISPL. RECOV. ERROR P PRR 10.0 79-12-07 & P =10,RTN FROM OUTLRT IN INH
0x28689c…286a30 Dummy {f00=0x00cd, f01=0x0190, f02=»EMENT p P REL 9.1 79-05-23 P =7,CLT100 CORRECTED * P REL 9.1 79-04-06 H & P =1-6,GEN UPDATE TO 8.2+ STATUS d P REL 8.2 79-03-22 " P =6,C.U. PRESENT CHECK ERROR P REL 8.2 79-03-20 P =5,HANG UP PREVENT
0x286a30…286bc4 Dummy {f00=0x00cd, f01=0x018e, f02=»9-03-17 P =2,LOOP TEST ERROR P REL 8.2 79-03-16 . P =1,IMPROV. OF TEST ORDER J P REL 8.2 78-09-15 n P* 4 P************************************************ P* $ P* PHILIPS TERMINAL SYSTEM PTS P* . P
0x286bc4…286d58 Dummy {f00=0x00cd, f01=0x0190, f02=» 4 P************************************************ P* @ L P* THIS IS THE DRIVER TO CHANNEL UNITS FOR LOCAL AND REMOTE TERMINALS. J B P* AT INTERRUPT AN INPUT WORD IS READ TO REGISTER A2. IF DATA D P* INPUT OR DATA REQUEST A BRANCH IS MA
0x286d58…286eec Dummy {f00=0x00cd, f01=0x0190, f02=» ARE CARRIED OUT. P* P* $ < P* THE DRIVER ALSO INCLUDES THE FOLLOWING SUBROUTINES:- . P* n . P* - OUTLRT SEND ONE CHARACTER VIA CHLT x P* < P* - CHLTON EXECUTE CIO-START ON EVERY CHLT IN SYSTEM P* 2 P* CONTR
0x286eec…287080 Dummy {f00=0x00cd, f01=0x018e, f02=»EGISTER USAGE IN THE DRIVER:- P* & P* A1 = RETURN CODE 0 P* A2 = INPUT WORD L P* A3 = LINE NUMBER * 2 h P* A4 = DEVICE NUMBER * 2 P* A5 = CWT-ADDRESS P* A6 = DWT-ADDRESS P* A7 = ORDER P* A8 = ECB-ADD
0x287080…287214 (5, 272) Dummy {f00=0x00cd, f01=0x0190, f02=» P* P* 2 P ENTRY CHLT1 INTERRUPT FROM FIRST CHANNEL UNIT : P ENTRY CHLT2 INTERRUPT FROM SECOND CHANNEL UNIT LOCAL N 2 P ENTRY CHLT3 INTERRUPT FROM THIRD CHANEL LOCAL 4 P ENTRY CHLT4 INTERRUPT FROM FOURtH CHANEL LOCAL : P ENTRY CHRT1 I
0x287214…2873a8 Dummy {f00=0x00cd, f01=0x018e, f02=»M THIRD CHANEL REMOT v 4 P ENTRY CHRT4 INTERRUPT FROM FOURTH CHANEL REMOTE $ P ENTRY OUTLRT SEND ONE CHARACTER T P ENTRY CHLTON START OF CHLT | P ENTRY CHTAB CHANNEL TABLE P AND GO TO DISPATCHER P @ P ENTRY DWREMU DWT-DUMMY FOR LO
0x2873a8…28753c Dummy {f00=0x00cd, f01=0x0190, f02=» b & P ENTRY REMFC REMOTE TEST FILE CODE P EJECT 2 P* @ P* J * P************************************** T * P* EXTERNAL TOSS MODULE ENTRIES * * P************************************** P* P* & P EXTRN SAVE8 SAVE REGI
0x28753c…2876d0 Dummy {f00=0x00cd, f01=0x0190, f02=»E SET TIMER P EXTRN SETIMP SET TIME 6 P EXTRN INTLT1 INTERRUPT TABLE FOR LOCAL TERMINALS 2 , P EXTRN INTLT2 INTERRUPT TABLE FOR CHLT2 l & P EXTRN INTLT3 INTERRUPT FROM CHLT3 & P EXTRN INTLT4 INTERRUPT FROM CHLT4 6 P EXTRN INTRT1 INTERRUPT
0x2876d0…287864 Dummy {f00=0x00cd, f01=0x0190, f02=»3 ` 6 P EXTRN INTRT4 INTERRUPT TABLE FOR REMOTE CHANEL 4 $ P EXTRN DISIOE I/O REQUEST ERROR D & P EXTRN DISEND END I/O AND DISPATCH l * P EXTRN INTSAV SAVE AREA LAST INTERRUPT . P EXTRN OUTLIN SEND CHAR. VIA SWITCH MODULE . P EXTRN IHRET8 REST
0x287864…2879f8 Dummy {f00=0x00cd, f01=0x0190, f02=»*********************** P* P EXTRN DWTOR ORDER * ( P EXTRN DWTOCH LAST OUTPUT CHARACTER D P EXTRN DWTECB ECB-ADDRESS p * P EXTRN DWTADR ADDRESS TO ADDRESS-BLOCK P EXTRN DWTST STATUS P EXTRN DWTOTQ OUTPUT QUEUE & P EXTRN DWT
0x2879f8…287b8c Dummy {f00=0x00cd, f01=0x0190, f02=»VERY ADDRESS DISPLACEMENT ~ P* " P EJECT , P* : P* D P******************** N P* CONSTANTS * j P******************** P* P* ( PNOERR EQU 1 RETURN CODE NOT OPERABLE , PTIME EQU 5 TIME BEFORE TIME-OUT FOR SY
0x287b8c…287d20 Dummy {f00=0x00cd, f01=0x0190, f02=» ACK FOR PRINTERS v P EJECT P* ( , P*************************************** 2 , P* CONDITIONAL ASSEMBLY * b , P*************************************** P* P* < P* A LOGG FUNCTION OF EVERY INPUT AND OUTPUT CHAR
0x287d20…287eb4 (5, 273) Dummy {f00=0x00ce, f01=0x018e, f02=» > P* BY SETTING X:B TO 1,2,3 OR 4 THIS DRIVER HANDLES ONE & P* OR UP TO FOUR LOCAL CHANNELS. J P* t PX:B EQU 1 ~ PLOCHAN EQU X:B P* P* 8 P* ACKUMULATORS FOR NAK, RETRANSMISSION FAULT AND 4 P* UNDEFINED CON
0x287eb4…288048 Dummy {f00=0x00ce, f01=0x018e, f02=» P* PX:C EQU 1 PACKMUL EQU X:C P* 6 P* @ > P* BY SETTING X:D TO 1,2,3 OR 4 THIS DRIVER HANDLES ONE J , P* OR UP TO FOUR REMOTE CHANNEL CARDS. P* PX:D EQU 2 PRECHAN EQU X:D P* P* P*
0x288048…2881dc Dummy {f00=0x00ce, f01=0x0190, f02=» P* 6 P* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION . P* SET IS OBTAINED BY SETTING CPU852 EQU 0. L P* ~ PCPU852 EQU 1 P* P EJECT : P***************************************************** : P* C W T L T 1
0x2881dc…288370 Dummy {f00=0x00ce, f01=0x0190, f02=»FOR LOCAL CHANNEL NO. 1 x P* PDWA1 EQU /03 DEVICEADDRESS * P* L PCWTLT1 EQU * TABLE ENTRY V PCWTLDW EQU *-CWTLT1 v P DATA 0 LAST OUTPUT DWT PCWTLOW EQU *-CWTLT1 P DATA 0 LAST OUTPUT WORD PCWTITA EQU *-CWTLT1 ,
0x288370…288504 Dummy {f00=0x00ce, f01=0x0190, f02=» A2,0,DWA1 OTR PCWTCIS EQU *-CWTLT1 P CIO A2,1,DWA1 CIO-START 2 PCWTRTC EQU *-CWTLT1 R " P DATA 0 RETRANSMISSION COUNTER n PCWTEQ EQU *-CWTLT1 P DATA 0 QUEUE P DATA 0 QUEUE 2 PCWTADD EQU *-CWTLT1 P* P IFT A
0x288504…288698 Dummy {f00=0x00ce, f01=0x0190, f02=»R j PACKTIM EQU *-CWTLT1 ( P DATA 0 PRINTER TIMEOUT ACKUMULATOR & P* R P XIF P* h P EJECT r P* P* : P***************************************************** : P* C W T L T 2 *
0x288698…28882c Dummy {f00=0x00ce, f01=0x0190, f02=»* PCWTLT2 EQU * P* P IFT LOCHAN=2 ( P* > P* H P* R PDWA2 EQU /13 DEVICE ADDRESS P* P DATA 0 LAST OUTPUT DWT P DATA 0 LAST OUTPUT WORD P DATA INTLT2 INTERRUPT TABLE P INR A2,0,DWA2 INR P
0x28882c…2889c0 Dummy {f00=0x00ce, f01=0x0190, f02=»UE ~ P* P IFT ACKMUL=1 P* * P DATA 0 NAK-ACKUMULATOR 4 $ P DATA 0 RETR. FAULT-ACKUMULATOR T , P DATA 0 UNDEFINED- INTERRUPT-ACKUMULATOR | ( P DATA 0 PRINTER TIMEOUT ACKUMULATOR P* P XIF P* P IFT LOCHAN=3
0x2889c0…288b54 (5, 274) Dummy {f00=0x00ce, f01=0x0190, f02=»RD z P DATA INTLT2 INTERRUPT TABLE P INR A2,0,DWA2 INR . P OTR A2,0,DWA2 OTR H P CIO A2,1,DWA2 CIO-START b " P DATA 0 RETRANSMISSION COUNTER P DATA 0 QUEUE P DATA 0 SECOND QUEUE P* P IFT ACKMUL=1 P* P DAT
0x288b54…288ce8 Dummy {f00=0x00ce, f01=0x0190, f02=»OUT ACKUMULATOR | P* P XIF " P* . P IFT LOCHAN=4 8 P* N P* X P* b PDWA2 EQU /13 DEVICE ADDRESS l P* P DATA 0 LAST OUTPUT DWT P DATA 0 LAST OUTPUT WORD P DATA INTLT2 INTERRUPT TABLE P INR A2,0,
0x288ce8…288e7c Dummy {f00=0x00ce, f01=0x0190, f02=»ATA 0 SECOND QUEUE P* P IFT ACKMUL=1 $ P* : P DATA 0 NAK-ACKUMULATOR D $ P DATA 0 RETR. FAULT-ACKUMULATOR d , P DATA 0 UNDEFINED- INTERRUPT-ACKUMULATOR ( P DATA 0 PRINTER TIMEOUT ACKUMULATOR P* P XIF P* P
0x288e7c…289010 Dummy {f00=0x00ce, f01=0x0190, f02=» * h : P***************************************************** P* T 4 P* CONTROL WORK TABLE FOR LOCAL CHANNEL NO. 3 ^ P* PCWTLT3 EQU * P* P IFT LOCHAN=3 P* P* P* PDWA3 EQU /23 DEVICE AD
0x289010…2891a4 Dummy {f00=0x00ce, f01=0x0190, f02=»A3 INR P OTR A2,0,DWA3 OTR P CIO A2,1,DWA3 CIO-START ( " P DATA 0 RETRANSMISSION COUNTER H P DATA 0 QUEUE n P DATA 0 SECOND QUEUE P* P IFT ACKMUL=1 P* P DATA 0 NAK-ACKUMULATOR $ P DATA 0 RETR. FAULT-ACKUMULATO
0x2891a4…289338 Dummy {f00=0x00ce, f01=0x0190, f02=»FT LOCHAN=4 P* P* P* ( PDWA3 EQU /23 DEVICE ADDRESS 2 P* V P DATA 0 LAST OUTPUT DWT ` P DATA 0 LAST OUTPUT WORD P DATA INTLT3 INTERRUPT TABLE P INR A2,0,DWA3 INR P OTR A2,0,DWA3 OTR P CIO A2,1,DWA3 C
0x289338…2894cc Dummy {f00=0x00ce, f01=0x0190, f02=»* P DATA 0 NAK-ACKUMULATOR $ P DATA 0 RETR. FAULT-ACKUMULATOR * , P DATA 0 UNDEFINED- INTERRUPT-ACKUMULATOR R ( P DATA 0 PRINTER TIMEOUT ACKUMULATOR P* P XIF P* P EJECT P* P* : P************************
0x2894cc…289660 Dummy {f00=0x00ce, f01=0x0190, f02=»***************** l P* 4 P* CONTROL WORK TABLE FOR LOCAL CHANNEL NO. 4 $ P* PCWTLT4 EQU * f P* z P IFT LOCHAN=4 P* P* P* PDWA4 EQU /33 P* P DATA 0 LAST OUTPUT DWT P DATA 0 LAST OUTPU
0x289660…2897f4 (5, 275) Dummy {f00=0x00ce, f01=0x0190, f02=»ATA 0 RETRANSMISSION COUNTER P DATA 0 QUEUE $ P DATA 0 SECOND QUEUE : P* V 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
0x2897f4…289988 Dummy {f00=0x00ce, f01=0x0190, f02=» * z $ P******************************* 4 P* CONTROL WORK TABLE FOR REMOTE CHANNEL NO. 1 : P* CONNECTED TO FIRST CHRT r P* PDWA5 EQU /1 DEVICE ADDRESS PCWTRT1 EQU * P DATA 0 LAST OUTPUT DWT P DATA 0 LAST OUTPU
0x289988…289b1c Dummy {f00=0x00ce, f01=0x0190, f02=»ATA 0 RETRANSMISSION COUNTER P DATA 0 QUEUE TERMINAL 1 $ P DATA 0 QUEUE TERMINAL 2 D P* d P IFT ACKMUL=1 n P* P DATA 0 NAK-ACKUMULATOR $ P DATA 0 BLOCK ERROR ACKUMULATOR , P DATA 0 UNDEFINED-INTERRUPT-ACKUMULATOR ( P D
0x289b1c…289cb0 Dummy {f00=0x00ce, f01=0x0190, f02=» EQU *-CWTRT1 P DATA /7055 SYNC CHARACTER ! PLRCDWT EQU *-CWTRT1 ! 8 0 P DATA 0 DWT OF GOING LRC-PROCESS TERMINAL 1 ! T 0 P DATA 0 DWT OF GOING LRC-PROCESS TERMINAL 2 ! PLRCACK EQU *-CWTRT1 ! & P DATA 0 LRC-ACKUMULATOR TERMINAL 1 ! & P DATA
0x289cb0…289e44 Dummy {f00=0x00ce, f01=0x018e, f02=»K SENDING INDICATOR ! x ( P DATA 0 BIT 0: BLOCKSENDING RUNNING " $ P BIT 15: BLOCKSENDING ALLOWED " H P EJECT " p $ P******************************** " ~ $ P* C W T R T 2 * " $ P******************************** " : P* CHANNEL UNIT
0x289e44…289fd8 Dummy {f00=0x00ce, f01=0x0190, f02=» " v P DATA 0 LAST OUTPUT WORD # P # ( P DATA INTRT1 INTERRUPT TABLE # 0 P INR A2,0,DWA5 INR # T P OTR A2,1,DWA5 OTR # n P CIO A2,1,DWA5 CIO-START # " P DATA 0 RETRANSMISSION COUNTER # P DATA 0 QUEUE TERMINAL 1 # P DATA 0 QUEUE TERMINAL 2 #
0x289fd8…28a16c Dummy {f00=0x00ce, f01=0x0190, f02=»D-INTERRUPT-ACKUMULATOR # ( P DATA 0 PRINTER TIMEOUT ACKUMULATOR $ P* $ L P XIF $ V P* $ b P DATA 0 TIMER POINTER $ l P DATA /7255 SYNC-CHARACTER $ 0 P DATA 0 DWT OF GOING LRC-PROCESS TERMINAL 1 $ 0 P DATA 0 DWT OF GOING LRC-PROCESS TERMINA
0x28a16c…28a300 Dummy {f00=0x00ce, f01=0x0190, f02=» $ h $ P DATA 0 BLOCK SENDING INDICATOR % P EJECT % 0 $ P******************************** % > $ P* C W T R T 3 * % f $ P******************************** % P* % : P* CHANNEL UNIT WORK TABLE FOR REMOTE CHANNEL NO. 1 % " P* CONNE
0x28a300…28a494 (5, 276) Dummy {f00=0x00ce, f01=0x0190, f02=»* % P DATA 0 LAST OUTPUT DWT & P DATA 0 LAST OUTPUT WORD & * P DATA INTRT2 INTERRUPT TABLE & J P INR A2,0,DWA6 INR & n 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
0x28a494…28a628 Dummy {f00=0x00ce, f01=0x0190, f02=» DATA 0 UNDEFINED-INTERRUPT-ACKUMULATOR & ( P DATA 0 PRINTER TIMEOUT ACKUMULATOR ' 0 P* ' P XIF ' f P IFT RECHAN=3 ' r PDWA6 EQU /11 DEVICE ADDRESS ' P* ' P DATA 0 LAST OUTPUT DWT ' P DATA 0 LAST OUTPUT WORD ' P DATA INTRT2 INTER
0x28a628…28a7bc Dummy {f00=0x00ce, f01=0x0190, f02=» P DATA 0 QUEUE TERMINAL 1 ( P DATA 0 QUEUE TERMINAL 2 ( $ P* ( D P IFT ACKMUL=1 ( N P DATA 0 NAK-ACKUMULATOR ( d $ P DATA 0 BLOCK ERROR ACKUMULATOR ( , P DATA 0 UNDEFINED-INTERRUPT-ACKUMULATOR ( ( P DATA 0 PRINTER TIMEOUT ACKUMULATOR ( P
0x28a7bc…28a950 Dummy {f00=0x00ce, f01=0x0190, f02=»UTPUT WORD ( P DATA INTRT2 INTERRUPT TABLE ) P INR A2,0,DWA6 INR ) 6 P OTR A2,0,DWA6 OTR ) P P CIO A2,1,DWA6 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
0x28a950…28aae4 Dummy {f00=0x00ce, f01=0x0190, f02=»PRINTER TIMEOUT ACKUMULATOR ) P* * $ P XIF * . P IFT RECHAN=2 * : P DATA 0 TIMER POINTER * P P DATA /7055 SYNC-CHARACTER * n 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-ACKU
0x28aae4…28ac78 Dummy {f00=0x00ce, f01=0x018e, f02=»G INDICATOR * | P XIF + P IFT RECHAN=3 + P DATA 0 TIMER POINTER + 6 P DATA /7055 SYNC-CHARACTER + T 0 P DATA 0 DWT OF GOING LRC-PROCESS TERMINAL 1 + v 0 P DATA 0 DWT OF GOING LRC-PROCESS TERMINAL 2 + & P DATA 0 LRC-ACKUMULATOR TERMINAL 1 + & P
0x28ac78…28ae0c Dummy {f00=0x00ce, f01=0x0190, f02=» + P IFT RECHAN=4 , 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-PROCESS TERMINAL 2 , & P DATA 0 LRC-ACKUMULATOR TERMINAL 1 , & P DATA 0 LRC-ACKUMULATOR
0x28ae0c…28afa0 Dummy {f00=0x00ce, f01=0x0190, f02=»**************************** , $ P* C W T R T 4 * - $ $ P******************************** - L P* - t : P* CHANNEL UNIT WORK TABLE FOR REMOTE CHANNEL NO. 2 - ~ " P* CONNECTED TO SECOND CHRT - P* - PCWTRT4 EQU * - P* -
0x28afa0…28b134 (5, 277) Dummy {f00=0x00cf, f01=0x0190, f02=»A6 INR - P OTR A2,1,DWA6 OTR . P CIO A2,1,DWA6 CIO-START . ( " P DATA 0 RETRANSMISSION COUNTER . H P DATA 0 QUEUE TERMINAL 1 . n P DATA 0 QUEUE TERMINAL 2 . P* . P IFT ACKMUL=1 . P DATA 0 NAK-ACKUMULATOR . $ P DATA 0 BLOCK ERROR ACKUMU
0x28b134…28b2c8 Dummy {f00=0x00cf, f01=0x0190, f02=» P DATA 0 LAST OUTPUT DWT / P DATA 0 LAST OUTPUT WORD / $ P DATA INTRT2 INTERRUPT TABLE / D P INR A2,0,DWA6 INR / h P OTR A2,1,DWA6 OTR / P CIO A2,1,DWA6 CIO-START / " P DATA 0 RETRANSMISSION COUNTER / P DATA 0 QUEUE TERMINAL 1 / P DATA
0x28b2c8…28b45c Dummy {f00=0x00cf, f01=0x018e, f02=»0 UNDEFINED-INTERRUPT-ACKUMULATOR / ( P DATA 0 PRINTER TIMEOUT ACKUMULATOR 0 * P XIF 0 V P IFT RECHAN=4 0 b P DATA 0 LAST OUTPUT DWT 0 x P DATA 0 LAST OUTPUT WORD 0 P DATA INTRT2 INTERRUPT TABLE 0 P INR A2,0,DWA6 INR 0 P OTR A2,1,DWA6 OTR
0x28b45c…28b5f0 Dummy {f00=0x00cf, f01=0x0190, f02=» 0 v P* 1 P IFT ACKMUL=1 1 P DATA 0 NAK-ACKUMULATOR 1 ( $ P DATA 0 BLOCK ERROR ACKUMULATOR 1 H , P DATA 0 UNDEFINED-INTERRUPT-ACKUMULATOR 1 p ( P DATA 0 PRINTER TIMEOUT ACKUMULATOR 1 P XIF 1 P IFT RECHAN=2 1 P* 1 P DATA 0 TIMER PO
0x28b5f0…28b784 Dummy {f00=0x00cf, f01=0x0190, f02=»MINAL 2 1 l & P DATA 0 LRC-ACKUMULATOR TERMINAL 1 2 & P DATA 0 LRC-ACKUMULATOR TERMINAL 2 2 : , P DATA 0 CHANNEL STATUS WORD (LOOP-TESTS) 2 d $ P DATA 0 BLOCK SENDING INDICATOR 2 P* 2 P XIF 2 P* 2 P IFT RECHAN=3 2 P DATA 0 TIMER POINTER
0x28b784…28b918 Dummy {f00=0x00cf, f01=0x0190, f02=»2 2 f & P DATA 0 LRC-ACKUMULATOR TERMINAL 1 3 & P DATA 0 LRC-ACKUMULATOR TERMINAL 2 3 4 , P DATA 0 CHANNEL STATUS WORD (LOOP-TESTS) 3 ^ $ P DATA 0 BLOCK SENDING INDICATOR 3 P* 3 P XIF 3 P* 3 P IFT RECHAN=4 3 P DATA 0 TIMER POINTER 3
0x28b918…28baac Dummy {f00=0x00cf, f01=0x0190, f02=» & P DATA 0 LRC-ACKUMULATOR TERMINAL 1 4 & P DATA 0 LRC-ACKUMULATOR TERMINAL 2 4 . , P DATA 0 CHANNEL STATUS WORD (LOOP-TESTS) 4 X $ P DATA 0 BLOCK SENDING INDICATOR 4 P* 4 P XIF 4 P* 4 P EJECT 4 $ P******************************** 4 $ P*
0x28baac…28bc40 Dummy {f00=0x00cf, f01=0x0190, f02=»NO. 1 4 ` P* CONNECTED TO THIRD CHRT 5 P 5 2 P* 5 : PCWTRT5 EQU * 5 D P* 5 X P IFT RECHAN=3 5 b P* 5 x PDWA7 EQU /21 DEVICE ADDRESS 5 P* 5 P DATA 0 LAST OUTPUT DWT 5 P DATA 0 LAST OUTPUT WORD 5 P DATA INTRT3 INTERRUPT T
0x28bc40…28bdd4 (5, 278) Dummy {f00=0x00cf, f01=0x0190, f02=»ATA 0 QUEUE TERMINAL 1 5 P DATA 0 QUEUE TERMINAL 2 6 P* 6 > P IFT ACKMUL=1 6 H P DATA 0 NAK-ACKUMULATOR 6 ^ $ P DATA 0 BLOCK ERROR ACKUMULATOR 6 ~ , P DATA 0 UNDEFINED-INTERRUPT-ACKUMULATOR 6 ( P DATA 0 PRINTER TIMEOUT ACKUMULATOR 6 P* 6
0x28bdd4…28bf68 Dummy {f00=0x00cf, f01=0x0190, f02=»ST OUTPUT WORD 6 P DATA INTRT3 INTERRUPT TABLE 7 P INR A2,0,DWA7 INR 7 : P OTR A2,0,DWA7 OTR 7 T P CIO A2,1,DWA7 CIO-START 7 n " P DATA 0 RETRANSMISSION COUNTER 7 P DATA 0 QUEUE TERMINAL 1 7 P DATA 0 QUEUE TERMINAL 2 7 P* 7 P IFT ACKMU
0x28bf68…28c0fc Dummy {f00=0x00cf, f01=0x0190, f02=»A 0 PRINTER TIMEOUT ACKUMULATOR 7 P* 8 ( P XIF 8 2 P IFT RECHAN=3 8 > P DATA 0 TIMER POINTER 8 T P DATA /7055 SYNC-CHARACTER 8 r 0 P DATA 0 DWT OF GOING LRC-PROCESS TERMINAL 1 8 0 P DATA 0 DWT OF GOING LRC-PROCESS TERMINAL 2 8 & P DATA 0 LRC-
0x28c0fc…28c290 Dummy {f00=0x00cf, f01=0x0190, f02=»NDING INDICATOR 8 P XIF 9 P IFT RECHAN=4 9 $ P DATA 0 TIMER POINTER 9 : P DATA /7055 SYNC-CHARACTER 9 X 0 P DATA 0 DWT OF GOING LRC-PROCESS TERMINAL 1 9 z 0 P DATA 0 DWT OF GOING LRC-PROCESS TERMINAL 2 9 & P DATA 0 LRC-ACKUMULATOR TERMINAL 1 9
0x28c290…28c424 Dummy {f00=0x00cf, f01=0x0190, f02=»IF 9 P EJECT : $ P******************************** : $ P* C W T R T 6 * : @ $ P******************************** : h P* : : P* CHANNEL UNIT WORK TABLE FOR REMOTE CHANNEL NO. 2 : P* CONNECTED TO THIRD CHRT : P* : PCW
0x28c424…28c5b8 Dummy {f00=0x00cf, f01=0x0190, f02=» TABLE : z P INR A2,0,DWA7 INR ; P OTR A2,1,DWA7 OTR ; ( P CIO A2,1,DWA7 CIO-START ; B " P DATA 0 RETRANSMISSION COUNTER ; b P DATA 0 QUEUE TERMINAL 1 ; P DATA 0 QUEUE TERMINAL 2 ; P* ; P IFT ACKMUL=1 ; P DATA 0 NAK-ACKUMULATOR ; $ P
0x28c5b8…28c74c Dummy {f00=0x00cf, f01=0x0190, f02=» ; P IFT RECHAN=4 < P DATA 0 LAST OUTPUT DWT < P DATA 0 LAST OUTPUT WORD < > 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 RETRANSMISSION COUNTER < P DATA 0 QUEU
0x28c74c…28c8e0 Dummy {f00=0x00cf, f01=0x0190, f02=»ACKUMULATOR < | , P DATA 0 UNDEFINED-INTERRUPT-ACKUMULATOR = ( P DATA 0 PRINTER TIMEOUT ACKUMULATOR = D P XIF = p P* = | P IFT RECHAN=3 = P DATA 0 TIMER POINTER = P DATA /7255 SYNC-CHARACTER = 0 P DATA 0 DWT OF GOING LRC-PROCESS TERMINAL 1
0x28c8e0…28ca74 (5, 279) Dummy {f00=0x00cf, f01=0x0190, f02=» = n , P DATA 0 CHANNEL STATUS WORD (LOOP-TESTS) > $ P DATA 0 BLOCK SENDING INDICATOR > 8 P* > ` P XIF > j P* > v P IFT RECHAN=4 > P* > P DATA 0 TIMER POINTER > P DATA /7255 SYNC-CHARACTER > 0 P DATA 0 DWT OF GOING LRC-PROCESS TERMINA
0x28ca74…28cc08 Dummy {f00=0x00cf, f01=0x018e, f02=»AL 2 > r , P DATA 0 CHANNEL STATUS WORD (LOOP-TESTS) ? $ P DATA 0 BLOCK SENDING INDICATOR ? < P* ? d P XIF ? n P* ? z P EJECT ? $ P******************************** ? $ P* C W T R T 7 * ? $ P******************************** ?
0x28cc08…28cd9c Dummy {f00=0x00cf, f01=0x0190, f02=» ? P* @ P IFT RECHAN=4 @ P* @ ( PDWA8 EQU /31 DEVICE ADDRESS @ 2 P* @ V P DATA 0 LAST OUTPUT DWT @ ` P DATA 0 LAST OUTPUT WORD @ P DATA INTRT4 INTERRUPT TABLE @ P INR A2,0,DWA8 INR @ P OTR A2,0,DWA8 OTR @ P CIO A2,1,DWA8 C
0x28cd9c…28cf30 Dummy {f00=0x00cf, f01=0x0190, f02=»MUL=1 @ P DATA 0 NAK-ACKUMULATOR A $ P DATA 0 BLOCK ERROR ACKUMULATOR A . , P DATA 0 UNDEFINED-INTERRUPT-ACKUMULATOR A V ( P DATA 0 PRINTER TIMEOUT ACKUMULATOR A P* A P XIF A P IFT RECHAN=4 A P DATA 0 TIMER POINTER A P DATA /7055
0x28cf30…28d0c4 Dummy {f00=0x00cf, f01=0x0190, f02=»C-ACKUMULATOR TERMINAL 1 A & P DATA 0 LRC-ACKUMULATOR TERMINAL 2 B , P DATA 0 CHANNEL STATUS WORD (LOOP-TESTS) B J $ P DATA 0 BLOCK SENDING INDICATOR B z P XIF B P EJECT B $ P******************************** B $ P* C W T R T 8 * B
0x28d0c4…28d258 Dummy {f00=0x00cf, f01=0x0190, f02=»URTH CHRT B | P* C PCWTRT8 EQU * C P* C 0 P IFT RECHAN=4 C : P DATA 0 LAST OUTPUT DWT C P P DATA 0 LAST OUTPUT WORD C p P DATA INTRT4 INTERRUPT TABLE C P INR A2,0,DWA8 INR C P OTR A2,1,DWA8 OTR C P CIO A2,1,DWA8 CIO-START C " P
0x28d258…28d3ec Dummy {f00=0x00cf, f01=0x0190, f02=»ATA 0 NAK-ACKUMULATOR C $ P DATA 0 BLOCK ERROR ACKUMULATOR D , P DATA 0 UNDEFINED-INTERRUPT-ACKUMULATOR D F ( P DATA 0 PRINTER TIMEOUT ACKUMULATOR D v P XIF D P IFT RECHAN=4 D P* D P DATA 0 TIMER POINTER D P DATA /7255 SYNC-CHARACTER D
0x28d3ec…28d580 Dummy {f00=0x00cf, f01=0x0190, f02=»RMINAL 1 D v & P DATA 0 LRC-ACKUMULATOR TERMINAL 2 E , P DATA 0 CHANNEL STATUS WORD (LOOP-TESTS) E : $ P DATA 0 BLOCK SENDING INDICATOR E j P* E P XIF E P* E P EJECT E 6 P************************************************* E 6 P* C H T A B
0x28d580…28d714 (5, 280) Dummy {f00=0x00cf, f01=0x0190, f02=»RESSES OF CONTROLLER WORK E x 8 P* TABLES CWT TO CHANNEL UNITS FOR LOCAL OR REMOTE F " P* TERMINALS. F ^ P* F t P* F ~ P* F PCHTAB EQU * F P DATA CHTABE-* TABLE LENGTH F P IFT LOCHAN=1 F P DATA CWTLT1 F P DATA 0 F P D
0x28d714…28d8a8 Dummy {f00=0x00cf, f01=0x0190, f02=»0 F P XIF G P* G P IFT LOCHAN=3 G P DATA CWTLT1 G 6 P DATA CWTLT2 G J P DATA CWTLT3 G ^ P DATA 0 G r P XIF G P IFT LOCHAN=4 G P DATA CWTLT1 G P DATA CWTLT2 G P DATA CWTLT3 G P DATA CWTLT4 G P XIF G P* G
0x28d8a8…28da3c Dummy {f00=0x00cf, f01=0x0190, f02=»ATA CWTRT6 G P* H P XIF H P* H ( P IFT RECHAN=2 H 2 P DATA CWTRT3 H H P DATA CWTRT4 H P XIF H p P* H | P IFT RECHAN=4 H P DATA CWTRT3 H P DATA CWTRT4 H P DATA CWTRT5 H P DATA CWTRT6 H P DATA CWTRT7 H P DATA CW
0x28da3c…28dbd0 Dummy {f00=0x00cf, f01=0x0190, f02=»************ H x ( P* D W R E M U * I ( P************************************ I @ P* I l . P* DUMMY TABLE USED WHEN LOOP-TESTING OF I v $ P* REMOTE CHANNELS ARE NEEDED. I P* I PDWREMU EQU * I P DATA 0 I P DATA /800
0x28dbd0…28dd64 Dummy {f00=0x00cf, f01=0x0190, f02=» L O O P - T E S T S E C T I O N I P* J * P* J 4 2 P* ORDER /00: TEST REMOTE CHANNEL CONNECTION J > P* J t : P* CHANNEL TO TEST IS GIVEN IN CONTROL WORD OF ECB. J ~ 6 P* THE REQUEST IS COMPLETED WITH FOLLOWING BITS J P* IN RETURN COD
0x28dd64…28def8 Dummy {f00=0x00cf, f01=0x0190, f02=»R OUTPUT J n P* K 0 P* BIT 15: SYNC NOT RECEIVED AFTER OUTPUT K PAREM DATA LOPTST K N " P DATA 0 ABORT ROUTINE ADDRESS K f " P DATA IHLOP INTERRUPT HANDLER K PLOPTST EQU * K $ P LD A2,10,A8 GET CHANNEL NUMBER K P ANK A2,/FF K P RF(E)
0x28def8…28e08c Dummy {f00=0x00cf, f01=0x018e, f02=» K n P RF(E) DISIIE L P LDR A7,A7 WRONG ORDER ? L P RF(E) LOPT10 NO L > ( PDISIIE ABL DISIOE I/O REQUEST ERROR L V PLOPT10 EQU * L , P LD A1,CWTRST,A2 GET CHANNEL LOOP STATUS L P ANK A1,/40 L ( P RF(NE) IHLP10 CHANNEL UNIT NOT BUSY L & P L
0x28e08c…28e220 Dummy {f00=0x00cf, f01=0x0190, f02=» P* END OF LOOP-TEST M P* M " PIHLOP EQU * M , P LDR A5,A1 GET CWT-ADDRESS M @ , P LD A1,CWTRST,A5 GET CHANNEL LOOP STATUS M b P ANK A1,3 M P XRK A1,3 M PIHLP10 EQU * M P LDK A2,0 M : P SC A2,CWTRST+1,A5 RESET RIGHT BYTE IN CHANN
0x28e220…28e3b4 (5, 281) Dummy {f00=0x00d0, f01=0x0190, f02=» R T 2 M | P* N 8 P* THIS IS THE INTERRUPT HANDLER FOR CHLT AND CHRT N P* N T 2 P* WHEN INTERRUPT FROM A CHANNEL UNIT OCCURS N ^ 2 P* DRIVER FIRST RELATES INTERRUPT TO A CWT. N 0 P* THEN DRIVER GETS THE INTERRUPT MESSAGE, N 2 P* LOGGS
0x28e3b4…28e548 Dummy {f00=0x00d0, f01=0x0190, f02=»OLLOWING TYPES OF INTERRUPT ARE RELEVANT N P* O 0 . P* D = DEVICE ADDRESS C = CHARACTER O : P* O l 8 P* ACK OUTPUT ACKNOWLEDGED D = 0 C = 7 O v 8 P* NAK OUTPUT ERROR D = 0 C = 5 O 8 P* OER TIME OUT
0x28e548…28e6dc Dummy {f00=0x00d0, f01=0x0190, f02=»GN BIT SET O f 8 P* ABC+ BLOCK TR. ACKNOWLEDGED D = 0 C = 8 P 8 P* ABC-L LRC ERROR IN BLOCK D = 0 C = A P N 8 P* ABC-V VRC ERROR IN BLOCK D = 0 C = C P 8 P* ABC-LV LRC O VRC ERROR IN BLOCK D = 0 C = E P 8 P* D
0x28e6dc…28e870 Dummy {f00=0x00d0, f01=0x0190, f02=» STATUS MESSAGE D # 0 C # 0 P 2 P* DIN DATA INPUT D # 0 Q 4 P EJECT Q j P* Q x P* C H L T 1 Q P* Q P* INTERRUPT FROM CHLT1 Q P* Q PCHLT1 EQU * Q P* Q $ P ST P,INTSAV SAVE LAST INTER
0x28e870…28ea04 Dummy {f00=0x00d0, f01=0x0190, f02=»,A15 SAVE A1-A8 ON STACK Q P XIF R P* R , P LDK A7,2 INDICATE CHLT1 R 6 P RF CLT010 R V P* R h PCHLT2 EQU * R r P* R P* R P* R P* R P* C H L T 2 R P* R P* INTERRUPT FROM CHLT2 R P* R P IFT LOCHAN=2
0x28ea04…28eb98 Dummy {f00=0x00d0, f01=0x0190, f02=» R P IFT LOCHAN=2 S P IFT CPU852=0 S " P MSR 8,A15 SAVE A1-A8 ON STACK S 4 P XIF S Z P* S f P IFT LOCHAN=2 S p P LDK A7,4 INDICATE CHLT2 S P RF CLT010 S P* S P XIF S P* S P IFT LOCHAN=3 S $ P ST P,INTSAV SAVE LAST INT
0x28eb98…28ed2c Dummy {f00=0x00d0, f01=0x0190, f02=» CPU852=0 S " P MSR 8,A15 SAVE A1-A8 ON STACK T P XIF T 8 P* T D P IFT LOCHAN=3 T N P LDK A7,4 INDICATE CHLT2 T d P RF CLT010 T P* T P XIF T P* T P IFT LOCHAN=4 T $ P ST P,INTSAV SAVE LAST INTERRUPT T P* T P IFT CPU85
0x28ed2c…28eec0 Dummy {f00=0x00d0, f01=0x0190, f02=»A1-A8 ON STACK T P XIF U P* U " P IFT LOCHAN=4 U , P LDK A7,4 INDICATE CHLT2 U B P RF CLT010 U b P* U t P XIF U ~ P* U PCHLT3 EQU * U P* U P* U P* U P* C H L T 3 U P* U P* INTERRUPT FROM CHLT3 U P
0x28eec0…28f054 (5, 282) Dummy {f00=0x00d0, f01=0x0190, f02=»K U p P XIF V P* V P IFT LOCHAN=4 V P IFT CPU852=0 V 6 " P MSR 8,A15 SAVE A1-A8 ON STACK V L P XIF V r P* V ~ P IFT LOCHAN=4 V P LDK A7,6 INDICATE CHLT3 V P RF CLT010 V P XIF V P* V P* V P IFT LOCHAN=3 V $ P S
0x28f054…28f1e8 Dummy {f00=0x00d0, f01=0x0190, f02=»FT LOCHAN=3 V P IFT CPU852=0 W " P MSR 8,A15 SAVE A1-A8 ON STACK W * P XIF W P P* W P IFT LOCHAN=3 W f P LDK A7,6 INDICATE CHLT3 W | P RF CLT010 W P* W P XIF W P* W PCHLT4 EQU * W P* W P* W P* W P* C H
0x28f1e8…28f37c Dummy {f00=0x00d0, f01=0x0190, f02=» P IFT CPU852=1 X & P CF A15,SAVE8 SAVE A1-A8 ON STACK X P XIF X D P* X P P IFT LOCHAN=4 X Z P IFT CPU852=0 X p " P MSR 8,A15 SAVE A1-A8 ON STACK X P XIF X P* X P IFT LOCHAN=4 X P LDK A7,8 INDICATE CHLT4 X P RF CLT010 X
0x28f37c…28f510 Dummy {f00=0x00d0, f01=0x0190, f02=»RT1 EQU * X P ST P,INTSAV Y P* Y & P IFT CPU852=1 Y 0 & P CF A15,SAVE8 SAVE A1-A8 ON STACK Y F P XIF Y p P* Y | P IFT CPU852=0 Y " P MSR 8,A15 SAVE A1-A8 ON STACK Y P XIF Y P* Y P LDK A7,10 INDICATE CHRT1 Y P RF CLT010 Y
0x28f510…28f6a4 Dummy {f00=0x00d0, f01=0x018e, f02=»P,INTSAV SAVE LAST INTERRUPT Y P* Z $ P IFT CPU852=1 Z . & P CF A15,SAVE8 SAVE A1-A8 ON STACK Z D P XIF Z n P* Z z P IFT RECHAN=2 Z P IFT CPU852=0 Z " P MSR 8,A15 SAVE A1-A8 ON STACK Z P XIF Z P* Z P IFT RECHAN=2 Z P LDK A
0x28f6a4…28f838 Dummy {f00=0x00d0, f01=0x0190, f02=» Z P IFT CPU852=1 [ & P CF A15,SAVE8 SAVE A1-A8 ON STACK [ P XIF [ H P* [ T P IFT RECHAN=3 [ ^ P IFT CPU852=0 [ t " P MSR 8,A15 SAVE A1-A8 ON STACK [ P XIF [ P* [ P IFT RECHAN=3 [ P LDK A7,14 INDICATE CHRT2 [ P RF CLT010
0x28f838…28f9cc Dummy {f00=0x00d0, f01=0x0190, f02=»8 SAVE A1-A8 ON STACK [ P XIF P* * P IFT RECHAN=4 4 P IFT CPU852=0 J " P MSR 8,A15 SAVE A1-A8 ON STACK ` P XIF P* P IFT RECHAN=4 P LDK A7,14 INDICATE CHRT2 P RF CLT010 P XIF P* P* P*
0x28f9cc…28fb60 Dummy {f00=0x00d0, f01=0x0190, f02=»ST INTERRUPT | P* ] P IFT CPU852=1 ] & P CF A15,SAVE8 SAVE A1-A8 ON STACK ] 4 P XIF ] ^ P* ] j P IFT RECHAN=3 ] t P IFT CPU852=0 ] " P MSR 8,A15 SAVE A1-A8 ON STACK ] P XIF ] P* ] P IFT RECHAN=3 ] P LDK A7,18 INDICATE CH
0x28fb60…28fcf4 (5, 283) Dummy {f00=0x00d0, f01=0x018e, f02=»1 ] & P CF A15,SAVE8 SAVE A1-A8 ON STACK ^ P XIF ^ 4 P* ^ @ P IFT RECHAN=4 ^ J P IFT CPU852=0 ^ ` " P MSR 8,A15 SAVE A1-A8 ON STACK ^ v P XIF ^ P* ^ P IFT RECHAN=4 ^ P LDK A7,18 INDICATE CHRT3 ^ P RF CLT010 ^ P XIF ^ P
0x28fcf4…28fe88 Dummy {f00=0x00d0, f01=0x0190, f02=» $ P ST P,INTSAV SAVE LAST INTERRUPT _ P* _ , P IFT CPU852=1 _ 6 & P CF A15,SAVE8 SAVE A1-A8 ON STACK _ L P XIF _ v P* _ P IFT RECHAN=4 _ P IFT CPU852=0 _ " P MSR 8,A15 SAVE A1-A8 ON STACK _ P XIF _ P* _ P IFT RECHAN=4 _
0x28fe88…29001c Dummy {f00=0x00d0, f01=0x0190, f02=» EX CWTINR,A5 EXECUTE INR-INSTRUCTION _ P* ` . P IFT LOGING=1 ` 8 P* ` N 4 PCLT012 CF A15,LOGG ** LOGG OF INPUT CHARACTER ** ` X P* ` P XIF ` P EJECT ` P* ` & P* DETERMINE TYPE OF INTERRUPT. ` 4 P* MOREOVER, IF REMOTE, GET TH
0x29001c…2901b0 Dummy {f00=0x00d0, f01=0x0190, f02=» ` r P LDR A3,A2 a . P SLC A3,6 REMOTE FIRST OR SECOND CHANNEL ? a P RF(NN) CLT015 FIRST a L > P LD A5,CHTAB+12,A7 GET CWT-ADDRESS SECOND CHANNEL OF CHRT a h 4 PCLT015 CF A15,RESTSY START OR RESTART SYNC-TIMER a * P ANK A3,/2 FIRST OR SECOND TERMINAL ?
0x2901b0…290344 Dummy {f00=0x00d0, f01=0x0190, f02=»TURN CODE a x ( P LDR A3,A2 DATA REQUEST IMMEDIATE ? b P ABL(N) CLT050 U =11 b > $ P ANKL A3,/7000 DEVICE ADDRESS ? b Z ( P ABL(NE) CLT100 YES, DIN, STD OR DRD b P EJECT b P* b P* b , P* DETERMINE TYPE OF CONTROL CHARACTER b P* b
0x290344…2904d8 Dummy {f00=0x00d0, f01=0x018e, f02=» P ADK A3,2 c P ABL(E) CLT080 NAK c P ADK A3,2 c 0 P ABL(E) CLT100 POWER ON c B P LDR A7,A7 LOCAL ? c b P RF(N) CLTQUE YES c | P LC A4,LRCACK,A7 c $ P LDK A6,/80 ABC-ANSWER ALLOWED ? c P TM A6,A4 c P RF(E) EXIIT NO c P XRK A4,
0x2904d8…29066c Dummy {f00=0x00d0, f01=0x0190, f02=» P RF(Z) CLT046 YES d * P CM LRCDWT,A7 RESET LRC-DEVICE POINTER d ( P LDK A4,1 RESET BLOCKSENDING RUNNING d L P ANS A4,CWTBLK,A5 d x P SUK A3,5 d & P RF(E) CLT043 ABC+ , GO TO DRIVER d P IFT ACKMUL=1 d P* d , P IM CWTADD+2,A5 UPDATE ERR
0x29066c…290800 Dummy {f00=0x00d0, f01=0x0190, f02=» RF(E) CLT033 d P ADK A3,4 e P RF(E) CLT033 e ( P EJECT e > P* e L 0 P* RESOLVE QUEUE AND EXAMINE RECOVERY BIT. e V . P* ONE RECOVERY ATTEMPT IS MADE AND THEN e , P* RETURN CODE NOT OPERABLE IS SENT TO e P* DEVICE DRIVER. e P
0x290800…290994 (5, 284) Dummy {f00=0x00d0, f01=0x018e, f02=» CM LRCDWT,A7 RESET LRC-DEVICE POINTER e P LDK A4,1 f . 2 P ANS A4,CWTBLK,A5 RESET BLOCKSENDING RUNNNING f @ & PCLTQUE CF A15,QUEUE RESOLVE QUEUE f v 6 PCLT031 LC A2,DWTST,A6 GET LEFT BYTE OF STATUS WORD f P LDR A3,A2 f & P ANK A2,/30 ECHO AND RECOVER
0x290994…290b28 Dummy {f00=0x00d0, f01=0x0190, f02=» 0 PCLT033 LDK A3,2 INDICATE RECOVERY OF DEVICE g P U =11(=3) g 8 P RF CPO025 g L P EJECT g ^ P* g l P* ABC- VRC-ERROR g v P* g 8 P* IF BLOCKSENDING SAME PROCEDURE AS FOR THE OTHER g P* ERRORS OF TYPE ABC-. g 4 P* IF OUTPUT
0x290b28…290cbc Dummy {f00=0x00d0, f01=0x0190, f02=» CLT031 g PCLT043 ABL CLT107 h P EJECT h * P* h 8 P* POWER ON h B P* h X 8 P* RECOVERY ROUTINES ARE STARTED FOR EVERY DEVICE h b < P* ON ACTUAL LINE EXCEPT THOSE OCCUPYING CHANNEL UNIT h P* OR THOSE IN ECHO MODE. h P* h
0x290cbc…290e50 Dummy {f00=0x00d0, f01=0x0190, f02=» h , P LDR* A2,A5 GET CHANNEL OCCUPYING DEVICE i . P CM CWTRTC,A5 RESET RETRANSMISSION COUNTER i 8 P LDR A7,A7 REMOTE ? i j P RF(N) CPO010 NO i * P CM LRCDWT,A7 RESET LRC-DEVICE POINTER i P LDK A7,1 i 0 P ANS A7,CWTBLK,A5 RESET BLOCKSENDING RUNNI
0x290e50…290fe4 Dummy {f00=0x00d0, f01=0x0190, f02=»* A6,A1 GET DWT-ADDRESS i P RF(E) CPO030 j P SRC A6,1 j 6 P RF(N) CPO030 j H P SLC A6,1 j ^ ( P LCR A7,A6 GET LEFT OF CHANNEL PAR. j p P ANK A7,1 INPUT DEVICE ? j P RF(NE) CPO025 YES j & P LDKL A7,/EFFF RESET RECOVERY BIT j P ANS A7,
0x290fe4…291178 Dummy {f00=0x00d0, f01=0x018e, f02=»ANSWER j j P RF(E) CPO030 YES k : PCPO025 LD A7,DWTADR,A6 ADDRESS TO ADDRESS-BLOCK IN A7 k ( 6 P LD A7,RECADR,A7 ADDRESS TO RECOVERY ROUTINE IN A7 k f P RF(E) CPO030 k P LDKL A5,DWTSB2 STACK BASE k P ADR A5,A6 k P INH k & P CFR A15,A7 GO TO
0x291178…29130c Dummy {f00=0x00d0, f01=0x0190, f02=» k P* l 6 P* INDICATE NOT OPERABLE BEFORE GOING TO DRIVER l P* l L PCLT045 EQU * l V " P LD A1,DWTST,A6 GET STATUS =11 l j P SLL A1,2 ECHO? =11 l P RF(N) CLT047 YES =11 l 2 P LDKL A1,/EEFF NO, RESET INT ALL AND RECOV =11 l P RF CLT0
0x29130c…2914a0 Dummy {f00=0x00d0, f01=0x0190, f02=» OPERABLE l v * P ABL CLT107 RESET TIMER AND FINISH =11 m PCLT046 EQU * m @ P ABL CLT110 m T P EJECT m h P* m v P* A C K , D R I m 2 P* FIRST RESOLVE QUEUE AND THEN EXAMINE LAST m 0 P* OUTPUT DWT. IF NOT DEFINED UPDATE ERROR m 6 P*
0x2914a0…291634 (5, 285) Dummy {f00=0x00d1, f01=0x0190, f02=»* RECOVERY BIT IN DWT. THEN A SIMULATION OF DATA m < P* REQUEST FOR DEVICES WITHOUT DATA REQUEST IS CARRIED n < < P* OUT. FOR DEVICES WITH DATA REQUEST FUNCTION A TIMER n | : P* HANDLING ANSWERS FROM DEVICE IS AFFECTED AND THEN n > P* IF DRI A
0x291634…2917c8 Dummy {f00=0x00d1, f01=0x0190, f02=»AST OUTPUT WORD n ~ " P ANK A3,/F0 KEEP DEVICE NUMBER o P CF A15,QUEUE RESOLVE QUEUE o > P LDKL A4,/EFFF o b 6 P ANS A4,DWTST,A6 RESET RECOVERY BIT IN STATUS WORD o x P LDR A7,A7 REMOTE ? =11 o P RF(N) CLT052 NO =11 o P LDK A4,2 o 4 P ORS A4,
0x2917c8…29195c Dummy {f00=0x00d1, f01=0x018e, f02=»7 INDICATE ABC ALLOWED o P RF CLT055 p PCLT052 EQU * p 0 . P LDR* A3,A6 DEVICE WITHOUT DATA REQUEST ? p D P RF(NN) CLT055 p v P CW A6,LRCDWT,A7 p P ABL(NE) CLT110 p P EJECT p P* p P* p P* PRINTER TIMING p P* p PCLT0
0x29195c…291af0 Dummy {f00=0x00d1, f01=0x018e, f02=» p " P LDKL A3,-DRQTIM RESTART TIMER q P ST* A3,DWTTP,A6 q . P RF CLT068 q F P* q X P* START TIMER q b P* q z PCLT060 EQU * q P LDR A1,A6 PARAMETER q P LDKL A4,DWTTP TIMER POINTER q P ADR A4,A6 ADD DWT-ADDRESS q " P CF A15,SETIMP
0x291af0…291c84 Dummy {f00=0x00d1, f01=0x0190, f02=» P RF(E) EXIT YES r P LDK A1,0 r & P LDR* A4,A6 GET CHANNEL PARAMETER r . . P RF(N) CLT110 DEVICE WITHOUT DATA REQUEST r X ( P LDR A2,A2 DATA REQUEST IMMEDIATE ? r P ABL(N) CLT125 YES =11 r " PEXIT ABL TDISP DISPATCHER EXIT r P EJECT r P
0x291c84…291e18 Dummy {f00=0x00d1, f01=0x0190, f02=» USING THE LRC-FUNCTION , MISSING BLOCK CONTROL r . P* CHARACTERS (ABC) FROM SELECTOR UNIT. s 8 P* s j PDRQTUT EQU * s t P LDR A6,A1 GET DWT-ADDRESS s . P CM DWTTP,A6 RESET POINTER TO TIMER BLOCK s P LD A3,DWTST,A6 s P RB(N) EXIT s P
0x291e18…291fac Dummy {f00=0x00d1, f01=0x0190, f02=» P LDK A2,/83 t P CC A2,DWTOCH,A6 t P RF(NE) DRQT10 t 0 P SUK A5,8 LOCAL DEVICE ? =4 t F P RB(N) EXIT t j P CF A15,OUTLIN t ~ P RB EXIT t PDRQT10 EQU * t P* t P IFT ACKMUL=1 t P* t & P LD A5,CHTAB+2,A5 GET CWT-ADDRESS t
0x291fac…292140 Dummy {f00=0x00d1, f01=0x0190, f02=»R 01 =10(=1) t 2 P RB(E) CLT045 YES, GO TO DEV. INT. HANDLER =1 u & P LDR* A1,A6 CHANNEL PARAMETER =12 u J 0 P RF(NN) DRQT20 DEVICE WITH DATA REQUEST =12 u t P LDK A4,1 U =11 u PDRQT20 EQU * U =12 u 2 P ABL CLT033 NO, EXECUTE DEV. RECOVERY =12(=1)
0x292140…2922d4 (5, 286) Dummy {f00=0x00d1, f01=0x0190, f02=»ST OUTPUT CHARACTER IS RETRANSMITTED u < P* BY CHANNEL DRIVER SIX TIMES AND IF STILL NO SUCCESS v , < P* RETURN CODE NOT OPERABLE IS SENT TO DEVICE DRIVER. v l P* v PCLT080 EQU * v $ P LDR* A6,A5 GET LAST OUTPUT DWT v P RB(E) EXIT v P*
0x2922d4…292468 Dummy {f00=0x00d1, f01=0x0190, f02=»ORE NAK? v ~ P RB(E) EXIT YES w 2 P IM CWTRTC,A5 INCREMENT RETRANSMISSION COUNTER w ( P LD A4,CWTRTC,A5 GET COUNTER w ^ P SUK A4,7 SEVEN TIMES ? w P ABL(E) CLT030 w * P LD A2,CWTLOW,A5 GET LAST OUTPUT WORD w $ P EX CWTOTR,A5 EXECUTE OTR-INSTR. w
0x292468…2925fc Dummy {f00=0x00d1, f01=0x0190, f02=»WTLOW,A5 STORE LAST OUTPUT WORD w P LDR A7,A7 REMOTE? x ( P RF(N) CLT090 NO x B P ANK A2,/FF x Z , P XRS A2,LRCACK,A7 UPDATE LRC-ACKUMULATOR x n . P CF A15,RESTSY START OR RESTART SYNC-TIMER x PCLT090 ABL TDISP x P EJECT x P* x P* x $
0x2925fc…292790 Dummy {f00=0x00d1, f01=0x0190, f02=» DEVICE-DEPENDENT INTERRUPT x v P* HANDLER. y $ P* y : P* REMOTE DEVICES: y D P* y ` > P* DATA INPUT: SAME PROCEDURE AS FOR LOCAL DEVICES y j : P* DATA REQUEST: INPUT WORD IS COMPLEMENTED WITH y 8 P* STATUS F
0x292790…292924 Dummy {f00=0x00d1, f01=0x018e, f02=»TATUS-INDICATOR y d < P* IS CHECKED TO SEE IF THE DEVICE IS z < P* WAITING FOR A STATUS CHANGE. IF SO z X > P* GET ORDER AND ECB-ADDRESS AND GO TO z < P* DEVICE WITH THE NEW STAT
0x292924…292ab8 Dummy {f00=0x00d1, f01=0x018e, f02=» P* { PCLT100 EQU * { P LDR A3,A2 { " P SRL A3,8 { 4 P LDR A4,A3 { F P ANK A3,/E 2 * LINE NUMBER { X P SRL A4,3 { z P ANK A4,/E 2 * DEVICE NUMBER { P CWK A4,/E SYNC-INPUT ? { P RF(E) CLT150 YES { P LOOP SWITCH SET { 0 P LD*
0x292ab8…292c4c Dummy {f00=0x00d1, f01=0x0190, f02=» P RB(Z) EXIT NOT DEFINED | P LDR* A6,A8 GET ID-WORD | $ P SUR A6,A4 | D $ P RB(N) EXIT UNDEFINED INTERRUPT | V " P LDR A4,A4 NO DEVICE NUMBER ? | ~ P ABL(E) CHPOWO POWER ON | & P ADR A8,A4 ADDRESS TO DWT-ADDRESS | P LDR* A6,A8 GET DWT-ADDRES
0x292c4c…292de0 Dummy {f00=0x00d1, f01=0x018e, f02=» RF(NE) CLT110 YES | & P LDR* A4,A6 GET CHANNEL PARAMETER } P RB(N) EXIT } D P LDR A7,A7 REMOTE ? } X P RF(NN) CLT120 YES } t PCLT105 LC A3,DWTOCH,A6 } P ANK A3,/7F } P SUK A3,DUMMSP } P RF(NE) CLT110 } & P LDR* A3,A6 CHANNEL PARAMETE
0x292de0…292f74 (5, 287) Dummy {f00=0x00d1, f01=0x0190, f02=» } P INH ~ & P LD A7,DWTTP,A6 GET TIMER POINTER ~ & P RF(E) CLT110 TIMER ALREADY RESET ~ > P* ~ h P************************* ~ r P* ~ P CM* DWTTP,A6 ~ P CM DWTTP,A6 ~ PCLT110 LD A7,DWTOR,A6 ORDER ~ P ANK A7,/FF ~ P LD A8,D
0x292f74…293108 Dummy {f00=0x00d1, f01=0x018e, f02=» ~ * PCLT120 LDR A7,A2 REMOTE DATA REQUEST ? P ANK A7,/FF 6 P RF(NE) CLT130 J $ P CWR* A6,A5 DRD BEFORE ANSWER ? ` P ABL(E) EXIT YES =11 PCLT125 SRL A4,4 P ANK A4,/C P ORR A2,A4 STATUS IN A2 P RB CLT105 PCLT130 E
0x293108…29329c Dummy {f00=0x00d1, f01=0x018e, f02=» ( P SC A4,1,A6 STORE NEW STATUS IN DWT $ P LD A4,DWTST,A6 GET STATUS WORD 0 * P ANKL A4,/200 STATUS CHANGE ALLOWED ? X P RF(E) CLT154 EG. EXIT P XRS A4,DWTST,A6 RESET BIT ( P XRR A3,A2 VOUCHER STATUS CHANGED ? P ANK A3,/80 P R
0x29329c…293430 Dummy {f00=0x00d1, f01=0x0190, f02=» P LDK A4,1 P CWR* A4,A5 SYNC SENT ? P RF(NE) CLT154 : < P LDKL A4,/8001 INDICATE LOOP MODE AND SYNC-ACK RECEIVED P PCLT152 EQU * P ORS A4,CWTRST,A5 PCLT154 ABL EXIT P EJECT P* P* LOOP MODE P*
0x293430…2935c4 Dummy {f00=0x00d1, f01=0x0190, f02=»ST OUTPUT DWT ~ P LDR* A6,A5 P SUK A4,1 SYNC ? * P RF(E) CLT178 YES B ( P LDK A1,NOERR INDICATE NOT OPERABLE PCLT177 RB CLT110 PCLT178 EQU * P SUK A3,4 ACK ? P RF(NE) EXITA NO $ P LDK A4,2 INDICATE ACK RECEIVED
0x2935c4…293758 Dummy {f00=0x00d1, f01=0x0190, f02=»RESET LOOP TEST BIT ~ P RB CLT100 P EJECT . P* < P* QUEUE F P* X 2 P* GET LAST OUTPUT DWT AND SET CHANNEL FREE. b 4 P* IF LOCAL DEVICE CHECK OUTPUT QUEUE AND SEND P* IF SOMETHING THERE. 8 P* IF REMOTE DEVICE CH
0x293758…2938ec Dummy {f00=0x00d1, f01=0x0190, f02=»NTERRUPTING TERMINAL l & P* AND SEND IF SOMETHING THERE. P* F PQUEUE EQU * P P STR A2,A15 SAVE A2 d $ P LDR* A4,A5 GET LAST OUTPUT DWT . P CM CWTRTC,A5 RESET RETRANSMISSION COUNTER P CMR A5 SET CHANNEL FREE P LDK A1,0
0x2938ec…293a80 Dummy {f00=0x00d1, f01=0x0190, f02=»E) QUEU20 NO . PQUEU01 LDKL A8,CWTEQ QUEUE FIRST TERMINAL * PQUEU03 ADR A8,A5 ADD CWT-TABLE-ADDRESS F PQUEU04 EQU * t P LDR* A6,A8 QUEUE EMPTY ? P RF(E) QUEU10 YES P LDR A7,A7 =5 $ P RF(N) QUEU06 PREVENT HANG UP =5 P LD A2
0x293a80…293c14 (5, 288) Dummy {f00=0x00d1, f01=0x0190, f02=»OUT OF QUEUE v * P STR A2,A8 SET NEXT DWT FIRST IN QUEUE . P LC A2,DWTOCH,A6 GET LAST OUTPUT CHARACTER B P CF A15,OUTLIN SEND IT t PQUEU05 LDR* A2,A15 RELOAD A2 0 P CWR A6,A4 DEVICE ALREADY IN OUTPUT QUEUE ? P RF(E) QUEU30 " P LDR A6,
0x293c14…293da8 Dummy {f00=0x00d1, f01=0x018e, f02=»1,0 P ABL RTNA15 PQUEU10 LDR A1,A1 READY ? P RB(E) QUEU05 @ P LDK A1,0 V " P CWR A7,A5 TERMINAL 2 REMOTE ? h P RB(E) QUEU01 NO & PQUEU20 LDKL A8,CWTEQ+2 NEXT QUEUE P RB QUEU03 PQUEU30 ADKL A15,4 P RF EXITA
0x293da8…293f3c Dummy {f00=0x00d1, f01=0x018e, f02=» P* PRESTSY EQU * P STR A4,A15 " ( P LD A4,CWTTP,A5 TIMER POINTER ZERO? 6 P RF(NE) RESY20 b P LDR A1,A5 x P LDK A4,CWTTP TIMER POINTER P ADR A4,A5 ADD CWT-ADDRESS P CF A15,SETIMP SET TIMER P DATA SYNCUT,TIME
0x293f3c…2940d0 Dummy {f00=0x00d1, f01=0x018e, f02=» P LDR* P,A15 P EJECT P* * P* 4 * P* TIME-OUT ROUTINE FOR SYNC-SENDING > 0 P* IF NOTHING HAPPENS ON A LINE IN 500 MS l P* SYNC-CHARACTER IS SENT. P* PSYNCUT EQU * $ P CM CWTTP,A1 RESET TIMER POINTER
0x2940d0…294264 Dummy {f00=0x00d1, f01=0x0190, f02=» P LDK A6,1 P EX CWTOTR,A1 OUTPUT P RF(U) EXITA 2 , P STR A6,A1 STORE "1" AS LAST OUTPUT DWT F P* v P IFT LOGING=1 P* * P CF A15,LOGG LOGG OF OUTPUT CHARACTER P XIF P* P LDR A3,A2 P SLL A3,4 P
0x294264…2943f8 Dummy {f00=0x00d1, f01=0x0190, f02=»WTRST,A1 LOOP MODE ? P LDR A3,A4 P ANK A4,/80 . P RF(E) EXITA NO B P ANK A3,/60 Z P RF(E) SYNC20 THIRD SYNC n P SUK A3,/20 P RF(NE) SYNC10 FIRST SYNC P LDK A3,/20 SECOND SYNC * PSYNC10 XRS A3,CWTRST,A1 CHANGE COUNT
0x2943f8…29458c Dummy {f00=0x00d1, f01=0x0190, f02=» 6 P* OUTLRT = SUBROUTINE TO SEND ONE CHARACTER VIA P* CHANNEL UNIT > P* ` P* j B P* GET CWT-ADDRESS AND IF CHANNEL UNIT FREE SEND CHARACTER. t 8 P* RUNNING LRC-PROCESS CAN STOP OUTPUT FROM OTHER 8 P* DEVICES ON SA
0x29458c…294720 Dummy {f00=0x00d1, f01=0x0190, f02=»L PARAMETER ~ P ANK A7,/F P SLL A7,1 DOUBLE INDEX & & P LD A5,CHTAB+2,A7 GET CWT-ADDRESS D P SUK A7,8 REMOTE ? n P RF(N) OUL100 NO . P LCR A3,A6 LEFT BYTE IN CHANNEL PARAMETER * P SRL A3,2 SECOND TERMINAL IN CHANNEL ? P ANK A3,
0x294720…2948b4 (5, 289) Dummy {f00=0x00d2, f01=0x0190, f02=» IF UNIT NOT FREE QUEUE OUTPUT. 2 P* IF REMOTE DEVICE AND LRC-PROCESS ALREADY * 0 P* RUNNINGON TERMINAL FOR ANOTHER DEVICE, ` 0 P* QUEUE THIS NEW OUTPUT IF LRC-CONTROL ON P* IT IS WANTED. P* ELSE SEND CHARACTER. P*
0x2948b4…294a48 Dummy {f00=0x00d2, f01=0x0190, f02=» P SUK A3,/82 STX ? P RF(NE) OUL200 NO P EJECT 8 P* F P* S T X P P* b * P LD A3,LRCDWT,A7 LRC-PROCESS RUNNING ? l P RF(NE) OUL175 YES P LDK A2,0 $ P ST A6,LRCDWT,A7 SET LRC-DEVICE , P CM LRCACK,A7 RESET LRC-AC
0x294a48…294bdc Dummy {f00=0x00d2, f01=0x0190, f02=»ERO l P RF OUL510 & POUL175 CWR A3,A6 SAME LRC-DEVICE ? P RF(NE) OUL800 QUEUE OUTPUT H P RF OUL350 l POUL200 SUK A3,/15 ETB ? ~ P RF(NE) OUL300 NO P EJECT P* P* E T B P* & P SC A2,LRCACK,A7 INDICATE LA
0x294bdc…294d70 Dummy {f00=0x00d2, f01=0x0190, f02=»,LRCDWT,A7 SAME DEVICE SENDING WITH LRC P RF(Z) OUL350 YES 0 P LD A3,CWTBLK,A5 J , P RF(NN) OUL500 BLOCKSENDING NOT RUNNING b * P RF OUL800 BLOCKSENDING RUNNING, QUEUE P 0 POUL350 LDR* A3,A6 DEVICE WITH DATA REQUEST ? " P RF(NN) OUL5
0x294d70…294f04 Dummy {f00=0x00d2, f01=0x0190, f02=» SC A3,CWTBLK,A5 INDICATE BLOCKSENDING RUNNING P EJECT 6 P* D P* N & P* SEND CHARACTER SECTION. X 2 P* CHARACTER IS SENT,SYNC-TIMER UPDATED 8 P* LAST OUTPUT DWT AND LAST OUTPUT CHARACTER 6 P* IS SAVED.
0x294f04…295098 Dummy {f00=0x00d2, f01=0x0190, f02=»PARAMETER | P ANKL A3,/7E00 & POUL510 ORR A2,A3 OUTPUT WORD IN A2 ( P* R P* P* f POUL515 EX CWTOTR,A5 OTR p P RF(R) OUL800 REFUSED P RF(A) OUL520 ACCEPTED P ADKL A15,20 RESET STACK P LDK A1,1 , P LD A2,DWT
0x295098…29522c Dummy {f00=0x00d2, f01=0x018e, f02=» P* 0 P CF A15,LOGG ** LOGG OF OUTPUT CHARACTER ** P* B P XIF L P* X P STR A6,A5 SET CHANNEL BUSY b , P ST A2,CWTLOW,A5 STORE LAST OUTPUT WORD P LDR A7,A7 REMOTE ? P RF(N) OUL600 P ANK A2,/FF , P XRS A2,LRCA
0x29522c…2953c0 Dummy {f00=0x00d2, f01=0x0190, f02=» ^ POUL700 EQU * P IFT CPU852=1 ( P ABL IHRET8 RESTORE A1-A8 AND RETURN 2 P XIF ^ P* j P IFT CPU852=0 t * P MLR 8,A15 RESTORE A1-A8 FROM STACK... P INH =10 . P ADKL A15,2 ...ADJUST STACK POINTER... =10 " P LDR* P,A15
0x2953c0…295554 (5, 290) Dummy {f00=0x00d2, f01=0x018e, f02=» POUL800 EQU * P LDR A7,A7 REMOTE ? P RF(NN) OUL805 YES 8 P LDR A7,A5 CWT-ADDRESS R , POUL805 LD A4,CWTEQ,A7 GET QUEUE POINTER p P RF(E) OUL820 POUL810 CWR A6,A4 & P RB(E) OUL600 DWT ALREADY IN QUEUE P LD A3,DWTOTQ,A4
0x295554…2956e8 Dummy {f00=0x00d2, f01=0x0190, f02=» $ POUL830 ST A6,DWTOTQ,A4 QUEUE DWT P LDK A4,0 0 : POUL840 ST A4,DWTOTQ,A6 SET OR RESET OUTPUT QUEUE LINK B P RB OUL600 P EJECT P* P* P* C H L T O N P* > P* SUBROUTINE TO RESET CWT AND PERFORM CIO-START
0x2956e8…29587c Dummy {f00=0x00d2, f01=0x0190, f02=»D A4,CHTAB " PCON010 SUK A4,2 ALL TREATED ? P RF(NZ) CON020 NO TAKE NEXT 8 ( PRTNA15 ADKL A15,2 RETURN AND ENABLE P ENB P LDR* P,A15 PCON020 EQU * P INH $ P LD A5,CHTAB,A4 LOAD CWT-ADDRESS P RB(Z) CON010 P C
0x29587c…295a10 Dummy {f00=0x00d2, f01=0x0190, f02=»E CIO-START | P RF(U) CON027 $ P LDK A3,0 INDICATE CHANNEL BUSY * . P CF A15,RESTSY START OR RESTART SYNC-TIMER R PCON027 EQU * 4 P ST A3,CWTRST,A5 INDICATE C.U. PRESENT OR NOT =6 P LD* A1,CWTITA,A5 P LDR A2,A4 P ANK A2,2
0x295a10…295ba4 Dummy {f00=0x00d2, f01=0x0190, f02=»E ON SECOND TERMONAL z 0 P RF(NZ) CON029 YES BLOCK SENDING NOT ALLOWED 4 PCON028 LDK A2,1 INDICATE BLOCK SENDING PERMITTED P PCONRET ST A2,CWTBLK,A5 P RF CON035 PCON029 LDK A2,0 4 P RB CONRET INDICATE BLOCK SENDING NOT PREMITTED P
0x295ba4…295d38 Dummy {f00=0x00d2, f01=0x018e, f02=»WK A6,1 SYNC ? P RB(E) CON010 P CMR A5 RESET LAST OUTPUT , P LDK A2,/00 DUMMY N P CF A15,OUTLIN SEND IT h P RB CON010 P EJECT P* P* P* L O G G P* 8 P* IF CONDITIONALY ASSEMBLY IS SET EVERY INPUT
0x295d38…295ecc Dummy {f00=0x00d2, f01=0x0190, f02=» P LD A1,POINT P ADK A1,2 & P CWK A1,BUFE BUFE IS MAX LOGG AREA * P RF(NE) L1 T ( P LDKL A1,BUF SET FIRST LOGG ADDRESS f PL1 ST A1,POINT & P STR A2,A1 LOGG OF INR OR OTR WORD P LDR* A1,A15 P ADKL A15,2 P LDR* P,A15 RE
0x295ecc…296060 Dummy {f00=0x00d2, f01=0x4026, f02=» XIF P* P END @ " & P CWK A1,BUFE BUFE IS MAX LOGG AREA * P RF(NE) L1 T ( P LDKL A1,BUF SET FIRST LOGG ADDRESS f PL1 ST A1,POINT & P STR A2,A1 LOGG OF INR OR OTR WORD P LDR* A1,A15 P ADKL A15,2 P LDR* P,A15 RE
0x296060…2961f4 (5, 291) Dummy {f00=0x00d2, 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
0x2961f4…296388 Dummy {f00=0x00d2, f01=0x018e, f02=»TIM2 ABORT TIMER IF ANY P* PRD:N05 EQU * * " P XRR A2,A6 EXCHANGE A2 AND A6 > P XRR A6,A2 d P XRR A2,A6 v P RB ITC:15 P* ( PRD:N10 LDR* A3,A2 REMOVE FROM QUEUE ( P ST A3,DWTANC,A6 UPDATE QUEUE ANCHOR P RB RD:N00
0x296388…29651c Dummy {f00=0x00d2, f01=0x0190, f02=» * P* W R I T E, N O T A D D R E S S E D P* 6 & PWR:NAD EQU * WRITE, NOT ADDRESSED @ < P LD A2,DWTANC,A6 CHECK QUEUE OF ADDRESSED READ REQUESTS j $ P RF(NZ) WR:N10 ANYTHING IN QUEUE 8 P LD A2,RD:QUE CHECK QUEUE OF NOT ADDRESSED READ REQ.
0x29651c…2966b0 Dummy {f00=0x00d2, f01=0x0190, f02=»:N05 CF A15,ABTIM2 ABORT TIMER IF ANY P RB ITC:15 . P* @ ( PWR:N10 LDR* A3,A2 REMOVE FROM QUEUE J ( P ST A3,DWTANC,A6 UPDATE QUEUE ANCHOR v P RB WR:N05 P* , PWR:N20 LDKL A2,WR:QUE GET WR:QUE ADDRESS P RB ITC:50 P*
0x2966b0…296844 Dummy {f00=0x00d2, f01=0x0190, f02=» r P LDR A2,A6 $ P CF A15,ITAB10 REMOVE FROM QUEUE P* B PTWR:30 EQU * L P CMR A6 RESET QUEUE LINK ` P LDK A1,/40 RETURN CODE P RB END:IO P* P EJECT DRIC01 P* P* I T A B R T P* . P* THIS SU
0x296844…2969d8 Dummy {f00=0x00d2, f01=0x0190, f02=» t P* " P* OUTPUT: A1-A4 ARE DESTROYED P* 8 PITABRT EQU * B P LDR A2,A6 V P* h PITAB05 EQU * r P CF A15,ABTIM ABORT TIMER P* P* REMOVE DWT FROM QUEUE P* PITAB10 EQU * & P LD A1,DWTQUE,A2 GET QUE
0x2969d8…296b6c Dummy {f00=0x00d2, f01=0x018e, f02=»D WRITE REQUEST v : P ADK A1,DWTANC POINT TO ADDRESS OF FIRST DWT IN QUEUE P* V P EJECT DRIC01 ` P* x P* PITAB20 LDR A4,A1 SAVE P LDR* A1,A1 NEXT IN QUEUE P CWR A1,A2 SEARCHED DWT P RB(NE) ITAB20 NO! " P L
0x296b6c…296d00 Dummy {f00=0x00d2, f01=0x0190, f02=» P RF IH:RTN P XIF P* " P IFT CPU852=0 , P RTN A15 B P XIF R P* ^ P EJECT DRIC01 h P* P* A B T I M P* . P* SUBROUTINE FOR ABORTING TIMER (IF ANY). P* P* INPUT: A2 = DWT ADDRESS P
0x296d00…296e94 (5, 292) Opaque[0x194]
0x296e94…297028 # DirEnt {nam=»DRSOP1«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1a58, f03=0x0000}
0x296e94…297028 IdxSect {
0x296e94…297028 f00 = 0x00d2 // 0x296e94 @0x0
0x296e94…297028 f01 = 0x000a // 0x296e96 @0x2
0x296e94…297028 gno = [ // 0x296e98 @0x4
0x296e94…297028 [0x00]: C0x00d2.0x3.0
0x296e94…297028 [0x01]: C0x00d3.0x0.0
0x296e94…297028 [0x02]: C0x00d3.0x1.0
0x296e94…297028 [0x03]: C0x00d3.0x2.0
0x296e94…297028 [0x04]: C0x00d3.0x3.0
0x296e94…297028 ]
0x296e94…297028 }
0x297028…2971bc Dummy {f00=0x00d2, f01=0x018e, f02=» 2 P IDENT DRSOP1 REL 10.0 80-03-14 870105041000 P : P* B P* L @ P************************************************************ V P* $ P* PHILIPS TERMINAL SYSTEM PTS P* 2 P* DRSOP1 = DRIVER FOR SYSTEM OPERATORS PANEL
0x2971bc…297350 Dummy {f00=0x00d2, 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
0x297350…2974e4 Dummy {f00=0x00d2, 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
0x2974e4…297678 Dummy {f00=0x00d2, 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
0x297678…29780c Dummy {f00=0x00d2, 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
0x29780c…2979a0 Dummy {f00=0x00d2, 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
0x2979a0…297b34 (5, 293) Dummy {f00=0x00d3, 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
0x297b34…297cc8 Dummy {f00=0x00d3, 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
0x297cc8…297e5c Dummy {f00=0x00d3, 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
0x297e5c…297ff0 Dummy {f00=0x00d3, f01=0x0190, f02=» P PX:A EQU 0 PSOPX EQU X:A " P** 6 P** @ 8 P* THIS DRIVER CAN BE MADE TO HANDLE CREDIT ORDERS J P* BY SETTING CREDIT = 1 4 P* ORDERS 05 AND 06 ARE THEN REPLACED BY ORDERS P* /37 AND /38 RESPECTIVLY B P*
0x297ff0…298184 Dummy {f00=0x00d3, f01=0x0190, f02=» ON ZERO IS STORED IN THE CONTROL WORD | P* OF THE ECB. . P** F P P PCREDIT EQU 0 X P** l P** v @ P* THE ORDER /39, WRITE FLASHING LIGHTS CAN BE INCLUDED BY P* SETTING X:B=1 P* PX:B EQU 0 PWRFLA EQU X:B
0x298184…298318 Dummy {f00=0x00d3, f01=0x0190, f02=»UPAG EQU 0 P* P* 6 P* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION & . P* SET IS OBTAINED BY SETTING CPU852 EQU 0. ` P* PCPU852 EQU 1 P* PDVBLEN EQU 0 MMU BUFFER SIZE " PDEVIND EQU -2 SOP DEVICE INDEX P*
0x298318…2984ac Dummy {f00=0x00d3, f01=0x018e, f02=»TDRD P XIF P* P IFT MMUPAG=1 " PSTART EQU DWTDRD+4 8 P XIF R P* ^ & PDWTTP EQU START+/00 TIMER POINTER h P* P EJECT P* P************************** P* S.O.P. DEVICE ADDRESS: * P****************
0x2984ac…298640 Dummy {f00=0x00d3, f01=0x0190, f02=» p " P* * " P* S.O.P. CHANNEL UNIT TABLE * . " P* * T " P****************************** z P* P* 0 PSOPCT EQU * TABLE STARTS WITH ADDRESS BLOCK: P* P DATA DVBLEN MMU BUFFE
0x298640…2987d4 (5, 294) Dummy {f00=0x00d3, f01=0x0190, f02=» SWITCHES ENTRY | " P DATA 0 ABORT ROUTINE ADDRESS P* > P DATA DVBLEN MMU BUFFER SIZE H P DATA DEVIND DEVICE INDEX l & PSOPADU EQU * ACTIVATE LIGHTS ENTRY P* & P DATA SOPAL ACTIVATE LIGHTS ENTRY " P DATA 0 ABORT ROUTINE ADDRES
0x2987d4…298968 Dummy {f00=0x00d3, f01=0x0190, f02=» r " P* * " P* S.O.P. ACTIVATION ROUTINE: * . " P* * T " P****************************** z P* > P* THE ORDER IS ANALYZED AND THE CORRESPONDING I/O ACTION P* IS CARRIED OUT. P
0x298968…298afc Dummy {f00=0x00d3, f01=0x0190, f02=» r P* * P RF(NZ) SOPER ERROR IF NOT READ ORDER P* @ P* INPUT SWITCH VALUE J P* h * PSOPIN LDR* A2,A6 POWER UP INDICATION ? r P IFT CREDIT=0 P RF(Z) EXIT NO $ P CMR A6 YES CLEAR FOR NEXT REQ. P XIF P IFT CRE
0x298afc…298c90 Dummy {f00=0x00d3, f01=0x0190, f02=»OR CHANGES OF S.O.P. LIGHTS P* $ & PSOPAL EQU * ACTIVATE LIGHTS ENTRY . P* X P LD A3,10,A8 CHANGED LIGHTS b , 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
0x298c90…298e24 Dummy {f00=0x00d3, f01=0x0190, f02=» A4,/37 P XIF & P RF(Z) SOPON IF SO, TURN ON LIGHTS P* F & P SUK A4,1 SEE IF LIGHTS OFF ORDER P P RF(Z) SOPOFF z & PSOPER ABL(NZ) DISIOE ILLEGAL ORDER P IFT WRFLA=1 P EJECT P* P* P* FLASH LIGHTS
0x298e24…298fb8 Dummy {f00=0x00d3, f01=0x018e, f02=» A4,A6 P LDR A1,A6 P CF A15,SETIMP P DATA FLTUT,TIME 6 P ST A4,DWTTP,A6 N P LDKL A1,/FFBF f P ANS A1,DWTST,A6 SET ON FLAG | PFL010 EQU * . P* A3 CONTAINS LIGHTS THAT SHOULD FLASH * P ORS A3,FLASH STORE NEW LAMPS TO F
0x298fb8…29914c Dummy {f00=0x00d3, f01=0x0190, f02=» PFL020 EQU * P C1R A3,A3 P ANS A3,SPDLCI . P RF SOPONOF D P* X P EJECT b P* p PFLTUT EQU * FLASH TIME OUT z P LDKL A6,DWSO01 P LD A3,FLASH 0 P RF(Z) FL030 NO MORE FLASHING FOR THIS TIME P LDKL A1,-TI
0x29914c…2992e0 Dummy {f00=0x00d3, f01=0x018e, f02=» RF EXIT END I/O P XIF P EJECT $ P* 2 PSOPOFF EQU * < , P C1R A3,A3 GET COMPLEMENTED CONTROL WORD P 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 SOPO
0x2992e0…299474 (5, 295) Dummy {f00=0x00d3, f01=0x0190, f02=» " P* A3 CONTAINS CONTROL WORD . P ORS A3,SPDLCI SET LIGHTS TO BE TURNED ON * P IFT WRFLA=1 P C1R A3,A3 p * P ANS A3,FLASH STOP SOME OTHER FLASHING P XIF P* P* COMMON ON/OFF PATH: P* 0 PSOPONOFF LD A1,SPDLCI GET
0x299474…299608 Dummy {f00=0x00d3, f01=0x018e, f02=»**************************** P* * $ P* S.O.P. INTERRUPT HANDLER * H P* * l P**************************** P* P* @ P* THE INTERRUPT HANDLER WILL TAKE CARE OF ALL INTERRUPTS.
0x299608…29979c Dummy {f00=0x00d3, f01=0x0190, f02=» & P CF A15,SAVE8 SAVE A1-A8 ON STACK P XIF 2 P* > P IFT CPU852=0 H " P MSR 8,A15 SAVE A1-A8 ON STACK ^ 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 C
0x29979c…299930 Dummy {f00=0x00d3, f01=0x0190, f02=»0 " P LDKL A6,DWSI02 ANY REQUEST ON P LD A4,DWTST,A6 STATUS WORD 0 P RF(N) IHSOP2 NO T $ P LD A8,DWTECB,A6 GET ECB-ADDRESS l P ST A2,ECBCW,A8 STORE INDEX ( P CM ECBEL,A8 RESET EFFECTIVE LENGTH P LDK A1,0 P CF A15,TENDIO END
0x299930…299ac4 Dummy {f00=0x00d3, f01=0x018e, f02=»D A8,DWTECB,A6 GET ECB-ADDRESS P & & PIHSOP3 ST A2,ECBCW,A8 STORE INDEX . P X , PENDIO CM ECBEL,A8 RESET EFFECTIVE LENGTH ` P LDK A1,0 P CF A15,TENDIO END I/O P $ PEXIT ABL TDISP GO TO DISPATCHER P EJECT P* * P
0x299ac4…299c58 Dummy {f00=0x00d3, f01=0x0190, f02=» * P* * * P************************************* 2 P* ` P* j : P* THIS ROUTINE IS A SUBROUTINE TO THE POWER FAILURE t 8 P* RECOVERY ROUTINE (PFAR). IT'S ENTRY POINT SHOULD @ P* BE PRESENT IN THE POWE
0x299c58…299dec Dummy {f00=0x00d3, f01=0x0190, f02=»AVED IN DWTCHP r P* P* PSOPR EQU * ENTRY POINT * P IFT CPU852=1 J & 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* " P CIO A1,1,SOPDA ACTIVA
0x299dec…299f80 Dummy {f00=0x00d3, f01=0x018e, f02=»DIT=0 " P LDKL A2,-2 POWER UP INDICATOR P XIF 4 P IFT CREDIT=1 @ P LDK A2,0 V P XIF h P t P IFF SOPX=0 | " 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 P
0x299f80…29a114 (5, 296) Dummy {f00=0x00d3, f01=0x0190, f02=» | P STR A2,A6 IND POWER UP P ( PSOPR2 RB IHSOP1 0 P EJECT H P* V P* D W S I 0 1 : INPUT DWT ` P* PDWSI01 EQU * , P DATA 0 CHANNEL PARAMETER: POWER UP IND , P DATA /8000 /8000 MEANS DEVICE IS READY P DATA
0x29a114…29a2a8 Dummy {f00=0x00d3, f01=0x0190, f02=»G=1 & " DATA 0 SAVE AREA USER ECB ADDRESS P DATA DEVECI MMU ECB ADDRESS 6 PDEVECI EQU * Z P DATA 0,0,0,0,0,0 n P XIF P* P* D W S O 0 1 : OUTPUT DWT P* P* PDWSO01 EQU * " P DATA /0040 CHANNEL PARAMETER
0x29a2a8…29a43c Dummy {f00=0x00d3, f01=0x0190, f02=»S BLOCK r P DATA 0 TTAB-ADDRESS $ P DATA 0 WAIT/ACTIVATE INDICATOR , P DATA 0 TERMINAL QUEUE T IFT MMUPAG=1 r & " DATA 0 SAVE AREA USER ECB ADDRESS P DATA DEVECO MMU ECB ADDRESS XIF P DATA 0 TIMER POINTER . PFLASH DA
0x29a43c…29a5d0 Dummy {f00=0x00d3, f01=0x018e, f02=» P* ! * P* D W S I 0 2 : EXTENDED INPUT DWT ! P* ! @ P ! J PDWSI02 EQU * ! R P IFF SOPX=0 ! f P DATA 0 ! z P DATA /8000 ! P DATA 0 ECB ADDRESS ! P DATA 0 ORDER ! P DATA SOPADI ! P DATA 0,0,0 ! IFT MMUPAG=1 !
0x29a5d0…29a764 Dummy {f00=0x00d3, f01=0x4036, f02=» ! P* " P* " P* " P END " &@ " 2T ! P* ! @ P ! J PDWSI02 EQU * ! R P IFF SOPX=0 ! f P DATA 0 ! z P DATA /8000 ! P DATA 0 ECB ADDRESS ! P DATA 0 ORDER ! P DATA SOPADI ! P DATA 0,0,0 ! IFT MMUPAG=1 !
0x29a764…29a8f8 Dummy {f00=0x00d3, 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
0x29a8f8…29aa8c Dummy {f00=0x00d3, f01=0x0190, f02=» P* P* P DATA DVBLEN BUFFER LENGTH P DATA 2 DEVICE INDEX : PDYAD EQU * ADDRESS BLOCK V P DATA ACDY ACTIVATION DRIVER v $ P DATA ABDY ABORT ROUTINE ADDRESS P DATA IHDY INTERRUPT HANDLER P DATA RCDY RECOVERY ROUTINE .
0x29aa8c…29ac20 Dummy {f00=0x00d3, f01=0x0190, f02=»E,/1F14 P EJECT P* P* A C D Y ( P* < * P* ACDY = ACTIVATION DRIVER DISPLAY F P* t H P* ORDER 00: TEST STATUS. DUMMY IS SENT TO DISPLAY AND RETURN CODE ~ 2 P* IS SET IF DISPLAY NOT OPERABLE P*
0x29ac20…29adb4 (5, 297) Opaque[0x194]
0x29adb4…29af48 # DirEnt {nam=»DRSW01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1a80, f03=0x0000}
0x29adb4…29af48 IdxSect {
0x29adb4…29af48 f00 = 0x00d4 // 0x29adb4 @0x0
0x29adb4…29af48 f01 = 0x0008 // 0x29adb6 @0x2
0x29adb4…29af48 gno = [ // 0x29adb8 @0x4
0x29adb4…29af48 [0x00]: C0x00d4.0x0.0
0x29adb4…29af48 [0x01]: C0x00d4.0x1.0
0x29adb4…29af48 [0x02]: C0x00d4.0x2.0
0x29adb4…29af48 [0x03]: C0x00d4.0x3.0
0x29adb4…29af48 ]
0x29adb4…29af48 }
0x29af48…29b0dc Dummy {f00=0x00d4, f01=0x0190, f02=» 2 P IDENT DRSW01 REL 10.0 80-03-14 870105041000 P : B J * R * H C******************************************************************* f * $ * PHILIPS TERMINAL SYSTEM PTS * P* DRSW01 = DRIVER SWITCH
0x29b0dc…29b270 Dummy {f00=0x00d4, f01=0x0190, f02=» L * * 4 0* THIS MODULE CONTAINS THE FOLLOWING FUNCTIONS 8 P* WHICH ARE COMMON PARTS FOR CHANNEL UNIT DRIVERS. T P* P* H D* -OUTPUT SEND ONE CHARACTER,SAVE A3-A5 AND RETURN TO DISPATCHER * 8 4* -OUTLIN
0x29b270…29b404 Dummy {f00=0x00d4, f01=0x0190, f02=» IF INTERRUPT IS ALLOWED, RESTORE A3-A5 AND RETURN * TO USER VIA A5 < * ` : 5* -LDREGE RESTORE A3-A5 AND RETURN TO USER VIA A5 j * 4 /* -GETCHR GET ONE CHARACTER FROM ECB-BUFFER * * -ECHO ECHO C
0x29b404…29b598 Dummy {f00=0x00d4, f01=0x0190, f02=» *********** * * & P ENTRY OUTLIN SEND CHARACTER 0 : P ENTRY OUTPUT SAVE REGISTERS, SEND CHAR. AND DISPATCH T ( P ENTRY LDREG RESTORE A3-A5 ANDRETURN . P ENTRY LDREGE WAY BACK FROM ECHO HANDLING P ENTRY LDREGF RETURN
0x29b598…29b72c Dummy {f00=0x00d4, f01=0x018e, f02=»HO t P ENTRY ECHO ECHO ROUTINE P ENTRY ECHEND END OF ECHO * EJECT L * Z * d $ ******************************** n $ * EXTERNAL TOSS MODULE ENTRIES * $ ******************************** * & P EXTRN SAVE8 SAVE REGIST
0x29b72c…29b8c0 Dummy {f00=0x00d4, f01=0x0190, f02=» P EXTRN OUTSAL SALCUZ DRIVER P EXTRN OUTASC ASCU4Z DRIVER ( EJECT L * Z ****************** d * DWT PARAMETERS * ~ ****************** * * EXTRN DWTST STATUS EXTRN DWTOR ORDER EXTRN DWTEC
0x29b8c0…29ba54 (5, 298) Dummy {f00=0x00d4, f01=0x0190, f02=» A3 z P EXTRN DWTA4 SAVE AREA A4 P EXTRN DWTA5 SAVE AREA A5 . P EXTRN DWTSB2 STACK BASE 2 P " P EXTRN DWTECH ECHO DEVICE DWT r P* , P EXTRN ECHADR ECHO ADDRESS DISPLACEMENT * P EJECT P* P********************
0x29ba54…29bbe8 Dummy {f00=0x00d4, f01=0x0190, f02=»ETTING X:A=0 P* PX:A EQU 1 PCECHO EQU X:A 0 P* F , P* BY SETTING X:B=1 DRIVER FOR LOCAL OR P $ P* REMOTE TERMINALS CAN BE USED P* PX:B EQU 1 PLRT EQU X:B P* 2 P* BY SETTING X:C=1 SALCUZ DRIVER CAN
0x29bbe8…29bd7c Dummy {f00=0x00d4, f01=0x0190, f02=» P* PX:D EQU 1 PASCU4Z EQU X:D P* 6 < P* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION SET @ , P* IS OBTAINED BY SETTING CPU852 EQU 0 P* PCPU852 EQU 1 P* P EJECT P* P* O U T L I N P
0x29bd7c…29bf10 Dummy {f00=0x00d4, f01=0x0190, f02=»PU852=1 & P CF A15,SAVE8 SAVE A1-A8 ON STACK P XIF : P* F P IFT CPU852=0 P " P MSR 8,A15 SAVE A1-A8 ON STACK f P XIF P* " P LDR* A1,A6 CHANNEL PARAMETER P ANK A1,/F CHANNEL INDEX P* P IFT LRT=1 P SUK
0x29bf10…29c0a4 Dummy {f00=0x00d4, f01=0x018e, f02=»7,/C P RF(N) OUTL10 P SUK A7,/3 " P ABL(N) OUTASC ASCU4Z 4 P XIF R P* ^ POUTL10 EQU * h P IFT SALCUZ=1 | P SUK A1,/F P ABL(E) OUTSAL SALCUZ P XIF P RF EXIT P EJECT P* P* O U T P U T
0x29c0a4…29c238 Dummy {f00=0x00d4, f01=0x0190, f02=» POUTPUT EQU * P ANK A2,/FF P LDR A1,A2 0 P SUK A1,/82 STX ? B P RF(E) OUTP05 YES P SUK A1,/15 ETB ? v P RF(NE) OUTP10 NO POUTP05 EQU * " P LDR* A1,A6 CHANNEL PARAMETER P ANK A1,/C LT? P RF(E) LDRE10
0x29c238…29c3cc Dummy {f00=0x00d4, f01=0x0190, f02=» EJECT P* P* P* S T R E G " P* 8 : P* INDICATE INTERRUPTS ALLOWED AND SAVE A3-A5 IN DWT B P* P* PSTREG EQU * P INH P LDKL A1,/100 0 P ORS A1,DWTST,A6 INDICATE INTERRUPTS ALLOWED $ P ST A3,DWT
0x29c3cc…29c560 Dummy {f00=0x00d4, f01=0x0190, f02=»CT P* P* L D R E G P* * > P* IF INTERRUPT ALLOWED RESTORE A3-A5 FROM DWT AND RETURN 4 & P* VIA A5. ELSE GO TO DISPATCHER. v P* P* PLDREG EQU * P LD A3,DWTST,A6 P ANKL A3,/100 P RB(Z) EXIT
0x29c560…29c6f4 (5, 299) Dummy {f00=0x00d4, f01=0x0190, f02=» P* P* PLDREGF EQU * & P LD A5,DWTA5,A6 A5 , PLDREGE EQU * V & P LD A3,DWTA3,A6 RELOAD REGISTER A3 j & P LD A4,DWTA4,A6 A4 $ PLDRE10 LD A7,DWTOR,A6 GET ORDER P ANK A7,/FF P LD A8,DWTECB,
0x29c6f4…29c888 Dummy {f00=0x00d4, f01=0x0190, f02=» ONE CHARACTER FROM ECB-BUFFER z P* & P* ON ENTRY: 0 P* F P* A3 = BUFFER INDEX P P* A8 = ECB-ADDRESS n P* P* ON EXIT: P* P* A2 = CHARACTER * P* A1 = 0 IF LAST CHARACTER ELSE # 0 P* J
0x29c888…29ca1c Dummy {f00=0x00d4, f01=0x018e, f02=»ESTED LENGTH P SUR A1,A3 * P RF(NP) GCH010 LAST CHARACTER REACHED & " P LD A2,2,A8 GET BUFFER ADDRESS T P ADR A2,A3 z P LCR A2,A2 CHAR. TO A2 P ANK A2,/FF $ P ADK A3,1 INCREMENT BUFFER INDEX P RF GCH020 , PGCH010 ST A3,6,A
0x29ca1c…29cbb0 Dummy {f00=0x00d4, f01=0x0190, f02=» P* P* P* E C H O , E C H E N D P* > < P* SUBROUTINE TO ECHO CHARACTER CONTAINING TWO PARTS, H . P* ONE GENERAL AND ONE DEVICE-DEPENDENT P* 4 P* PART ONE: FIND DWT-ADDRESS OF ECHO-DEVICE, 2 P*
0x29cbb0…29cd44 Dummy {f00=0x00d4, f01=0x018e, f02=»ORE CHARACTERS t 2 P* CORRESPONDING TO ONE CHARACTER 4 P* TO BE STORED IN INPUT ECB-BUFFER L P* P* 4 P* PART ONE FOLLOWS AND PART TWO CAN BE FOUND 4 P* IN THE DRIVER MODULE CORRESPONDING TO ECHO P
0x29cd44…29ced8 Dummy {f00=0x00d4, f01=0x0190, f02=» p 6 P* THE ECHO-ROUTINE SHOULD BE TERMINATED WITH A P* JUMP TO 'ECHRTN'. B P* ` PECHEND EQU * j P* ~ P IFT CECHO=1 P* $ P LDKL A7,/8000 INDICATE END I/O P XIF PECHO EQU * P IFT CECHO=1 & P ST A3,D
0x29ced8…29d06c Dummy {f00=0x00d4, f01=0x0190, f02=») RETUR NO ECHO REQUESTED 0 P LDR A4,A6 SAVE DWT-ADDRESS OF INPUT DEVICE " 2 P LD A6,DWTECH,A6 DWT-ADDRESS OF OUTPUT DEVICE V 6 P ST A4,DWTWAT,A6 SAVE DWT-ADDRESS OF INPUT DEVICE P LDKL A5,DWTSB2 & P ADR A5,A6 STACKBASE-ADDRESS IN A5 . P
0x29d06c…29d200 Dummy {f00=0x00d4, f01=0x410a, f02=» P IFT CECHO=1 P LDR A7,A7 END? P RF(NN) ERETUR NO 0 ( P CF A15,TENDIO END I/O OUTPUT DEVICE J > PERETUR LD A6,DWTWAT,A6 RELOAD DWT-ADDRESS OF INPUT DEVICE v 4 PRETUR ABL LDREGF RELOAD A3-A5 AND RETURN VIA A5 P* END @
0x29d200…29d394 (5, 300) Dummy {f00=0x00d4, f01=0x2008, f02=» RE A3-A5 AND RETURN l * TO USER VIA A5 $ * H : 5* -LDREGE RESTORE A3-A5 AND RETURN TO USER VIA A5 R * 4 /* -GETCHR GET ONE CHARACTER FROM ECB-BUFFER * 6 1* -LOGG LOGG OF INPUT AND OUTPUT CHARA
0x29d394…29d528 Dummy {f00=0x00d4, f01=0x0190, f02=» IF VIDEO (6344) SET CURSOR ADDRESS DIRECT . P XIF / 2 * P LD A4,10,A8 GET REQUESTED CURSOR POS / > . P ST A4,DWTAP,A6 UPDATE LINE & POS COUNTER / l P CF A5,CURPOS SET CURSOR / P RF ADY380 / P IFT WHATDY=0 / P* GET LINE / * PADY205 LC A4
0x29d528…29d6bc Dummy {f00=0x00d4, f01=0x0190, f02=»END OF LINE / l PADY207 EQU * 0 $ P LC A3,DWTAP,A6 GET ACTUAL LINE 0 ( PADY210 CWR A4,A3 0 P . P RF(N) ADY250 REQUESTED LINE ABOVE ACTUAL 0 h P RF(E) ADY300 SAME LINE 0 P LDK A2,LF LINE FEED 0 * P ADK A3,1 INCREMENT ACTUAL LINE NUMBER 0 PADY2
0x29d6bc…29d850 Dummy {f00=0x00d4, f01=0x0190, f02=»ADY250 LDK A2,HOME HOME 0 & P LDK A3,1 RESET ACTUAL LINE NUMBER 1 " P ST A3,DWTAP,A6 RESET POSITION 1 J P RB ADY230 1 p 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 REQUESTED POSITIO
0x29d850…29d9e4 Dummy {f00=0x00d4, f01=0x0190, f02=»WK A4,1 FIRST POSITION ? 1 P RF(NE) ADY305 NO 2 P CWR A4,A3 FIRST LINE ? 2 : P RF(NE) ADY305 NO 2 Z P LDK A2,HOME CURSOR GO HOME 2 t P RF ADY330 2 * PADY305 RF(NL) ADY307 REQ. POS NOT ZERO 2 P LDK A4,1 2 0 PADY307 LC A3,DWTAP+1,A6 GET AC
0x29d9e4…29db78 Dummy {f00=0x00d4, f01=0x0190, f02=»DS 2 l P RF(E) ADY370 POSITION FOUND 3 P RF(N) ADY340 BACK 3 . P LDK A2,CURRIG CURSOR RIGHT 3 H & P ADK A3,1 UPDATE POSITION COUNTER 3 l PADY330 CF A5,OUTPUT SEND 3 P RB ADY310 3 . PADY340 SUR A3,A4 ACTUAL POS. - WANTED POS. 3 , P CWR A3,A4 COM
0x29db78…29dd0c Dummy {f00=0x00d4, f01=0x0190, f02=»N 3 p P RB ADY330 4 " PADY345 LDK A2,BACKSP BACKSPACE 4 P CF A5,OUTPUT SEND 4 B P SUK A3,1 LAST BACKSPACE ? 4 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 BUFFER INDEX 4 P A
0x29dd0c…29dea0 Dummy {f00=0x00d4, f01=0x0190, f02=»* 4 P EJECT 5 P* 5 P* 5 " 8 P* SEND LAST DUMMY, SET CURSOR POSITION IN CONTROL 5 , 4 P* WORD, LOAD A1 WITH RETURN CODE AND END I/0. 5 h P* 5 PADY405 EQU * 5 & P LDR* A1,A6 GET CHANNEL PARAMETER 5 P ANK A1,/30 6344 ? 5 P RF(NE
0x29dea0…29e034 (5, 301) Opaque[0x194]
0x29e034…29e1c8 # DirEnt {nam=»DRTC01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1aa0, f03=0x0000}
0x29e034…29e1c8 IdxSect {
0x29e034…29e1c8 f00 = 0x00d5 // 0x29e034 @0x0
0x29e034…29e1c8 f01 = 0x0012 // 0x29e036 @0x2
0x29e034…29e1c8 gno = [ // 0x29e038 @0x4
0x29e034…29e1c8 [0x00]: C0x00d5.0x0.0
0x29e034…29e1c8 [0x01]: C0x00d5.0x1.0
0x29e034…29e1c8 [0x02]: C0x00d5.0x2.0
0x29e034…29e1c8 [0x03]: C0x00d5.0x3.0
0x29e034…29e1c8 [0x04]: C0x00d6.0x0.0
0x29e034…29e1c8 [0x05]: C0x00d6.0x1.0
0x29e034…29e1c8 [0x06]: C0x00d6.0x2.0
0x29e034…29e1c8 [0x07]: C0x00d6.0x3.0
0x29e034…29e1c8 [0x08]: C0x00d7.0x0.0
0x29e034…29e1c8 ]
0x29e034…29e1c8 }
0x29e1c8…29e35c Dummy {f00=0x00d5, f01=0x0190, f02=» 2 P IDENT DRTC01 REL 10.0 80-03-14 870105041000 P : P* B P* L < P******************************************************* V P* $ P* PHILIPS TERMINAL SYSTEM PTS P* . P* DRTC01 = DRIVER TAPE CASSETTE RECORDER P*
0x29e35c…29e4f0 Dummy {f00=0x00d5, f01=0x0190, f02=» > P* THIS DRIVER HANDLES ONE OR TWO TAPE CASSETTE RECORDERS & P* CONNECTED TO CPU VIA CHCR-DCR F P* p > P* ONLY ONE RECORDER CAN BE BE OPERATED AT A TIME, EXCEPT z P* AT REWIND AND UNLOAD P* : P* DATA IS RECORDED IN BLOCKS WIT
0x29e4f0…29e684 Dummy {f00=0x00d5, f01=0x0190, f02=»HE FOLLOWING PARTS: t P* " P* T C D A : ACTIVATION PART & P* L $ P* I H T C : INTERRUPT HANDLER V P* ~ & P* R C O V E R : RECOVERY ROUTINE P* * P* D W T C 0 1 : DEVICE WORK TABLE 01 P* * P* D W T C 0 2 : DE
0x29e684…29e818 Dummy {f00=0x00d5, f01=0x018e, f02=»ATED: p P* P* ORDER /00: TEST STATUS P* /02: READ : P* /05: WRITE V P* /06: WRITE v " P* /22: WRITE TAPE MARK P* /26: LOCK P* /31: REWIND P* /33:
0x29e818…29e9ac Dummy {f00=0x00d5, f01=0x0190, f02=» ~ P* P* , P* THE FOLLOWING RETURN CODES ARE USED: P* L P* BIT 0 REQUEST ERROR V P* 2 BOT/EOT t P* 3 TAPE MARK DETECTED P* 6 WRITE PROTECTED P* 7 B-SIDE , P* 9 REWIND TIME-OUT (+BOT M
0x29e9ac…29eb40 Dummy {f00=0x00d5, f01=0x018e, f02=»OVERY 6 P* -POWER RECOVERY WHEN SEQ. COUNTER NOT USED , P* -POWER RECOVERY NOT SUCCESSFULL H P* 12 INCORRECT LENGTH x * P* 13 CRC ERRROR (+NO DATA/ERASED) P* 14 THROUGHPUT ERROR P* 15 NOT OPERABEL P
0x29eb40…29ecd4 (5, 302) Dummy {f00=0x00d5, f01=0x0190, f02=» P* A2: SST STATUS * P* A3: DWT STATUS AFTER SST ( " P* A4: RETRY COUNTER V : P* A5: SEQUENCE CHARACTER AFTER READ/WRITE | P* A6: DWT ADDRESS & P* A8: SUBROUTINE STACK P
0x29ecd4…29ee68 Dummy {f00=0x00d5, f01=0x0190, f02=» HANDLE: P* " P* -ONLY ONE CASSETTE RECORDER 0 P* -ORDERS REVERSE, ERASE AND LOCK EXCLUDED @ P* t P EJECT DRTC01 ~ P* P* P*********** P* ENTRIES * P*********** P* P* " P ENTRY IHTC IN
0x29ee68…29effc Dummy {f00=0x00d5, f01=0x0190, f02=»N POWER UP RECOVERY P P $ P , P* 4 P* > $ P******************************** H $ P* EXTERNAL TOSS MODULE ENTRIES * p $ P******************************** P* P* & P EXTRN TDISP DISPATCHER MAIN ENTRY 4 P EXTRN SAV
0x29effc…29f190 Dummy {f00=0x00d5, f01=0x0190, f02=» EXTRN TENDIO GLOBAL END-OF-I/O ROUTINE . P EXTRN DISEND GO TO DISPATCHER VIA TENDIO 0 4 P EXTRN DISIOE DISPATCHER I/O REQUEST ERROR ENTRY b * P EXTRN INTSAV SAVE AREA LAST INTERRUPT * P EXTRN INIFLG INIT FLAG AT PGM LOADING ( P EXTRN ECBRL REQUE
0x29f190…29f324 Dummy {f00=0x00d5, f01=0x0190, f02=»CESSING FLAG v P EJECT DRTC01 P* , P* 6 P****************** @ P* DWT PARAMETERS * Z P****************** t P* P* & P EXTRN DWTST DWT SOFTWARE STATUS: . P* BIT # 0 - DEVICE AND CONTROLLER READY 0 P* BIT #1
0x29f324…29f4b8 Dummy {f00=0x00d5, f01=0x018e, f02=»#14 - A-SIDE * P BIT #15 - DEVICE LOCKED (OPERABLE) P EXTRN DWTOR DWT ORDER B " P EXTRN DWTECB DWT ECB ADDRESS ` P EJECT DRTC01 P* P************************ P* CONDITIONAL ASSEMBLY * P************************ P
0x29f4b8…29f64c Dummy {f00=0x00d5, f01=0x0190, f02=» PDBCAS EQU X:A P* 6 P* ORDERS REVERSE, ERASE AND LOCK MAY BE EXCLUDED ( P* BY SETTING X:B=0 b P* ~ PX:B EQU 0 PREVER EQU X:B P* . P* A PROGRAM VERSION USING TOSS MMU PAGING * P* IS OBTAINED BY SETTING MMU
0x29f64c…29f7e0 Dummy {f00=0x00d5, f01=0x018e, f02=»BTAINED BY SETTING CPU852 EQU 0. P* ( PCPU852 EQU 1 2 P* F P* MMU BUFFER SIZE P P* l PX:C EQU 129 v PDVBLEN EQU X:C P* P* MMU DEVICE INDEX P* PDEVIND EQU 2 P* P EJECT DRTC01 P*
0x29f7e0…29f974 (5, 303) Dummy {f00=0x00d5, f01=0x0190, f02=» t $ PTCAD DATA TCDA ACTIVATION ENTRY " P DATA 0 ABORT ROUTINE ADDRESS 0 P RES 4 SUBROUTINE STACK V PSTB EQU *-2 v P* P* $ PTAB DATA /0031,/2237,/3802,/0506 P IFT REVER=1 P DATA /2633,/24FF P XIF PTABL EQU
0x29f974…29fb08 Dummy {f00=0x00d5, f01=0x0190, f02=»********************* P* P* ( P* DEVICE ADDRESS: 2 P* L PCHCRDA EQU /0E V P* l P* v P************* P* CONSTANTS * P************* P* P* " PRTRIES EQU 3 MAX NO OF RETRIES P* * PPS
0x29fb08…29fc9c Dummy {f00=0x00d5, f01=0x0190, f02=»OCK COUNT INTERVAL p P* P IFT REVER=1 $ * PPERAS EQU 6 NO OF ERASE FOR ORDER /24 8 P XIF f P EJECT DRTC01 r P* P* P* T C D A P* H P* ACTIVATION PART : CHECK VALIDITY OF ORDERS AND START PROCESSING P
0x29fc9c…29fe30 Dummy {f00=0x00d5, f01=0x0190, f02=» P RF(E) TCDA20 VALID ORDER P SUK A4,1 & P RB(NN) TCDA10 TRY NEXT 8 P* X PTCDA15 EQU * b P ABL DISIOE ILLEGAL ORDER v P* ( PTCDA20 ADR A4,A4 DOUBLE TO GET INDEX P ST A4,TCDAX SAVE INDEX ( P LD A5,ECBRL,A8 GET REQUES
0x29fe30…29ffc4 Dummy {f00=0x00d5, f01=0x0190, f02=» P* PTCDA21 EQU * . P LDR A2,A3 RECOVERY/SEQUENCE ERROR STATUS " P ANK A2,2 T P RF(NZ) TCDR10 YES f P* P ADK A5,1 . P NGR A5,A5 MAKE REQUESTED LENGTH NEGATIVE 0 P ST A5,HELPME SAVE IT FOR RECOVERY PURPOSES P SUK A
0x29ffc4…2a0158 Dummy {f00=0x00d5, f01=0x0190, f02=»OUNTER OR NOT p P* ( PTCDA22 LD A3,2,A8 GET BUFFER ADDRESS 0 P ST A3,BUFADR SAVE IT FOR RECOVERY PURPOSES L P SUK A4,14 P RF(Z) TCDA23 WRITE P ADK A4,2 P RF(NZ) TCDA25 NOT WRITE P* * PTCDA23 ADK A5,3 CHECK REQUESTE
0x2a0158…2a02ec Dummy {f00=0x00d5, f01=0x0190, f02=» $ P LD A4,SEKBYT,A6 SEQ. COUNTING ? P RF(NZ) TCDA25 NO 0 , P LD A2,DWTBKC,A6 GET SEQUENCE CHARACTER J $ P SC A2,255,A3 STORE IT IN BUFFER z P* ( PTCDA25 ST A6,TCDADT SAVE ACTIVE DWT P EJECT DRTC01 P* P* P* SE
0x2a02ec…2a0480 Dummy {f00=0x00d5, f01=0x0190, f02=»ITCH TO LEVEL XY P LDR A1,A2 SAVE STATUS , P LDK A4,RTRIES PRESET NUMBER OF RETRIES 6 " P LDKL A2,0 GET FUNCTION INDEX f " PTCDAX EQU *-2 **ORDER INDEX** & P ABI TCDFUN,A2 BRANCH TO FUNCTION < PTCDFUN DATA ENDIO,REWIND,TM,LOAD,UNLOAD,READ
0x2a0480…2a0614 (5, 304) Dummy {f00=0x00d5, f01=0x0190, f02=» P* RECOVERY AFTER POWER ON P* & P* 0 PTCDRON EQU * : P IFT CPU852=1 N & P CF A15,SAVE8 SAVE A1-A8 ON STACK d P XIF P* P IFT CPU852=0 " P MSR 8,A15 SAVE A1-A8 ON STACK P XIF P* & P LD A1,INIFLG CHEC
0x2a0614…2a07a8 Dummy {f00=0x00d5, f01=0x0190, f02=»F A8,RCOVER RECOVERY P IFT DBCAS=2 P LDR* A6,A6 GET OTHER DWT 0 P CF A8,RCOVER RECOVERY R P XIF p P LDKL A4,0 GET ACTIVE DWT | , PTCDADT EQU *-2 **ACTIVATED DWT ADDRESS** $ P RF(Z) ENDIO NO REQUEST GOING ON $ P LDR A6,A4 PUT DWT
0x2a07a8…2a093c Dummy {f00=0x00d5, f01=0x0190, f02=»Y SEQ. INDICATOR z P ST A3,SEKBYT,A6 , P ORK A1,/10 IND SEQUENCE ERROR, BIT #11 0 P RF ENDIO ` P* r P EJECT DRTC01 | P* P* R E A D P* PREAD CF A8,READR READ RECORD P ANKL A1,/400 SAVE EOT BIT P ORR A
0x2a093c…2a0ad0 Dummy {f00=0x00d5, f01=0x0190, f02=»LS DONE | $ P CF A8,BKSP BACKSPACE ONE BLOCK P RB READ READ AGAIN 8 P* T PREAD20 LDR A2,A1 ^ P SLL A2,3 CHECK IF TAPE MARK v P RF(NN) READ30 NOT TAPE MARK P* ( PREAD25 ORK A3,/10 INDICATE TAPE MARK $ P LDK A7,0 RESET EFFE
0x2a0ad0…2a0c64 Dummy {f00=0x00d5, f01=0x0190, f02=»TIVE LENGTH** z P ANKL A2,/801 NO DATA,NOT OP P RF(NZ) READ32 : P LDR A7,A7 P " P RF(NZ) READ32 NOT EQUAL ZERO b P LDR A4,A4 THIRD TRIAL DONE , P RB(NZ) READ15 NO; READ SAME BLOCK AGAIN & P LDK A4,1 SET NO OF RETRIES TO ONE P R
0x2a0c64…2a0df8 Dummy {f00=0x00d5, f01=0x0190, f02=»F(NE) READ35 NO , P SUK A7,1 DECREMENT EFF. LENGTH COUNTER . P CC A5,DWTBKC+1,A6 CHECK SEQUENCE COUNTER H P RF(E) READ35 OK z P ORK A1,/10 SEQUENCE ERROR P* 2 PREAD35 IM DWTBKC,A6 INCREMENT SEQUENCE COUNTER P* * PREAD40 LD
0x2a0df8…2a0f8c Dummy {f00=0x00d5, f01=0x0190, f02=» PERFORMED p , P ST A2,ECBCW,A8 SAVE IT IN CONTROL WORD P* B PREAD50 EQU * L P ST A3,DWTST,A6 SAVE STATUS ` P EJECT DRTC01 P* P* P* END OF I/O OPERATION P* P* PENDIO EQU * ( P CM TCDADT INDICAT
0x2a0f8c…2a1120 Dummy {f00=0x00d5, f01=0x0190, f02=»ORS | P LDKL A2,/2000 P TM A1,A2 " P RF(Z) ENDIO2 4 P XRR A1,A2 RESET BIT 2 J " P ORK A1,/40 SET BIT 9 INSTEAD h P* PENDIO2 EQU * P SRL A2,2 P TM A1,A2 P RF(Z) ENDIO3 P XRR A1,A2 RESET BIT 4 P ORK
0x2a1120…2a12b4 (5, 305) Dummy {f00=0x00d6, f01=0x018e, f02=» BIT 5 $ P ORKL A1,/2000 SET BIT 2 INSTEAD P* 6 P EJECT DRTC01 @ P* X P* b PENDIO4 EQU * l P SRL A2,1 P TM A1,A2 & P RF(Z) ENDIO5 NOT WRITE PROTECTED P LD A7,DWTOR,A6 ORDER CODE P ANK A7,/3F P SUK
0x2a12b4…2a1448 Dummy {f00=0x00d6, f01=0x0190, f02=» x P* PENDIO5 EQU * P IFT DBCAS=2 & $ P CF A15,SWLXY SWITCH TO LEVEL XY : P LDR* A6,A6 GET OTHER DWT b * P CF A15,TENDIO PERFORM TENDIO FOR THIS P LDR* A6,A6 GET FIRST DWT P XIF $ P CF A15,SWLXY SWITCH TO LEVEL XY , P
0x2a1448…2a15dc Dummy {f00=0x00d6, f01=0x0190, f02=» PTM LDKL A3,-1 P ST A3,HELPME P* 0 P* W R I T E : P* P P* WRITE ONE BLOCK Z P* v P* , PWRITE LD A3,DWTBKC,A6 GET BLOCK COUNTER " P RF(NZ) WRIT10 NOT FIRST BLOCK & P CF A8,ERASE MAKE ONE BLANK BLOCK *
0x2a15dc…2a1770 Dummy {f00=0x00d6, f01=0x0190, f02=» A1,A2 P ANK A2,/0E ! P RF(Z) WRIT30 STATUS OK ! " P* ! B , PWRIT12 ST A4,WRITA4 STORE RETRY COUNTER ! L P LD A2,SEKBYT,A6 ! | P RF(Z) WRIT15 SEQ. COUNTING ! P* ! P EJECT DRTC01 ! P* ! P* ! $ P CF A8,BKSP BACKSPACE ONE
0x2a1770…2a1904 Dummy {f00=0x00d6, f01=0x018e, f02=»NDICATOR ! v P LD A4,WRITA4 GET NO ... " P LDR A2,A2 " 0 & P RF(NZ) WRIT40 POSITIONING NOT OK " B P SUK A4,RTRIES ... OF ERASE " l P* " PWRIT20 CF A8,ERASE ERASE " P ORR A1,A2 SAVE EOT " P ADK A4,1 COUNT ERASE " P RB(NG) WRIT20 NOT R
0x2a1904…2a1a98 Dummy {f00=0x00d6, f01=0x0190, f02=» . P ORR A1,A2 3 TRIALS DONE,SET ERASE BIT #4 # P RF WRIT50 GIVE UP # 6 P* # P P EJECT DRTC01 # Z P* # r P* # | PWRIT30 LD A2,TCDAX GET ORDER # P SUK A2,4 TAPE MARK WRITTEN? # P RB(NZ) READ30 NO # P LDR A2,A1 CHECK IF # P SLL
0x2a1a98…2a1c2c Dummy {f00=0x00d6, f01=0x0190, f02=»R # P* $ , PWRIT50 LD A7,EFFLEN GET EFFECTIVE LENGTH $ P RB READ40 $ D P* $ V P EJECT DRTC01 $ ` P* $ x P* $ P* L O A D $ P* $ P* LOAD CASSETTE $ P* $ P* $ " PLOAD CF A8,LOCK LOCK CASSETTE $ " P RF(Z) REW
0x2a1c2c…2a1dc0 Dummy {f00=0x00d6, f01=0x0190, f02=»* REWIND TAPE $ P* % P* % " , PREWIND CM DWTBKC,A6 CLEAR BLOCK COUNTER % , ( P CF A8,SBOT SEARCH BEGINNING OF TAPE % PREW010 EQU * % P LDR A3,A2 % P SRL A3,7 % P ANK A3,6 % P ORK A3,1 PREPARE STATUS % P RB LOAD10 % P* %
0x2a1dc0…2a1f54 (5, 306) Dummy {f00=0x00d6, f01=0x0190, f02=»AD CM DWTST,A6 RESET STATUS % P CF A8,UNLD UNLOAD CASSETTE & $ & PUNLO10 LDR A1,A2 SAVE RETURN CODE & H P ANKL A1,/FFFE SKIP BIT 15 & r P RB ENDIO & P IFT REVER=1 & P* & P* & P* R E V E R S & P* & P* BACKSPACE ONE BLOCK
0x2a1f54…2a20e8 Dummy {f00=0x00d6, f01=0x018e, f02=» & p P RB UNLO10 ' P* ' P EJECT DRTC01 ' $ P* ' < P* ' F P* E R T A P E ' P P* ' h P* ERASE TAPE ' r P* ' P* ' ( PERTAPE LDK A4,PERAS SET NO OF ERASE ' & PERT10 CF A8,ERASE ERASE ONE BLOCK ' P ANKL A1,/400 SAVE EOT
0x2a20e8…2a227c Dummy {f00=0x00d6, f01=0x0190, f02=» P* O L O C K ( P* ( P* ORDER LOCK CASSETTE ( $ P* ( D P* ( N " POLOCK CF A8,LOCK LOCK CASSETTE ( X " P RB(Z) REW010 CASSETTE LOCKED ( ~ P RB LOAD10 ( P XIF ( P* ( P EJECT DRTC01 ( P* ( P* ( P* CASSETTE COMMA
0x2a227c…2a2410 Dummy {f00=0x00d6, f01=0x0190, f02=»Y ( t P IFT DBCAS=1 ) P LDK A3,0 SELECT CODE ) P XIF ) < P IFT DBCAS=2 ) H P LDR* A3,A6 GET OTHER DWT ) " P ANS A2,DWTST,A3 SET DWT BUSY ) ~ P ANK A3,1 GET SELECT CODE ) P XIF ) P* ) PCRCOM LD A2,PFPOST ) P RF(NZ) EXIT PFINI
0x2a2410…2a25a4 Dummy {f00=0x00d6, f01=0x0190, f02=»CHAR TO A5 ) P* * PREADSQ EQU * * P LDK A3,/A * 0 , P ST A3,REQLEN MAKE REQUESTED LENGTH > 0 * B P RB CRCOM * r P* * P EJECT DRTC01 * P* * P* READ ONE RECORD * P* * PREADR LDK A3,/A * , PREADR1 CM EFFLEN RESET EFFEC
0x2a25a4…2a2738 Dummy {f00=0x00d6, f01=0x0190, f02=» LENGTH * x PHELPME EQU *-2 **HELPME** + P ST A2,REQLEN + 2 P RB CRCOM + H P* + Z P* WRITE ONE RECORD + d P* + ~ PWRITER LDK A3,/B + P RB READR1 + P* + P* ERASE ONE BLOCK + P* + PERASE LDK A3,9 + P RB CRCOM + P
0x2a2738…2a28cc Dummy {f00=0x00d6, f01=0x0190, f02=» BEGINNING OF TAPE + P* , PSBOT LDK A3,8 , $ P RB CRCOM , : P* , L & P* REWIND TAPE AND UNLOCK CASSETTE , V P* , PUNLD LDK A3,/F , P RB CRCOM , P* , P* BACKSPACE ONE BLOCK , P* , PBKSP LDK A3,/E , P RB CRCOM ,
0x2a28cc…2a2a60 Dummy {f00=0x00d6, f01=0x0190, f02=» P* - P* - PIHTC EQU * - $ P ST P,INTSAV SAVE LAST INTERRUPT - * P STR A5,A15 SAVE A5 ON STACK - R P SST A5,CHCRDA - v P RF(A) SST SST ACCEPTED - P IM REQLEN INCREMENT COUNTER - P RF(Z) CIOHLT - & P RF(P) INRSQ GET SEQUENCE COUNTER
0x2a2a60…2a2bf4 (5, 307) Dummy {f00=0x00d6, f01=0x0190, f02=»EMENT BUFFER ADDRESS - 4 P LD A5,TCDAX GET FUNCTION SWITCH FOR READ/WRITE . P SUK A5,10 . T P RF(NZ) IHTC05 WRITE . f P* . & PIHTC02 INR A5,0,CHCRDA READ CHAR. . ( P SCR A5,A3 STORE CHARACTER IN BUFFER . P RF EXIT2 . P* . PIHTC05 EQU
0x2a2bf4…2a2d88 Dummy {f00=0x00d6, f01=0x018e, f02=» A5,TCDA5 . * P IM EFFLEN INCREMENT EFFECTIVE LENGTH / . P LDR* A3,A15 RESTORE A3 AND A5 FROM STACK / @ P* / r PEXIT3 LDR* A5,A15 / | P RTN A15 / P* / * PINRSQ INR A5,0,CHCRDA READ CHAR TO A5 / P ST A5,TCDA5 / P RB EXIT3 / P* /
0x2a2d88…2a2f1c Dummy {f00=0x00d6, f01=0x0190, f02=» P XIF 0 P* 0 P IFT CPU852=0 0 " P MSR 8,A15 SAVE A1-A8 ON STACK 0 0 P XIF 0 V P* 0 b P LDKL A1,0 0 l PTCDA1 EQU *-2 0 ~ P LDKL A4,0 0 PTCDA4 EQU *-2 0 P LDKL A5,0 0 PTCDA5 EQU *-2 0 P LDKL A6,0 0 PTCDA6 EQU *-2 0
0x2a2f1c…2a30b0 Dummy {f00=0x00d6, f01=0x0190, f02=» 0 P LDR A3,A2 GET STATUS 1 P SLL A3,9 SHIFT 1 & P ST A3,2,A8 SAVE ON STACK 1 > ( P LD A3,DWTST,A6 PUT DWT STATUS IN A3 1 ` P* 1 PIHTRTN EQU * 1 P RTN A8 1 P* 1 PCIOHLT EQU * 1 P CIO A1,0,CHCRDA CIO-HALT 1 P RB EXIT3 1
0x2a30b0…2a3244 Dummy {f00=0x00d6, f01=0x0190, f02=»DISPATCHER 1 ~ P* 2 P EJECT DRTC01 2 P* 2 4 P* 2 > P* R C O V E R 2 H P* 2 ` : P* RECOVERY ROUTINE : POSITIONING OF TAPE AT POWER ON 2 j P* 2 P* 2 PRCOVER EQU * 2 P CF A8,SELECT SELECT 2 P ANK A3,1 2 2 P RB(Z) IHT
0x2a3244…2a33d8 Dummy {f00=0x00d6, f01=0x018e, f02=»D 2 j P RF(NZ) RC0050 YES 3 ( P CF A8,SBOT SEARCH BEGINNING OF TAPE 3 $ P SLL A2,5 3 P P RF(NN) REPER BOT NOT FOUND 3 b P RF REPOK 3 P* 3 ( PRC0050 LD A1,SEKBYT,A6 SEQ. COUNTING 3 P RF(NZ) REPER NO 3 P* 3 P EJECT DRTC01 3 P
0x2a33d8…2a356c Dummy {f00=0x00d6, f01=0x0190, f02=» 4 P* EXIT: A2 EQ ZERO SUCCESS 4 8 P* A2 NOT EQ ZERO NO SUCCESS 4 < P* 4 x P* 4 PREPOS EQU * 4 $ P LDK A4,8 SET REPOSITIONING BIT 4 " P ORS A4,DWTST,A6 STORE IN DWT 4 P* 4 PREP005 EQU * 4
0x2a356c…2a3700 Dummy {f00=0x00d6, f01=0x0190, f02=» 4 v & P LD A2,DWTBKC,A6 GET BLOCK COUNTER 5 P SUK A2,8 GREATER 8 ? 5 2 P RF(G) REPER YES 5 P . P CF A8,SBOT NO DATA; SEARCH BEGIN OF TAPE 5 h P SLL A2,5 5 P RF(NN) REPER BOT NOT FOUND 5 " P LDKL A5,-1 RESET SEQ. COUNTER 5 P RF REP020 READ SE
0x2a3700…2a3894 (5, 308) Dummy {f00=0x00d6, f01=0x0190, f02=»IN 5 t $ P LDK A4,PREAD SET NO OF MAX READ 6 P* 6 2 & PREP017 CF A8,READSQ READ SEQ. CHAR 6 < P LDKL A7,/180F SET READ MASK 6 f P TM A2,A7 6 P RF(Z) REP020 READ OK 6 P SUK A4,1 COUNT READ 6 $ P RB(P) REP017 NOT ALL READ DONE 6 P RF REP060
0x2a3894…2a3a28 Dummy {f00=0x00d6, f01=0x0190, f02=»NK A4,/FF READ FORWARD. 6 P CWK A4,PINT TOO MANY BLOCKS 7 P RF(G) REPER YES 7 D P* 7 P EJECT DRTC01 7 f P* 7 ~ P* 7 " PREP030 SUK A4,1 POSITION TAPE 7 P RF(N) REP040 READY 7 " P CF A8,READSQ READ NEXT BLOCK 7 P RB REP030 7
0x2a3a28…2a3bbc Dummy {f00=0x00d6, f01=0x0190, f02=» REP045 YES 7 P SUK A4,1 COUNT RETRY 8 P RF(NP) REP060 GIVE UP 8 2 P CF A8,BKSP BACKSPACE 8 P " P CF A8,READSQ READ SEQ NUMBER 8 n P RB REP042 8 P* 8 P EJECT DRTC01 8 P* 8 P* 8 PREP045 SLC A2,3 8 P RF(NN) REP050 NOT T
0x2a3bbc…2a3d50 Dummy {f00=0x00d6, f01=0x0190, f02=» NUMBER 8 v P CC A5,DWTBKC+1,A6 9 P RF(E) REPOK EQUAL 9 * P* 9 D PREP060 LD A7,DWTST,A6 9 N $ P ANK A7,8 TRY POSITIONING AGAIN? 9 l P RF(Z) REPER NO 9 , P XRS A7,DWTST,A6 RESET REPOSITIONING BIT 9 P RB REP005 YES 9 P* 9 P* 9 6 PRE
0x2a3d50…2a3ee4 Dummy {f00=0x00d6, f01=0x0190, f02=»ND RECOVERY CORRECT 9 P RTN A8 : P* : , P EJECT DRTC01 : 6 P* : N P* : X P* D W T C 0 2 : b P* : z 2 P* DEVICE WORK TABLE FOR CASSETTE RECORDER 02 : P* : P* : PDWTC02 EQU * TABLE ENTRY : P IFT DBCAS=2 : P DATA
0x2a3ee4…2a4078 Dummy {f00=0x00d6, f01=0x0190, f02=»AD POINTER TO ADDRESS BLOCK : P DATA 0 TTAB ADDRESS ; $ $ P DATA 0 WAIT/ACTIVATE INDICATOR ; @ P DATA 0 TERMINAL QUEUE ; h IFT MMUPAG=1 ; & " DATA 0 SAVE AREA USER ECB ADDRESS ; P DATA ECBTC2 MMU ECB ADDRESS ; XIF ; P IFT DBCAS=2 ;
0x2a4078…2a420c Dummy {f00=0x00d6, f01=0x0190, f02=» P DATA 0,0,0,0 < PTCBUF2 RES DVBLEN+1 < P XIF < 6 P* < B P EJECT DRTC01 < L P* < d P* < n P* D W T C 0 1 < x P* < 2 P* DEVICE WORK TABLE FOR CASSETTE RECORDER 01 < P* < P* < PDWTC01 EQU * TABLE ENTRY < P D
0x2a420c…2a43a0 Dummy {f00=0x00d6, f01=0x0190, f02=»TCAD POINTER TO ADDRESS BLOCK < P DATA 0 TTAB ADDRESS = & $ P DATA 0 WAIT/ACTIVATE INDICATOR = B P DATA 0 TERMINAL QUEUE = j IFT MMUPAG=1 = & " DATA 0 SAVE AREA USER ECB ADDRESS = P DATA ECBTC1 MMU ECB ADDRESS = XIF = & PDWTBKC EQU *-DWT
0x2a43a0…2a4534 (5, 309) Dummy {f00=0x00d7, f01=0x40d0, f02=»C1 EQU * = P DATA 0 > P DATA TCBUF1 > P DATA 0,0,0,0 > 4 PTCBUF1 RES DVBLEN+1 > J P XIF > f P* > r " PREQLEN DATA 0 REQUESTED LENGTH > | P* > P* > P* > P END > @ >
0x2a4534…2a46c8 Dummy {f00=0x00d7, f01=0x2008, f02=» ? OCK - x P DATA 0 TTAB-ADDRESS . $ P DATA 0 WAIT/ACTIVATE INDICATOR . 0 P DATA 0 TERMINAL QUEUE . X & PDWTBKC EQU *-DWTC01 BLOCK COUNTER . v P DATA 0 . PSEKBYT EQU *-DWTC01 . P DATA 0 SEQ. INDICATOR . P* . P* . P END . @
0x2a46c8…2a485c Dummy {f00=0x00d7, f01=0x00de, f02=» HMES DRSW01 HLED DRSW01,/S,/EE,## H##DL 0,1 2 2 H IDENT DRSW01 REL 10.0 80-03-14 870105041000 B H x H##EN HKPF /S HASM /S,NL HKPF /O HSCR /S HSCR /O HEND
0x2a485c…2a49f0 Dummy {f00=0x00d7, f01=0x2008, f02=» DRSW01 HLED DRSW01,/S,/EE,## H##DL 0,1 2 2 H IDENT DRSW01 REL 10.0 80-03-14 870105041000 B H x H##EN HKPF /S HASM /S,NL HKPF /O HSCR /S HSCR /O HEND
0x2a49f0…2a4b84 Dummy {f00=0x00d7, f01=0x0190, f02=» . P***************************************** P* 6 6 P* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION @ . P* SET IS OBTAINED BY SETTING CPU852 EQU 0. z P* PCPU852 EQU 1 P* P EJECT PADDMOD EQU * P LDK A3,0 P
0x2a4b84…2a4d18 Dummy {f00=0x00d7, f01=0x0190, f02=» P ADR A2,A7 P RF(3) OVER1 $ 0 PNOVER ADR A1,A6 * NO OVERFLOW D P RF(1) END1 x P RF(2) END2 P RF(3) END3 PNOVER1 ADK A2,0 P RF(0) END0
0x2a4d18…2a4eac Dummy {f00=0x00d7, f01=0x0190, f02=» RB(7) NOVER POVER3 ADR A1,A6 P RF(2) END3 < P ADK A1,0 Z P RF(1) END1 x P RB(7) NOVER1 P XIF P IFF CPU852=1 P RF(0) END0 P RF(1) END1 P RF(2) E
0x2a4eac…2a5040 Dummy {f00=0x00d7, f01=0x411e, f02=»LL A3,1 ********************************** P ANK.L A3,/0300 < P LDK.L A4,/FCFF ^ P AN.S A4,2,A14 B P OR.S A3,2,A14 UPDATE CR IN PSW CALLING PROGRAM P RTN A14 P
0x2a5040…2a51d4 (5, 310) Opaque[0x194]
0x2a51d4…2a5368 # DirEnt {nam=»DRTP02«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1ae8, f03=0x0000}
0x2a51d4…2a5368 IdxSect {
0x2a51d4…2a5368 f00 = 0x00d7 // 0x2a51d4 @0x0
0x2a51d4…2a5368 f01 = 0x0012 // 0x2a51d6 @0x2
0x2a51d4…2a5368 gno = [ // 0x2a51d8 @0x4
0x2a51d4…2a5368 [0x00]: C0x00d7.0x1.0
0x2a51d4…2a5368 [0x01]: C0x00d7.0x2.0
0x2a51d4…2a5368 [0x02]: C0x00d7.0x3.0
0x2a51d4…2a5368 [0x03]: C0x00d8.0x0.0
0x2a51d4…2a5368 [0x04]: C0x00d8.0x1.0
0x2a51d4…2a5368 [0x05]: C0x00d8.0x2.0
0x2a51d4…2a5368 [0x06]: C0x00d8.0x3.0
0x2a51d4…2a5368 [0x07]: C0x00d9.0x0.0
0x2a51d4…2a5368 [0x08]: C0x00d9.0x1.0
0x2a51d4…2a5368 ]
0x2a51d4…2a5368 }
0x2a5368…2a54fc Dummy {f00=0x00d7, f01=0x0190, f02=» 2 P IDENT DRTP02 REL 10.0 80-03-14 870105041000 P : P REL 9.1 79-04-06 B & P =1-3,GEN UPDATE TO 8.2+ STATUS ^ P REL 8.2 79-04-19 " P =3,RECOVERY TIMER CORRECTED P REL 8.2 79-04-18 & P =2,GRSP/REL CH.TO IMPR. REMOTE
0x2a54fc…2a5690 Dummy {f00=0x00d7, f01=0x0190, f02=»******************* l < P* * < P* PHILIPS TERMINAL SYSTEM PTS * < P* * < P* DRTP02 = DRIVER TELLER TERMINAL PRINTER
0x2a5690…2a5824 Dummy {f00=0x00d7, f01=0x0190, f02=» * P* P* P* < P* * * < P******************************************************* j P* > P* THIS DRIVER HANDLES TELLER TERMINAL PRINTERS PTS 6221, 6 P* 6222 OR 6223 C
0x2a5824…2a59b8 Dummy {f00=0x00d7, f01=0x0190, f02=»P : ACTIVATION PART P* & P* I H T P : INTERRUPT HANDLER ( P* R $ P* R C T P : RECOVERY ROUTINE P* P* 6 P* THE DRIVER CONTAINS THE FOLLOWING SUBROUTINES: P* B P* P R B U F : GET CHARACTERS FROM ECB-BU
0x2a59b8…2a5b4c Dummy {f00=0x00d7, f01=0x0190, f02=»BER OF CHARACTERS GIVEN IN FIRST p $ P* CHARACTER IN OUTPUT BUFFER ( P* P . P* G R A S P : SEND GRASP TO VOUCHER Z P* 4 P* R E L E A S : SEND LIFT TO TOP AND RELEASE P EJECT P* * P* THE FOLLOWING ORDERS ARE TREAT
0x2a5b4c…2a5ce0 Dummy {f00=0x00d7, f01=0x0190, f02=»ITE h $ P* ORDER 22 : CUT JOURNAL * P* ORDER 26 : PERFORATE JOURNAL 4 . P* ORDER 37 : GRASP VOUCHER/PASSBOOK b 0 P* ORDER 38 : RELEASE VOUCHER/PASSBOOK P* , P* THE FOLLOWING RETURN CODES ARE USED: P*
0x2a5ce0…2a5e74 (5, 311) Dummy {f00=0x00d7, f01=0x0190, f02=»XECUTED ON REQUEST r ( P* BIT 13 : CODE CHECK ERROR $ P* BIT 15 : NOT OPERABLE F P* n P* x P* P* NORMAL REGISTER USAGE: P* " P* REGISTER A1: WORK REGISTER " P* A2: INPUT/OUTPUT $ P*
0x2a5e74…2a6008 Dummy {f00=0x00d7, f01=0x0190, f02=»DDRESS z P* A7: ORDER P* A8: ECB-ADDRESS , P* P P* Z P* d P* n P* SYSTEM ADAPTATION: x P* D P* BY MEANS OF CONDITIONAL ASSEMBLY THE FOLLOWING FUNCTIONS CAN P* BE EXCLUDED: P* >
0x2a6008…2a619c Dummy {f00=0x00d7, f01=0x0190, f02=»CE OF SPECIAL CHARACTER /13,/14 H P* COMPLETION OF REQUEST AT 'VOUCHER OUT' BEFORE MESSAGE IS WRITTEN ( P* t P* ~ @ P* THE CHARACTER CODES FOR ROOMLESS POINT DIGITS IS DEFINED > P* IN A TABLE NAMED ROMTAB.STANDARD IS SHB CHARACTER SET
0x2a619c…2a6330 Dummy {f00=0x00d7, f01=0x0190, f02=» TPAD ADDRESS BLOCK P* P* & P* 0 P************* : P* EXTERNALS * P P************* f P* | P* , P EXTRN TDISP DISPATCHING FROM INTERRUPT $ P EXTRN DISIOE DISPATCH I/O ERROR & P EXTRN DISEND END I/O AND DISPAT
0x2a6330…2a64c4 Dummy {f00=0x00d7, f01=0x0190, f02=»RE REGISTERS AND WAIT FOR INTERRUPT P EXTRN SAVE8 SAVE REG. A1-A8 , P* P P EXTRN DWTST STATUS Z EXTRN DWTBC BYTE COUNTER v P EXTRN DWTECB ECB ADDRESS P EXTRN DWTOR ORDER & ! EXTRN DWTSB2 STACK BASE 2 IN DWT P EJECT
0x2a64c4…2a6658 Dummy {f00=0x00d7, f01=0x0190, f02=»EL EFFECTIVE LENGTH P EXTRN ECBRC RETURN CODE P EXTRN ECBCW CONTROL WORD < P EJECT ^ P************************ l P* CONDITIONAL ASSEMBLY * P************************ P* P* < P* WHEN RECOVERY EXECUTED ON REQUEST RE
0x2a6658…2a67ec Dummy {f00=0x00d7, f01=0x0190, f02=» JOURNAL TAPE MAY BE CUT/PERFORATED FOR PTS 6223 BY P* SETTING X:B = 1 < P* X P* b PX:B EQU 0 l PCUTPER EQU X:B ~ P* P* B P* SPECIAL CHARACTER /13, /14 IS ACCEPTED BY SETTING X:C = 1 P* AND X:D = 1 RESPECTIVL
0x2a67ec…2a6980 Dummy {f00=0x00d7, f01=0x0190, f02=» P* 2 P* PRINTING VOUCHER/PASSBOOK, IS COMPLETED IF : P* PRINT OBJECT IS REMOVED UNDER PRINTING IF X:E = 1 D P* P* PX:E EQU 0 PCOMPL EQU X:E P EJECT P* P* > P* IN SITUATIONS WHERE PRINTER HARDWARE
0x2a6980…2a6b14 (5, 312) Dummy {f00=0x00d7, f01=0x0190, f02=»RABLE IS SET b P* P* PX:F EQU 0 ( PRELEND EQU X:F : P* P P* Z . P* A PROGRAM VERSION USING TOSS MMU PAGING d * P* IS OBTAINED BY SETTING MMUPAG EQU 1. P* PMMUPAG EQU 0 P* P* 6 P* A PROGRAM VERSIO
0x2a6b14…2a6ca8 Dummy {f00=0x00d7, f01=0x0190, f02=» P* MMU BUFFER SIZE P* P* * PX:H EQU 20 4 PDVBLEN EQU X:H F P* P EJECT f P* t P* ~ P************* P* CONSTANTS * P************* P* P* . PCCERR EQU /4 RETURN CODE. CODE CHECK ERROR
0x2a6ca8…2a6e3c Dummy {f00=0x00d7, f01=0x0190, f02=»EOJT EQU /4 'END OF JOURNAL' BIT IN DATA-REQ. @ PVOCHA EQU /200 BIT #6 DWTTST;VOUCHER STATUS CH. NOT ALLOWED 6 4 PMESS EQU /400 BIT #5 DWTTST;TEST MESSAGE WRITTEN z P* $ PSTX EQU /82 START OF TEXT BLOCK " PETB EQU /97 END OF TEXT BLOCK
0x2a6e3c…2a6fd0 Dummy {f00=0x00d7, f01=0x018e, f02=»D CR JOURNAL TAPE PLF1 EQU /18 LF JOURNAL TAPE . PCR2 EQU /09 CR TALLY ROLL,VOUCHER/PASSBOOK > PLF2 EQU /19 LF TALLY ROLL p $ PLDO EQU /0B LIFT DOWN 1 POSITION $ PLUP EQU /0A LIFT UP ONE POSITION $ PLFF EQU /0C LIFT TO TOP POSITION 6
0x2a6fd0…2a7164 Dummy {f00=0x00d7, f01=0x0190, f02=» p " PRPH EQU /1E RETURN PRINT HEAD 4 PTETX EQU /83 LAST DUMMY AFTER GRASP AND RELEASE . P* f P* p P********************* z P* DWT-DISPLACEMENTS * P********************* P* P* 0 PDWTDRD EQU /10 START OF DRIVER D
0x2a7164…2a72f8 Dummy {f00=0x00d7, f01=0x0190, f02=»+4 P XIF P* . PDWTRLN EQU START+/12 REQUESTED LINE NUMBER , PDWTALN EQU START+/13 ACTUAL LINE NUMBER R P* P EJECT P* P*********** P* BUFFERS * P*********** P* P* & PBUF1 DATA /0382,/0D1
0x2a72f8…2a748c Dummy {f00=0x00d7, f01=0x0190, f02=»IF $ P DATA /091D,/2000 CR2,APH,SPACE & PBUF3 DATA /0382,/091D STX,CR2,APH 2 4 PBUF5 DATA /041B,/9783,/8200 REL,ETB,DUMMY,STB =2 P* P* P* P********** P* TABLES * P********** P* P* P DATA DVBLEN
0x2a748c…2a7620 Dummy {f00=0x00d7, f01=0x018e, f02=»UTINE ADDRESS P DATA IHTP INTERRUPTHANDLER P DATA RCTP RECOVERY ROUTINE : P* ^ $ P* TABLE TO GET ROOMLESS POINT h P* PROMTAB EQU * ( P DATA /2122,/2426,/3B3C,/3E40,/5E5F P* ( P* TABLE TO GET ACTUAL LF-CHARACTER
0x2a7620…2a77b4 (5, 313) Dummy {f00=0x00d8, f01=0x0190, f02=» : PCPTAB DATA /1F0F CODES FOR PERFORATE/CUT JOURNAL TAPE P XIF B PTPTAB EQU * ORDER TABLE N P DATA /0002,/0607,/080D n P IFT CUTPER=1 P DATA /2226 P XIF P DATA /393A PTPLEN EQU *-TPTAB P EJECT P*
0x2a77b4…2a7948 Dummy {f00=0x00d8, f01=0x0190, f02=»TO ORDER PROCESSOR h P* P* $ P* . PACTP EQU * ACTIVATION ENTRY 8 P* P* f < P* GET DWT INDEX: 0=JOURNAL,1=TALLY,2=VOUCHER/PASSBOOK p " P LC A1,DWTOR,A6 GET DWT INDEX P ANK A1,7 MASK & P ADR A7,A1 ADD DWT INDEX TO
0x2a7948…2a7adc Dummy {f00=0x00d8, f01=0x0190, f02=»AB,A3 FIND OUT IF LEGAL ORDER P RF(E) ACT020 VALID ORDER & P SUK A3,1 H P RB(NN) ACT010 TRY NEXT Z P* z P ABL DISIOE ILLEGAL ORDER P* P* PACT020 EQU * & P SC A4,DWTBC,A6 RESET BYTE COUNTER P ADR A3,A3 GET I
0x2a7adc…2a7c70 Dummy {f00=0x00d8, f01=0x0190, f02=»A TP700,TP750 P XIF P DATA TP800,TP900 " P EJECT =1 < P* =1 P P* =1 ` P* ORDER 00: TEST =1 p J P* IMPROVED TEST OF BOTH SUM OFF AND PRINTER NOT THERE =1 P* =1 P* =1 P* =1
0x2a7c70…2a7e04 Dummy {f00=0x00d8, f01=0x0190, f02=» =1 * P LDK A2,0 SEND CHAR /00=END OF TEST =1 P CF A5,OUTPUT =1 : P RF TPDUMY =1 T P EJECT j P* x P* , P* ORDER 06,0B: WRITE VOUCHER/PASSBOOK > P* GET REQUESTED LINE NUMBER AND SAVE IN DWT P* P
0x2a7e04…2a7f98 Dummy {f00=0x00d8, f01=0x0190, f02=»,A8 GET BUFFER ADDRESS ~ & P LC A3,1,A3 GET CONTROL CHARACTER $ P ANK A3,/FF REQUESTED LINE STEPS H P SUK A3,/39 p P RF(G) ACT070 > /39 = ONE LF P ADK A3,/9 P RF(NE) ACT060 P LDK A3,2 /30 = TWO LF P RF ACT080 ( PACT060 R
0x2a7f98…2a812c Dummy {f00=0x00d8, f01=0x0190, f02=»A6 GET LINE NUMBER FROM DWT | * P SUR A1,A3 GET REQUESTED LINE POSITION $ 2 PACT085 RF(NN) ACT090 LINE POSITION LESS ZERO ? R * P LDK A1,0 YES; SET LINE POSITION ZERO P* PACT090 LDR A4,A4 RECOVERY ? P RF(NZ) TP605 YES 0 P SC A1,DWT
0x2a812c…2a82c0 Dummy {f00=0x00d8, f01=0x0190, f02=» P* P* P* * PTP200 LDKL A3,BUF1 SEND CR1 AND ATTACH " PTP210 EQU * P 0 P LC A1,DWTST,A6 GET LEFT BYTE IN STATUS WORD d $ P ANK A1,4 TEXT MESSAGE WRITTEN ? ( P RF(NE) TP220 YES; COMPLETE REQUEST ( P LD A1,ECBRL,A8 GET REQUESTE
0x2a82c0…2a8454 (5, 314) Dummy {f00=0x00d8, f01=0x0190, f02=» ADDRESS ~ P LC A2,2,A1 THIRD CHARACTER $ P CCK A2,/2020 CONTROL CHARACTER 4 P RF(NL) TP215 P LDR A4,A2 SAVE CHAR =2 r P LDK A2,STX SEND STX =2 P CF A5,OUTPUT =2 P LDR A2,A4 RELOAD CHAR =2 P CF A5,OUTPUT P LDK
0x2a8454…2a85e8 Dummy {f00=0x00d8, f01=0x0190, f02=»UF PRINT ECB-BUFFER PTP220 EQU * P LDK A1,0 0 6 PTP230 LDKL A2,/FDFF VOUCHER STATUS CHANGE ALLOWED B P ANS A2,DWTST,A6 | P EJECT P* P* P* ECB-BUFFER IS WRITTEN P* * P* SEND LINE FEED IF JOURNAL OR TALLY
0x2a85e8…2a877c Dummy {f00=0x00d8, f01=0x0190, f02=» " P LDK A2,RPH DETACH PRINT HEAD P CF A5,OUTPUT SEND . PTPLF10 EQU * H P SUK A7,8 ( P RF(NN) TPL010 NOT JOURNAL AND TALLY n P ADK A7,2 GET INDEX TABLE $ P LC A2,LFTAB,A7 GET LF CHARACTER P CF A5,OUTPUT SEND LF CHAR. . P
0x2a877c…2a8910 Dummy {f00=0x00d8, f01=0x018e, f02=»MMON END OF PRINT P* ! P* ! $ " P* SEND LAST DUMMY CHARACTER ! . P* ! T PTPDUMY EQU * ! ^ P LDK A2,ETB SEND ETB =2 ! r P CF A5,OUTPUT =2 ! P LDK A2,ETX ! P CF A5,OUTPUT ! P EJECT ! P* ! P* ! 0 P* CHECK STATUS
0x2a8910…2a8aa4 Dummy {f00=0x00d8, f01=0x0190, f02=» ! | $ PTST005 ANK A2,VOIN VOUCHER OUT ? " P RF(NZ) ENDIO NO " 0 P RF TST015 YES " H P* " ^ PTST010 SUK A7,4 " h P IFT CUTPER=0 " * P RF(G) ENDIO NOT TEST STATUS, JOURNAL " P XIF " P IFT CUTPER=1 " * P RF(G) TST020 NOT TEST STATUS, JOU
0x2a8aa4…2a8c38 Dummy {f00=0x00d8, f01=0x0190, f02=»L A1,PROUT SET RETURN CODE: " ( P END OF JOURNAL TAPE, VOUCHER OUT # $ P* # P P* # Z , P* PERFORM END I/O AND GO TO DISPATCHER # d P* # PENDIO EQU * # 4 P ABL DISEND PERFORM END I/O AND GO TO DISPATCHER # P* # P* # P* # P
0x2a8c38…2a8dcc Dummy {f00=0x00d8, f01=0x018e, f02=»SE # x P RB TST012 CUT,PERFORATE $ P XIF $ * P EJECT $ 6 P* $ D P* $ N P* $ X $ P* ORDER 06 : PRINT TALLY ROLL $ b P* $ P* $ P* $ ( PTP405 CF A5,RELEAS ERROR. VOUCHER IN $ P* $ * PTP407 LDKL A3,BUF3 SEND CR2 AND ATTACH $
0x2a8dcc…2a8f60 Dummy {f00=0x00d8, f01=0x018e, f02=» $ P EJECT % P* % P* % P* % * * P* ORDER 06 : WRITE VOUCHER/PASSBOOK % 4 * P* OB : POSITION LIFT AND WRITE % b P* % P* % PTP605 EQU * =2 % P LDK A2,STX SEND STX =2 % P CF A5,OUTPUT =2 % " P CF A5,GRASP GRASP
0x2a8f60…2a90f4 (5, 315) Dummy {f00=0x00d8, f01=0x0190, f02=» % l P* & P* & . PTP610 CC A3,DWTRLN,A6 COMPARE LINE NUMBER & P RF(E) TP650 EQUAL & N " P RF(G) TP630 SEND ELEVATOR UP & h " P LDK A2,LDO SEND ELEVATOR DOWN & * P ADK A3,1 INCREMENT ACTUAL LINE NUMBER & P RF TP640 & & PTP630 LDK A2,LUP SEN
0x2a90f4…2a9288 Dummy {f00=0x00d8, f01=0x018e, f02=»,DWTALN,A6 SAVE ACTUAL LINE NUMBER & P ANK A2,VOIN VOUCHER IN ? ' * P IFT COMPL=0 ' L & P ABL(Z) RCTP01 NO: ERROR RECOVERY ' ` , P RB TP610 YES: CHECK IF LIFT POSITIONED ' P XIF ' P IFT COMPL=1 ' 2 P RB(NZ) TP610 YES: CHECK IF LIFT IS POSITIONED
0x2a9288…2a941c Dummy {f00=0x00d8, f01=0x0190, f02=» ' P* ( P* ( , P* ORDER 06 AND 0B: LIFT IS POSITIONED ( * P* ATTACH AND PRINT ( L P* ( z P* ( PTP650 EQU * ( & P LDKL A3,BUF2 SEND CR2 AND ATTACH ( P RB TP410 PRINT ECB-BUFFER ( P EJECT ( P IFT CUTPER=
0x2a941c…2a95b0 Dummy {f00=0x00d8, f01=0x0190, f02=»F TP760 ( PTP750 EQU * ) P LDK A1,0 SET INDEX ) $ " PTP760 LC A2,CPTAB,A1 GET CHAR ) @ P CF A5,OUTPUT SEND ) f P LDK A2,LF1 LINE FEED ) P CF A5,OUTPUT SEND ) P RB TPDUMY ) P XIF ) P* ) < P* ORDER 37 AND 38 GRASP AND RELEASE
0x2a95b0…2a9744 Dummy {f00=0x00d8, f01=0x0190, f02=» RB TPDUMY ) P * P EJECT * P* * ( P* P R B U F * 2 P* * H F P* SUBROUTINE TO SEND CHARACTERS FROM ECB-BUFFER UNTIL REQUESTED * R P* LENGTH IS REACHED * P* * . PPRBUF LD A4,ECBRL,A8 GET REQUESTED LENGTH * & P SUK A4,2 ADJUST R
0x2a9744…2a98d8 Dummy {f00=0x00d8, f01=0x0190, f02=»1,A3 GET CHARACTER * P CCK A1,/2020 + P RF(NE) PRB050 NOT BLANK + 0 P ADK A3,1 BLANK + P P SUK A4,1 + h " P RB PRB010 GET NEXT CHARACTER + z > P* LOOK IF CARRIAGE RETURN CHAR (/09,/0D) LAST IN BUFFER + $ PPRB050 LDR A1,A3 GET ADDRESS TO + (
0x2a98d8…2a9a6c Dummy {f00=0x00d8, f01=0x0190, f02=»YES + * P CCK A1,/0D0D CARRIAGE RETURN - CR1 ? , P RF(E) PRB060 YES , : P LDK A1,0 DUMMY CHARACTER , T P RF PRB070 , v . PPRB060 SUK A4,1 DECREMENT REQUESTED LENGTH , , PPRB070 ST A1,ECBEL,A8 SAVE CHAR. IN ECB , P* , P* , . PPRB100 SUK
0x2a9a6c…2a9c00 Dummy {f00=0x00d8, f01=0x0190, f02=»F(E) PRB101 , P CF A5,OUTPUT SEND CHAR - PPRB101 EQU * - 4 P LDK A2,ETB - H & P CF A5,OUTPUT SEND END OF MESSAGE - P LDK A2,ETX - 6 P CF A5,OUTPUT WAIT FOR WHOLE BUFFER TO BE PRINTED - * P LDKL A1,MESS INDICATE MESSAGE PRINTED - P ORS A
0x2a9c00…2a9d94 (5, 316) Dummy {f00=0x00d8, f01=0x0190, f02=»QU * - 2 P ADR A3,A4 ADDRESS TO CHARACTER TO BE PRINTED . P SUK A7,7 CHECK ORDER . B P RF(L) PRB200 PRINT JOURNAL . ` P RF(G) PRB110 PRINT VOUCHER . P EJECT . P* . P* . P* . P* PRINT TALLY ROLL . P* . P* . P* .
0x2a9d94…2a9f28 Dummy {f00=0x00d8, f01=0x018e, f02=»TO TOP AND RELEAS . | P* / P* / $ P* / . P* PRINT VOUCHER/PASSBOOK / 8 P* / Z P* / d $ PPRB110 ANK A2,VOIN VOUCHER IN ? / n P IFT COMPL=0 / ( P RF(Z) RCTP01 ERROR .VOUCHER NOT IN / P XIF / P IFT COMPL=1 / P RB(Z) TP645 /
0x2a9f28…2aa0bc Dummy {f00=0x00d8, f01=0x0190, f02=» / P CC A1,-2,A3 TABULATION? 0 P RF(NE) PRB200 NO 0 ( P EJECT 0 B P* 0 P P* 0 Z 4 P* IF TABULATION CHARACTER: DETACH PRINT HEAD, 0 d < P* SEND CHARACTERS UNTIL TABULATION POSITION IS REACHED 0 P* AND ATTACH PRINT HEAD 0 P* 0 P
0x2aa0bc…2aa250 Dummy {f00=0x00d8, f01=0x0190, f02=» LCR A1,A3 GET 2ND TAB POS CHAR 0 P ANK A1,/F LINE UNIT 1 ( P SLL A2,4 1 D P ANK A2,/F0 LINE DECADE 1 V " P ORR A1,A2 DECIMAL LINE NUMBER 1 v $ P CF A5,BCDTBY CONVERT TO BINARY 1 . PPRB120 IM DWTBC,A6 INCREMENT BYTE COUNTER 1 2 P CC A1,DWTBC,A6 CO
0x2aa250…2aa3e4 Dummy {f00=0x00d8, f01=0x0190, f02=»T SEND BLANKS OR DETACH 1 P RB PRB117 2 P* 2 2 P* 2 < P* 2 F . PPRB125 SUK A4,2 DECREMENT REQUESTED LENGTH 2 P & P SUK A3,2 DECREMENT BUFFER ADDRESS 2 P LDK A2,APH ATTACH 2 P RF PRB240 SEND ATTACH 2 P EJECT 2 P* 2 P* 2 P*
0x2aa3e4…2aa578 Dummy {f00=0x00d8, f01=0x0190, f02=»CHARACTER (/13,/14) 2 P* 3 PPRB200 EQU * 3 & * PPRB205 LCR A7,A3 LOAD OUTPUT CHARACTER 3 : " P CCK A7,/AEAE ROOMLESS POINT ? 3 h P RF(NE) PRB210 NO 3 & P SUK A3,1 DECREMENT BUFFER POINTER 3 P SUK A4,1 3 $ P LCR A7,A3 GET OUTPUT CHARACTER 3
0x2aa578…2aa70c Dummy {f00=0x00d8, f01=0x0190, f02=»R ? 3 l P RF(L) PRB225 YES 4 , PPRB215 CCK A7,/5F5F ILLEGAL CHARACTER ? 4 & P RF(NG) PRB230 NO 4 V P* 4 p P* 4 z PPRB225 EQU * 4 P IFT CHR13=1 4 & P CCK A7,/1313 SPECIAL CHARACTER ? 4 P RF(E) PRB230 YES 4 P XIF 4 P IFT CHR14=1
0x2aa70c…2aa8a0 Dummy {f00=0x00d8, f01=0x0190, f02=» ORS A1,ECBRC,A8 STORE IN RETURN CODE 4 P LD A7,DWTOR,A6 GET ORDER 5 . P ANK A7,/FF 5 P P RF PRB245 5 d P* 5 v P* 5 P* 5 . PPRB230 IM DWTBC,A6 INCREMENT BYTE COUNTER 5 $ P LDR A2,A7 GET OUTPUT CHARACTER 5 & PPRB240 CF A5,OUTPUT SEND C
0x2aa8a0…2aaa34 (5, 317) Dummy {f00=0x00d9, f01=0x0190, f02=»* I H T P 5 P* 6 0 P* INTERRUPT HANDLER: PROCESS OF INTERRUPT 6 P* 6 R P* 6 P* 6 f PIHTP EQU * 6 p P LD A4,DWTST,A6 GET STATUS 6 P RF(N) RCTP10 NOT BUSY 6 P =1 6 P =1 6 P CWK A7,2 TEST STATUS ? =1 6 P RF(NG)
0x2aaa34…2aabc8 Dummy {f00=0x00d9, f01=0x0190, f02=»TCHER =1 6 r P XIF 7 P IFT RELEND=1 7 ( P RF(NZ) IHTP30 YES FINISH REQUEST =1 7 2 P XIF 7 ^ 8 PIHTP10 ABL LDREG NO RETURN CODE RESTORE REGISTER =1 7 j PIHTP20 LDR A1,A1 7 , P RB(Z) IHTP10 TEST ORDER AND TIME OUT =1 7 PIHTP30 EQU * 7 P ABL E
0x2aabc8…2aad5c Dummy {f00=0x00d9, f01=0x0190, f02=»EQUEST AT POWER ON 7 h P* 8 PRCTP EQU * 8 $ P IFT CPU852=1 8 6 & P CF A15,SAVE8 SAVE A1-A8 ON STACK 8 L P XIF 8 v P* 8 P IFT CPU852=0 8 " P MSR 8,A15 SAVE A1-A8 ON STACK 8 P XIF 8 P* 8 & P LDKL A2,/7FFF IND DEVICE BUSY =3 8 P
0x2aad5c…2aaef0 Dummy {f00=0x00d9, f01=0x0190, f02=»K BASE 8 v P ADR A5,A6 9 < P LDK A2,REMOT RESET PRINT BUFFER REMOTE AND LOCAL DUMMY 9 P CF A5,OUTPUT SEND DUMMY 9 ` P IFT COMPL=1 9 P LDR A4,A4 STATUS CHANGE ? 9 P ABL(NE) TP645 9 P XIF 9 PRCTP05 EQU * 9 P LDK A2,0 9 2 P SC A2,DWT
0x2aaef0…2ab084 Dummy {f00=0x00d9, f01=0x0190, f02=»TP07 REQUEST RUNNING =3 9 0 P LDK A2,ETX SEND LAST DUMMY TO STOP TIMER =3 : P CF A5,OUTPUT =3 : T P ABL DISEND =3 : n PRCTP07 EQU * =3 : P IFT RECOV=1 : $ P LDKL A2,/100 INDICATE POWER OFF : P ORS A2,8,A8 SET RETURN CODE : P XIF :
0x2ab084…2ab218 Dummy {f00=0x00d9, f01=0x018e, f02=» : P* B C D T B Y ; P* ; 4 P* SUBROUTINE TO CONVERT TO BINARY FROM DECIMAL ; * P* ; b P* ; l P* ; v . PBCDTBY LDR A2,A1 PUT DECIMAL NUMBER IN A2 ; PBCDTB1 SUK A2,/10 ; P RF(N) BCDTB2 END ; P SUK A1,6 DECREMENT BY 6 ; P R
0x2ab218…2ab3ac Dummy {f00=0x00d9, f01=0x0190, f02=» 4 P* SUBROUTINE TO SEND GRASP TO VOUCHER/PASSBOOK < P* < < P* < F PGRASPA EQU * < P P LDK A2,STX SEND STX =2 < d P CF A5,OUTPUT =2 < P LDK A2,LFF LIFT TO TOP < P CF A5,OUTPUT < PGRASP EQU * < P LDK A3,0 < P LDK A2,GRA GR
0x2ab3ac…2ab540 Dummy {f00=0x00d9, f01=0x018e, f02=»PUT =2 < " P LDK A2,TETX DUMMY AFTER GRASP = P CF A5,OUTPUT = 6 P LDK A2,STX SEND STX =2 = L P CF A5,OUTPUT =2 = l P LDK A2,LFF LIFT TO TOP = P CF A5,OUTPUT = P RTN A5 = PGRAS10 LC A3,DWTALN,A6 = P RTN A5 = P* = P* =
0x2ab540…2ab6d4 (5, 318) Dummy {f00=0x00d9, f01=0x0190, f02=» P* > P* > PRELEAS EQU * > P LDK A1,0 > , 0 P SC A1,DWTALN,A6 SET ACTUAL LINE NUMBER TO 0 > > ( P LDKL A3,BUF5 LIFT TO TOP AND RELEAS > r P LDK A2,STX SEND STX =2 > P CF A5,OUTPUT =2 > P LDK A2,LFF LIFT TO TOP > P CF A5,OUTPUT >
0x2ab6d4…2ab868 Dummy {f00=0x00d9, f01=0x0190, f02=»BER OF CHARACTERS GIVEN IN > r ( P* FIRST CHARACTER IN OUTPUT BUFFER ? " P* ? N P* ? X 4 PBUFCHR LCR A4,A3 GET NUMBER OF OUTPUT CHARACTERS ? b P ANK A4,/FF MASK ? , PBUFC10 ADK A3,1 INCREMENT BUFFER POINTER ? $ P LCR A2,A3 GET OUTPUT CHARACTER ?
0x2ab868…2ab9fc Dummy {f00=0x00d9, f01=0x406c, f02=» RTN A5 RETURN TO CALLER ? P* @ P* @ * P* @ 4 P* @ > P* @ H P* @ R P END @ @ @ h A4,A3 GET NUMBER OF OUTPUT CHARACTERS ? b P ANK A4,/FF MASK ? , PBUFC10 ADK A3,1 INCREMENT BUFFER POINTER ? $ P LCR A2,A3 GET OUTPUT CHARACTER ?
0x2ab9fc…2abb90 Dummy {f00=0x00d9, 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
0x2abb90…2abd24 Dummy {f00=0x00d9, f01=0x4018, f02=» A END B @ B FIG. TABLE @ ( P LDR* A8,A8 POINTER TO DEVICE TABLE A * P RF(Z) GET010 NOT DEFINED A V P LDR A6,A4 DEV NR * 2 A x * P SUK A6,2 DISPLACEMENT IN DEVICE TABLE A & P ADR A8,A6 ADDRESS TO DWT-ADDRESS A PGET010 EQU * A P RTN A
0x2abd24…2abeb8 Dummy {f00=0x00d9, f01=0x2008, f02=» C * RETURN AND ENABLE $ * $ & RTNA15 EQU * $ 0 ADKL A15,2 $ D ENB $ X LDR* P,A15 $ d * $ x END $ @ $ # z * ON EXIT: # 2 -* A8 =ADDRESS WHERE DWT-ADDRESS IS FOUND # * # GETADR EQU * # 0 + LD A8
0x2abeb8…2ac04c Dummy {f00=0x00d9, f01=0x0190, f02=» & P RF IAS070 GO TO INTERRUPT HANDLER 4 P* 4 . PEXITL EQU * 4 8 P IFT LOGING=1 4 L ( P CF A15,INFLG1 GET LINE INFORMATION 4 b P CF A15,LOGG **LOGG INPUT** 4 P XIF 4 P* 4 PEXIT EQU * 4 P ABL TDISP 4 * 4 P EJECT 4 P* 4
0x2ac04c…2ac1e0 Dummy {f00=0x00d9, f01=0x018e, f02=» A2,/FF 4 " P LCR A7,A6 LEFT BYTE OF DWTCHP 5 P ANK A7,/70 DEVICE NUMBER 5 6 * P SUK A7,/20 OUTPUT TO KEYBOARD LAMPS? 5 X P RF(Z) IAS050 YES 5 P* 5 P LDR A2,A2 SAVED CHARACTER 5 $ P RF(Z) IAS060 NO CHARACTER SAVED 5 P* 5 P CWK A2,/8
0x2ac1e0…2ac374 (5, 319) Opaque[0x194]
0x2ac374…2ac508 # DirEnt {nam=»DRTP03«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1b30, f03=0x0000}
0x2ac374…2ac508 IdxSect {
0x2ac374…2ac508 f00 = 0x00d9 // 0x2ac374 @0x0
0x2ac374…2ac508 f01 = 0x0018 // 0x2ac376 @0x2
0x2ac374…2ac508 gno = [ // 0x2ac378 @0x4
0x2ac374…2ac508 [0x00]: C0x00d9.0x2.0
0x2ac374…2ac508 [0x01]: C0x00d9.0x3.0
0x2ac374…2ac508 [0x02]: C0x00da.0x0.0
0x2ac374…2ac508 [0x03]: C0x00da.0x1.0
0x2ac374…2ac508 [0x04]: C0x00da.0x2.0
0x2ac374…2ac508 [0x05]: C0x00da.0x3.0
0x2ac374…2ac508 [0x06]: C0x00db.0x0.0
0x2ac374…2ac508 [0x07]: C0x00db.0x1.0
0x2ac374…2ac508 [0x08]: C0x00db.0x2.0
0x2ac374…2ac508 [0x09]: C0x00db.0x3.0
0x2ac374…2ac508 [0x0a]: C0x00dc.0x0.0
0x2ac374…2ac508 [0x0b]: C0x00dc.0x1.0
0x2ac374…2ac508 ]
0x2ac374…2ac508 }
0x2ac508…2ac69c Dummy {f00=0x00d9, f01=0x0190, f02=» 2 P IDENT DRTP03 REL 10.0 80-04-24 870105041000 P : " P =9,TOTAL UPDATE FOR REMOTE B P REL 9.2 80-03-15 h P =8,REMOTE RECOVERY ERROR P REL 9.2 80-02-28 " P =7,UPDATE FOR REMOTE CONN. P REL 9.2 79-11-16 P
0x2ac69c…2ac830 Dummy {f00=0x00d9, f01=0x0190, f02=»N UPDATE REL 10 P REL 9.1 79-09-26 P =3,ANK A2,/7F 4 P PRR 9.1 79-08-14 L P =2,GEN UPDATE h P PRR 9.1 79-06-20 P =1,GEN UPDATE P PRR 9.1 79-06-17 P EJECT P* < P********************************
0x2ac830…2ac9c4 Dummy {f00=0x00d9, f01=0x0190, f02=» * h < P* * < P* DRTP03 = DRIVER TELLER TERMINAL PRINTER * X < P* * < P* ADAPTED FOR TOSS RELEASE INDICATED IN "REL E
0x2ac9c4…2acb58 Dummy {f00=0x00d9, f01=0x0190, f02=» X P* < P* THIS DRIVER HANDLES TELLER TERMINAL PRINTER PTS 6371 P* R , P* AND CONSISTS OF THE FOLLOWING PARTS: P* $ P* A C T P : ACTIVATION PART P* & P* I H T P : INTERRUPT HANDLER P* $ P* R C T P
0x2acb58…2accec Dummy {f00=0x00d9, f01=0x0190, f02=»NSFERED TO THE PRINTER. r > P* THE STRING BEGINS WITH A DEDICATED PRINTER CHARACTER. > P* THE CONTENTS OF THE STRING IS EITHER A FIXED FORMATTED b 2 P* BUFFER OR FOR ORDER WRITE THE USER BUFFER. > P* THE STRING IS TERMINATED WITH AN EXECUTION
0x2accec…2ace80 Dummy {f00=0x00d9, f01=0x0190, f02=»DER. Z P* D P* THE INTERRUPT HANDLER IS ENTERED FOR EACH OUTPUTED CHARACTER P* ^ > P* THE RECOVERY ROUTINE IS ENTERED AFTER PROGRAM LOADING, h @ P* AFTER POWER ON FROM TERMINAL SIDE AND AFTER TRANSMISSION P* TIME OUT. > P*
0x2ace80…2ad014 (5, 320) Dummy {f00=0x00d9, f01=0x0190, f02=»D STATUS FOR THE PRINTER. P EJECT " P* 0 * P* THE FOLLOWING ORDERS ARE TREATED: : P* h $ P* ORDER 00 : TEST STATUS r P* ORDER 06 : WRITE * P* ORDER 0B : POSITION DOCUMENT . P* ORDER 24 : SET PRINTE
0x2ad014…2ad1a8 Dummy {f00=0x00d9, f01=0x0190, f02=»R 38 : RELEASE DOCUMENT P* $ , P* THE FOLLOWING RETURN CODES ARE USED: . P* ^ & P* BIT 0 : REQUEST ERROR h 8 P* BIT 2 : END OF JOURNAL **IN REL 10...** 8 P* BIT 10 : END OF JOURNAL **IN REL 8 & 9** $
0x2ad1a8…2ad33c Dummy {f00=0x00d9, f01=0x0190, f02=»* P* NORMAL REGISTER USAGE: P* , " P* REGISTER A1: WORK REGISTER 6 " P* A2: INPUT/OUTPUT $ P* A3: BUFFER POINTER $ P* A4: OUTPUT COUNTER " P* A5: STACK POINTER P* A6:
0x2ad33c…2ad4d0 Dummy {f00=0x00d9, f01=0x0190, f02=»***** P* ENTRIES * P*********** " P* 6 P* @ P ENTRY TPAD3 ADDRESS BLOCK J P* l P* v P* P************* P* EXTERNALS * P************* P* P* , P EXTRN TDISP DISPATCHING FROM INTERRUPT
0x2ad4d0…2ad664 Dummy {f00=0x00d9, f01=0x0190, f02=»RN LDREG RESTORE REGISTERS P EXTRN SAVE8 SAVE REG. A1-A8 " 0 P EXTRN GETCHR GET CHARACTER FROM ECB BUFFER F ( P EXTRN DWTST DWT STATUS DISPLACEMENT z & P EXTRN DWTECB DWT ECB DISPLACEMENT ( P EXTRN DWTOR DWT ORDER DISPLACEMENT ( P EXTRN DTTP0
0x2ad664…2ad7f8 Dummy {f00=0x00d9, f01=0x0190, f02=» P* P************* P* CONSTANTS * ( P************* > & PREL EQU 10 ADAPTED FOR TOSS REL 10 T P* ~ , P* DEDICATED PRINTER CHARACTERS (/00-/0F) P* PPOTEST EQU /00 TEST PPORECV EQU /01 RECOVERY & PRESTRT EQU
0x2ad7f8…2ad98c Dummy {f00=0x00d9, f01=0x018e, f02=»C STATUS x " PEXE EQU /06 EXECUTE (NOT USED) 0 PPOTDOC EQU /07 TRANSFER DOCUMENT PARAMETERS 6 $ PPORDOC EQU /08 RELEASE DOCUMENT j " PPOWDOC EQU /09 WRITE DOCUMENT $ PLF EQU /0A LINE FEED (NOT USED) $ PPOPDOC EQU /0B POSITION DOCUMENT P
0x2ad98c…2adb20 Dummy {f00=0x00d9, f01=0x0190, f02=» r P* PSTB EQU /82 START BLOCK CHAR PETB EQU /97 END BLOCK CHAR 6 P* X P IFT REL=8 b & PENDJ EQU /20 END OF JOURNAL STATUS t P XIF P IFT REL=9 & PENDJ EQU /20 END OF JOURNAL STATUS P XIF P IFF REL=8 P IFF
0x2adb20…2adcb4 (5, 321) Dummy {f00=0x00da, f01=0x0190, f02=»************************ P* CONDITIONAL ASSEMBLY * P************************ @ P* ` 4 P* THE STANDARD NATIONAL CHARACTER SET IS CHOSEN j 8 P* BY SETTING X:A TO 0-10 ACCORDING TO THE LIST BELOW P* P* NCV = 0 GREAT BRITAIN P
0x2adcb4…2ade48 Dummy {f00=0x00da, f01=0x0190, f02=»7 PORTUGAL 6 P* 8 YUGOSLAVIA OR FRANCE 2 (DEPENDING ON CHAR GEN) P* 9 USA L P* 10 DENMARK, NORWAY 2 P* z PX:A EQU 0 PSTDNCV EQU X:A P* 4 P* THE LOWER CASE SET CAN BE INCLUDED AS STANDARD P* BY SETTING X:B=1 P
0x2ade48…2adfdc Dummy {f00=0x00da, f01=0x0190, f02=» SETTING X:C TO : 0=15 CH/INCH, 1=12 CH/INCH OR 2=10 CH/INCH P* D PX:C EQU 2 N PSTDCPD EQU X:C ` P* v * P* THE JOURNAL STATION CAN BE EXCLUDED P* BY SETTING X:D=0 P* PX:D EQU 1 PJOURNL EQU X:D P* D P* TH
0x2adfdc…2ae170 Dummy {f00=0x00da, f01=0x0190, f02=» P* PX:E EQU 0 PSTDCPJ EQU X:E P* 6 : P* THE "SET PARAMETER" ORDERS 24 AND 27 CAN BE INCLUDED @ P* BY SETTING X:F=1 ~ P* PX:F EQU 0 PPARORD EQU X:F P* . P* A PROGRAM VERSION USING TOSS MMU PAGING * P*
0x2ae170…2ae304 Dummy {f00=0x00da, f01=0x0190, f02=»TRUCTION f . P* SET IS OBTAINED BY SETTING CPU852 EQU 0. P* B PCPU852 EQU 1 L P* ` P* MMU BUFFER SIZE j P* PX:G EQU 095 PDVBLEN EQU X:G P* : P* A REQUEST IS ALLWAYS ENDED FOR NOT OPERABLE PRINTERS P* BY S
0x2ae304…2ae498 Dummy {f00=0x00da, f01=0x0190, f02=»2=1,2=STDCPJ,2=1,2=STDCPD l P EJECT " P* 0 : P********************* B P* DWT-DISPLACEMENTS * ` P********************* ~ P* P* P* 0 PDWTDRD EQU /10 START OF DRIVER DEFINED PART P* P IFT MMUPAG=0
0x2ae498…2ae62c Dummy {f00=0x00da, f01=0x0190, f02=»T+18 PRINTER PARAMETERS * PDWTPPJ EQU START+20 PRINT POS JOURNAL 0 PDWTAPJ EQU DWTPPJ+1 ACTUAL PRINT POS JOURNAL N 2 PDWTRPJ EQU DWTPPJ REQUESTED PRINT POS JOURNAL * PDWTPPD EQU START+22 PRINT POS DOCUMENT 2 PDWTAPD EQU DWTPPD+1 ACTUAL PRINT P
0x2ae62c…2ae7c0 Dummy {f00=0x00da, f01=0x0190, f02=»WTLN+1 ACTUAL LINE NUMBER ON DOCUMENT 6 PDWTRLN EQU DWTLN REQUESTED LINE NUMBER ON DOCUMENT . * PDWTDP EQU START+26 DOCUMENT PARAMETERS h P* P* P********************* P* ECB-DISPLACEMENTS * P********************* P*
0x2ae7c0…2ae954 (5, 322) Dummy {f00=0x00da, f01=0x018e, f02=»ECBRC EQU 8 RETURN CODE IN ECB $ PECBCW EQU 10 CONTROL WORD IN ECB & P EJECT N P* P********** f P* TABLES * x P********** P* P* P* ADDRESS BLOCK P* P DATA DVBLEN MMU BUFFER SIZE P DATA 2 DEVICE IND
0x2ae954…2aeae8 Dummy {f00=0x00da, f01=0x0190, f02=» p P XIF U =6 P DATA IHTP INTERRUPT HANDLER P DATA RCTP RECOVERY ROUTINE > P* b , P* VALID ORDERS WITH ACTIVATION ADDRESSES l P* PTPTAB EQU * ( P DATA TPTAB0 DEVICE INDEX 0 TABLE =9 ( P DATA TPTAB1 DEVICE INDEX 1 TABLE
0x2aeae8…2aec7c Dummy {f00=0x00da, f01=0x0190, f02=»=9 t P IFT JOURNL=1 $ P DATA 0 TEST STATUS (JOURNAL) =9 P DATA TSTSTA U =9 H P DATA 6 WRITE JOURNAL =9 b P DATA WRTJRL U =9 P IFT PARORD=1 ( P DATA /24 SET PRINTER PARAMETERS =9 P DATA PRTPAR U =9 P XIF P DAT
0x2aec7c…2aee10 Dummy {f00=0x00da, f01=0x0190, f02=» =9 P DATA 6 WRITE DOCUMENT =9 P DATA WRTDOC U =9 . " P DATA /0B POSITION DOCUMENT =9 H P DATA POSDOC U =9 n " P DATA /38 RELEASE DOCUMENT =9 P DATA RELDOC U =9 . P DATA /37 TRANSFER DOCUMENT PARAMETERS =9 P DATA TRFDOC U
0x2aee10…2aefa4 Dummy {f00=0x00da, f01=0x018e, f02=»S =9 p P DATA DOCPAR U =9 P XIF & P DATA /FFFF END OF ORDERS =9 2 P* V " PTPTAB2 EQU * DEVICE INDEX 2 =9 ` P DATA /FFFF END OF ORDERS =9 P* " PTPTAB3 EQU * DEVICE INDEX 3 =9 P DATA /FFFF END OF ORDERS =9 P* ( P
0x2aefa4…2af138 Dummy {f00=0x00da, f01=0x0190, f02=» P* A C T P P* 2 P* THIS IS THE ACTIVATION PART OF THE DRIVER " > P* CHECKS VALIDITY OF ORDERS AND JUMPS TO ORDER PROCESSOR X P* P* P* PACTP EQU * ACTIVATION ENTRY P* P* , P* GET DWT INDEX: 0=JOU
0x2af138…2af2cc Dummy {f00=0x00da, f01=0x0190, f02=»GET OLD DEVICE INDEX =9 0 P ANKL A3,/FF1F RESET OLD INDEX AND LF IND =9 P IFT REL=8 U =9 T , P ORKL A3,/8100 SET UP NO DATA REQUEST =9 l P XIF U =9 P ORR A3,A2 U =9 " P STR A3,A6 STORE NEW INDEX =9 * PACT005 LDR* A1,A6 GET DEVICE
0x2af2cc…2af460 Dummy {f00=0x00da, f01=0x0190, f02=»2 U =9 * P ABL(N) DISIOE NO MORE VALID ORDERS =9 & P SUR A3,A7 TEST IF ORDER VALID =9 < & P RF(E) ACT020 VALID ORDER FOUND =9 f P ADK A2,4 TRY NEXT ORDER =9 P RB ACT010 U =9 PACT020 EQU * P ABI 2,A2 EXECUTE ORDER =9 P EJECT
0x2af460…2af5f4 (5, 323) Dummy {f00=0x00da, f01=0x0190, f02=»ECBCW,A8 CLEAR CONTROL WORD =7 " P LDK A3,POTEST LOAD TEST ORDER & P CF A5,ORDER AND SEND L * P CF A5,EXECUT EXECUTE ORDER IN PRINTER j $ P LDR A1,A2 GET PRINTER STATUS =9 & P ANK A1,/15 TEST PRINTER STATUS =9 ( P RF(Z) TSST10 NO PERMANENT ERR
0x2af5f4…2af788 Dummy {f00=0x00da, f01=0x018e, f02=»ER =9 l 4 P SC A2,ECBCW+1,A8 SET UP DIAGN STATUS IN ECB =9 & P LDK A1,1 INDICATE NOT OPERABLE =9 F P RF TSST80 U =9 p * PTSST10 LDR A1,A2 GET PRINTER STATUS =9 P IFT JOURNL=1 U =9 $ P LDR* A3,A6 GET DEVICE INDEX =9 $ P ANK A3,/C0 TEST
0x2af788…2af91c Dummy {f00=0x00da, f01=0x0190, f02=» t $ P ANK A1,2 TEST PRINTER STATUS =9 , P RB(NZ) TSST05 JOURNAL ERROR = NOT OP =9 0 $ P LDKL A1,ENDJ END OF JOURNAL =9 ` P RF TSST80 U =9 P XIF U =9 , PTSST40 ANK A1,/40 TEST PRINTER STATUS =9 P RF(Z) TSST80 NO ERRORS =9 " P LDK
0x2af91c…2afab0 Dummy {f00=0x00da, f01=0x0190, f02=»AL v P* ! P* ! P IFT JOURNL=1 ! PWRTJRL EQU * ! 4 * P LDR* A1,A6 GET CHANNEL PARAMETERS =9 ! H $ P ANK A1,/20 TEST LF INDICATOR =9 ! v " P RF(NZ) WRJL10 LF EXECUTED =9 ! , P LD A1,ECBRL,A8 GET REQUESTED LENGTH =9 ! & P SUK A1,2 TEST REQUE
0x2afab0…2afc44 Dummy {f00=0x00da, f01=0x0190, f02=»UK A2,/2B TEST CTRL CHAR =9 ! $ P RF(Z) WRJL10 CTRL CHAR =/2B =9 " $ , P LDK A4,2 SET UP 2 LF (CTRL CH =/30) =9 " L P SUK A2,5 TEST CTRL CHAR =9 " | $ P RF(Z) WRJL05 CTRL CHAR =/30 =9 " . P LDK A4,1 SET UP 1 LF (CTRL CH NOT DEF) =9 " P SUK A2,1 TEST
0x2afc44…2afdd8 Dummy {f00=0x00da, f01=0x0190, f02=»OAD WRITE JOURNAL ORDER =9 " z P CF A5,ORDER AND SEND =9 # " ( P LDR A2,A4 RELOAD NO OF LINE FEED =9 # B P CF A5,OUT AND SEND =9 # n * P CF A5,EXECUT EXECUTE ORDER IN PRINTER # $ P ANK A2,7 TEST PRINTER STATUS =9 # . P RF(NZ) WRJL65 JOURNAL LINE FEED ERROR
0x2afdd8…2aff6c Dummy {f00=0x00da, f01=0x0190, f02=» =9 # l 2 PWRJL10 LC A1,DWTAPJ,A6 GET ACTUAL PRINT POS =9 $ 2 P SC A1,DWTRPJ,A6 SET UP START REQ PRINT POS =9 $ B & P LDK A3,2 SET UP BUFFER POINTER =9 $ x 4 P CF A15,GETCHR GET CHARACTER FROM ECB BUFFER =9 $ $ P LDR A1,A1 TEST IF NO BUFFER =9 $ ( P RF(Z)
0x2aff6c…2b0100 Dummy {f00=0x00da, f01=0x018e, f02=»ERO LINE FEED =9 $ P CF A5,OUT AND SEND =9 % 2 P LDKL A4,/100 SET UP NORMAL CHAR COUNTER IN A4 % 6 $ P LDK A3,2 SET UP BUFFER POINTER % l 6 PWRJL20 CF A15,GETCHR GET CHARACTER FROM ECB BUFFER % P LDR A1,A1 % " P RF(Z) WRJL50 BUFFER FINISHED % P L
0x2b0100…2b0294 (5, 324) Dummy {f00=0x00da, f01=0x0190, f02=» P* & P SUK A1,/10 & P RB(N) WRJL20 CHAR </10 & " P RF(Z) WRJL30 CHAR = /10 & B P SUK A1,9 & b * P RF(NZ) WRJL25 CHAR NOT /19 (=EXPAND) & t , P XRKL A4,/300 SWITCH CHAR COUNTER IN A4 & P RF WRJL40 SEND EXPAND CHAR & PWRJL25 SUK A1,7 &
0x2b0294…2b0428 Dummy {f00=0x00da, f01=0x0190, f02=» A1,/2F & P RF(Z) WRJL28 CHAR =/AE ' * P CF A5,ERROR ILLEGAL CHAR = SEND RESET ' 0 & P LDK A1,4 IND CODE CHECK ERROR =9 ' ^ P RF WRJL70 U =9 ' PWRJL28 LDK A2,/0E ' P RF WRJL40 ' P ' P* UPDATE PRINT POSITION ' P ' 8 PWRJL30 ADS
0x2b0428…2b05bc Dummy {f00=0x00da, f01=0x0190, f02=» ' n " P RB WRJL20 GET NEXT CHARACTER ( P ( . P* SEND ETX ( 6 P ( J 0 PWRJL50 CF A5,EXECUT EXECUTE ORDER IN PRINTER ( R $ P LDR A1,A2 GET PRINTER STATUS =9 ( & P ANK A1,/27 TEST PRINTER STATUS =9 ( P RF(Z) WRJL60 NO ERRORS =9 ( $ P ANK A1,3 TEST
0x2b05bc…2b0750 Dummy {f00=0x00da, f01=0x0190, f02=» ( p $ P LDKL A1,ENDJ END OF JOURNAL =9 ) : PWRJL60 LC A3,DWTRPJ,A6 GET REQUESTED PRINT POSITION =9 ) 0 4 P SC A3,DWTAPJ,A6 SET UP ACTUAL PRINT POSITION =9 ) n P RF WRJL70 U =9 ) , PWRJL65 LDK A1,1 INDICATE NOT OPERABLE =9 ) $ PWRJL70 ABL DISEND END REQU
0x2b0750…2b08e4 Dummy {f00=0x00da, f01=0x0190, f02=» : WRITE DOCUMENT ) P* * P* * $ PWRTDOC EQU * * . $ P LC A4,DWTALN,A6 GET ACTUAL LINE * B P ANK A4,/FF * j , P RF(Z) WRDO80 DOCUMENT NOT POSITIONED =9 * ~ , P LD A1,ECBRL,A8 GET REQUESTED LENGTH =9 * & P SUK A1,2 TEST REQUESTED LENGTH =9 * " P
0x2b08e4…2b0a78 Dummy {f00=0x00da, f01=0x0190, f02=» NEW REQ PRINT POS =9 * x P SUK A2,/2B + " P RF(Z) WRDO07 CTRL CHAR = /2B + 2 * P LDK A3,0 PREPARE NEW REQ PRINT POS =9 + X * P ADK A4,2 SET REQ LINE = ACT LINE + 2 + P SUK A2,5 + " P RF(Z) WRDO05 CTRL CHAR = /30 + * P SUK A4,1 SET REQ LINE = ACT
0x2b0a78…2b0c0c Dummy {f00=0x00da, f01=0x0190, f02=» + x * P RF(G) WRDO80 REQ LINE > MAX LINES =9 , 8 PWRDO07 SC A3,DWTRPD,A6 SET UP START REQ PRINT POS =9 , 6 * P SC A4,DWTRLN,A6 SET UP REQ LINE NO =9 , r . PWRDO10 LDK A3,POWDOC SET UP PRINTER ORDER , P CF A5,ORDER AND SEND , " P LDR A2,A4 GET REQ LINE
0x2b0c0c…2b0da0 Dummy {f00=0x00da, f01=0x0190, f02=»WRDO20 CF A15,GETCHR GET CHARACTER FROM ECB BUFFER , P LDR A1,A1 - : " P RF(Z) WRDO50 BUFFER FINISHED - L P LDR A1,A2 GET CHARACTER - r P - 8 P* EXAMINE CHARACTER AND UPDATE PRINT POS AND SEND - & P* DEPENDING ON TYPE OF CHARACTER - P - P
0x2b0da0…2b0f34 (5, 325) Dummy {f00=0x00db, f01=0x0190, f02=»T /19 (=EXPAND) - z , P XRKL A4,/300 SWITCH CHAR COUNTER IN A4 . P RF WRDO40 SEND EXPAND CHAR . H PWRDO27 SUK A1,7 . l " P RF(N) WRDO40 CHAR < /20 SEND . P SUK A1,/5F . P RF(N) WRDO30 CHAR = NORMAL . P RB(Z) WRDO20 CHAR = /7F =9 . P S
0x2b0f34…2b10c8 Dummy {f00=0x00db, f01=0x0190, f02=»70 U =9 . & PWRDO28 LDK A2,SPEC SET UP CHAR /0E / P RF WRDO40 / : P / L P* UPDATE PRINT POS / T P / p 8 PWRDO30 ADS A4,DWTRPD,A6 ADD 1 OR 2 TO REQ PRINT POS / x P / " P* SEND CHARACTER TO PRINTER / P / & PWRDO40 CF A5,OUTPUT SEND CHARA
0x2b10c8…2b125c Dummy {f00=0x00db, f01=0x0190, f02=» A1,A2 GET PRINTER STATUS =9 / & P ANK A1,/45 TEST PRINTER STATUS =9 0 $ P RF(Z) WRDO60 NO ERRORS =9 0 N $ P ANK A1,1 TEST PRINTER STATUS =9 0 p " P RF(NZ) WRDO80 NOT OPERABLE =9 0 $ P ANK A2,4 TEST PRINTER STATUS =9 0 $ P RF(NZ) WRDO80 REQUEST ERROR =9 0
0x2b125c…2b13f0 Dummy {f00=0x00db, f01=0x0190, f02=»F WRDO65 U =9 0 8 PWRDO60 LC A3,DWTRLN,A6 GET REQUESTED LINE NUMBER =9 1 4 P LC A4,DWTRPD,A6 GET REQUESTED PRINT POSITION =9 1 R 8 PWRDO65 SC A3,DWTALN,A6 SET UP ACTUAL LINE NUMBER =9 1 4 P SC A4,DWTAPD,A6 SET UP ACTUAL PRINT POSITION =9 1 $ PWRDO70 ABL
0x2b13f0…2b1584 Dummy {f00=0x00db, f01=0x0190, f02=» : POSITION DOCUMENT 1 0 P* CONTROL WORD CONTAINS REQUESTED LINE NO 2 P* 2 P P* 2 Z PPOSDOC EQU * 2 d $ P LD A4,ECBCW,A8 GET REQ LINE NO 2 x " P RF(Z) PDOC80 REQ LINE = 0 =9 2 P CC A4,DWTDP+2,A6 2 ( P RF(G) PDOC80 REQ LINE > MAX LINE =9 2
0x2b1584…2b1718 Dummy {f00=0x00db, f01=0x0190, f02=» P LDR A2,A4 SET UP LINE NO 3 P CF A5,OUT AND SEND 3 & * P CF A5,EXECUT EXECUTE ORDER IN PRINTER 3 B $ P LDR A1,A2 GET PRINTER STATUS =9 3 p & P ANK A1,/45 TEST PRINTER STATUS =9 3 P RF(Z) PDOC10 NO ERRORS =9 3 $ P ANK A1,1 TEST PRINTER STATUS =9 3
0x2b1718…2b18ac Dummy {f00=0x00db, f01=0x0190, f02=»6 DOCUMENT OUT =9 3 * P ANK A1,/78 TEST DOC PAR (TIME OUT) =9 4 4 P RB(Z) POSDOC NO TIME OUT USED, REPEAT ORDER =9 4 H , P LDK A1,DOCOUT INDICATE DOCUMENT OUT =9 4 $ P LDK A4,0 RESET LINE COUNTER =9 4 4 PPDOC10 SC A4,DWTALN,A6 UPDATE OF LINE COUNTER =9
0x2b18ac…2b1a40 Dummy {f00=0x00db, f01=0x0190, f02=» REQUEST ERROR =9 4 n P EJECT 5 P* 5 * P* 5 4 0 P* ORDER 37 : TRANSFER DOCUMENT PARAMETERS 5 > 4 P* CONTROL WORD CONTAINS DOCUMENT TABLE NUMBER 5 r P* 5 P* 5 PTRFDOC EQU * 5 P LD A1,ECBCW,A8 5 P ADK A1,1 5 P LDR A4,A1 5
0x2b1a40…2b1bd4 (5, 326) Dummy {f00=0x00db, f01=0x0190, f02=» A4,10 ADJUST DOCTAB POINTER 5 ( P LC A1,DWTALN,A6 GET ACTUAL LINE =9 6 $ $ P ANK A1,/FF TEST LINE NUMBER =9 6 P 2 P RF(NZ) ODOC80 DOCUMENT ALREADY POSITIONED =9 6 x 2 P LDK A3,POTDOC LOAD TRANSFER DOC PAR ORDER =9 6 P CF A5,ORDER AND SEND 6 P LDK A
0x2b1bd4…2b1d68 Dummy {f00=0x00db, f01=0x0190, f02=»,OUT 6 P ADK A4,1 7 P ADK A3,1 7 P CWK A3,DWTDP+10 7 0 ( P RB(NE) ODOC30 WHOLE TABLE NOT SENT 7 H * P CF A5,EXECUT EXECUTE ORDER IN PRINTER 7 t $ P LDR A1,A2 GET PRINTER STATUS =9 7 $ P ANK A1,1 TEST PRINTER STATUS =9 7 $ PODOC70 ABL DISEND END
0x2b1d68…2b1efc Dummy {f00=0x00db, f01=0x0190, f02=»NTER PARAMETERS 7 z P* CONTROL WORD CONTAINS: 8 B P* BIT 0 : INDICATE CHANGE OF CH FONT AND NCV =4 8 : F P* BIT 01-03 : CHARACTER FONT =4 8 F P* BIT 04-07 : NATIONAL CHARACTER VARIATION
0x2b1efc…2b2090 Dummy {f00=0x00db, f01=0x018e, f02=»ON =4 8 ^ P* 9 P* 9 " P IFT PARORD=1 9 , PPRTPAR EQU * 9 B P LDK A2,0 9 V & P LD A4,DWTPP,A6 GET OLD DWT VALUE 9 h $ P LD A1,ECBCW,A8 GET CONTROL WORD 9 4 P RF(NN) PPAR10 NO NEW L/NCV SET UP IN CTRL WORD 9 P ECR A2,A1 9 P ANK
0x2b2090…2b2224 Dummy {f00=0x00db, f01=0x0190, f02=» 2 P RF(NZ) PPAR15 NEW CPJ SET UP IN CTRL WORD =1 : P LDR A3,A4 : : P ANK A3,/F0 : L P U =5(=1) : ` PPPAR15 EQU * U =5(=1) : t & P ORR A2,A3 STORE NEW CPJ IN A2 =5 : P XRR A3,A4 U =5 : * P ANK A3,/F0 NEW AND OLD CPJ EQUAL ? =5 : P RF(Z)
0x2b2224…2b23b8 Dummy {f00=0x00db, f01=0x0190, f02=» CTRL WORD : 2 P RF(NZ) PPAR25 NEW CPD SET UP IN CTRL WORD =1 ; P LDR A3,A4 ; H P ANK A3,/F GET CPD FROM DWT ; Z P U =5(=1) ; ~ PPPAR25 EQU * U =5(=1) ; & P ORR A2,A3 STORE NEW CPD IN A2 =5 ; P XRR A3,A4 U =5 ; * P ANK A3,/F NEW AND OLD
0x2b23b8…2b254c Dummy {f00=0x00db, f01=0x0190, f02=»,DWTPP+1,A6 STORE NEW PARAMETERS IN DWT ; 8 P LDK A3,POPPAR LOAD PRINTER PRINTER PARAMETER ORDER < 0 P CF A5,ORDER AND SEND < l P LC A2,DWTPP,A6 < P U =4(=2) < P CF A5,OUT SEND L/NCV < P LC A2,DWTPP+1,A6 < P U =9 < P CF A5,OUT
0x2b254c…2b26e0 Dummy {f00=0x00db, f01=0x0190, f02=»S =9 < t $ PPPAR70 ABL DISEND END REQUEST =9 = P XIF = 4 P EJECT = @ P* = P P* = Z * P* ORDER 27 : SET DOCUMENT PARAMETERS = d : P* CONTROL WORD CONTAINS TABLE NO OF GIVEN PARAMETERS = P* = P* = P IFT PARORD=1 = PDOCPAR EQU * =
0x2b26e0…2b2874 (5, 327) Dummy {f00=0x00db, f01=0x0190, f02=» CWK A4,TLTP03 = * P RF(G) DPAR80 DEFINED TABLE TOO SMALL > $ P SUK A4,10 ADJUST DOCTAB POINTER > D & P LD A3,ECBBA,A8 GET BUFFER ADDRESS > l P CF A5,BYTE1 GET DOC TYPE > P SUK A1,3 > P RF(P) DPAR80 ILLEGAL VALUE > P U =2 > P SC A2,DTT
0x2b2874…2b2a08 Dummy {f00=0x00db, f01=0x0190, f02=»UK A2,15 > P RF(P) DPAR80 TOO LARGE ? P CF A5,DOC GET NO OF LINES ? 0 P SUK A2,0 ? R P RF(Z) DPAR80 NO LINES ? d P CF A5,DOC GET BOTTOM LINES ? P SUK A2,14 ? P RF(N) DPAR80 TOO SMALL ? P CF A5,DOC GET MARGIN ? P SUK A2,0 ? P
0x2b2a08…2b2b9c Dummy {f00=0x00db, f01=0x0190, f02=» SUK A1,0 ? P RF(Z) DPAR80 TOO SMALL @ P SUK A1,7 @ 2 P RF(P) DPAR80 TOO LARGE @ D P SC A2,DTTP03,A4 @ d P CF A5,BYTE1 GET LEFT MARGIN @ | P SUK A1,1 @ P RF(P) DPAR80 ILLEGAL VALUE @ P SLL A2,3 @ P ORS A2,DTTP03,A4 @ $ P CF A5
0x2b2b9c…2b2d30 Dummy {f00=0x00db, f01=0x0190, f02=»A5,BYTE1 GET HIGH PRINT PRESSURE @ P SUK A1,1 A ( P RF(P) DPAR80 ILLEGAL VALUE A : P SLL A2,6 A ^ P ORS A2,DTTP03,A4 A p " P LC* A1,ECBBA,A8 GET DOC TYPE A P ANK A1,/F A P RF(Z) DPAR60 DOC TYPE = 0 A P CF A5,DOC GET UPPER EDGE A P S
0x2b2d30…2b2ec4 Dummy {f00=0x00db, f01=0x0190, f02=» A2,0 A P RF(Z) DPAR30 OK B P SUK A2,24 B & P RF(N) DPAR80 TOO SMALL B 8 ( PDPAR30 LC* A1,ECBBA,A8 GET DOC TYPE B X P ANK A1,/F B P SUK A1,2 B P RF(N) DPAR70 DOC TYPE = 1 B P RF(P) DPAR40 DOC TYPE = 3 B " P CF A5,DOC GET DOCUMENT WIDT
0x2b2ec4…2b3058 Dummy {f00=0x00db, f01=0x018e, f02=»F A5,DOC GET UPPER LINES B P SUK A2,0 C P RF(Z) DPAR80 TOO SMALL C 2 P SUK A2,40 C R P RF(P) DPAR80 TOO LARGE C d & PDPAR50 CF A5,DOC GET CENTER WIDTH C P RF DPAR75 OK C 0 PDPAR60 LDK A2,0 DT=0 SET 4 LAST PARAMETERS=0 C P ADK A4,1 C
0x2b3058…2b31ec Dummy {f00=0x00db, f01=0x0190, f02=» 2 PDPAR75 LDK A1,0 IND STATUS OK FOR RETURN CODE D P ABL DISEND END REQUEST =9 D : 8 PDPAR80 ABL DISIOE END REQUEST WITH REQUEST ERROR =9 D P D 2 P* GET ONE BYTE FROM ECB BUFFER TO A1 AND A2 D $ P* CONVERTED TO HEXA FROM ASCII D P D " PBY
0x2b31ec…2b3380 Dummy {f00=0x00db, f01=0x018e, f02=»DK A3,1 INC ECB BUFFER POINTER D P RTN A5 E & P E 6 , P* GET TWO BYTES FROM ECB BUFFER TO A2 E > 2 P* CONVERTED TO HEXA AND STORED IN DOC TABLE E n P E " PDOC LDK A1,0 CLEAR HEXA VALUE E P ADK A4,1 INC TABLE POINTER E , P LCR A2,A3 GET CHA
0x2b3380…2b3514 (5, 328) Dummy {f00=0x00db, f01=0x018e, f02=» E r P ADK A1,10 UPDATE TENTH F P RB DOC10 F ( * PDOC20 ADK A3,1 INC ECB BUFFER POINTER F : 2 P LCR A2,A3 GET NEXT CHARACTER FROM ECB BUFFER F h P CF A5,CHECK TEST IF NUMERIC F P ANK A2,/F F & P ADR A2,A1 ADD TO PREV HEXA VALUE F ( P SC A2,DTT
0x2b3514…2b36a8 Dummy {f00=0x00db, f01=0x0190, f02=» F l ( PCHECK ANK A2,/FF MASK OUT CHARACTER G P SUK A2,/30 G 4 " P RB(N) DPAR80 TOO LOW ERROR =9 G H P SUK A2,9 G n $ P RB(P) DPAR80 TOO HIGH ERROR =9 G " P ADK A2,/39 RESTORE CHARACTER G P RTN A5 G P 2 LINES DELETED =9 G P XIF G P
0x2b36a8…2b383c Dummy {f00=0x00db, f01=0x0190, f02=»PRINTER REL DOC ORDER G | P CF A5,ORDER AND SEND H * P CF A5,EXECUT EXECUTE ORDER IN PRINTER H < $ P LDR A1,A2 GET PRINTER STATUS =9 H j $ P ANK A1,1 TEST PRINTER STATUS =9 H " P RF(NZ) RDOC70 NOT OPERABLE =9 H ( P CM DWTLN,A6 RESET LINE COUNTERS =9 H
0x2b383c…2b39d0 Dummy {f00=0x00db, f01=0x0190, f02=»U =9 H P IFT REL=9 U =9 I , P LDK A1,DOCOUT INDICATE DOCUMENT OUT =9 I $ P XIF U =9 I T $ PRDOC70 ABL DISEND END REQUEST =9 I f P 68 LINES DELETED =9 I P EJECT I P* I P* S U B R O U T I N E S I P* I P* I P I P* I
0x2b39d0…2b3b64 Dummy {f00=0x00db, f01=0x0190, f02=»2,STB SEND STB I P CF A5,OUTPUT J P LDR A2,A3 J , $ P RF OUT10 SEND PRINTER ORDER =9 J > P U =9 J f P J v P* J ~ P* E X E C U T E J L P* SEND EXECUTE CHAR (/03) TO PRINTER AND END OF BLOCK CHAR TO COM. =7 J P* J PEXECUT EQU *
0x2b3b64…2b3cf8 Dummy {f00=0x00db, f01=0x0190, f02=» J & P CF A5,STREG GET STATUS CHARACTER K , P SC A2,DWTST+1,A6 SAVE IN DWT STATUS =9 K 2 P RTN A5 K b P* K r 6 P* E R R O R =9(=8) K | 6 P* SEND RESET CODE (/0C) TO PRINTER =9(=8) K P* K PERROR EQU * K
0x2b3cf8…2b3e8c Dummy {f00=0x00db, f01=0x018e, f02=» U =9 K P* L P* 0 U T L P* ADD CONST. AND SEND L , P* L L POUT EQU * U =3 L V P ANK A2,/7F U =3 L l P ADK A2,/10 U =3 L P CWK A2,/7F U =1 L 4 P RF(NG) OUT10 CHARACTER NOT GREATER THAN /7F =1 L . P LDK A2,/7F IF GREATER SET C
0x2b3e8c…2b4020 Dummy {f00=0x00db, f01=0x0190, f02=» P* I H T P M P* M 0 P* INTERRUPT HANDLER: PROCESS OF INTERRUPT M " P* M V P* M ` P* M j PIHTP EQU * M t P LDR A1,A1 M ( P RF(NZ) IHTP60 LINE NOT OPERABLE =7 M P 17 LINES DELETED =9 M 4 PIHTP40 ABL LDREG RETURN FROM CF A5,OUT
0x2b4020…2b41b4 (5, 329) Dummy {f00=0x00dc, f01=0x018e, f02=» OR RECOVERY ? M z , P ABL(NZ) TDISP NO, DISPATCH ELSE =9(=7) N P XIF U =7 N F * P LDK A1,1 INDICATE NOT OPERABLE =9(=7) N X & P ABL DISEND END OF REQUEST =9(=7) N P EJECT N P* N P* R C T P N P* N 2 P* THIS IS THE RECOVERY ROUTINE FOR T
0x2b41b4…2b4348 Dummy {f00=0x00dc, f01=0x0190, f02=» @ P* AFTER PROGRAM LOADING SYSTEM PARAMETERS ARE SET UP IN DWT O 6 P* TEST STRING IS SENT TO PRINTER TO GET SYNCRONISM O H @ P* A FIXED FORMATTED RECOVERY STRING IS THEN SENT TO PRINTER O @ P* THIS STRING CONTAINS THE ACTUAL PARAMETERS AND THE ACTUAL O
0x2b4348…2b44dc Dummy {f00=0x00dc, f01=0x0190, f02=» O ~ $ P CF A15,SAVE8 SAVE REG. A1-A8 =9 P P XIF U =9 P 0 P IFT CPU852=0 U =9 P B " P MSR 8,A15 SAVE REG. A1-A8 =9 P P XIF U =9 P P IFT REL=8 U =7 P 6 P LDKL A1,/8100 ADJUST DWTCHP TO MATCH FINAL PRT =7 P P ORRS A1,A6 U =7 P P XIF U =7
0x2b44dc…2b4670 Dummy {f00=0x00dc, f01=0x0190, f02=» EQU * U =7 P ( P LDKL A1,/7FFF INDICATE DEVICE BUSY Q P ANS A1,DWTST,A6 Q @ P =8 Q X P LD A1,DWTPP,A6 Q f 6 P RF(N) RCTP08 NOT SYSTEM START UP RECOVERY =9(=2) Q ~ P 5 LINES DELETED =9 Q , P LD A3,STDPP SET UP ST PR PAR IN DWT =2 Q P S
0x2b4670…2b4804 Dummy {f00=0x00dc, f01=0x0190, f02=»D A1,DTTP03,A4 U =2 Q P STR A1,A3 U =2 R P SUK A3,2 U =2 R 4 P SUK A4,2 U =2 R J P RB(NN) RCTP05 U =2 R ` : PRCTP08 LDK A3,POTEST LOAD PRINTER ORDER TEST STATUS =9 R | P CF A5,ORDER AND SEND =9 R . P CF A5,EXECUT EXECUTE ORDER IN PRINTER =9 R
0x2b4804…2b4998 Dummy {f00=0x00dc, f01=0x0190, f02=» =2 R j P 3 LINES DELETED =9 S PRCTP20 ECR A2,A3 S * P U =4(=2) S B P CF A5,OUT SEND L/NCV S V P LDR A2,A3 S t P U =9 S P CF A5,OUT SEND CPJ/CPD S , P LC A2,DWTAPJ,A6 GET ACTUAL POS JOURNAL S P CF A5,OUT AND SEND S , P LC A2
0x2b4998…2b4b2c Dummy {f00=0x00dc, f01=0x0190, f02=»DR A2,A3 GET DOC POS BACK S P ANK A2,/40 MASK OUT MSB T " P CF A5,OUT SEND AP6 T B ( P LC A2,DWTALN,A6 GET ACTUAL LINE NO T ^ P CF A5,OUT AND SEND T P 10 LINES DELETED =9 T PRCTP40 LDK A4,10 T P LDR A3,A6 T P ADK A3,DWTDP T & PRCTP
0x2b4b2c…2b4cc0 Dummy {f00=0x00dc, f01=0x0190, f02=»CHARACTER COUNTER T ( P RB(NZ) RCTP50 WHOLE TABLE NOT SENT U 4 PRCTP60 CF A5,EXECUT EXECUTE RECOVERY IN PRINTER U F & P ANK A2,/40 TEST PRINTER STATUS =9 U ~ * P RF(Z) RCTP70 DOCUMENT STILL INSIDE =9 U ( P CM DWTLN,A6 RESET LINE COUNTERS =9 U 2 P CM DW
0x2b4cc0…2b4e54 (5, 330) Dummy {f00=0x00dc, f01=0x401e, f02=»NNING U z P END V @ V
0x2b4e54…2b4fe8 Dummy {f00=0x00dc, f01=0x2008, f02=» W z P END V @ V
0x2b4fe8…2b517c Dummy {f00=0x00dc, f01=0x0000, f02=»
[…0x5…]
0x2b5960…2b5af4 (5, 331) Opaque[0x194]
0x2b5af4…2b5c88 # DirEnt {nam=»DRTW01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1b90, f03=0x0000}
0x2b5af4…2b5c88 IdxSect {
0x2b5af4…2b5c88 f00 = 0x00dc // 0x2b5af4 @0x0
0x2b5af4…2b5c88 f01 = 0x000c // 0x2b5af6 @0x2
0x2b5af4…2b5c88 gno = [ // 0x2b5af8 @0x4
0x2b5af4…2b5c88 [0x00]: C0x00dc.0x2.0
0x2b5af4…2b5c88 [0x01]: C0x00dc.0x3.0
0x2b5af4…2b5c88 [0x02]: C0x00dd.0x0.0
0x2b5af4…2b5c88 [0x03]: C0x00dd.0x1.0
0x2b5af4…2b5c88 [0x04]: C0x00dd.0x2.0
0x2b5af4…2b5c88 [0x05]: C0x00dd.0x3.0
0x2b5af4…2b5c88 ]
0x2b5af4…2b5c88 }
0x2b5c88…2b5e1c Dummy {f00=0x00dc, f01=0x0190, f02=» 2 P IDENT DRTW01 REL 10.0 80-03-14 870105041000 P : P B P J P R 6 P************************************************** Z P* $ P* PHILIPS TERMINAL SYSTE PTS P* , P* DRTW01 = DRIVER TYPEWRITER PTS 6862 P*
0x2b5e1c…2b5fb0 Dummy {f00=0x00dc, f01=0x0190, f02=»HANDLES INPUT AND OUTPUT TO TYPEWRITERS P* PTS 6862 0 P* D P* N P EJECT X P* f P* p P*********** z P* ENTRIES * P*********** P* P ENTRY TWAD ADDRESS BLOCK P ENTRY IHTW P ENTRY TWON
0x2b5fb0…2b6144 Dummy {f00=0x00dc, f01=0x0190, f02=»R v P EXTRN TDISP DISPATCH $ P EXTRN DISEND DISPATCH AND ENDIO ( * P EXTRN SETIME SET TIME BEFORE TIME-OUT P . P EXTRN SAVE8 SAVE REGISTERS A1-A8 ON STACK ~ EXTRN DWTST STATUS EXTRN DWTBC BYTE COUNTER EXTRN DWTECB ECB ADDRESS
0x2b6144…2b62d8 Dummy {f00=0x00dc, f01=0x0190, f02=»EA A5 | & ! EXTRN DWTSB1 STACK BASE 1 IN DWT & ! EXTRN DWTSB2 STACK BASE 2 IN DWT 8 P EXTRN DWTTP TIMER POINTER b * P EXTRN INTSAV SAVE AREA LAST INTRRUPT * P EXTRN PFPOST PWF POST PROCESSING FLAG P EJECT P* P* P******
0x2b62d8…2b646c Dummy {f00=0x00dc, f01=0x0190, f02=»EQU /4280 CIO-HALT PTWINR EQU /4A00 INPUT PTWOTR EQU /4200 OUTPUT 8 PTWSST EQU /4AC0 SENSE STATUS V P* z P* P EJECT P* P* P************* P* CONSTANTS * P************* P* P* PCR
0x2b646c…2b6600 Dummy {f00=0x00dc, f01=0x0190, f02=»TIME EQU 300 TIME BEFORE TIME-OUT P* * P* 4 P************************ > P* CONDITIONAL ASSEMBLY* ^ P************************ ~ P* P* PX:A EQU 0 PX:B EQU 0 PX:C EQU 60 PX:D EQU 10 PX:E EQU 6
0x2b6600…2b6794 (5, 332) Dummy {f00=0x00dc, f01=0x0190, f02=»IT EQU 0 P* . P* A PROGRAM VERSION USING TOSS MMU PAGING * P* IS OBTAINED BY SETTING MMUPAG EQU 1. L P* z PMMUPAG EQU 0 P* P* 6 P* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION . P* SET IS OBTAINED BY SETTING CPU85
0x2b6794…2b6928 Dummy {f00=0x00dc, f01=0x0190, f02=»NTS * P********************* P* , P* 6 0 PDWTDRD EQU /10 START OF DRIVER DEFINED PART @ P* t P IFT MMUPAG=0 ~ PSTART EQU DWTDRD P XIF P* P IFT MMUPAG=1 PSTART EQU DWTDRD+4 P XIF P* P
0x2b6928…2b6abc Dummy {f00=0x00dc, f01=0x018e, f02=» * P DATA DVBKTB+DVBKTB MMU KEY TABLE SIZE ( P DATA DVBLEN+DVBLEN MMU BUFFER SIZE 2 P DATA DEVIND DEVICE INDEX ^ PTWAD EQU * P DATA TWA ACTIVATION PART " P DATA 0 ABORT ROUTINE ADDRESS P EJECT P* P* 2 P* ACTIVATI
0x2b6abc…2b6c50 Dummy {f00=0x00dc, f01=0x0190, f02=» & P ABL(Z) IHTW50 REQUESTED LENGTH =0 P* . P* 8 P LDR A2,A7 COPY ORDER B P RF(NP) TWAERR REQUEST ERROR ` P SUK A2,4 P RF(Z) TWAERR REQUEST ERROR P RF(N) TWAIN INPUT REQUEST P SUK A2,2 " P RF(NP) TWAOUT OUTPUT REQU
0x2b6c50…2b6de4 Dummy {f00=0x00dc, f01=0x0190, f02=»T=1 & P LD A2,DWTTP,A6 GET TIMER POINTER * P RF(Z) TWA010 NO TIMING ON THIS DEVICE 6 P LDR A1,A6 SAVE DWT-ADDRESS d P CF A15,SETIME P DATA TWTUT,TIME , P ST A4,DWTTP,A6 SAVE TIMER BLOCK-ADDRESS P XIF PTWA010 EQU * P I
0x2b6de4…2b6f78 Dummy {f00=0x00dc, f01=0x018e, f02=»2,DWTST,A6 RESET POINTER P LDKL A2,-2 " P ST A2,10,A8 INDICATE POWER UP 4 P ABL IHTW35 PERFORM ENDIO Z P XIF | PTWA020 LDK A2,/21 P* P* ( PREAD CF A5,STRTIO EXECUTE CIO-START P RF RED030 & PRED020 CF A5,STREG S
0x2b6f78…2b710c Dummy {f00=0x00dc, f01=0x0190, f02=» P LDR A1,A1 P RF(NZ) RED037 P XIF 0 P SUK A7,1 < P RF(P) RED050 ORDERS 02/03 N P* p P* z 0 PRED035 CF A5,STORE STORE CHARACTER IN BUFFER P CW A3,4,A8 $ P RB(L) RED020 GET NEXT CHARACTER P LDR A7,A7 P R
0x2b710c…2b72a0 Dummy {f00=0x00dc, f01=0x0190, f02=» P EJECT P PRED040 EQU * P 2 P IFT TIMOUT=1 : P LD A7,DWTOR,A6 GET ORDER P P ANK A7,/FF MASK ORDER r P CWK A7,4 P RF(G) RED045 WRITE ORDER " P LD A4,DWTTP,A6 TIMER POINTER * P RF(Z) RED045 NO TIMIMG ON THI
0x2b72a0…2b7434 (5, 333) Dummy {f00=0x00dd, f01=0x0190, f02=»W40 PERFORM TENDIO P EJECT P* ( P* 2 P* < P* ORDERS 02,03 F P* ^ P* h PRED050 EQU * r " P LD A1,10,A8 GET CONTROL WORD P RF(Z) RED080 NO KEYTABLE " P LCR A4,A1 GET NUMBER OF KEYS P ANK A4,/FF " P
0x2b7434…2b75c8 Dummy {f00=0x00dd, f01=0x0190, f02=»EMENT ADDRESS $ P CCR A2,A1 CHECK IF IN KEYTABLE " P RB(NE) RED060 NOT IN KEYTABLE > P ADR A4,A4 DOUBLE INDEX d , P ST A4,10,A8 STORE INDEX IN CONTROL WORD , PRED070 CF A5,STORE STORE KEY IN KEYTABLE P RB RED040 EXECUTE CIO-HALT P
0x2b75c8…2b775c Dummy {f00=0x00dd, f01=0x0190, f02=»,A6 P RF(E) RED110 CLEAR P EJECT ( P* 6 P* @ ( P* CHARACTER NOT FOUND IN KEYTABLE J P* v P* P* $ PRED090 LDR A4,A2 COPY CHARACTER P ANK A4,/FF MASK P LDR A1,A7 P SUK A1,1 P RF(Z) RED100 OR
0x2b775c…2b78f0 Dummy {f00=0x00dd, f01=0x0190, f02=»F RED110 P* P* PRED100 SUK A4,/20 $ P RF(N) CODERR LESS THAN /20 > P SUK A4,/3F b $ P RF(NP) RED110 CORRECT CHARACTER v P* P* $ PCODERR LDK A1,4 CODE CHECK ERROR P ORS A1,8,A8 . P CF A5,STORE STORE CHARACT
0x2b78f0…2b7a84 Dummy {f00=0x00dd, f01=0x0190, f02=»,TWBSP,A6 P RF(E) RED120 BACKSPACE P CC A2,TWCLR,A6 2 P RB(NE) RED035 J P* ` P* j P LDK A3,0 CLEAR ECB-BUFFER t " P RB RED020 GET NEXT CHARACTER P* P* PRED120 SUK A3,1 BACKSPACE & P RB(NN) RED020 GET NEX
0x2b7a84…2b7c18 Dummy {f00=0x00dd, f01=0x0190, f02=» P* W R I T E P* 4 P* ORDERS 05 AND 06: BASIC AND STANDARD WRITE $ P* P* f PWRITE EQU * p PTWAOUT EQU * P INH P LDK A4,0 P LDK A2,0 $ P CF A5,STRTIO EXECUTE CIO-START P* P* P CWK
0x2b7c18…2b7dac Dummy {f00=0x00dd, f01=0x0190, f02=» P ANK A3,/FF P SUK A3,/2B P RF(Z) WRT030 NO CR OR LF , P* N P* X , P ST A4,DWTHP,A6 HEAD POSITION INDICATOR b P LDK A4,2 $ P LDK A2,CR SEND CARRIAGE RETURN P EJECT P* P* P* $ PWRT010 CF A5,OTR
0x2b7dac…2b7f40 Dummy {f00=0x00dd, f01=0x0190, f02=» PWRT020 SUK A3,5 P RB(Z) WRT015 SEND SECOND LF P SUK A3,1 D P RF(NZ) WRT030 V P LDK A2,/0C SEND FORM FEED n P RB WRT010 " PWRT030 LDK A3,2 BUFFER POINTER P RF WRT050 GET CHARACTER P* P* P* PWR
0x2b7f40…2b80d4 (5, 334) Dummy {f00=0x00dd, f01=0x0190, f02=» 6 PWRT050 CF A5,GETCHR GET CHARACTER FROM ECB-BUFFER P LDR A1,A1 > P RB(Z) RED040 LAST CHARACTER R P CWK A7,5 v P RB(Z) WRT040 BASIC WRITE P* P* ( P LDR A1,A2 ORDER 06: STANDARD WRITE P ANK A1,/FF P SUK A1,/0
0x2b80d4…2b8268 Dummy {f00=0x00dd, f01=0x018e, f02=»D LESS THAN /20 P SUK A1,/3F " P RB(NP) WRT040 BETWEEN /20-/5F , P SUK A1,/20 R " P RF(NP) WRT060 BETWEEN /60-/7F f P* P* PERRCOD LDK A1,4 P ORS A1,8,A8 " P RB WRT050 GET NEXT CHARACTER P* P* PWR
0x2b8268…2b83fc Dummy {f00=0x00dd, f01=0x0190, f02=» P* PWRTTAB EQU * 2 P CF A5,GETCHR GET FIRST TAB.POSITION CHARACTER " P LDR A4,A2 COPY X 4 P CF A5,GETCHR GET SECOND TAB. POSITION CHARACTER p P ANK A2,/F P ANK A4,/F P RF(Z) TAB020 PTAB010 ADK A2,/A P SUK A4,1
0x2b83fc…2b8590 Dummy {f00=0x00dd, f01=0x0190, f02=»BER OF SPACES TO BE SENT , P RB(NP) WRT050 NO SPACES SHOULD BE SENT P LDR A4,A2 P " PTAB030 LDK A2,/20 SEND BALNKS b $ PTAB040 CF A5,OTR SEND CHARACTER ( P IM DWTST,A6 INCREMENT BYTE COUNTER P SUK A4,1 & P RB(NZ) TAB030 SEND ANOTHE
0x2b8590…2b8724 Dummy {f00=0x00dd, f01=0x0190, f02=»INDEX x " P RB WRT050 GET NEXT CHARACTER P EJECT 4 P* B P* L P* RECOVERY ROUTINE V P* r P* | P* PTWON EQU * P IFT CPU852=1 & P CF A15,SAVE8 SAVE A1-A8 ON STACK P XIF P* P IFT CPU852=0
0x2b8724…2b88b8 Dummy {f00=0x00dd, f01=0x0190, f02=»200 & P ORS A1,DWTST,A6 INDICATE POWER UP P XIF 6 P LD A1,DWTST,A6 B P RF(N) EXIT DEVICE NOT BUSY Z PTWON10 LD A3,DWTA3,A6 ~ P LD A7,DWTOR,A6 GET ORDER P ANK A7,/FF P LD A8,DWTECB,A6 ECB-ADDRESS P LDKL A5,DWTSB2
0x2b88b8…2b8a4c Dummy {f00=0x00dd, f01=0x0190, f02=» z P INH P LDK A2,0 $ P CF A5,STRTIO EXECUTE CIO-START & P LDK A2,CR N P LDK A3,0 ` P LD A4,DWTHP,A6 r P ADK A4,1 $ P RB TAB040 REPRINT LAST REQUEST P* PTWON20 LDK A1,TPERR ORDER 05 P ABL DISEND P*
0x2b8a4c…2b8be0 Dummy {f00=0x00dd, f01=0x0190, f02=» P* PIHTW EQU * $ P ST P,INTSAV SAVE LAST INTERRUPT $ P IFT CPU852=1 L & P CF A15,SAVE8 SAVE A1-A8 ON STACK b P XIF P* P IFT CPU852=0 " P MSR 8,A15 SAVE A1-A8 ON STACK P XIF P* P LDKL A6,DWTW01
0x2b8be0…2b8d74 (5, 335) Dummy {f00=0x00dd, f01=0x0190, f02=»,TWSST P EXR A2 EXECUTE SST P RF(A) IHTW30 ENDIO * P LD A7,DWTOR,A6 GET ORDER F P ANK A7,/FF h P SUK A7,4 | P RF(P) IHTW30 " P LDR* A2,A6 GET DEVICE ADDRESS P ORKL A2,TWINR P EXR A2 EXECUTE INR $ P ANK A2,/7
0x2b8d74…2b8f08 Dummy {f00=0x00dd, f01=0x018e, f02=»IMING ON THIS DEVICE ~ P LDKL A1,-TIME P ST* A1,DWTTP,A6 2 P XIF J P* V P* ` PIHTW30 LDK A1,0 j P RF LDREGE RESTORE REGISTERS P P PIHTW35 EQU * P IFT POWUP+TIMOUT=2 P " P LD A1,DWTTP,A6 TIMER POIN
0x2b8f08…2b909c Dummy {f00=0x00dd, f01=0x018e, f02=» PIHTW40 EQU * P* P* " , PIHTW50 ST A3,6,A8 SAVE EFFECTIVE LENGTH , PIHTW55 SUK A7,4 P RF(NP) IHTW60 READ ORDER t P* P* $ P LC A3,DWTBC,A6 GET BYTE COUNTER * P ADS A3,DWTHP,A6 UPDATE HEAD POSITION P LDK A3,
0x2b909c…2b9230 Dummy {f00=0x00dd, f01=0x0190, f02=» P ADK A1,2 ! P SRL A1,1 ! P ST A1,10,A8 ! ( P XIF ! < P LDK A1,0 ! H P ABL DISEND PERFORM TENDIO ! Z P* ! | P* ! P ! PSKIP LDR* A2,A6 ! P ORKL A2,TWSST ! P EXR A2 SST ! P RF(A) EXIT ! P LDR* A2,A6 ! P ORKL
0x2b9230…2b93c4 Dummy {f00=0x00dd, f01=0x0190, f02=» ! , PSTRTIO LDKL A1,TWSTRT EXECUTE CIO-START " P RF EXECIO " 8 ( PHLTIO LDKL A1,TWHLT CIO-HALT " J P RF EXECIO " v " POTR LDKL A1,TWOTR OTR " P* " P* " PEXECIO LD A7,PFPOST " P RF(NZ) STREG PFINIT PENDING " P ORR*
0x2b93c4…2b9558 Dummy {f00=0x00dd, f01=0x0190, f02=»T,A6 INDICATE INTERRUPTS ALLOWED " $ P ST A3,DWTA3,A6 SAVE REGISTER A3 # ( $ P ST A4,DWTA4,A6 A4 # P $ P ST A5,DWTA5,A6 A5 # x PEXIT ABL TDISP # PHALT ST A2,DWTA2,A6 # " P CF A5,HLTIO EXECUTE CIO-HALT # P LD A2,DWTA2,A6
0x2b9558…2b96ec Dummy {f00=0x00dd, f01=0x0190, f02=»FER # r P* $ P* $ ( PSTORE LD A4,2,A8 GET BUFFER ADDRESS $ $ P ADR A4,A3 GET CHARACTER ADDRESS $ L P SCR A2,A4 STORE CHARACTER $ t $ P ADK A3,1 INCREMENT BUFFER INDEX $ P RTN A5 $ P* $ P* $ P* $ P IFT TIMOUT=1 $ P* $
0x2b96ec…2b9880 Dummy {f00=0x00dd, f01=0x0190, f02=»ETURN CODE $ z P XIF % P* % P* % ( P EJECT % 2 P* % @ P* % J P* L D R E G E % T P* % l 8 P* RESTORE A3-A5 FROM DWT AND RETURN TO USER VIA A5 % v P* % P* % PLDREGE EQU * % & P LD A3,DWTA3,A6 RELOAD REGISTER A3 % & P LD
0x2b9880…2b9a14 (5, 336) Dummy {f00=0x00dd, f01=0x0190, f02=»B,A6 % P RTN A5 RETURN VIA A5-STACK & P EJECT & 0 P* & > P* & H P* G E T C H R & R P* & j 8 P* SUBROUTINE TO GET ONE CHARACTER FROM ECB-BUFFER & t P* & P* ON ENTRY: & P* & P* A3 = BUFFER INDEX & P* A8 = ECB-AD
0x2b9a14…2b9ba8 Dummy {f00=0x00dd, f01=0x0190, f02=» J P* IF LAST CHARACTER IS REACHED A3 IS STORED IN ECB EFFECTIVE LENGTH ' P* ' R P* ' PGETCHR EQU * ' f P LD A1,4,A8 REQUESTED LENGTH ' z P SUR A1,A3 ' * P RF(NP) GCH010 LAST CHARACTER REACHED ' " P LD A1,2,A8 GET BUFFER ADDRESS ' P ADR
0x2b9ba8…2b9d3c Dummy {f00=0x00dd, f01=0x0190, f02=»8 STORE EFFECTIVE LENGTH ' P RTN A5 ( P EJECT ( 0 P* ( > ( P* DEVICE WORK TABLE FOR TYPEWRITER ( H P* ( t P* ( ~ PDWTW01 EQU * TABLE ENTRY ( " P DATA /0010 CHANNEL PARAMETER ( 0 P DATA /8000 STATUS./8000 MEANS DEVICE READY ( P DATA
0x2b9d3c…2b9ed0 Dummy {f00=0x00dd, f01=0x0190, f02=»E INDICATOR ( | P DATA 0 TERMINAL QUEUE ) IFT MMUPAG=1 ) 2 & " DATA 0 SAVE AREA USER ECB ADDRESS ) H DATA DEVECB MMU ECB ADDRESS ) r XIF ) P DATA 0 OUTPUT QUEUE LINK ) P DATA 0 SAVE AREA FOR A3 ) P DATA 0 SAVE AREA FOR A4 ) P DAT
0x2b9ed0…2ba064 Dummy {f00=0x00dd, f01=0x018e, f02=»CKSPACE KEY ) x P RIGHT BYTE CANCEL KEY * & P DATA /0D00 LEFT BYTE STANDARD EOR * 4 P RIGHT BYTE DOUBLE ZERO * ^ " P DATA 0 HEAD POSITION POINETR * P DATA 0 SAVE AREA FOR A2 * P* * P EJECT DRTW01 * P* * P* * P IFT MMUPAG=
0x2ba064…2ba1f8 Dummy {f00=0x00dd, f01=0x403e, f02=» P XIF + P* + P* + P* + $ P END + .@ + :0 LEFT BYTE STANDARD EOR * 4 P RIGHT BYTE DOUBLE ZERO * ^ " P DATA 0 HEAD POSITION POINETR * P DATA 0 SAVE AREA FOR A2 * P* * P EJECT DRTW01 * P* * P* * P IFT MMUPAG=
0x2ba1f8…2ba38c Dummy {f00=0x00dd, f01=0x2008, f02=» ,
0x2ba38c…2ba520 Dummy {f00=0x00dd, f01=0x0190, f02=»TOR | $ P DATA 0 RETR. FAULT-ACKUMULATOR , P DATA 0 UNDEFINED- INTERRUPT-ACKUMULATOR 4 ( P DATA 0 PRINTER TIMEOUT ACKUMULATOR d P* P XIF P* P IFT LOCHAN=3 P* P* P* PDWA2 EQU /13 DEVICE ADDRESS P
0x2ba520…2ba6b4 (5, 337) Opaque[0x194]
0x2ba6b4…2ba848 # DirEnt {nam=»DSKSUB«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1bc0, f03=0x0000}
0x2ba6b4…2ba848 IdxSect {
0x2ba6b4…2ba848 f00 = 0x00de // 0x2ba6b4 @0x0
0x2ba6b4…2ba848 f01 = 0x000a // 0x2ba6b6 @0x2
0x2ba6b4…2ba848 gno = [ // 0x2ba6b8 @0x4
0x2ba6b4…2ba848 [0x00]: C0x00de.0x0.0
0x2ba6b4…2ba848 [0x01]: C0x00de.0x1.0
0x2ba6b4…2ba848 [0x02]: C0x00de.0x2.0
0x2ba6b4…2ba848 [0x03]: C0x00de.0x3.0
0x2ba6b4…2ba848 [0x04]: C0x00df.0x0.0
0x2ba6b4…2ba848 ]
0x2ba6b4…2ba848 }
0x2ba848…2ba9dc Dummy {f00=0x00de, f01=0x0190, f02=» 2 P IDENT DSKSUB REL 10.0 80-03-14 870105041000 P : P* B , P**************************************** L P* | , P* PHILIPS TERMINAL SYSTEM PTS * P* , P* DSKSUB = DISC SUBROUTINES * P* P* P*
0x2ba9dc…2bab70 Dummy {f00=0x00de, f01=0x0190, f02=»FILE MANAGEMENT SUBROUTINES: P* $ 4 P* - VOLCLR = CLEAR VOLUME NAME(S) IN DISC DWT . < P* - VOLNAM = MOVE VOLUME NAME FROM DWT TO USER BUFFER f 6 P* - VOLADR = COMPUTE VOLUME NAME ADDRESS IN DWT > P* - NVLCHK = CHECK IF NEW VOLUME LOADE
0x2bab70…2bad04 Dummy {f00=0x00de, f01=0x0190, f02=» 6 P* - INXDWT = COMPUTE DWT ADDRESS + DOUBLE INDEX 8 P* - NVLTAB = TTAB ADDRESSES FOR TASKS TO HAVE NVL > P* z P* P EJECT DSKSUB P* P* P*********** P* ENTRIES * P*********** P* P* , P
0x2bad04…2bae98 Dummy {f00=0x00de, f01=0x0190, f02=»ME NAME ADDRESS IN DWT v . P ENTRY NVLCHK CHECK FOR NEW VOLUME LOADED : P ENTRY VOLGET MOVE VOLUME NAME FROM DISC BUFFER TO DWT P , P ENTRY NEWVOL SET NEW VOLUME LOADED BITS 4 P ENTRY INXDWT COMPUTE DWT ADDRESS + DOUBLE INDEX 6 P ENTRY NVLTAB TTAB
0x2bae98…2bb02c Dummy {f00=0x00de, f01=0x0190, f02=»T MASK | P EJECT DSKSUB P* $ P* . P************* 8 P* EXTERNALS * N P************* d P* z P* 4 P EXTRN IHRTN RETURN WITHOUT ENABLING INTERRUPTS P EXTRN TTABLD LDTASK TTAB P EXTRN TTABFM FMTASK TTAB *
0x2bb02c…2bb1c0 Dummy {f00=0x00de, f01=0x0190, f02=»RN DWTTAB TTAB ADDRESS " P EXTRN DWTUEC USER ECB ADDRESS P EXTRN DWTVOL VOLUME NAME D ( P EXTRN DWTNVL NEW VOLUME LOADED FLAG f " P EXTRN EWTVOL VOLUME FILE CODE 2 P EXTRN FWTEW1 POINTER TO 2ND EWT BLOCK IN FWT $ P EXTRN FWTPAR ACCESS PARAM
0x2bb1c0…2bb354 (5, 338) Dummy {f00=0x00de, f01=0x0190, f02=»CBEL ECB EFFECTIVE LENGTH P EJECT DSKSUB " P* 8 P* B , P*************************************** L P* | P* CONDITIONAL ASSEMBLY P* , P*************************************** P* P* . P* A PROGRAM VERSION US
0x2bb354…2bb4e8 Dummy {f00=0x00de, f01=0x0190, f02=»VERSION USING THE EXTENDED INSTRUCTION . P* SET IS OBTAINED BY SETTING CPU852 EQU 0. . P* ` PCPU852 EQU 1 j P* ~ * . ** A PROGRAM VERSION USING TOSS DISC PAGING * &* IS OBTAINED BY SETTING DSKPAG EQU 1. * DSKPAG EQU 0
0x2bb4e8…2bb67c Dummy {f00=0x00de, f01=0x0190, f02=» P* PSWPBLK EQU 0 P* " P EJECT DSKSUB , P* D P* N 2 P* A PROGRAM VERSION SUPPORTING FILE MANAGEMENT X * P* IS OBTAINED BY SETTING FILMAN EQU 1. P* PX:A EQU 0 PFILMAN EQU X:A P* P* 2 P* A PR
0x2bb67c…2bb810 Dummy {f00=0x00de, f01=0x0190, f02=» P* P EJECT DSKSUB P* * P* 4 P********** > P* VOLCLR * P P********** b P* t P* ~ 6 P* VOLCLR WILL CLEAR THE REQUESTED VOLUME NAME(S) " P* IN THE REQUESTED DISC DWT. P* . P* INPUT: A1 = NUMBE
0x2bb810…2bb9a4 Dummy {f00=0x00de, f01=0x0190, f02=» P LDR A2,A1 & P CF A15,VOLADR VOLUME NAME ADDRESS P* D PVCLR10 EQU * N P CMR A1 CLEAR ONE WORD b P ADK A1,2 INCREMENT POINTER $ P SUK A2,2 DECREMENT LOOP COUNTER P RB(P) VCLR10 P RF RETURN P* P EJECT DS
0x2bb9a4…2bbb38 Dummy {f00=0x00de, f01=0x0190, f02=»E NAME OF SELECTED DISC r 4 P* TO THE USER BUFFER IF REQUESTED LENGTH = 6. P* X P* INPUT: A6 = DWT ADDRESS b P* A8 = ECB ADDRESS P* $ P* OUTPUT: A1-A4 ARE DESTROYED P* PVOLNAM EQU * $ P LD A1,ECBRL,A
0x2bbb38…2bbccc Dummy {f00=0x00de, f01=0x0190, f02=»T A4,ECBEL,A8 SET EFFECTIVE LENGTH P* * P IFT MMUPAG=0 4 ( P LD A2,ECBBA,A8 USER BUFFER ADDRESS J P* v P EJECT DSKSUB P* P* PVNAM10 EQU * P LDR* A3,A1 MOVE ONE WORD P STR A3,A2 ( P ADK A1,2 INCREMENT
0x2bbccc…2bbe60 Dummy {f00=0x00de, f01=0x0190, f02=» P IFT MMUPAG=1 2 P LD A2,DWTTAB,A6 TTAB ADDRESS OF CALLING TASK P TS -30,A15 SAVE RUNNING MMU T P TL TTB:MT,A2 LOAD USER MMU x & P LD A2,DWTUEC,A6 USER ECB ADDRESS ( P EL A2,ECBBA,A2 USER BUFFER ADDRESS P MVSU A4 MOVE VOLUME N
0x2bbe60…2bbff4 (5, 339) Dummy {f00=0x00de, f01=0x0190, f02=»****** P* VOLADR * P********** P* 2 P* < P* INPUT: A6 = DWT ADDRESS F P* j ( P* OUTPUT: A1 = VOLUME NAME ADDRESS t P* A4 = 6 P* PVOLADR EQU * P LC A4,DWTOR,A6 INDEX P* PVOLA05 EQU *
0x2bbff4…2bc188 Dummy {f00=0x00de, f01=0x0190, f02=»4,1 P RB(NN) VOLA10 P LDK A4,6 " P RF RETURN 4 P* F P EJECT DSKSUB P P* h P* r P********** | P* NVLCHK * P********** P* P* 8 P* NVLCHK IS CALLED AT ACTIVATION FROM DISC DRIVER 8 P* TO
0x2bc188…2bc31c Dummy {f00=0x00de, f01=0x0190, f02=»A6 = DWT ADDRESS P* 6 P* OUTPUT: A1 = RETURN CODE (/20 IF NVL, ELSE 0) " 0 P* A2 = DWT ADDRESS + DOUBLE INDEX $ P* A3, A4 ARE DESTROYED P* PNVLCHK EQU * $ P LD A2,DWTOR,A6 INDEX AND ORDER 0 P ST A2,DWT
0x2bc31c…2bc4b0 Dummy {f00=0x00de, f01=0x0190, f02=»FF RESET BIT 0 (FIRST REQUEST BIT) P ST A1,DWTNVL,A2 * P ANK A1,/FF CHECK IF NVL B " P RF(Z) RETURN RETURN IF NO NVL b " P LD A4,DWTTAB,A6 TTAB ADDRESS P LDK A1,1 " P LDKL A3,NVLTAB NVLTAB ADDRESS P* P EJECT DSKSUB P
0x2bc4b0…2bc644 Dummy {f00=0x00de, f01=0x0190, f02=»,A3 CHECK TTAB ADDRESS $ P RF(E) NVL:20 NVL FOR THIS TASK P SLL A1,1 SHIFT NVL BIT MASK F * P ADK A3,2 POINT TO NEXT TTAB IN NVLTAB j P RB NVL:10 P* PNVL:20 EQU * 0 P AN A1,DWTNVL,A2 CHECK IF NVL FOR THIS TASK & P RF(Z) RETUR
0x2bc644…2bc7d8 Dummy {f00=0x00de, f01=0x0190, f02=»* P* $ PRETURN EQU * COMMON RETURN LABEL P IFT CPU852=1 < 2 P ABL IHRTN RETURN WITHOUT ENABLING INTERRUPTS R P XIF P* P IFT CPU852=0 P RTN A15 P XIF P* P EJECT DSKSUB P* P* P**
0x2bc7d8…2bc96c Dummy {f00=0x00de, f01=0x018e, f02=» DISC DWT AND CHECK IF THERE IS A NEW VOLUME MOUNTED. P* > ( P* INPUT: A2 = DISC BUFFER ADDRESS H 2 P* A3 = FILE CODE (FOR DRIVE WITH INDEX = 0) t 0 P* BIT 0 SET MEANS TEST STATUS ORDER P* A6 = DWT ADDRESS P*
0x2bc96c…2bcb00 Dummy {f00=0x00de, f01=0x0190, f02=» * P CF A15,VOLADR DWT VOLUME NAME ADDRESS P LDK A7,0 RESET NVL FLAG 6 P* V PVGET10 EQU * ` , P LDR* A8,A2 ONE WORD OF NEW VOLUME NAME t , P CWR* A8,A1 COMPARE WITH OLD VOLUME NAME P RF(E) VGET20 P LDK A7,1 SET NVL FLAG $ P
0x2bcb00…2bcc94 (5, 340) Dummy {f00=0x00de, f01=0x0190, f02=»FFER POINTERS z P ADK A2,2 $ P SUK A4,2 DECREMENT LOOP COUNTER ( P RB(P) VGET10 P P CF A15,INXDWT f P ADK A7,0 CHECK NVL FLAG | " P RB(Z) RETURN RETURN IF NO NVL . P SLA A3,1 CHECK IF TEST STATUS OR RECOVERY & P RB(O) RETURN TEST S
0x2bcc94…2bce28 Dummy {f00=0x00de, f01=0x0190, f02=»THIS DISC l P SLL A7,1 $ P RB(N) RETURN FIXED DISC, NO NVL $ P* L P EJECT DSKSUB V P* n P* x P********** P* NEWVOL * P********** P* P* > P* NEWVOL IS ENTERED FROM THE ROUTINE VOLGET WHEN IT HAS
0x2bce28…2bcfbc Dummy {f00=0x00de, f01=0x0190, f02=»THE CONCERNED FILE CODE AND FILES 8 P* OPENED ON THAT VOLUME. TASKS REPRESENTED IN THE * 4 P* TABLE NVLTAB WILL GET RETURN CODE /20 AT THE f ( P* NEXT REQUEST ON THAT FILE CODE. P* 4 P* INPUT: A3 = FILE CODE (DISC ONE FOR DRIVER)
0x2bcfbc…2bd150 Dummy {f00=0x00de, f01=0x0190, f02=»* A1-A2 ARE DESTROYED P* PNEWVOL EQU * * P LD A2,NVLBIT NVL BIT MASK > 0 P ST A2,DWTNVL,A4 INDICATE NEW VOLUME LOADED ` P LC A2,DWTOR,A6 INDEX P ANK A2,/3 P ADR A3,A2 ACTUAL FILE CODE P* P EJECT DSKSUB
0x2bd150…2bd2e4 Dummy {f00=0x00de, f01=0x0190, f02=» POINTER r P* > P* SET NEW VOLUME LOADED FOR ALL FILES ON CONCERNED VOLUME P* PNEW:10 EQU * f P LDR* A2,A1 NEXT FWT ADDRESS z P RB(Z) RETURN NO MORE FWT:S P LDR A1,A2 SAVE FWT ADDRESS 2 P ADKL A2,FWTEW1 ADDRESS TO FIRST E
0x2bd2e4…2bd478 Dummy {f00=0x00de, f01=0x0190, f02=»F(NE) NEW:30 P LDKL A2,/8000 NVL BIT 0 P ORS A2,FWTPAR,A1 INDICATE NEW VOLUME LOADED 2 P RB NEW:10 f P* x PNEW:30 EQU * . P LDR* A2,A2 ADDRESS TO NEXT EWT STRUCTURE , P RB(Z) NEW:10 END OF THIS EWT STRUCTURE ( P RB NEW:20 CONTI
0x2bd478…2bd60c Dummy {f00=0x00de, f01=0x0190, f02=»**** P* P* H P* INXDWT WILL COMPUTE THE DWT ADDRESS ADDED TO THE DOUBLED INDEX. P* l P* INPUT: A6 = DWT ADDRESS v P* 0 P* OUTPUT: A4 = DWT ADDRESS + DOUBLE INDEX * P* NO REGISTERS ARE DESTROYED P*
0x2bd60c…2bd7a0 Dummy {f00=0x00de, f01=0x0190, f02=» P* P EJECT DSKSUB P* * P* 4 P********** > P* NVLTAB * P P********** b P* t P* ~ 4 P* NVLTAB HOLDS THE TTAB ADDRESSES OF THE TASKS 6 P* THAT WILL RECEIVE NEW VOLUME LOADED WHEN A NEW P* VOLUME HAS
0x2bd7a0…2bd934 (5, 341) Dummy {f00=0x00df, f01=0x0190, f02=» | P DATA TTABLD LDTASK TTAB P XIF ( P* 4 PNVLDMT EQU * > P IFT FILMAN=1 R P IFT DATMAN=1 h P DATA 0 TTAB #D ~ P DATA 0 TTAB #E P DATA 0 TTAB #F P DATA 0 TTAB #G P XIF P* P IFT FILMAN=1
0x2bd934…2bdac8 Dummy {f00=0x00df, f01=0x4164, f02=» FILMAN=0 P IFF DSKPAG+SWPBLK=0 P DATA TTABLD LDTASK TTAB . P* N PNVLEND EQU * X P* l PNVLBIT DATA 3 NVL BIT MASK v P XIF P* P IFT FILMAN=0 P IFT DSKPAG+SWPBLK=0 P* PNVLEND EQU * P* P
0x2bdac8…2bdc5c Dummy {f00=0x00df, f01=0x2008, f02=» NT DSKSUB PRR 10.1 79-08-09 CHLO END 2@ >
0x2bdc5c…2bddf0 Dummy {f00=0x00df, f01=0x018e, f02=»1,6 IN POSITION h P ST A1,DWTPAG,A6 PAGE i P ADKL A1,/400 NEXT PAGE i 6 ( P ST A1,DWTPAG+2,A6 PSEUDO MMU TABLE i V P SRL A2,3 i $ P ST A2,DWTUBU,A6 LOGICAL ADDRESS i P RTN A5 i P* i P XIF i P* i P EJECT DRDU01 i P* i
0x2bddf0…2bdf84 Dummy {f00=0x00df, f01=0x0190, f02=» P* j $ P******************************* j P* j 6 * P* INPUT A1=RETURN CODE (AFTER READ) j @ . P* OUTPUT DWTBSE=DRIVER BUFFER INDICATOR j n P* j PBSELOD EQU * j & P LDR* A3,A6 GET READ SECTOR NUMBER j " PBSEL00 EQU * FROM SEEK VERIFY j
0x2bdf84…2be118 Dummy {f00=0x00df, f01=0x0190, f02=»40 READ ERROR j P LD A2,DWTOR,A6 GET INDEX k P ANKL A2,/300 k 8 P SLL A2,6 k N P ORR A2,A3 k ` PBSEL40 EQU * k r 4 P ST A2,DWTBSE,A6 UPDATE DRIVER BUFFER INDICATOR k PBSEL50 EQU * k P RTN A5 k P* k P EJECT DRDU01 k P* k
0x2be118…2be2ac Dummy {f00=0x00df, f01=0x0190, f02=»UFFER * k v , P* IF NECESSARY * l , P* * l F , P*************************************** l v P* l * P* INPUT: DWTFSW=SAVED WORD INDICATOR l P* DWTSWD=SAVED WORD l , P*
0x2be2ac…2be440 Dummy {f00=0x00df, f01=0x0190, f02=»A3,DWTSWD,A6 l P IFT MMUPAG=1 m & P ML 2,DWTBA1,A6 GET BUFFER ADDRESS m * P RF(Z) REWO20 SYSTEM AREA m T P TS -30,A15 SAVE REGISTERS m v $ P TL DWTPAG,A6 SET MMU REGISTERS m 0 P LD A2,DWTUBU,A6 GET LOGICAL BUFFER ADDRESS m ( P ES A3,PHSECL,A2 RES
0x2be440…2be5d4 (5, 342) Opaque[0x194]
0x2be5d4…2be768 # DirEnt {nam=»DSUMOD«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1be8, f03=0x0000}
0x2be5d4…2be768 IdxSect {
0x2be5d4…2be768 f00 = 0x00df // 0x2be5d4 @0x0
0x2be5d4…2be768 f01 = 0x0004 // 0x2be5d6 @0x2
0x2be5d4…2be768 gno = [ // 0x2be5d8 @0x4
0x2be5d4…2be768 [0x00]: C0x00df.0x1.0
0x2be5d4…2be768 [0x01]: C0x00df.0x2.0
0x2be5d4…2be768 ]
0x2be5d4…2be768 }
0x2be768…2be8fc Dummy {f00=0x00df, f01=0x0190, f02=» 2 P IDENT DSUMOD REL 10.0 80-03-14 870105041000 P : P* B 8 P**************************************************** L P* $ P* PHILIPS TERMINAL SYSTEM PTS P* P* TOSS DATA MANAGEMENT P* P* P* 8 P******
0x2be8fc…2bea90 Dummy {f00=0x00df, f01=0x0190, f02=»OMPUTER P*CALLING SEQUENCE $ P* A1-A2 = ARG1 * $ P* A6-A7 = ARG2 R P* CF A14,DSUMOD z & P*RETURN: RESULT IN A1-A2 4 P* CAUTION REGISTERS A3,A4,A6,A7 ARE CRUSHED. P
0x2bea90…2bec24 Dummy {f00=0x00df, f01=0x0190, f02=» . P***************************************** P* : 6 P* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION D . P* SET IS OBTAINED BY SETTING CPU852 EQU 0. ~ P* PCPU852 EQU 1 P* P EJECT PDSUMOD EQU * P LDK A3,0
0x2bec24…2bedb8 Dummy {f00=0x00df, f01=0x0190, f02=» P ANK.L A7,X'7FFF' P ANK.L A2,/7FFF ( P ADK A7,1 J P RF(1) NOVER1 h P ADK A6,1 P RF(3) OVER4 P RF(7) NOVER PNOVER1 ADR A2,A7 P
0x2bedb8…2bef4c Dummy {f00=0x00df, f01=0x0190, f02=» END3 P ADK A2,0 P RF(0) END0 . P RF(7) END1 L POVER1 ANK.L A2,X'7FFF' j P ADK A1,1 P RF(3) OVER4 P RB(7) NOVER POVER4 ADR A1,A6
0x2bef4c…2bf0e0 Dummy {f00=0x00df, f01=0x0190, f02=» END0 P RF(1) END1 P RF(2) END2 " P XIF 6 PEND3 ADK A3,/80 B PEND2 ADK A3,/80 d PEND1 ADK A3,/80 F PEND0 SLL A3,1 ************************************* P ANK.L A3,/
0x2bf0e0…2bf274 (5, 343) Dummy {f00=0x00df, f01=0x4044, f02=»ROGRAM X P RTN A14 P END ,@ @
0x2bf274…2bf408 Dummy {f00=0x00df, 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
0x2bf408…2bf59c Dummy {f00=0x00df, f01=0x0190, f02=»ATA 0 NAK-ACKUMULATOR $ P DATA 0 RETR. FAULT-ACKUMULATOR , P DATA 0 UNDEFINED- INTERRUPT-ACKUMULATOR F ( P DATA 0 PRINTER TIMEOUT ACKUMULATOR v P* P XIF P* P EJECT P* P* : P************************************
0x2bf59c…2bf730 Dummy {f00=0x00df, f01=0x018e, f02=»***** ` P* 4 P* CONTROL WORK TABLE FOR LOCAL CHANNEL NO. 3 P* P PCWTLT3 EQU * Z P* n P IFT LOCHAN=3 x P* P* P* PDWA3 EQU /23 DEVICE ADDRESS P* P DATA 0 LAST OUTPUT DWT P DATA 0 LAST O
0x2bf730…2bf8c4 Dummy {f00=0x00df, f01=0x0190, f02=» " P DATA 0 RETRANSMISSION COUNTER P DATA 0 QUEUE * P DATA 0 SECOND QUEUE @ P* P IFT ACKMUL=1 f P* | P DATA 0 NAK-ACKUMULATOR $ P DATA 0 RETR. FAULT-ACKUMULATOR , P DATA 0 UNDEFINED- INTERRUPT-ACKUMULATOR ( P DATA 0 PR
0x2bf8c4…2bfa58 Dummy {f00=0x00df, f01=0x0190, f02=»E 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 P OTR A2,0,DWA3 OTR P CIO A2,1,DWA3 CIO-START " P DATA 0 RETRANSMISSION COUNTER P DATA 0 QUEUE
0x2bfa58…2bfbec Dummy {f00=0x00df, f01=0x0190, f02=»LATOR v , P DATA 0 UNDEFINED- INTERRUPT-ACKUMULATOR ( P DATA 0 PRINTER TIMEOUT ACKUMULATOR > P* j P XIF t P* P EJECT P* P* : P***************************************************** : P* C W T L T 4
0x2bfbec…2bfd80 Dummy {f00=0x00df, f01=0x0190, f02=»L CHANNEL NO. 4 p P* PCWTLT4 EQU * " P* 6 P IFT LOCHAN=4 @ P* V P* ` P* j PDWA4 EQU /33 t P* P DATA 0 LAST OUTPUT DWT P DATA 0 LAST OUTPUT WORD P DATA INTLT4 INTERRUPT TABLE P INR A2,0,DWA4 INR
0x2bfd80…2bff14 (5, 344) Opaque[0x194]
0x2bff14…2c00a8 # DirEnt {nam=»DTTP03«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1bf8, f03=0x0000}
0x2bff14…2c00a8 IdxSect {
0x2bff14…2c00a8 f00 = 0x00df // 0x2bff14 @0x0
0x2bff14…2c00a8 f01 = 0x0006 // 0x2bff16 @0x2
0x2bff14…2c00a8 gno = [ // 0x2bff18 @0x4
0x2bff14…2c00a8 [0x00]: C0x00df.0x3.0
0x2bff14…2c00a8 [0x01]: C0x00e0.0x0.0
0x2bff14…2c00a8 [0x02]: C0x00e0.0x1.0
0x2bff14…2c00a8 ]
0x2bff14…2c00a8 }
0x2c00a8…2c023c Dummy {f00=0x00df, f01=0x0190, f02=» 2 P IDENT DTTP03 REL 10.0 80-03-14 870105041000 P : P* B < P******************************************************* L < P* * < P* PHILIPS TERMINAL SYSTEM PTS *
0x2c023c…2c03d0 Dummy {f00=0x00df, f01=0x018e, f02=» * < P* * < < P* * | < P******************************************************* P* @ P*
0x2c03d0…2c0564 Dummy {f00=0x00df, f01=0x0190, f02=» P* > P* SHALL REPLACE THE STANDARD A4 PARAMETERS IN THE TABLES P* P 2 P* THE NUMBER OF USED DOCUMENTS IS SPECIFIED Z P* 8 P* AT "NOFDOC" AND IS USED FOR CONDITIONAL ASSEMBLY P* P* OF THE MODULE. P* 6 P*
0x2c0564…2c06f8 Dummy {f00=0x00df, f01=0x018e, f02=»IVER SPECIFICATION TSB 429/78. P EJECT & P 4 P < P D N P* PARAMETERS LIMITS UNITS APPL. FOR DT STD. A4 L P* J P* 1 DT=DOCUMENT TYPE 0-3 - 0 1 2 3 1 J P* 2 TO=TIME OUT
0x2c06f8…2c088c Dummy {f00=0x00df, f01=0x0190, f02=» J P* 4 NL=NUMBER OF LINES 1-99 - X X X X 68 J P* 5 BL=BOTTOM LINE 14-99 1/60" X X X X 17 R J P* 6 MA=MARGIN 1-80 1/10" X X X X 2 J P* 7 MF=MARGIN FINE
0x2c088c…2c0a20 Dummy {f00=0x00df, f01=0x0190, f02=» CM=CRITICAL MARGIN 0,1 - X X X X 0 J P* 10 HP=HIGH PRINT PRESS 0,1 - X X X X 0 H J P* 11 UE=UPPER EDGE 15-82 1/5" X 58 J P* UE=UPPER EDGE 15-82
0x2c0a20…2c0bb4 (5, 345) Dummy {f00=0x00e0, f01=0x0190, f02=»NT WITDH 40-97 1/10" X - J P* UL=UPPER LINES 1-40 - X - > J P* 14 CW=CENTER WITDH 0-99 1/60" X X - P EJECT P P P * P ENTRY D
0x2c0bb4…2c0d48 Dummy {f00=0x00e0, f01=0x0190, f02=»F USED h . P* DOCUMENT TABLES CAN BE CHANGED (1-16) P @ $ PNOFDOC EQU 1 NUMBER OF DOCUMENTS H P p * PDN EQU NOFDOC-1 NUMBEROF EXTRA TABLES x P P P L PDOCPAR FORM 5,3,8,8,8,8,2,1,2,3,8,8,8,8/1,0,2,3,4,5,9,8,7,6,10,11,12,13
0x2c0d48…2c0edc Dummy {f00=0x00e0, f01=0x0190, f02=»0 f P P IFF DN=0 P* DOCUMENT TABLE 1 $ P* @ P J 0 P DOCPAR 1,0,10,68,17,02,2,0,0,0,58,00,00,00 R P XIF P P IFF DN=0 P IFF DN=1 P* DOCUMENT TABLE 2 P* P 0 P DOCPAR 1,0,10,68,17,02,2,0,
0x2c0edc…2c1070 Dummy {f00=0x00e0, f01=0x018e, f02=» 0 P DOCPAR 1,0,10,68,17,02,2,0,0,0,58,00,00,00 P XIF < P H P IFF DN=0 P P IFF DN=1 b P IFF DN=2 t P IFF DN=3 P* DOCUMENT TABLE 4 P* P 0 P DOCPAR 1,0,10,68,17,02,2,0,0,0,58,00,00,00 P XIF P
0x2c1070…2c1204 Dummy {f00=0x00e0, f01=0x0190, f02=» 0 P DOCPAR 1,0,10,68,17,02,2,0,0,0,58,00,00,00 P XIF < P H P IFF DN=0 P P IFF DN=1 b P IFF DN=2 t P IFF DN=3 P IFF DN=4 P IFF DN=5 P* DOCUMENT TABLE 6 P* P 0 P DOCPAR 1,0,10,68,17,02,2,0,0,
0x2c1204…2c1398 Dummy {f00=0x00e0, f01=0x0190, f02=» DN=5 P IFF DN=6 P* DOCUMENT TABLE 7 P* < P F 0 P DOCPAR 1,0,10,68,17,02,2,0,0,0,58,00,00,00 N P XIF P P IFF DN=0 P IFF DN=1 P IFF DN=2 P IFF DN=3 P IFF DN=4 P IFF DN=5 P IFF D
0x2c1398…2c152c Dummy {f00=0x00e0, f01=0x0190, f02=» P P IFF DN=0 P IFF DN=1 P IFF DN=2 0 P IFF DN=3 B P IFF DN=4 T P IFF DN=5 f P IFF DN=6 x P IFF DN=7 P IFF DN=8 P* DOCUMENT TABLE 9 P* P 0 P DOCPAR 1,0,10,68,17,02,2,0,0,0,58,00,00,00
0x2c152c…2c16c0 Dummy {f00=0x00e0, f01=0x0190, f02=» IFF DN=6 P IFF DN=7 P IFF DN=8 $ P IFF DN=9 6 P* DOCUMENT TABLE 10 H P* f P p 0 P DOCPAR 1,0,10,68,17,02,2,0,0,0,58,00,00,00 x P XIF P P IFF DN=0 P IFF DN=1 P IFF DN=2 P IFF DN=3 P
0x2c16c0…2c1854 (5, 346) Dummy {f00=0x00e0, f01=0x0190, f02=»NT TABLE 11 P* P 0 P DOCPAR 1,0,10,68,17,02,2,0,0,0,58,00,00,00 & P XIF Z P f P IFF DN=0 n P IFF DN=1 P IFF DN=2 P IFF DN=3 P IFF DN=4 P IFF DN=5 P IFF DN=6 P IFF DN=7 P IFF DN=8
0x2c1854…2c19e8 Dummy {f00=0x00e0, f01=0x0190, f02=»0,0,0,58,00,00,00 v P XIF P & P IFF DN=0 . P IFF DN=1 @ P IFF DN=2 R P IFF DN=3 d P IFF DN=4 v P IFF DN=5 P IFF DN=6 P IFF DN=7 P IFF DN=8 P IFF DN=9 P IFF DN=10 P IFF DN=11 P I
0x2c19e8…2c1b7c Dummy {f00=0x00e0, f01=0x0190, f02=» IFF DN=0 P IFF DN=1 P IFF DN=2 $ P IFF DN=3 6 P IFF DN=4 H P IFF DN=5 Z P IFF DN=6 l P IFF DN=7 ~ P IFF DN=8 P IFF DN=9 P IFF DN=10 P IFF DN=11 P IFF DN=12 P IFF DN=13 P* DOCUMENT
0x2c1b7c…2c1d10 Dummy {f00=0x00e0, f01=0x0190, f02=» P IFF DN=2 P IFF DN=3 P IFF DN=4 , P IFF DN=5 > P IFF DN=6 P P IFF DN=7 b P IFF DN=8 t P IFF DN=9 P IFF DN=10 P IFF DN=11 P IFF DN=12 P IFF DN=13 P IFF DN=14 P* DOCUMENT TABLE 15
0x2c1d10…2c1ea4 Dummy {f00=0x00e0, f01=0x402a, f02=»OTAL TABLE LENGTH v P END @ & P IFF DN=4 , P IFF DN=5 > P IFF DN=6 P P IFF DN=7 b P IFF DN=8 t P IFF DN=9 P IFF DN=10 P IFF DN=11 P IFF DN=12 P IFF DN=13 P IFF DN=14 P* DOCUMENT TABLE 15
0x2c1ea4…2c2038 Dummy {f00=0x00e0, f01=0x2008, f02=» IFF DN=8 IFF DN=9 IFF DN=10 0 IFF DN=11 B IFF DN=12 T IFF DN=13 f IFF DN=14 x * DOCUMENT TABLE 15 D15 XIF END @ F DN=12 IFF DN=13 * DOCUMENT T
0x2c2038…2c21cc Dummy {f00=0x00e0, f01=0x0190, f02=»E v P CF A5,OFLI SET OFF-LINE P ANKL A1,/FFFE SKIP BIT 15 * P RF ENDIO7 L P ^ P f P* n P* STEP REVERSE /33 x P* P PSTPR CF A5,SKPR SKIP REVERSE " PSTPR10 RF(1) ENDIO6 ILL STATUS P LDKL A3,-1 P ADR
0x2c21cc…2c2360 Dummy {f00=0x00e0, f01=0x0190, f02=» P* STEP FORWARD /34 P* P * PSTPF CF A5,SKPF SKIP FORWARD 2 P RF(1) ENDIO6 ILL STATUS V " PSTPF10 IMR A2 INCR SEQ COUNTER v PSTPF20 RF ENDIO6 P P P P* P* RECOVER /3F P* P PRECV CF A5
0x2c2360…2c24f4 (5, 347) Opaque[0x194]
0x2c24f4…2c2688 # DirEnt {nam=»DVTDI «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1c10, f03=0x0000}
0x2c24f4…2c2688 IdxSect {
0x2c24f4…2c2688 f00 = 0x00e0 // 0x2c24f4 @0x0
0x2c24f4…2c2688 f01 = 0x0002 // 0x2c24f6 @0x2
0x2c24f4…2c2688 gno = [ // 0x2c24f8 @0x4
0x2c24f4…2c2688 [0x00]: C0x00e0.0x2.0
0x2c24f4…2c2688 ]
0x2c24f4…2c2688 }
0x2c2688…2c281c Dummy {f00=0x00e0, f01=0x0190, f02=» 0 P IDENT DVTDI REL 10.0 80-03-14 870105041000 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*
0x2c281c…2c29b0 Dummy {f00=0x00e0, 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
0x2c29b0…2c2b44 Dummy {f00=0x00e0, 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,
0x2c2b44…2c2cd8 Dummy {f00=0x00e0, 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
0x2c2cd8…2c2e6c Dummy {f00=0x00e0, f01=0x0190, f02=»A2 # P CM MTTIM INDICATE NO TIMER $ P RB ENDIO8 $ . P EJECT DRMT01 $ @ P $ X P* $ ` * P* SBOW SEARCH BOT AND WAIT FOR REWIND $ j P* $ P* ENTRY: $ P* $ P* A6: DWT ADDRESS $ P* $ P* EXIT: $ P* $ P* A1: STATUS
0x2c2e6c…2c3000 Dummy {f00=0x00e0, f01=0x0190, f02=» * PSBOW LDKL A1,-MTRTOT-1 SET UP TIME OUT % P ST A1,MTCTR % 2 P % F PSBOW10 CF A5,SBOT SEARCH BOT % N P SLC A1,2 CHECK IF READY % r " P RF(N) SBOW30 STILL REWINDING % P % PSBOW20 SRC A1,2 % P RTN A5 RETURN % P % & PSBOW30 IM MTCTR CH
0x2c3000…2c3194 (5, 348) Opaque[0x194]
0x2c3194…2c3328 # DirEnt {nam=»DVTDN «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1c18, f03=0x0000}
0x2c3194…2c3328 IdxSect {
0x2c3194…2c3328 f00 = 0x00e0 // 0x2c3194 @0x0
0x2c3194…2c3328 f01 = 0x0002 // 0x2c3196 @0x2
0x2c3194…2c3328 gno = [ // 0x2c3198 @0x4
0x2c3194…2c3328 [0x00]: C0x00e0.0x3.0
0x2c3194…2c3328 ]
0x2c3194…2c3328 }
0x2c3328…2c34bc Dummy {f00=0x00e0, f01=0x0190, f02=» 0 P IDENT DVTDN REL 10.0 80-03-14 870105041000 P 8 , P* DEVICE WORK TABLE FOR NUMERIC DISPLAY @ P* p P ENTRY DVTDN TABLE ENTRY z P* ( P EXTRN DNAD POINTER TO ADDRESS-BLOCK PMMUPAG EQU 0 PDVTDN EQU * TABLE ENTRY " P DAT
0x2c34bc…2c3650 Dummy {f00=0x00e0, f01=0x0190, f02=»ER z ( P DATA DNAD POINTER TO ADDRESS-BLOCK P DATA /C44E TTAB-ADDRESS 6 $ P DATA 0 WAIT/ACTIVATE INDICATOR V P DATA 0 TERMINAL QUEUE ~ IFT MMUPAG=1 & " DATA 0 SAVE AREA USER ECB ADDRESS DATA DEVECB MMU ECB ADDRESS XIF
0x2c3650…2c37e4 Dummy {f00=0x00e0, f01=0x4086, f02=»ES 4 DWT-STACK P IFT MMUPAG=1 PDEVECB DATA 0,0,0,0,0,0 , P XIF L PDWTEND EQU * X P* l P END v@ TERMINAL QUEUE ~ IFT MMUPAG=1 & " DATA 0 SAVE AREA USER ECB ADDRESS DATA DEVECB MMU ECB ADDRESS XIF
0x2c37e4…2c3978 Dummy {f00=0x00e0, 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*
0x2c3978…2c3b0c Dummy {f00=0x00e0, f01=0x0190, f02=» PCOMM05 LD A3,ECBRL,A8 , P LD A4,ECBBA,A8 , " P ADK A5,4 , : $ P LDKL A6,DWMT01 GET DWT ADDRESS , L P LDK A1,1 NOT OPERABLE , t P ABR* A5 , P , P , $ PCOMM10 CM MTINT IND INT ALLOWED , & PCOMM15 ST A2,MTSA2 SAVE REGISTERS , P ST
0x2c3b0c…2c3ca0 Dummy {f00=0x00e0, f01=0x0190, f02=»ER CHMT , z P* - P - PIHMT EQU * - " $ P ST P,INTSAV SAVE LAST INTERRUPT - 4 P IFT CPU852=1 - & P CF A15,SAVE8 SAVE A1-A8 ON STACK - r P XIF - P* - P IFT CPU852=0 - " P MSR 8,A15 SAVE A1-A8 ON STACK - P XIF - P* - P SST
0x2c3ca0…2c3e34 (5, 349) Opaque[0x194]
0x2c3e34…2c3fc8 # DirEnt {nam=»DVTDY «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1c20, f03=0x0000}
0x2c3e34…2c3fc8 IdxSect {
0x2c3e34…2c3fc8 f00 = 0x00e1 // 0x2c3e34 @0x0
0x2c3e34…2c3fc8 f01 = 0x0002 // 0x2c3e36 @0x2
0x2c3e34…2c3fc8 gno = [ // 0x2c3e38 @0x4
0x2c3e34…2c3fc8 [0x00]: C0x00e1.0x0.0
0x2c3e34…2c3fc8 ]
0x2c3e34…2c3fc8 }
0x2c3fc8…2c415c Dummy {f00=0x00e1, f01=0x0190, f02=» 0 P IDENT DVTDY REL 10.0 80-03-14 870105041000 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
0x2c415c…2c42f0 Dummy {f00=0x00e1, f01=0x0190, f02=»A DWTEND-DVTDY ORDER ( P DATA DYAD POINTER TO ADDRESS-BLOCK P DATA /C459 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
0x2c42f0…2c4484 Dummy {f00=0x00e1, 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
0x2c4484…2c4618 Dummy {f00=0x00e1, 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
0x2c4618…2c47ac Dummy {f00=0x00e1, f01=0x0190, f02=»DDRESS TO CHANNEL STATUS 3 P* A6: DWT ADDRESS 4 P* 4 : P* EXIT: 4 D P* 4 T P* A1: STATUS AFTER RECOVERY 4 ^ $ P* A2: ADDRESS TO CHANNEL STATUS 4 P* A6: DWT ADDRESS 4 P* 4 P 4 P 4 & PMTRC LDR A7,A2 CALC CHANNEL NUMBER 4 P
0x2c47ac…2c4940 Dummy {f00=0x00e1, f01=0x0190, f02=» 4 t P CF A5,ONLI 5 P LDR* A3,A2 GET SEQ COUNTER 5 & P ABL(Z) SBOW TAPE SHOULD BE AT BOT 5 @ 8 P LDK A7,MTRBLK REVERSE TAPE TO AVOID ANY OLD BLOCKS 5 j PMTRC05 CF A5,SKPR 5 P SUK A7,1 5 P RB(NZ) MTRC05 5 P 5 * PMTRC10 CF A5,RSQN READ S
0x2c4940…2c4ad4 (5, 350) Opaque[0x194]
0x2c4ad4…2c4c68 # DirEnt {nam=»DVTG1 «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1c28, f03=0x0000}
0x2c4ad4…2c4c68 IdxSect {
0x2c4ad4…2c4c68 f00 = 0x00e1 // 0x2c4ad4 @0x0
0x2c4ad4…2c4c68 f01 = 0x0002 // 0x2c4ad6 @0x2
0x2c4ad4…2c4c68 gno = [ // 0x2c4ad8 @0x4
0x2c4ad4…2c4c68 [0x00]: C0x00e1.0x1.0
0x2c4ad4…2c4c68 ]
0x2c4ad4…2c4c68 }
0x2c4c68…2c4dfc Dummy {f00=0x00e1, f01=0x0190, f02=» 0 P IDENT DVTG1 REL 10.0 80-03-14 870105041000 P 8 P =1, SYST. START IND. @ P PRR 10.1 79-09-12 ` , P* DEVICE WORK TABLE FOR GENERAL PRINTER | P* P ENTRY DVTG1 TABLE ENTRY P* P* * P EXTRN GPAD8 POINTER TO ADDRES
0x2c4dfc…2c4f90 Dummy {f00=0x00e1, f01=0x0190, f02=» DATA /8000 STATUS./8000 MEANS DEVICE READY P DATA 0 ECB ADDRESS 4 P DATA DWTEND-DVTG1 ORDER P ( P DATA GPAD8 POINTER TO ADDRESS BLOCK p P DATA 'GP' TTAB-ADDRESS $ P DATA 0 WAIT/ACTIVATE INDICATOR P DATA 0 TERMINAL QUEUE P IFT M
0x2c4f90…2c5124 Dummy {f00=0x00e1, f01=0x0190, f02=» , P DATA 0,0,0 SAVE AREA FOR REGS. A3,A4,A5 P DATA 0,0,0,0 STACK 4 P DATA 0 TIMER POINTER P " P DATA 0 DOCUMENT CHARACTER SET n " P DATA 0 PRINTER CHARACTER SET P DATA 0 PRINTER PAPER LENGTH " P DATA 0 DOCUMENT PAPER LENGTH P DAT
0x2c5124…2c52b8 Dummy {f00=0x00e1, f01=0x416c, f02=» 6 P DATA 0 DWT-DISPLACEMENT TO LINE NO,CHAR.SET,ETC. 0 P DATA 0,0,0 ACTUAL COLUMN DOCUMENT AND PAPER > P DATA 0,0 r P DATA 0 P DATA 0 SYSTEM START IND. =1 ( P DATA 0 LINE/FORM FEED INDICATOR =1 P IFT MMUPAG=1 PDEVECB EQU *
0x2c52b8…2c544c Dummy {f00=0x00e1, 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
0x2c544c…2c55e0 Dummy {f00=0x00e1, f01=0x0190, f02=» 2 : END OF JOURNAL **IN REL 10...** =6(=4) @ P* BIT 10 : END OF JOURNAL **IN REL 8 & 9** =6 < 4 P* BIT 10 : DOCUMENT OUT =4 ( P* BIT 13 : CODE CHECK ERROR $ P* BIT 15 : NOT OPERABLE
0x2c55e0…2c5774 (5, 351) Opaque[0x194]
0x2c5774…2c5908 # DirEnt {nam=»DVTGP «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1c30, f03=0x0000}
0x2c5774…2c5908 IdxSect {
0x2c5774…2c5908 f00 = 0x00e1 // 0x2c5774 @0x0
0x2c5774…2c5908 f01 = 0x0002 // 0x2c5776 @0x2
0x2c5774…2c5908 gno = [ // 0x2c5778 @0x4
0x2c5774…2c5908 [0x00]: C0x00e1.0x2.0
0x2c5774…2c5908 ]
0x2c5774…2c5908 }
0x2c5908…2c5a9c Dummy {f00=0x00e1, f01=0x0190, f02=» 0 P IDENT DVTGP REL 10.0 80-03-14 870105041000 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
0x2c5a9c…2c5c30 Dummy {f00=0x00e1, f01=0x0190, f02=»ATA DWTEND-DVTGP ORDER ( P DATA GPAD POINTER TO ADDRESS-BLOCK P DATA /C750 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
0x2c5c30…2c5dc4 Dummy {f00=0x00e1, 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
0x2c5dc4…2c5f58 Dummy {f00=0x00e1, 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
0x2c5f58…2c60ec Dummy {f00=0x00e1, f01=0x0190, f02=»******** P* 6 P* THE STANDARD NATIONAL CHARACTER SET IS CHOOSEN > P* BY SETTING X:A TO 0-11 ACCORDING TO THE LIST BELOW =4 T P* P* NCV=0 GREAT BRITAIN P* 1 GERMANY P* 2 FRANCE P* 3 SPAIN
0x2c60ec…2c6280 Dummy {f00=0x00e1, f01=0x0190, f02=»GOSLAVIA/FRANCE 2 (DEPEND. ON CHAR GEN) =7 P* 9 USA 6 " P* 10 DENMARK, NORWAY 2 L P U =7(=4) r P* PX:A EQU 0 PSTDNCV EQU X:A P* 6 P* THE LOWER CASE SET CAN BE INCLUDED AS STANDARD P* BY SETTI
0x2c6280…2c6414 (5, 352) Opaque[0x194]
0x2c6414…2c65a8 # DirEnt {nam=»DVTKB «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1c38, f03=0x0000}
0x2c6414…2c65a8 IdxSect {
0x2c6414…2c65a8 f00 = 0x00e1 // 0x2c6414 @0x0
0x2c6414…2c65a8 f01 = 0x0002 // 0x2c6416 @0x2
0x2c6414…2c65a8 gno = [ // 0x2c6418 @0x4
0x2c6414…2c65a8 [0x00]: C0x00e1.0x3.0
0x2c6414…2c65a8 ]
0x2c6414…2c65a8 }
0x2c65a8…2c673c Dummy {f00=0x00e1, f01=0x0190, f02=» 0 P IDENT DVTKB REL 10.0 80-03-14 870105041000 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
0x2c673c…2c68d0 Dummy {f00=0x00e1, 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
0x2c68d0…2c6a64 Dummy {f00=0x00e1, 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
0x2c6a64…2c6bf8 Dummy {f00=0x00e1, f01=0x4048, f02=»0,0,0 P XIF PDWTEND EQU * P* . P END 8@ DTER 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
0x2c6bf8…2c6d8c Dummy {f00=0x00e1, 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
0x2c6d8c…2c6f20 Dummy {f00=0x00e1, f01=0x0190, f02=» P********** P* TABLES * P********** , P* > P* H P DATA DVBLEN MMU BUFFER SIZE R P DATA 2 DEVICE INDEX v PTPAD3 EQU * ADDRESS BLOCK P DATA ACTP ACTIVATION DRIVER P IFF REL=8 U =6 " P DATA 0 ABORT ROUTINE AD
0x2c6f20…2c70b4 (5, 353) Opaque[0x194]
0x2c70b4…2c7248 # DirEnt {nam=»DVTT1 «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1c40, f03=0x0000}
0x2c70b4…2c7248 IdxSect {
0x2c70b4…2c7248 f00 = 0x00e2 // 0x2c70b4 @0x0
0x2c70b4…2c7248 f01 = 0x0002 // 0x2c70b6 @0x2
0x2c70b4…2c7248 gno = [ // 0x2c70b8 @0x4
0x2c70b4…2c7248 [0x00]: C0x00e2.0x0.0
0x2c70b4…2c7248 ]
0x2c70b4…2c7248 }
0x2c7248…2c73dc Dummy {f00=0x00e2, f01=0x0190, f02=» 0 P IDENT DVTT1 REL 10.0 80-03-14 870105041000 P 8 4 P* DEVICE WORK TABLE FOR TELLER TERMINAL PRINTER @ P* x P ENTRY DVTT1 TABLE ENTRY P* P* * P EXTRN TPAD3 POINTER TO ADDRESS-BLOCK $ PMMUPAG EQU 0 MEM. MAN.UNIT COND.
0x2c73dc…2c7570 Dummy {f00=0x00e2, f01=0x0190, f02=» DATA 0 ECB ADDRESS P DATA DWTEND-DVTT1 ORDER ( P DATA TPAD3 POINTER TO ADDRESS BLOCK < P DATA 'TP' TTAB-ADDRESS h $ P DATA 0 WAIT/ACTIVATE INDICATOR P DATA 0 TERMINAL QUEUE P IFT MMUPAG=1 & P DATA 0 SAVE AREA USER ECB ADDRESS
0x2c7570…2c7704 Dummy {f00=0x00e2, f01=0x018e, f02=» DATA 0,0,0,0 STACK P DATA 0 TIMER POINTER P DATA 0 PRINTER PARAMETERS : 0 P DATA 0 REQUESTED, ACTUAL PRINT POS JOURNAL 0 P DATA 0 REQUESTED, ACTUAL PRINT POS DOCUMENT * P DATA 0 REQUESTED, ACTUAL LINE NUMBER ( P DATA 0,0,0,0,0 DOCUME
0x2c7704…2c7898 Dummy {f00=0x00e2, f01=0x4018, f02=» P END @ P DATA 0 TIMER POINTER P DATA 0 PRINTER PARAMETERS : 0 P DATA 0 REQUESTED, ACTUAL PRINT POS JOURNAL 0 P DATA 0 REQUESTED, ACTUAL PRINT POS DOCUMENT * P DATA 0 REQUESTED, ACTUAL LINE NUMBER ( P DATA 0,0,0,0,0 DOCUME
0x2c7898…2c7a2c Dummy {f00=0x00e2, 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
0x2c7a2c…2c7bc0 Dummy {f00=0x00e2, f01=0x0190, f02=»* ORDER 24 : SET PRINTER PARAMETERS , P* CONTROL WORD CONTAINS: - . B P* BIT 0 : INDICATE CHANGE OF CH FONT AND NCV =4 - P F P* BIT 01-03 : CHARACTER FONT =4 - F P* BIT 04-07 : NATIONAL CHARACTER VARIA
0x2c7bc0…2c7d54 (5, 354) Opaque[0x194]
0x2c7d54…2c7ee8 # DirEnt {nam=»DVTTP «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1c48, f03=0x0000}
0x2c7d54…2c7ee8 IdxSect {
0x2c7d54…2c7ee8 f00 = 0x00e2 // 0x2c7d54 @0x0
0x2c7d54…2c7ee8 f01 = 0x0002 // 0x2c7d56 @0x2
0x2c7d54…2c7ee8 gno = [ // 0x2c7d58 @0x4
0x2c7d54…2c7ee8 [0x00]: C0x00e2.0x1.0
0x2c7d54…2c7ee8 ]
0x2c7d54…2c7ee8 }
0x2c7ee8…2c807c Dummy {f00=0x00e2, f01=0x0190, f02=» 0 P IDENT DVTTP REL 10.0 80-03-14 870105041000 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.
0x2c807c…2c8210 Dummy {f00=0x00e2, 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
0x2c8210…2c83a4 Dummy {f00=0x00e2, 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
0x2c83a4…2c8538 Dummy {f00=0x00e2, 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
0x2c8538…2c86cc Dummy {f00=0x00e2, f01=0x018e, f02=» P RF(P) DPAR80 TOO LARGE 4 P CF A5,DOC GET NO OF LINES 4 $ P SUK A2,0 4 F P RF(Z) DPAR80 NO LINES 4 X P CF A5,DOC GET BOTTOM LINES 4 v P SUK A2,14 4 P RF(N) DPAR80 TOO SMALL 4 P CF A5,DOC GET MARGIN 4 P SUK A2,0 4 P RF(Z) DPAR8
0x2c86cc…2c8860 Dummy {f00=0x00e2, f01=0x0190, f02=» 4 P RF(Z) DPAR80 TOO SMALL 5 P SUK A1,7 5 ( P RF(P) DPAR80 TOO LARGE 5 : P SC A2,DTTP03,A4 5 Z P CF A5,BYTE1 GET LEFT MARGIN 5 r P SUK A1,1 5 P RF(P) DPAR80 ILLEGAL VALUE 5 P SLL A2,3 5 P ORS A2,DTTP03,A4 5 $ P CF A5,BYTE1 GET
0x2c8860…2c89f4 (5, 355) Opaque[0x194]
0x2c89f4…2c8b88 # DirEnt {nam=»DW0701«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1c50, f03=0x0000}
0x2c89f4…2c8b88 IdxSect {
0x2c89f4…2c8b88 f00 = 0x00e2 // 0x2c89f4 @0x0
0x2c89f4…2c8b88 f01 = 0x0002 // 0x2c89f6 @0x2
0x2c89f4…2c8b88 gno = [ // 0x2c89f8 @0x4
0x2c89f4…2c8b88 [0x00]: C0x00e2.0x2.0
0x2c89f4…2c8b88 ]
0x2c89f4…2c8b88 }
0x2c8b88…2c8d1c Dummy {f00=0x00e2, f01=0x0190, f02=» 2 P IDENT DW0701 REL 10.0 80-03-14 870105041000 P : P* B : P* DEVICE WORK TABLE FOR DATA-COMMUNICATION DEVICE 1 L P* P ENTRY DW0701 TABLE ENTRY * P EXTRN DC07AD POINTER TO ADDRESS-BLOCK P* PMMUPAG EQU 0 P*
0x2c8d1c…2c8eb0 Dummy {f00=0x00e2, f01=0x0190, f02=»DRESS P DATA DWTEND-DW0701 P RIGHT BYTE=ORDER * * P DATA DC07AD POINTER TO ADDRESS-BLOCK F P DATA 'DC' TTAB-ADDRESS t $ P DATA 0 WAIT/ACTIVATE INDICATOR P DATA 0 TERMINAL QUEUE P* P IFT MMUPAG=1 P DATA 0 USER E
0x2c8eb0…2c9044 Dummy {f00=0x00e2, f01=0x40fc, f02=»ATA 0 BUFFER QUEUE ANCHOR " P DATA 0 TIMER FOR BUFFER QUEUE " P DATA 0 REQUEST TIMER VALUE H P* l P IFT MMUPAG=1 v PDC:ECB EQU * MMU ECB P DATA 0,0,0,0,0,0 P XIF P* PDWTEND EQU * P END @ ATA 0 USER E
0x2c9044…2c91d8 Dummy {f00=0x00e2, f01=0x2008, f02=» R ( P DATA DCAD POINTER TO ADDRESS-BLOCK P DATA 0 TTAB-ADDRESS > $ P DATA 0 WAIT/ACTIVATE INDICATOR Z P DATA 0 TERMINAL QUEUE P DATA 0 TIMER POINTER P DATA 0 WRITE QUEUE P DATA 0 STATUS QUEUE P DATA 0,0 SAVE ARE
0x2c91d8…2c936c Dummy {f00=0x00e2, f01=0x0190, f02=»NUMERIC ; v ( PCHECK ANK A2,/FF MASK OUT CHARACTER < P SUK A2,/30 < < P RF(N) CHCK10 TOO LOW ERROR < P P SUK A2,9 < t P RF(P) CHCK10 TOO HIGH ERROR < " P ADK A2,/39 RESTORE CHARACTER < P RTN A5 < ( PCHCK10 ADK A5,4 UPDATE STACK POINTER <
0x2c936c…2c9500 Dummy {f00=0x00e2, f01=0x0190, f02=» EQU * < . P LDK A3,PORDOC LOAD PRINTER REL DOC ORDER = P CF A5,ORDER AND SEND = @ * P CF A5,EXECUT EXECUTE ORDER IN PRINTER = ^ P U =5(=4) = P EJECT = P* = P* = P* UPDATE OF STATUS AND DWT = P* = P* = PSTATUS EQU *
0x2c9500…2c9694 (5, 356) Opaque[0x194]
0x2c9694…2c9828 # DirEnt {nam=»DW1301«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1c58, f03=0x0000}
0x2c9694…2c9828 IdxSect {
0x2c9694…2c9828 f00 = 0x00e2 // 0x2c9694 @0x0
0x2c9694…2c9828 f01 = 0x0002 // 0x2c9696 @0x2
0x2c9694…2c9828 gno = [ // 0x2c9698 @0x4
0x2c9694…2c9828 [0x00]: C0x00e2.0x3.0
0x2c9694…2c9828 ]
0x2c9694…2c9828 }
0x2c9828…2c99bc Dummy {f00=0x00e2, f01=0x0190, f02=» 2 P IDENT DW1301 REL 10.0 80-03-14 870105041000 P : P* B : P* DEVICE WORK TABLE FOR DATA-COMMUNICATION DEVICE 1 L P* P ENTRY DW1301 TABLE ENTRY * P EXTRN DC13AD POINTER TO ADDRESS-BLOCK P* PMMUPAG EQU 0 P*
0x2c99bc…2c9b50 Dummy {f00=0x00e2, f01=0x0190, f02=»DRESS P DATA DWTEND-DW1301 P RIGHT BYTE=ORDER * * P DATA DC13AD POINTER TO ADDRESS-BLOCK F P DATA 'DC' TTAB-ADDRESS t $ P DATA 0 WAIT/ACTIVATE INDICATOR P DATA 0 TERMINAL QUEUE P* P IFT MMUPAG=1 P DATA 0 USER E
0x2c9b50…2c9ce4 Dummy {f00=0x00e2, f01=0x412a, f02=»ATA 0 STATUS QUEUE P DATA 0 RECEIVE QUEUE " P DATA 0 REQUEST TIMEOUT VALUE 8 P DATA 0 REQUEST VECTOR ^ P DATA 0 RETRY COUNTER | P* P IFT MMUPAG=1 PDC:ECB EQU * MMU ECB P DATA 0,0,0,0,0,0 P XIF P* PDW
0x2c9ce4…2c9e78 Dummy {f00=0x00e2, f01=0x2008, f02=» ATUS QUEUE P DATA 0 RECEIVE QUEUE " P DATA 0 REQUEST TIMEOUT VALUE 8 P DATA 0 REQUEST VECTOR ^ P DATA 0 RETRY COUNTER | P* P IFT MMUPAG=1 PDC:ECB EQU * MMU ECB P DATA 0,0,0,0,0,0 P XIF P* PDW
0x2c9e78…2ca00c Dummy {f00=0x00e2, f01=0x0190, f02=»CHARACTER C x P RTN A5 D P* D " P* ERROR D , $ P* SENDS RESET CODE TO PRINTER D > P* D f PERROR EQU * D p P LDK A2,RESET D P CF A5,OUTPUT D $ P LDK A2,ETB SEND END OF BLOCK =7 D P CF A5,OUTPUT U =7 D P RTN A5 D P* D
0x2ca00c…2ca1a0 Dummy {f00=0x00e2, f01=0x0190, f02=»WK A2,/7F U =1 D 4 P RF(NG) OUT10 CHARACTER NOT GREATER THAN /7F =1 E . P LDK A2,/7F IF GREATER SET CHAR TO /7F =1 E N POUT10 EQU * U =1 E P CF A5,OUTPUT E P RTN A5 E P* E P* SETBK E : P* SET BACK REQ LINE AND POS TO ACTUAL
0x2ca1a0…2ca334 (5, 357) Opaque[0x194]
0x2ca334…2ca4c8 # DirEnt {nam=»DW1501«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1c60, f03=0x0000}
0x2ca334…2ca4c8 IdxSect {
0x2ca334…2ca4c8 f00 = 0x00e3 // 0x2ca334 @0x0
0x2ca334…2ca4c8 f01 = 0x0002 // 0x2ca336 @0x2
0x2ca334…2ca4c8 gno = [ // 0x2ca338 @0x4
0x2ca334…2ca4c8 [0x00]: C0x00e3.0x0.0
0x2ca334…2ca4c8 ]
0x2ca334…2ca4c8 }
0x2ca4c8…2ca65c Dummy {f00=0x00e3, f01=0x0190, f02=» 2 P IDENT DW1501 REL 10.0 80-03-14 870105041000 P : P* B : P* DEVICE WORK TABLE FOR DATA-COMMUNICATION DEVICE 1 L P* P ENTRY DW1501 TABLE ENTRY * P EXTRN DC15AD POINTER TO ADDRESS-BLOCK P* PMMUPAG EQU 0 P*
0x2ca65c…2ca7f0 Dummy {f00=0x00e3, f01=0x0190, f02=»DRESS P DATA DWTEND-DW1501 P RIGHT BYTE=ORDER * * P DATA DC15AD POINTER TO ADDRESS-BLOCK F P DATA 'DC' TTAB-ADDRESS t $ P DATA 0 WAIT/ACTIVATE INDICATOR P DATA 0 TERMINAL QUEUE P* P IFT MMUPAG=1 P DATA 0 USER E
0x2ca7f0…2ca984 Dummy {f00=0x00e3, f01=0x4124, 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 t P* P IFT MMUPAG=1 PDC:ECB EQU * MMU ECB P DATA 0,0,0,0,0,0 P XIF P* PDWTEND E
0x2ca984…2cab18 Dummy {f00=0x00e3, f01=0x2008, f02=» R ( P DATA DCAD POINTER TO ADDRESS-BLOCK P DATA 0 TTAB-ADDRESS > $ P DATA 0 WAIT/ACTIVATE INDICATOR Z P DATA 0 TERMINAL QUEUE P DATA 0 TIMER POINTER P DATA 0 WRITE QUEUE P DATA 0 STATUS QUEUE P DATA 0,0 SAVE ARE
0x2cab18…2cacac Dummy {f00=0x00e3, f01=0x0190, f02=»END L/NCV K P LDR A2,A3 L P ANK A2,/77 L $ P CF A5,OUT SEND CPJ/CPD L 8 , P LC A2,DWTAPJ,A6 GET ACTUAL POS JOURNAL L X P CF A5,OUT AND SEND L , P LC A2,DWTAPD,A6 GET ACTUAL POS DOCUMENT L P LDR A3,A2 SAVE DOC POS L P ANK A2,/3F MASK OFF
0x2cacac…2cae40 Dummy {f00=0x00e3, f01=0x0190, f02=» LC A2,DWTALN,A6 GET ACTUAL LINE NO L P CF A5,OUT AND SEND M , P U =2 M H P U =2 M X P U =2 M h P U =2 M x P U =2 M P U =2 M P U =2 M P U =2 M P U =2 M P U =2 M PRCTP40 LDK A4,10 M P LDR A3,
0x2cae40…2cafd4 (5, 358) Opaque[0x194]
0x2cafd4…2cb168 # DirEnt {nam=»DWII01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1c68, f03=0x0000}
0x2cafd4…2cb168 IdxSect {
0x2cafd4…2cb168 f00 = 0x00e3 // 0x2cafd4 @0x0
0x2cafd4…2cb168 f01 = 0x0002 // 0x2cafd6 @0x2
0x2cafd4…2cb168 gno = [ // 0x2cafd8 @0x4
0x2cafd4…2cb168 [0x00]: C0x00e3.0x1.0
0x2cafd4…2cb168 ]
0x2cafd4…2cb168 }
0x2cb168…2cb2fc Dummy {f00=0x00e3, f01=0x0190, f02=» 2 P IDENT DWII01 REL 10.0 80-03-14 870105041000 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
0x2cb2fc…2cb490 Dummy {f00=0x00e3, 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
0x2cb490…2cb624 Dummy {f00=0x00e3, 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
0x2cb624…2cb7b8 Dummy {f00=0x00e3, 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
0x2cb7b8…2cb94c Dummy {f00=0x00e3, f01=0x0190, f02=»OWED ; n " PMTPWF DATA 0 PWF TIMER POINTER < PMTTIM DATA 0 TIMER POINTER < 2 & PMTBUF DATA 0 BUFFER FOR SEQ NUMBER < T PMTEOT DATA 0 EOT INDICATOR < ~ P* < P EJECT DRMT01 < P < P* < P* CHANNEL STATUS WORDS < P* < & P* FIRST WORD
0x2cb94c…2cbae0 Dummy {f00=0x00e3, f01=0x40ba, f02=» CH0: SEQ NO, STATUS < P DATA 0,1 CH1: " = P DATA 0,1 CH2: " = 8 P DATA 0,1 CH3: " = T P = p PMTCHSE EQU * = x P* = P* = P* = P END = @ = < P < P* < P* CHANNEL STATUS WORDS < P* < & P* FIRST WORD
0x2cbae0…2cbc74 (5, 359) Opaque[0x194]
0x2cbc74…2cbe08 # DirEnt {nam=»DWIO01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1c70, f03=0x0000}
0x2cbc74…2cbe08 IdxSect {
0x2cbc74…2cbe08 f00 = 0x00e3 // 0x2cbc74 @0x0
0x2cbc74…2cbe08 f01 = 0x0002 // 0x2cbc76 @0x2
0x2cbc74…2cbe08 gno = [ // 0x2cbc78 @0x4
0x2cbc74…2cbe08 [0x00]: C0x00e3.0x2.0
0x2cbc74…2cbe08 ]
0x2cbc74…2cbe08 }
0x2cbe08…2cbf9c Dummy {f00=0x00e3, f01=0x0190, f02=» 2 P IDENT DWIO01 REL 10.0 80-03-14 870105041000 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
0x2cbf9c…2cc130 Dummy {f00=0x00e3, 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
0x2cc130…2cc2c4 Dummy {f00=0x00e3, 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
0x2cc2c4…2cc458 Dummy {f00=0x00e3, 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
0x2cc458…2cc5ec Dummy {f00=0x00e3, f01=0x0190, f02=» A4,0 # P RB ACDY50 $ $ PADY122 CCK A2,/1212 UNDERLINE ? $ P RF(NE) ADY125 $ H " P LDK A4,/40 SET UNDERLINE MODE $ ^ P RB ADY120 $ & PADY125 CCK A2,/1414 FAST OUTPUT ? $ P LDK A4,0 $ P RB(NE) ACDY50 NO $ P LDR A4,A2 $ ( P CF A15,GE
0x2cc5ec…2cc780 Dummy {f00=0x00e3, f01=0x0190, f02=»F(Z) ADY127 NONE $ P* % P IFT WHATDY=0 % " & P LDR* A7,A6 GET CHANNEL PARAMETER % 8 P ANK A7,/10 % b 2 P RF(NZ) OTHER OTHER DISPLAY THAN 6344 OR 6386? % v P XIF % P LDR A3,A1 NO! % P CF A5,FASTER % PADY127 EQU * % P LD A3,4,A8 REQ
0x2cc780…2cc914 (5, 360) Opaque[0x194]
0x2cc914…2ccaa8 # DirEnt {nam=»EBCDIC«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1c78, f03=0x0000}
0x2cc914…2ccaa8 IdxSect {
0x2cc914…2ccaa8 f00 = 0x00e3 // 0x2cc914 @0x0
0x2cc914…2ccaa8 f01 = 0x0004 // 0x2cc916 @0x2
0x2cc914…2ccaa8 gno = [ // 0x2cc918 @0x4
0x2cc914…2ccaa8 [0x00]: C0x00e3.0x3.0
0x2cc914…2ccaa8 [0x01]: C0x00e4.0x0.0
0x2cc914…2ccaa8 ]
0x2cc914…2ccaa8 }
0x2ccaa8…2ccc3c Dummy {f00=0x00e3, f01=0x0190, f02=» 2 P IDENT EBCDIC REL 10.0 80-03-14 870105041000 P : P* B 4 P************************************************ L P* $ P* PHILIPS TERMINAL SYSTEM PTS P* $ P* EBCDIC = EBCDIC/ASCII TABLE P* P* P* P*
0x2ccc3c…2ccdd0 Dummy {f00=0x00e3, f01=0x0190, f02=» P* P* . P* CONDITIONAL ASSEMBLY (SEE ALSO DRDC15) P* J 2 PX:A EQU 1 CODE , 0=ASCII , 1=EBCDIC (DRDC15) T PCODE EQU X:A 4 PX:B EQU 1 READ COMMAND HANDLING IF = 1 (DRDC15) PRCOM EQU X:B P EJECT P* P*
0x2ccdd0…2ccf64 Dummy {f00=0x00e3, f01=0x0190, f02=»/0009,/0000 00-07 ~ ( P DATA /0000,/0000,/0C00,/0000 08-0F ( P DATA /1011,/1213,/000A,/0000 10-17 F ( P DATA /0019,/0000,/1C1D,/1E1F 18-1F r ( P DATA /0000,/0000,/0000,/171B 20-27 ( P DATA /0000,/0000,/0005,/0000 28-2F ( P DATA /0000,/1600,
0x2ccf64…2cd0f8 Dummy {f00=0x00e3, f01=0x0190, f02=»8,/2B21 48-4F z ( P DATA /264A,/4B4C,/4D4E,/4F50 50-57 ( P DATA /5152,/5D24,/2A29,/3B5E 58-5F B ( P DATA /2D2F,/5354,/5556,/5758 60-67 n ( P DATA /595A,/7C2C,/255F,/3E3F 68-6F ( P DATA /1831,/3233,/3435,/3637 70-77 ( P DATA /3839,/3A23,/402
0x2cd0f8…2cd28c Dummy {f00=0x00e3, f01=0x0190, f02=»F70 90-97 v ( P DATA /7172,/5D24,/2A29,/3B5E 98-9F ( P DATA /2D2F,/7374,/7576,/7778 A0-A7 > ( P DATA /797A,/7C2C,/255F,/3E3F A8-AF j ( P DATA /3031,/3233,/3435,/3637 B0-B7 ( P DATA /3839,/3A23,/4027,/3D22 B8-BF ( P DATA /2041,/4243,/4445,/4
0x2cd28c…2cd420 Dummy {f00=0x00e3, f01=0x0190, f02=»D8-DF r ( P DATA /2D2F,/5354,/5556,/5758 E0-E7 ( P DATA /595A,/7C2C,/255F,/3E3F E8-EF : ( P DATA /3031,/3233,/3435,/3637 F0-F7 f ( P DATA /3839,/3A23,/4027,/3DFF F8-FF P XIF P EJECT P* P* 2 P* TABLE FOR CONVERSION OF AS
0x2cd420…2cd5b4 (5, 361) Dummy {f00=0x00e4, f01=0x0190, f02=» DATA /0005,/1500,/0C00,/0000 08-0F ( P DATA /1011,/1213,/3C3D,/3226 10-17 , ( P DATA /7019,/3F27,/1C1D,/1E1F 18-1F X ( P DATA /404F,/7F7B,/5B6C,/507D 20-27 ( P DATA /4D5D,/5C4E,/6B60,/4B61 28-2F ( P DATA /F0F1,/F2F3,/F4F5,/F6F7 30-37 ( P
0x2cd5b4…2cd748 Dummy {f00=0x00e4, f01=0x4158, f02=»A /D7D8,/D9E2,/E3E4,/E5E6 50-57 ( P DATA /E7E8,/E94A,/005A,/5F6D 58-5F ( ( P DATA /0081,/8283,/8485,/8687 60-67 T ( P DATA /8889,/9192,/9394,/9596 68-6F ( P DATA /9798,/99A2,/A3A4,/A5A6 70-77 ( P DATA /A7A8,/A91C,/6A00,/0000 78-7F 4 P DAT
0x2cd748…2cd8dc Dummy {f00=0x00e4, f01=0x2008, f02=» NT EBCASC TESTVERSION 1 END (@ 4
0x2cd8dc…2cda70 Dummy {f00=0x00e4, f01=0x0190, f02=» . PX:B EQU 80 LENGTH OF CIRCULAR INPUT BUFFER 2 PDWTLNG EQU X:B NUMBER OF BYTES IN DECIMAL FORM : PETX EQU /03 END CHARACTER p P* P* TIME BEFORE TIME-OUT P* " PTIME EQU 300 TIME OUT CONSTANT P* P* P*
0x2cda70…2cdc04 Dummy {f00=0x00e4, f01=0x0190, f02=» h , P**************************************** P* 8 P* B > P* BY SETTING X:A = 1 THE FOLOWING POWER OFF FUNCTION L & P* IS INCLUDED IN THE DRIVER. < P* IF THERE IS A READ REQUEST THIS IS COMPLETED WITH * P* -2 IN THE
0x2cdc04…2cdd98 Dummy {f00=0x00e4, f01=0x0190, f02=»H -2 IN CONTROL WORD j P* OF ECB P* 2 P* < PX:A EQU 0 F PPOWOFF EQU X:A X P* n P* x . P* TIME OUT FUNCTION MAY BE EXCLUDED BY P* SETTING X:A = 0. P* PX:F EQU 1 PCTIMUT EQU X:F P*
0x2cdd98…2cdf2c Dummy {f00=0x00e4, f01=0x0190, f02=»ACED BY ORDER /31 v 8 P* CONTROL WORD OF ECB IS SET TO ZERO INSTEAD OF-2 0 P* ORDER /04 IS THEN REPLACED BY ORDER /31 V PCREDIT EQU 0 P* P* P* MMU BUFFER SIZE P* PX:C EQU 80 PDVBLEN EQU X:C P*
0x2cdf2c…2ce0c0 Dummy {f00=0x00e4, f01=0x0190, f02=»G TOSS MMU PAGING x * P* IS OBTAINED BY SETTING MMUPAG EQU 1. P* H PMMUPAG EQU 0 R P* f P* p 6 P* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION z . P* SET IS OBTAINED BY SETTING CPU852 EQU 0. P* PCPU852 EQU 1 P*
0x2ce0c0…2ce254 (5, 362) Opaque[0x194]
0x2ce254…2ce3e8 # DirEnt {nam=»FMTASK«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1c88, f03=0x0000}
0x2ce254…2ce3e8 IdxSect {
0x2ce254…2ce3e8 f00 = 0x00e4 // 0x2ce254 @0x0
0x2ce254…2ce3e8 f01 = 0x001e // 0x2ce256 @0x2
0x2ce254…2ce3e8 gno = [ // 0x2ce258 @0x4
0x2ce254…2ce3e8 [0x00]: C0x00e4.0x1.0
0x2ce254…2ce3e8 [0x01]: C0x00e4.0x2.0
0x2ce254…2ce3e8 [0x02]: C0x00e4.0x3.0
0x2ce254…2ce3e8 [0x03]: C0x00e5.0x0.0
0x2ce254…2ce3e8 [0x04]: C0x00e5.0x1.0
0x2ce254…2ce3e8 [0x05]: C0x00e5.0x2.0
0x2ce254…2ce3e8 [0x06]: C0x00e5.0x3.0
0x2ce254…2ce3e8 [0x07]: C0x00e6.0x0.0
0x2ce254…2ce3e8 [0x08]: C0x00e6.0x1.0
0x2ce254…2ce3e8 [0x09]: C0x00e6.0x2.0
0x2ce254…2ce3e8 [0x0a]: C0x00e6.0x3.0
0x2ce254…2ce3e8 [0x0b]: C0x00e7.0x0.0
0x2ce254…2ce3e8 [0x0c]: C0x00e7.0x1.0
0x2ce254…2ce3e8 [0x0d]: C0x00e7.0x2.0
0x2ce254…2ce3e8 [0x0e]: C0x00e7.0x3.0
0x2ce254…2ce3e8 ]
0x2ce254…2ce3e8 }
0x2ce3e8…2ce57c Dummy {f00=0x00e4, f01=0x0190, f02=» 2 P IDENT FMTASK REL 10.0 80-03-15 870105041000 P : * B * L 6 2************************************************** V * 6 2* PHILIPS TERMINAL SYSTEM PTS * * 6 2* FMTASK = TOSS FILE MANAGEMENT TASK
0x2ce57c…2ce710 Dummy {f00=0x00e4, f01=0x0190, f02=» TOSS FILE MANAGEMENT TASK CONTAINS THE . ** FOLLOWING FILE ADMINISTRATION MODULES: 0 * b * &* - FMOPEN OPEN/CREATE/EXTEND FILE l $ * - FMCLOS CLOSE/DELETE FILE ( #* - FMRDFP READ FILE PARAMETERS * ( P* A SPECIAL EN
0x2ce710…2ce8a4 Dummy {f00=0x00e4, f01=0x0190, f02=»* - FMRDWR READ/WRITE (SPLIT EXTENT I/O) * 4 0 P* FMTASK ALSO CONTAINS THE FILE MANAGEMENT > . P* SYSTEM INITIALIZATION ROUTINE, FMINIT. r P* * EJECT FMTASK * * *********** * ENTRIES *
0x2ce8a4…2cea38 Dummy {f00=0x00e4, f01=0x0190, f02=»S h 0 P ENTRY FMINIT FILE MANAGEMENT INITIALIZATION ENTRY TTABFM FMTASK TTAB > ( P ENTRY FWTPAR FILE ACCESS PARAMETERS ` P ENTRY FWTFNR FILE NUMBER 6 P ENTRY FWTTAB TTAB FOR TASK WITH EXCLUSIVE ACCESS 2 P ENTRY FWTEW1 POINTER TO 2ND EWT
0x2cea38…2cebcc Dummy {f00=0x00e4, f01=0x0190, f02=»GTH x P ENTRY EWTEXB EXTENT BASE " P ENTRY EWTVOL VOLUME FILE CODE . P* T P EJECT FMTASK ^ P* v P* ENTRY FPB:RL RECORD LENGTH ENTRY FPB:BF BLOCK FACTOR $ ENTRY FPB:FO FILE ORGANIZATION ENTRY FPB:BO BA
0x2cebcc…2ced60 Dummy {f00=0x00e4, f01=0x0190, f02=» | ENTRY FPB:V2 VOLUME NAME 2 ENTRY FPB:S2 SIZE 2 , ENTRY FPB:V3 VOLUME NAME 3 H ENTRY FPB:S3 SIZE 3 l ENTRY FPB:V4 VOLUME NAME 4 ENTRY FPB:S4 SIZE 4 $ ENTRY FPB:FR FILE RECORD NUMBER " ENTRY FPB:US NUMBER OF
0x2ced60…2ceef4 (5, 363) Dummy {f00=0x00e4, f01=0x0190, f02=»F NUMBER OF INDEX FILES ( # ENTRY FPB:KA KEY ADDRESS IN RECORD P ENTRY FPB:CD CREATION DATE L " P ENTRY FPB:RP RETENTION PERIOD p EJECT FMTASK * * ************* * EXTERNALS * ************* *
0x2ceef4…2cf088 Dummy {f00=0x00e4, f01=0x0190, f02=»BLK GET PARAMETERS FROM MONITOR BLOCK 0 P EXTRN FNDTID FIND TTAB ADDRESS FROM TASK ID . ( P EXTRN FNDDWD FIND DISC DWT ADDRESS b : 6 EXTRN FCHECK CHECK ACCESS PAR. AND RETURN FWT ADDRESS " P EXTRN FCHEC2 FCHECK 2ND ENTRY 4 0 EXTRN LKMERR HALT SYS
0x2cf088…2cf21c Dummy {f00=0x00e4, f01=0x0190, f02=»FTAB z " P EXTRN SCTNOF NUMBER OF FILES * P EXTRN SCTFWT FWT CHAIN START ADDRESS 2 ( P EXTRN SCTFWL FILE WORK TABLE LENGTH ` $ P EXTRN SCTDMT DM TASKS IN SYSTEM P EXTRN NVLTAB NVL TABLE $ P EXTRN NVLDMT DM TASK NVL TABLE P EXTRN NVLEN
0x2cf21c…2cf3b0 Dummy {f00=0x00e4, f01=0x0190, f02=» EXTRN DWTMEC MMU ECB ADDRESS P EXTRN DWTVOL VOLUME NAME & P EXTRN DWTNVL NVL INDICATOR H 2 P EXTRN FDBMEC FDB MMU ECB DISPLACEMENT IN FWT l P* P EJECT FMTASK P* P* P EXTRN TTB:MT MMU TABLE P EXTRN TTB:SA SA
0x2cf3b0…2cf544 Dummy {f00=0x00e4, f01=0x0190, f02=»ETURN CODE ~ P EXTRN ECBCW1 CONTROL WORD 1 P EXTRN ECBCW2 CONTROL WORD 2 6 EJECT FMTASK Z * r * | , '*************************************** * * CONDITIONAL ASSEMBLY * , '********************************
0x2cf544…2cf6d8 Dummy {f00=0x00e4, f01=0x0190, f02=»AG EQU 0 * * 6 2* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION $ . ** SET IS OBTAINED BY SETTING CPU852 EQU 0. ^ * CPU852 EQU 1 * * 4 /* A PROGRAM VERSION SUPPORTING SPLIT EXTENT I/O * &* IS OBTAINED
0x2cf6d8…2cf86c Dummy {f00=0x00e4, f01=0x0190, f02=» | P* VL DISPLACEMENTS * P******************** $ P* @ P* VOLUME LABEL DISPLACEMENTS J P* n PVOL:VN EQU 0 VOLUME NAME x $ PVOL:EL EQU 6 VTOC EXTENT LENGTH " PVOL:EB EQU 10 VTOC EXTENT BASE $ PVOL:RL EQU 12 VTOC RECORD LENGTH
0x2cf86c…2cfa00 Dummy {f00=0x00e4, f01=0x0190, f02=»* $ PVTOCRL EQU 42 VTOC RECORD LENGTH " PVTOCBF EQU 6 VTOC BLOCK FACTOR 2 P* X P EJECT FMTASK b P* z P* P********************** P* VTOC DISPLACEMENTS * P********************** P* , P* VOLUME TABLE OF CONT
0x2cfa00…2cfb94 (5, 364) Dummy {f00=0x00e4, f01=0x0190, f02=»NUMBER (S-FILE) v " PVTC:SN EQU 9 SOP SWITCH NUMBER $ PVTC:EN EQU 10 FILE EXTENT NUMBER > $ PVTC:EL EQU 12 FILE EXTENT LENGTH f " PVTC:EB EQU 16 FILE EXTENT BASE $ PVTC:LR EQU 20 LAST RECORD NUMBER PVTC:RL EQU 24 RECORD LENGTH PVTC:BF E
0x2cfb94…2cfd28 Dummy {f00=0x00e4, f01=0x0190, f02=» ( PVTC:IF EQU 37 NUMBER OF INDEX FILES ( PVTC:KA EQU 38 KEY ADDRESS IN RECORD 0 PVTC:ST EQU 41 STATUS BYTE P* ~ P EJECT FMTASK P* P* P********************* P* FWT DISPLACEMENTS * P*********************
0x2cfd28…2cfebc Dummy {f00=0x00e4, f01=0x0190, f02=»TBAS EQU FWTLNK+/10 P XIF P* ( P IFT MMUPAG=1 2 PFWTBAS EQU FWTLNK+/14 H P XIF f P* r < PFWTVTC EQU FWTBAS+/00 VTOC SECTOR NUMBER (FIRST EXTENT) | 0 PFWTPAR EQU FWTBAS+/02 FILE ACCESS PARAMETERS & PFWTFNR EQU FWTBAS+/03 FI
0x2cfebc…2d0050 Dummy {f00=0x00e4, f01=0x0190, f02=»T 4 PFWTSEX EQU FWTBAS+/08 FILE SECTION/EXTENT NUMBER B PFWTEXL EQU FWTBAS+/0A EXTENT LENGTH IN SECTORS (FIRST EXTENT) B 8 PFWTEW2 EQU FWTBAS+/0C POINTER TO NEXT EWT STRUCTURE : PFWTVOL EQU FWTBAS+/0E VOLUME FILE CODE (FIRST EXTENT) 4 PFWTEXB
0x2d0050…2d01e4 Dummy {f00=0x00e4, f01=0x0190, f02=» P********************* P* EWT DISPLACEMENTS * & P********************* D P* b & P* EXTENT WORK TABLE DISPLACEMENTS l P* $ PEWTLNK EQU 0 LINK NEXT EWT BLOCK P* P* BLOCK 1 P* , PEWTSEX EQU 2 FILE SECTION/
0x2d01e4…2d0378 Dummy {f00=0x00e4, f01=0x0190, f02=» r PEWTEXB EQU 4 EXTENT BASE P* ( 0 PEWTLEN EQU 6 EXTENT WORK TABLE BLOCK LENGTH 2 P* f EJECT FMTASK p * * ********************* * FPB DISPLACEMENTS * ********************* * ( $* FILE P
0x2d0378…2d050c Dummy {f00=0x00e4, f01=0x018e, f02=»NIZATION z FPB:BO EQU 5 BASIC ORDERS FPB:FN EQU 8 FILE NAME 2 FPB:EL EQU 17 ENLARGE P FPB:V1 EQU 18 VOLUME NAME 1 n FPB:S1 EQU 24 SIZE 1 FPB:V2 EQU 28 VOLUME NAME 2 FPB:S2 EQU 34 SIZE 2 FPB:V3 EQU 38 VOLUME NAME
0x2d050c…2d06a0 Dummy {f00=0x00e4, f01=0x0190, f02=» n " FPB:US EQU 62 NUMBER OF USERS FPB:SH EQU 64 SHAREABILITY . FPB:MN EQU 65 MONITOR NUMBER P $ FPB:SN EQU 66 SOP SWITCH NUMBER t ( #FPB:IF EQU 67 NUMBER OF INDEX FILES ( #FPB:KA EQU 68 KEY ADDRESS IN RECORD PFPB:CD EQU 70 CREATI
0x2d06a0…2d0834 (5, 365) Dummy {f00=0x00e5, f01=0x0190, f02=»ASK * * TTABFM (FMTASK TTAB) * 4 IFT MMUPAG=1 > RES 16 FMTASK MMU TABLE T XIF t * ( P DATA 0 CURRENT SEGMENT BASE (DUMMY) 2 PVOLUME DATA 0 CURRENT VOLUME NAME DISPLACEMENT " DATA 0 SEGMENT BLOCK ADDRES
0x2d0834…2d09c8 Dummy {f00=0x00e5, f01=0x0190, f02=»49 PRIORITY LEVEL DATA 0 PENDING POINTER * P DATA /C4C0 PSW (PROGRAM STATUS WORD) : DATA 0 DISPATCH ADDRESS h 2 . DATA 0,0,0,0,0,0,0 REGISTER SAVE AREA, A1-A14 $ P DATA FM:ECB A8 = FM:ECB ADDRESS P DATA 0,0,0,0,0,0 *
0x2d09c8…2d0b5c Dummy {f00=0x00e5, f01=0x0190, f02=»0,0 * P RES 6 FMTASK STACK $ FM:STB EQU *-2 FMTASK STACK BASE 2 * Z P IFT MMUPAG=1 d , PFM:FPB RES 40 FILE PARAMETER BLOCK AREA z P XIF P* P EJECT FMTASK P* P* P********** P* FMINIT *
0x2d0b5c…2d0cf0 Dummy {f00=0x00e5, f01=0x0190, f02=»INIT AFTER IPL AND AT POWER ON. x > P* WHEN CALLED AT POWER ON, AN IMMEDIATE RETURN IS MADE. ( P* j < P* FMINIT WILL ZEROIZE THE FWT AREA, AND LINK THE FWT:S t < P* TOGETHER. THE POINTER FWTEW1 IS ALSO INITIALIZED, AS & P* WELL AS FWTFNR (
0x2d0cf0…2d0e84 Dummy {f00=0x00e5, f01=0x0190, f02=»TASK. ^ P* PFMINIT EQU * FMINIT ENTRY * P LDKL A1,/F03E RTNA15 INSTRUCTION CODE : P ST A1,FMINIT CLOSE THE DOOR h P* P EJECT FMTASK P* P* 8 PFM:BUF EQU FMINIT+2 START OF FMTASK INTERNAL BUFFER P* P
0x2d0e84…2d1018 Dummy {f00=0x00e5, f01=0x0190, f02=» P LDKL A6,/8000 DWT BUSY BIT $ P LDKL A7,TIODM DM ADDRESS BLOCK , P* T PFMI:30 EQU * ^ P IFT MMUPAG=1 r 4 P LDKL A8,FDBMEC FDB MMU ECB DISPLACEMENT IN FWT P ADR A8,A1 MMU ECB ADDRESS P XIF P* " P LDR A2,A1 CURRE
0x2d1018…2d11ac Dummy {f00=0x00e5, f01=0x0190, f02=» FMI:50 INITIALIZATION COMPLETED , P RF(Z) FMI:40 ONE FWT LEFT TO INITIALIZE ( 0 P STR A3,A1 LINK CURRENT FWT TO THE NEXT FWT X $ P ADK A1,2 INCREMENT FWT POINTER P* P EJECT FMTASK P* P* PFMI:40 EQU * P CMR A1
0x2d11ac…2d1340 Dummy {f00=0x00e5, f01=0x018e, f02=»A3,SCTFWL " P ADK A3,FWTEW2 FWTEW2 ADDRESS . P ST A3,FWTEW1,A2 INITIALIZE FWTEW1 POINTER 8 , P ST A5,FWTFNR,A2 SET FILE NUMBER IN FWT j * P ST A6,DWTST,A2 INDICATE FWT NOT BUSY : P ST A7,DWTADR,A2 DM ADDRESS BLOCK (ACTIVATION ADDRESS) P*
0x2d1340…2d14d4 (5, 366) Dummy {f00=0x00e5, f01=0x0190, f02=» P* P EJECT FMTASK P* & 4 P* FILL IN NVLTAB WITH DM TTAB ADDRESSES (IF ANY) 0 P* h PFMI:50 EQU * r $ P LD A1,SCTDMT DM TASKS IN SYSTEM ( P RF(Z) FMI:75 NO DM TASKS IN SYSTEM P LDK A3,4 LOOP COUNTER & P LDKL A4,NVLDMT
0x2d14d4…2d1668 Dummy {f00=0x00e5, f01=0x0190, f02=»DM TASK NOT IN SYSTEM | , P CF A15,FNDTID FIND DM TASK TTAB ADDRESS P STR A2,A4 STORE IN NVLTAB N P* p PFMI:70 EQU * z & P ADK A4,2 INCREMENT NVLTAB POINTER P ADK A7,1 NEXT DM TASK ID $ P SUK A3,1 DECREMENT LOOP COUNTER P RB(P)
0x2d1668…2d17fc Dummy {f00=0x00e5, f01=0x0190, f02=»LIZE BIT MASK P LDK A2,1 " P LDKL A3,NVLTAB NVLTAB ADDRESS ( P* N PFMI:80 EQU * X * P LDR* A4,A3 GET ONE ENTRY FROM NVLTAB l & P RF(Z) FMI:85 THIS ENTRY NOT USED $ P ORR A1,A2 INDICATE TTAB PRESENT P* PFMI:85 EQU *
0x2d17fc…2d1990 Dummy {f00=0x00e5, f01=0x0190, f02=»LTAB t P* ! PFMI:90 EQU * ! * P ORR A1,A2 ADD ONE BIT FOR USER TASKS ! * " P ST A1,NVLBIT SET NVL BIT MASK ! X P RTN A15 ! ~ P* ! P IFT MMUPAG=0 ! P RES 57 ! P XIF ! P* ! P IFT MMUPAG=1 ! P RES 52 ! P XIF ! P*
0x2d1990…2d1b24 Dummy {f00=0x00e5, f01=0x0190, f02=»LE MANAGEMENT TASK PERFORMS ! * %* FILE ADMINISTRATION FUNCTIONS. IT " $ , '* IS ACTIVATED BY THE FILE MANAGEMENT " R & P* LKM PROCESSOR AT ENTRY FM:ADM. " . P* AFTER SOME HOUSEKEEPING THE FOLLOWING " 6 P* MODULES WILL PERFORM THE FILE ADMINIST
0x2d1b24…2d1cb8 Dummy {f00=0x00e5, f01=0x0190, f02=» ( " : 0, 2) " j > :* - FMRDFP READ FILE PARAMETERS ( " : 0) # * # b ( P* A SPECIAL ENTRY IS USED FOR I/O # l . P* FUNCTIONS WHERE REQUESTED SECTORS ARE # , P* SPLIT OVER TWO OR MORE FILE EXTENTS: # P* # > :*
0x2d1cb8…2d1e4c Dummy {f00=0x00e5, f01=0x018e, f02=» # P* FM:ADM * $ P********** $ P* $ , * $ 6 * ENTRY PARAMETERS: $ @ * $ ^ " P* A1 = ORDER CODE AND OPTION $ h * %* A3 = TTAB ADDRESS OF CALLING TASK $ P* A4 = USER ECB ADDRESS $ * $ 2 PFM:ADM EQU * FM ADMINISTRATION F
0x2d1e4c…2d1fe0 Dummy {f00=0x00e5, f01=0x0190, f02=» $ r & P LDKL A14,FM:STB FMTASK STACK BASE % P* % 2 P IFT MMUPAG=0 % < P LD A10,ECBBA,A9 FPB ADDRESS % R P XIF % v P* % P IFT MMUPAG=1 % ( P LDKL A3,TTABFM FMTASK TTAB ADDRESS % P TL TTB:MT,A5 USER MMU TABLE % , P TS TTB:MT,A3 STORE IN
0x2d1fe0…2d2174 (5, 367) Dummy {f00=0x00e5, f01=0x018e, f02=»DKL A2,FM:FPB FM FPB ADDRESS % P LDR A10,A2 SAVE IT & $ P LDK A4,FPBLEN FPB LENGTH & @ $ P MVUS A4 MOVE USER FPB TO FM:FPB & b P XIF & P* & P EJECT FMTASK & P* & . P* CHECK WHAT FUNCTION THAT IS REQUESTED & 4 P* AND BRANCH TO AP
0x2d2174…2d2308 Dummy {f00=0x00e5, f01=0x0190, f02=» P* ' P* A1 = ORDER OPTION ' * P* A5 = TTAB ADDRESS OF CALLING TASK ' , P* A9 = USER ECB ADDRESS ' Z P* A10 = FPB ADDRESS ' | P* ' $ P ECR A1,A7 ORDER CODE AND OPTION ' P ANK A7,/7F ORDER CODE ' P SUK A7,/03 ' ( P ABL(Z) FMRD
0x2d2308…2d249c Dummy {f00=0x00e5, f01=0x0190, f02=»* ' ********** ( * FMOPEN * ( ********** ( . * ( @ P* ( J 2 P* FILE MANAGEMENT ADMINISTRATION FUNCTIONS: ( T P* OPEN/CREATE/EXTEND FILE ( P* ( P* ENTRY PARAMETERS: ( P* ( P* A1 = ORDER OPTION ( * P* A5 = T
0x2d249c…2d2630 Dummy {f00=0x00e5, f01=0x0190, f02=»END FILE ( t P ANK A1,/FF ORDER OPTION ) ( P ABL(NZ) FM:RQE ILLEGAL ORDER OPTION ) 0 P* ) P EJECT FMTASK ) f P* ) ~ P* ) P******** ) P* OPEN * ) P******** ) P* ) P* ) POPEN EQU * OPEN FILE ) 0 P LDK A7,FPB:V1 1ST VOL
0x2d2630…2d27c4 Dummy {f00=0x00e5, f01=0x0190, f02=»LUME NOT FOUND ) $ P CF A14,FNDFWT FIND FWT ADDRESS * P ADK A6,0 SET CR * > ( P RF(Z) OP:030 NO FREE FWT AVAILABLE * V " P LDR* A1,A6 FIRST WORD OF FWT * & P ANK A1,1 CHECK IF ALREADY OPENED * P RF(Z) OP:060 NOT OPENED * P* * P* FILE IS AL
0x2d27c4…2d2958 Dummy {f00=0x00e5, f01=0x018e, f02=»B ADDRESS FOR EA TASK * | " P RF(NZ) OP:040 FILE PROTECTED + & P LC A1,FWTPAR,A6 ACCESS PARAMETERS + D P LDR A2,A1 + n P ANK A1,/3F NUMBER OF USERS + P SUK A1,/3F + P ABL(NZ) OP:250 + P* + P EJECT FMTASK + P* + P* ERROR EXIT
0x2d2958…2d2aec Dummy {f00=0x00e5, f01=0x018e, f02=» + l P LDKL A4,/8400 RETURN CODE , P RF OP:RTN , * P* , < POP:040 EQU * FILE PROTECTED , F P LDK A4,/40 RETURN CODE , j P RF OP:RTN , P* , & POP:050 EQU * VOLUME/FILE NOT FOUND , 0 P CF A14,RELBLK RELEASE EWT STRUCTURE BLOCKS , P* ,
0x2d2aec…2d2c80 Dummy {f00=0x00e5, f01=0x0190, f02=» P EJECT FMTASK - P* - P* FILE IS NOT OPENED BEFORE: - & 0 P* FIND ALL FILE EXTENTS, BUILD FWT AND EWT:S - J P* - ~ POP:060 EQU * - P* - $ P* MOVE FILE NAME FROM FPB TO FWT - P* - P LDR A1,A10 FPB ADDRESS - P ADK A1,FPB:FN -
0x2d2c80…2d2e14 (5, 368) Dummy {f00=0x00e5, f01=0x018e, f02=» LDR A2,A12 RESTORE FILE CODE - P RF OP:075 . & P* . 8 P* FIND ONE VOLUME . B P* . POP:070 EQU * . f 0 P ST A7,VOLUME SAVE VOLUME NAME DISPLACEMENT . z P CF A14,FNDVOL FIND VOLUME . P ADK A2,0 . " P RB(Z) OP:050 VOLUME NOT FOUND . P
0x2d2e14…2d2fa8 Dummy {f00=0x00e5, f01=0x018e, f02=» . p 0 P LDR A11,A2 SAVE CURRENT VTOC SECTOR NUMBER / & P RB(Z) OP:050 NO FILE EXTENT FOUND / < P* / f POP:080 EQU * / p P LDR A1,A6 SAVE FWT ADDRESS / P LDR* A2,A8 DISC FILE CODE / P INH / . P CF A15,FNDDWD DISC DWT ADDRESS AND INDEX / P
0x2d2fa8…2d313c Dummy {f00=0x00e5, f01=0x018e, f02=» " P LDR A6,A1 RESTORE FWT ADDRESS 0 ( P LD A3,VTC:EN,A13 FILE EXTENT NUMBER 0 * ( P LD A2,VTC:FO,A13 FILE ORGANIZATION 0 V P ANK A2,/FF 0 P SUK A2,'L' 0 P RF(Z) OP:085 L-FILE 0 * P LD A2,VTC:FS,A13 FILE SECTION NUMBER 0 P SRC A2,2 0 2 P E
0x2d313c…2d32d0 Dummy {f00=0x00e5, f01=0x0190, f02=» 0 POP:085 EQU * 1 * P LC A2,VTC:EL+1,A13 FILE EXTENT LENGTH 1 P LD A1,VTC:EL+2,A13 1 J P ADK A3,0 SET CR 1 f $ P RF(Z) OP:090 FIRST FILE EXTENT 1 ~ P INH 1 P CF A15,GETBLK EWT BLOCK 1 1 P RF OP:100 1 P* 1 POP:090 EQU * 1 > P ST
0x2d32d0…2d3464 Dummy {f00=0x00e5, f01=0x0190, f02=» POP:100 EQU * 2 P LDR* A2,A8 VOLUME FILE CODE 2 * P ECR A2,A2 FILE CODE NOW IN LEFT BYTE 2 < ( P LC A2,VTC:EB+1,A13 FILE EXTENT BASE 2 j P LD A1,VTC:EB+2,A13 2 P ADK A3,0 SET CR 2 ( P RF(NZ) OP:120 NOT FIRST FILE EXTENT 2 < P ST A2,FWTEXB-2,A6
0x2d3464…2d35f8 Dummy {f00=0x00e5, f01=0x0190, f02=» 2 * P* FIND REMAINING EXTENTS FOR THIS FILE 3 P* 3 6 POP:110 EQU * 3 @ ( P CF A14,FVTC30 FIND NEXT VTOC ENTRY 3 T 0 P LDR A11,A2 SAVE CURRENT VTOC SECTOR NUMBER 3 6 P RF(Z) OP:160 NO MORE FILE EXTENTS ON THIS VOLUME 3 P RB OP:080 3 P* 3
0x2d35f8…2d378c Dummy {f00=0x00e5, f01=0x0190, f02=»CK 1 3 v P CF A15,GETBLK EWT BLOCK 2 4 P ENB 4 . P STR A4,A3 LINK EWT2 TO EWT1 4 : P LDR A1,A6 FWT ADDRESS 4 ^ P ADK A1,FWTEW2 4 | P* 4 POP:130 EQU * 4 * P LDR* A2,A1 ADDRESS NEXT EWT STRUCTURE 4 P RF(NZ) OP:150 4 P* 4 POP:140 EQU
0x2d378c…2d3920 Dummy {f00=0x00e5, f01=0x0190, f02=»TSEX,A2 FILE SECTION AND EXTENT NUMBER 4 P CC A11,EWTSEX,A3 5 . ( P RB(G) OP:140 INSERT NEW EWT BLOCKS 5 H ( P LDR* A1,A2 ADDRESS TO 2ND EWT BLOCK 5 t P RB OP:130 5 P* 5 P EJECT FMTASK 5 P* 5 P* 5 POP:160 EQU * 5 2 P LD A7,VOLUM
0x2d3920…2d3ab4 (5, 369) Dummy {f00=0x00e6, f01=0x018e, f02=» LDR A1,A10 FPB ADDRESS 5 $ P ADR A1,A7 POINT TO VOLUME NAME 6 0 P LDR* A1,A1 CHECK IF MORE VOLUMES SPECIFIED 6 H " P RF(Z) OP:170 NO MORE VOLUMES 6 | , P SUKL A1,/2020 SPACES IF NO MORE VOLUMES 6 $ P RB(NZ) OP:070 FIND NEXT VOLUME 6 P* 6 POP:1
0x2d3ab4…2d3c48 Dummy {f00=0x00e6, f01=0x0190, f02=» 6 j P* 7 6 P LD A1,FWTVTC,A6 VTOC SECTOR NUMBER, FIRST EXTENT 7 , P RB(Z) OP:050 FIRST FILE EXTENT MISSING 7 L P LDR A1,A6 FWT ADDRESS 7 | P ADK A1,FWTEW1 7 , P LDK A4,0 FILE SECTION AND EXTENT NUMBER 7 P* 7 P EJECT FMTASK 7 P* 7
0x2d3c48…2d3ddc Dummy {f00=0x00e6, f01=0x018e, f02=»P:230 END OF EWT CHAIN 7 4 P LC A13,EWTSEX,A1 FILE SECTION AND EXTENT NUMBER 8 P LDR A3,A13 8 V $ P ANK A3,/C0 FILE SECTION NUMBER 8 j P LDR A7,A4 8 $ P ANK A7,/C0 FILE SECTION NUMBER 8 , P SUR A7,A3 COMPARE FILE SECTION NUMBERS 8 , P RF(Z) OP:19
0x2d3ddc…2d3f70 Dummy {f00=0x00e6, f01=0x0190, f02=» 8 , P ANK A3,/3F EXTENT NUMBER SHOULD BE ZERO 9 P RF OP:200 9 8 P* 9 J POP:190 EQU * 9 T P LDR A3,A13 9 h " P ANK A3,/3F FILE EXTENT NUMBER 9 | " P ANK A4,/3F FILE EXTENT NUMBER 9 * P SUR A4,A3 COMPARE FILE EXTENT NUMBER 9 & P ADK A4,1 DIFFEREN
0x2d3f70…2d4104 Dummy {f00=0x00e6, f01=0x018e, f02=» EXTENT NUMBER 9 j P RB OP:180 : P* : ( P EJECT FMTASK : 2 P* : J P* : T POP:230 EQU * : ^ , P LC A2,FPB:SH,A10 SHAREABILITY PARAMETER : r P ANK A2,/FF : " P RF(Z) OP:240 NO EA REQUESTED : , P ST A5,FWTTAB,A6 SET TTAB ADDRESS IN FWT :
0x2d4104…2d4298 Dummy {f00=0x00e6, f01=0x0190, f02=» : EJECT FMTASK ; P* ; , P* COMMON EXIT FOR ACCEPTED OPEN REQUESTS ; * P* ; Z POP:250 EQU * ; d . P LD A1,FPB:BO,A10 BASIC ORDERS PARAMETERS ; x P ANK A1,/FF ; 2 P RF(NZ) OP:260 BASIC ORDERS WANTED, NO ACTION ; * P ANK A2,/BF PHYSICAL
0x2d4298…2d442c Dummy {f00=0x00e6, f01=0x0190, f02=»METERS ; l P LD A4,FWTFNR,A6 FILE NUMBER < P* < 2 P IFT MMUPAG=0 < < * P SC A4,ECBFC,A9 SET FILE NUMBER IN ECB < R P XIF < P* < P IFT MMUPAG=1 < P ELR A2,A9 < P ANKL A2,/FF00 < P ANK A4,/FF FILE NUMBER < P ORR A2,A4 < & P E
0x2d442c…2d45c0 Dummy {f00=0x00e6, f01=0x0190, f02=»K < P* = P* = P********** = P* CREATE * = 0 P********** = B P* = T P* = ^ PCREATE EQU * CREATE FILE = h P* TO BE IMPLEMENTED = P EJECT FMTASK = P* = P* = P********** = P* EXTEND * = P********** = P
0x2d45c0…2d4754 (5, 370) Dummy {f00=0x00e6, f01=0x0190, f02=» = * FMCLOS * > ********** > * > , P* > 6 2 P* FILE MANAGEMENT ADMINISTRATION FUNCTIONS: > @ P* CLOSE/DELETE FILE > v P* > P* ENTRY PARAMETERS: > P* > P* A1 = ORDER OPTION > * P* A5 = TTAB ADDRESS OF CALLING TAS
0x2d4754…2d48e8 Dummy {f00=0x00e6, f01=0x0190, f02=»R OPTION > ( P ABL(NZ) FM:RQE ILLEGAL ORDER OPTION ? P* ? < P EJECT FMTASK ? F P* ? ^ P* ? h P********* ? r P* CLOSE * ? P********* ? P* ? P* ? PCLOSE EQU * CLOSE FILE ? 2 P CF A14,RDVTOC READ VTOC RECORD (FIRST EXTENT)
0x2d48e8…2d4a7c Dummy {f00=0x00e6, f01=0x018e, f02=»CHECK IF NVL ? ( P RF(Z) CL:010 NVL, DON'T WRITE VTOC @ P ABL FM:RTC ERROR @ @ P* @ Z PCL:005 EQU * @ d ( P LD A1,FPB:FR,A10 FILE RECORD NUMBER @ x P LD A3,FPB:FR+2,A10 @ , P ST A1,VTC:LR,A13 SET LRN IN VTOC RECORD @ P ST A3,VTC:LR+2,A13 @
0x2d4a7c…2d4c10 Dummy {f00=0x00e6, f01=0x018e, f02=» P RF(NN) CL:007 NOT NVL A & P LDK A1,/20 SET NVL IN RETURN CODE A " P ST A1,ECBRC,A8 A L P RF CL:010 A d P* A v PCL:007 EQU * A , P CF A14,FM:PWR WRITE VTOC RECORD TO DISC A P* A P EJECT FMTASK A P* A P* A PCL:010 EQU * A
0x2d4c10…2d4da4 Dummy {f00=0x00e6, f01=0x0190, f02=» A r * P SUK A2,1 DECREMENT NO OF USERS BY ONE B 2 P SC A2,FPB:US,A10 RETURN REMAINING NO OF USERS B 6 4 P RF(P) CL:020 DON'T RELEASE FWT IF ANY USER LEFT B l P* B P EJECT FMTASK B P* B P* RELEASE FWT AND EWT BLOCKS B P* B P LDK A2,1
0x2d4da4…2d4f38 Dummy {f00=0x00e6, f01=0x0190, f02=» EQU * B . P ORR A1,A2 PUT TOGETHER ACCESS PARAMETERS C P SC A1,FWTPAR,A6 C @ P* C X PCL:030 EQU * C b P LD A4,ECBRC,A8 RETURN CODE C v P RF FMEXIT RETURN C * C & PCL:040 EQU * ENTRY USED BY FM:LKM C $ P ADKL A14,4 ADJUST STACK POINTER
0x2d4f38…2d50cc Dummy {f00=0x00e6, f01=0x0190, f02=» C P* D PDELETE EQU * DELETE FILE D P* TO BE IMPLEMENTED D 2 EJECT FMTASK D P * D h * D r ********** D | * FMRDFP * D ********** D * D P* D 2 P* FILE MANAGEMENT ADMINISTRATION FUNCTIONS: D P* READ FIL
0x2d50cc…2d5260 Dummy {f00=0x00e6, f01=0x0190, f02=»K D l P* A9 = USER ECB ADDRESS E P* A10 = FPB ADDRESS E , * E H & !FMRDFP EQU * READ FILE PARAMETERS E R P ANK A1,/FF ORDER OPTION E | ( P RF(NZ) FM:RQE ILLEGAL ORDER OPTION E 2 P CF A14,RDVTOC READ VTOC RECORD (FIRST EXTENT) E P ADK A1,0
0x2d5260…2d53f4 (5, 371) Dummy {f00=0x00e6, f01=0x0190, f02=»2,FPBLEN FPB AREA LENGTH E P* F " PFMR:00 EQU * F , P CMR A1 F @ P ADK A1,2 F P P SUK A2,2 F b P RB(P) FMR:00 F t P* F P EJECT FMTASK F P* F P* F P LDR A1,A10 FPB ADDRESS F " P ADK A1,FPB:V2 2ND VOLUME NAME F & P L
0x2d53f4…2d5588 Dummy {f00=0x00e6, f01=0x018e, f02=»NTER, INNER LOOP F ~ P* G " PFMR:04 EQU * INNER LOOP ENTRY G " * P STR A4,A1 MOVE SPACES TO VOLUME NAME G H P ADK A1,2 G v P SUK A3,1 G P RB(P) FMR:04 G * P ADK A1,FPB:V2-FPB:S1 NEXT VOLUME NAME G P SUK A2,1 G P RB(P) FMR:02 G P*
0x2d5588…2d571c Dummy {f00=0x00e6, f01=0x0190, f02=» G n P STR A1,A10 H 8 P LD A1,VTC:BF,A13 BLOCK FACTOR AND FILE ORGANIZATION H P ST A1,FPB:BF,A10 H X ( P LD A1,VTC:LR,A13 LAST RECORD NUMBER H r P ST A1,FPB:FR,A10 H $ P LD A1,VTC:LR+2,A13 LRN, PART 2 H P ST A1,FPB:FR+2,A10 H 4 P LD A1,VTC:M
0x2d571c…2d58b0 Dummy {f00=0x00e6, f01=0x0190, f02=»INDEX FILES H t P ST A1,FPB:IF,A10 I , P LD A1,VTC:KA,A13 KEY ADDRESS IN RECORD I . P ST A1,FPB:KA,A10 I ^ P LDK A2,1 I x , P LD A1,FWTTAB,A6 SHAREABILITY PARAMETER I P RF(Z) FMR:05 NO EA I 2 P SC A2,FPB:SH,A10 INDICATE OPENED EXCLUSIVELY I
0x2d58b0…2d5a44 Dummy {f00=0x00e6, f01=0x0190, f02=»LE I f , P SC A2,FPB:BO,A10 INDICATE BASIC ORDERS J P* J : PFMR:10 EQU * J D P SLC A1,7 J X P ANK A1,/3F NUMBER OF USERS J j P SC A1,FPB:US,A10 J P* J P EJECT FMTASK J P* J . P* MOVE CREATION DATE AND RETENTION PERIOD J P*
0x2d5a44…2d5bd8 Dummy {f00=0x00e6, f01=0x0190, f02=»ACTERS TO MOVE J | 8 P CF A14,MOVE MOVE CREATION DATE AND RETENTION PERIOD K P* K R $ P* MOVE FILE NAME FROM FWT TO FPB K P* K P LDR A1,A6 FWT ADDRESS K P ADK A1,FWTNAM K . P SUK A3,FPBLEN-FPB:FN-1 POINT TO FILE NAME K & P LDK A2,8 NO OF CHAR
0x2d5bd8…2d5d6c Dummy {f00=0x00e6, f01=0x0190, f02=» K b P LDR A11,A6 L * P LDR* A12,A11 ADDRESS TO 2ND EWT BLOCK L P* L J P EJECT FMTASK L T P* L l 8 P* READ VOLUME NAME AND COMPUTE SIZE OF FILE SECTION L v P* L PFMR:20 EQU * L $ P LC A2,EWTVOL,A12 DISC FILE CODE L P LDR A13,A2 SAVE
0x2d5d6c…2d5f00 Dummy {f00=0x00e6, f01=0x0190, f02=»A6 VOLUME NAME ADDRESS L " P CF A14,MOVE MOVE VOLUME NAME M * P LD A1,EWTEXL-2,A11 FILE EXTENT LENGTH M D P ANK A1,/FF M r P LD A2,EWTEXL,A11 M P* M P EJECT FMTASK M P* M " P* COMPUTE FILE SECTION SIZE(S) M P* M PFMR:35 EQU *
0x2d5f00…2d6094 (5, 372) Dummy {f00=0x00e6, f01=0x0190, f02=» M j P ANK A6,/FF N P LD A7,EWTEXL,A11 N * P LDR* A12,A11 ADDRESS TO 2ND EWT BLOCK N 6 & P CC A13,EWTVOL,A12 CHECK FILE CODE N d , P RF(NE) FMR:50 END OF THIS FILE SECTION N P* N P IFT CPU852=0 N * P DAR A6 ACKUMULATE FILE SECTION LENGTH N
0x2d6094…2d6228 Dummy {f00=0x00e6, f01=0x0190, f02=»OW N | P RB FMR:35 O P* O PFMR:45 EQU * O & " P ADK A1,1 OVERFLOW CORRECTION O : P ANKL A2,/7FFF O ` P XIF O v P* O P RB FMR:35 O P* O PFMR:50 EQU * O . P STR A1,A3 STORE FILE SECTION SIZE IN FPB O P ST A2,2,A3 O 0 P ADK A
0x2d6228…2d63bc Dummy {f00=0x00e6, f01=0x0190, f02=» O EJECT FMTASK P * P P* P * P********** P 4 P* FMEXIT * P F P********** P X P* P j P* P t & P* COMMON EXIT FOR FILE MANAGEMENT P ~ P* ADMINISTRATION FUNCTIONS P P* P PFMEXIT EQU * P P IFT MMUPAG=1 P P* P 8 P
0x2d63bc…2d6550 Dummy {f00=0x00e6, f01=0x0190, f02=»ADDRESS P x P* Q P LDR A1,A10 FM:FPB ADDRESS Q $ P EL A2,ECBBA,A9 USER FPB ADDRESS Q < P LDK A3,FPBLEN FPB LENGTH Q d $ P MVSU A3 MOVE FM:FPB TO USER FPB Q P XIF Q * Q P EJECT FMTASK Q P* Q P* Q P********** Q P* FM:R
0x2d6550…2d66e4 Dummy {f00=0x00e6, f01=0x0190, f02=»ETURN CODE Q ~ * P* A5 = TTAB ADDRESS OF CALLING TASK R P* A9 = USER ECB ADDRESS R @ P* R b * PFM:RTC EQU * GENERAL RETURN CODE EXIT R l P IFT MMUPAG=0 R * P ST A4,ECBRC,A9 SET RETURN CODE IN ECB R P XIF R P* R P IFT MMUPAG=1 R *
0x2d66e4…2d6878 Dummy {f00=0x00e6, f01=0x0190, f02=» * REQUEST ERROR EXIT R P LDKL A4,/8000 RETURN CODE S P RB FM:RTC S @ * S R P EJECT FMTASK S P* S t P* S ~ P********** S P* FM:PWR * S P* FMREAD * S P********** S P* S P* S * P* INPUT: A2 = SECTOR NUMBER, PART
0x2d6878…2d6a0c Dummy {f00=0x00e6, f01=0x0190, f02=»DRESS S t P* T P* OUTPUT: A4 = 0 T P* A7 IS DESTROYED T 2 P* T N & PFM:PWR EQU * PHYSICAL WRITE ENTRY T X P LDK A7,/95 PHYSICAL WRITE T P RF FM:LKM T P* T $ PFMREAD EQU * PHYSICAL READ ENTRY T P LDK A7,/91 PHYSICAL READ T
0x2d6a0c…2d6ba0 Dummy {f00=0x00e6, f01=0x0190, f02=» IN ECB T n P LKM U P DATA 1 U P LD A4,ECBRC,A8 RETURN CODE U , " P ANKL A4,/FEFF SKIP RETRY BIT U P P RF(Z) FM:RTN RETURN IF OK U v P* U : P* ERROR: CHECK WHY AND DECIDE IF REQUEST TO BE ABORTED U P* U P LDK A7,/A2 CLOSE ORDER U 4
0x2d6ba0…2d6d34 (5, 373) Dummy {f00=0x00e7, f01=0x0190, f02=» CW A7,TTB:SA+14,A5 CHECK IF OPEN ORDER RUNNING U $ P RB(NE) FM:RTC ABORT IF NOT OPEN V 8 & P LDK A7,/20 NEW VOLUME LOADED BIT V ` P TM A4,A7 CHECK RETURN CODE V P RB(Z) FM:RTC NOT NVL, ABORT V * P RB FMREAD NVL AT OPEN, REPEAT REQUEST V P* V
0x2d6d34…2d6ec8 Dummy {f00=0x00e7, f01=0x0190, f02=»** V P* W P* W . P* RELBLK WILL RELEASE THE MONITOR BLOCKS W , P* THAT ARE USED IN THE EWT STRUCTURE. W P P* W P* INPUT: A6 = FWT ADDRESS W P* W $ P* OUTPUT: A1-A4 ARE DESTROYED W P* W . PRELBLK EQU * RELEASE EWT STRUC
0x2d6ec8…2d705c Dummy {f00=0x00e7, f01=0x0190, f02=»L:10 EQU * W P INH X $ P CF A15,FREBLK RELEASE EWT BLOCK X P ENB X F P LDR A4,A3 EWT BLOCK ADDRESS X R P RB(NZ) REL:10 X v P* X PREL:20 EQU * X * P CM FWTVTC,A6 RESET VTOC SECTOR NUMBER X 4 P CM FWTTAB,A6 RESET TTAB ADDRESS (EA PARAMETER)
0x2d705c…2d71f0 Dummy {f00=0x00e7, f01=0x0190, f02=»** X P* FNDNAM * Y P********** Y P* Y . 2 P* FNDNAM WILL CONVERT THE SUPPLIED FILE CODE Y 8 0 P* TO VOLUME NAME ADDRESS IN THE DISC DWT. Y n P* Y P* INPUT: A2 = FILE CODE Y P* Y P* OUTPUT: A2 = 6 Y ( P* A6 = VOLUM
0x2d71f0…2d7384 Dummy {f00=0x00e7, f01=0x0190, f02=» Y ( P CF A15,FNDDWD FIND DISC DWT ADDRESS Z P ENB Z 4 P* Z @ PFNAM05 EQU * Z J P LD A4,DWTST,A6 Z ^ P ANK A4,1 Z v 4 P RF(NZ) FNAM10 POWER ON COMPLETED FOR THIS DISC Z P LKM Z P DATA 0 SWITCH TASKS Z P RB FNAM05 CHECK DISC AGAIN Z
0x2d7384…2d7518 Dummy {f00=0x00e7, f01=0x0190, f02=» A2,6 Z P ADKL A6,DWTVOL-6 [ P RTN A14 [ ( P* [ 8 P EJECT FMTASK [ B P* [ Z P* [ d P********** [ n P* FNDVOL * [ P********** [ P* [ P* [ & P* FNDVOL SEARCHES THE REQUESTED [ $ P* VOLUME SPECIFIED IN THE FPB. [
0x2d7518…2d76ac Dummy {f00=0x00e7, f01=0x0190, f02=»FILE CODE IF FOUND, ELSE [ z * P* = 0 IF VOLUME NOT FOUND & P* A1, A3-A4, A12 ARE DESTROYED N P* x ( PFNDVOL EQU * FIND VOLUME (FILE CODE) 4 P LDKL A1,DFTAB-1 DISC FILE CODE TABLE ADDRESS-1 P LDR A12,A6 SAVE FWT ADDRESS
0x2d76ac…2d7840 Dummy {f00=0x00e7, f01=0x018e, f02=»OF DFTAB ~ P LCR A2,A1 NEXT FILE CODE ] , P CF A14,FNDNAM FIND VOLUME NAME ADDRESS ] 2 * P LDR* A3,A6 FIRST WORD OF VOLUME NAME ] b P RB(Z) FVOL10 NO VOLUME ] P* ] P EJECT FMTASK ] P* ] P* ] P LDR A3,A10 FPB ADDRESS ] , P A
0x2d7840…2d79d4 (5, 374) Dummy {f00=0x00e7, f01=0x0190, f02=» * P RB(NE) FVOL10 VOLUME NAMES NOT EQUAL ^ P ADK A3,2 INCREMENT POINTERS ^ 2 P ADK A6,2 ^ V P SUK A2,2 ^ h P RB(P) FVOL20 ^ z P LCR A2,A1 FILE CODE ^ P* ^ PFVOL25 EQU * ^ $ P LDR A6,A12 RESTORE FWT ADDRESS ^ P RTN A14 ^ P* ^
0x2d79d4…2d7b68 Dummy {f00=0x00e7, f01=0x0190, f02=» ^ P********** _ P* RDVTOC * _ P********** _ , P* _ > P* _ H 0 P* RDVTOC WILL CALL FCHEC2 FOR CHECK OF THE _ R 2 P* ACCESS PARAMETERS AND READ THE VTOC RECORD _ " P* OF THE FIRST FILE EXTENT. _ P* _ " P* INPUT: A5 = TTAB ADDRES
0x2d7b68…2d7cfc Dummy {f00=0x00e7, f01=0x018e, f02=»N FM:BUF _ j , P* A1-A4, A7, A11 ARE DESTROYED ` P* ` @ 8 PRDVTOC EQU * CHECK ACCESS PAR. AND READ VTOC RECORD ` J P IFT MMUPAG=0 ` P LDR* A2,A9 FILE NUMBER ` P XIF ` P* ` P IFT MMUPAG=1 ` P ELR A2,A9 FILE NUMBER ` P X
0x2d7cfc…2d7e90 Dummy {f00=0x00e7, f01=0x0190, f02=» P RF(NZ) RDVT20 ERROR, RETURN a P* a ( P EJECT FMTASK a 2 P* a J P* a T P LDR A6,A3 FWT ADDRESS a ^ 2 P LC A2,FWTVOL,A6 DISC FILE CODE (FIRST EXTENT) a | P SC A2,ECBFC,A8 a 6 P LD A2,FWTVTC,A6 VTOC SECTOR NUMBER (FIRST EXTENT) a 8 P CF
0x2d7e90…2d8024 Dummy {f00=0x00e7, f01=0x0190, f02=» RDVT20 FIRST EXTENT FOUND a 6 P CF A14,FVTC30 READ NEXT VTOC RECORD FOR THIS FILE b " 0 P RB RDVT10 CHECK IF THIS IS THE FIRST EXTENT b P* b PRDVT20 EQU * b P RTN A14 b P* b P EJECT FMTASK b P* b P* b P********** b P*
0x2d8024…2d81b8 Dummy {f00=0x00e7, f01=0x0190, f02=» RETURN IS MADE WHEN ONE EXTENT b P* HAS BEEN FOUND. c ( P* c D P* INPUT: A2 = FILE CODE c N " P* A5 = TTAB ADDRESS c p P* A6 = FWT ADDRESS c & P* A9 = USER ECB ADDRESS c P* c 6 P* OUTPUT: A2 = VTOC SECTOR NUM
0x2d81b8…2d834c Dummy {f00=0x00e7, f01=0x018e, f02=» A1, A3-A4, A7, A11-A12 ARE DESTROYED c P* d 2 PFNDVTC EQU * FIND VTOC ENTRY d < ( P SC A2,ECBFC,A8 SET FILE CODE IN ECB d ` P LDK A2,0 SECTOR NUMBER d P CF A14,FMREAD READ SECTOR 0 d * P LD A2,FM:BUF+VOL:EB VTOC EXTENT BASE d P LDR A12,A
0x2d834c…2d84e0 Dummy {f00=0x00e7, f01=0x0190, f02=» P* e P* e & PFVTC10 EQU * ENTRY USED BY RDVTOC e ( P CF A14,FMREAD READ ONE VTOC SECTOR e B $ P LDKL A13,FM:BUF FM:BUF ADDRESS e n $ P LDK A7,VTOCBF VTOC BLOCK FACTOR e P* e PFVTC20 EQU * e & P LD A4,VTC:ST,A13 VTOC STATUS BYTE e P A
0x2d84e0…2d8674 (5, 375) Dummy {f00=0x00e7, f01=0x0190, f02=» NUMBER e l & P ADKL A13,VTOCRL NEXT VTOC ADDRESS f P SUK A7,1 f : , P RB(P) FVTC20 MORE VTOC:S IN THIS SECTOR f L P ADK A2,1 NEXT VTOC SECTOR f | , P CWR A2,A12 CHECK IF END OF VTOC EXTENT f ( P RB(NE) FVTC10 NOT LAST VTOC SECTOR f P LDK A2,0 RETU
0x2d8674…2d8808 Dummy {f00=0x00e7, f01=0x0190, f02=» ADK A1,FWTNAM f P LDR A3,A13 VTOC ADDRESS g P LDK A4,4 LOOP COUNTER g 6 P* g T $ PFVTC60 EQU * COMPARE FILE NAMES g ^ P LDR* A11,A3 g P CWR* A11,A1 g ( P RB(NE) FVTC30 FILE NAMES NOT EQUAL g P ADK A1,2 INCREMENT POINTERS g P ADK A3,2
0x2d8808…2d899c Dummy {f00=0x00e7, f01=0x0190, f02=» P********** h P* FNDFWT * h P********** h ( P* h : P* h D 4 P* FNDFWT IS USED TO FIND OUT IF THE SPECIFIED h N 0 P* FILE IS ALREADY OPENED, AND IF SO RETURN h & P* THE FWT ADDRESS FOR THE FILE. h 6 P* IF NOT OPENED, A FREE FWT ADDRES
0x2d899c…2d8b30 Dummy {f00=0x00e7, f01=0x0190, f02=»A6 = FWT ADDRESS (=0 IF NO FREE FWT AVAILABLE) h & P* A1-A4, A7, A11 ARE DESTROYED i 6 P* i ` PFNDFWT EQU * i j P LDK A3,0 i ~ * P LD A7,SCTFWT FWT CHAIN START ADDRESS i P* i PFNDF10 EQU * i P LDK A2,1 i P* i PFNDF15 EQU * i
0x2d8b30…2d8cc4 Dummy {f00=0x00e7, f01=0x0190, f02=»ECK IF USED i ( P RF(NZ) FNDF20 USED, CHECK FILE NAME j 6 P ADK A3,0 CHECK IF FREE FWT ADDRESS ALREADY SAVED j @ & P RB(NZ) FNDF15 YES, DON'T SAVE IT j z ( P LDR A3,A6 NO, SAVE THIS FWT ADDRESS j P RB FNDF15 CONTINUE SEARCH j P* j P EJECT FMT
0x2d8cc4…2d8e58 Dummy {f00=0x00e7, f01=0x0190, f02=» A2,FWTNAM j P LDR A4,A10 FPB ADDRESS k P ADK A4,FPB:FN k 2 P SUK A7,1 SKIP FWT USED BIT k H P* k l $ PFNDF30 EQU * COMPARE FILE NAMES k v P LDR* A11,A2 k P CWR* A11,A4 k ( P RB(NE) FNDF10 FILE NAMES NOT EQUAL k P ADK A2,2 INCREMENT PO
0x2d8e58…2d8fec Dummy {f00=0x00e7, f01=0x0190, f02=») FNDF10 NOT THIS FILE k P RTN A14 FILE FOUND, RETURN l P* l B PFNDF40 EQU * FILE NOT FOUND l L P LDR A6,A3 FREE FWT ADDRESS l p P RTN A14 l P* l P EJECT FMTASK l P* l P* l P******** l P* MOVE * l P******** l
0x2d8fec…2d9180 Dummy {f00=0x00e7, f01=0x0190, f02=» = OUTPUT BUFFER ADDRESS l P* m P* OUTPUT: A2 = 0 m * > P* A1, A3 = ADDRESSES OF LAST MOVED CHARACTERS+1 m D P* A4 IS DESTROYED m P* m PMOVE EQU * MOVE STRING m " P LCR A4,A1 MOVE ONE CHARACTER m P SCR A4,A3 m (
0x2d9180…2d9314 (5, 376) Dummy {f00=0x00e7, f01=0x0190, f02=» P* n EJECT FMTASK n * n & * n 0 ********** n : * FMRDWR * n L ********** n ^ * n p P* n z $ * FILE MANAGEMENT I/O FUNCTIONS. n * &* FMRDWR IS ENTERED WHEN THE REQUESTED n & "* SECTORS ARE SPLIT OVER MORE THAN n * ON
0x2d9314…2d94a8 Dummy {f00=0x00e7, f01=0x4098, f02=»SION n l XIF o * o IFT XTSPLI=1 o " " ABL LKMERR TO BE IMPLEMENTED o 8 XIF o ^ * o j * o t * o ~ END o @ o O FUNCTIONS. n * &* FMRDWR IS ENTERED WHEN THE REQUESTED n & "* SECTORS ARE SPLIT OVER MORE THAN n * ON
0x2d94a8…2d963c Dummy {f00=0x00e7, f01=0x2008, f02=» p FMTASK ~ * * " * , END 6@ B * H ********** R * FMRDFP * d ********** v * 0 +* FILE MANAGEMENT ADMINISTRATION FUNCTIONS: * READ FILE PARAMETERS * & !FMRDFP EQU * READ FILE PAR
0x2d963c…2d97d0 Dummy {f00=0x00e7, f01=0x0190, f02=» A ~ H A v ( $ P P >P P P W _ A n T >FV :A H @ nY H @ nZ >AV W _ _ @ n @ r >BV -W >AV -W >AV B j R _ @ r T T S S S S >T T S S S S @ p - - T A r
0x2d97d0…2d9964 Dummy {f00=0x00e7, f01=0x0190, f02=»P X _ @ l I :a A l ;a L # A A P A T #( W @ BP 2 #( : d M ^ R _ W D_ * $ @ @P P R " R Q 2 #( @ @ T R A @_. @ l
0x2d9964…2d9af8 Dummy {f00=0x00e7, f01=0x0190, f02=» A ~ H A v ( $ P P >P P P W _ A n T >FV :A H @ nY H @ nZ >AV W _ _ @ n @ r >BV -W >AV -W >AV B j R _ @ r T T S S S S >T T S S S S @ p - - T A r
0x2d9af8…2d9c8c Dummy {f00=0x00e7, f01=0x0190, f02=»P X _ @ l I :a A l ;a L # A A P A T #( W @ BP 2 #( : d M ^ R _ W D_ * $ @ @P P R " R Q 2 #( @ @ T R A @_. @ l
0x2d9c8c…2d9e20 Dummy {f00=0x00e7, f01=0x0190, f02=» A ~ H A v ( $ P P >P P P W _ A n T >FV :A H @ nY H @ nZ >AV W _ _ @ n @ r >BV -W >AV -W >AV B j R LPOP 0XLS TK1 TK2 MT1 MT2 pqCSH @ j !NNP !YYP !> A n : @ j! P P !> A n
0x2d9e20…2d9fb4 (5, 377) Opaque[0x194]
0x2d9fb4…2da148 # DirEnt {nam=»LDTASK«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1d00, f03=0x0000}
0x2d9fb4…2da148 IdxSect {
0x2d9fb4…2da148 f00 = 0x00e8 // 0x2d9fb4 @0x0
0x2d9fb4…2da148 f01 = 0x000c // 0x2d9fb6 @0x2
0x2d9fb4…2da148 gno = [ // 0x2d9fb8 @0x4
0x2d9fb4…2da148 [0x00]: C0x00e8.0x0.0
0x2d9fb4…2da148 [0x01]: C0x00e8.0x1.0
0x2d9fb4…2da148 [0x02]: C0x00e8.0x2.0
0x2d9fb4…2da148 [0x03]: C0x00e8.0x3.0
0x2d9fb4…2da148 [0x04]: C0x00e9.0x0.0
0x2d9fb4…2da148 [0x05]: C0x00e9.0x1.0
0x2d9fb4…2da148 ]
0x2d9fb4…2da148 }
0x2da148…2da2dc Dummy {f00=0x00e8, f01=0x0190, f02=» 2 P IDENT LDTASK REL 10.0 80-03-14 870105041000 P : P* B 6 P************************************************** L P* $ P* PHILIPS TERMINAL SYSTEM PTS P* P* LDTASK = LOAD TASK P* P* P* P* 6 P
0x2da2dc…2da470 Dummy {f00=0x00e8, f01=0x0190, f02=» MEMORY MANAGEMENT SYSTEMS. P* $ & P* IT CONTAINS TWO ENTRY POINTS: . P* X . P* - LT:DSK USED IN DISC PAGING SYSTEMS b 8 P* - LT:SWB USED IN SWAPPABLE WORK BLOCK SYSTEMS P* P* P EJECT LDTASK P* P*
0x2da470…2da604 Dummy {f00=0x00e8, f01=0x0190, f02=»T:SWB SWAPPABLE WORK BLOCK ENTRY P ENTRY TTABLD LOAD TASK TTAB ( 2 P ENTRY QLTDSK ACTIVATE LDTASK AT ENTRY LT:DSK L 2 P ENTRY QLTSWB ACTIVATE LDTASK AT ENTRY LT:SWB " P ENTRY QLTASK ACTIVATE LDTASK " P ENTRY LD:ECB LDTASK ECB AREA P ENT
0x2da604…2da798 Dummy {f00=0x00e8, f01=0x0190, f02=»CK BASE x P EJECT LDTASK P* ( P* 2 P************* < P* EXTERNALS * R P************* h P* ~ P* " P EXTRN TLDS15 ENTRY IN TLDSEG " P EXTRN TLDS20 ENTRY IN TLDSEG 2 P EXTRN QMEXIT QUEUE TASK AND EXIT MONITOR
0x2da798…2da92c Dummy {f00=0x00e8, f01=0x0190, f02=» EXTRN PAGQUE FREE PAGE QUEUE & P EXTRN PAG:QB QUEUE LINK BACKWARDS & P EXTRN PAG:PA PAGE ADDRESS P ( P EXTRN PAG:SB SEGMENT BLOCK ADDRESS r P EXTRN SEG:FC FILE CODE & P EXTRN SEG:DS DISC SECTOR ADDRESS P EXTRN SEG:EL SEGMENT LENGTH
0x2da92c…2daac0 Dummy {f00=0x00e8, f01=0x0190, f02=» & P EXTRN SWB:NS SWB LENGTH (SECTORS) $ P EXTRN ECBBA ECB BUFFER ADDRESS . & P EXTRN ECBRL ECB REQUESTED LENGTH V & P EXTRN ECBEL ECB EFFECTIVE LENGTH P EXTRN ECBRC ECB RETURN CODE $ P EXTRN ECBCW1 ECB CONTROL WORD 1 $ P EXTRN ECBCW2 ECB
0x2daac0…2dac54 (5, 378) Dummy {f00=0x00e8, f01=0x018e, f02=»RN TTB:SP SEGTAB ADDRESS P* P EJECT LDTASK * P* B P* L ( P EXTRN SCTIPL PROGRAM LOADING DEVICE V . P EXTRN SCTIOE APPLICATION RESTART ADDRESS P EXTRN SCTPSZ PAGE SIZE * P EXTRN SCTLAP LOGICAL ADDRESS OF PAGES P EJECT
0x2dac54…2dade8 Dummy {f00=0x00e8, 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 0 P* P* 6 P* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION
0x2dade8…2daf7c Dummy {f00=0x00e8, f01=0x018e, f02=»SS SWAPPABLE WORK p 2 P* BLOCKS IS OBTAINED BY SETTING SWPBLK EQU 1. P* P PSWPBLK EQU 0 Z P* n P EJECT LDTASK x P* " P* LDTASK ECB AND BUFFER AREAS P* . PLD:ECB DATA 0,0,0,0,0,0,0 LDTASK ECB AREA P* 4 PLD
0x2daf7c…2db110 Dummy {f00=0x00e8, f01=0x0190, f02=» ( PLD:STB EQU *-2 LOAD TASK STACK BASE P* 0 P EJECT LDTASK : P* R P* TTABLD (LOAD TASK TTAB) P* ~ P IFT MMUPAG=1 P RES 16 LDTASK MMU TABLE P XIF P* P DATA 0 CURRENT SEGMENT BASE ( PPQEMTY DATA 0 PA
0x2db110…2db2a4 Dummy {f00=0x00e8, f01=0x0190, f02=»INK v " P DATA '#L' TASK IDENTIFICATION P DATA 49 PRIORITY LEVEL 2 P DATA 0 PENDING POINTER R * P DATA /C4C0 PSW (PROGRAM STATUS WORD) r P DATA 0 DISPATCH ADDRESS 2 P DATA 0,0,0,0,0,0,0 REGISTER SAVE AREA, A1-A14 P DATA 0,0,0,0,0,0,
0x2db2a4…2db438 Dummy {f00=0x00e8, f01=0x0190, f02=»********** P* P* D P* LT:DSK PERFORMS LOADING OF DISC RESIDENT SEGMENTS INTO CORE. & P* n * P* INPUT: A1 = SEGMENT BLOCK ADDRESS x 2 P* A3 = TTAB ADDRESS OF CALLING TASK P* P* * PLT:DSK EQU * LDTASK DISC
0x2db438…2db5cc Dummy {f00=0x00e8, f01=0x0190, f02=»OR CALLING TASK (IF MMU) AND | P* REMOVE PAGE FROM PAGQUE $ P* F P LDR A7,A3 SAVE A3 P P LDR A5,A3 j P INH | P CF A15,TLDS15 , P LDR A5,A7 TTAB ADDRESS OF CALLING TASK * P ABL QMEXIT QUEUE TASK AND EXIT LDTASK P* P E
0x2db5cc…2db760 Dummy {f00=0x00e8, f01=0x0190, f02=»* PLTD:00 EQU * ( P IM PQEMTY INDICATE PAGE QUEUE EMPTY P LKM J P DATA 5 PAUSE LDTASK V P* r " P* TAKE FIRST PAGE FROM PAGQUE | P* PLTD:05 EQU * P LD A2,PAGQUE+2 P CWK A2,PAGQUE $ P RB(E) LTD:00 NO PAGE AVAI
0x2db760…2db8f4 (5, 379) Dummy {f00=0x00e8, f01=0x0190, f02=» ADDRESS TO NEXT PAGE BLOCK ( P ST A4,PAGQUE+2 UPDATE QUEUE ANCHOR $ P LDR* A5,A2 PAGQUE ADDRESS P 4 P STR A5,A4 UPDATE QUEUE LINK FORWARD NEXT BLOCK r 0 P CMR A2 RESET QUEUE LINK FORWARD THIS BLOCK , P LDKL A6,/4000 SEGMENT UNDER LOADING BIT
0x2db8f4…2dba88 Dummy {f00=0x00e8, f01=0x0190, f02=» . P ORRS A6,A1 INDICATE SEGMENT UNDER LOADING 0 P ST A2,SEG:PB,A1 SET NEW PAGE BLOCK ADDRESS 6 2 P ST A1,PAG:SB,A2 SET NEW SEGMENT BLOCK ADDRESS j P* P IFT MMUPAG=1 P* 2 P* UPDATE MMU TABLE FOR CALLING TASK AND LDTASK P* (
0x2dba88…2dbc1c Dummy {f00=0x00e8, f01=0x018e, f02=»TASK l , P TS TTB:MT,A5 STORE IN LDTASK MMU TABLE 2 P LD A1,TTB:CB,A3 CURRENT SEGMENT BASE ADDRESS < P ST A1,TTB:CB,A5 r P LDR A1,A2 & P LDR A3,A5 TTAB ADDRESS OF LDTASK . P CF A15,TLDS20 UPDATE MMU TABLE FOR LDTASK 6 P TS TTB:MT,A3 ST
0x2dbc1c…2dbdb0 Dummy {f00=0x00e8, f01=0x0190, f02=» P* P ENB P LD A4,SCTPSZ PAGE SIZE & P SRL A4,1 CONVERT LENGTH TO WORDS : $ P LD A6,SEG:EL,A1 SEGMENT LENGTH d & P SRL A6,1 CONVERT LENGTH TO WORDS , P LDR A5,A3 TTAB ADDRESS OF CALLING TASK * P LDR A9,A1 SAVE SEGMENT BLOCK ADDR
0x2dbdb0…2dbf44 Dummy {f00=0x00e8, f01=0x0190, f02=»SEGTAB ADDRESS ~ . P LD A12,SEG:FC,A12 SEGMENT DISC FILE CODE , P LD A3,PAG:PA,A2 PAGE ADDRESS (PHYSICAL) H * P LD A2,SEG:DS,A1 SEGMENT DISC ADDRESS x P LDR* A1,A1 P ANK A1,/FF P* P IFT MMUPAG=0 2 P ST* A3,TTB:CB,A5 UPDATE C
0x2dbf44…2dc0d8 Dummy {f00=0x00e8, f01=0x0190, f02=» EJECT LDTASK P* P* SET ECB PARAMETERS " P* > & PLTD:20 EQU * ENTRY USED BY LT:SWB H " P LDKL A8,LD:ECB LD:ECB ADDRESS r . P ST A1,ECBCW1,A8 SET SECTOR NUMBER IN ECB P ST A2,ECBCW2,A8 * P STR A12,A8 SET DISC FILE CODE IN ECB
0x2dc0d8…2dc26c Dummy {f00=0x00e8, f01=0x0190, f02=» LDR A10,A6 . P ADKL A10,127 NEXT HIGHER MULTIPLE OF 128 P ANKL A10,/7F80 F . P SUR A4,A10 CHECK IF PAGE IS LARGE ENOUGH ^ * P RF(NN) LTD:25 OK, JUST ONE LKM NEEDED P LDR A10,A6 . P ANKL A10,/7F80 NEXT LOWER MULTIPLE OF 128 P*
0x2dc26c…2dc400 Dummy {f00=0x00e8, f01=0x018e, f02=»:50 INTERMEDIATE BUFFER NEEDED 0 P ST A10,ECBRL,A8 SET REQUESTED LENGTH IN ECB & P* Z P IFT MMUPAG=0 d & P ST A3,ECBBA,A8 SET BUFFER ADDRESS z P XIF P* P EJECT LDTASK P* P* P IFT MMUPAG=1 P ECR A1,A3
0x2dc400…2dc594 (5, 380) Dummy {f00=0x00e8, f01=0x0190, f02=» P EJECT LDTASK P* . P* SWB: CONVERT LOGICAL ADDRESS TO PHYSICAL & P* X P SRL A1,3 b & P ANK A1,/1E MMUTAB INDEX (5 BITS) t P ADR A1,A5 ADD TTAB ADDRESS * P LC A1,TTB:MT,A1 PHYSICAL PAGE ADDRESS P LDR A2,A1 P ANK A
0x2dc594…2dc728 Dummy {f00=0x00e8, f01=0x018e, f02=» MMUPAG=1 P* 2 P* SEGMENT: CONVERT PHYSICAL ADDRESS TO LOGICAL P* R P SLL A3,2 P LDR A12,A3 n 6 P ANKL A12,/FFF CONVERT PHYSICAL ADDRESS TO LOGICAL P OR A12,SCTLAP P* PLTD:40 EQU * & P ST A3,ECBBA,A8 SET BUFF
0x2dc728…2dc8bc Dummy {f00=0x00e8, f01=0x0190, f02=» h 2 P ADK A6,0 CHECK IF ANYTHING LEFT TO READ/WRITE 0 P RF(NP) LTD:70 SEGMENT/SWB HANDLING FINISHED > 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*
0x2dc8bc…2dca50 Dummy {f00=0x00e8, f01=0x0190, f02=»LDTASK BUFFER ADDRESS P ST A1,ECBBA,A8 P LDK A2,/80 6 2 P SCR A2,A8 INDICATE BUFFER NOW IN SYSTEM AREA J P ADK A2,/80 A2 := 256 6 P ST A2,ECBRL,A8 SET REQUESTED LENGTH TO ONE SECTOR P ECR A2,A10 * P ADS A2,ECBCW2,A8 UPDATE SEC
0x2dca50…2dcbe4 Dummy {f00=0x00e8, f01=0x0190, f02=»2 PAGE POINTER & P ADR A6,A6 CONVERT LENGTH TO BYTES P* @ P IFT MMUPAG=1 J 2 P MVSU A6 MOVE LAST PART OF SEGMENT/SWB TO PAGE ` P XIF P* P IFT MMUPAG=0 PLTD:65 EQU * P LDR* A10,A1 MOVE ONE WORD P STR A10,A2
0x2dcbe4…2dcd78 Dummy {f00=0x00e8, f01=0x018e, f02=»* P EJECT LDTASK P* " P* , PLTD:70 EQU * 6 P IFT SWPBLK=1 J , P LDR A11,A11 CHECK DISC PAGING/SWB FLAG ` P RF(Z) LTD:80 SWB HANDLING P XIF P* 8 P LDKL A4,/C000 INDICATE SEGMENT SUCCESSFULLY LOADED P XRR
0x2dcd78…2dcf0c Dummy {f00=0x00e8, f01=0x0190, f02=» n P IM ECBCW1,A8 P LDKL A2,/7FFF P ANS A2,ECBCW2,A8 4 P RB LTD:60 N P* ` P EJECT LDTASK j P* P* READ ONE SECTOR FROM DISC P* PLTD:90 EQU * P LKM P DATA 1 P LD A2,ECBRC,A8 RETURN CODE
0x2dcf0c…2dd0a0 Dummy {f00=0x00e8, f01=0x0190, f02=» IN PAGQUE AGAIN | P* PLTD:95 ANK A2,1 " P NGR A2,A2 : . P SUK A2,2 ERROR, SET RETURN CODE -2 OR -3 L . P ST A2,TTB:SA+14,A5 SET RETURN CODE IN A7 ~ P* P IFT SWPBLK=1 , P LDR A11,A11 CHECK DISC PAGING/SWB FLAG P RB(Z) L
0x2dd0a0…2dd234 (5, 381) Dummy {f00=0x00e9, f01=0x0190, f02=» $ P LDK A4,1 INDICATE SEGMENT ERROR P SCR A4,A9 , . P LD A4,SCTIOE APPLICATION RESTART ADDRESS > . P ST A4,TTB:SA,A5 SET NEW DISPATCH ADDRESS p P RB LTD:80 P* P EJECT LDTASK P* P* P********** P* LT:SWB *
0x2dd234…2dd3c8 Dummy {f00=0x00e9, f01=0x0190, f02=» A1 = SWAPPABLE WORK BLOCK ADDRESS 2 P* A3 = TTAB ADDRESS OF CALLING TASK , P* A4 = LKM DATA DIRECTIVE b P* P* * PLT:SWB EQU * LDTASK SWB HANDLING ENTRY P IFT SWPBLK=1 P IFT MMUPAG=1 P INH ( P LDKL A5
0x2dd3c8…2dd55c Dummy {f00=0x00e9, f01=0x0190, f02=» P XIF P* P IFT SWPBLK=1 , P LDR A5,A3 TTAB ADDRESS OF CALLING TASK 4 " P LDR A7,A4 LKM DATA DIRECTIVE d 0 P SUR A11,A11 INDICATE SWB HANDLING (A11 = 0) * P LDR* A3,A1 DISC ADDRESS OF FIRST COPY P ANK A3,/FF P LD A4,S
0x2dd55c…2dd6f0 Dummy {f00=0x00e9, f01=0x0190, f02=»ASK P* ! P* ! P LD A1,TTB:SA+14,A5 ! P ANK A1,/FF SWB COPY INDEX ! < P* ! ^ PLTS:10 EQU * ! h P SUK A1,1 ! | P* ! P IFT CPU852=1 ! P RF(NP) LTS:20 ! 4 P ADR A4,A2 COMPUTE DISC ADDRESS OF REQUESTED SWB ! P RF(O) LTS:1
0x2dd6f0…2dd884 Dummy {f00=0x00e9, f01=0x0190, f02=» ! P* " PLTS:20 EQU * " , P LDR A1,A3 DISC ADDRESS OF REQUESTED SWB " & P LDR A2,A4 " V P XIF " h P* " t P IFT SWPBLK=1 " ~ P IFT CPU852=0 " 2 P MUR A1 COMPUTE DISC ADDRESS OF REQUESTED SWB " P DAR A3 " P XIF " P* " P E
0x2dd884…2dda18 Dummy {f00=0x00e9, f01=0x0190, f02=»RL A6,1 CONVERT SWB LENGTH TO WORDS " P LDR A4,A6 # , & P LD A12,SCTIPL SWB DISC FILE CODE # > ( P SUK A7,19 CHECK LKM DATA DIRECTIVE # h $ P ABL(Z) LTD:15 LOAD SWB REQUEST # : P LDKL A4,/7FFF PARAMETER TO AVOID INTERMEDIATE BUFFER # 2 P LDK A7,/95 PH
0x2dda18…2ddbac Dummy {f00=0x00e9, f01=0x0190, f02=» # P* QLTDSK * $ P* QLTSWB * $ P********** $ , P* $ > P* $ H : P* THIS ROUTINE PERFORMS ACTIVATION OF THE LOAD TASK. $ R P* $ : P* ACTIVATION IS AT LT:DSK WHEN DISC PAGING REQUEST. $ B P* ACTIVATION IS AT LT:SWB WHEN SWAPPABLE WORK
0x2ddbac…2ddd40 Dummy {f00=0x00e9, f01=0x0190, f02=») $ ` 2 P* A3 = TTAB ADDRESS OF CALLING TASK % * P* A4 = LKM DATA DIRECTIVE (LT:SWB) % @ P* % n $ P* OUTPUT: A2, A5 ARE DESTROYED % x P* % P* % 0 PQLTSWB EQU * ACTIVATE LDTASK AT ENTRY LT:SWB % P IFT SWPBLK=1 % $ P LDKL A2,L
0x2ddd40…2dded4 (5, 382) Dummy {f00=0x00e9, f01=0x4146, f02=»YSTEM % d P XIF & P* & 0 PQLTDSK EQU * ACTIVATE LDTASK AT ENTRY LT:DSK & $ $ P LDKL A2,LT:DSK DISPATCH ADDRESS & X P* & P EJECT LDTASK & P* & P* & PQLTASK EQU * & ( P LDKL A5,TTABLD LDTASK TTAB ADDRESS & P ABL ACTOT ACTIVAT
0x2dded4…2de068 Dummy {f00=0x00e9, 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*
0x2de068…2de1fc Dummy {f00=0x00e9, f01=0x0190, f02=» REP045 YES 7 P SUK A4,1 COUNT RETRY 8 P RF(NP) REP060 GIVE UP 8 2 P CF A8,BKSP BACKSPACE 8 P " P CF A8,READSQ READ SEQ NUMBER 8 n P RB REP042 8 P* 8 P EJECT DRTC01 8 P* 8 P* 8 PREP045 SLC A2,3 8 P RF(NN) REP050 NOT T
0x2de1fc…2de390 Dummy {f00=0x00e9, f01=0x0190, f02=» NUMBER 8 v P CC A5,DWTBKC+1,A6 9 P RF(E) REPOK EQUAL 9 * P* 9 D PREP060 LD A7,DWTST,A6 9 N $ P ANK A7,8 TRY POSITIONING AGAIN? 9 l P RF(Z) REPER NO 9 , P XRS A7,DWTST,A6 RESET REPOSITIONING BIT 9 P RB REP005 YES 9 P* 9 P* 9 6 PRE
0x2de390…2de524 Dummy {f00=0x00e9, f01=0x0190, f02=»ND RECOVERY CORRECT 9 P RTN A8 : P* : , P EJECT DRTC01 : 6 P* : N P* : X P* D W T C 0 2 : b P* : z 2 P* DEVICE WORK TABLE FOR CASSETTE RECORDER 02 : P* : P* : PDWTC02 EQU * TABLE ENTRY : P IFT DBCAS=2 : P DATA
0x2de524…2de6b8 Dummy {f00=0x00e9, f01=0x0190, f02=»AD POINTER TO ADDRESS BLOCK : P DATA 0 TTAB ADDRESS ; $ $ P DATA 0 WAIT/ACTIVATE INDICATOR ; @ P DATA 0 TERMINAL QUEUE ; h IFT MMUPAG=1 ; & " DATA 0 SAVE AREA USER ECB ADDRESS ; P DATA ECBTC2 MMU ECB ADDRESS ; XIF ; P IFT DBCAS=2 ;
0x2de6b8…2de84c Dummy {f00=0x00e9, f01=0x0190, f02=» P DATA 0,0,0,0 < PTCBUF2 RES DVBLEN+1 < P XIF < 6 P* < B P EJECT DRTC01 < L P* < d P* < n P* D W T C 0 1 < x P* < 2 P* DEVICE WORK TABLE FOR CASSETTE RECORDER 01 < P* < P* < PDWTC01 EQU * TABLE ENTRY < P D
0x2de84c…2de9e0 Dummy {f00=0x00e9, f01=0x0190, f02=»TCAD POINTER TO ADDRESS BLOCK < P DATA 0 TTAB ADDRESS = & $ P DATA 0 WAIT/ACTIVATE INDICATOR = B P DATA 0 TERMINAL QUEUE = j IFT MMUPAG=1 = & " DATA 0 SAVE AREA USER ECB ADDRESS = P DATA ECBTC1 MMU ECB ADDRESS = XIF = & PDWTBKC EQU *-DWT
0x2de9e0…2deb74 (5, 383) Opaque[0x194]
0x2deb74…2ded08 # DirEnt {nam=»LKMAL «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1d30, f03=0x0000}
0x2deb74…2ded08 IdxSect {
0x2deb74…2ded08 f00 = 0x00e9 // 0x2deb74 @0x0
0x2deb74…2ded08 f01 = 0x0004 // 0x2deb76 @0x2
0x2deb74…2ded08 gno = [ // 0x2deb78 @0x4
0x2deb74…2ded08 [0x00]: C0x00e9.0x2.0
0x2deb74…2ded08 [0x01]: C0x00e9.0x3.0
0x2deb74…2ded08 ]
0x2deb74…2ded08 }
0x2ded08…2dee9c Dummy {f00=0x00e9, f01=0x0190, f02=» 0 P IDENT LKMAL REL 10.0 80-03-14 870105041000 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
0x2dee9c…2df030 Dummy {f00=0x00e9, 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*
0x2df030…2df1c4 Dummy {f00=0x00e9, f01=0x018e, f02=»ENT v ( P EXTRN DMTEND DATA MANAGEMENT COMMIT " P EXTRN TCHPAG CHANGE MMU PAGE 8 " P EXTRN TCHMMU CHANGE MMU TABLE ^ 2 P EXTRN TSWBLK LOAD/STORE SWAPPABLE WORK BLOCK P* P EJECT P* $ PLKMAL DATA LKMALE-* TABLE LENGTH P DAT
0x2df1c4…2df358 Dummy {f00=0x00e9, f01=0x0190, f02=» P DATA TPAUSE TERMINAL PAUSE P DATA TIMER TIMER ( P DATA TMWAIT MULTIPLE WAIT B $ P DATA TLUSEG LOCK/UNLOCK SEGMENT d P DATA TLDSEG SEGMENT TLDSEG P DATA TABORT ABORT FUNCTION P DATA 0 4 P DATA GETTIM GET CURRENT VALUE OF MO
0x2df358…2df4ec Dummy {f00=0x00e9, f01=0x40e8, f02=»NT COMMIT v P DATA TCHPAG CHANGE MMU PAGE " P DATA TCHMMU CHANGE MMU TABLE 6 * P DATA TSWBLK LOAD SWAPPABLE WORK BLOCK , P DATA TSWBLK STORE SWAPPABLE WORK BLOCK PLKMALE EQU * P* P END @ A GETTIM GET CURRENT VALUE OF MO
0x2df4ec…2df680 Dummy {f00=0x00e9, 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
0x2df680…2df814 (5, 384) Dummy {f00=0x00e9, f01=0x0190, f02=» =7(=3) % P* & P* & 0 P* CHECK QUEUE AND SEND IF SOMETHING THERE & $ P* & X & P LDR* A7,A5 LAST OUTPUT DWT IN A7 & b P CMR A5 RESET LAST OUTPUT & P LD A6,CWTEQ,A5 OUTPUT QUEUE & P RF(E) CLT020 & P STR A2,A15 SAVE A2 & $ P LD
0x2df814…2df9a8 Dummy {f00=0x00e9, f01=0x0012, f02=» ( 0 8 @ H P X
0x2df9a8…2dfb3c Dummy {f00=0x00e9, f01=0x0190, f02=» 2 P IDENT DRTP02 PRR 10.0 79-12-07 870105041000 P : P REL 9.1 79-04-06 B & P =1-3,GEN UPDATE TO 8.2+ STATUS ^ P REL 8.2 79-04-19 " P =3,RECOVERY TIMER CORRECTED P REL 8.2 79-04-18 & P =2,GRSP/REL CH.TO IMPR. REMOTE
0x2dfb3c…2dfcd0 Dummy {f00=0x00e9, f01=0x0190, f02=»******************* l < P* * < P* PHILIPS TERMINAL SYSTEM PTS * < P* * < P* DRTP02 = DRIVER TELLER TERMINAL PRINTER
0x2dfcd0…2dfe64 Dummy {f00=0x00e9, f01=0x0190, f02=» * P* P* P* < P* * * < P******************************************************* j P* > P* THIS DRIVER HANDLES TELLER TERMINAL PRINTERS PTS 6221, 6 P* 6222 OR 6223 C
0x2dfe64…2dfff8 Dummy {f00=0x00e9, f01=0x0190, f02=»P : ACTIVATION PART P* & P* I H T P : INTERRUPT HANDLER ( P* R $ P* R C T P : RECOVERY ROUTINE P* P* 6 P* THE DRIVER CONTAINS THE FOLLOWING SUBROUTINES: P* B P* P R B U F : GET CHARACTERS FROM ECB-BU
0x2dfff8…2e018c Dummy {f00=0x00e9, f01=0x0190, f02=»BER OF CHARACTERS GIVEN IN FIRST p $ P* CHARACTER IN OUTPUT BUFFER ( P* P . P* G R A S P : SEND GRASP TO VOUCHER Z P* 4 P* R E L E A S : SEND LIFT TO TOP AND RELEASE P EJECT P* * P* THE FOLLOWING ORDERS ARE TREAT
0x2e018c…2e0320 Dummy {f00=0x00e9, f01=0x0190, f02=»ITE h $ P* ORDER 22 : CUT JOURNAL * P* ORDER 26 : PERFORATE JOURNAL 4 . P* ORDER 37 : GRASP VOUCHER/PASSBOOK b 0 P* ORDER 38 : RELEASE VOUCHER/PASSBOOK P* , P* THE FOLLOWING RETURN CODES ARE USED: P*
0x2e0320…2e04b4 (5, 385) Opaque[0x194]
0x2e04b4…2e0648 # DirEnt {nam=»LRPINT«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1d40, f03=0x0000}
0x2e04b4…2e0648 IdxSect {
0x2e04b4…2e0648 f00 = 0x00ea // 0x2e04b4 @0x0
0x2e04b4…2e0648 f01 = 0x000a // 0x2e04b6 @0x2
0x2e04b4…2e0648 gno = [ // 0x2e04b8 @0x4
0x2e04b4…2e0648 [0x00]: C0x00ea.0x0.0
0x2e04b4…2e0648 [0x01]: C0x00ea.0x1.0
0x2e04b4…2e0648 [0x02]: C0x00ea.0x2.0
0x2e04b4…2e0648 [0x03]: C0x00ea.0x3.0
0x2e04b4…2e0648 [0x04]: C0x00eb.0x0.0
0x2e04b4…2e0648 ]
0x2e04b4…2e0648 }
0x2e0648…2e07dc Dummy {f00=0x00ea, f01=0x018e, f02=» 2 P IDENT LRPINT REL 10.0 80-03-14 870105041000 P : P* B P* L 6 P************************************************** V P* $ P* PHILIPS TERMINAL SYSTEM PTS P* 0 P* LRPINT = INTERRUPT HANDLERS FOR LKM, RTC " P*
0x2e07dc…2e0970 Dummy {f00=0x00ea, f01=0x0190, f02=» P* P* : P* THIS MODULE CONTAINS MANDATORY INTERRUPT HANDLERS P* FOR TOSS. THESE ARE: V P* v P* -IHLKM: LKM INTERRUPT P* P* -IHRTC: RTC INTERRUPT P* ( P* -IHPFAR: POWER FAILURE INTERRUPT P*
0x2e0970…2e0b04 Dummy {f00=0x00ea, f01=0x0190, f02=»QUEUE JOB AND DISPATCH v P* ( P* -LKMQDI: QUEUE JOB AND DISPATCH ( P* T P EJECT LRPINT ^ P* v P* P*********** P* ENTRIES * P*********** P* P* & P ENTRY IHLKM LKM INTERRUPT HANDLER 4 P ENT
0x2e0b04…2e0c98 Dummy {f00=0x00ea, f01=0x018e, f02=»RROR d ( P ENTRY LKMQDI QUEUE JOB AND DISPATCH & P ENTRY IHRTC RTC INTERRUPT HANDLER 8 8 P ENTRY TIMQUE POINTER TO FIRST BLOCK IN TIMER QUEUE b P ENTRY MONCLO MONITOR CLOCK 2 P ENTRY IHPFAR POWER FAILURE INTERRUPT HANDLER & P ENTRY INIFLG IN
0x2e0c98…2e0e2c Dummy {f00=0x00ea, f01=0x0190, f02=» P* EXTERNALS * P************* P* 0 P* : P EXTRN TDISP DISPATCHER D " P EXTRN DISQUE DISPATCHER QUEUE d ( P EXTRN PRUN TTAB OF RUNNING PROGRAM " P EXTRN MEXIT MONITOR TASK EXIT , P EXTRN MONMMU MONITOR (SYSTEM) MMU TABLE
0x2e0e2c…2e0fc0 Dummy {f00=0x00ea, f01=0x0190, f02=» LEVEL XY z P EXTRN FREBLK SET BLOCK FREE " P EXTRN SAVE8 SAVE 8 REGISTERS 6 $ P EXTRN PFINIT RESTART OF DEVICES P EXTRN HALT HALT MODULE ( P EXTRN INTSAV INTERRUPT SAVE MODULE P EXTRN RELPAG RELEASE PAGE , P EXTRN TLDSEG LOAD SEG
0x2e0fc0…2e1154 (5, 386) Dummy {f00=0x00ea, f01=0x0190, f02=» OF SAVE AREA IN TTAB x " P EXTRN LKMAL LKM REQUEST TABLE P EJECT LRPINT D P* P* f . P***************************************** p P* P* CONDITIONAL ASSEMBLY P* . P***************************************** P*
0x2e1154…2e12e8 Dummy {f00=0x00ea, f01=0x0190, f02=» P* 6 P* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION . P* SET IS OBTAINED BY SETTING CPU852 EQU 0. L P* ~ PCPU852 EQU 1 P* * . ** A PROGRAM VERSION USING TOSS DISC PAGING * &* IS OBTAINED BY SETTING DSKPAG EQU 1.
0x2e12e8…2e147c Dummy {f00=0x00ea, f01=0x018e, f02=»ETTING MONCLK EQU 0. ~ P* PX:A EQU 1 & PMONCLK EQU X:A 8 P* N P EJECT LRPINT X P* p P* z P* I H L K M P* P* 8 P* THIS IS THE LKM INTERRUPT HANDLER. THE FOLLOWING P* STEPS ARE CARRIED OUT:
0x2e147c…2e1610 Dummy {f00=0x00ea, f01=0x0190, f02=» P* PROGRAM. P* : P* - EXIT CONDITIONS ARE SET AND A BRANCH IS MADE TO $ $ P* APPROPRIATE LKM PROCESSOR. b P* P* EXIT CONDITIONS ARE: P* * P* A4 = LABEL ADDRESS OF LKM REQUEST 8 P* (A4 = 0 INDICATES N
0x2e1610…2e17a4 Dummy {f00=0x00ea, f01=0x0190, f02=» | P* : P* ALL OTHER REGISTERS REMAIN UNCHANGED FROM CALLING P* PROGRAM. P P* d P* n P* x PIHLKM EQU * $ P ST P,INTSAV SAVE LAST INTERRUPT * P RIT /1D RESET INTERNAL INTERRUPT FLAG P* P EJECT LRPINT
0x2e17a4…2e1938 Dummy {f00=0x00ea, f01=0x0190, f02=»5,TTB:SA+28 SET A15 TO LAST IN SAVE AREA * P STR A14,A15 SAVE USER REGISTERS, -A14 0 P STR A13,A15 -A13 ^ P STR A12,A15 -A12 x P STR A11,A15 -A11 P STR A10,A15 -A10 P STR A9,A15 -A9 P STR A8,A15 -A8 P STR A7,A15 -A7
0x2e1938…2e1acc Dummy {f00=0x00ea, f01=0x0190, f02=»5 -A1 P XIF P* P IFT CPU852=0 $ 6 P MS 14,TTB:SA+2,A15 SAVE A1-A14 IN TTAB SAVE AREA : P XIF t P* 0 P LD A5,PRUN GET TTAB ADDRESS OF CALLING TASK * P LDKL A15,0 RESTORE A15 STACK POINTER PLKM010 EQU *-2 P*
0x2e1acc…2e1c60 Dummy {f00=0x00ea, f01=0x0190, f02=»UST STACK POINTER r & P ST A3,TTB:PW,A5 STORE PSW IN TTAB P* D P IFT MMUPAG=0 N & P LD A3,-2,A2 GET INSTRUCTION CODE d " P LDR* A6,A2 GET DATA DIRECTIVE P XIF P* P IFT MMUPAG=1 P ANK A3,1 P RF(NZ) LKM015 USER MO
0x2e1c60…2e1df4 (5, 387) Dummy {f00=0x00ea, f01=0x0190, f02=»A2 GET DATA DIRECTIVE P XIF P* * P CWK A3,/2804 4 P RF(E) LKM025 LKM J P CWK A3,/6300 d P RF(E) LKM025 TRAP z P* $ P* STACK OVERFLOW: HALT SYSTEM P* P LDK A1,7 HALT PARAMETER 0 P RF LKM070 HALT SYSTEM D
0x2e1df4…2e1f88 Dummy {f00=0x00ea, f01=0x018e, f02=»B,A5 GET SEGMENT BLOCK ADDRESS P RF(Z) LKM027 NO SEGMENT & " P LCR A4,A3 GET SEGMENT STATUS F , P ANK A4,/1E CHECK IF CORE RESIDENT OR... l 2 P RF(NZ) LKM027 ...USED BY AN INTERRUPTED TASK P* ( P* INSERT PAGE BLOCK IN PAGE QUEUE P
0x2e1f88…2e211c Dummy {f00=0x00ea, f01=0x018e, f02=» PLKM027 EQU * P IFF MMUPAG+DSKPAG=0 " P CWK A6,9 CHECK DATA DIRECTIVE 8 ( P ABL(E) TLDSEG LOAD SEGMENT REQUEST ^ P XIF P* P EJECT LRPINT P* P* PLKM030 EQU * ( P CM PRUN INDICATE IDLE LOOP RUNNING
0x2e211c…2e22b0 Dummy {f00=0x00ea, f01=0x0190, f02=» P* LKM REQUEST WITH LABEL P* * P ADK A2,2 4 , P NGR A3,A3 MAKE DATA DIRECTIVE POSITIVE F P* v P IFT MMUPAG=0 P LDR* A4,A2 GET LABEL P XIF P* P IFT MMUPAG=1 P ELR A4,A2 GET LABEL P XIF P
0x2e22b0…2e2444 Dummy {f00=0x00ea, f01=0x0190, f02=»VE NEXT ADDRESS TO $ P ST A2,TTB:SA,A5 EXECUTE IN TTAB " P ADR A3,A3 GET INDEX IN LKMAL B ( P RF(Z) LKMQDI PROGRAM SWITCH REQUEST h P CW A3,LKMAL * P RF(NL) LKMRQE INVALID DATA DIRECTIVE P INH P LD A3,LKMAL,A3 ( P ABR(NZ) A3 BR
0x2e2444…2e25d8 Dummy {f00=0x00ea, f01=0x018e, f02=»DK A1,15 INDICATE REQUESTED LKM PROC. NOT PRESENT P* : PLKM070 EQU * D P CF A15,HALT HALT SYSTEM X P* x P* P* L K M R Q E P* 6 P* SET A7 = -1, QUEUE TERMINAL JOB AND DISPATCH. P* P* A5 = TTAB ADDRESS
0x2e25d8…2e276c Dummy {f00=0x00ea, f01=0x0190, f02=» P* L K M Q D I P* ( P* QUEUE TERMINAL JOB AND DISPATCH. & P* R P* A5 = TTAB ADDRESS P* z P* PLKMQDI EQU * P CF A15,QTJOB P* * PT:DISP EQU * COMMON EXIT TO DISPATCHER P ABL TDISP GO TO DISPATC
0x2e276c…2e2900 Dummy {f00=0x00ea, f01=0x018e, f02=»T HANDLER. ` P* P P $ P , P DATA 0 4 & PTTABPF DATA 0 TTAB FOR POWER FAIL D P DATA '#P' n P DATA 0 PA15SAV DATA 0 P DATA /00C0 P DATA PFTASK P P P P P & PPFX DATA 1 POWER O
0x2e2900…2e2a94 (5, 388) Dummy {f00=0x00ea, f01=0x0190, f02=» z P * PPFPOST DATA 0 PWF POST PROCESSING FLAG P NZ=PWF POST PROCESSING > P EJECT LRPINT ` P x P* * P* POWER FAIL/AUTO RESTART INTERRUPT P* P PIHPFAR EQU * $ P ST P,INTSAV SAVE LAST INTERRUPT & P
0x2e2a94…2e2c28 Dummy {f00=0x00ea, f01=0x0190, f02=»F P* P IFT CPU852=1 & P CF A15,SAVE8 SAVE A1-A14 ON STACK * P STR A9,A15 T P STR A10,A15 h P STR A11,A15 | P STR A12,A15 P STR A13,A15 P STR A14,A15 P XIF P P IFT CPU852=0 $ P MSR 14,A15 SAVE A
0x2e2c28…2e2dbc Dummy {f00=0x00ea, f01=0x0190, f02=» P* POWER ON P* P & " PPOWON LD A15,A15SAV RELOAD A15 . P T P IFT CPU852=1 P LDR* A14,A15 RESTORE A9-A14 r P LDR* A13,A15 P LDR* A12,A15 P LDR* A11,A15 P LDR* A10,A15 P LDR* A9,A15 P XIF
0x2e2dbc…2e2f50 Dummy {f00=0x00ea, f01=0x0190, f02=»IRST FOR DISPATCHING t P LDKL A2,TTABPF P CWR A1,A2 4 4 P RB(E) T:DISP ALREADY QUEUED, PWF DURING PFPOST F P STR A1,A2 ~ P ST A2,DISQUE , P IM PFPOST INDICATE PWF POST PROCESSING P RB T:DISP P EJECT LRPINT P P
0x2e2f50…2e30e4 Dummy {f00=0x00ea, f01=0x0190, f02=»T PROC FLAG r P CM INIFLG AND INIT FLAG & P CF A15,PFINIT RESTART I/O DEVICES 4 P CM PRUN EXIT PFTASK ^ P RB T:DISP z P EJECT LRPINT P* P* I H R T C P* 6 P* THIS IS THE REAL TIME CLOCK INTERRUPT HANDLER. 6 P
0x2e30e4…2e3278 Dummy {f00=0x00ea, f01=0x0190, f02=»PT FLAG z P IM COUNT $ P RF(P) RTC010 CHECK TIMER QUEUE " P RTN A15 J P* Z PRTC010 EQU * d P IFT CPU852=1 x & 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
0x2e3278…2e340c Dummy {f00=0x00ea, f01=0x0190, f02=»A15,QMJOB P* P IFT MONCLK=1 P IM SECOND 2 & P RF(P) RTC025 UPDATE MONITOR CLOCK D P XIF n P* z PRTC020 EQU * $ P CF A15,SWLXY SWITCH TO LEVEL XY P RB T:DISP P* P EJECT LRPINT P* P* P
0x2e340c…2e35a0 Dummy {f00=0x00ea, f01=0x0190, f02=»9 SET SECOND SWITCH P ST A4,SECOND P LDK A4,4 2 P* D 2 PMCLO10 LDK A3,60 NUMBER OF MINUTES AND SECONDS N ( PMCLO20 IM MONCLO+2,A4 INCREMENT TIME . P XR A3,MONCLO+2,A4 CHANGE MINUTES OR HOURS $ P RB(NE) RTC020 GO TO DISPATCHER (
0x2e35a0…2e3734 (5, 389) Dummy {f00=0x00eb, f01=0x0190, f02=» P LDK A3,24 UPDATE HOURS P RB MCLO20 $ P XIF 6 P* B P* L P* M O N C L O V P* n P* x PMONCLO EQU * P IFT MONCLK=1 & P DATA 0 ACCUMULATED 24 HOUR CARRY P DATA 0 HOUR P DATA 0 MINUTE P DATA 0
0x2e3734…2e38c8 Dummy {f00=0x00eb, f01=0x0190, f02=»00 MS. p P* PCLOCK INH , P LDKL A4,TIMQUE LOAD FIRST TIMER ADDRESS * P* Z PCLK10 LDR A6,A4 d $ PCLK20 LDR* A4,A6 GET TIMER BLOCK | P ABL(Z) MEXIT END OF QUEUE P IM 4,A4 INCREMENT TIMER P RB(N) CLK10 NOT TIME OUT P
0x2e38c8…2e3a5c Dummy {f00=0x00eb, f01=0x0190, f02=» P RB CLK20 P* P EJECT LRPINT $ P* < P* F , PCLK30 CF A15,CLK40 CALL TIME OUT ROUTINE P $ P CF A15,SWL48 SWITCH TO LEVEL 48 P INH P RB CLK10 P* PCLK40 EQU * P IFT CPU852=1 & P CF A15,SAVE8
0x2e3a5c…2e3bf0 Dummy {f00=0x00eb, f01=0x0190, f02=»L A1,/C4C0 LEVEL 49 AND ENABLE & P ST A1,18,A15 SET NEW PSW ON STACK ! & P LD A2,2,A4 LOAD DISP BLOCK ! P P LD A1,4,A2 GET PARAMETER ! t $ P ABI 2,A2 GO TO TIME OUT ROUTINE ! P* ! P* ! PCOUNT DATA 0 100 MS SWITCH ! P* ! P* ! P
0x2e3bf0…2e3d84 Dummy {f00=0x00eb, f01=0x4026, f02=» P* " P " P END " @ " " ST A1,18,A15 SET NEW PSW ON STACK ! & P LD A2,2,A4 LOAD DISP BLOCK ! P P LD A1,4,A2 GET PARAMETER ! t $ P ABI 2,A2 GO TO TIME OUT ROUTINE ! P* ! P* ! PCOUNT DATA 0 100 MS SWITCH ! P* ! P* ! P
0x2e3d84…2e3f18 Dummy {f00=0x00eb, 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
0x2e3f18…2e40ac Dummy {f00=0x00eb, f01=0x018e, f02=»SE # x P RB TST012 CUT,PERFORATE $ P XIF $ * P EJECT $ 6 P* $ D P* $ N P* $ X $ P* ORDER 06 : PRINT TALLY ROLL $ b P* $ P* $ P* $ ( PTP405 CF A5,RELEAS ERROR. VOUCHER IN $ P* $ * PTP407 LDKL A3,BUF3 SEND CR2 AND ATTACH $
0x2e40ac…2e4240 Dummy {f00=0x00eb, f01=0x018e, f02=» $ P EJECT % P* % P* % P* % * * P* ORDER 06 : WRITE VOUCHER/PASSBOOK % 4 * P* OB : POSITION LIFT AND WRITE % b P* % P* % PTP605 EQU * =2 % P LDK A2,STX SEND STX =2 % P CF A5,OUTPUT =2 % " P CF A5,GRASP GRASP
0x2e4240…2e43d4 (5, 390) Opaque[0x194]
0x2e43d4…2e4568 # DirEnt {nam=»MONTAB«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1d68, f03=0x0000}
0x2e43d4…2e4568 IdxSect {
0x2e43d4…2e4568 f00 = 0x00eb // 0x2e43d4 @0x0
0x2e43d4…2e4568 f01 = 0x0002 // 0x2e43d6 @0x2
0x2e43d4…2e4568 gno = [ // 0x2e43d8 @0x4
0x2e43d4…2e4568 [0x00]: C0x00eb.0x1.0
0x2e43d4…2e4568 ]
0x2e43d4…2e4568 }
0x2e4568…2e46fc Dummy {f00=0x00eb, f01=0x0190, f02=» 2 P IDENT MONTAB REL 10.0 80-03-14 870105041000 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
0x2e46fc…2e4890 Dummy {f00=0x00eb, f01=0x0190, f02=» INTRT3 P ENTRY INTRT4,INTAS,INTSL P* 2 P EXTRN SYSLOD < P EXTRN KBAD3 R P EXTRN KBAD f P EXTRN TPAD z P EXTRN GPAD P EXTRN DNAD P EXTRN DIAD P EXTRN DYAD P* P* P* P* P E
0x2e4890…2e4a24 Dummy {f00=0x00eb, f01=0x0190, f02=»EQUE DATA 0 PPAGQUE DATA 0,0 PINTLT1 DATA 0 , PINTLT2 DATA 0 B PINTLT3 DATA 0 X PINTLT4 DATA 0 n PINTRT1 DATA 0 PINTRT2 DATA 0 PINTRT3 DATA 0 PINTRT4 DATA 0 P DATA SYSLOD P DATA KBAD3 P DAT
0x2e4a24…2e4bb8 Dummy {f00=0x00eb, f01=0x40d6, f02=» P DATA MSAD P DATA ODAD P DATA TPAD3 , P DATA GPAD8 @ P* T P* ^ PINTAS DATA 0 h PINTSL DATA 0 | 2 PSPDLCI DATA 0 LIGHTS CORE IMAGE (0=ON 1=OFF) P END @ P DATA SYSLOD P DATA KBAD3 P DAT
0x2e4bb8…2e4d4c Dummy {f00=0x00eb, 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
0x2e4d4c…2e4ee0 Dummy {f00=0x00eb, f01=0x0190, f02=»F(E) PRB101 , P CF A5,OUTPUT SEND CHAR - PPRB101 EQU * - 4 P LDK A2,ETB - H & P CF A5,OUTPUT SEND END OF MESSAGE - P LDK A2,ETX - 6 P CF A5,OUTPUT WAIT FOR WHOLE BUFFER TO BE PRINTED - * P LDKL A1,MESS INDICATE MESSAGE PRINTED - P ORS A
0x2e4ee0…2e5074 (5, 391) Opaque[0x194]
0x2e5074…2e5208 # DirEnt {nam=»MONTIM«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1d70, f03=0x0000}
0x2e5074…2e5208 IdxSect {
0x2e5074…2e5208 f00 = 0x00eb // 0x2e5074 @0x0
0x2e5074…2e5208 f01 = 0x0006 // 0x2e5076 @0x2
0x2e5074…2e5208 gno = [ // 0x2e5078 @0x4
0x2e5074…2e5208 [0x00]: C0x00eb.0x2.0
0x2e5074…2e5208 [0x01]: C0x00eb.0x3.0
0x2e5074…2e5208 [0x02]: C0x00ec.0x0.0
0x2e5074…2e5208 ]
0x2e5074…2e5208 }
0x2e5208…2e539c Dummy {f00=0x00eb, f01=0x0190, f02=» 2 P IDENT MONTIM REL 10.0 80-03-14 870105041000 P : P* B P* L < P******************************************************* V P* $ P* PHILIPS TERMINAL SYSTEM PTS P* * P* MONTIM = MONITOR CLOCK PROCESSORS P*
0x2e539c…2e5530 Dummy {f00=0x00eb, 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
0x2e5530…2e56c4 Dummy {f00=0x00eb, f01=0x0190, f02=»TOR CLOCK r P EJECT MONTIM 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
0x2e56c4…2e5858 Dummy {f00=0x00eb, 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 0 P* P EJECT MONTIM P* P* P* G E T T I
0x2e5858…2e59ec Dummy {f00=0x00eb, 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 LDR* A6,A
0x2e59ec…2e5b80 Dummy {f00=0x00eb, f01=0x0190, f02=» A7,2 P LDR* A6,A7 HOURS P ENB ( P* 4 * PGETT10 CF A15,BYTASC CONVERT TO ASCII > P IFT MMUPAG=0 l * P SC A6,1,A8 STORE RIGHTHAND CHARACTER P ECR A6,A6 ( P SCR A6,A8 STORE LEFTHAND CHARACTER P XIF P* P EJE
0x2e5b80…2e5d14 (5, 392) Dummy {f00=0x00eb, f01=0x0190, f02=» GETT15 TCB ADDRESS EVEN P LDR A1,A6 P EL A4,1,A8 2 P ANK A4,/FF F P SLL A1,8 Z P ORR A1,A4 l 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 SET VALUE IN TI
0x2e5d14…2e5ea8 Dummy {f00=0x00eb, f01=0x0190, f02=»ROM STACK r P RB GETT10 P* $ P EJECT MONTIM . P* F P* P PGETT20 SUK A7,2 Z . P LDR* A6,A7 GET ACCUMULATED 24 HOUR CARRY r 2 P ST A6,TTB:SA+14,A5 STORE IN TTAB SAVE AREA A7 P CMR A7 CLEAR MIDNIGTH CARRY P* P
0x2e5ea8…2e603c Dummy {f00=0x00eb, f01=0x0190, f02=»E LKM PROCESSOR. x P* 0 P* IT IS ENTERED FROM THE LKM HANDLER WITH " 0 P* ADDRESS TO THE USER TIMER CONTROL BLOCK V 0 P* IN A8. VALUE IN TIMER CONTROL BLOCK IS $ P* COPIED INTO MONITOR CLOCK. P* P* PSETTIM EQU *
0x2e603c…2e61d0 Dummy {f00=0x00eb, f01=0x0190, f02=» MMUPAG=0 & P LCR A6,A8 GET LEFTHAND CHARACTER P ECR A6,A6 < ( P LC A6,1,A8 GET RIGHTHAND CHARACTER N P XIF z P* P IFT MMUPAG=1 2 P ELR A6,A8 GET VALUE FROM TIMER CONTROL BLOCK . P LDR A4,A8 GET TIMER CONTROL BLOCK ADDRESS
0x2e61d0…2e6364 Dummy {f00=0x00eb, f01=0x018e, f02=»RL A4,8 P ORR A6,A4 P* " PSETT15 EQU * , P XIF @ P* L P EJECT MONTIM V P* n P* x $ 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 SAVE ON STACK (HOURS
0x2e6364…2e64f8 Dummy {f00=0x00eb, f01=0x0190, f02=» P LDR* A6,A15 ( P STR A6,A7 MINUTES TO MONITOR CLOCK P SUK A7,2 H P LDR* A6,A15 Z & P STR A6,A7 HOURS TO MONITOR CLOCK n P SUK A7,2 P CMR A7 RESET MIDNIGTH CARRY P RB TPDIS P* P EJECT MONTIM P*
0x2e64f8…2e668c Dummy {f00=0x00eb, f01=0x0190, f02=»A6. x P* P* PBYTASC EQU * P LDK A4,0 4 P* F PBYTA10 SUK A6,/A P P RF(N) BYTA20 h P ADKL A4,/100 ~ P RB BYTA10 P* PBYTA20 ADK A6,/A P ADR A6,A4 P ORKL A6,/3030 P RTN A15 P*
0x2e668c…2e6820 Dummy {f00=0x00eb, f01=0x414a, f02=» l P* RESULT IN A6. P* , P* 6 PASCTBY EQU * @ P LDR A4,A6 T P ANK A6,/F f P SRL A4,8 x P ANK A4,/F P RF(E) ASCT20 P* PASCT10 ADK A6,/A P SUK A4,1 P RB(NE) ASCT10 P* PAS
0x2e6820…2e69b4 (5, 393) Dummy {f00=0x00ec, 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
0x2e69b4…2e6b48 Dummy {f00=0x00ec, f01=0x0190, f02=»BER OF CHARACTERS GIVEN IN > r ( P* FIRST CHARACTER IN OUTPUT BUFFER ? " P* ? N P* ? X 4 PBUFCHR LCR A4,A3 GET NUMBER OF OUTPUT CHARACTERS ? b P ANK A4,/FF MASK ? , PBUFC10 ADK A3,1 INCREMENT BUFFER POINTER ? $ P LCR A2,A3 GET OUTPUT CHARACTER ?
0x2e6b48…2e6cdc Dummy {f00=0x00ec, f01=0x406c, f02=» RTN A5 RETURN TO CALLER ? P* @ P* @ * P* @ 4 P* @ > P* @ H P* @ R P END @ @ @ h A4,A3 GET NUMBER OF OUTPUT CHARACTERS ? b P ANK A4,/FF MASK ? , PBUFC10 ADK A3,1 INCREMENT BUFFER POINTER ? $ P LCR A2,A3 GET OUTPUT CHARACTER ?
0x2e6cdc…2e6e70 Dummy {f00=0x00ec, 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
0x2e6e70…2e7004 Dummy {f00=0x00ec, f01=0x018e, f02=»T A2,DWTSAV,A6 INDICATE READY ! P RTN A5 " & P EJECT DRMD01 DRMD01 " 6 P* " V P********************** " ` P* * " ~ P* RECOVERY ROUTINE * " P* * " P********************** " P* " PMDON EQU
0x2e7004…2e7198 Dummy {f00=0x00ec, f01=0x0190, f02=» P LDKL A6,DWMD01 # $ P CM DWTST,A6 SET DISC UNIT BUSY # P LD A1,INIFLG POWER UP? # D P RF(NZ) MDON25 # d P* # z ( P LDKL A4,TIMER TIMER POINTER ADDRESS # P LDR* A3,A4 # " P RF(Z) MDON10 NO TIMER ACTIVE # P LDKL A1,-TIME # P STR A1,
0x2e7198…2e732c Dummy {f00=0x00ec, f01=0x0190, f02=» P RB T:DISP $ P* $ P* TIME OUT $ P* $ 4 PMDON20 LDKL A6,DWMD01 $ > P CM TIMER $ P* $ n P EJECT DRMD01 $ x P* $ P* $ PMDON25 EQU * $ P LDKL A5,DWTSB2 STACK BASE $ P ADR A5,A6 $ P LDK A1,0 UNIT 0 $ PMDON
0x2e732c…2e74c0 Dummy {f00=0x00ec, f01=0x0190, f02=» P RB(NG) MDON30 % , P IM DWTST,A6 INDICATE VOLUME NAMES READ % $ P LD A8,DWTECB,A6 GET ECB ADDRESS % J P RB(Z) END:15 NOREQUEST ON % r P* % P LD A7,DWTORD,A6 GET ORDER % , P ST A7,DWTOR,A6 RESTORE INDEX AND ORDER % P ANK A7,/3F % P ABL
0x2e74c0…2e7654 (5, 394) Opaque[0x194]
0x2e7654…2e77e8 # DirEnt {nam=»MPYMOD«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1d88, f03=0x0000}
0x2e7654…2e77e8 IdxSect {
0x2e7654…2e77e8 f00 = 0x00ec // 0x2e7654 @0x0
0x2e7654…2e77e8 f01 = 0x0004 // 0x2e7656 @0x2
0x2e7654…2e77e8 gno = [ // 0x2e7658 @0x4
0x2e7654…2e77e8 [0x00]: C0x00ec.0x1.0
0x2e7654…2e77e8 [0x01]: C0x00ec.0x2.0
0x2e7654…2e77e8 ]
0x2e7654…2e77e8 }
0x2e77e8…2e797c Dummy {f00=0x00ec, f01=0x0190, f02=» 2 P IDENT MPYMOD REL 10.0 80-03-14 870105041000 P : P* B 8 P**************************************************** L P* $ P* PHILIPS TERMINAL SYSTEM PTS P* P* TOSS DATA MANAGEMENT P* P* P* 8 P******
0x2e797c…2e7b10 Dummy {f00=0x00ec, f01=0x0190, f02=»LLING SEQUENCE: ( P* LD A6,ARG1 ( P* LD A7,ARG1 D P* CF A14,MPYMOD p ( P* RETURN : RESULT IN A1,A2 0 P* REGISTERS A3,A4,A6,A7, ARE CRUSHED P ENTRY MP
0x2e7b10…2e7ca4 Dummy {f00=0x00ec, f01=0x0190, f02=»************************************* P* . 6 P* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION 8 . P* SET IS OBTAINED BY SETTING CPU852 EQU 0. r P* PCPU852 EQU 1 P* P EJECT PMPYMOD EQU * P IFF CPU852=1 P LDK
0x2e7ca4…2e7e38 Dummy {f00=0x00ec, f01=0x0190, f02=» ERROR EXIT Z P CWR A3,A6 P RF(4) SUITE 4 P CWR A3,A7 T P RF(0) END3 t < P LDR A6,A7 * A6= X'8000' A7# X'8000' 4 P LDR A7,A3 * EXCHANGE A6-A7 .
0x2e7e38…2e7fcc Dummy {f00=0x00ec, f01=0x0190, f02=» x P ADK A6,0 P RF(0) END0 & P RF(6) ARG1PS D 0 P ADK A3,1 *ARG1 NEGATIVE d P C1R A6,A6 P ADK A6,1 PARG1PS ADK A7,0 P RF(0) EN
0x2e7fcc…2e8160 Dummy {f00=0x00ec, f01=0x0190, f02=»DK A7,1 P RF(3) CASSPE PARG2PS SRC A7,1 4 P RF(6) NOVER1 R P ADR A1,A6 r PNOVER1 SRA A2,1 P SRC A1,1 P RF(6) NOVER2 P ORK.L A2,/4000
0x2e8160…2e82f4 (5, 395) Dummy {f00=0x00ec, f01=0x0190, f02=»ND* RESTORE SI=N p P RF(0) END1 P C1R A1,A1 6 P C1R A2,A2 V P ADK A2,1 v D P*CAUTION THE NEXT INSTRUCTION IS ABSOLUTELY NECESSARY TO SET CR < P* WHEN THE ADK A2,1 SET AN OVERFLOW CR EX (
0x2e82f4…2e8488 Dummy {f00=0x00ec, f01=0x0190, f02=»FF x P RF(7) END2 P XIF ( P IFF CPU852=1 4 P RF(0) END0 J P RF(1) END1 ^ P RF(2) END2 r P XIF PEND3 ADK A3,/81 PEND2 ADK A3,/81 PEND1 ADK A3,/81 PEND0 SLL A3,1
0x2e8488…2e861c Dummy {f00=0x00ec, f01=0x4114, f02=» UPDATE CR IN PSW CALLING PROGRAM v P RTN A14 , P IFT CPU852=1 J : PCASSPE LDR A1,A6 *A7=X'8000' THEN A4= 1 ` . P* *AND A1= A6 P RB(7) NOVER3 P XIF P END
0x2e861c…2e87b0 Dummy {f00=0x00ec, 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 @
0x2e87b0…2e8944 Dummy {f00=0x00ec, f01=0x0190, f02=»ADDRESS AND GO TO y h < P* DEVICE WITH THE NEW STATUS. IF NO z > P* WAITING FOR STATUS, CONTROL IS GIVEN z Z ( P* TO DISPATCHER. z P* z P* z PCLT100 EQU * z P LDR A3,A2 z P SRL A
0x2e8944…2e8ad8 Dummy {f00=0x00ec, f01=0x0190, f02=»PUT ? z ~ P RF(E) CLT150 YES { P LOOP SWITCH SET { ( 0 P LD* A8,CWTITA,A5 ADDRESS TO INTERRUPT TABLE { B P RB(Z) EXIT =7 { v P ADR A8,A3 { , P LDR* A8,A8 ADDRESS TO TERMINAL SECTION { P RB(Z) EXIT NOT DEFINED { P LDR* A6,A8 GET ID-WORD
0x2e8ad8…2e8c6c Dummy {f00=0x00ec, f01=0x0190, f02=» ADR A8,A4 ADDRESS TO DWT-ADDRESS { P LDR* A6,A8 GET DWT-ADDRESS | * P RB(E) EXIT | N P ANKL A6,/FFFE | b 2 P LCR A3,A6 GET FIRST BYTE IN CHANNEL PARAMETER | x P ANK A3,1 DATA INPUT ? | P RF(NE) CLT110 YES | & P LDR* A4,A6 GET CHANNEL PARAMETER
0x2e8c6c…2e8e00 Dummy {f00=0x00ec, f01=0x018e, f02=» A3,DUMMSP | P RF(NE) CLT110 } & P LDR* A3,A6 CHANNEL PARAMETER =10 } ( 2 P RF(N) CLT110 DEVICE WITHOUT DATA REQUEST =10 } R P* } P************************* } P* } PCLT107 EQU * } P INH } & P LD A7,DWTTP,A6 GET TIMER POINTER } & P
0x2e8e00…2e8f94 (5, 396) Opaque[0x194]
0x2e8f94…2e9128 # DirEnt {nam=»MSUBS «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1d98, f03=0x0000}
0x2e8f94…2e9128 IdxSect {
0x2e8f94…2e9128 f00 = 0x00ec // 0x2e8f94 @0x0
0x2e8f94…2e9128 f01 = 0x000e // 0x2e8f96 @0x2
0x2e8f94…2e9128 gno = [ // 0x2e8f98 @0x4
0x2e8f94…2e9128 [0x00]: C0x00ec.0x3.0
0x2e8f94…2e9128 [0x01]: C0x00ed.0x0.0
0x2e8f94…2e9128 [0x02]: C0x00ed.0x1.0
0x2e8f94…2e9128 [0x03]: C0x00ed.0x2.0
0x2e8f94…2e9128 [0x04]: C0x00ed.0x3.0
0x2e8f94…2e9128 [0x05]: C0x00ee.0x0.0
0x2e8f94…2e9128 [0x06]: C0x00ee.0x1.0
0x2e8f94…2e9128 ]
0x2e8f94…2e9128 }
0x2e9128…2e92bc Dummy {f00=0x00ec, f01=0x0190, f02=» 0 P IDENT MSUBS REL 10.0 80-03-14 870105041000 P 8 P* @ P* J 6 P************************************************** T P* $ P* PHILIPS TERMINAL SYSTEM PTS P* $ P* MSUBS = MONITOR SUBROUTINES P* P* P*
0x2e92bc…2e9450 Dummy {f00=0x00ec, 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*
0x2e9450…2e95e4 Dummy {f00=0x00ec, f01=0x0190, 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
0x2e95e4…2e9778 Dummy {f00=0x00ec, f01=0x0190, f02=»******* P* P* " P ENTRY SAVE8 SAVE 8 REGISTERS $ P ENTRY QTJOB QUEUE TASK J " P ENTRY QMJOB QUEUE MONITOR JOB j & P ENTRY ACTOT ACTIVATE TASK (FIFO) & P ENTRY ACTOTP ACTIVATE TASK (LIFO) P ENTRY EXIT PROGRAM EXIT P ENT
0x2e9778…2e990c Dummy {f00=0x00ec, f01=0x0190, f02=»D FIND TASK INDENTIFICATION P ENTRY PFINIT RESTART DEVICE $ $ P ENTRY SWL48 SWITCH TO LEVEL 48 H $ P ENTRY SWLXY SWITCH TO LEVEL XY p , P ENTRY ILLINT ILLEGAL INTERRUPT ROUTINE * P ENTRY INTSAV SAVE AREA LAST INTERRUPT P ENTRY HALT HALT M
0x2e990c…2e9aa0 Dummy {f00=0x00ec, f01=0x0190, f02=»RY IHRET2 A2 " P ENTRY IHRET1 A1 2 P ENTRY IHRTN RETURN WITHOUT ENABLE INTERRUPTS : P EJECT MSUBS p P* P* P************* P* EXTERNALS * P************* P* P* : P EXTRN DISQUE POINTER TO
0x2e9aa0…2e9c34 (5, 397) Dummy {f00=0x00ed, f01=0x0190, f02=»RN PQEMTY PAGE QUEUE EMPTY FLAG " P EXTRN PAGQUE FREE PAGE QUEUE ( $ P EXTRN SEG:PB PAGE BLOCK ADDRESS N & P EXTRN PAG:QB QUEUE LINK BACKWARD v 4 P EXTRN LKMERR HALT SYSTEM DUE TO FATAL LKM ERROR & P EXTRN TTMJOB TTAB ADDRESS OF MJOB ( P EXTRN
0x2e9c34…2e9dc8 Dummy {f00=0x00ed, f01=0x0190, f02=»RN TTB:SA SAVE AREA * P EXTRN TTB:PP POINTER TO PENDING QUEUE ( P EXTRN TTB:TD TERMINAL DEVICE TABLE J $ P EXTRN SCTTCT TASK CONTROL TABLE v & P EXTRN SCTCDT COMMON DEVICE TABLE 2 P EXTRN PFTAB TABLE OF DEVICES TO BE RESTARTED P EJECT M
0x2e9dc8…2e9f5c Dummy {f00=0x00ed, 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 0 P* P* 6 P* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION . P* SE
0x2e9f5c…2ea0f0 Dummy {f00=0x00ed, f01=0x0190, f02=»NG h * &* IS OBTAINED BY SETTING DSKPAG EQU 1. * 8 PDSKPAG EQU 0 B * V P* ` " PSOP EQU /2E SOP DEVICE ADDRESS j P* P EJECT MSUBS P* P* P* S A V E 8 P* 0 P* SUBROUTINE TO SAVE 8 REGISTERS O
0x2ea0f0…2ea284 Dummy {f00=0x00ed, f01=0x0190, f02=»A15 P STR A4,A15 P STR A5,A15 P STR A6,A15 4 P STR A7,A15 H P STR A8,A15 , P LD A3,16,A15 LOAD P.C. (RETURN ADDRESS) p , P ST A3,SAVE81 AND MODIFY BRANCH ADDRESS P ST A2,14,A15 P ST A1,16,A15 P LD A3,12,A1
0x2ea284…2ea418 Dummy {f00=0x00ed, f01=0x0190, f02=»* Q T J O B P* 2 P* SUBROUTINE TO QUEUE TASK FOR DISPATCHING. P* V P* ENTRY PARAMETER: ` P* | 2 P* A5 = TTAB ADDRESS OF PROGRAM TO BE QUEUED. P* 8 P* THE REQUESTED JOB IS PUT IN DISPATCHER QUEUE ON 8 P* PR
0x2ea418…2ea5ac Dummy {f00=0x00ed, f01=0x0190, f02=»* P IFT CPU852=1 $ P STR A1,A15 SAVE A1-A3 ON STACK P STR A2,A15 H P STR A3,A15 P XIF p P* | P IFT CPU852=0 " P MSR 3,A15 SAVE A1-A3 ON STACK P XIF P* . P LDKL A1,DISQUE LOAD QUEUE ANCHOR ADDRESS 2
0x2ea5ac…2ea740 Dummy {f00=0x00ed, f01=0x018e, f02=»* P EJECT MSUBS P* P* * 6 PQTJ010 CC A3,TTB:ST+1,A2 COMPARE WITH QUEUED LEVEL 4 P RF(L) QTJ020 INSERT n P LDR A1,A2 SAVE ADDRESS . P LDR* A2,A1 GET NEXT TTAB ADDRESS IN QUEUE $ P RB(NZ) QTJ010 NOT END OF QUEUE P*
0x2ea740…2ea8d4 (5, 398) Dummy {f00=0x00ed, f01=0x0190, f02=» P IFT CPU852=0 * P MLR 3,A15 RESTORE A1-A3 FROM STACK... P RTN A15 ...AND RETURN L P XIF j P* v P EJECT MSUBS P* P* P* Q M J O B P* 6 P* SUBROUTINE TO QUEUE MONITOR JOBS ON LEVEL 49. P*
0x2ea8d4…2eaa68 Dummy {f00=0x00ed, f01=0x0190, f02=»B ADDRESS OF MONITOR JOBS AND THE | < P* SUBROUTINE 'ACTOT' IS USED TO ACTIVATE AND QUEUE THE * P* JOB. j P* z P* PQMJOB EQU * P IFT CPU852=1 & P CF A15,SAVE8 SAVE A1-A8 ON STACK P XIF P* P IFT CPU852=0
0x2eaa68…2eabfc Dummy {f00=0x00ed, f01=0x0190, f02=»* P EJECT MSUBS P* P* * P* A C T O T , A C T O T P 4 P* X & P* SUBROUTINE TO ACTIVATE A TASK. b P* P* ENTRY PARAMETERS: P* P* A1 = PARAMETER 1 P* A2 = DISPATCH ADDRESS P* A3 = SEG
0x2eabfc…2ead90 Dummy {f00=0x00ed, f01=0x0190, f02=»GRAM IS ` : P* PUT IN DISPATCHER QUEUE VIA SUBROUTINE 'QTJOB'. @ P* - IF PROGRAM IS ACTIVE, THE REQUEST IS PUT IN A PENDING N P* QUEUE. @ P* - ACTOT WILL PUT REQUEST IN PENDING QUEUE ON FIFO BASIS. B P* - ACTOTP WILL PUT REQUEST
0x2ead90…2eaf24 Dummy {f00=0x00ed, f01=0x0190, f02=» n P XIF P* P IFT CPU852=0 P INH 4 " P MSR 8,A15 SAVE A1-A8 ON STACK @ P XIF f P* r P LDK A6,1 INDICATE LIFO | P RF ACT03 P* P EJECT MSUBS P* P* PACTOT EQU * P IFT CPU852=1
0x2eaf24…2eb0b8 Dummy {f00=0x00ed, f01=0x0190, f02=» P XIF P* PACT01 LDK A6,0 INDICATE FIFO P* > PACT03 EQU * H 0 P LD A7,TTB:SA,A5 GET (OLD) DISPATCH ADDRESS $ P RF(NZ) ACT020 IS PROGRAM ACTIVE " P ST A1,TTB:SA+2,A5 PARAMETER 1 0 P ST A2,TTB:SA,A5 SAVE (NEW) DISPATCH ADDRE
0x2eb0b8…2eb24c Dummy {f00=0x00ed, f01=0x0190, f02=»,TTB:SA+4,A5 TO A2 IN SAVE AREA P* ( P IFF MMUPAG+DSKPAG=0 2 6 P CM TTB:SB,A5 INDICATE NOT RUNNING IN ANY SEGMENT N P XIF P* P CF A15,QTJOB QUEUE THE JOB P* P EJECT MSUBS P* P* PACT010 EQU *
0x2eb24c…2eb3e0 Dummy {f00=0x00ed, f01=0x0190, f02=» FROM STACK... x P RTN A15 ...AND RETURN P XIF 4 P* @ $ P* PUT REQUEST IN PENDING QUEUE J P* r & PACT020 LDR A7,A4 SAVE PARAMETER 2 | $ P CF A15,GETBLK GET A FREE BLOCK P LDR A1,A7 PARAMETER 2 P LDR A2,A4 P CF A15,GE
0x2eb3e0…2eb574 (5, 399) Dummy {f00=0x00ed, f01=0x018e, f02=»0 SET CR & P RF(NZ) ACT040 QUEUE ON LIFO BASIS P ADK A5,0 SET CR : $ P RB(NZ) ACT030 NOT END OF QUEUE R P* z PACT040 EQU * " P STR A4,A3 SET BLOCK IN QUEUE P STR A5,A4 P RB ACT010 P* P EJECT MSUBS P*
0x2eb574…2eb708 Dummy {f00=0x00ed, f01=0x0190, f02=» P* ENTRY PARAMETER: P* $ P* A5 = TTAB ADDRESS . P* L P* A3-A4, A7 ARE DESTROYED V P* z P* PEXIT EQU * ( P CM TTB:SA,A5 RESET PROGRAM COUNTER 0 P LD A4,TTB:PP,A5 GET PENDING PROGRAM POINTER $ P RF(Z) I
0x2eb708…2eb89c Dummy {f00=0x00ed, f01=0x0190, f02=»ELEASE BLOCK AND GET PARAMETERS P LDR A7,A1 SAVE PARAMETER 2 ( P LDR A4,A2 L P CF A15,FREBLK ^ P LDR A4,A7 PARAMETER 2 t P RB ACTOT ACTIVATE TASK P* P EJECT MSUBS P* P* P* G E T B L K P* 4 P
0x2eb89c…2eba30 Dummy {f00=0x00ed, f01=0x0190, f02=» P* P* EXIT PARAMETER: P* * ( P* A4 = ADDRESS TO FOUND FREE BLOCK 4 P* ` P* j PGETBLK EQU * t P INH P STR A5,A15 SAVE A5 0 P LD A4,FREQUE GET FIRST BLOCK IN FREE QUEUE P RF(NZ) GBL010 P LDK A1,/B HAL
0x2eba30…2ebbc4 Dummy {f00=0x00ed, f01=0x0190, f02=»FREE QUEUE p $ P STR A3,A4 STORE A3-A1 IN BLOCK P ST A2,2,A4 : P ST A1,4,A4 N P LDR* A5,A15 RESTORE A5 b P* P IFT CPU852=1 P RF IHRTN P XIF P* P IFT CPU852=0 P RTN A15 P XIF P* P E
0x2ebbc4…2ebd58 Dummy {f00=0x00ed, f01=0x018e, f02=»* AND SET THIS BLOCK FREE. P* $ P* ENTRY PARAMETER: . P* J P* A4 = BLOCK ADDRESS T P* r P* EXIT PARAMETERS: | P* & P* A3 = FIRST PARAMETER IN BLOCK $ P* A2 = SECOND " " $ P* A1 = THIRD "
0x2ebd58…2ebeec Dummy {f00=0x00ed, f01=0x0190, f02=» P ST A4,FREQUE SET BLOCK FREE P LD A2,2,A4 , P LD A1,4,A4 @ P* T P IFT CPU852=1 ^ P RF IHRTN t P XIF P* P IFT CPU852=0 P RTN A15 P XIF P* P EJECT MSUBS P* P* P* F
0x2ebeec…2ec080 Dummy {f00=0x00ed, f01=0x0190, f02=»S | 8 P* A7 = ORDER CODE WHEN CALLED FROM DATA MANAGEMENT P* A8 = ECB ADDRESS F P* b P* EXIT PARAMETERS: l P* P* A2 = DWT INDEX * P* A6 = DWT ADDRESS IF FOUND, ELSE 0 P* P* P* F N D D W D P*
0x2ec080…2ec214 (5, 400) Dummy {f00=0x00ed, f01=0x0190, f02=»JECT MSUBS P* P* PFNDDWT EQU * ( P IFT MMUPAG=1 < & P ELR A2,A8 LOAD FILE CODE FROM ECB R P XIF | P* P IFT MMUPAG=0 ( P LDR* A2,A8 LOAD FILE CODE FROM ECB P XIF P* P STR A1,A15 SAVE A1 P L
0x2ec214…2ec3a8 Dummy {f00=0x00ed, f01=0x0190, f02=»UK A1,4 ( P RF(N) FND110 FILE CODE NOT IN TTAB & P CC A2,1,A6 SEARCH IN DEVICE TABLE < " P RF(E) FND200 FILE CODE FOUND f ( P ADK A6,4 ADDRESS TO NEXT FILE CODE P RB FND100 TRY NEXT P* P EJECT MSUBS P* $ P* SEARCH I
0x2ec3a8…2ec53c Dummy {f00=0x00ed, f01=0x0190, f02=» P LDR* A1,A6 CDTAB LENGTH $ P ADK A6,2 POINTER TO FIRST ENTRY $ P* L PFND120 SUK A1,4 V & P RF(N) FND130 FILE CODE NOT FOUND n P CC A2,1,A6 " P RF(E) FND200 FILE CODE FOUND ( P ADK A6,4 ADDRESS TO NEXT FILE CODE & P RB FND120
0x2ec53c…2ec6d0 Dummy {f00=0x00ed, f01=0x0190, f02=»DEX z P LD A6,2,A6 LOAD DWT ADDRESS ! P RF IHRET1 ! 0 P* ! B P EJECT MSUBS ! L P* ! b P* ! l P* F N D T I D ! v P* ! B P* SUBROUTINE TO FIND TTAB ADDRESS FROM TASK IDENTIFICATION. ! P* ! P* ENTRY PARAMETER: ! P* !
0x2ec6d0…2ec864 Dummy {f00=0x00ed, f01=0x0190, f02=»ATES ILLEGAL IDENTIFICATION ! P* " $ P* " . PFNDTID STR A1,A15 SAVE A1 " 8 P LD* A1,SCTTCT TCTAB LENGTH " Z P AD A1,SCTTCT " ~ P* " PFTI010 SUK A1,2 " P CW A1,SCTTCT " $ P RF(E) FTI030 ALL TTABS EXAMINED " P LDR* A2,A1 TTAB ADD
0x2ec864…2ec9f8 Dummy {f00=0x00ed, f01=0x0190, f02=»0 ILLEGAL IDENTIFICATION " P RF IHRET1 # P* # 2 P EJECT MSUBS # < P* # R P* # , P* RESTORE REGISTERS AND RETURN WITHOUT # f P* ENABLE INTERRUPTS. # P* # P* # P IFT CPU852=1 # PIHRET8 LDR* A8,A15 # P LDR* A7,A15 #
0x2ec9f8…2ecb8c Dummy {f00=0x00ed, f01=0x0190, f02=»* # PIHRET1 LDR* A1,A15 $ P* $ $ PIHRTN INH $ . $ P ADKL A15,4 ADJUST STACK POINTER $ @ P ABR* A15 AND RETURN $ h P XIF $ P* $ P IFT CPU852=0 $ 0 PIHRET8 MLR 8,A15 RESTORE A1-A8 FROM STACK... $ P RTN A15 ...AND RETURN $ P* $
0x2ecb8c…2ecd20 Dummy {f00=0x00ed, f01=0x0190, f02=»... $ h P* % PIHRTN RTN A15 ...AND RETURN % P XIF % : P* % F P EJECT MSUBS % P P* % f P* % p P* P F I N I T % z P* % & P* SUBROUTINE TO RESTART DEVICES. % P* % @ P* ALL RESTART ROUTINES GIVEN IN TABLE 'PFTAB' ARE CALL
0x2ecd20…2eceb4 (5, 401) Dummy {f00=0x00ee, f01=0x0190, f02=»DEX TO FIRST ROUTINE % P* & $ PPFI100 CW A1,PFTAB CHECK IF LAST & & P RF(NL) PFI110 ALL RESTARTED & N P STR A1,A15 SAVE A1 & r P INH & * P CFI A15,PFTAB,A1 CALL RESTART MODULE & P LDR* A1,A15 RESTORE A1 & P ADK A1,2 NEXT DEVICE & P R
0x2eceb4…2ed048 Dummy {f00=0x00ee, f01=0x0190, f02=»8 & P* ' & P* SWITCH TO LEVEL 48 AND ENABLE. ' P* ' > P* ' H PSWL48 EQU * ' R P STR A1,A15 SAVE A1 ' f P* ' PSWL481 EQU * ' $ P LDKL A1,/C0C0 PSW FOR LEVEL 48 ' P* ' PSWL482 EQU * ' & P ST A1,4,A15 SAVE IT ON A15 STACK
0x2ed048…2ed1dc Dummy {f00=0x00ee, f01=0x018e, f02=» & P* SWITCH TO LEVEL XY AND ENABLE. ( P* ( . . P* LEVEL := 48 IF LEVEL ON STACK IS >= 48 ( 8 0 P* LEVEL := XY " " " " " XY < 48 ( j P* ( > P* THIS MODULE IS TO BE CALLED WITH 8 REGISTERS ON STACK. ( P* ( P* ( PSWLXY EQU
0x2ed1dc…2ed370 Dummy {f00=0x00ee, f01=0x0190, f02=» ( P LD A1,24,A15 ) " P ANKL A1,/FFFE SYSTEM MODE BIT ) P RB SWL482 ) D P* ) V P EJECT MSUBS ) ` P* ) v P* ) & P* INTERRUPT SAVE AND HALT MODULE ) P* ) P* ) PINTSAV DATA 0 ) PSAVA15 DATA 0 ) P* ) " PILLINT LDK
0x2ed370…2ed504 Dummy {f00=0x00ee, f01=0x0190, f02=» $ P STR A9,A15 SAVE A9-A14 ON STACK * P STR A10,A15 * , P STR A11,A15 * @ P STR A12,A15 * T P STR A13,A15 * h P STR A14,A15 * | P XIF * P* * P IFT CPU852=0 * $ P MSR 14,A15 SAVE A1-A14 ON STACK * P XIF * P* * P ST A15,SAVA15
0x2ed504…2ed698 Dummy {f00=0x00ee, f01=0x0190, f02=» P* + < P* RELEASE PAGE AND RESTART LDTASK IF PAGQUE WAS EMPTY + P* + N P* ENTRY PARAMETERS: + X P* + v 6 P* A3 = SEGBLK ADDRESS (PAGBLK ADDRESS IF RELPA2) + " P* A5 = TTAB ADDRESS (RELPA2) + P* + P* EXIT PARAMETER: + P*
0x2ed698…2ed82c Dummy {f00=0x00ee, f01=0x0190, f02=»ANY SEGMENT + j P RF REL:10 , P* , & ( PRELPAG EQU * RELEASE PAGE MAIN ENTRY , 0 , P LD A3,SEG:PB,A3 GET PAGE BLOCK ADDRESS , P* , PREL:10 EQU * , & P LDKL A4,PAGQUE GET PAGQUE ADDRESS , P ST A4,PAG:QB,A3 , 4 P LDR* A4,A4 GET ADDRESS OF F
0x2ed82c…2ed9c0 Dummy {f00=0x00ee, f01=0x0190, f02=»DTASK IS IN PAUSE STATE , x P RF(Z) REL:20 - P* - 6 P EJECT MSUBS - @ P* - V P* RESTART LOAD TASK - ` P* - ~ , P CM PQEMTY INDICATE PAGE QUEUE NOT EMPTY - P LDR A4,A5 SAVE A5 - , P LDKL A5,TTABLD GET LDTASK TTAB ADDRESS - $ P CF A1
0x2ed9c0…2edb54 (5, 402) Dummy {f00=0x00ee, f01=0x412a, f02=»IF - P* . P IFT DSKPAG=1 . P IFT CPU852=0 . * P RTN A15 . @ P XIF . P P* . P IFT DSKPAG=0 . f 2 PRELPAG EQU * DUMMY ENTRIES TO AVOID ASS. ERR. . | PRELPA2 EQU * . & P ABL LKMERR INDICATE SYSGEN ERROR . P XIF . P* . P*
0x2edb54…2edce8 Dummy {f00=0x00ee, 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. "
0x2edce8…2ede7c Dummy {f00=0x00ee, f01=0x0190, f02=» 2 P IDENT DSKSUB PRR 10.0 79-12-07 870105041000 P : P* B , P**************************************** L P* | , P* PHILIPS TERMINAL SYSTEM PTS * P* , P* DSKSUB = DISC SUBROUTINES * P* P* P*
0x2ede7c…2ee010 Dummy {f00=0x00ee, f01=0x0190, f02=»FILE MANAGEMENT SUBROUTINES: P* $ 4 P* - VOLCLR = CLEAR VOLUME NAME(S) IN DISC DWT . < P* - VOLNAM = MOVE VOLUME NAME FROM DWT TO USER BUFFER f 6 P* - VOLADR = COMPUTE VOLUME NAME ADDRESS IN DWT > P* - NVLCHK = CHECK IF NEW VOLUME LOADE
0x2ee010…2ee1a4 Dummy {f00=0x00ee, f01=0x0190, f02=» 6 P* - INXDWT = COMPUTE DWT ADDRESS + DOUBLE INDEX 8 P* - NVLTAB = TTAB ADDRESSES FOR TASKS TO HAVE NVL > P* z P* P EJECT DSKSUB P* P* P*********** P* ENTRIES * P*********** P* P* , P
0x2ee1a4…2ee338 Dummy {f00=0x00ee, f01=0x0190, f02=»ME NAME ADDRESS IN DWT v . P ENTRY NVLCHK CHECK FOR NEW VOLUME LOADED : P ENTRY VOLGET MOVE VOLUME NAME FROM DISC BUFFER TO DWT P , P ENTRY NEWVOL SET NEW VOLUME LOADED BITS 4 P ENTRY INXDWT COMPUTE DWT ADDRESS + DOUBLE INDEX 6 P ENTRY NVLTAB TTAB
0x2ee338…2ee4cc Dummy {f00=0x00ee, f01=0x0190, f02=»T MASK | P EJECT DSKSUB P* $ P* . P************* 8 P* EXTERNALS * N P************* d P* z P* 4 P EXTRN IHRTN RETURN WITHOUT ENABLING INTERRUPTS P EXTRN TTABLD LDTASK TTAB P EXTRN TTABFM FMTASK TTAB *
0x2ee4cc…2ee660 Dummy {f00=0x00ee, f01=0x0190, f02=»RN DWTTAB TTAB ADDRESS " P EXTRN DWTUEC USER ECB ADDRESS P EXTRN DWTVOL VOLUME NAME D ( P EXTRN DWTNVL NEW VOLUME LOADED FLAG f " P EXTRN EWTVOL VOLUME FILE CODE 2 P EXTRN FWTEW1 POINTER TO 2ND EWT BLOCK IN FWT $ P EXTRN FWTPAR ACCESS PARAM
0x2ee660…2ee7f4 (5, 403) Opaque[0x194]
0x2ee7f4…2ee988 # DirEnt {nam=»PFTAB «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1dd0, f03=0x0000}
0x2ee7f4…2ee988 IdxSect {
0x2ee7f4…2ee988 f00 = 0x00ee // 0x2ee7f4 @0x0
0x2ee7f4…2ee988 f01 = 0x0002 // 0x2ee7f6 @0x2
0x2ee7f4…2ee988 gno = [ // 0x2ee7f8 @0x4
0x2ee7f4…2ee988 [0x00]: C0x00ee.0x2.0
0x2ee7f4…2ee988 ]
0x2ee7f4…2ee988 }
0x2ee988…2eeb1c Dummy {f00=0x00ee, f01=0x018e, f02=» 0 P IDENT PFTAB REL 10.0 80-03-14 870105041000 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
0x2eeb1c…2eecb0 Dummy {f00=0x00ee, f01=0x0190, f02=» P EXTRN SOPR SOP. PANEL ( P EXTRN CHLTON LOCAL/REMOTE TERMINALS " ( P EXTRN C1DRON CASSETTE CHANGER NO. 1 N ( P EXTRN C2DRON 2 z ( P EXTRN C3DRON 3 P EXTRN FDON LINE PRINTER P EXTRN LPON JOS 77-050
0x2eecb0…2eee44 Dummy {f00=0x00ee, f01=0x0190, f02=»UNIT t 0 P EXTRN FMINIT FILE MANAGEMENT INITIALIZATION 0 P EXTRN DMINIT DATA MANAGEMENT INITIALIZATION @ P EXTRN SLCUON SALCUZ t P EXTRN ASCUON ASCU4Z P EXTRN CDON CDC DISC P P P P $ PPFTAB DATA PFTABE-* TABLE LENGTH
0x2eee44…2eefd8 Dummy {f00=0x00ee, f01=0x416e, f02=»ON P DATA FDON P DATA LPON FLOPPY P DATA CRON CARD-READER 6 P DATA DUON T P DATA MDON MINI FIXED DISC f P DATA MTDRON P DATA FMINIT FILE MANAGEMENT P DATA DMINIT P DATA SLCUON SALCUZ P DATA ASCUON ASCU4Z
0x2eefd8…2ef16c Dummy {f00=0x00ee, 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
0x2ef16c…2ef300 Dummy {f00=0x00ee, f01=0x2008, f02=»
0x2ef300…2ef494 (5, 404) Opaque[0x194]
0x2ef494…2ef628 # DirEnt {nam=»SCLASS«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1dd8, f03=0x0000}
0x2ef494…2ef628 IdxSect {
0x2ef494…2ef628 f00 = 0x00ee // 0x2ef494 @0x0
0x2ef494…2ef628 f01 = 0x0002 // 0x2ef496 @0x2
0x2ef494…2ef628 gno = [ // 0x2ef498 @0x4
0x2ef494…2ef628 [0x00]: C0x00ee.0x3.0
0x2ef494…2ef628 ]
0x2ef494…2ef628 }
0x2ef628…2ef7bc Dummy {f00=0x00ee, f01=0x40e8, f02=» 2 P IDENT SCLASS REL 10.0 80-03-14 870105041000 P : P* B P* L P ENTRY SCLASS V P* l P* v P* P* P* P* PSCLASS DATA TCLASE-* PTCLASE EQU * P END @
0x2ef7bc…2ef950 Dummy {f00=0x00ee, f01=0x2008, f02=» NT TCLASS * * $ * . ENTRY TCLASS 8 * N * X * b * l * v * * TCLASS DATALTCLASE-* TCLASE EQU * END @ 1 INTLT2 INTRT1
0x2ef950…2efae4 Dummy {f00=0x00ee, f01=0x2008, f02=»
0x2efae4…2efc78 Dummy {f00=0x00ee, f01=0x0190, f02=»E NAME OF SELECTED DISC r 4 P* TO THE USER BUFFER IF REQUESTED LENGTH = 6. P* X P* INPUT: A6 = DWT ADDRESS b P* A8 = ECB ADDRESS P* $ P* OUTPUT: A1-A4 ARE DESTROYED P* PVOLNAM EQU * $ P LD A1,ECBRL,A
0x2efc78…2efe0c Dummy {f00=0x00ee, f01=0x0190, f02=»T A4,ECBEL,A8 SET EFFECTIVE LENGTH P* * P IFT MMUPAG=0 4 ( P LD A2,ECBBA,A8 USER BUFFER ADDRESS J P* v P EJECT DSKSUB P* P* PVNAM10 EQU * P LDR* A3,A1 MOVE ONE WORD P STR A3,A2 ( P ADK A1,2 INCREMENT
0x2efe0c…2effa0 Dummy {f00=0x00ee, f01=0x0190, f02=» P IFT MMUPAG=1 2 P LD A2,DWTTAB,A6 TTAB ADDRESS OF CALLING TASK P TS -30,A15 SAVE RUNNING MMU T P TL TTB:MT,A2 LOAD USER MMU x & P LD A2,DWTUEC,A6 USER ECB ADDRESS ( P EL A2,ECBBA,A2 USER BUFFER ADDRESS P MVSU A4 MOVE VOLUME N
0x2effa0…2f0134 (5, 405) Opaque[0x194]
0x2f0134…2f02c8 # DirEnt {nam=»SYSLDA«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1de0, f03=0x0000}
0x2f0134…2f02c8 IdxSect {
0x2f0134…2f02c8 f00 = 0x00ef // 0x2f0134 @0x0
0x2f0134…2f02c8 f01 = 0x0056 // 0x2f0136 @0x2
0x2f0134…2f02c8 gno = [ // 0x2f0138 @0x4
0x2f0134…2f02c8 [0x00]: C0x00ef.0x0.0
0x2f0134…2f02c8 [0x01]: C0x00ef.0x1.0
0x2f0134…2f02c8 [0x02]: C0x00ef.0x2.0
0x2f0134…2f02c8 [0x03]: C0x00ef.0x3.0
0x2f0134…2f02c8 [0x04]: C0x00f0.0x0.0
0x2f0134…2f02c8 [0x05]: C0x00f0.0x1.0
0x2f0134…2f02c8 [0x06]: C0x00f0.0x2.0
0x2f0134…2f02c8 [0x07]: C0x00f0.0x3.0
0x2f0134…2f02c8 [0x08]: C0x00f1.0x0.0
0x2f0134…2f02c8 [0x09]: C0x00f1.0x1.0
0x2f0134…2f02c8 [0x0a]: C0x00f1.0x2.0
0x2f0134…2f02c8 [0x0b]: C0x00f1.0x3.0
0x2f0134…2f02c8 [0x0c]: C0x00f2.0x0.0
0x2f0134…2f02c8 [0x0d]: C0x00f2.0x1.0
0x2f0134…2f02c8 [0x0e]: C0x00f2.0x2.0
0x2f0134…2f02c8 [0x0f]: C0x00f2.0x3.0
0x2f0134…2f02c8 [0x10]: C0x00f3.0x0.0
0x2f0134…2f02c8 [0x11]: C0x00f3.0x1.0
0x2f0134…2f02c8 [0x12]: C0x00f3.0x2.0
0x2f0134…2f02c8 [0x13]: C0x00f3.0x3.0
0x2f0134…2f02c8 [0x14]: C0x00f4.0x0.0
0x2f0134…2f02c8 [0x15]: C0x00f4.0x1.0
0x2f0134…2f02c8 [0x16]: C0x00f4.0x2.0
0x2f0134…2f02c8 [0x17]: C0x00f4.0x3.0
0x2f0134…2f02c8 [0x18]: C0x00f5.0x0.0
0x2f0134…2f02c8 [0x19]: C0x00f5.0x1.0
0x2f0134…2f02c8 [0x1a]: C0x00f5.0x2.0
0x2f0134…2f02c8 [0x1b]: C0x00f5.0x3.0
0x2f0134…2f02c8 [0x1c]: C0x00f6.0x0.0
0x2f0134…2f02c8 [0x1d]: C0x00f6.0x1.0
0x2f0134…2f02c8 [0x1e]: C0x00f6.0x2.0
0x2f0134…2f02c8 [0x1f]: C0x00f6.0x3.0
0x2f0134…2f02c8 [0x20]: C0x00f7.0x0.0
0x2f0134…2f02c8 [0x21]: C0x00f7.0x1.0
0x2f0134…2f02c8 [0x22]: C0x00f7.0x2.0
0x2f0134…2f02c8 [0x23]: C0x00f7.0x3.0
0x2f0134…2f02c8 [0x24]: C0x00f8.0x0.0
0x2f0134…2f02c8 [0x25]: C0x00f8.0x1.0
0x2f0134…2f02c8 [0x26]: C0x00f8.0x2.0
0x2f0134…2f02c8 [0x27]: C0x00f8.0x3.0
0x2f0134…2f02c8 [0x28]: C0x00f9.0x0.0
0x2f0134…2f02c8 [0x29]: C0x00f9.0x1.0
0x2f0134…2f02c8 [0x2a]: C0x00f9.0x2.0
0x2f0134…2f02c8 ]
0x2f0134…2f02c8 }
0x2f02c8…2f045c Dummy {f00=0x00ef, f01=0x018e, f02=» 2 P IDENT SYSLDA REL 10.0 80-05-29 870105041000 P : P REL 10.0 80-03-14 B * P =1,FAULTY STACK BASE WHEN USING MMU ^ P P > P********************************************************** P* $ P* PHILIPS TERMINAL SYS
0x2f045c…2f05f0 Dummy {f00=0x00ef, f01=0x0190, f02=» P* > P********************************************************** P* T P* ^ F P* THIS PART OF THE SYSTEM START-UP WILL TAKE CARE OF APPLICATION h B P* (CREDIT) CONFIGURATION AND START OF APPLICATION. SYSLDA IS F P* ENTERED AFTE
0x2f05f0…2f0784 Dummy {f00=0x00ef, f01=0x0190, f02=» P* ASSEMBLER APPLICATION: J P* NO CONFIGURATION WILL TAKE PLACE. FIRST USER TASK IS ACTIVATED * F P* AND A BRANCH IS MADE TO P F I N I T . ALL USER TASK TTAB'S x $ P* MM-TABLES ARE FILLED IN. P* P* CREDIT APPLICATI
0x2f0784…2f0918 Dummy {f00=0x00ef, f01=0x0190, f02=»REAL TASKS & ^ . P* NUMBER OF USER WORK-BLOCK COPIES). H P* SYSLDA THEN MOVES ITSELF TO FOLLOW MONITOR AND WILL ALSO MOVE F , P* DDIV-PROTOTYPE TO FOLLOW SYSLDA. P* H P* APPLICATION WORKBLOCKS, DESCRIPTORS, STACK AND TABLES
0x2f0918…2f0aac Dummy {f00=0x00ef, f01=0x0190, f02=»LLOCATED AT 'BOTTOM' OF d H P* MEMORY; ELSE, IF NO MMU, BUFFERS ARE ALLOCATED AFTER MONITOR P* 'OVER' SYSLDA. l P* H P* ALL USER TASKS ARE QUEUED VIA A C T O T AND ALL MM-TABLES F P* IN USER TASK TTAB'S ARE FILLED. A
0x2f0aac…2f0c40 Dummy {f00=0x00ef, f01=0x0190, f02=»* v P* * P* ENTRIES AND EXTERNALS * . P* * R P*************************** v P P* LABEL ENTRIES , P ENTRY JUMP BYPASS JUMP FOR LOAD-MODULE P ENTRY SYSLDX P ENT
0x2f0c40…2f0dd4 (5, 406) Dummy {f00=0x00ef, f01=0x0190, f02=»RROR $ P ENTRY CMPADR COMPARE ADDRESSES 2 P ENTRY NXTBLK SKIP TO NEXT CONFIGURATION BLOCK 4 4 P ENTRY NXTCOM SKIP COMMONDEVICE DEFINITION BLOCK j * P ENTRY CONVRT CONVERSION ASCII-BINARY 2 P ENTRY GETNUM CONVERT 3 ASCII-DIGITS TO BINARY & P E
0x2f0dd4…2f0f68 Dummy {f00=0x00ef, f01=0x0190, f02=»BSOLUTE START ADDRESS OF WORK-TAB 1 4 P ENTRY MMEND ABSOLUTE END ADDRESS OF WORK-TAB 1 , 2 P ENTRY MMDDIV WORK-TABLE 2 (MM) RELATIVE 'REL' d , P ENTRY BUFSIZ TEMPORARY MOVE-BUFFER SIZE . P ENTRY SYSBUF TEMPORARY MOVE-BUFFER START 4 P ENTRY M:REL
0x2f0f68…2f10fc Dummy {f00=0x00ef, f01=0x0190, f02=»NTRY SAVE05,SAVE06,SAVE07,SAVE08 & P ENTRY SAVE09,SAVE10,SAVE11,SAVE02 ( & P ENTRY SAVE13,SAVE14,SAVE15,SAVE16 R & P ENTRY SAVE17,SAVE18,SAVE19,SAVE20 | & P ENTRY SAVE21,SAVE22,SAVE23,SAVE24 & P ENTRY SAVE25,SAVE26,SAVE27,SAVE28 P ENTRY SAVE29,
0x2f10fc…2f1290 Dummy {f00=0x00ef, f01=0x0190, f02=» FREE AREA z 2 P EXTRN SCTLAC LOGICALL ADDRESS TO COMMON PART P EXTRN SCTTCT TC:TAB ADDRESS H P EXTRN SCTSTB A15 STACK-BASE l " P EXTRN SCTEFA END OF FREE AREA " P EXTRN SCTNOP NUMBER OF PAGES P EXTRN SCTPSZ PAGE SIZE P EXTRN SCTMM
0x2f1290…2f1424 Dummy {f00=0x00ef, f01=0x0190, f02=» TABLE f P EXTRN SCTBUG BUGGER ADDRESS P 2 P* EXTERNAL LABELS : 6 P EXTRN SYSLDM START OF MONITOR CONFIGURATION PART T $ P EXTRN PAGQUE PAGE QUEUE POINTER P P* EXTERNAL SUBROUTINES P EXTRN ACTOT QUEUE TASK P EXTRN PFINI
0x2f1424…2f15b8 Dummy {f00=0x00ef, f01=0x0190, f02=»XTRN TTB:SA START OF SAVE AREA IN TTAB 8 P EXTRN TTB:CB DISPL. TO CURRENT SEGMENT BASE ADDRESS . P EJECT j P x P , P*************************************** , P* CONDITIONAL ASSEMBLY * , P********************************
0x2f15b8…2f174c Dummy {f00=0x00ef, f01=0x0190, f02=»ER z P PMMUSWB EQU MMUPAG+SWPBLK P 2 PSWBMMU EQU SWPBLK-MMUPAG : P EJECT Z P h P PROGRAM STRUCTURE: p P F P* ------------------------------------------------------- L P* ! RELOCATION ROUTINE
0x2f174c…2f18e0 Dummy {f00=0x00ef, f01=0x0190, f02=»-------------------------------------------! z F P* ! SAVE & COMMUNICATION AREA. MMU - WORK TABLES ! 4 F P* !-----------------------------------------------------! ~ F P* ! SUBROUTINES. -COMMON TO ALL PARTS IN PROGRAM.
0x2f18e0…2f1a74 (5, 407) Dummy {f00=0x00ef, f01=0x018e, f02=» ! PART 2.B F P* ! BUILD REAL TASK-LOCAL DATA AREAS ! F P* ! -QUEUE TASK VIA 'ACTOT' ! j F P* ! -FILL MM-TABLE IN TTAB ! F P*
0x2f1a74…2f1c08 Dummy {f00=0x00ef, f01=0x0190, f02=» F P* ! -ALLOCATE FIXED BUFFERS AND STACK ! F P* ! -UPDATE TID IN T:A AND SAVE TID IN T:AID TABLE ! N F P* ! -START DEBUGGER (IF ANY) AND START APPLICATION ! F P* !--------------------------
0x2f1c08…2f1d9c Dummy {f00=0x00ef, f01=0x0190, f02=»OVE DDIV PROTOTYPE TO FOLLOW SYSLDA ! F P* ! ! : F P* ! C O M D A T ! F P* ! GENERATE COMMON DATA AREA. PROCESS CWB'S & U
0x2f1d9c…2f1f30 Dummy {f00=0x00ef, f01=0x0190, f02=» ! b F P* ! ! F P* ! C L A D A T ! f F P* ! BUILD TASK CLASS DATA AREAS. PROCESS CWB'S, UWB'S ! F P* !
0x2f1f30…2f20c4 Dummy {f00=0x00ef, f01=0x0190, f02=» ! -MOVE T:D ! F P* ! -MOVE D.T. & W.B., COPY UWB'S ! H F P* ! -MOVE D.T.'S OF SWB'S AND TWB'S ! F P* ! -SEARCH DBLK-TAB FOR DWB'S. MO
0x2f20c4…2f2258 Dummy {f00=0x00ef, f01=0x0190, f02=» ! p F P* ! P R O D A T ! * F P* ! BUILD PROTOTYPE TASK-LOCAL DATA AREAS. ! t F P* ! -GENERATE TWB'S AND RESERVE FOR SWB'S ! F P
0x2f2258…2f23ec Dummy {f00=0x00ef, f01=0x0190, f02=» ! R F P* ! -INCLUDE DDIV-PROTOTYPE & PART 2.A IN FREE AREA. ! F P* ! -CONTINUE IN PART 2.B ! V F P* !-----------------------------------------------------! N P* ! SUBROUTINES
0x2f23ec…2f2580 Dummy {f00=0x00ef, f01=0x0190, f02=» ! CREDIT APPLICATION: ! ASSEMBLER APPLICATION: ! F P* ! READ CUNFIGURATION FILE ! -FILL MM-TABLES IN ! @ F P* ! AND BUILD SHADOW-TABLES. ! USER TASK TTAB'S. ! F P* ! ! -QUEUE 1:S
0x2f2580…2f2714 (5, 408) Dummy {f00=0x00ef, f01=0x0190, f02=»-------------------------! h F P* ! REAL TASKS' IS BUILT AT ! " F P* ! THE END OF MONITOR. ! l F P* ! U:BTAB: ! F P*
0x2f2714…2f28a8 Dummy {f00=0x00ef, f01=0x0190, f02=» F P* ! ! F P* ! -RELOCATE ALL W.B.-ADDRESSES IN DDIV-PROTOTYPE. ! N F P* ! -REMOVE NOT USED ENTRIES IN T:ATAB ! F P* ! -RELOCATE ADDRESSES IN U
0x2f28a8…2f2a3c Dummy {f00=0x00ef, f01=0x0190, f02=» ! v F P* ! -CONTINUE IN PART 2.A ! 0 F P* !-----------------------------------------------------! z P EJECT P P ***************** P ************
0x2f2a3c…2f2bd0 Dummy {f00=0x00ef, f01=0x0190, f02=»********* P P********** P* P:MTAB * 0 P********** B PT:ATAB EQU 0 T PU:BTAB EQU 2 h PP:BAS EQU 6 SEGMENT BASE | . PT:AID EQU 32 ADDRESS TO 'TABLE OF T:A TID' ( PS:BTAB EQU 40 DISP TO S:BTAB ADDRESS , PI:RSTE EQU 42
0x2f2bd0…2f2d64 Dummy {f00=0x00ef, f01=0x0190, f02=»ITIAL U:BTAB p " PUPADDR EQU 2 PROTOTYPE ADDRESS PUPNAME EQU 4 PROTOTYPE NAME : 8 PUPNUMB EQU 7 SAVE AREA NUMBER OF COPIES (SHADOW-TBL) ^ P* . PUR:REC EQU 6 RECORD LENGTH IN REAL U:BTAB * PURADDR EQU 2 ADDRESS TO FIRST REAL UWB PURNU
0x2f2d64…2f2ef8 Dummy {f00=0x00ef, f01=0x0190, f02=»*********** | $ P* CONFIGURATION FILE (CONFIG) * $ P******************************* < P d P* TASK DEFINITION BLOCK: p PTDBBT EQU 0 1A BLOCK TYPE ( PTDBNT EQU TDBBT+1 2N NUMBER OF TASKS , PTDBID EQU TDBNT+2 6A TASK ID START VALUE
0x2f2ef8…2f308c Dummy {f00=0x00ef, f01=0x0190, f02=»VICE CLASSES f P* & PTDBFST EQU TDBNC+2 FIRST TERM DEF $ PTDC EQU 7 TERMINAL DEVICE CLASS H PTLC EQU 6 LINE CONNECTION p ( PTDBREC EQU TDC+TLC TDB-RECORD LENGTH P* * PSDC EQU 7 SPECIAL DEVICE CLASS-RECORD P* P* COMMON
0x2f308c…2f3220 Dummy {f00=0x00ef, f01=0x018e, f02=»+2 FIRST SDC-RECORD P* P* & & P* USER WORK BLOCK TYPE DEF. BLOCK 0 PUDBBT EQU 0 1A BLOCK TYPE Z , PUDBNU EQU UDBBT+1 3A NUMBER OF UWB TYPES | P* ( PUDBFST EQU UDBNU+3 FIRST UDB-RECORD PNAMUWB EQU 3 NAME OF UWB " PNUMUBL
0x2f3220…2f33b4 (5, 409) Dummy {f00=0x00f0, f01=0x018e, f02=» P* T:A * P********* PT:ASTA EQU -14 T:A START ( 6 PCSE EQU -14 CURRENT SEGMENT END (HERE: STACKSIZE) H $ PCSB EQU -12 CURRENT SEGMENT BASE 4 PCSN EQU -10 CURRENT SEGMENT NUMBER (HERE LENGTH 2 P OF ALL DSCB
0x2f33b4…2f3548 Dummy {f00=0x00f0, f01=0x0190, f02=» j P PT:ATID EQU -4 TASK ID PSTKE EQU -2 STACK END 2 PPA EQU 0 STACK POINTER P PSTKB EQU 2 STACK BASE n " PWATFST EQU 4 FIRST WAT-ELEMENT P* P* DSCB-RECORD: PDSCBL EQU 20 RECORD LENGTH PBA EQU 2 BUFFER ADDR
0x2f3548…2f36dc Dummy {f00=0x00f0, f01=0x0190, f02=» P********* P* T:D * P********* , ( PFCD EQU 0 DISPLACEMENT TO FCB IN T:A > , PT:DTID EQU 2 TASK IDENTIFIER (PROTOTYPE) j , PDATLEN EQU 4 NUMBER OF DATASETS (DSCB'S) & PWATLEN EQU 6 NUMBER OF WATELEMENTS 0 PTWBMSK EQU 8 MASK FO
0x2f36dc…2f3870 Dummy {f00=0x00f0, f01=0x0190, f02=»4 MASK FOR UWB'S -"- ( PDWBFST EQU 16 FIRST WORD IN DBLK-TAB ! " P ! N . PSTPREC EQU 4 RECORD LENGTH OF START-POINTS ! V P ! P ! P**************** ! P* SOP-HANDLING * ! P**************** ! PSOP EQU /2E DEVICE ADDRESS ! P !
0x2f3870…2f3a04 Dummy {f00=0x00f0, f01=0x0190, f02=» /100 MEMORY OVERFLOW ! & PLMP4 EQU /80 FORMAT ERROR (CONFIG) " PLMP5 EQU /40 TID ERROR " H " PLMP6 EQU /20 UWB OR SWB ERROR " f " PLMP7 EQU /10 MM-TABLE OVERFLOW " PLMP8 EQU 8 " PLMP9 EQU 4 " PLMP10 EQU 2 " PLMP11 EQU 1 " P EJECT "
0x2f3a04…2f3b98 Dummy {f00=0x00f0, f01=0x0190, f02=»OCK " r , PDTLEN EQU -2 LENGTH OF DESCRIPTOR-TABLE # & PSWBLEN EQU 4 DISP TO LENGTH OF SWB # < P # f $ PFCBDD1 EQU 8 DISP TO FIRST DSET # r $ PFCBDD2 EQU 10 DISP TO 2:ND DSET # P # $ PSTKSZ EQU 128 DEFAULT STACK-SIZE # P # & PCREID
0x2f3b98…2f3d2c Dummy {f00=0x00f0, f01=0x0190, f02=» P $ PTTBTID EQU 2 TID IN TTAB $ . PT:DSAV EQU 0 SAVE FOR T:D-ADDRESS IN TTAB $ , * PTTB:PP EQU 6 SAVE AREA FOR TCL IN TTAB $ ^ P $ ( PNTPA EQU 4 INTERPRETER START ADDRESS $ & PIHRTC EQU 4 RTC INTERRUPT ADDRESS $ $ PRTCDA EQU /1B RTC DEVICE ADDRE
0x2f3d2c…2f3ec0 Dummy {f00=0x00f0, f01=0x018e, f02=»A13 * $ h F P* DATA [REL-ADDRESS] * % " F P* * % l F P***************************************************************** % P %
0x2f3ec0…2f4054 (5, 410) Dummy {f00=0x00f0, f01=0x0190, f02=» % 6 P************************************************** & 6 P** ** & B 6 P** RELOCATION ROUTINE & STACK INITIALLISATION ** & | 6 P** ** & 6 P************************
0x2f4054…2f41e8 Dummy {f00=0x00f0, f01=0x0190, f02=»HANDLER & p & P LDR A13,P GET BASE ADDRESS TO A13 ' P SUKL A13,4 ' : P* ADJUST FOR PSW-ROUTINE * ' N P************************** ' p 4 P LDK A3,GETPSW RELATIVE ADDRESS TO 'PSW-ADDRESS' ' P ADR A3,A13 ABSOLUT DITO ' 4 P ST A3,PSW,A13 STORE ADDRESS T
0x2f41e8…2f437c Dummy {f00=0x00f0, f01=0x0190, f02=» P RTN A8 ( P ( P ( P* STACK * ( , P********* ( > P* ( P P RES 12 ( Z PSTACKB EQU *-REL-2 ( j P EJECT ( P ( P ( P* ADDRESS TO PSW-ROUTINE * ( P************************** ( P* ( PPSW EQU *-REL (
0x2f437c…2f4510 Dummy {f00=0x00f0, f01=0x0190, f02=» E T P S W * ( v D P* LITTLE SUBROUTINE TO PUT PSW IN STACK FOR CALLING SUBROUTINE * ) . D P**************************************************************** ) v P ) PGETPSW EQU *-REL ) $ P STR A2,A14 SAVE A2 ON A14-STACK ) 0
0x2f4510…2f46a4 Dummy {f00=0x00f0, f01=0x0190, f02=» RTN A14 ) P EJECT * P * & P********************************* * & & P* * * P & P* SUBROUTINE-HANDLER * * z & P* * * & P********************************* * P * PSUBSUB E
0x2f46a4…2f4838 Dummy {f00=0x00f0, f01=0x0190, f02=» * p P IM 4,A14 + 0 P AD A10,M:REL,A13 ADD FOR SYSLDM RELOCATION + P STR A10,A14 PUT ON STACK + N P LD A10,MUL,A13 RESTORE A10 + p P ABR* A14 + P + P + P + < P******************************************************* + < P* JUMP TO
0x2f4838…2f49cc Dummy {f00=0x00f0, f01=0x0190, f02=»YSLDM + P EJECT , P , ( P************************************ , ( ( P** ** , T ( P** SAVE, AND COMMUNICATION AREA ** , ( P** ** , ( P************************************ , P
0x2f49cc…2f4b60 Dummy {f00=0x00f0, f01=0x0190, f02=»OD EQU *-REL U:BTAB OLD ADDRESS , P DATA 0 - ( ( PU:BTNW EQU *-REL U:BTAB NEW ADDRESS - 8 P DATA 0 - d ( PS:BTOD EQU *-REL S:BTAB OLD ADDRESS - t P DATA 0 - ( PS:BTNW EQU *-REL S:BTAB NEW ADDRESS - P DATA 0 - . PMOVADD EQU *-REL ADDRESS-CHA
0x2f4b60…2f4cf4 (5, 411) Dummy {f00=0x00f0, f01=0x0190, f02=»SS INDICATOR - v P FOR TABLE-SCANNING . P DATA 0 . 2 : PLSTADR EQU *-REL LAST ADDRESS WHEN BUILDING DATA PART . B P DATA 0 . @ PFSTADR EQU *-REL FIRST FREE ADDRESS WHEN ALLOCATING BUFFERS . P DATA 0 . * PNEWAD1 EQU *-REL SAVE FOR W.B. ADDRE
0x2f4cf4…2f4e88 Dummy {f00=0x00f0, f01=0x0190, f02=» . 6 PFLAG EQU *-REL REAL TASK DATA PROCESSING INDICATOR / P DATA 0 / B " PUWB EQU *-REL U.W.B. INDICATOR / R P DATA 0 / x & PAPPTYP EQU *-REL APPLICATION TYPE / P DATA 0 / $ PSAVE01 EQU *-REL TEMPORARY SAVE / P DATA 0 / PSAVE02 EQU *-R
0x2f4e88…2f501c Dummy {f00=0x00f0, f01=0x018e, f02=»0 / PSAVE06 EQU *-REL 0 P DATA 0 0 " PSAVE07 EQU *-REL 0 2 P DATA 0 0 J PSAVE08 EQU *-REL 0 Z P DATA 0 0 r PSAVE09 EQU *-REL SAVE AREAS 0 P DATA 0 0 PSAVE10 EQU *-REL 0 P DATA 0 0 PSAVE11 EQU *-REL 0 P DATA 0 0 PSA
0x2f501c…2f51b0 Dummy {f00=0x00f0, f01=0x018e, f02=» 0 ~ P DATA 0 1 PSAVE26 EQU *-REL 1 P DATA 0 1 0 PSAVE27 EQU *-REL 1 @ P DATA 0 1 X PSAVE28 EQU *-REL 1 h P DATA 0 1 PSAVE29 EQU *-REL 1 P DATA 0 1 PSAVE30 EQU *-REL 1 P DATA 0 1 & PWBADD EQU *-REL W.B.-ADDRESS SAVE 1
0x2f51b0…2f5344 Dummy {f00=0x00f0, f01=0x0190, f02=» 8 PTADISP EQU *-REL DISPLACEMENT IN T:A TO W.B. ADDRESS 2 P DATA 0 2 @ * PDATEND EQU *-REL END OF DDIV PROTOTYPE 2 P P DATA 0 2 ~ ( PMMREL1 EQU *-REL PHYSICALL PAGE BASE 2 P DATA 0 2 * PM:REL EQU *-REL RELOCATION FOR SYSLDM 2 P DATA 0 2 P
0x2f5344…2f54d8 Dummy {f00=0x00f0, f01=0x0190, f02=» *-REL MMTABLE ADDRESS 2 P DATA 0 3 * PMMFROM EQU *-REL 2:ND MMTABLE ADDRESS 3 . P DATA 0 3 0 PFYSPAG EQU *-REL LAST PHYSICALLY PAGE NUMBER 3 l P DATA 0 3 PFSTPAG EQU *-REL 3 ( P DATA 0 FIRST FREE PAGE (PHYSICALL) 3 ( PTTAB EQU *-REL CORRE
0x2f54d8…2f566c Dummy {f00=0x00f0, f01=0x0190, f02=»H 3 r P 4 P 4 P 4 & P********************************* 4 " & P* EQUATES FOR SYSLDM SAVE-WORDS * 4 L & P********************************* 4 v P 4 PSAVE14 EQU U:BTOD 4 PSAVE15 EQU U:BTNW 4 PSAVE16 EQU MOVADD 4 PSAVE17 EQU ENDADD
0x2f566c…2f5800 Dummy {f00=0x00f0, f01=0x0190, f02=»SAVE24 EQU FLAG 4 P EJECT 5 P 5 & P* MMU TABLES * 5 . P 5 D P 5 L . PMMDDIV EQU *-REL DDIV (& SYSLDA) MM-TABLE 5 T P IFT MMUPAG=1 5 P RES 16 5 P XIF 5 P 5 $ PMMTAB EQU *-REL WORK AREA MM-TAB 5 PTABBE EQU * 5 P IFT MMUPAG=
0x2f5800…2f5994 (5, 412) Dummy {f00=0x00f0, f01=0x0190, f02=»A 5 n 4 PTTPAG DATA 0 LAST ENTRY (FROM BOTTOM) IN MM-TAB 6 0 PLSTPAG EQU TTPAG-* DISPL. TO 'ENTRY-POINTER' 6 B P DATA 0 6 v P 6 PMMBEG EQU TABBE-* 6 P EJECT 6 P 6 6 P*** *** 6 6 P*** S
0x2f5994…2f5b28 Dummy {f00=0x00f0, f01=0x018e, f02=» *** 6 p 6 P************************************************* 7 6 P************************************************* 7 T P 7 P 7 , P** E R R O R ** 7 , P** ** 7 , P**
0x2f5b28…2f5cbc Dummy {f00=0x00f0, f01=0x0190, f02=» 7 f , P** INPUT :A1=SOP-MESSAGE ** 8 , P** OUTPUT:A2=RELATIVE CALLING ADDRESS** 8 8 , P** (REG-CONTENTS IS SAVED) ** 8 h , P**************************************** 8 P 8 PERROR EQU * 8 P ST A2,SAVE01,A13 SAVE A2 8 . P L
0x2f5cbc…2f5e50 Dummy {f00=0x00f0, f01=0x0190, f02=»NG PURPOS) 8 | P EJECT 9 P 9 & P** M O V E ** 9 ( & P** ** 9 R & P** ** 9 | & P** MOVE BLOCKS INSIDE MEMORY ** 9 & P** ** 9 & P** INPUT:A1=F
0x2f5e50…2f5fe4 Dummy {f00=0x00f0, f01=0x0190, f02=» ** 9 x & P** WORK-REG: A4 ** : & P********************************* : < P : f PMOVE EQU * : r $ PMOVES ADR A1,A3 END OF FROM AREA : P ADR A2,A3 END OF TO-AREA : & P LD A4,SCTEFA GET END OF FREE AREA : P TNM A2,A4 SIGN
0x2f5fe4…2f6178 Dummy {f00=0x00f0, f01=0x0190, f02=» SIGN : n 8 PMOVCK RF(NG) MOVE10 END OF TO-AREA<=END OF FREE AREA ; * P LDKL A1,LMP3 INDICATE MEMORY OVERFLOW ; J P CALL ERROR ; x 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
0x2f6178…2f630c Dummy {f00=0x00f0, 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
0x2f630c…2f64a0 Dummy {f00=0x00f0, 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************************************
0x2f64a0…2f6634 (5, 413) Dummy {f00=0x00f1, 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 >
0x2f6634…2f67c8 Dummy {f00=0x00f1, 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**
0x2f67c8…2f695c Dummy {f00=0x00f1, 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**
0x2f695c…2f6af0 Dummy {f00=0x00f1, f01=0x0190, f02=» A3=LENGTH (IN BYTES) ** @ 4 P** WORK.REGS:A4,A10 ** A . 4 P************************************************ A f P A PXMOVE EQU * A P ST A1,SAVE09,A13 A P ST A1,SAVE07,A13 A P ST A2,SAVE10,A13 A P
0x2f6af0…2f6c84 Dummy {f00=0x00f1, f01=0x0190, f02=» PXMOV05 EQU * B LDR A10,A3 SAVE LENGTH B , ( LDK A4,0 RESET 'NUMBER-OF-MOVE' COUNTER B 8 * P LDR A11,A3 GET LENGTH OF AREA TO MOVE B h 0 P LD A9,BUFSIZ,A13 GET TEMPORARY BUFFER SIZE B . P CALL CMPADR TEMPORARY BUFFER BIG ENOUGTH B " RF(G) SPLIT
0x2f6c84…2f6e18 Dummy {f00=0x00f1, f01=0x0190, f02=»ER START-ADDRESS B p $ P TL* MMFROM,A13 LOAD FROM-TABLE C , ( MVUS A3 MOVE DATA-BLOCK TO TEMP. BUFFER C @ 0 P ST A1,SAVE09,A13 SAVE END OF 'FROM' ADDRESS C p P LD A1,SYSBUF,A13 C 0 P LD A2,SAVE08,A13 GET START OF 'TO' ADDRESS C LDR A3,A10 GET LENGTH
0x2f6e18…2f6fac Dummy {f00=0x00f1, f01=0x0190, f02=»V30 NO! C P ADR A2,A10 D 0 P ST A2,SAVE08,A13 SAVE START OF 'TO' ADDRESS D $ * P LD A3,SAVE11,A13 GET REQUESTED LENGTH D X $ SUR A3,A10 SUBTRACT MOVED PART D P ST A3,SAVE11,A13 SAVE D P CWR A3,A10 D P RB(NL) XMOV10 D P LDR A10,A3 LAST L
0x2f6fac…2f7140 Dummy {f00=0x00f1, f01=0x0190, f02=» DV BUFSIZ,A13 AND DIVIDE E 2 P LDR A4,A2 GET QUOTIENT (=NUMBER OF MOVES - 1) E & & " LD A10,BUFSIZ,A13 MOVE MAX LENGTH E P RB XMOV10 E E 0 PXMOV30 LD A2,SAVE10,A13 RESTORE 'TO-ADDRESS' E , P LD A1,SAVE07,A13 RESTORE 'FROM-ADDRESS' E P LD
0x2f7140…2f72d4 (5, 414) Dummy {f00=0x00f1, f01=0x0190, f02=»N G ** E v 4 P** ** F 4 P** ** F V 4 P** USES SUBROUTINE 'XMOVE' TO MOVE A BLOCK ** F 4 P** VIA TWO MM-TABLES.PHYSICALL TO-ADDRESS ** F 4 P** IS ALW
0x2f72d4…2f7468 Dummy {f00=0x00f1, f01=0x0190, f02=» &FYSPAG ** F n 4 P** IS UPDATED AND CHECKED. ** G 4 P** ** G N 4 P** INPUT :A1 & A3 AS IN 'XMOVE' ** G 4 P** TTAB=POINTER TO TTAB (OR LIKELY) ** G 4 P** OUTPUT:A2=LOGI
0x2f7468…2f75fc Dummy {f00=0x00f1, f01=0x0190, f02=»***** G f P H PMOVING EQU * H P ST A11,SAVE01,A13 SAVE A11 H * P ST A9,SAVE12,A13 SAVE A9 H N . ) LD A4,FYSPAG,A13 GET ACT. PHYSICALL PAGE H p & P LD A10,TTAB,A13 LOAD TTAB-ADDRESS H 2 . LD A2,LSTPAG,A10 GET LAST TABLE-ENTRY IN TTAB H " LDR*
0x2f75fc…2f7790 Dummy {f00=0x00f1, f01=0x0190, f02=»400 ADJUST FOR 'SETTAB' H $ P CALL SETTAB NEW PAGE IN TABLE! I 6 PMOV010 LD A11,LSTADR,A13 GET LAST LOGICALL ADDRESS I H ANKL A11,/FFF I * P LDR A9,A3 GET LENGTH OF AREA TO MOVE I 0 P CALL CMPADR ENOUGTH SPACE IN CURRENT PAGE? I P RF(NL) MOV020
0x2f7790…2f7924 Dummy {f00=0x00f1, f01=0x0190, f02=» ADKL A11,4096 PHYSICAL PAGE INCREMENT I P RB MOV015 J . 2 PMOV020 SUR A11,A3 COMPUTE DISPLACEMENT IN PAGE J @ PMOV025 RF(NN) MOV050 J v * PMOV030 CALL SETTAB NEW PAGE IN TABLE! J & ! ADKL A11,4096 NEW PAGE INCREMENT J ( P RB(N) MOV030 NOT ENOUGH. NEW
0x2f7924…2f7ab8 Dummy {f00=0x00f1, f01=0x0190, f02=» J t " P* A2=CURRENT ENTRY IN MM-TABLE K K . PMOV050 EQU * K 6 , ( ST A2,LSTPAG,A10 SAVE MMU-ENTRY IN TTAB K J 0 , ST A4,FYSPAG,A13 SAVE PHYSICALL PAGE NUMBER K z 4 P LDKL A4,MMBEG CALCULATE TABLE ENTRY DISPLACEM. K & " ADR A4,A10 ABSOLUTE ENTRY ADDRESS
0x2f7ab8…2f7c4c Dummy {f00=0x00f1, f01=0x0190, f02=» * P ORR A2,A11 GET DISPLACEM. WITHIN PAGE L P ANKL A2,/FFFE EVEN ADDRESS L 2 , ' ST A2,LSTADR,A13 SAVE LOGICALL ADDRESS L V P* CHECK ADDRESSES * L P L * P LD A9,FSTPAG,A13 GET FIRST FREE PAGE L P ST A11,SAVE07,A13 SAVE A11 L P LD A11,FYSP
0x2f7c4c…2f7de0 Dummy {f00=0x00f1, f01=0x0190, f02=» P LD A9,FSTADR,A13 M P CALL CMPADR M P RF(NL) MOV090 OK! M 2 PMOV070 LDKL A1,LMP3 M L P CALL ERROR M h PMOV090 EQU * M | P CALL XMOVE MOVE M P LD A9,SAVE12,A13 M ( P LD A11,SAVE01,A13 RESTORE REGISTERS M $ P TL* MMFROM,A13 RESTORE MM
0x2f7de0…2f7f74 (5, 415) Dummy {f00=0x00f1, f01=0x0190, f02=» ** M v 6 P** ** N 6 P** SET NEW PAGE IN MM-TABLE & CHECK IF TABLE ** N Z 6 P** OVERFLOW. ** N 6 P** ** N 6 P
0x2f7f74…2f8108 Dummy {f00=0x00f1, f01=0x0190, f02=»S UPDATED ** N | 6 P** WORK.REG: A9 ** O & 6 P************************************************* O ` P O PSETTAB EQU * O SUKL A4,/400 GET NEXT PAGE O SUK A2,2 GET NEXT ENTRY O P O " P* CHEC
0x2f8108…2f829c Dummy {f00=0x00f1, f01=0x0190, f02=» O r P RF(NN) SETT00 P P CWR A9,A2 P P RF SETT05 P 0 PSETT00 CWR A2,A9 OVERFLOW? P B PSETT05 RF(NL) SETT10 NO P d P LDK A1,LMP7 P P CALL ERROR P PSETT10 EQU * P STR A4,A2 STORE IN TABLE P RTN A14 P P XIF P P IFF CREDI
0x2f829c…2f8430 Dummy {f00=0x00f1, f01=0x018e, f02=» ** P f 4 P** ** Q 4 P** GET WORK BLOCK ADDRESS AND DISPLACE- ** Q F 4 P** MENT IN T:A ** Q ~ 4 P** ** Q 4 P** INPUT : A8= POINTER TO
0x2f8430…2f85c4 Dummy {f00=0x00f1, f01=0x0190, f02=» Q ^ 4 P** TADISP=A4 ** R 4 P** A11=W.B.-ADDRESS ** R @ 4 P** WBADD=POINTER TO W.B.-ADD IN T:A ** R x 4 P*********************************************** R P R PGETWB EQU * R " P
0x2f85c4…2f8758 Dummy {f00=0x00f1, f01=0x0190, f02=»T R n P IFT CREDIT-MMUPAG=1 S P LDR* A11,A8 GET T:A-ADDRESS S & P ADR A11,A4 ADD DISPLACEMENT S J P ST A11,WBADD,A13 SAVE S n " P LDR* A11,A11 GET W.B.-ADDRESS S P XIF S P IFT CREDIT+MMUPAG=2 S 0 P LD A11,FLAG,A13 REAL TASK-DATA PROCESSING? S
0x2f8758…2f88ec Dummy {f00=0x00f1, f01=0x0190, f02=»NT S v P ST A11,WBADD,A13 SAVE T " P ELR A11,A11 GET W.B.-ADDRESS T ( & P TL* MMFROM,A13 RELOAD FROM-TABLE T N P XIF T x P IFF CREDIT=0 T P RTN A14 T P EJECT T P T P T 8 P** M O V W B ** T
0x2f88ec…2f8a80 Dummy {f00=0x00f1, f01=0x0190, f02=»K-BLOCK. W.B.-ADDRESS IS UPDATED ** T 8 P** ** U 0 8 P** INPUT: A11=W.B.-ADDRESS ** U l 8 P** OUTPUT: 'WBADD'=POINTER TO MOVED W.B.ADDRESS ** U 8 P** WORK-REGS: A1-A4
0x2f8a80…2f8c14 (5, 416) Dummy {f00=0x00f1, f01=0x0190, f02=»ESS U | P ADKL A1,WBLEN FROM-ADDRESS V P IFT CREDIT-MMUPAG=1 V 0 P LDR* A3,A1 LENGTH V L P CALL MOVING V f 6 P SUKL A2,WBLEN ADJUST TO-ADDRESS FOR DISPLACEMENT V z 4 P ST* A2,WBADD,A13 UPDATE W.B.-ADDRESS AFTER MOVE V P XIF V P IFT CREDIT+MMUP
0x2f8c14…2f8da8 Dummy {f00=0x00f1, f01=0x0190, f02=» DATA-PART PROCESSING? V | P RF(Z) MOVW10 NO! W P TL* MMTO,A13 LOAD TO-TABLE W 8 : PMOVW10 ES* A2,WBADD,A13 UPDATE W.B.-ADDRESS AFTER MOVE W & P TL* MMFROM,A13 RELOAD FROM-TABLE W P XIF W P IFF CREDIT=0 W P RTN A14 W P EJECT W P
0x2f8da8…2f8f3c Dummy {f00=0x00f1, f01=0x0190, f02=» W Z : P** ** X : P** MOVE DISCRIPTOR TABLE. D.T.-ADDRESS IS UPDATED ** X F : P** ** X : P** INPUT :WBADD POINTS TO W.B.-ADDRESS IN T:A ** X : P** OUTP
0x2f8f3c…2f90d0 Dummy {f00=0x00f1, f01=0x018e, f02=»********************************* X | P Y * PMOVDT EQU * Y 6 6 P LD A1,WBADD,A13 GET POINTER TO W.B-ADDRESS IN WAT Y J & P SUK A1,2 POINTER TO D.T.-ADDRESS Y P IFT CREDIT-MMUPAG=1 Y P LDR* A1,A1 D.T.-ADDRESS Y * P ADKL A1,DTLEN ADJUST FOR LENG
0x2f90d0…2f9264 Dummy {f00=0x00f1, f01=0x0190, f02=» Y P SUKL A1,DTLEN Z 4 P ST A2,-2,A3 UPDATE D.T-ADDRESS. A2=NEW ADDRESS Z P XIF Z V P IFT CREDIT+MMUPAG=2 Z b P ELR A1,A1 D.T.-ADDRESS Z ~ * P ADKL A1,DTLEN ADJUST FOR LENGTH WORD Z P AD A1,MOVADD,A13 RELOCATE Z P ELR A3,A1 LENGTH Z P
0x2f9264…2f93f8 Dummy {f00=0x00f1, f01=0x0190, f02=» Z ` P XIF [ P IFF CREDIT=0 [ P RTN A14 [ * P EJECT [ : P [ H < P** M O V D W B ** [ T < P** ** [ < P**
0x2f93f8…2f958c Dummy {f00=0x00f1, f01=0x0190, f02=» < P** ** < P** INPUT : A12=T:D-ADDRESS ** D < P** A8= POINTER TO T:A-ADDRESS ** < P** BIT=BIT NUMBER SAT IN DWBMSK ( 0-15 ) ** < P**
0x2f958c…2f9720 Dummy {f00=0x00f1, f01=0x0190, f02=»MOVDWB EQU * P ST A6,SAVE05,A13 SAVE A5 ] P LDK A6,0 ] 6 ( PMOVD10 LD A4,BIT,A13 GET BIT NUMBER ] H " P ADK A4,1 FIRST WAT-ELEMENT =1 ] t P IFT CREDIT-MMUPAG=1 ] P LD A2,WATLEN,A12 ] P XIF ] P IFT CREDIT+MMUPAG=2 ] P EL A2,WATLEN,A1
0x2f9720…2f98b4 (5, 417) Dummy {f00=0x00f2, f01=0x0190, f02=»=TABLE INDEX ] ~ P SUK A2,1 ALL? ^ P RF(N) MOVD60 YES! ^ * P IFT CREDIT-MMUPAG=1 ^ D " P CC A4,DWBFST,A6 SHARED W.B.? ^ ` P XIF ^ 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)
0x2f98b4…2f9a48 Dummy {f00=0x00f2, f01=0x0190, f02=»OINTER ^ x P CWR A4,A10 SHARED W.B.? _ P XIF _ . P IFF CREDIT=0 _ : P RB(NE) MOVD20 NO! _ P P* DWB FOUND * _ j , P NGR A4,A2 CALCULATE DISPLACEMENT IN T:A _ P IFT CREDIT-MMUPAG=1 _ P AD A4,WATLEN,A12 _ P XIF _ P IFT CREDIT+MMUPAG=2 _
0x2f9a48…2f9bdc Dummy {f00=0x00f2, f01=0x0190, f02=» P SLL A4,2 ` P ADK A4,WATFST+2 ` * P LD A3,NEWAD2,A13 GET NEW W.B.-ADDRESS ` . P IFT CREDIT-MMUPAG=1 ` 2 P ADR* A4,A8 A4=POINTER TO W.B.-ADDRESS IN T:A ` x " P STR A3,A4 CHANGE W.B.-ADDRESS ` P XIF ` P IFT CREDIT+MMUPAG=2 ` . P LD A2,FLAG,
0x2f9bdc…2f9d70 Dummy {f00=0x00f2, f01=0x0190, f02=»OINTER TO W.B.-ADDR IN T:A ` P ADR A4,A10 a " " P ESR A3,A4 CHANGE W.B.-ADDRESS a 6 & P TL* MMFROM,A13 RELOAD FROM-TABLE a P XIF a P IFF CREDIT=0 a P ST A4,WBADD,A13 a . P LD A2,SWITCH,A13 WB-ADDRESS CHANGE ONLY? a P RB(NZ) MOVD10 YES! a
0x2f9d70…2f9f04 Dummy {f00=0x00f2, f01=0x0190, f02=» P b P b 4 P** T W B S W B ** b 4 P** ** b L 4 P** COPY TWB'S AND RESERVE SPACE FOR SWB'S ** b 4 P** ** b 4 P** INPUT : A8=ACTUA
0x2f9f04…2fa098 Dummy {f00=0x00f2, f01=0x0190, f02=» ** b d 4 P************************************************ c P c D PTWBSWB EQU * c L P ST A7,SAVE04,A13 SAVE A7 c ` " P LD A7,TWBMSK,A12 GET TWB MASK c P IFT CREDIT+MMUPAG=2 c " P EL A7,TWBMSK,A12 GET TWB MASK c P XIF c P IFF CREDIT=0 c
0x2fa098…2fa22c Dummy {f00=0x00f2, f01=0x0190, f02=»ESS c n & P CALL MOVDWB CHANGE DWB-ADDRESSES d P CALL SKIFTA d 6 P RB TWSW10 d J PTWSW20 EQU * d P IFT CREDIT+SWPBLK=2 d p P EJECT d P d P d P* RESERVE SPACE FOR SWB'S * d P*************************** d P XIF d P I
0x2fa22c…2fa3c0 Dummy {f00=0x00f2, f01=0x0190, f02=»REDIT+SWPBLK=2 d P CALL SHIFT e PTWSW30 RF(Z) TARZAN ALL DONE e * P CALL GETWB e N P CALL MOVWB RESERVE SPACE e b ( P ST A2,NEWAD2,A13 SAVE W.B.-ADDRESS e & P CALL MOVDWB CHANGE DWB- ADDRESSES e P CALL SKIFTA e P RB TWSW30 e PTARZAN E
0x2fa3c0…2fa554 (5, 418) Dummy {f00=0x00f2, f01=0x0190, f02=» A L L B U F ** e 4 P** ** f 0 4 P** ALLOCATE FIXED DATA SET BUFFERS AND ** f h 4 P** TERMINAL STACK ** f 4 P** **
0x2fa554…2fa6e8 Dummy {f00=0x00f2, f01=0x018e, f02=»(IN T:A)=LENGTH OF DSCB'S ** f 4 P** CIA (IN T:A)=DISPL. TO T:A-START ** g ( 4 P** CSE (IN T:A)=STACKSIZE ** g ` 4 P** WORK-REGS. :A1-A4,A9,A11 ** g 4 P************************************************ g P
0x2fa6e8…2fa87c Dummy {f00=0x00f2, f01=0x0190, f02=» g r ( P LD A3,CSN,A1 GET DSCB TOTAL LENGTH h P RF(Z) ALLB70 NO DSCB'S h 4 . P ADKL A1,T:ASTA CALC START OF DSCB RECORDS h T " P LDR A10,A1 SAVE START ADDRESS h P XIF h P IFT CREDIT+MMUPAG=2 h P ELR A1,A8 GET T:A-ADDRESS h ( P EL A3,CSN,A1 GET
0x2fa87c…2faa10 Dummy {f00=0x00f2, f01=0x0190, f02=» h r P XIF i P IFF CREDIT=0 i P SUR A3,A1 i * P NGR A3,A3 i < P SUK A3,DSCBL END CONDITION i N : P ST A3,SAVE04,A13 SAVE ADDRESS TO END OF DSCB-RECORDS i r : PALLB10 SUK A1,DSCBL A1=FIRST WORD IN FIRST DSCB-RECORD i P CW A1,SAVE04,A13 ALL? i
0x2faa10…2faba4 Dummy {f00=0x00f2, f01=0x0190, f02=»NN) ALLB10 NO! i P ST A9,BA,A1 BUFFER START j P LD A3,RL,A1 BUFFER LENGTH j 8 P ST A3,BL,A1 j Z P LD A2,EL,A1 SHARED BUFFER? j n P RF(Z) NOTSH NO! j & P LDR A4,A1 RESTORE START OF DSCB'S j P XIF j P IFT CREDIT+MMUPAG=2 j $ P ELR A3,A1 G
0x2faba4…2fad38 Dummy {f00=0x00f2, f01=0x0190, f02=» P EL A2,EL,A1 SHARED BUFFER? k P RF(Z) NOTSH NO! k ( & P LDR A4,A1 RESTORE START OF DSCB'S k @ P XIF k j P IFF CREDIT=0 k v P ADK A4,DSCBL FIRST WORD k PALLB20 SUK A2,1 A2=INDEX k P RF(NN) ALLB30 k P LDK A1,LMP4 FORMAT ERROR k P CAL
0x2fad38…2faecc Dummy {f00=0x00f2, f01=0x0190, f02=» P RB(NE) ALLB20 l " P LDK A1,LMP4 BUFFER NOT FOUND l P CALL ERROR l @ P IFT CREDIT-MMUPAG=1 l T ( PALLB40 LD A4,BA,A4 BUFFER ALLOCATED? l p P RF(NZ) ALLB50 YES! l P LDK A1,LMP4 FORMAT ERROR l P CALL ERROR l PALLB50 EQU * l * P ST A4
0x2faecc…2fb060 Dummy {f00=0x00f2, f01=0x0190, f02=»50 YES! l P LDK A1,LMP4 FORMAT ERROR m P CALL ERROR m 2 PALLB50 EQU * m F * P ES A4,BA,A1 AND ESORE IN CURRENT ECB m Z P XIF m P IFF CREDIT=0 m P RB ALLB10 m P m P IFT CREDIT-MMUPAG=1 m PNOTSH LDR A9,A9 PAGING? m P RF(NZ)
0x2fb060…2fb1f4 (5, 419) Dummy {f00=0x00f2, f01=0x0190, f02=» A9,A3 ALLOCATE BUFFER FROM TOP m P ADKL A9,1 n ( P ANKL A9,/FFFE EVEN ADDRESS n : P* CHECK ADDRESS: n ^ P n v " P LD A11,LSTADR,A13 DATA START n P CALL CMPADR n P RF(NL) ALLB60 OK! n P LDKL A1,LMP3 n P CALL ERROR n PALLB60 E
0x2fb1f4…2fb388 Dummy {f00=0x00f2, f01=0x0190, f02=»FROM 'BOTTOM' n n & P ES A2,BA,A1 STORE BUFFER ADDRESS o P XIF o @ P IFF CREDIT=0 o L P RB ALLB10 o b P o t , P* RESERVE STACK AND SET STACKPOINTERS * o P o PALLB70 EQU * o P IFT CREDIT-MMUPAG=1 o P LDR* A1,A8 GET T:A-ADDRESS o
0x2fb388…2fb51c Dummy {f00=0x00f2, f01=0x0190, f02=»E o r PALLB80 EQU * p P ST A4,STKB,A1 SET STACKBASE p P STR A4,A1 STACK POINTER p B P CALL MOVING ALLOCATE STACK p b P ST A2,STKE,A1 SET STACK-END p P XIF p P IFT CREDIT+MMUPAG=2 p P ELR A1,A8 GET T:A-ADDRESS p P EL A3,CSE,A1 GET ST
0x2fb51c…2fb6b0 Dummy {f00=0x00f2, f01=0x0190, f02=»ZE p n P CALL MOVING ALLOCATE STACK q " P ES A2,STKE,A1 STORE STACK END q . " P EL A3,STKB,A1 GET STACK SIZE q T " P ADR A2,A3 COMPUTE STACK BASE q z . P SUK A2,2 ADDRESS TO LAST WORD IN STACK =1 q $ P ES A2,STKB,A1 STORE STACK BASE q * P ESR A2,A1 STO
0x2fb6b0…2fb844 Dummy {f00=0x00f2, f01=0x0190, f02=» ** q p 4 P** ** r 4 P** MOVE T:A AND UPDATE DATA SET ADDRESSES IN ** r P 4 P** FORMAT CONTROL BLOCK ** r 4 P** ** r 4 P** INPUT : A8=T
0x2fb844…2fb9d8 Dummy {f00=0x00f2, f01=0x0190, f02=»ART ** r h 4 P** OUTPUT: A2=NEW T:A-ADDRESS ** s 4 P** WORKREGS: A1-A4 ** s H 4 P************************************************ s P s PMOVT:A EQU * s P IFT CREDIT-MMUPAG=1 s P LDR* A1,A8 GET T:A-ADDR
0x2fb9d8…2fbb6c Dummy {f00=0x00f2, f01=0x0190, f02=»WATFST A3=LENGTH s P AD A1,CIA,A1 FROM-ADDRESS t P CALL MOVING t : P LDR* A4,A8 t N " P SU A2,CIA,A4 NEW T:A-ADDRESS t b $ P SU A1,CIA,A4 'OLD' T:A-ADDRESS t P t 8 P* COMPUTE AND STORE ADDRESSES TO DATA-SETS IN FCB * t P t P LD A3,FCD,A
0x2fbb6c…2fbd00 Dummy {f00=0x00f2, f01=0x0190, f02=»TASK DATA PROCESSING? t z P RF(Z) MOVT05 NO! u : P SUR A4,A1 ADJUST FOR OLD RELOCATION (OLD T:A-ADDRESS) u 8 PMOVT05 EQU * u v P ADS A4,FCBDD1,A3 u P ADS A4,FCBDD2,A3 u PMOVT10 RTN A14 u P XIF u P IFT CREDIT+MMUPAG=2 u P u P ELR
0x2fbd00…2fbe94 (5, 420) Dummy {f00=0x00f2, f01=0x0190, f02=»DISPL. TO START u P ADK A3,WATFST A3=LENGTH v P ADR A1,A10 FROM-ADDRESS v 8 P CALL MOVING v X P ELR A4,A8 v l P EL A10,CIA,A4 v ~ P SUR A2,A10 NEW T:A-ADDRESS v " P SUR A1,A10 'OLD' T:A-ADDRESS v 8 P* COMPUTE AND STORE ADDRESSES TO DATA-SETS
0x2fbe94…2fc028 Dummy {f00=0x00f2, f01=0x0190, f02=»EAL TASK DATA PROCESSING? v ~ P RF(Z) MOVT05 NO! w " 8 P SUR A4,A1 ADJUST FOR OLD RELOCATION (OLD T:A-ADDR.) w < PMOVT05 EQU * w x P ADR A3,A2 START OF FCB w P TL* MMTO,13 LOAD TO-TABLE w P EL A10,FCBDD1,A3 w P ADR A10,A4 w P ES A10,FCBD
0x2fc028…2fc1bc Dummy {f00=0x00f2, f01=0x0190, f02=»TN A14 w P XIF x P EJECT x P x ( P x 0 P x 8 6 P** C M P A D R ** x @ 6 P** ** x z 6 P** ** x 6 P** COMPARE ADDRESSES. RES
0x2fc1bc…2fc350 Dummy {f00=0x00f2, f01=0x0190, f02=» ** x b 6 P** A9 ** y 6 P** OUTPUT: RESULT IN A14-STACK ** y F 6 P************************************************** y P y PCMPADR EQU * y P TNM A11,A9 y P RF(NN) CMPA10 y P CWR
0x2fc350…2fc4e4 Dummy {f00=0x00f2, f01=0x0190, f02=»T=0 y P EJECT z D P*************************************************************** z D P* * z b D P* ICBMVD - INDICATE CURRENT BLOCK MOVED * z D P* ===================
0x2fc4e4…2fc678 Dummy {f00=0x00f2, f01=0x0190, f02=»IN: MOVCOM * z D P* * { : D P* ENTRY: A8 - FIRST T:A POINTER * { D P* A6 - SECOND T:A POINTER
0x2fc678…2fc80c Dummy {f00=0x00f2, f01=0x0190, f02=» * { Z D P* EXIT: CORRESPONDING BIT IN CURRENT STATCK POINTER * | D P* IN T:A IS SET * | Z D P* * | D P* WORK REGISTERS: A1,A2
0x2fc80c…2fc9a0 Dummy {f00=0x00f2, f01=0x0190, f02=» * | z D P* * } 2 D P*************************************************************** } z P EJECT } PICBMVD EQU * } P LDKL A1,/8000 SET BIT 0 } 6 P LD
0x2fc9a0…2fcb34 (5, 421) Dummy {f00=0x00f3, f01=0x0190, f02=»UK A2,1 DECREMENT BIT COUNTER } P RB IBAM10 ~ & P* ~ 8 & P* UPDATE MOVED MASK IN FIRST T:A ~ B P* ~ l P XIF ~ v P IFT CREDIT-MMUPAG=1 ~ & PIBAM20 LDR* A2,A8 GET T:A POINTER ~ $ P LDR* A3,A2 GET MOVED BLOCK MASK ~ , P ORR A3,A1 INDICATE CURR
0x2fcb34…2fccc8 Dummy {f00=0x00f3, f01=0x0190, f02=»* A2,A6 GET T:A POINTER ~ $ P LDR* A3,A2 GET MOVED BLOCK MASK , P ORR A3,A1 INDICATE CURRENT BLOCK MOVED H * P STR A3,A2 STORE NEW MOVED BLOCK MASK x P XIF P IFT CREDIT+MMUPAG=2 $ PIBAM20 ELR A2,A8 GET T:A POINTER $ P ELR A3,A2 GET MOV
0x2fccc8…2fce5c Dummy {f00=0x00f3, f01=0x0190, f02=»MOVED MASK IN SECOND T:A P* P ELR A2,A6 GET T:A POINTER * $ P ELR A3,A2 GET MOVED BLOCK MASK L , P ORR A3,A1 INDICATE CURRENT BLOCK MOVED t * P ESR A3,A2 STORE NEW MOVED BLOCK MASK P XIF P IFF CREDIT=0 P RTN A14 P EJE
0x2fce5c…2fcff0 Dummy {f00=0x00f3, f01=0x0190, f02=» * ` J P* CHKMVD - CHECK IF BLOCK ALREADY MOVED * J P* ===================================== * l J P* * J P
0x2fcff0…2fd184 Dummy {f00=0x00f3, f01=0x0190, f02=» * V J P* ENTRY: A8 - POINTER TO T:A * J P* BIT - BIT NUMBER IN CWB- OR UWB-MASK * b J P* * J P* EXIT:
0x2fd184…2fd318 Dummy {f00=0x00f3, f01=0x0190, f02=»* L J P* WORK REGISTER: A1,A2 * J P* * X J P* SUBROUTINES: * J P*
0x2fd318…2fd4ac Dummy {f00=0x00f3, f01=0x0190, f02=» EJECT PCHKMVD EQU * P IFT CREDIT-MMUPAG=1 " P LDR* A1,A8 GET T:A POINTER > $ P LDR* A1,A1 GET MOVED BLOCK MASK b P XIF P IFT CREDIT+MMUPAG=2 P ELR A1,A8 GET T:A POINTER $ P ELR A1,A1 GET MOVED BLOCK MASK P XIF P
0x2fd4ac…2fd640 Dummy {f00=0x00f3, f01=0x0190, f02=»LL A1,1 NEXT BIT IN MOVED BLOCK MASK $ P SUK A2,1 DECREMENT BIT COUNTER , P RB CHKM10 T PCHKM20 ADK A1,0 SET CR f * P CFI A14,PSW,A13 PUT CONDITION IN PSW P RTN A14 P EJECT P P : P***** S * U * P * E * R * L
0x2fd640…2fd7d4 (5, 422) Dummy {f00=0x00f3, f01=0x018e, f02=» ** d : P** ** : P** CALCULATES BIT NUMBER SAT IN MASK-WORD ** P : P** INPUT : A7=MASK WORD ** : P** OUTPUT: BIT=BIT NUMBER ** :
0x2fd7d4…2fd968 Dummy {f00=0x00f3, f01=0x0190, f02=» PSHIFT EQU * " P CM BIT,A13 RESET BIT COUNTER P LDR A7,A7 > P RF SHIF20 P & PSKIFTA EQU * ENTRY: CONTINUE SHIFT b PSHIF10 IM BIT,A13 P SLL A7,1 PSHIF20 EQU * $ P RF(Z) SHIF30 NO MOORE BITS SAT P RB(NN) SHIF10 *
0x2fd968…2fdafc Dummy {f00=0x00f3, f01=0x0190, f02=»L T ** z 4 P** ** " 4 P** ** Z 4 P** MULTIPLICATION (A2) X A3(), A2#0 ** 4 P** ** 4 P** IN
0x2fdafc…2fdc90 Dummy {f00=0x00f3, f01=0x0190, f02=»****************** r PMULT EQU * P ST A3,MUL,A13 , " P STR A2,A14 SAVE A2 TEMPORARY B P LDK A3,0 h PADD AD A3,MUL,A13 z P SUK A2,1 P RB(NZ) ADD P LDR* A2,A14 P RTN A14 P P IFT MMUPAG=1 P EJECT
0x2fdc90…2fde24 Dummy {f00=0x00f3, f01=0x0190, f02=» ** 4 P** FIND LAST USED ENTRY IN MM-TAB. SCAN ** * 4 P** FROM LOW ADDRESS. NOT USED ENTRY=0. ** b 4 P** ** 4 P** INPUT :A3=MM-TABLE ADDRESS ** 4
0x2fde24…2fdfb8 Dummy {f00=0x00f3, f01=0x0190, f02=»TAB=A3 ** z 4 P** A1=CONTENTS OF 1:ST USED ENTRY ** " 4 P*********************************************** Z P PMMENT EQU * P LDR A9,A3 GET TABLE ADDRESS 6 P SUKL A9,MMBEG ADJUST A9 (LOOKS LIKE TTAB POINTER)
0x2fdfb8…2fe14c Dummy {f00=0x00f3, f01=0x0190, f02=»1,/FC00 P RB(Z) MMEN10 2 P ST A3,LSTPAG,A9 SAVE FIRST FREE PAGE-ADDRESS & P RTN A14 P XIF l P IFF CREDIT=0 x P EJECT P 2 P** G E T T A B ** 2 P** **
0x2fe14c…2fe2e0 Dummy {f00=0x00f3, f01=0x0190, f02=» ** | 2 P** INPUT :A8=POINTER TO T:A IN T:ATAB ** " 2 P** OUTPUT:A2=TTAB-ADDRESS ** X 2 P** A1=TID ** 2 P** WORKREGS:A3,A4,A10 ** 2 P**************
0x2fe2e0…2fe474 (5, 423) Dummy {f00=0x00f3, f01=0x018e, f02=»D A1,T:ATID,A10 GET TID TO MATCH " P LD A12,T:DAD,A10 T:D-ADDRESS ( P XIF N P IFT MMUPAG=1 Z P ELR A10,A8 T:A-ADDRESS p 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
0x2fe474…2fe608 Dummy {f00=0x00f3, f01=0x0190, f02=» * P LDR A3,A1 SAVE A1 (DEBUGGING PURPOS) P LDK A1,LMP5 TID ERROR 2 P CALL ERROR P " PGETT20 LDR* A2,A4 TTAB-ADDRESS d P CW A1,TTB:PP,A2 TCL EQUAL? P RB(NE) GETT10 NO! P ST A2,TTAB,A13 SAVE P RTN A14 P IFF CREDIT=0
0x2fe608…2fe79c Dummy {f00=0x00f3, f01=0x0190, f02=» ** d 8 P** ** 8 P** QUEUE TASK VIA 'ACTOT' AND SWITCH TO LEVEL ** L 8 P** 0, ENB. ** 8 P** ** 8 P** INPU
0x2fe79c…2fe930 Dummy {f00=0x00f3, f01=0x0190, f02=»SS ** x 8 P*************************************************** $ P ` PQUEJOB EQU * h P* QUEUE THIS TASK (THIS TID) | P 0 P LDKL A3,RETUR GET RETURN (FROM A15) ADDRESS P ADR A3,A13 RELOCATE P STR A3,A15 PUT
0x2fe930…2feac4 Dummy {f00=0x00f3, f01=0x0190, f02=»ABORT INDICATOR $ P LD A8,SCTLAC GET P:MTAB-ADDRESS P LDR A5,A2 GET TTAB-ADDRESS @ P IFT CREDIT-MMUPAG=1 d , P LD A4,WATLEN,A12 NUMBER OF WAT-ELEMENTS P ADK A4,2 P ANKL A4,/FFFE P ADK A4,DWBFST+4 8 P ADR A4,A12 ADD T:A-ADDR
0x2feac4…2fec58 Dummy {f00=0x00f3, f01=0x0190, f02=»ETT40 ALL! P LD A1,4,A4 DISP ADDRESS P LD A3,2,A4 SEGMENT NUMBER 2 , P LD A2,NTPA,A8 INTERPRETER START ADDRESS T P XIF P IFT CREDIT+MMUPAG=2 , P EL A4,WATLEN,A12 NUMBER OF WAT-ELEMENTS P ADK A4,2 P ANKL A4,/FFFE P ADK
0x2fec58…2fedec Dummy {f00=0x00f3, f01=0x0190, f02=»1 DEC. NUMBER OF STARTPOINTS P RF(N) GETT40 ALL! $ P EL A1,4,A4 DISP ADDRESS > P EL A3,2,A4 SEGMENT NUMBER ^ , P EL A2,NTPA,A8 INTERPRETER START ADDRESS P XIF P IFF CREDIT=0 P CF A15,ACTOT $ P ADK A4,STPREC NEXT START-POINT
0x2fedec…2fef80 Dummy {f00=0x00f3, f01=0x0190, f02=» P EJECT P 4 P** M O V M M T ** 4 P** ** R 4 P** ** 4 P** MOVE MM-TABLE ** 4 P**
0x2fef80…2ff114 (5, 424) Dummy {f00=0x00f3, f01=0x0190, f02=» ** j 4 P** OUTPUT:A2=START OF MM-TABLE IN TTAB ** 4 P** A9=TTAB ADDRESS ** J 4 P** WORKREGS:A1,A3 ** 4 P*********************************************** P PMOVMMT EQU *
0x2ff114…2ff2a8 Dummy {f00=0x00f3, f01=0x0190, f02=»T FILL LAST ENTRY ADDRESS P TL* MMFROM,A13 RELOAD TABLE " P RTN A14 F P XIF V P IFF CREDIT=0 b P EJECT x @ P************************************************************ @ P* *
0x2ff2a8…2ff43c Dummy {f00=0x00f3, f01=0x0190, f02=» R @ P* ====================================================== * @ P* * L @ P* * @ P* REFERENCED IN: SYSLDA PART 2 B.
0x2ff43c…2ff5d0 Dummy {f00=0x00f3, f01=0x0190, f02=» * @ P* A7 - POINTER TO NEXT FREE ENTRY IN REAL T:ATAB * @ P* * T @ P* EXIT: * @ P*
0x2ff5d0…2ff764 Dummy {f00=0x00f3, f01=0x0190, f02=» * d @ P* SUBROUTINES: GETTTB * @ P* * @ P************************************************************ PCHTAID EQU * 2 P LDR A8,A7 GET N
0x2ff764…2ff8f8 Dummy {f00=0x00f3, f01=0x0190, f02=» ENTRY IN REAL T:ATAB | P IFT CREDIT-MMUPAG=1 ( P LDR* A1,A8 GET POINTER TO REAL T:A : $ P LD A1,T:ATID,A1 GET TCL IN T:A f . PCHT:20 CALL GETTTB GET CORRESPONDING TTAB * P LD A4,TTBTID,A2 GET REAL TID IN TTAB 6 P LD A3,TTB:SA+26,A2 GET CO
0x2ff8f8…2ffa8c Dummy {f00=0x00f3, f01=0x0190, f02=» COMPUTE ENTRY IN AUX. TID TABLE ~ , P STR A4,A3 SAVE TID FOR DEBUGGER PURPOSE ( P XIF X P IFT CREDIT+MMUPAG=2 d & P ELR A1,A8 GET POINTER TO REAL T:A $ P EL A1,T:ATID,A1 GET TCL IN T:A . PCHT:20 CALL GETTTB GET CORRESPONDING TTAB ( P LDR
0x2ffa8c…2ffc20 Dummy {f00=0x00f3, f01=0x0190, f02=»TID IN TTAB *79-04-11* v 6 P LD A3,TTB:SA+26,A2 GET CORRESPONDING T:A-ADDRESS 2 P ES A4,T:ATID,A3 REPLACE TCL IN T:A *79-04-11* X 0 P EL* A3,T:ATNW,A13 GET LENGTH OF REAL T:ATAB $ P NGR A3,A3 NEGATIVE DISPLACEMENT . P ADR A3,A8 COMPUTE ENTRY IN AU
0x2ffc20…2ffdb4 (5, 425) Dummy {f00=0x00f4, f01=0x0190, f02=»L SAVE AREA z P SUK A1,1 DECREMENT TCL P SUKL A8,2 DECREMENT 4 ( P SUK A6,1 DECREMENT NUMBER OF COPIES P P RB(P) CHT:20 NEXT COPY | PCHT:90 RTN A14 P EJECT P P 4 P************************************************ 4 P
0x2ffdb4…2fff48 Dummy {f00=0x00f4, f01=0x0190, f02=» ** x 4 P************************************************ P X 4 P* BUILD REAL T:A'S. COPY T:A'S ACCORDING TO * ` 4 P* SHADOW TABLE * 4 P* * 4 P
0x2fff48…3000dc Dummy {f00=0x00f4, f01=0x0190, f02=»A MONITOR END ADDRESS . P LD A8,T:ATOD,A13 T:ATAB PROTOTYP ADDRESS * P LD A7,T:ATNW,A13 REAL T:ATAB ADDRESS P P ADK A7,2 ~ P ST A8,SAVE03,A13 SAVE A8 & PSYA310 LD A8,SAVE03,A13 RESTORE A8 P ADKL A8,2 P CW A8,ENDADD,A13 ALL?
0x3000dc…300270 Dummy {f00=0x00f4, f01=0x0190, f02=»TTAB GET CORRESPONDING TTAB AND QUEUE P CALL QUEJOB . : P ST A10,TTB:SA+26,A2 SAVE T:A ADDR. IN TTAB (SAVE-A13) B " P LD A1,SCTOPT GET OPTION WORD P ANK A1,2 DISC PAGING? P RF(Z) SYA320 NO! P LDR A1,A10 GET T:A-ADDRESS 0 P ADKL
0x300270…300404 Dummy {f00=0x00f4, f01=0x0190, f02=» STORE IN REAL T:ATAB P ADK A7,2 $ P LDR* A6,A5 GET NUMBER OF COPIES 0 P EJECT X PSYA340 SUK A6,1 f P RF(P) SYA345 NEXT TASK ~ 2 P CALL CHTAID REPLACE TCL:S IN THIS TASK-CLASS P RB SYA310 NEXT TASK-CLASS * PSYA345 LD A12,T:DA
0x300404…300598 Dummy {f00=0x00f4, f01=0x0190, f02=»8,A7 CHANGE T:A TO COPY 2 P CALL GETTAB GET CORRESPONDING TTAB AND QUEUE P CALL QUEJOB QUEUE THIS TASK V 2 P ST A10,TTB:SA+26,A2 SAVE T:A-ADDRESS IN TTAB z " P LD A1,SCTOPT GET OPTION WORD P ANK A1,2 DISC PAGING? P RF(Z) SYA348 NO!
0x300598…30072c Dummy {f00=0x00f4, f01=0x0190, f02=»48 ADK A7,2 NEXT ENTRY IN REAL T:ATAB 2 P CALL TWBSWB MOVE TWB'S AND RESERVE FOR SWB'S . " P CALL ALLBUF ALLOCATE BUFFERS d P XIF P IFT CREDIT+MMUPAG=2 * P* GET ACTUAL MM-TABLE ADDRESS AND LOAD P P LDR A1,A5 * P AD* A1,SCTSFA
0x30072c…3008c0 Dummy {f00=0x00f4, f01=0x0190, f02=»GETTAB GET CORRESPONDING TTAB : P ST A10,TTB:SA+26,A2 SAVE T:A ADDR. IN TTAB (SAVE-A13) & P LDR A1,A10 GET T:A-ADDRESS d 0 P ADKL A1,CSB ADDRESS TO CURRENT SEGMENT BASE " P ST A1,TTB:CB,A2 STORE IN TTAB 0 P LD A1,T:DSAV,A2 GET CLASS-LOCAL LAST
0x3008c0…300a54 (5, 426) Dummy {f00=0x00f4, f01=0x0190, f02=»ATA TABLE | , P* REMOVE TASK-LOCAL ENTRIES IN MM-TABLE P B P SUK A2,2 START OF TABLE J P LDKL A12,/FC00 j PSYA320 SUK A1,2 NEXT ENTRY P CWR A1,A2 ALL? P RF(E) SYA330 YES! P STR A12,A1 REMOVE ENTRY P RB SYA320 P
0x300a54…300be8 Dummy {f00=0x00f4, f01=0x0190, f02=»L A1,T:ATID,A1 GET TID ( P ADK A7,2 NEXT ENTRY IN REAL T:ATAB $ P LDR* A6,A5 GET NUMBER OF COPIES J PSYA340 SUK A6,1 r P RF(P) SYA345 NEXT TASK 2 P CALL CHTAID REPLACE TCL:S IN THIS TASK-CLASS P RB SYA310 NEXT TASK-CLASS PSYA345
0x300be8…300d7c Dummy {f00=0x00f4, f01=0x0190, f02=» TO TTAB v 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:A-ADDRESS IN TTAB. A9=TTAB ADDRESS V P LDR A8,A2 GET T:A-ADDRESS 0 P ADKL A8,CSB ADDRESS TO CURRENT SEGMENT BASE " P ST A8,TTB:CB,A9 STORE I
0x300d7c…300f10 Dummy {f00=0x00f4, f01=0x0190, f02=»WB MOVE TWB'S & RESERVE FOR SWB'S P LD A1,MMTO,A13 GET TO-TABLE * . P ST A1,MMFROM,A13 CHANGE T:A ADDRESS-TABLE N P TLR A1 " P CALL ALLBUF ALLOCATE BUFFERS $ P LD A1,TTAB,A13 GET TTAB-ADDRESS * P CM LSTPAG,A1 CLEAR SAVE-AREA IN TTAB
0x300f10…3010a4 Dummy {f00=0x00f4, f01=0x0190, f02=» T:A t P XIF P IFF CREDIT=0 P RB SYA340 . P XIF @ P EJECT L PFINISH EQU *-REL Z P r P* ADJUST START OF FREE AREA z P PSYA350 EQU * P IFF CREDIT=0 * P LD A1,LSTADR,A13 GET END OF FREE AREA . P LD A14,SA
0x3010a4…301238 Dummy {f00=0x00f4, f01=0x0190, f02=»2 P ORR A1,A2 P XIF P IFF CREDIT=1 ( P LD A1,SCTLAC > P XIF T P IFT MMUPAG-CREDIT=1 ` P ANKL A1,/03FF | P SLL A1,2 P XIF P ST A1,SCTEFA+2 P IFT CREDIT=1 P LD A1,FYSPAG,A13 P IFT MMUPAG-CRED
0x301238…3013cc Dummy {f00=0x00f4, f01=0x0190, f02=» P IFT CREDIT-MMUPAG=1 ( P LD A1,FSTADR,A13 START OF FREE AREA $ P RF(NZ) SYA355 P P XIF f P LD A1,SCTSFA r PSYA355 ST A1,SCTSFA+2 P CM SCTSFA P IFT CREDIT=1 P EJECT D ?********************************************
0x3013cc…301560 Dummy {f00=0x00f4, f01=0x0190, f02=»E TABLE * l D ?* ========================= * $ D ?* * l D ?* REFERENCED IN: SYSLDA * D ?*
0x301560…3016f4 (5, 427) Dummy {f00=0x00f4, f01=0x0190, f02=» SCTEFA - END OF FREE AREA * D P* SAVE29 - NUMBER OF SEGMENTS * D D ?* SCTNOP - NUMBER OF PAGES * D ?* SCTPSZ - PAGE SIZE
0x3016f4…301888 Dummy {f00=0x00f4, f01=0x0190, f02=» * d D ?* EXIT: PAGQUE - POINTER TO FIRST FREE PAGE BLOCK * D ?* PAGQUE+2 - POINTER TO LAST FREE PAGE BLOCK+2 * d D ?* * D ?* WORK REGISTERS:
0x301888…301a1c Dummy {f00=0x00f4, f01=0x0190, f02=»ES: * D ?* * < D ?* * D ?************************************************************
0x301a1c…301bb0 Dummy {f00=0x00f4, f01=0x0190, f02=»ATION? h P ABR(Z) A2 NO! " LD A1,SCTOPT GET OPTION WORD $ ANK A1,3 PAGING? J P ABR(Z) A2 NO! d * z L G* RESERV SPACE FOR PAGE BLOCKS CORRESPONDING TO CORE RESIDENT SEGMENTS * , ' LD A11,SCTSFA+2 GET START OF FREE AREA
0x301bb0…301d44 Dummy {f00=0x00f4, f01=0x0190, f02=» A7,0 RESET PAGE COUNTER PAG:10 EQU * , ' CW A7,SCTNOP EQUAL TO NUMBER OF PAGES? 4 RF(E) PAG:30 YES! d $ LDK A1,0 RESET NUMBER OF WORDS ~ PAG:20 EQU * " ADKL A11,2 INCLUDE NEXT WORD 0 + RF(Z) MEMOFL MEMORY OVERFLOW (64 KB LIM
0x301d44…301ed8 Dummy {f00=0x00f4, f01=0x0190, f02=»RAM OVERWRITE z " RF(E) MEMOFL MEMORY OVERFLOW! RB PAG:20 < 0 ,PAG:25 ADK A7,1 INCREMENT PAGE BLOCK COUNTER N RB PAG:10 PAG:30 EQU * * 4 /* RESERV MEMORY PAGES IN UNUSED PART OF MEMORY 6 2* AND EXTEND PAGE TABLE WITH
0x301ed8…30206c Dummy {f00=0x00f4, f01=0x0190, f02=»BITS OF 18-BITS ADDRESS p 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 X & ! SRL A2,2 SKIP TWO RIGHTMOST BITS , P ORR A1,A2 16 BITS PHYSICAL PAGE ADDRESS P LDR A3,A1 SAVE LD A2
0x30206c…302200 Dummy {f00=0x00f4, f01=0x018e, f02=»RESS h ( # ANKL A2,/0300 MODIFY FOR PAGE SIZE P ANR A2,A3 EVEN 1-KB LIMIT 8 ( $ ORR A1,A2 MODIFY PAGE ADDRESS LIMIT Z P XIF P IFT CREDIT-MMUPAG=1 $ P LD A1,SCTEFA+2 END OF FREE AREA P LD A10,SCTPSZ PAGE SIZE P XIF P IFT C
0x302200…302394 (5, 428) Dummy {f00=0x00f4, f01=0x0190, f02=» P CWR A10,A6 P RF PAG:33 PPAG:32 CWR A6,A10 * PPAG:33 RF(NG) PAG:40 D , P SUR A6,A10 COMPUTE ADDRESS TO NEXT PAGE ` LDR A1,A6 GET PAGE ADDRESS P IFT CREDIT+MMUPAG=2 * & ANKL A1,/C000 ADDRESS IN SYSTEM AREA? RF(NZ) PA
0x302394…302528 Dummy {f00=0x00f4, f01=0x018e, f02=»PAG:34 LDK A1,0 END OF FREE AREA P XIF ( P IFT CREDIT=1 4 & "PAG:36 LDK A2,0 RESET WORD COUNTER J * %PAG:38 ADKL A11,2 RESERV ANOTHER WORD t RF(Z) PAG:40 64 KB LIMIT $ ADK A2,1 INCREMENT WORD COUNTER CWK A2,4 BLOCK COMPLETE?
0x302528…3026bc Dummy {f00=0x00f4, f01=0x0190, f02=» P RF(NN) PAG382 P CWR A11,A1 P RF PAG384 . PPAG382 CWR A1,A11 @ 4 PPAG384 RF(NG) PAG:40 NO MOORE MEMORY AVALIABLE! Z PPAG:39 EQU * " CWR A11,A8 PROGRAM OVERWRITE RB(NE) PAG:38 NO! PAG:40 EQU * 6 1 CW A7,SCTNOP
0x3026bc…302850 Dummy {f00=0x00f4, f01=0x0190, f02=» RF(E) PAG:50 YES! MEMOFL LDKL A1,LMP3 * & OTR A1,0,SOP INDICATE MEMORY OVERFLOW : HLT HALT PROGRAM h 0 PPAG:45 CW A7,SAVE29,A13 MOORE PAGES WANTED? RF(E) PAG:50 YES! $ ADK A7,1 INCREMENT PAGE COUNTER LDR A9,A6 SAVE
0x302850…3029e4 Dummy {f00=0x00f4, f01=0x0190, f02=»NOP SAVE NUMBER OF PAGES ( $ LDR A1,A9 GET ADDRESS TO FIRST PAGE LDR A2,A1 SAVE L P XIF d P IFT CREDIT+MMUPAG=2 p * P SRL A1,14 BIT 0-1 OF 18-BITS ADDRESS ST A1,SCTEFA SAVE . * SLL A2,2 GET BITS 2-15 OF 18-BITS ADDRESS P X
0x3029e4…302b78 Dummy {f00=0x00f4, f01=0x0190, f02=»TORE PAGE BLOCK ADDRESS IN SEGMENT BLOCKS * 2 LDK A1,0 < @ ; LD A8,SAVE22,A13 PHYSICAL ADDRESS TO FIRST CORE RES. SEGM. N . P LD A11,SAVE30,A13 START OF SEGMENT TABLE , ( LDK A4,0 RESET RESIDENT SEGMENT COUNTER & " LD A12,SCTPAG START
0x302b78…302d0c Dummy {f00=0x00f4, f01=0x0190, f02=» GET STATUS . ) RF(NN) PAG:65 SEGMENT NOT LOADED IN CORE * & ST A12,6,A11 STORE PAGE BLOCK ADDRESS F , ' STR A1,A12 RESET QUEUE POINTER FORWARD t . ) ST A1,2,A12 RESET QUEUE POINTER BACKWARD $ ST A8,4,A12 STORE PAGE ADDRESS . ) ST A11,6,
0x302d0c…302ea0 Dummy {f00=0x00f4, f01=0x0190, f02=»DKL A12,8 NEXT PAGE BLOCK 4 /PAG:65 SUK A6,1 DECREMENT SEGMENT BLOCK COUNTER " RB(P) PAG:60 Z * p < 8* INITIATE PAGE BLOCK FOR FREE PAGES AND LINK TO PAGQUE z * CWR A4,A7 ANY FREE BLOCKS? P RF(E) PAG:90 NO! 4 / ST A1
0x302ea0…303034 (5, 429) Dummy {f00=0x00f5, f01=0x0190, f02=» d LDK A2,0 . *PAG:70 ST A11,2,A12 STORE BACKWARD POINTER $ ST A9,4,A12 STORE PAGE ADDRESS L $ ST A2,6,A12 INDICATE PAGE FREE t * & ADK A4,1 INCREMENT PAGE BLOCK COUNTER CWR A4,A7 LAST PAGE BLOCK? RF(E) PAG:80 YES! , '
0x303034…3031c8 Dummy {f00=0x00f5, f01=0x0190, f02=»DR A12,A1 NEXT PAGE BLOCK ADR A9,A10 NEXT PAGE " RB PAG:70 @ PAG:80 EQU * R & ! LDKL A1,PAGQUE POINTER TO PAGQUE f $ STR A1,A12 STORE IN LAST BLOCK & " ST A12,PAGQUE+2 STORE IN PAGQUE+2 PPAG:90 EQU * PPAGEX EQU *-REL
0x3031c8…30335c Dummy {f00=0x00f5, f01=0x0190, f02=»DIT=0 , P LD A14,SCTLAC TRUE START OF APPLICATION P XIF > P =1 J P =1 X P =1 f P SUKL A14,8 ADJUST FOR MAP t * P ADKL A13,SYA360 CONTINUATION ADDRESS $ P LDK A1,0 INDICATE SYSLOAD ENDED P OTR A1,0,SOP $ P LD A1
0x30335c…3034f0 Dummy {f00=0x00f5, f01=0x0190, f02=»3,SYA370 RESTORE PROGRAM BASE OINTER P* , P* INIT A15 STACK 6 P* P P LD A15,SCTSTB Z P SUKL A15,4 p P P* START APPLICATION P . P LD A1,IHRTC GET INTERRUPT ADDRESS FOR RTC P ST A1,SAVRTC,A13 SAVE 4 P LDKL A1
0x3034f0…303684 Dummy {f00=0x00f5, f01=0x0190, f02=» INITIALIZE DEVICES P CF A15,SAVE8 SAVE REGISTERS P* @ F P* WAIT APPROXIMATELY 0.62 SECONDS BEFORE BRANCHING TO DISPATCHER J P* P LDKL A1,/FFFF SET COUNTER PDELAY SRC A2,31 P SUK A1,1 P RB(NZ) DELAY P INH
0x303684…303818 Dummy {f00=0x00f5, f01=0x0190, f02=»ES =1 ~ P* =1 P CIO A1,0,SOP =1 $ P ABL TDISP BRANCH TO DISPATCHER : P =1 b P =1 p P =1 ~ P =1 P* * P* TEMPORARY INTERRUPT ROUTINE FOR RTC P* PIHRTCO EQU *-REL P RIT RTCDA P R
0x303818…3039ac Dummy {f00=0x00f5, f01=0x0190, f02=» *** 6 P** SYSLOAD PART 2.A ** * 6 P** ** d 6 P************************************************* P 6 P* BUILD COMMON AND TASKCLASS DATA AREA
0x3039ac…303b40 Dummy {f00=0x00f5, f01=0x0190, f02=»*********************************************** P 8 PPART2A EQU *-REL @ P X 0 P******************************************** ` 0 P*** *** 0 P** S U B R O U T I N E S ** 0 P************
0x303b40…303cd4 (5, 430) Dummy {f00=0x00f5, f01=0x0190, f02=» ** | 4 P** ** $ 4 P** GET T:D - ADDRESS ** 4 P** ** 4 P** INPUT : A8=POINTER TO T:A (IN T:ATAB) ** 4 P**
0x303cd4…303e68 Dummy {f00=0x00f5, f01=0x0190, f02=»DIT-MMUPAG=1 P LDR* A12,A8 T:A ADDRESS P LD A12,T:DAD,A12 4 P XIF N P IFT CREDIT+MMUPAG=2 Z P ELR A12,A8 T:A ADDRESS v P EL A12,T:DAD,A12 P XIF P IFF CREDIT=0 P AD A12,MOVADD,A13 RELOCATE P RTN A14 P E
0x303e68…303ffc Dummy {f00=0x00f5, f01=0x0190, f02=» ** f 6 P** ** 6 P** SEARCH T:A'S FOR COMMON WORK BLOCKS THAT ** J 6 P** ARE COMMON TO AT LEAST TWO T:A'S, AND MOVE ** 6 P** TO COMMON AREA ** 6 P**
0x303ffc…304190 Dummy {f00=0x00f5, f01=0x0190, f02=»ASK ** l 6 P** ENDADD=ENDADDRESS OF T:ATAB ** 6 P** TADISP=W.B.-ADDR DISPLACEM. IN T:A ** P 6 P** WORK.REGS: A1-A6,A9,A11,A12 ** 6 P************************************************* P
0x304190…304324 Dummy {f00=0x00f5, f01=0x0190, f02=»A-DISPL b ( P ST A11,SAVE06,A13 SAVE W.B.-ADDRESS ( P CM MOVED,A13 CLEAR MOVED INDICATOR < P LDR A6,A8 h PMOVC10 ADK A6,2 NEXT T:A z P CW A6,ENDADD,A13 ALL DONE? P RF(NE) MOVC30 NO PMOVC20 RTN A14 YES! P IFT CREDIT-MMUPAG=1
0x304324…3044b8 Dummy {f00=0x00f5, f01=0x0190, f02=»D A2,WATLEN,A2 NUMBER OF WAT-ELEMENTS P CW A2,BIT,A13 ENOUGHT? . 6 P RB(NG) MOVC10 TO FEW WAT ELEMENTS. TAKE NEXT T:A N . P AD A11,TADISP,A13 W.B.-ADDRESS TO EXAMINE P LDR* A11,A11 . P CW A11,SAVE06,A13 COMPARE W.B.-ADDRESSES P XIF
0x3044b8…30464c Dummy {f00=0x00f5, f01=0x0190, f02=»,SAVE03,A13 SAVE T:D-ADDRESS TEMPORARY , P EL A2,WATLEN,A2 NUMBER OF WAT-ELEMENTS . P CW A2,BIT,A13 ENOUGHT? ^ 6 P RB(NG) MOVC10 TO FEW WAT ELEMENTS. TAKE NEXT T:A ~ . P AD A11,TADISP,A13 W.B.-ADDRESS TO EXAMINE P ELR A11,A11 . P CW A11,SA
0x30464c…3047e0 Dummy {f00=0x00f5, f01=0x0190, f02=»D? n . P RF(NZ) MOVC50 YES! CHANGE ADDRESSES ONLY & P CALL MOVDT MOVE DESCRIPTOR-TABLE < & P ST A2,NEWAD1,A13 SAVE D.T.-ADRESS f P CALL MOVWB MOV WORK BLOCK P IM MOVED,A13 INDICATE MOVED P LD A4,UWB,A13 UWB-BLOCKS? P RF(Z) MOVC40 NO
0x3047e0…304974 (5, 431) Dummy {f00=0x00f5, f01=0x0190, f02=»CHADR CHANGE ADDRESSES . P CALL ICBMVD INDICATE CURRENT BLOCK MOVED P LDR A11,A8 SAVE T:A-POINTER P ( P ST A12,SAVE25,A13 SAVE T:A-ADDRESS t & P LDR A8,A6 REPLACE POINTER TO T:A * P LD A12,SAVE03,A13 REPLACE T:D-ADDRESS P CALL MOVDWB
0x304974…304b08 Dummy {f00=0x00f5, f01=0x0190, f02=» G E T P R O ** 4 P** ** . 4 P** ** f 4 P** SEARCH U:BTAB PROTOTYPE AND GET NUMBER OF ** 4 P** COPIES. FILL REAL U:BTAB **
0x304b08…304c9c Dummy {f00=0x00f5, f01=0x0190, f02=»T W.B. - ADDRESS ** ~ 4 P** OUTPUT: A2=NEW ADDRESS ** & 4 P** WORK-REGS: A1-A5,A9 ** ^ 4 P************************************************ P PGETPRO EQU * ( P LD A3,U:BTOD,A13 GET U:BT
0x304c9c…304e30 Dummy {f00=0x00f5, f01=0x0190, f02=»ENGTH d P RF(NN) GETP20 P LDK A1,LMP6 W.B. NOT FOUND! $ P CALL ERROR H PGETP20 EQU * P CW A11,UPADDR,A3 SAME W.B.? p , P RF(E) GETP30 YES! GET NUMBER OF COPIES P ADK A3,UP:REC NEXT P RB GETP10 P 0 P* GET NUMB
0x304e30…304fc4 Dummy {f00=0x00f5, f01=0x0190, f02=»11 W.B.-LENGTH * P LC A5,UPNUMB,A3 GET NUMBER OF COPIES P ANK A5,/FF D , P SU A3,U:BTOD,A13 GET TABLE DISPLACEMENT X . P AD A3,U:BTNW,A13 ADD TO NEW TABLE ADDRESS P LDR A9,A3 " P ST A4,URLENG,A9 STORE LENGTH * P ST A5,URNUMB,A9 STORE
0x304fc4…305158 Dummy {f00=0x00f5, f01=0x0190, f02=»1 ONE ALREADY MOVED (IN 'MOVCOM') P RF(NP) GETP50 * PGETP40 CALL MOVWB @ P SUK A5,1 Z P RB(NZ) GETP40 l P & P* UPDATE POINTER IN REAL U:BTAB * & P********************************* PGETP50 EQU * 6 P ST A2,URADDR,A9 S
0x305158…3052ec Dummy {f00=0x00f5, f01=0x0190, f02=»:REC SUB RECORD LENGTH FRM TABLE LENGTH P RF(NN) GETP20 0 P LDK A1,LMP6 W.B. NOT FOUND! F P CALL ERROR j PGETP20 EQU * ~ ( P EL A10,UPADDR,A3 CHECK IF SAME W.B. P CWR A11,A10 , P RF(E) GETP30 YES! GET NUMBER OF COPIES P ADK A
0x3052ec…305480 Dummy {f00=0x00f5, f01=0x018e, f02=» IN U:BTAB * p 0 P******************************************** P H PGETP30 EQU * P P EL A4,WBLEN,A11 W.B.-LENGTH d , P EL A5,UPNUMB-1,A3 GET NUMBER OF COPIES P ANK A5,/FF , P SU A3,U:BTOD,A13 GET TABLE DISPLACEMENT . P AD A3,U:BTN
0x305480…305614 (5, 432) Dummy {f00=0x00f5, f01=0x0190, f02=» " P ES A4,URLENG,A9 STORE LENGTH & P TL* MMFROM,A13 RELOAD FROM TABLE * 0 P* COPY NUMBER OF WORKBLOCKS TO COMMON AREA * T 0 P******************************************** . P SUK A5,1 ONE ALREADY MOVED (IN 'MOVCOM') P RF(NP) GETP50 PGETP
0x305614…3057a8 Dummy {f00=0x00f5, f01=0x0190, f02=»************* | PGETP50 EQU * P TL* MMTO,A13 * 6 P ES A2,URADDR,A9 ESORE ADDRESS TO FIRES IN U:BTAB @ P TL* MMFROM,A13 z P XIF P IFF CREDIT=0 P RTN A14 P EJECT P 2 P** M O V C L A
0x3057a8…30593c Dummy {f00=0x00f5, f01=0x0190, f02=»B. ALREADY MOVED TO COMMON ** 2 P** AREA. IF NOT MOVE W.B. & D.T. AND ** & 2 P** CHECK IF ANY DWB'S ** 2 P** ** 2 P** A LOT OF WORKREGS. ** 2 P**********
0x30593c…305ad0 Dummy {f00=0x00f5, f01=0x0190, f02=»-ADDRESS TO A11 z & P CALL CHKMVD BLOCK ALREADY MOVED? P RF(NN) MVCL40 NO! B , PMVCL20 CALL SKIFTA GET NEXT BIT IN MASK P RB(NZ) MVCL10 PMVCL30 RTN A14 PMVCL40 CALL MOVDT P CALL MOVWB P LD A4,UWB,A13 UWB-SCANNING
0x305ad0…305c64 Dummy {f00=0x00f5, f01=0x0190, f02=»WB'S z P RB MVCL20 P EJECT P , P 8 6 P** C H A D R ** D 6 P** ** ~ 6 P** ** 6 P** CHANGE ADDRESS TO
0x305c64…305df8 Dummy {f00=0x00f5, f01=0x0190, f02=» ** f 6 P** INPUT : A6=POINTER IN T:ATAB TO T:A ** 6 P** NEWADR1=NEW D.T.-ADDRESS ** J 6 P** NEWAD2= NEW W.B.-ADDRESS ** 6 P** TADISP=DISPLACEMENT TO WB-ADDR ** 6 P** WORK.REGS: A
0x305df8…305f8c Dummy {f00=0x00f5, f01=0x0190, f02=» CREDIT-MMUPAG=1 P LDR* A1,A6 T:A-ADDRESS . P AD A1,TADISP,A13 ADDRESS TO W.B.-ADDRESS 8 P LD A2,NEWAD2,A13 j P STR A2,A1 & P SUK A1,2 ADDRESS TO D.T.-ADDRESS P LD A2,NEWAD1,A13 P STR A2,A1 P XIF P IFT CREDIT+MMUP
0x305f8c…306120 Dummy {f00=0x00f5, f01=0x0190, f02=» SUK A1,2 ADDRESS TO D.T.-ADDRESS P LD A2,NEWAD1,A13 * P ESR A2,A1 D P XIF V P IFF CREDIT=0 b P RTN A14 x P XIF P IFT CREDIT+SWPBLK=2 P EJECT B P************************************************************** B P*
0x306120…3062b4 (5, 433) Dummy {f00=0x00f6, f01=0x0190, f02=»* B:RSWT - BUILD REAL SWB CONTROL TABLE * B P* ===================================== * F B P* * B P* REFERENCED IN: SYSLDA
0x3062b4…306448 Dummy {f00=0x00f6, f01=0x0190, f02=»BTAB * ^ B P* A5 - LENGTH OF REAL S:BTAB * B P* * Z B P* EXIT: * B P*
0x306448…3065dc Dummy {f00=0x00f6, f01=0x0190, f02=» * r B P* SUBROUTINES: * ( B P* * n B P************************************************************** P EJECT P
0x3065dc…306770 Dummy {f00=0x00f6, f01=0x0190, f02=» IN APPLICATION z P LDR* A3,A1 NUMBER OF TYPES P RF(Z) RSWBEX NO MOORE < P LDK A6,0 Z P SUK A5,2 SKIP LENGTH WORD l PRSWB10 ADK A1,2 NEXT TYPE P LDR* A4,A1 POINTER TO BLOCK P LCR A6,A4 NUMBER OF COPIES $ P LD A7,SWBLEN,A4
0x306770…306904 Dummy {f00=0x00f6, f01=0x0190, f02=»B IN BYTES r P XIF P IFT CREDIT+SWBMMU=2 & P ST A6,2,A2 STORE NUMBER OF COPIES : , P ST A7,4,A2 STORE LENGTH OF SWB IN BYTES d P XIF P IFT CREDIT+SWPBLK=2 & P SUK A5,6 DECREMENTS S:BTAB LENGTH ( P ADK A2,6 INCREMENT POINTER IN BLO
0x306904…306a98 Dummy {f00=0x00f6, f01=0x018e, f02=»OR EACH SWB TYPE p ( P* AND RESET ALL WORDS IN TID BLOCKS P* D PRSWB20 EQU * N ( P LDR A6,A2 GET ADDRESS TO TID BLOCK b $ P SUR A6,A8 COMPUTE DISPLACEMENT P IFT CREDIT+SWBMMU=2 P LD A1,2,A8 NUMBER OF COPIES P RF(Z) RSWB50 NO C
0x306a98…306c2c Dummy {f00=0x00f6, f01=0x0190, f02=» f . P SUK A5,2 DECREMENT LENGTH OF REAL S:BTAB $ P SUK A1,1 DECR. NUMBER OF COPIES : P RB(P) RSWB30 NEXT COPY b P XIF P IFT CREDIT+MMUSWB=3 $ P EL A1,2,A8 GET NUMBER OF COPIES P RF(Z) RSWB50 NO COPIES! * P ESR A6,A8 STORE POINT
0x306c2c…306dc0 Dummy {f00=0x00f6, f01=0x0190, f02=»REAL S:BTAB r ( P SUK A1,1 DECREMENT NUMBER OF COPIES P RB(P) RSWB40 NEXT COPY @ P XIF ` P IFT CREDIT+SWPBLK=2 l PRSWB50 ADKL A8,6 P CWR A8,A4 P RB(NE) RSWB20 " P LDR A5,A5 S:BTAB CONSISTENT? P RF(Z) RSWBEX YES P
0x306dc0…306f54 (5, 434) Dummy {f00=0x00f6, f01=0x018e, f02=»********************** " P* START OF PROGRAM PART 2.A * " P***************************** D P j P* LOAD BASE ADDRESS * r P********************* P* A5=START-ADDRESS P* A9=P:MTAB ADDRESS P* SAVE03=DDIV TO-ADDRESS P* SA
0x306f54…3070e8 Dummy {f00=0x00f6, f01=0x0190, f02=» ~ " P LDR A8,P LOAD TEMP. STACKBASE ( P ADK A5,2 ADD FOR RELOCATION ROUTINE . P CFR A8,A5 Z P* MOVE DDIV * l P & P LD A1,SAVE04,A13 GET FROM-ADDRESS $ P LD A2,SAVE03,A13 GET TO ADDRESS . P LDR A3,A9 GET P:MTAB START (=END OF DDIV
0x3070e8…30727c Dummy {f00=0x00f6, f01=0x0190, f02=»OSGMT NO! ( P LDKL A8,0 RESET FSTADR IF SEGMENTS! P RF SEGMTS > 2 PNOSGMT LD A8,SCTSFA ALLOCATE BUFFERS FROM TOP P " PSEGMTS ST A8,FSTADR,A13 STORE PMOVNXT LDR* A4,A1 GET WORD P STR A4,A2 STORE P ADK A1,2 P ADK A2,2
0x30727c…307410 Dummy {f00=0x00f6, f01=0x0190, f02=» MM-TABLE x P " P LDR A1,A9 GET P:MTAB ADDRESS $ P SRL A1,11 ADJUST FOR ADDRESSING @ P ANK A1,/1E h & P LDK A2,MMTAB-2 GET TABLE ADDRESS | P ADR A2,A13 RELOCATE " P ADR A1,A2 P:MTAB START ENTRY P LDKL A4,/FC00 PSYA205 CWR
0x307410…3075a4 Dummy {f00=0x00f6, f01=0x0190, f02=» EQU * P* CHANGE TABLE-ADDRESSES P LD A4,MMFROM,A13 . P LD A5,MMTO,A13 H P ST A4,MMTO,A13 ` P ST A5,MMFROM,A13 x P XIF P IFF CREDIT=0 P ANKL A9,/FFFE EVEN ADDRESS , P ST A9,LSTADR,A13 SAVE END OF FREE AREA P
0x3075a4…307738 Dummy {f00=0x00f6, f01=0x0190, f02=»RENT MM-TABLE z P ADR A3,A13 , P* FIND LAST USED ENTRY IN REAL MMUTAB * * P Z P CALL MMENT b P ST A9,TTAB,A13 v * P ST A1,FYSPAG,A13 SAVE PHYSICALL PAGE * P LD A3,SAVE05,A13 GET LENGTH OF T:ATAB P LDR A5,A3 SAVE * P CALL
0x307738…3078cc Dummy {f00=0x00f6, f01=0x0190, f02=»SAVE NEW T:ATAB ADDRESS ~ P ADK A2,2 SKIP LENGTH WORD $ P LD A9,SCTLAC GET P:MTAB ADDRESS B $ P ES A2,T:ATAB,A9 STORE IN P:MTAB j $ P* RESERVE PLACE FOR T:AID TABLE P P LDR A3,A5 GET LENGTH P CALL MOVING P TL* MMTO,A13
0x3078cc…307a60 Dummy {f00=0x00f6, f01=0x0190, f02=»ADJUST TABLE ADDRESS P ESR A2,A3 STORE IN P:MTAB P XIF > P IFF CREDIT=0 J ( P LD A3,SAVE06,A13 GET U:BTAB LENGTH ` P LDR A5,A3 SAVE P CALL MOVING RESERVE SPACE 4 P ST A2,U:BTNW,A13 SAVE NEW (REAL) U:BTAB ADDRESS P IFT CREDI
0x307a60…307bf4 (5, 435) Dummy {f00=0x00f6, f01=0x0190, f02=»,SAVE05,A13 GET LENGTH OF T:ATAB P LDR A5,A3 SAVE ( * P CALL MOVING RESERVE SPACE FOR T:ATAB @ " P STR A5,A2 STORE T:ATAB LENGTH n . P ST A2,T:ATNW,A13 SAVE NEW T:ATAB ADDRESS P ADK A2,2 & P ST A2,T:ATAB,A9 SAVE REAL ADDRESS P* RESE
0x307bf4…307d88 Dummy {f00=0x00f6, f01=0x018e, f02=»ENGTH-WORD z , P ST A2,T:AID,A9 STORE ADDRESS IN P:MTAB P XIF B P IFT CREDIT+MMUPAG=2 N $ P TL* MMTO,A13 SET CORRECT TABLE j P ESR A5,A2 STORE LENGTH P ADK A2,2 SKIP LENGTH WORD $ P ES A2,U:BTAB,A9 STORE IN P:MTAB P XIF P
0x307d88…307f1c Dummy {f00=0x00f6, f01=0x0190, f02=» f P LDR A5,A3 SAVE P CALL MOVING P ST A2,S:BTNW,A13 4 P XIF N P IFT CREDIT+MMUSWB=3 Z P TL* MMTO,A13 v P ESR A5,A2 P ADK A2,2 P ES A2,S:BTAB,A9 P CALL B:RSWT P XIF P IFT CREDIT+SWBMMU=2 P STR
0x307f1c…3080b0 Dummy {f00=0x00f6, f01=0x018e, f02=»AD TABLE | P XIF P IFF CREDIT=0 P EJECT 4 P B P* BUILD COMMON DATA AREA * N P************************** p P* SEARCH CWB'S: P ( P LD A8,T:ATOD,A13 GET T:ATAB ADDRESS P IFT CREDIT-MMUPAG=1 P LDR* A3,A
0x3080b0…308244 Dummy {f00=0x00f6, f01=0x0190, f02=» 0 P ST A3,ENDADD,A13 SAVE END OF T:ATAB ADDRESS PSYA210 EQU * < & P CM UWB,A13 INDICATE CWB-SCANNING P P ADKL A8,2 z P CW A8,ENDADD,A13 ALL DONE? P RF(E) CLADAT YES! $ P CALL T:DADD T:D-ADDRESS TO A12 P IFT CREDIT-MMUPAG=1
0x308244…3083d8 Dummy {f00=0x00f6, f01=0x0190, f02=» P CALL SHIFT SUPER-LOOPA PSYA220 RF(Z) UWBCOM ALL! ( P CALL MOVCOM H P CALL SKIFTA P RB SYA220 p P EJECT P P PUWBCOM EQU * P* SEARCH UWB'S: P* & P IM UWB,A13 INDICATE UWB-SCANNING P
0x3083d8…30856c Dummy {f00=0x00f6, f01=0x0190, f02=» CREDIT=0 P CALL SHIFT " PSYA230 RB(Z) SYA210 ALL DONE! & PSYA235 CALL MOVCOM L PSYA240 CALL SKIFTA f P RB SYA230 P EJECT P * P* TASK CLASS DATA CONFIGURATION PART * * P************************************** P
0x30856c…308700 Dummy {f00=0x00f6, f01=0x0190, f02=»TE CWB x ( P ADKL A8,2 STEP TO NEXT T:A ADDRESS P CW A8,ENDADD,A13 : P RF(E) SYA270 ALL T:A'S DONE T ( P CALL T:DADD GET T:D ADDRESS TO A12 x P P* CALCULATE LENGTH OF T:D P 2 P LD A1,WATLEN,A12 NUMBER OF BYTES-1 IN DBLKTAB
0x308700…308894 (5, 436) Dummy {f00=0x00f6, f01=0x0190, f02=»NTS n P ADR A3,A12 ADD T:D-ADDRESS P LDR* A3,A3 . 0 0 P LDK A2,STPREC GET STARTPOINTS RECORD LENGTH F P CALL MULT AND MULTIPLY z P ADK A3,2 'NUMBER-WORD' P ADR A3,A1 =>LENGTH P LDR A1,A12 FROM-ADDRESS P CALL MOVING MOVE
0x308894…308a28 Dummy {f00=0x00f6, f01=0x0190, f02=» P IFT CREDIT+MMUPAG=2 ( P* INITIATE MM-ADDRESS TABLE POINTER $ P P $ P LD A1,SCTSFA SHADOW TABLE START X & P AD* A1,SCTSFA ADDRESS TABLE START P ST A1,SAVE06,A13 SAVE " PSYA250 CM UWB,A13 INDICATE CWB ( P ADKL A8,2 STEP TO NEXT T:
0x308a28…308bbc Dummy {f00=0x00f6, f01=0x0190, f02=»E MM-TABLE " P* FILL MM-TABLE ADDRESS TABLE P 8 P LD A1,SAVE06,A13 @ & P ADK A1,2 INCREMENT TABLE POINTER Z P ST A1,SAVE06,A13 RESTORE P STR A2,A1 FILL TABLE ( P CALL T:DADD GET T:D ADDRESS TO A12 4 P ST A12,T:DSAV,A9 SAVE '
0x308bbc…308d50 Dummy {f00=0x00f6, f01=0x0190, f02=» ADK A1,2 P ANKL A1,/FFFE EVEN ADDRESS ( P ADK A1,DWBFST+4 ADD DISPL. TO FIRST 6 , P LDR A3,A1 GET NUMB. OF START-POINTS... b P ADR A3,A12 . P ELR A3,A3 . 0 P LDK A2,STPREC GET STARTPOINTS RECORD LENGTH P CALL MULT AND MULTIPLY
0x308d50…308ee4 Dummy {f00=0x00f6, f01=0x0190, f02=»1,A8 GET T:A ADDRESS * P ES A2,T:DAD,A1 ESORE NEW T:D ADDRESS " P EL A7,CWBMSK,A12 GET CWBMASK J P XIF p P IFF CREDIT=0 | P CALL MOVCLA P EJECT P P P* TASK CLASS DATA UWB'S * P*************************
0x308ee4…309078 Dummy {f00=0x00f6, f01=0x0190, f02=»DIT+MMUPAG=2 P EL A7,UWBMSK,A12 P XIF . P IFF CREDIT=0 : P CALL MOVCLA P P EJECT d P r P ~ " P* MOVE DT:S OF SWB'S & TWB'S * " P****************************** P PSYA260 EQU * P IFT CREDIT-MMUPAG=1
0x309078…30920c Dummy {f00=0x00f6, f01=0x0190, f02=»UPAG=2 P EL A7,SWBMSK,A12 P RF(Z) SYA265 NONE ( P CALL SKRITT B PSYA265 EL A7,TWBMSK,A12 V P XIF v P IFF CREDIT=0 P RB(Z) SYA250 P CALL SKRITT P RB SYA250 P PSYA270 RF PRODAT P EJECT P
0x30920c…3093a0 Dummy {f00=0x00f6, f01=0x0190, f02=» MOVE D.T ** 4 P** ** 6 4 P*********************************************** n PSKRITT EQU * P CALL SHIFT PNO RF(NZ) NES P RTN A14 PNES CALL GETWB
0x3093a0…309534 (5, 437) Dummy {f00=0x00f7, f01=0x0190, f02=» P & P* BUILD TASKDATA PROTOTYPE AREA * & P********************************* : PPRODAT EQU * d P =00001 x , P LD A1,SAVE02,A13 BUGGER TASK INCLUDED? P RF(Z) SYA275 NO! 2 P CALL GETTTB GET TTAB ADDRESS. TID 'TB' IN A1 &
0x309534…3096c8 Dummy {f00=0x00f7, f01=0x018e, f02=»E MMU TABLE P XIF P IFF CREDIT=0 , P LDK A3,2 RESERV ONE WORD FOR TRABUG-T:A 6 P CALL MOVING GET P:BAS f P IFT CREDIT-MMUPAG=1 & P LD A1,SCTLAC GET START OF P:MTAB P LD A1,P:BAS,A1 GET P:BAS $ P STR A1,A2 SAVE IN TRABUG'S
0x3096c8…30985c Dummy {f00=0x00f7, f01=0x018e, f02=» 0 P ST A2,TTB:CB,A8 SAVE ADDRESS TO CSB-POINTER PSYA272 EQU * 8 2 P SUKL A2,CSB ADD DISPL. TO CURRENT SEGMENT BAE L P ST A2,TTB:SA+26,A8 SAVE A13 P IFT CREDIT+MMUPAG=2 & P LD A1,SCTLAC GET START OF P:MTAB $ P TL* MMTO,A13 LOAD CORRECT T
0x30985c…3099f0 Dummy {f00=0x00f7, f01=0x0190, f02=» & P TL* MMFROM,A13 RELOAD DDIV TABLE P XIF =00001 . P IFF CREDIT=0 =00001 D PSYA275 EQU * b P =00001 v P =00001 0 P IM SWITCH,A13 INDICATE: -NO MORE D.T. MOVE! $ P LD A8,T:ATOD,A13 T:ATAB ADDRESS PSYA280 ADKL A8,2
0x3099f0…309b84 Dummy {f00=0x00f7, f01=0x0190, f02=»T:DAD,A12 . 0 P CALL TWBSWB MOVE TWB'S & RESERVE FOR SWB'S P H " P* CALCULATE LENGTH OF DSCB'S * T " P*** *** z P P LDR* A1,A8 GET T:A-ADDRESS & P LD A3,DATLEN,A12 A12=T:D-ADDRESS P LDK A2,DSCBL
0x309b84…309d18 Dummy {f00=0x00f7, f01=0x0190, f02=»EMENT r P RF(NZ) SYA285 FCB PRESENT & P SUR A2,A3 MOVD30E A3(DSCB-LENGTH) 0 , P ADKL A2,T:ASTA INCREMENT TO FIRST WORD Z 6 PSYA285 ST A2,CIA,A1 SAVE DISPLACEMENT TO T:A-START " P LD A2,STKB,A1 GET STACK SIZE $ P ST A2,CSE,A1 AND SAVE TEMPORA
0x309d18…309eac Dummy {f00=0x00f7, f01=0x0190, f02=»OCATE BUFFERS P CALL MOVT:A MOVE T:A * P STR A2,A8 STORE NEW ADDRESS IN T:ATAB 4 P XIF b P IFT CREDIT+MMUPAG=2 n * P CALL GETTAB SET CORRECT TTAB-ADDRESS , P LD A12,T:DSAV,A2 GET 'OLD' T:D-ADDRESS P 2 P* GET LAST USED ENTRY IN
0x309eac…30a040 Dummy {f00=0x00f7, f01=0x0190, f02=»A13 $ P TSR A3 STORE TABLE IN WORK-AREA $ P TL MMDDIV,A13 RELOAD DDIV TABLE 4 P CALL MMENT GET ENTRY " P ST A3,T:DSAV,A2 SAVE IN TTAB z 0 P CALL TWBSWB MOVE TWB'S & RESERVE FOR SWB'S " P* CALCULATE LENGTH OF DSCB'S * " P***
0x30a040…30a1d4 (5, 438) Dummy {f00=0x00f7, f01=0x018e, f02=»H x ( P CALL MULT A3() X (A2) RESULT IN A3 & P ES A3,CSN,A1 SAVE LENG OF DSCB'S 6 ( P EL 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 INCREMENT TO FIRST WORD 6 P
0x30a1d4…30a368 Dummy {f00=0x00f7, f01=0x0190, f02=» & P LD A2,SCTLAC GET START OF P:MTAB $ P TL* MMTO,A13 LOAD CORRECT TABLE . P EL A2,P:BAS,A2 GET P:BAS V & P TL* MMFROM,A13 RELOAD DDIV TABLE x P ES A2,CSB,A1 AND SAVE " P CALL ALLBUF ALLOCATE BUFFERS P CALL MOVT:A MOVE T:A * P ESR
0x30a368…30a4fc Dummy {f00=0x00f7, f01=0x0190, f02=»M FLAG,A13 INDICATE REAL DATA-PART PROCESSING , P* INCLUDE DDIV AND PART 2.A IN FREE AREA 6 P f . P LDKL A2,PART2A NEW (RELATIVE) END ADDRESS n P ADR A2,A13 ABSOLUT DITO P IFT CREDIT+MMUPAG=2 P LDR A3,A2 P ANKL A3,/F000 $ P SRL
0x30a4fc…30a690 Dummy {f00=0x00f7, f01=0x0190, f02=» P* MOVE T:ATAB P * P LD A2,T:ATNW,A13 GET REAL T:A-ADDRESS " P XIF P P IFT CREDIT-MMUPAG=1 * P ST A2,DATEND,A13 SAVE NEW END ADDRESS x P* MOVE T:ATAB P . P LD A2,T:ATNW,A13 GET REAL T:A-TAB ADDRESS P LDR* A1,A2 REAL L
0x30a690…30a824 Dummy {f00=0x00f7, f01=0x0190, f02=»1 MOVE-LENGTH P SUR A2,A3 TO-ADDRESS P ST A2,T:ATOD,A13 SAVE 4 P CALL MOVE R P XIF d P IFT CREDIT+MMUPAG=2 p $ P TL* MMTO,A13 LOAD CORRECT TABLE & P ELR A1,A2 GET REAL T:ATAB LENGTH P TL* MMFROM,A13 RELOAD TABLE P ADR A
0x30a824…30a9b8 Dummy {f00=0x00f7, f01=0x0190, f02=» GET LENGTH P SUR A2,A3 TO-ADDRESS P ST A2,T:ATOD,A13 SAVE 2 P CALL XMOVE P P XIF d P IFF CREDIT=0 p P P* CONTINUE IN PART 2.B * P * P LDKL A5,PART2B RELATIVE START ADDRESS P ADR A5,A13 ADD BASE ADDRESS P
0x30a9b8…30ab4c Dummy {f00=0x00f7, f01=0x0190, f02=»***** h 2 P******* ******* 2 P** ** D 2 P* SYSLOAD PART 1 * z 2 P** ** 2 P*****
0x30ab4c…30ace0 Dummy {f00=0x00f7, f01=0x0190, f02=» 2 P* SHADOW-TABLES * 2 P* * : 2 P********************************************* p P P XIF P P * P************************************* * P***
0x30ace0…30ae74 (5, 439) Dummy {f00=0x00f7, f01=0x0190, f02=»********************************* P EJECT * P 8 P D 6 P** C O N V R T ** P 6 P** ** 6 P** ** 6 P** CONVER
0x30ae74…30b008 Dummy {f00=0x00f7, f01=0x018e, f02=» ** r 6 P** OUTPUT: A1=BINARY RESULT ** 6 P** WORK.REGS: A3,A2 ** V 6 P************************************************** P PCONVRT EQU * P LDK A1,0 CLEAR RESULT REG
0x30b008…30b19c Dummy {f00=0x00f7, f01=0x0190, f02=» P SLL A2,3 . P ADR A1,A2 .... P LDR A3,A5 0 P ANK A3,/F GET ONE'S B P ADR A1,A3 ^ P RTN A14 p P EJECT P 6 P** N X T B L K ** 6 P** ** 6
0x30b19c…30b330 Dummy {f00=0x00f7, f01=0x0190, f02=» ** ~ 6 P** INPUT: A11=ADDRESS TO CURRENT BLOCK-START ** ( 6 P** OUTPUT:A11=ADDRESS TO NEXT BLOCK ** b 6 P** A2=BLOCK TYPE (T,C,U) IN RIGTH BYTE ** 6 P** WORKREGS: A1,A3-A5 **
0x30b330…30b4c4 Dummy {f00=0x00f7, f01=0x0190, f02=»CLASSES f 2 PNXTCOM EQU * ENTRY: SKIP TO NEXT COMMON-BLOCK P LCR A5,A11 F P SLL A5,8 Z P LC A5,1,A11 l P CALL CONVRT P LDK A2,TDBREC P LDR A3,A1 P CALL MULT P ADR A11,A3 P ADKL A11,2 0 P LCR A5,A11 GET NU
0x30b4c4…30b658 Dummy {f00=0x00f7, f01=0x0190, f02=» P LDR A3,A1 P CALL MULT P ADR A11,A3 A11=NEXT BLOCK ( P ADKL A11,2 J $ P LC A2,TDBBT,A11 GET BLOCK TYPE ^ P RTN A14 P P 8 P** G E T N U M ** 8 P**
0x30b658…30b7ec Dummy {f00=0x00f7, f01=0x0190, f02=» ** b 8 P** ** 8 P** INPUT : A6=ADDRESS TO FIRST ASCII-CHARACTER ** J 8 P** OUTPUT: A5=BINARY VALUE ** 8 P** WORK.REGS: A2,A4 ** 8 P**********
0x30b7ec…30b980 Dummy {f00=0x00f7, f01=0x0190, f02=»SULT REG ~ P SUK A6,1 INIT POINTER PGET030 ADK A6,1 NEXT DIGIT . P LCR A2,A6 GET CHAR P P ANK A2,/F l PGET050 SUK A2,1 ~ " P RF(N) GET100 THIS DIGIT READY P ADR A5,A4 ACCUMULATE P RB GET050 , PGET100 SUK A4,90 NEXT INCREM
0x30b980…30bb14 (5, 440) Dummy {f00=0x00f7, f01=0x0190, f02=»JECT P P* START OF PROGRAM PART 1 * P 8 4 P* SAVE02=POINTER TO 1:ST USER TASK TTAB-ADDRESS @ $ P* SAVE09=EXECUTION START ADDRESS x P " PSYSLDX EQU *-REL PROGRAM START P* P* INIT A15 STACK P* P LD A15,
0x30bb14…30bca8 Dummy {f00=0x00f7, f01=0x0190, f02=»NTIFICATION r P XIF P IFT MMUPAG=1 P TL MMTAB,A13 %%## 6 P EL A2,CREID,A2 P P XIF h 2 P CM SWITCH,A13 RESET SAVE-AREAS USED IN SYSLDM t P CM FLAG,A13 $ P CWK A2,'CR' CREDIT APPLICATION? ( P RF(E) SYA100 YES! START CONFIGURA
0x30bca8…30be3c Dummy {f00=0x00f7, f01=0x0190, f02=»CONTINUATION ADDRESS P ADR A4,A13 RELOCATE P STR A4,A15 PUT ON STACK 8 P LDKL A4,/00C0 X P STR A4,A15 PUT PSW ON STACK n P RTN A15 PSYA103 EQU *-REL P XIF P IFT MMUPAG-CREDIT=1 ( P LDKL A4,MMTAB GET MM-TABLE ADDRESS
0x30be3c…30bfd0 Dummy {f00=0x00f7, f01=0x0190, f02=»ENGTH OF TC:TAB | $ P LD A6,SAVE02,A13 1:ST USER TASK P LDR A3,A6 SAVE @ 0 P SU A3,SCTTCT GET DISPLACEMENT TO 1:ST USER X * P SUR A5,A3 => LENGTH OF TC:TAB TO SCAN P* P* INIT UNUSED MMU ENTRIES P* P LDKL A1,/FC00 P L
0x30bfd0…30c164 Dummy {f00=0x00f7, f01=0x0190, f02=»F(E) SYA105 P SUK A4,2 P STR A1,A4 & P RB SYA:10 8 PSYA105 SUK A5,2 ALL? J P RF(N) SYA107 YES! f P LDR* A2,A6 TTAB-ADDRESS P CALL MOVMMT MOVE MM-TABLE P ADK A6,2 NEXT TTAB P RB SYA105 PSYA107 EQU * P XIF
0x30c164…30c2f8 Dummy {f00=0x00f7, f01=0x0190, f02=»D A2,SCTLAC ADD RELOCATION ADDRESS P LDK A3,0 SEGMENT NUMBER * P CF A15,ACTOT QUEUE TASK J " P LDKL A1,FINISH END OF SYSLDA j P ADR A1,A13 P ABR A1 P XIF PSYA100 EQU * P IFF CREDIT=0 P EJECT P , P* RE
0x30c2f8…30c48c Dummy {f00=0x00f7, f01=0x018e, f02=» LD* A2,SCTLAC GET START OF P:MTAB $ P LD A12,T:ATAB,A2 T:ATAB ADDRESS * & P SUKL A12,2 ADJUST FOR LENGTH-WORD R P ST A12,T:ATOD,A13 SAVE | , P LD A4,U:BTAB,A2 GET U:BTAB FROM P:MTAB " P SUK A4,2 INCLUDE LENGTH-WORD $ P ST A4,U:BTOD,A13 SAVE
0x30c48c…30c620 Dummy {f00=0x00f7, f01=0x0190, f02=» n P ST A4,S:BTOD,A13 SAVE P XIF & P IFT CREDIT-MMUPAG=1 2 P* T:ATAB PROCESSING: N P j P LDR* A4,A12 T:ATAB-LENGTH v P LDR A3,A4 SAVE * P AD A3,SCTSFA ADD MONITOR END ADDRESS P* CHECK ADDRESSES P " P LDR A11
0x30c620…30c7b4 (5, 441) Dummy {f00=0x00f8, f01=0x0190, f02=»RFLOW x P CALL ERROR ( PSYA110 LDR A9,A2 GET P:MTAB ADDRESS " P LDK A2,0 N P* CLEAR T:ATAB SHADOW-TABLE: ` P PZERO SUK A3,2 NEXT P STR A2,A3 CLEAR P CW A3,SCTSFA ALL? P RB(NE) ZERO NO! " P STR A4,A3 STORE TAB
0x30c7b4…30c948 Dummy {f00=0x00f8, f01=0x0190, f02=» SYA120 OK! P LDK A1,LMP4 NO TASK PRESENT P CALL ERROR 8 ( PSYA120 LC A2,TDBMC+4,A11 GET TASK ID L P SLL A2,8 . x P LC A2,TDBMC+5,A11 ... P CWK A2,'TB' BUGGER TASK? P RF(NE) SYA125 NO! : P ST A2,SAVE02,A13 INDICATE BUGGER
0x30c948…30cadc Dummy {f00=0x00f8, f01=0x0190, f02=» ADKL A8,2 NEXT T:A P LDR* A6,A8 GET T:A ADDRESS P SUK A4,2 @ P RF(NZ) SYA135 R 0 P LDK A1,LMP5 NO PROTOTYPE FOUND (TID ERROR) h P CALL ERROR PSYA135 EQU * P CW A2,T:ATID,A6 TID EQUAL? P RB(NE) SYA130 NO! P SUR*
0x30cadc…30cc70 Dummy {f00=0x00f8, f01=0x0190, f02=»DDRESS v $ P SUKL A12,2 INCLUDE LENGTH WORD ! & P ST A12,T:ATOD,A13 SAVE IN SYSLDA ! 6 $ P EL A4,U:BTAB,A2 U:BTAB ADDRESS ! ` $ P SUK A4,2 ADJUST FOR LENGTH WORD ! $ P ST A4,U:BTOD,A13 SAVE IN SYSLDA ! P XIF ! P IFT CREDIT+MMUSWB=3 ! ( P EL A4,S
0x30cc70…30ce04 Dummy {f00=0x00f8, f01=0x0190, f02=»=2 ! ~ P* T:ATAB PROCESSING: " P " & P ELR A4,A12 T:ATAB-LENGTH " 2 P LDR A3,A4 SAVE " T 0 P SLL A3,1 RESERVE FOR MM-TABLE ADDRESS TABLE " l * P AD A3,SCTSFA ADD MONITOR END ADDRESS " P* CHECK ADDRESSES " P " $ P LDR A11,A3 END OF SHADO
0x30ce04…30cf98 Dummy {f00=0x00f8, f01=0x0190, f02=» CALL ERROR " ( PSYA110 LDR A9,A2 GET P:MTAB ADDRESS # P* CLEAR T:ATAB SHADOW-TABLE: # @ P # d PSYA115 SUK A3,2 NEXT # p P CMR A3 CLEAR # P CW A3,SCTSFA ALL? # P RB(NE) SYA115 NO! # " P STR A4,A3 STORE TABLE LENGTH # ( P LD A11,SAVE
0x30cf98…30d12c Dummy {f00=0x00f8, f01=0x0190, f02=»P4 NO TASK PRESENT # P CALL ERROR $ ( PSYA120 LC A2,TDBMC+4,A11 GET TASK ID $ . P SLL A2,8 . $ Z P LC A2,TDBMC+5,A11 ... $ n P CWK A2,'TB' BUGGER TASK? $ P RF(NE) SYA125 NO! $ 4 P ST A2,SAVE02,A13 INDICATE 'BUGGER TASK PRESENT' $ P RF SYA1
0x30d12c…30d2c0 Dummy {f00=0x00f8, f01=0x0190, f02=»ET T:A ADDRESS $ P SUK A4,2 % P RF(NZ) SYA135 % ( , P LDK A1,LMP5 NO PROT. FOUND (TID ERROR) % > P CALL ERROR % n PSYA135 EQU * % P EL A10,T:ATID,A6 GET TID % P CWR A2,A10 TID EQUAL? % P RB(NE) SYA130 NO! % P ELR A10,A12 % P SUR
0x30d2c0…30d454 (5, 442) Dummy {f00=0x00f8, f01=0x0190, f02=»UMBER OF TASKS % z P SLL A5,8 & P LC A5,TDBNT+1,A11 & ( P CALL CONVRT & B ( P LD A2,SCTSFA START OF SHADOW TABLE & V P ADR A2,A4 & 6 P ADRS A1,A2 STORE NUMBER OF TASKS IN SHADOW TABLE & P & P* SKIP TO NEXT BLOCK & P & PSYA136
0x30d454…30d5e8 Dummy {f00=0x00f8, f01=0x0190, f02=» & * P ADKL A11,1 STEP TO NUMBER OF COM.DEV. ' P CALL NXTCOM SKIP COMMON DEF ' 6 PSYA140 CCK A2,'UU' ' Z P RF(NE) SYA141 NO UWB'S ' t 2 P LD A8,U:BTOD,A13 GET MODIFIED U:BTAB ADDRESS ' 6 P CALL USWBTP INSERT NUMBER OF COPIES IN PROTOTYPE ' PSYA1
0x30d5e8…30d77c Dummy {f00=0x00f8, f01=0x0190, f02=» ' ~ P CALL USWBTP ( P XIF ( P IFT CREDIT=1 ( ( P RF SYA152 ( > P EJECT ( P L P*********************************************************************** ( ^ L P* * ( L P* USWBTP
0x30d77c…30d910 Dummy {f00=0x00f8, f01=0x0190, f02=»== * ( N L P* * ) L P* REFERENCED IN: SYSLDA * ) ^ L P* * ) L P* ENTRY:
0x30d910…30daa4 Dummy {f00=0x00f8, f01=0x0190, f02=» * ) N L P* * * L P* EXIT: * * ^ L P* * * L P* WORK RE
0x30daa4…30dc38 Dummy {f00=0x00f8, f01=0x0190, f02=» * * N L P* SUBROUTINES: GETNUM,ERROR * + L P* * + ^ L P*********************************************************************** + P + PUS
0x30dc38…30ddcc Dummy {f00=0x00f8, f01=0x018e, f02=»T IN A5 + r $ P LDR A1,A5 SAVE NUMBER OF UWB'S , PSYA142 EQU * , 8 P LDR A12,A8 , L " P LDR* A3,A12 LENGTH OF U:BTAB , ` ( P ADKL A11,UDBFST-1 FIRST UDB RECORD , PSYA145 EQU * , 0 P LCR A2,A11 GET FIRST CHARACTER FROM CONFIG , P SLL A2,8 ,
0x30ddcc…30df60 Dummy {f00=0x00f8, f01=0x0190, f02=» , h 0 PSYA147 SUK A3,UP:REC DEC. NUMBER OF PROT.'S - P RF(NN) SYA150 - < P LDK A1,LMP6 UWB NOT FOUND - R P CALL ERROR - t PSYA150 EQU * - ( P ADKL A12,UP:REC ADD TO NEXT RECORD - P RB SYA145 - $ PFRSTOK LC A2,2,A11 GET 3:RD CHAR - P CC A2
0x30df60…30e0f4 (5, 443) Dummy {f00=0x00f8, f01=0x0190, f02=»P TO 'NUMBER OF BOCKS' IN CONFIG - | P LDR A6,A11 . ( P CALL GETNUM CONVERT . < 2 P SC A5,UPNUMB,A12 SAVE IN U:BTAB (SHADOWTABLE) . X . P SUK A1,1 DEC. NO OF TYPES IN CONFIG FILE . P RB(P) SYA142 . P ADKL A11,UDBFST-1 . P RTN A14 . P XIF .
0x30e0f4…30e288 Dummy {f00=0x00f8, f01=0x0190, f02=»MBER OF UWB'S . ~ PSYA142 EQU * / P LDR A12,A8 START OF TABLE / * P ELR A3,A12 LENGTH OF U:BTAB / L ( P ADKL A11,UDBFST-1 FIRST UDB RECORD / p PSYA145 EQU * / 0 P LCR A2,A11 GET FIRST CHARACTER FROM CONFIG / P SLL A2,8 / P LC A2,1,A11 GET 2
0x30e288…30e41c Dummy {f00=0x00f8, f01=0x0190, f02=» A3,UP:REC DEC. NUMBER OF PROT.'S / P RF(NN) SYA150 0 * P LDK A1,LMP6 UWB NOT FOUND 0 @ P CALL ERROR 0 b PSYA150 EQU * 0 v ( P ADKL A12,UP:REC ADD TO NEXT RECORD 0 P RB SYA145 0 2 PFRSTOK LC A10,2,A11 GET 3:RD CHAR FROM CONFIG 0 0 P EL A2,UPN
0x30e41c…30e5b0 Dummy {f00=0x00f8, f01=0x0190, f02=» 0 P 1 P* PROTOTYPE FOUND * 1 P******************* 1 0 P 1 L 8 P ADKL A11,NAMUWB SKIP TO 'NUMBER OF BOCKS' IN CONFIG 1 X P LDR A6,A11 1 P CALL GETNUM CONVERT 1 4 P EL A10,UPNUMB-1,A12 SAVE IN U:BTAB SHADOW-TABLE 1 P ANKL A10,/F
0x30e5b0…30e744 Dummy {f00=0x00f8, f01=0x0190, f02=»L A11,UDBFST-1 1 P RTN A14 2 P XIF 2 & P IFT CREDIT=1 2 2 P EJECT 2 H PSYA152 EQU * 2 V P 2 j & P* GET START OF SYSLOAD AFTER MOVE 2 r P 2 P XIF 2 P IFT CREDIT-MMUPAG=1 2 , P LD* A7,T:ATOD,A13 GET LENGTH OF T:ATAB 2 P XIF 2
0x30e744…30e8d8 Dummy {f00=0x00f8, f01=0x0190, f02=»FF CREDIT=0 2 0 P AD A7,SCTSFA TO-ADDRESS (AFTER SHADOW-TABLE 3 P ADK A7,1 3 H P ANKL A7,/FFFE EVEN ADDRESS 3 Z P 3 ~ P* CALCULATE RELOCATION 3 P 3 P LDR A2,A13 3 $ P SUR A2,A7 MOVE-LENGTH (SYSLDA) 3 P NGR A2,A2 3 4 P ST A2,SAVE04,
0x30e8d8…30ea6c Dummy {f00=0x00f8, f01=0x0190, f02=»DRESS (SYSLDA) 3 P ANKL A2,/F000 FIRST PAGE 4 ( P ST A2,MMREL1,A13 SAVE PHYSICAL PAGE 4 8 " P SRL A2,2 SHIFT FOR MM-PAGING 4 d P LDKL A11,MMDDIV 4 . P ADR A11,A13 GET MM-TABLE START ADDRESSS= 4 P LDK A3,16 SET COUNTER 4 ( PSYA157 STR A2,A11 STOR
0x30ea6c…30ec00 Dummy {f00=0x00f8, f01=0x0190, f02=» ANKL A7,/FFF GET DISPLACEM. IN PAGE 4 P XIF 5 , P IFF CREDIT=0 5 8 0 P ST A7,SAVE12,A13 SAVE (LOGICAL) TO-ADDRESS 5 N . P ADKL A7,LENGT2 ADD LEN. OF SYSLDA TO MOVE 5 , P ST A7,SAVE03,A13 SAVE NEW DDIV ADDRESS 5 P LDR A6,A7 5 $ P* CALCULATE DDIV
0x30ec00…30ed94 (5, 444) Dummy {f00=0x00f8, f01=0x0190, f02=»F P:MTAB 5 v P IFT CREDIT-MMUPAG=1 6 ( P LD A3,NUMSEG,A1 NUMBER OF SEGMENTS 6 , P XIF 6 X P IFT CREDIT+MMUPAG=2 6 d ( P EL A3,NUMSEG,A1 NUMBER OF SEGMENTS 6 P XIF 6 P IFF CREDIT=0 6 . P LDK A2,SEGREC SEGMENT BLOCK RECORD LENGTH 6 P CALL MU
0x30ed94…30ef28 Dummy {f00=0x00f8, f01=0x0190, f02=»L,A13 AND ADJUST RELOCATION BASE 6 P IFT CREDIT+MMUPAG=2 7 ( P 7 D . P ST A1,SAVE04,A13 SAVE DDIV 'FROM'-ADDRESS 7 L P XIF 7 ~ P IFT CREDIT-MMUPAG=1 7 , P ST A1,SAVE04,A13 SAVE DDIV FROM-ADDRESS 7 P XIF 7 P IFF CREDIT=0 7 " P SUR A6,A1 RELOC
0x30ef28…30f0bc Dummy {f00=0x00f8, f01=0x0190, f02=»L (=REAL) LENGTH * 7 . P* REMOVE NOT USED ENTRIES IN T:ATAB * 8 " . P* A9=P:MTAB A6=MOVE-RELOC * 8 T . P***************************************** 8 P IFT CREDIT-MMUPAG=1 8 P 8 P* INITIATE POINTERS 8 P 8 ( P LD A8,T
0x30f0bc…30f250 Dummy {f00=0x00f8, f01=0x0190, f02=»CTSFA GET START OF T:ATAB SHADOW-TAB 8 P LDR A4,A5 2:ND POINTER 9 , & P LDR A2,A8 2:ND POINTER IN T:ATAB 9 L & P LDK A3,2 SET 'NEW' T:ATAB COUNTER 9 v . P SUR A11,A11 CLEAR REAL LENGTH ACCUMULATOR 9 P 9 P* SCAN T:ATAB: 9 P 9 " PSYA160 ADKL A8,2
0x30f250…30f3e4 Dummy {f00=0x00f8, f01=0x018e, f02=»A 9 ~ * P LDR* A7,A5 GET CONTENTS OF SHADOW-TAB : , P RB(Z) SYA160 THIS T:A IS NOT USED!!!!! : 8 " P ADR A11,A7 ACCUMULATE LENGTH : h , P ADK A3,2 INCREMENT 'NEW' T:ATAB LENGTH : , P ADK A4,2 UPDATE 2:ND SHADOW-TAB ADDRESS : ( P ADK A2,2 UPDATE 2:ND T:AT
0x30f3e4…30f578 Dummy {f00=0x00f8, f01=0x018e, f02=» : z . P STR A10,A2 STORE ADDR. (EV. ON NEW PLACE) ; P* RELOCATE W.B.-ADDRESSES ; : P ; $ P LD A12,T:DAD,A1 GET T:D-ADDRESS ; d $ P LD A7,WATLEN,A12 LENGTH OF WAT ; . P ADK A1,WATFST+2 ADD TO FIRST W.B.-ADDRESS ; PSYA165 SUK A7,1 DEC. COUNTER ;
0x30f578…30f70c Dummy {f00=0x00f8, f01=0x0190, f02=» ; z P < P LD A8,T:ATOD,A13 T:ATAB < P ELR A3,A8 GET LENGTH < 0 P ADR A3,A8 END OF T:ATAB < N P ST A3,ENDADD,A13 SAVE < n 0 P LD A5,SCTSFA GET START OF T:ATAB SHADOW-TAB < P LDR A4,A5 2:ND POINTER < & P LDR A2,A8 2:ND POINTER IN T:ATAB < &
0x30f70c…30f8a0 Dummy {f00=0x00f8, f01=0x0190, f02=»60 ADKL A8,2 TAKE NEXT T:A < $ P ADK A5,2 NEXT T:A IN SHADOW-TAB = " P CW A8,ENDADD,A13 = J P RF(E) SYA170 ALL DONE = d P ELR A1,A8 GET T:A = * P LDR* A7,A5 GET CONTENTS OF SHADOW-TAB = , P RB(Z) SYA160 THIS T:A IS NOT USED!!!!! = " P ADR A11,A7 AC
0x30f8a0…30fa34 (5, 445) Dummy {f00=0x00f9, f01=0x0190, f02=» 2:ND T:ATAB ADDRESS = 8 P STR A7,A4 STORE NUMBER OF T:A'S (EV. ON NEW PLACE) > P ELR A10,A8 GET T:A-ADDRESS > X P ADR A10,A6 RELOCATE > | . P ESR A10,A2 STORE ADDR. (EV. ON NEW PLACE) > P* RELOCATE W.B.-ADDRESSES > P > $ P EL A12,T:DAD,A1 GET
0x30fa34…30fbc8 Dummy {f00=0x00f9, f01=0x0190, f02=»ER > v P RB(N) SYA160 TAKE NEXT T:A ? P ELR A10,A1 GET ADDRESS ? . P ADR A10,A6 RELOCATE ? N P ESR A10,A1 ? j P XIF ? ~ P IFF CREDIT=0 ? P ADK A1,4 NEXT W.B. ? P RB SYA165 ? P ? PSYA170 EQU * ? P ST A6,MOVADD,A13 SAVE ? 8 P
0x30fbc8…30fd5c Dummy {f00=0x00f9, f01=0x0190, f02=» P IFT CREDIT-MMUPAG=1 @ $ P ST* A3,T:ATOD,A13 AND IN T:ATAB @ P XIF @ H P IFF CREDIT=0 @ T 0 P LDR A2,A11 GET NUMBER OF T:A'S ACCUMULATOR @ j ( P SLL A2,1 CALC. REAL LENGTH (BYTES) @ P ADK A2,2 @ 0 P ST A2,SAVE05,A13 SAVE TOT. NUMBER OF T:A'S
0x30fd5c…30fef0 Dummy {f00=0x00f9, f01=0x0190, f02=» LEN.) * @ x $ P******************************** A P A 8 P IFT CREDIT-MMUPAG=1 A @ $ P LD A5,U:BTOD,A13 U:BTAB ADDRESS A P LDR* A3,A5 LENGTH A P ST A3,SAVE06,A13 A P ADK A5,2 SKIP LENGTH WORD A P SUK A3,2 -"- A " PSYA180 RF(Z) SYA185 AL
0x30fef0…310084 Dummy {f00=0x00f9, f01=0x0190, f02=»ABLE LENGTH A , P ST A3,SAVE06,A13 SAVE LENGTH OF U:BTAB B P ADK A5,2 B D P SUK A3,2 SUB LENGTH-WORD B V PSYA180 RF(Z) SYA185 B x P ELR A10,A5 GET ADDRESS B P ADR A10,A6 RELOCATE B P ESR A10,A5 B P XIF B P IFF CREDIT=0 B 8 P A
0x310084…310218 Dummy {f00=0x00f9, f01=0x0190, f02=» CREDIT+MMUSWB=3 B P* C $ P* COMPUTE REAL LENGTH OF S:BTAB C " P* C J $ P LD A5,S:BTOD,A13 S:BTAB ADDRESS C T " P ELR A3,A5 LENGTH OF PROTOTYPE C | P LDR A2,A3 SAVE C " P SUK A3,2 EXCLUDE LENGTH WORD C , PSYA190 RF(Z) SYA199 ALL RECORDS SCANNED!
0x310218…3103ac Dummy {f00=0x00f9, f01=0x0190, f02=»BER OF COPIES C v P ANK A4,/FF GET RIGHT BYTE D . PSYA192 RF(Z) SYA194 NO MOORE OF THIS TYPE! D 8 P ADK A2,2 INCREMENT LENGTH D j ( P SUK A4,1 DECREMENT NUMBER OF COPIES D P RB SYA192 D 8 PSYA194 ADK A5,UP:REC NEXT RECORD IN S:BTAB PROTOTYPE D $ P S
0x3103ac…310540 Dummy {f00=0x00f9, f01=0x0190, f02=» LDR* A3,A5 LENGTH OF S:BTAB PROTOTYPE D P LDR A2,A3 SAVE E . " P SUK A3,2 EXCLUDE LENGTH WORD E F , PSYA195 RF(Z) SYA199 ALL RECORDS SCANNED! E l $ P LD A4,2,A5 GET PROT. W.B.-ADDR. E P ADR A4,A6 RELOCATE E P ST A4,2,A5 STORE IT BACK E , P LD A4
0x310540…3106d4 (5, 446) Dummy {f00=0x00f9, f01=0x0190, f02=»TH E x ( P SUK A4,1 DECREMENT NUMBER OF COPIES F P RB SYA196 F 6 8 PSYA198 ADK A5,UP:REC NEXT RECORD IN S:BTAB PROTOTYPE F H $ P SUK A3,UP:REC DECREMENT LENGTH F P RB SYA195 F P XIF F P IFT CREDIT+SWPBLK=2 F 0 PSYA199 ST A2,SAVE25,A13 SAVE COMPU
0x3106d4…310868 Dummy {f00=0x00f9, f01=0x0190, f02=» F P ADS A6,T:ATOD,A13 G P ADS A6,U:BTOD,A13 G " P IFT CREDIT+SWPBLK=2 G < P ADS A6,S:BTOD,A13 G X P XIF G r P IFT CREDIT-MMUPAG=1 G ~ P* CALCULATE NEW DDIV END G P G P LDR A5,A9 G P SU A5,SAVE04,A13 END-START G $ P AD A5,SAVE12,A1
0x310868…3109fc Dummy {f00=0x00f9, f01=0x0190, f02=» G v P H P LDK A4,MMDDIV H " P ADR A4,A13 GET TABLE ADDRESS H & & P LDR A5,A13 CALC. REAL RELOCATION H L P SU A5,SAVE12,A13 H v P SU A5,MMREL1,A13 H P SUR A4,A5 RELOCATE H P ST A4,MMTO,A13 AND SAVE H P LDK A4,MMTAB H $ P ADR A4,A13
0x3109fc…310b90 Dummy {f00=0x00f9, f01=0x0190, f02=»D H ~ P SU A5,SAVE04,A13 ENT-START I $ P AD A5,SAVE12,A13 ADD NEW START I . P LDR A6,A5 I V 0 P ANKL A6,/F000 GET LOGICALL PAGE (MM-ENTRY) I h $ P SRL A6,11 ADJUST FOR ADDRESSING I . P ADK A6,MMDDIV ADD RELATIVE START ADDRESS I P ADR A6,A13 RELOCA
0x310b90…310d24 Dummy {f00=0x00f9, f01=0x0190, f02=»3 AND SAVE I P XIF J P IFF CREDIT=0 J P* CONTINUE IN PART 2 * J 4 P J R . P LD A2,SAVE12,A13 GET TO-ADDRESS (SYSLDA) J ^ ( P OR A2,MMREL1,A13 PHYSICALL ADDRESS J P LDR A5,A2 SAVE J 0 P LDKL A7,START2 GET EXECUTION START ADDRESS J P
0x310d24…310eb8 Dummy {f00=0x00f9, f01=0x0190, f02=»DIT-MMUPAG=1 J PNXTMOV LDR* A4,A1 GET WORD K P STR A4,A2 STORE WORD K 6 P ADK A1,2 K T P ADK A2,2 K f P SUK A3,2 DEC. LENGTH K x P RB(NN) NXTMOV K P XIF K P IFT CREDIT+MMUPAG=2 K P MVB A3 K P XIF K P IFF CREDIT=0 K P K
0x310eb8…31104c Dummy {f00=0x00f9, f01=0x403c, f02=»ITOR K t P XIF L PLDAEND EQU * L P END L ,@ L 84,A2 STORE WORD K 6 P ADK A1,2 K T P ADK A2,2 K f P SUK A3,2 DEC. LENGTH K x P RB(NN) NXTMOV K P XIF K P IFT CREDIT+MMUPAG=2 K P MVB A3 K P XIF K P IFF CREDIT=0 K P K
0x31104c…3111e0 Dummy {f00=0x00f9, f01=0x2008, f02=» M -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
0x3111e0…311374 (5, 447) Dummy {f00=0x00f9, f01=0x0000, f02=»
[…0x7…]
0x311e80…312014 (5, 448) Opaque[0x194]
0x312014…3121a8 # DirEnt {nam=»SYSLDM«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1f38, f03=0x0000}
0x312014…3121a8 IdxSect {
0x312014…3121a8 f00 = 0x00f9 // 0x312014 @0x0
0x312014…3121a8 f01 = 0x003e // 0x312016 @0x2
0x312014…3121a8 gno = [ // 0x312018 @0x4
0x312014…3121a8 [0x00]: C0x00f9.0x3.0
0x312014…3121a8 [0x01]: C0x00fa.0x0.0
0x312014…3121a8 [0x02]: C0x00fa.0x1.0
0x312014…3121a8 [0x03]: C0x00fa.0x2.0
0x312014…3121a8 [0x04]: C0x00fa.0x3.0
0x312014…3121a8 [0x05]: C0x00fb.0x0.0
0x312014…3121a8 [0x06]: C0x00fb.0x1.0
0x312014…3121a8 [0x07]: C0x00fb.0x2.0
0x312014…3121a8 [0x08]: C0x00fb.0x3.0
0x312014…3121a8 [0x09]: C0x00fc.0x0.0
0x312014…3121a8 [0x0a]: C0x00fc.0x1.0
0x312014…3121a8 [0x0b]: C0x00fc.0x2.0
0x312014…3121a8 [0x0c]: C0x00fc.0x3.0
0x312014…3121a8 [0x0d]: C0x00fd.0x0.0
0x312014…3121a8 [0x0e]: C0x00fd.0x1.0
0x312014…3121a8 [0x0f]: C0x00fd.0x2.0
0x312014…3121a8 [0x10]: C0x00fd.0x3.0
0x312014…3121a8 [0x11]: C0x00fe.0x0.0
0x312014…3121a8 [0x12]: C0x00fe.0x1.0
0x312014…3121a8 [0x13]: C0x00fe.0x2.0
0x312014…3121a8 [0x14]: C0x00fe.0x3.0
0x312014…3121a8 [0x15]: C0x00ff.0x0.0
0x312014…3121a8 [0x16]: C0x00ff.0x1.0
0x312014…3121a8 [0x17]: C0x00ff.0x2.0
0x312014…3121a8 [0x18]: C0x00ff.0x3.0
0x312014…3121a8 [0x19]: C0x0100.0x0.0
0x312014…3121a8 [0x1a]: C0x0100.0x1.0
0x312014…3121a8 [0x1b]: C0x0100.0x2.0
0x312014…3121a8 [0x1c]: C0x0100.0x3.0
0x312014…3121a8 [0x1d]: C0x0101.0x0.0
0x312014…3121a8 [0x1e]: C0x0101.0x1.0
0x312014…3121a8 ]
0x312014…3121a8 }
0x3121a8…31233c Dummy {f00=0x00f9, f01=0x0190, f02=» 2 P IDENT SYSLDM REL 10.0 80-03-31 870105041000 P : P REL 10.0 80-03-17 ST B & P =5,FAULTY DISPL. TO MMU BIT MAP b P REL 10.0 80-03-14 ST 0 P =4,MEM. OVERFL. NOT DET. WHEN GEN. TTAB:S P PRR 10.0 80-01-18 , P =3,SEGTAB
0x31233c…3124d0 Dummy {f00=0x00f9, f01=0x0190, f02=»2-07 0 P =1,UNEVEN LENGTH POSS. OF INTERNAL BUFFER P ENTRY SYSLDM @ P*************************** V P* * z P* ENTRIES AND EXTERNALS * P* * P***************************
0x3124d0…312664 Dummy {f00=0x00f9, f01=0x0190, f02=»ADA P EXTRN SCTANO P EXTRN SCTBLK " P EXTRN SCTBUG 8 P EXTRN SCTCDT N P EXTRN SCTDCT d P EXTRN SCTDMI z P EXTRN SCTDMT P EXTRN SCTEFA P EXTRN SCTFWL P EXTRN SCTFWT P EXTRN SCTIOE P EXTRN SCT
0x312664…3127f8 Dummy {f00=0x00f9, f01=0x0190, f02=» P EXTRN SCTIPL P EXTRN STTPSZ P EXTRN SCTPSZ 4 P EXTRN SCTSFA J P EXTRN SCTSTL ` P EXTRN SCTSWB v P EXTRN SCTTCT P EXTRN SYSBAS P EXTRN SYSLOD P EXTRN TCLASS P EXTRN TTMJOB P EXTRN DWTECH
0x3127f8…31298c Dummy {f00=0x00f9, f01=0x0190, f02=» P EXTRN CONVRT P EXTRN NXTBLK P EXTRN SYSLDX 4 P EXTRN SAVE01 J P EXTRN SAVE02 ` P EXTRN SAVE03 v P EXTRN SAVE04 P EXTRN SAVE05 P EXTRN SAVE06 P EXTRN SAVE07 P EXTRN SAVE08 P EXTRN SAVE09
0x31298c…312b20 Dummy {f00=0x00f9, f01=0x018e, f02=» P EXTRN SAVE16 P EXTRN SAVE17 P EXTRN SAVE18 0 P EXTRN SAVE19 F P EXTRN SAVE20 P EXTRN SAVE21 r P EXTRN NUMSEG P EXTRN SAVE23 P EXTRN SAVE24 P EXTRN SAVE25 P EXTRN SAVE26 P EXTRN SAVE27
0x312b20…312cb4 (5, 449) Dummy {f00=0x00fa, f01=0x0190, f02=» & P EXTRN I:RSTE DISPL. IN P:MTAB TO P INTERPRETER RESTART ENTRY 2 P* V P* TTAB DISPLACEMENTS ` P* ~ . P EXTRN TTB:CB CURRENT SEGMENT BASE POINTER P EJECT P* P* EXTERNAL SUBROUTINES P* P EXTRN NXTCO
0x312cb4…312e48 Dummy {f00=0x00fa, f01=0x0190, f02=» * v , P*************************************** P F ( PMMUPAG EQU 0 MEMORY MANAGEMENT UNIT N & PSWPBLK EQU 0 SWAPPABLE WORK BLOCKS z $ PDSKPAG EQU 0 DSKPAG APPLICATION P EJECT P P* P* CONSTANTS P*
0x312e48…312fdc Dummy {f00=0x00fa, f01=0x018e, f02=» $ PWBLEN EQU -4 LENGTH OF WORKBLOCK P , P 8 $ P******************************* D $ P* SAVE01URATION FILE (SAVE01) * l $ P******************************* P P* TASK DEFINITION BLOCK: PTDBBT EQU 0 1A BLOCK TYPE (
0x312fdc…313170 Dummy {f00=0x00fa, f01=0x0190, f02=» f $ PTDBTL EQU TDBMC+6 6A TASK LEVEL : PTDBNC EQU TDBTL+6 2N NUMBER OF TERMINAL DEVICE CLASSES 0 P* n & PTDBFST EQU TDBNC+2 FIRST TERM DEF x $ PTDC EQU 7 TERMINAL DEVICE CLASS PTLC EQU 6 LINE CONNECTION ( PTDBREC EQU TDC+TLC TDB-RECOR
0x313170…313304 Dummy {f00=0x00fa, f01=0x0190, f02=»CK TYPE ~ 6 PCDBNC EQU CDBBT+1 2N NUMBER OF SPEC. DEV. CLASSES ( PSDCFST EQU CDBNC+2 FIRST SDC-RECORD J P* v P* & P* USER WORK BLOCK TYPE DEF. BLOCK PUDBBT EQU 0 1A BLOCK TYPE , PUDBNU EQU UDBBT+1 3A NUMBER OF UWB TYPES P*
0x313304…313498 Dummy {f00=0x00fa, f01=0x0190, f02=»UWB+NUMUBL UDB RECORD-LENGTH P EJECT $ P**************** 2 P* SOP-HANDLING * J P**************** b PSOP EQU /2E DEVICE ADDRESS z P PLMP1 EQU /400 LAMP 1 CODE PLMP2 EQU /200 PLMP3 EQU /100 PLMP4 EQU /80 PLM
0x313498…31362c Dummy {f00=0x00fa, f01=0x0190, f02=» F P***************************************************************** F P* CALL-FORMAT, PERFORMS: CFR A14,A13 * T F P* DATA [REL-ADDRESS] * F P*
0x31362c…3137c0 Dummy {f00=0x00fa, f01=0x0190, f02=» P PCALL FORM 16=/F697,16 P EJECT . F P***************************************************************** < F P* CONSTANTS USED IN SYSLOD PART M * F P********************************************************
0x3137c0…313954 (5, 450) Dummy {f00=0x00fa, f01=0x0190, f02=»* 2 PTTB:AT EQU -46 DISPLACEMENT TO MMU BIT MAP =5 PTTB:MT EQU -38 @ PTTB:SP EQU -4 V PTTB:SB EQU -2 l PTTB:ID EQU 2 PTTB:ST EQU 4 PTTB:PP EQU 6 PTTB:PW EQU 8 PTTB:SA EQU 10 PTTB:TD EQU 40 P EJECT
0x313954…313ae8 Dummy {f00=0x00fa, f01=0x0190, f02=» 0 CHANNEL PARAMETER PDWTST EQU 2 STATUS PDWTECB EQU 4 ECB ADDRESS 6 PDWTOR EQU 6 ORDER V PDWTADR EQU 8 ADDRESS BLOCK p PDWTTAB EQU 10 TTAB ADDRESS * PDWTWAT EQU 12 WAIT/ACTIVATE INDICATOR PDWTTQ EQU 14 TERMINAL QUEUE " PDW
0x313ae8…313c7c Dummy {f00=0x00fa, f01=0x018e, f02=» " P* * PAGTAB * " P* *********** * P* P PPAGQF EQU 0 Z PPAGQB EQU 2 n PPAGPA EQU 4 PPAGSB EQU 6 P EJECT P* & P* ************* & P* * SEGT
0x313c7c…313e10 Dummy {f00=0x00fa, f01=0x0190, f02=» * P* ******************* * P* * MISCELLANOUES * 2 * P* ******************* ` P* PBUFLEN EQU -4 PDEVIND EQU -2 PDWTLEN EQU 6 PTDCDD1 EQU 5 PTDCDD2 EQU 6 PLCND1 EQ
0x313e10…313fa4 Dummy {f00=0x00fa, f01=0x0190, f02=»2 LENGTH OF ASCU4Z INTERRUPT TABLE 2 PSCZLEN EQU 16 LENGTH OF SALCUZ INTERRUPT TABLE * 2 PASZBUF EQU 96 LENGTH OF TEMP TABLE FOR ASCU4Z ` 2 PSCZBUF EQU 48 LENGTH OF TEMP TABLE FOR SALCUZ 4 PMINBUF EQU 1984 LENGTH OF TEMP. INT. TABLE AREA P EJE
0x313fa4…314138 Dummy {f00=0x00fa, f01=0x0190, f02=» * : P* THIS IS THE MONITOR CONFIGURATION PROGRAM ENTRY * < : P* * z : P* IT IS ENTERED FROM SYSLOD WITH THE FOLLOWING * : P* PARAMETERS:
0x314138…3142cc Dummy {f00=0x00fa, f01=0x0190, f02=»CATION OF SYSLDX * r : P* A2 - POINTER TO PREVIOUS LOCATION OF SYSLDX * : P* * ^ : P* * : P**********************************************
0x3142cc…314460 Dummy {f00=0x00fa, f01=0x0190, f02=»1,SCTSFA UPDATE START OF FREE AREA P LDR A8,P INIT STACK POINTER * & P ADK A1,2 RELOCATION ROUTINE ENTRY N P CFR A8,A1 x * P ST A13,SCTEFA UPDATE END OF FREE AREA * P LDKL A2,TCLASS GET ADDRESS TO TCLASS . P CWK A2,SCLASS SAME AS ADDRESS TO
0x314460…3145f4 (5, 451) Dummy {f00=0x00fa, f01=0x0190, f02=» POINTER TO TCLASS p 0 PNO:TCL LDKL A2,SCLASS GET ADDRESS TO SCLASS , P CALL CHPTRS RELOCATE POINTERS IN SCLASS N 6 P ST A2,SAVE11,A13 SAVE RELOCATED POINTER TO SCLASS ~ P* & P* CLEAR ALL WORDS IN SYSTEM AREA P* P LD A1,SCTEFA
0x3145f4…314788 Dummy {f00=0x00fa, f01=0x0190, f02=» P AD A1,M:REL,A13 P ABR A1 P EJECT 0 4 /*********************************************** > 4 /* CHPTRS - CHANGE POINTERS IN TCLASS/SCLASS * v 4 /*********************************************** * , (* ENTRY: A2 - POINTER
0x314788…31491c Dummy {f00=0x00fa, f01=0x018e, f02=»- POINTER TO MOVED TCLASS/SCLASS * ( * WORK REGISTER:A1-A7 2 * P * SUBROUTINES: Z * r PCHPTRS EQU * | P ADR A2,A12 RELOCATE POINTER 2 . LDR A3,A2 GET POINTER TO ORIGIN TCLASS/SCLASS , ' LDR* A4,A3 GET LENGTH OF TCLA
0x31491c…314ab0 Dummy {f00=0x00fa, f01=0x018e, f02=» z $ ! LDR* A5,A3 GET POINTER TO CLASS ADR A5,A12 RELOCATE 0 STR A5,A3 STORE L $ LDR* A6,A5 GET LENGTH OF CLASS d CHPT20 EQU * * & SUK A6,4 MOORE DEVICES IN THIS CLASS? P RB(NP) CHPT10 NO! ADK A5,4 NEXT DEVICE L
0x314ab0…314c44 Dummy {f00=0x00fa, f01=0x0190, f02=» r ADR A7,A12 RELOCATE * % STR A7,A5 STORE RELOCATED DW-ADDRESS $ " P LD A8,SCTOPT GET OPTION WORD R P ANKL A8,1 MMU IN SYSTEM? x P RB(Z) CHPT20 NO! , P LD A8,DWTMEC,A7 GET MONITOR ECB ADDRESS & P LDR A9,A8 GET MONITOR ECB ADDRESS
0x314c44…314dd8 Dummy {f00=0x00fa, f01=0x0190, f02=»ESS RELOCATED t , P ST A8,DWTMEC,A7 STORE RELOCATED ADDRESS RB CHPT20 F CHPT30 EQU * X P RTN A14 l P EJECT | 6 2************************************************** 6 2* B:TCT - BUILD TASK CONTROL TABLE * 6 2**********
0x314dd8…314f6c Dummy {f00=0x00fa, f01=0x0190, f02=»ATION DATA l * " * EXIT: A6 - START OF TC:TAB $ * A7 - LENGTH OF TC:TAB B * j * WORK REGISTERS: A2,A3 t * * SUBROUTINES: * . )* TASK CONTROL TABLE LAYOUT . )* ____
0x314f6c…315100 Dummy {f00=0x00fa, f01=0x0190, f02=» I TTMJOB I . )* _________________________ , . ** I MONITOR TASKS I ^ . )* _________________________ . ** I USER TASKS I . )* _____
0x315100…315294 (5, 452) Dummy {f00=0x00fa, f01=0x0190, f02=»A11,SAVE01,A13 GET START OF SAVE01URATION DATA ( $ LD A7,SCTSFA GET START OF FREE AREA 6 LDR A6,A7 SAVE b & " LDKL A2,TTMJOB GET TTMJOB ADDRESS z ST A2,2,A7 STORE IN TC:TAB * % ADK A7,4 CONTINUE WITH MONITOR TASKS ( P LD A2,SCTOPT ANY
0x315294…315428 Dummy {f00=0x00fa, f01=0x0190, f02=»S IN TC:TAB IF CERTAIN OPTIONS AVALIABLE * @ P* - TO BE PROVIDED * 4 @ P*********************************************************** x P EJECT PBTCT15 EQU * " P LD A2,SCTDMT DATA MANAGEMENT? $ PBTCT
0x315428…3155bc Dummy {f00=0x00fa, f01=0x018e, f02=»RESERV ENTRY FOR DM-TASK D0 PBTCT25 RB BTCT20 $ PBTCT30 EQU * < * P : 5* COMPUTE NUMBER OF TASKS AND RESERV SPACE IN TC:TAB Z * . )* A11 - POINTER TO TASK DEFINITION BLOCK * 2 P ST A7,SAVE13,A13 SAVE CURRENT USER TASK E
0x3155bc…315750 Dummy {f00=0x00fa, f01=0x0190, f02=» RF(E) BTCT35 YES ! P LDKL A1,LMP4 FORMAT ERROR ! CALL ERROR HALT ! @ PBTCT35 EQU * ! X * ! l 0 ,* COMPUTE NUMBER OF TASK IN EACH TASK CLASS ! v * ! PBTCT40 EQU * ! $ CALL GETTSK GET NUMBER OF TASKS ! PBTCT50 EQU * ! , P ADK
0x315750…3158e4 Dummy {f00=0x00fa, f01=0x018e, f02=» CALL ERROR INDICATE MEMORY OVERFLOW ! PBTCT55 EQU * " , ( $ SUK A1,1 MOORE TASKS IN THIS CLASS? " @ RB(P) BTCT50 YES " l $ CALL NXTBLK SKIP TO NEXT BLOCK " ( # CCK A2,'TT' TASK DEFINITION BLOCK? " RB(E) BTCT40 YES " * " 4 0* ENTRIES
0x3158e4…315a78 Dummy {f00=0x00fa, f01=0x0190, f02=» & ! STR A7,A6 STORE LENGTH IN TC:TAB # * P ST A6,SCTTCT STORE POINTER TO TC:TAB # . RTN A14 # P EJECT # l 8 P*************************************************** # z 8 P* * # 8 P* B:FWT - BUI
0x315a78…315c0c Dummy {f00=0x00fa, f01=0x0190, f02=» * # j 8 P*************************************************** $ 8 P* * $ R 8 P* REFERENCED IN: CONMON * $ 8 P* * $ 8 P*
0x315c0c…315da0 Dummy {f00=0x00fa, f01=0x018e, f02=»- FILE WORK TABLE LENGTH IN * $ ~ 8 P* BYTES * % * 8 P* * % f 8 P* EXIT: SCTFWT - ADDRESS TO FIRST FWT * % 8 P* SCTNOF - TOTAL NUMBER OF FM-FIL
0x315da0…315f34 (5, 453) Dummy {f00=0x00fb, f01=0x0190, f02=» 8 P* * & 8 P* SUBROUTINES: ERROR,MULT * & @ 8 P* * & | 8 P* FUNCTIONAL DESCRIPTION: * & 8 P* THIS SUBROUTINE R
0x315f34…3160c8 Dummy {f00=0x00fb, f01=0x0190, f02=»N BY THE * & l 8 P* FORMULA: A=L*(G+N*T) * ' 8 P* WHERE A=AREA SIZE IN BYTES * ' T 8 P* L= FWT LENGTH IN BYTES * ' 8 P* G=NUMBER OF GENERAL FM-FILES * ' 8 P
0x3160c8…31625c Dummy {f00=0x00fb, f01=0x0190, f02=» * ' 8 P*************************************************** ( , P EJECT ( h PB:FWT EQU * ( v & P LD* A2,SCTTCT GET LENGTH OF TCTAB ( & P AD A2,SCTTCT COMPUTE END OF TCTAB ( * P SU A2,SAVE02,A13 LENGTH OF USER PART (
0x31625c…3163f0 Dummy {f00=0x00fb, f01=0x0190, f02=»F ADD NUMBER OF GENERAL FM-FILES ( 0 P ST A3,SCTNOF STORE TOTAL NUMBER OF FM-FILES ) ( , P LD A2,SCTFWL GET FILE WORK TABLE LENGTH ) P CALL MULT MULTIPLY ) , P SRL A3,1 NUMBER OF WORDS TO BE RESERVED ) P ADK A3,0 ANY FWT:S AT ALL? ) P RF(Z) FWT70
0x3163f0…316584 Dummy {f00=0x00fb, f01=0x0190, f02=»S TO FIRST FWT ) v ( PFWT50 CW A2,SCTEFA MEMORY OVERFLOW? * P RF(NE) FWT60 NOT YET! * B * P LDKL A1,LMP3 INDICATE MEMORY OVERFLOW * ` P CALL ERROR * ( PFWT60 ADK A2,2 RESERVE ANOTHER WORD * $ P SUK A3,1 DECREMENT WORD COUNTER * * P RB(NZ) FWT50 CHEC
0x316584…316718 Dummy {f00=0x00fb, f01=0x0190, f02=»************** * x * &* MONBLK - GENERATE MONITOR BLOCKS * + * &************************************** + D * + r ( $* NUMBER OF BLOCKS TO BE GENERATED: + | ( P* 20+N*(NUMBER OF TASKS IN SYSTEM) + $ P* WHERE N IS A SYSTEM CONSTANT + $ P* DEFINED A
0x316718…3168ac Dummy {f00=0x00fb, f01=0x0190, f02=»* SCTEFA - END OF FREE AREA + * , , . ** EXIT: BLOCKS - POINTER TO FIRST BLOCK , 6 * , h $ * WORK REGISTERS: A1,A2,A7,A12 , r * , * SUBROUTINES: BLKGEN , * , EJECT , PMONBLK EQU * , LDK A1,0 , & ! LD A1
0x3168ac…316a40 Dummy {f00=0x00fb, f01=0x0190, f02=»* , ( P LD* A7,SCTTCT GET LENGTH OF TC:TAB - P* - 6 0 P* GET NUMBER OF BLOCKS PER TASK TO GENERATE - @ P* - t P LD A2,SCTBLK - ~ PMON:10 EQU * - SUK A7,2 MOORE TASKS? - RF(Z) MON:20 NO - P CALL BLKGEN - RB MON:10 - PMO
0x316a40…316bd4 (5, 454) Dummy {f00=0x00fb, f01=0x0190, f02=»D BLOCK - * . STR A1,A12 . ST A1,2,A12 . . ST A1,4,A12 . B P* . V F P* CHECK IF BUFFER GREATER THAN 3 WORDS RESERVED FOR SYSLOD PART A . ` 0 P* IF NOT - USE LAST MONITOR BLOCK AS BUFFER . P* . & P LD A1,BUFSIZ,A13 GET BUFFER SIZ
0x316bd4…316d68 Dummy {f00=0x00fb, f01=0x0190, f02=»T A12,SYSBUF,A13 START OF BUFFER . PMON:30 EQU * / ( ADKL A12,6 / < P LD A2,SCTSFA / P P SUK A2,2 / f PMON:40 ADK A2,2 / x P CW A2,SCTEFA / P RF(NE) MON:50 / P LDKL A1,LMP3 / P CALL ERROR / PMON:50 CWR A2,A12 / P RB(NE)
0x316d68…316efc Dummy {f00=0x00fb, f01=0x0190, f02=»* BLKGEN - GENERATE MONITOR BLOCK * / * %************************************* 0 . * 0 * REFERENCED IN: MONBLK 0 f * 0 * ENTRY: A1=0 0 4 0* A2 - NUMBER OF BLOCKS TO BE GENERATED 0 $ * A12 - NEXT FREE ENTRY 0
0x316efc…317090 Dummy {f00=0x00fb, f01=0x0190, f02=» 0 * 1 0 ,* MONITOR BLOCK LAYOUT 1 0 ,* -------------------- 1 F 0 ,* I DATA *+6 I 1 z 0 ,* -------------------- 1 0 ,* I DATA 0
0x317090…317224 Dummy {f00=0x00fb, f01=0x0190, f02=» -------------------- 1 ~ * 2 " EJECT 2 , PBLKGEN EQU * 2 : LDR A3,A2 2 N PBLK:10 EQU * 2 b RF(Z) BLKEX 2 v ADKL A12,6 2 ST A12,-6,A12 2 P ST A1,-4,A12 2 ST A1,-2,A12 2 SUK A3,1 2 RB BLK:10 2 PBLKE
0x317224…3173b8 Dummy {f00=0x00fb, f01=0x0190, f02=»UILD SEGMENT TABLE * 2 ( $************************************ 3 * 3 J * &* ENTRY: SCTSFA - START OF FREE AREA 3 T ( $* SCTEFA - END OF FREE AREA 3 , (* SCTLAC - START OF APPLICATION 3 * 3 , (* EXIT: SCTPAG - ADDRESS TO PA
0x3173b8…31754c Dummy {f00=0x00fb, f01=0x0190, f02=» * 3 P* 4 P* CHECK APPLICATION TYPE 4 P* 4 6 ( P LD A1,APPTYP,A13 GET LANGUAGE TYPE 4 @ P CWK A1,'CR' 4 l $ P RF(E) SEG:05 CREDIT APPLICATION 4 P CWK A1,'CO' 4 $ P RF(E) SEG:05 COBOL APPLICATION 4 P RF SEGEX 4 * 4 * BUILD
0x31754c…3176e0 Dummy {f00=0x00fb, f01=0x0190, f02=»2 STORE IN SEGTAB 4 ( P ADKL A12,2 START OF SEGMENT BLOCKS 5 , P LD A1,SAVE29,A13 GET NUMBER OF SEGMENTS 5 F P STR A1,A12 SAVE 5 v P ADKL A12,2 5 . P ST A12,SAVE30,A13 START OF SEGMENT TABLE 5 * P LDKL A1,/8400 STATUS FOR FIRST BLOCK 5 $ P STR A
0x3176e0…317874 (5, 455) Dummy {f00=0x00fb, f01=0x0190, f02=» A2,A1 SAVE POINTER 5 P ADKL A2,6 ADDRESS TO P:BAS 6 P CALL GETCON GET P:BAS 6 @ & P ST A1,2,A12 STORE IN FIRST BLOCK 6 ^ " P ADKL A12,8 BYPASS FIRST BLOCK 6 4 P LD A2,SCTLAC GET LOGICAL ADDRESS TO COMMON PART 6 * P ADKL A2,NUMSEG GET NUMBER OF SEGM
0x317874…317a08 Dummy {f00=0x00fb, f01=0x018e, f02=»10 EQU * 6 P LDK A7,0 STATUS 7 CALL GETCON 7 * * P* LDR A3,A1 SAVE DISC ADDRESS =REL 11 7 > ( P* ANK A3,/FF CLEAR LEFT BYTE =REL 11 7 l , P SRL A1,8 PROGRAM TYPE TO RIGHT BYTE =2 7 ( # CCK A1,'RR' CORE RESIDENT SEGMENT? 7 P RF(E) SEG:30 YES! 7
0x317a08…317b9c Dummy {f00=0x00fb, f01=0x0190, f02=» 7 P ADK A2,2 8 P RF SEG:40 8 PSEG:30 EQU * 8 , * P LDKL A7,/8800 INDICATE LOADED IN CORE 8 @ PSEG:35 EQU * 8 n ADK A2,2 SEGMENT ADDRESS 8 CALL GETCON 8 P* 8 P AD A1,SCTADA+2 8 P RF(O) SEG:36 8 P RF SEG:38 8 PSEG:36
0x317b9c…317d30 Dummy {f00=0x00fb, f01=0x0190, f02=»L ERROR 8 PSEG:40 EQU * 9 P* ORR A7,A3 =REL 11 9 $ P STR A7,A12 9 @ P ST A1,2,A12 9 T P ADK A2,2 EFFECTIVE LENGTH 9 h CALL GETCON 9 & P ST A1,4,A12 SAVE EFFECTIVE LENGTH 9 " P ADKL A12,8 NEXT SEGMENT BLOCK 9 " ADK A2,2 NEXT BLOCK IN S:
0x317d30…317ec4 Dummy {f00=0x00fb, f01=0x0190, f02=» A2,2 9 P CW A2,SCTEFA : P RF(NE) SEG:70 : $ P LDKL A1,LMP3 : : ( P CALL ERROR INDICATE MEMORY OVERFLOW : P PSEG:70 CWR A2,A12 : | P RB(NE) SEG:60 : P ST A12,SCTSFA : PSEGEX EQU * : RTN A14 RETURN : P XIF : P IFT SWPBLK=1
0x317ec4…318058 Dummy {f00=0x00fb, f01=0x0190, f02=» * : f D P* * ; D P* * ; f D P* B:SWBT - BUILD SWAPPABLE WORK BLOCK TABLE * ; D P* =======
0x318058…3181ec Dummy {f00=0x00fb, f01=0x0190, f02=» REFERENCED IN: SYSLDM * ; D P* * < > D P* ENTRY: * < D P*
0x3181ec…318380 Dummy {f00=0x00fb, f01=0x0190, f02=» * < ^ D P* WORK REGISTERS: A1-A12 * = D P* * = ^ D P* REGISTER USAGE: A8 - DISC ADDRESS TO FIRST COPY * = D P*
0x318380…318514 (5, 456) Dummy {f00=0x00fb, f01=0x0190, f02=» A11 - POINTER IN CONF. FILE * = ~ D P* A12 - ADDRESS TABLE POINTER * > 6 D P* * > ~ D P* SUBROUTINES: ERROR,GETNUM,GETCON * >
0x318514…3186a8 Dummy {f00=0x00fb, f01=0x0190, f02=» * > V D P*************************************************************** ? P EJECT ? V PB:SWBT EQU * ? d & P LD A12,SCTSFA START OF FREE AREA ? x 2 P LD A11,SAVE01,A13 START OF CONFIGURATION FILE ? P* ? : P* SEARCH FOR SWB TYPE DEFINITION BLOC
0x3186a8…31883c Dummy {f00=0x00fb, f01=0x0190, f02=»S! ? 0 P CCK A2,'CC' COMMON DEVICE DEFINITION BLOCK? @ P RF(NE) BSWT20 NO! @ > P ADKL A11,1 @ X " P CALL NXTCOM SKIP COMMON BLOCK @ l 2 PBSWT20 CCK A2,'UU' UWB TYPE DEFINITION BLOCK? @ P RF(NE) BSWT40 NO! @ P ADKL A11,1 NUMBER OF TYPES @ P L
0x31883c…3189d0 Dummy {f00=0x00fb, f01=0x0190, f02=»BFST-1 FIRST UWB RECORD @ ( PBSWT30 ADKL A11,6 BYPASS UWB RECORD A $ P SUK A1,1 DECR. NUMBER OF TYPES A L P RB(P) BSWT30 MOORE LEFT A t , P LCR A2,A11 GET NEXT CHAR. IN CONF.FILE A 0 PBSWT40 CCK A2,'SS' SWB TYPE DEFINITION BLOCK A P RF(E) BSWT44 YE
0x3189d0…318b64 Dummy {f00=0x00fb, f01=0x0190, f02=»F TYPES A v * P ST A11,SAVE23,A13 START OF CONF. DATA B P LDR A6,A11 B > P CALL GETNUM GET 3 DIGITS B R P LDR A5,A5 ZERO? B t $ P RF(Z) SWBERR ILLEGAL NUMBER!!! B , P ST A5,SAVE24,A13 SAVE NUMBER OF RECORDS B ( P LD A8,SCTSWB GET ADDRESS TO $SWAPP
0x318b64…318cf8 Dummy {f00=0x00fb, f01=0x0190, f02=»TO ADDRESS TABLE B n * P CM SAVE14,A13 RESET SWP-BLOCK COUNTER C P ADKL A12,2 FIRST POINTER C F P LDR A10,A12 SAVE C h $ PBSWT50 ADKL A10,2 BYPASS POINTER C ( P SUK A5,1 DECREMENT NUMBER OF TYPES C P RB(P) BSWT50 C P* C & P* GET ADDRESS TO
0x318cf8…318e8c Dummy {f00=0x00fb, f01=0x0190, f02=»DKL A2,S:BTAB DISPL. TO S:BTAB ADDRESS C $ P CALL GETCON GET S:BTAB ADDRESS D . * P LDR A2,A1 GET ADDRESS TO PROT. S:BTAB D V * P RB(Z) SWBERR NO SWB:S IN APPLICATION! D P ADK A1,2 ADDRESS TO NAME D P ST A1,SAVE21,A13 SAVE D 0 P SUK A2,2 ADDRESS TO L
0x318e8c…319020 Dummy {f00=0x00fb, f01=0x0190, f02=» LDKL A9,0 RESET BLOCK COUNTER D , PBSWT60 STR A10,A12 SAVE POINTER TO BLOCK E & P ST A4,SAVE19,A13 SAVE E V * P LD A11,SAVE23,A13 START OF CONF. DATA E t , P LD A7,SAVE24,A13 NUMBER OF SWB RECORDS E 0 PBSWT65 LD A2,SAVE21,A13 NAME RECORD IN PROT. E $ P C
0x319020…3191b4 (5, 457) Dummy {f00=0x00fc, f01=0x0190, f02=»LEFT BYTE E ~ " P LC A3,1,A11 GET SECOND CHAR. F & P CWR A1,A3 TWO FIRST CHAR. EQUAL? F 8 P RF(NE) BSWT70 NO! F b " P ADK A2,2 NEXT CHAR. IN PROT. F | P CALL GETCON GET THIRD CHAR. F P SRL A1,8 ISOLATE CHAR. F 0 P LC A3,2,A11 GET THIRD CHAR. FROM
0x3191b4…319348 Dummy {f00=0x00fc, f01=0x018e, f02=»WB SKIP NAME F | ( P SUK A7,1 DECREMENT NUMBER OF TYPES G P RB(P) BSWT65 NEXT TYPE G @ P* G ` N P* NO MATCHING NAME IN CONFIGURATION FILE - RESET ALL WORDS IN THIS BLOCK G j P* G P STR A7,A10 1:ST WORD G P ST A7,2,A10 2:ND WORD G P ST A7
0x319348…3194dc Dummy {f00=0x00fc, f01=0x0190, f02=» G & P ADKL A11,NAMUWB NUMBER OF COPIES H P LDR A6,A11 H 2 P LDR A3,A2 SAVE POINTER H F & P CALL GETNUM GET NUMBER OF COPIES H f , P SLL A5,8 NUMBER OF COPIES IN LEFT BYTE H : P OR A5,SAVE26,A13 DISC ADDRESS BITS 0-7 IN RIGHT BYTE H " P STR A5,A1
0x3194dc…319670 Dummy {f00=0x00fc, f01=0x0190, f02=»,A10 SAVE H P LDR A2,A3 RESTORE POINTER I $ P SUK A2,UPNAME PROTOTYPE ADDRESS I 4 & P CALL GETCON GET PROTOTYPE ADDRESS I P LDR A2,A1 SAVE I & P SUK A2,UPNAME LENGTH OF WORKBLOCK I P CALL GETCON I * P ST A1,SWBLEN,A10 STORE LENGTH OF SWB I 0
0x319670…319804 Dummy {f00=0x00fc, f01=0x0190, f02=»S I d P RF(O) BSWT88 J P RF BSWT90 J PBSWT88 IM SAVE26,A13 J 2 P CM SAVE25,A13 J N PBSWT90 EQU * J d & P ADK A1,1 INCREMENT SECTOR COUNTER J x " P SUKL A3,256 DECREMENT LENGTH J P RB(P) BSWT86 MOORE SECTORS? J P SUK A5,1 MOORE COPIES? J
0x319804…319998 Dummy {f00=0x00fc, f01=0x0190, f02=»E26,A13 J P CW A8,SAVE28,A13 K ( P RB(G) SWBERR $SWAP-FILE TOO SMALL! K * P RF(L) BSWT95 K V P LD A8,SAVE25,A13 K l P CW A8,SAVE27,A13 K ( P RF(G) BSWT98 SWAPP-FILE TOO SMALL! K * PBSWT95 ADKL A10,8 START OF NEXT BLOCK K P ADKL A12,2 NE
0x319998…319b2c Dummy {f00=0x00fc, f01=0x0190, f02=»RECORD IN PROT. S:BTAB K | P ST A2,SAVE21,A13 SAVE L 0 P LD A4,SAVE19,A13 GET LENGTH OF PROT. S:BTAB L < P SUK A4,UP:REC DECREMENT L p P RB(P) BSWT60 MOORE TYPES L , P LD A8,SAVE14,A13 ANY BLOCKS GENERATED? L P RF(NE) BSWT99 YES L PBSWT98 LDKL
0x319b2c…319cc0 Dummy {f00=0x00fc, f01=0x0190, f02=»AREA L l P RTN A14 M P XIF M EJECT M ( 6 1************************************************* M 6 6 1* B:DMTT - BUILD DATA MANAGEMENT TASK TABLES * M p 6 1************************************************* M * M * &* ENTRY: SCTSFA - START
0x319cc0…319e54 (5, 458) Dummy {f00=0x00fc, f01=0x0190, f02=»T: M * N ( P* WORK REGISTERS: A1,A3,A5,A7,A12 N * N @ * SUBROUTINES: DMTGEN N J * N h PB:DMTT EQU * N r * % LD A12,SCTSFA GET START OF FREE AREA N ( P LD A7,SCTTCT GET POINTER TO TC:TAB N " ADK A7,4 FIRST DM-TASK ENTRY N $ P L
0x319e54…319fe8 Dummy {f00=0x00fc, f01=0x0190, f02=» P ANK A3,/F MOORE DM-TASKS? O P RF(Z) DMTTEX NO! O & P SRC A3,1 O @ P RF(NN) DMTT30 O R CALL DMTGEN O h DMTT30 EQU * O | P ADK A5,1 O P RB DMTT20 O DMTTEX EQU * O RTN A14 O EJECT O 6 2**********************************
0x319fe8…31a17c Dummy {f00=0x00fc, f01=0x0190, f02=» * P * ENTRY: A1 - TASK ID P , (* A6 - INDEX RECORD BUFFER SIZE P . 0 ,* A7 - TCTAB ENTRY FOR CURRENT TASK P ^ & "* A12 - START OF FREE AREA P * P * EXIT: P * P P* WORK REGISTERS: A2,A4 P * P
0x31a17c…31a310 Dummy {f00=0x00fc, f01=0x0190, f02=»0 NO! P P LDK A4,0 RESET PAGE POINTER Q PDMTG10 EQU * Q 2 P CWK A4,/4000 LAST PAGE? Q F P RF(E) DMTG30 YES! Q f " P STR A4,A12 STORE PAGE POINTER Q ( P ADKL A4,/400 INCREMENT PAGE POINTER Q , P ADKL A12,2 INCREMENT MMU ENTRY POINTER Q P RB DM
0x31a310…31a4a4 Dummy {f00=0x00fc, f01=0x0190, f02=» * Q . P LD A1,SAVE30,A13 GET ADDRESS TO SEG.TABLE R P STR A1,A12 STORE TTB:SP R < P ADKL A12,6 R PDMTG40 EQU * R p 2 . STR A12,A7 STORE TTAB ENTRY POINTER IN TC:TAB R " ADK A7,2 NEXT ENTRY IN TC:TAB R * P ST A5,TTB:ID,A12 TASK IDENTIFICATION R
0x31a4a4…31a638 Dummy {f00=0x00fc, f01=0x0190, f02=» STATUS R z $ P ST A1,TTB:PW,A12 STORE IN TTAB S " P ADKL A12,40 TERMINAL DEVICES S 8 LDK A1,6 LENGTH S ^ STR A1,A12 STORE S v ADKL A12,40 TASK STACK+2 S , ' LDR A1,A6 GET INDEX RECORD BUFFER SIZE S SLL A1,2 MULTIPLY BY 4 S ( P ADR A
0x31a638…31a7cc Dummy {f00=0x00fc, f01=0x0190, f02=»FLOW S n P RF(NE) DMTG60 NO! T P LDKL A1,LMP3 T & ( P CALL ERROR INDICATE MEMORY OVERFLOW T < PDMTG60 CWR A2,A12 T h P RB(NE) DMTG50 T , ( ST A12,SCTSFA UPDATE START OF FREE AREA T P RTN A14 T EJECT T " ****************************** T
0x31a7cc…31a960 Dummy {f00=0x00fc, f01=0x0190, f02=»NTRY: SAVE01 - START OF SAVE01URATION DATA T * U 4 8 4* EXIT: TC:TAB CONTAIN POINTERS TO ALL TASK TABLES U > * U z * WORK REGISERS: A1-A12 U * U 8 3* SUBROUTINES: CONVRT,GETTSK,TETTDC,GETCLN,GETSDC U * U ( #*
0x31a960…31aaf4 (5, 459) Dummy {f00=0x00fc, f01=0x0190, f02=» TABLE I U ~ * &* I 16 I V * &* I WORDS I V J * &* I______________________I V x * &* TTB:SB I SEGMENT POINTER I V * &* ------------------------ V * &* TAS
0x31aaf4…31ac88 Dummy {f00=0x00fc, f01=0x0190, f02=» ------------------------ V * &* TTB:ST I STATUS/LEVEL I W * * &* ------------------------ W X * &* TTB:PP I PENDING QUEUE I W * &* ------------------------ W * &* TTB:PW I PROGRAM STATUS WORD I
0x31ac88…31ae1c Dummy {f00=0x00fc, f01=0x0190, f02=»-- W l * &* I REGISTER I X * &* I SAVE I X 8 * &* I AREA I X f * &* I 14 I X * &* I WORDS I X * &* ----------
0x31ae1c…31afb0 Dummy {f00=0x00fc, f01=0x0190, f02=» TABLE I X z * &* : : Y * &* : : Y F * &* I______________________I Y t P EJECT Y 2 P* TASK SAVE01URATION TABLE LAYOUT Y 0 ,* ____________________
0x31afb0…31b144 Dummy {f00=0x00fc, f01=0x018e, f02=»I INDEX/FILCODE I Y 0 ,* ------------------------------ Z & 0 ,* I DWT-ADDRESS I Z Z 0 ,* ------------------------------ Z 0 ,* : : Z 0 ,* :
0x31b144…31b2d8 Dummy {f00=0x00fc, f01=0x0190, f02=» 0 ,* ------------------------------ [ 0 ,* I DWT-ADDRESS I [ 8 0 ,* ------------------------------ [ l EJECT [ PB:TT EQU * [ * P ST P,SAVE04,A13 SAVE LOCATION COUNTER [ * % LD A12,SCTSFA GET START O
0x31b2d8…31b46c Dummy {f00=0x00fc, f01=0x018e, f02=»U * [ $ LCR A2,A11 GET FIRST BLOCK TYPE ( # CCK A2,'TT' TASK DEFINITION BLOCK? 4 RF(E) BTT20 YES ` P LDKL A1,LMP4 FORMAT ERROR x CALL ERROR PBTT20 EQU * * ( $* GET NUMBER OF TASKS IN THIS CLASS * CALL
0x31b46c…31b600 Dummy {f00=0x00fc, f01=0x0190, f02=» j SLL A5,8 MOVE TO LEFT BYTE ] * P LC A5,TDBID+5,A11 GET SECOND ID DIGIT ] , . P ST A5,SAVE16,A13 SAVE TASK ID START VALUE ] Z P* ] " P* CHECK IF CREDIT APPLICATION ] P* ] P LD A5,APPTYP,A13 CREDIT? ] P CWK A5,'CR' ] P RF(NE) BTT2
0x31b600…31b794 (5, 460) Dummy {f00=0x00fc, f01=0x0190, f02=» A5,8 MOVE TO LEFT BYTE ] . P LC A5,TDBMC+5,A11 GET SECOND CHAR IN TCL ^ $ P CALL GETTCL GET TCL START VALUE ^ R P ST A5,SAVE17,A13 SAVE ^ z PBTT21 EQU * ^ P EJECT ^ * ^ * GET TASK LEVEL ^ * ^ 0 P LC A5,TDBTL+4,A11 GET FIRST DIG
0x31b794…31b928 Dummy {f00=0x00fc, f01=0x0190, f02=»RY ^ t P ST A1,SAVE24,A13 SAVE _ P EJECT _ ( * _ 6 B P* COMPUTE SIZE OF SAVE01URATION DEPENDENT PART OF TASK TABLE _ @ * _ $ LDKL A10,TTB:TD STANDARD LENGTH _ " P LD A5,SCTOPT GET OPTION WORD _ 4 P ANK A5,/11 CHECK IF EMM AND MMU PAGING IN
0x31b928…31babc Dummy {f00=0x00fc, f01=0x0190, f02=»B:AT RESERV SPACE FOR BIT MAP _ P RF BTT30 ` & PBTT22 LD A5,SCTOPT ` 8 P SRC A5,1 MMU PAGING? ` R P RF(NN) BTT25 NO ` p , P SUKL A10,TTB:MT 16+2 WORD EXTRA IF MMU ` 2 - SUKL A12,TTB:MT RESERV SPACE FOR EXTRA WORDS ` RF BTT30 ` PBTT25 EQ
0x31babc…31bc50 Dummy {f00=0x00fc, f01=0x0190, f02=»CB RESERV SPACE FOR EXTRA WORD ` PBTT30 EQU * a & * a : : P* ADD ONE WORD FOR LENGTH OF TASK SAVE01URATION TABLE a D * a ADKL A10,2 a P EJECT a * a < 7* COMPUTE SIZE OF TERMINAL DEVICE CLASS DEPENDENT PART a " P* OF TASK SAVE0
0x31bc50…31bde4 Dummy {f00=0x00fc, f01=0x0190, f02=»FST TERMINAL DEVICE CLASS DEFINITION a $ CALL GETTDC GET NUMBER OF TDC:S b , LDR A7,A1 SAVE b T PBTT35 EQU * b l RF(Z) BTT40 b ( $ CALL GETCLN GET CLASS NUMBER (1-99) b & " ADR A1,A1 2*(BINARY CLASS NUMBER) b , P LD A8,SAVE18,A13 GET POINTER
0x31bde4…31bf78 Dummy {f00=0x00fc, f01=0x018e, f02=»TE FORMAT ERROR b ~ PBTT37 EQU * c " P ADR A8,A1 GET ENTRY IN TCLASS c , $ P LDR* A8,A8 GET POINTER TO CLASS c R $ P LDR* A8,A8 GET LENGTH OF CLASS c z " SUKL A8,2 EXCLUDE LENGTH WORD c ( $ ADR A10,A8 ADD TO TOTAL TTAB LENGTH c . ) ADR A6,A8 ADD TO TA
0x31bf78…31c10c Dummy {f00=0x00fc, f01=0x0190, f02=» c PBTT40 EQU * d * d > :* COMPUTE SIZE OF SPECIAL DEVICE CLASS DEPENDENT PART OF d & P* TASK SAVE01URATION TABLE d h * d 6 1 CALL GETSDC GET NUMBER OF SPECIAL DEVICE CLASSES d P ADKL A9,2 FIRST SDC RECORD d LDR A7,A1 SAVE d
0x31c10c…31c2a0 Dummy {f00=0x00fc, f01=0x0190, f02=»R) d p , P LD A8,SAVE11,A13 GET POINTER TO SCLASS e P LDR* A2,A8 e : P SUK A2,2 e N P CWR A1,A2 e ` P RF(NG) BTT52 e r P LDKL A1,LMP4 e & P CALL ERROR INDICATE FORMAT ERROR e PBTT52 EQU * e " P ADR A8,A1 GET ENTRY IN SCLASS e $ P LDR*
0x31c2a0…31c434 (5, 461) Dummy {f00=0x00fd, f01=0x018e, f02=» TTAB LENGTH e x . ) ADR A6,A8 ADD TO TASK CONF. TABLE LENGTH f ADKL A9,SDC NEXT CLASS f F ( # SUK A7,1 DECREMENT NUMBER OF SDC:S f f RB BTT50 f PBTT55 EQU * f " P ADK A6,2 INCLUDE LENGTH WORD f 2 P LD A7,SAVE13,A13 GET CURRENT ENTRY IN TC:
0x31c434…31c5c8 Dummy {f00=0x00fd, f01=0x0190, f02=» f P* =4 g " P* MEMORY OVERFLOW CHECK =4 g P* =4 g < $ P LDR A1,A11 SAVE REGISTER A11 =4 g J " P LDR A5,A9 SAVE REGISTER A9 =4 g r $ P LDR A11,A12 GET TTAB ADDRESS =4 g ( P ADR A11,A10 COMPUTE END OF TTAB =4 g * P LD A9,SCTEFA GET END OF FRE
0x31c5c8…31c75c Dummy {f00=0x00fd, f01=0x0190, f02=»R INDICATE MEMORY OVERFLOW =4 g $ PBTT62 LDR A11,A1 RESTORE A11 =4 h & P LDR A9,A5 RESTORE A9 =4 h N P EJECT =4 h n 8 P* STORE LENGTH OF TASK SAVE01URATION TABLE IN TTAB h * h ST A6,TTB:TD,A12 h * h : 6* STORE TASK LEVEL IN RIGHT
0x31c75c…31c8f0 Dummy {f00=0x00fd, f01=0x0190, f02=» STORE TASK LEVEL IN LEFT BYTE OF PROGRAM STATUS WORD h * i > & P SLL A5,10 MOVE LEVEL TO LEFT BYTE i H P ORKL A5,/00C0 i r " P LD A2,SCTOPT GET OPTION WORD i P ANK A2,1 MMU OPTION? i P ORR A5,A2 SET BIT 15 IF MMU i $ ST A5,TTB:PW,A12 STORE
0x31c8f0…31ca84 Dummy {f00=0x00fd, f01=0x0190, f02=»A12 STORE IN TTAB i ADK A5,1 INCREMENT TASK ID j 6 P ST A5,SAVE16,A13 SAVE TO NEXT TASK IN SAME CLASS j > P IFF MMUPAG+DSKPAG=0 =3 j x P* j * P* STORE SEGMENT TABLE ADDRESS IN TTAB j P* j 0 P LD A5,SAVE30,A13 GET SEGMENT TABLE ADDRESS j
0x31ca84…31cc18 Dummy {f00=0x00fd, f01=0x0190, f02=»NE) BTT65 NO j P* k ( P* STORE TASK CLASS TO MATCH IN TTAB k P* k J * P LD A5,SAVE17,A13 GET TCL START VALUE k T " P ST A5,TTB:PP,A12 SAVE IN TTAB k P ADK A5,1 INCREMENT TCL k P ST A5,SAVE17,A13 SAVE k PBTT65 EQU * k , ' STR A12,A7 SA
0x31cc18…31cdac Dummy {f00=0x00fd, f01=0x0190, f02=»0 GET TTAB LENGTH k 0 P ADS A5,SAVE10,A13 UPDATE START OF FREE AREA l 4 / ADR A12,A10 NEXT TTAB ENTRY IN THIS TASK CLASS l N 6 2 SUKL A8,1 DECREMENT NUMBER OF TASKS IN THIS CLASS l RB BTT60 l P EJECT l PBTT70 EQU * l * l * &* RESET P
0x31cdac…31cf40 Dummy {f00=0x00fd, f01=0x0190, f02=»'TT' TASK DEFINITION BLOCK? l P RF(NE) BTT95 m $ P LDKL A2,BTT20 m : P SUKL A2,REL m P P ADR A2,A13 m d P ABR A2 m x PBTT95 EQU * m P =4 m P =4 m P =4 m P =4 m P =4 m P =4 m P =4 m P =4 m
0x31cf40…31d0d4 (5, 462) Dummy {f00=0x00fd, f01=0x018e, f02=»************************************** m n J J* B:DWTS - BUILD DWT:S FOR SPECIAL DEVICES AND CONNECT TO TASK TABLES n . L J************************************************************************ n | * n * REFERENCED IN: MONCON n * n , (* ENTRY
0x31d0d4…31d268 Dummy {f00=0x00fd, f01=0x0190, f02=» * o * EXIT: o * o * WORK REGISTERS: A1-A12 o ( * o J < 8* SUBROUTINES: GETTSK,GETTDC,GETSDC,GETCLN,NXTBLK,ERROR o T * o EJECT o PB:DWTS EQU * o * o & P* GET START OF SAVE01URATION FILE o * o 2 P LD A11,SA
0x31d268…31d3fc Dummy {f00=0x00fd, f01=0x0190, f02=»TION BLOCK o h * p $ LCR A2,A11 GET FIRST CHARACTER p ( # CCK A2,'TT' TASK DEFINITION BLOCK? p D RF(E) DWTS YES p p P LDKL A1,LMP4 FORMAT ERROR p CALL ERROR p PDWTS EQU * p * p * GET ADDRESS TO TC:TAB p * p , P LD
0x31d3fc…31d590 Dummy {f00=0x00fd, f01=0x0190, f02=» TASK CLASS p r * q CALL GETTSK q PDWTS20 EQU * q 2 P ST A1,SAVE19,A13 SAVE q F * q d * &* GET CORRESPONDING TASK TABLE (TTAB) q n * q PDWTS25 EQU * q " ADK A7,2 NEXT ENTRY IN TC:TAB q " LDR* A10,A7 GET TTAB ADDRESS q 6 P A
0x31d590…31d724 Dummy {f00=0x00fd, f01=0x0190, f02=»A11 START OF TASK DEFINITION BLOCK q , ' ADKL A9,TDBFST START OF TDC DEFINITION r * P EJECT r Z * r h 4 /* GET NUMBER OF TERMINAL DEVICES IN THIS CLASS r r * r CALL GETTDC r P LDR A6,A1 r PDWTS30 EQU * r P RF(Z) DWTS40 r P CAL
0x31d724…31d8b8 Dummy {f00=0x00fd, f01=0x0190, f02=»,A8 GET POINTER TO CLASS r $ P LDR* A8,A8 GET LENGTH OF CLASS s " P SUKL A8,2 EXCLUDE LENGTH WORD s H * P ADR A10,A8 INCREMENT POINTER IN TTAB s n 0 + ADKL A9,TDBREC BYPASS NEXT TDC DEF. RECORD s ( P SUK A6,1 DECREMENT NUMBER OF TDC:S s P RB DWTS30 s
0x31d8b8…31da4c Dummy {f00=0x00fd, f01=0x0190, f02=» s z LDR A1,A1 t PDWTS50 EQU * t P RF(Z) DWTS90 t . P ST A1,SAVE17,A13 SAVE t D * t b * &* GET SPECIAL DEVICE CLASS NUMBER OM t l * t CALL GETCLN t * t 8 3* GET CORRESPONDING SPECIAL DEVICE CLASS IN SCLASS t * t
0x31da4c…31dbe0 Dummy {f00=0x00fd, f01=0x0190, f02=»DR A5,A6 SAVE t P LDR* A6,A6 GET LENGTH u " P SUK A6,2 EXCLUDE LENGTH WORD u 4 PDWTS60 EQU * u Z ADK A5,4 GET DEVICE u n ( # LDR* A1,A5 GET ADDRESS TO TYPE DWT u ( # LD A3,DWTLEN,A1 GENERATION OF DWT? u P RF(Z) DWTS70 NO u * u * C
0x31dbe0…31dd74 (5, 463) Dummy {f00=0x00fd, f01=0x0190, f02=»CT u P* v 4 P* RELOCATE MONITOR ECB ADDRESS IF MMU IN SYSTEM v P* v L " P LD A3,SCTOPT GET OPTION WORD v V P ANK A3,1 MMU IN SYSTEM? v | P RF(Z) DWTS65 NO! v ( P LDR A3,A1 GET PROTOTYPE DWT-ADDRESS v * P SUR A3,A2 COMPUTE RELOCATION CONSTANT
0x31dd74…31df08 Dummy {f00=0x00fd, f01=0x018e, f02=»C,A2 STORE IT BACK v PDWTS65 EQU * w $ LDR A1,A2 DT-ADDRESS TO BE USED w . PDWTS70 EQU * w V * w j . ** STORE FILE-CODE AND DWT-ADDRESS IN TTAB w t * w " ST A1,2,A10 STORE DWT-ADDRESS w $ LD A1,-2,A5 GET INDEX/FILECODE w STR A1,A1
0x31df08…31e09c Dummy {f00=0x00fd, f01=0x0190, f02=» w h RB(P) DWTS60 NEXT DEVICE x P EJECT x * * x 8 4 /* CHECK IF MOORE SPECIAL DEVICES IN THIS CLASS x B * x z ADKL A9,SDC x P LD A1,SAVE17,A13 x SUK A1,1 x RB DWTS50 x PDWTS90 EQU * x * x 8 P* CHECK IF MOORE
0x31e09c…31e230 Dummy {f00=0x00fd, f01=0x0190, f02=» IF MOORE TASK DEFINITION BLOCKS x * y ( CALL NXTBLK y 2 ( # CCK A2,'TT' TASK DEFINITION BLOCK? y F RB(E) DWTS10 YES y r P LD A2,SCTSFA y P SUK A2,2 y PDWTS95 ADK A2,2 y P CW A2,SCTEFA y P RF(NE) DWTS99 y P LDKL A1,LMP3 y
0x31e230…31e3c4 Dummy {f00=0x00fd, f01=0x0190, f02=» y EJECT z 4 0************************************************ z 4 0* B:DWTT - BUILD TERMINAL DEVICE WORK TABLES * z N 4 0************************************************ z 4 0************************************************ z * z * REFER
0x31e3c4…31e558 Dummy {f00=0x00fd, f01=0x0190, f02=»UBROUTINES: ERROR,GETTSK,GETTDC,GETCLN,GETLCN,DWTGEN,NXTBLK z * { D EJECT { N PB:DWTT EQU * { P* { p 2 P* CLEAR WORK AREA TO BE USED FOR ECHO DEVICE { z & P* AND TEMPORARY INTERRUPT TABLES { P* { " P LDR A1,P GET LOCATION COUNTER { *
0x31e558…31e6ec Dummy {f00=0x00fd, f01=0x0190, f02=» BDWT05 YES! { P SUK A1,2 DECREMENT POINTER | P RB BDWT00 | 8 PBDWT05 EQU * | J 2 P LD A11,SAVE05,A13 GET FWT AREA SIZE IN WORDS | ^ 6 P CWK A11,896 LARGE ENOUGTH FOR TEMP. INT. TABLES? | P RF(L) BDWT08 NO! | ( P LD A1,SCTEFA SAVE END OF FREE A
0x31e6ec…31e880 Dummy {f00=0x00fd, f01=0x0190, f02=»BDWT25 | PBDWT08 EQU * } P* } " F P* ALLOCATE TEMPORARY WORK AREA IN USED PART OF SYSLDM IF POSSIBLE } , P* } v 2 P LD A11,SAVE10,A13 GET END OF TEMP. INT. TABLE } 4 P SU A11,SCTSFA+2 COMPUTE SIZE OF AVALIABLE AREA } & P CWK A11,MINBUF IS IT BIG
0x31e880…31ea14 (5, 464) Dummy {f00=0x00fd, f01=0x0190, f02=» AREA } h P ST A11,SCTEFA SAVE ~ . P SUKL A11,896+896 START OF TEMP. WORK AREA ~ * P LDR A7,A11 SAVE ~ 2 P SUK A7,SCZBUF START OF TEMP BUFFER FOR SALCUZ ~ t P ST A7,SAVE04,A13 SAVE ~ 2 P SUK A7,ASZBUF START OF TEMP BUFFER FOR ASCU4Z ~ P ST A7,SAV
0x31ea14…31eba8 Dummy {f00=0x00fd, f01=0x0190, f02=» ~ L * ( # LD A11,SCTEFA GET END OF FREE AREA ( $ LD A9,SCTSFA GET START OF FREE AREA > LDK A7,0 RESET WORD COUNTER j PBDWT10 EQU * CWR A11,A9 MEMORY OVERFLOW? RF(NE) BDWT15 NO * P LDKL A1,LMP3 INDICATE MEMORY OVERFLOW
0x31eba8…31ed3c Dummy {f00=0x00fd, f01=0x0190, f02=»ER WORD x $ ADK A7,1 INCREMENT WORD COUNTER RB BDWT10 8 PBDWT20 EQU * J * ^ 6 2* INIT POINTERS TO THE TEMPORARY INTERRUPT TABLES h * P LDR A1,A11 PBDWT25 LD A7,SAVE10,A13 PBDWT30 EQU * , ( STR A11,A7 SAVE INT
0x31ed3c…31eed0 Dummy {f00=0x00fd, f01=0x0190, f02=»LL POINTERS INTIATED? RB(NE) BDWT30 NO * P ST A1,SCTEFA UPDATE END OF FREE AREA 8 P EJECT f * t * INIT DWT POINTER ~ * P LD A11,SAVE01,A13 * % LD A12,SCTSFA GET START OF FREE AREA * B >* INIT TC:TAB ENT
0x31eed0…31f064 Dummy {f00=0x00fd, f01=0x0190, f02=»E IN CURRENT USER TASK ENTRY z PBDWT40 EQU * $ * 8 . )* GET NUMBER OF TASKS IN THIS TASK CLASS B * t $ CALL GETTSK GET NUMBER OF TASKS ~ PBDWT50 EQU * ( P ST A1,SAVE19,A13 SAVE BINARY VALUE * @ ;* GET NUMBER OF TERMINA
0x31f064…31f1f8 Dummy {f00=0x00fd, f01=0x0190, f02=»DR A1,A1 ANY TERMINAL DEVICES? RF(Z) BDW100 NO & 6 P ST A1,SAVE15,A13 SAVE NUMBER OF TERMINAL DEVICESS > ( P LD* A10,SAVE13,A13 GET TTAB ADDRESS x 6 1 ADKL A10,TTB:TD DISPLACEMENT TO TASK CONF. TABLE * ( #* GET TERMINAL DEVICE CLASS NUM
0x31f1f8…31f38c Dummy {f00=0x00fd, f01=0x0190, f02=»QU * " CALL GETCLN GET CLASS NUMBER ( P ST A1,SAVE14,A13 SAVE BINARY VALUE 2 * ^ @ <* GET LINE CONNECTION NUMBER FOR THIS TERMINAL DEVICE CLASS h * IN THIS TASK * , ' CALL GETLCN GET LINE CONNECTION NUMBER LDR A6,A1
0x31f38c…31f520 Dummy {f00=0x00fd, f01=0x0190, f02=»A5,TDC+4,A9 STORE RIGHT ASCII DIGIT 2 - SRL A5,8 MOVE LEFT ASCII DIGIT TI RIGHT BYTE , * & SC A5,TDC+3,A9 STORE LEFT ASCII DIGIT b * : 5* FIND CORRESPONDING TERMINAL DEVICE CLASS IN TCLASS * 2 P LD A2,SAVE14,A13 GET BINARY VALUE OF
0x31f520…31f6b4 (5, 465) Dummy {f00=0x00fe, f01=0x0190, f02=»IS IS AN ENTRY IN TCLASS -TO BE SUPPLIED P* 0 $ P LDR* A7,A7 GET POINTER TO CLASS : P EJECT b * p $ * GENERATE DWT:S FOR THIS CLASS z 2 -* A6 - LINE CONNECTION NUMBER (BINARY VALUE) , (* A7 - POINTER TO TERMINAL DEVICE CLASS
0x31f6b4…31f848 Dummy {f00=0x00fe, f01=0x0190, f02=» OF DEVICE (INPUT OR OUTPUT) v * $ CALL DWTGEN . PBDWT90 EQU * B < P LD A1,SAVE15,A13 GET NUMBER OF TERMINAL DEVICE CLASSES V , ' SUK A1,1 ANY MOORE IN THIS TASK CLASS? RF(Z) BDW100 NO , P ST A1,SAVE15,A13 SAVE REMAINING NUMBER
0x31f848…31f9dc Dummy {f00=0x00fe, f01=0x0190, f02=»Y IN TC:TAB n & ! ADK A1,2 INCREMENT ENTRY POINTER P ST A1,SAVE13,A13 SAVE > 8 P LD A1,SAVE19,A13 GET NUMBER OF TASKS IN THIS CLASS " SUK A1,1 ANY MOORE TASKS LEFT P RB(P) BDWT50 , (* CHECK IF MOORE TASK DEFINITION BLOCKS *
0x31f9dc…31fb70 Dummy {f00=0x00fe, f01=0x0190, f02=»MINAL DEVICE WORK TABLES GENERATED * * P LD A2,SCTSFA 4 P SUK A2,2 J PBDW105 ADK A2,2 P CW A2,SCTEFA t P RF(NE) BDW110 P LDKL A1,LMP3 P CALL ERROR PBDW110 CWR A2,A12 P RB(NE) BDW105 , P ST A12,SCTSFA
0x31fb70…31fd04 Dummy {f00=0x00fe, f01=0x018e, f02=»LD COMMON DEVICE TABLE * , (**************************************** " * R * REFERENCED IN: MONCON * ~ * &* ENTRY: SCTSFA - START OF FREE AREA 4 P* SAVE01 - START OF SAVE01URATION DATA ( $* SCTEFA - END OF
0x31fd04…31fe98 Dummy {f00=0x00fe, f01=0x0190, f02=» < P* SUBROUTINES: NXTBLK,GETCTC,GETLCN,GETSDC,GETCLN,MOVE * D EJECT N PB:CDT EQU * 2 P LD A11,SAVE01,A13 START OF SAVE01URATION DATA p & ! LD A12,SCTSFA START OF FREE AREA P LDK A7,0 RESET LENGTH * * %* GET COMMON DE
0x31fe98…32002c Dummy {f00=0x00fe, f01=0x0190, f02=»0 YES ( $ CCK A2,'CC' COMMON DEV. DEF. BLOCK? P RF(NE) BCDTEX NO : P EJECT T P* b : P* RESERVE AREA IN COMMON DEVICE TABLE FOR FILE-CODES l 8 P* AND DWT-ADDRESSES USED BY COMMON TERMINAL DEVICES P* 0 P LDR A9,A11 START OF COM
0x32002c…3201c0 Dummy {f00=0x00fe, f01=0x0190, f02=»A1 SAVE " PB:CT10 RF(Z) B:CT30 NO MOORE! . P CALL GETCLN GET CLASS IDENT NUMBER (1-99) 6 , P ADR A1,A1 DISPLACEMENT TO CLASS POINTER h , P LD A5,SAVE18,A13 GET POINTER TO TCLASS $ P LDR* A2,A5 GET LENGTH OF TCLASS P SUK A2,2 EXCLUDE LENGTH
0x3201c0…320354 (5, 466) Dummy {f00=0x00fe, f01=0x0190, f02=»20 ADR A1,A5 SELECT ENTRY IN TCLASS $ P LDR* A1,A1 GET POINTER TO CLASS , $ P LDR* A1,A1 GET LENGTH OF CLASS T " P SUK A1,2 EXCLUDE LENGTH WORD | & P ADR A7,A1 INCREMENT CDTAB LENGTH . P ADKL A9,TDC+TLC NEXT RECORD IN CONF. FILE " P SUK A6,1
0x320354…3204e8 Dummy {f00=0x00fe, f01=0x018e, f02=»E-CODES b 8 P* AND DWT-ADDRESSES USED BY COMMON SPECIAL DEVICES P* L CALL GETSDC V ADKL A9,SDCFST-CDBNC j LDR A6,A1 PBCDT10 EQU * RF(Z) BCDTEX CALL GETCLN ADR A1,A1 , P LD A5,SAVE11,A13 GET POINTER
0x3204e8…32067c Dummy {f00=0x00fe, f01=0x0190, f02=» PBCDT15 EQU * P ADR A1,A5 SELECT ENTRY $ P LDR* A1,A1 GET POINTER TO CLASS 8 P LDR* A1,A1 GET LENGTH ` SUK A1,2 ~ ADKL A9,SDC ADR A7,A1 SUK A6,1 RB BCDT10 PBCDTEX EQU * P EJECT P* < P*
0x32067c…320810 Dummy {f00=0x00fe, f01=0x0190, f02=»O RESERVE ENTRIES IN COMMON DEVICE TABLE FOR @ P* FILE-CODES AND DWT-ADDRESSES USED FOR DATA COMMUNICATION 4 P* x J P* FILE-CODES AND DWT-ADDRESSES ARE STORED IN THE LAST CLASS IN SCLASS P* & P LD A1,SCTDCT DATA COMMUNICATION? " P LD
0x320810…3209a4 Dummy {f00=0x00fe, f01=0x0190, f02=» , P ORR A6,A1 COPY LAST SCLASS IF NOT ZERO P RF(Z) CDG:15 NO! 4 , P LD A6,SAVE11,A13 GET POINTER TO SCLASS N $ P LDR* A1,A6 GET LENGTH OF SCLASS ~ " P SUK A1,2 EXCLUDE LENGTH WORD $ P ADR A6,A1 LAST ENTRY IN SCLASS * P LDR* A6,A6 GET POIN
0x3209a4…320b38 Dummy {f00=0x00fe, f01=0x0190, f02=»CD:TAB t PCDG:15 EQU * ADK A7,2 " STR A7,A12 4 P ST A12,SCTCDT H ADR A12,A7 ^ EJECT r * 6 1* INIT POINTER TO START OF FREE AREA AND TO CDTAB * ( P LD A10,SCTCDT FIRST ENTRY IN SCTCDT $ P LCR A2,A11 CO
0x320b38…320ccc Dummy {f00=0x00fe, f01=0x0190, f02=»CDGEX PCDG:18 EQU * P* " > P* GENERATE DEVICE WORK TABLES FOR COMMON TERMINAL DEVICES , P* n * P LDR A9,A11 START OF COMMON DEF. BLOCK x 6 P ADKL A9,SDCFST NUMBER OF COMMON TERMINAL CLASSES & P CALL GETCTC GET NUMBER OF C.T.C. ,
0x320ccc…320e60 Dummy {f00=0x00fe, f01=0x0190, f02=»DENT NUMBER x P ST A1,SAVE14,A13 SAVE , P CALL GETLCN GET LINE CONNECTION NUMBER 2 P LDR A6,A1 SAVE b , P LD A2,SAVE14,A13 GET CLASS IDENT NUMBER z & P ADR A2,A2 CONVERT TO DISPLACEMENT , P LD A7,SAVE18,A13 GET POINTER TO TCLASS & P ADR
0x320e60…320ff4 (5, 467) Dummy {f00=0x00fe, f01=0x018e, f02=»,TDC+TLC NEXT RECORD IN CONF. FILE * P LD A1,SAVE15,A13 GET NUMBER OF C.T.C. * P SUK A1,1 DECREMENT COUNTER X P RB B:CT40 | PB:CT50 CALL ECHO ( P ADKL A10,2 NEXT FREE ENTRY IN CDTAB P EJECT * , '* GET NUMBER OF SPECIAL DEVIC
0x320ff4…321188 Dummy {f00=0x00fe, f01=0x0190, f02=» * & #* GET SPECIAL DEVICE CLASS NUMBER * 8 CALL GETCLN B * V 0 +* GET CORRESPONDING DEVICE CLASS IN SCLASS ` * ADR A1,A1 T , P LD A6,SAVE11,A13 GET POINTER TO SCLASS P ADR A6,A1 SELECT CLASS & P LDR
0x321188…32131c Dummy {f00=0x00fe, f01=0x0190, f02=»LENGTH WORD ~ PCDG:30 EQU * ADK A5,4 NEXT DEVICE ( LDR* A1,A5 GET DWT-ADDRESS F ( # LD A3,DWTLEN,A1 GENERATION OF DWT? j RF(Z) CDG:40 NO * * COPY DWT * LDR A2,A12 TO-ADDRESS , ' ADR A12,A3 UPDATE P
0x32131c…3214b0 Dummy {f00=0x00fe, f01=0x0190, f02=»A3,SCTOPT GET OPTION WORD P ANK A3,1 MMU IN SYSTEM? " P RF(Z) CDG:35 NO! B ( P LDR A3,A1 GET PROTOTYPE DWT-ADDRESS * P SUR A3,A2 COMPUTE RELOCATION CONSTANT , P LD A4,DWTMEC,A2 GET MONITOR ECB-ADDRESS P ANKL A4,/FFFE MAKE IT EVEN!
0x3214b0…321644 Dummy {f00=0x00fe, f01=0x0190, f02=» * * . ** STORE FILE-CODE AND DWT-ADDRESS IN TTAB * F " ST A1,2,A10 STORE DWT-ADDRESS P LD A1,-2,A5 GET FILE CODE v STR A1,A10 STORE IN TTAB $ ADKL A10,4 NEXT ENTRY IN CD:TAB & " SUK A6,4 DECREMENT DEVICE COUNTER
0x321644…3217d8 Dummy {f00=0x00fe, f01=0x0190, f02=» P SUKL A8,1 RB CDG:20 PCDGEX EQU * ( " P RF(N) CDG:EX CD:TAB COMPLETE! < " P LD A1,SCTDMT DATA MANAGEMENT b $ P LD A5,SCTDCT DATA COMMUNICATION P ORR A1,A5 DM OR DC? " P LD A5,SCTOPT GET OPTION WORD $ P ANK A5,/E DISC PAGING
0x3217d8…32196c Dummy {f00=0x00fe, f01=0x0190, f02=» $ P LDR* A1,A5 GET LENGTH OF SCLASS " P SUK A1,2 EXCLUDE LENGTH WORD , P ADR A5,A1 GET LAST ENTRY R * P LDR* A5,A5 GET POINTER TO LAST CLASS t ( P LDR* A6,A5 GET LENGTH OF LAST CLASS " P SUK A6,2 EXCLUDE LENGTH WORD P RB CDG:30 PCD
0x32196c…321b00 Dummy {f00=0x00fe, f01=0x0190, f02=»MP3 ( P CALL ERROR INDICATE MEMORY OVERFLOW PCDG:60 CWR A2,A12 8 P RB(NE) CDG:50 R , ( ST A12,SCTSFA UPDATE START OF FREE AREA h RTN A14 RETURN EJECT J F**********************************************************************
0x321b00…321c94 (5, 468) Dummy {f00=0x00fe, f01=0x0190, f02=»************** X * 4 /* ENTRY: A1 - LINE CONNECTION NUMBER (BINARY) > :* A7 - POINTER TO TERMINAL DEVICE CLASS IN TCLASS X * &* A6 - LINE CONNECTION NUMBER * * EXIT: * * WORK REGISTERS: A1-A8
0x321c94…321e28 Dummy {f00=0x00fe, f01=0x0190, f02=»R d ( $ LDR* A8,A7 GET LENGTH OF THIS CLASS $ SUKL A8,2 EXCLUSIVE LENGTH WORD 6 ADK A7,2 FIRST FILECODE ^ PDWT05 EQU * ~ . ) LD A1,2,A7 GET ADDRESS OF PROTOTYPE DWT 0 P LD A6,SAVE08,A13 GET LINE CONNECTION NUMBER P* P* CHE
0x321e28…321fbc Dummy {f00=0x00fe, f01=0x0190, f02=»0 NO! 2 P CALL B:ITSZ BUILD INTERRUPT TABLE FOR SALCUZ P RF DWT31 D ( PDWT10 CCK A4,'AA' ASCU4Z CONNECTION? V P RF(NE) DWT11 NO! 2 P CALL B:ITAZ BUILD INTERRUPT TABLE FOR AUSCU4Z P RF DWT31 PDWT11 EQU * * 4 /* DER
0x321fbc…322150 Dummy {f00=0x00fe, f01=0x0190, f02=»MBER AND PROTOTYPE DWT v * CALL I:CHP ( * < @ P* GET CORRECT INTERRUPT TABLE USING SAVE05 (SELECTS TABLE) F " P* AND SAVE06 (SELECTS ENTRY) * 0 P* SAVE05 HOLDS 2*(NUMBER STORED IN BIS 4-6) 4 P* SAVE06 HOLDS THE NUMBER
0x322150…3222e4 Dummy {f00=0x00fe, f01=0x0190, f02=»,SAVE10,A13 SELECT INTERRUPT TABLE , P LDR* A4,A4 GET INTERRUPT TABLE ADDRESS * $ P LD A3,SAVE06,A13 LINE PARAMETER Z PDWT15 EQU * " RF(Z) DWT17 LINE ENTRY FOUND ADK A4,28 NEXT LINE & " SUK A3,1 DECREMENT LINE PARAMETER
0x3222e4…322478 Dummy {f00=0x00fe, f01=0x0190, f02=»ADDRESS: 0 P* USE DEVICE ADDRESSES 1-7 FOR INPUT DEVICE & P* OR DEVICE WITHOUT DATA REQUEST D 4 /* USE DEVICE ADDRESSES 8-14 FOR OUTPUT DEVICES n * 0 + LDR* A6,A1 GET FIRST WORD OF PROTOTYPE DWT P LDR A2,A6 SAVE : 5 ANKL A6,/71
0x322478…32260c Dummy {f00=0x00fe, f01=0x0190, f02=»UT DEVICE - CHECK IF DEVICE WITH DATA REQUEST P* 6 ( P ANKL A2,/8000 DATA REQUEST BIT SET? @ P RF(Z) DWT20 NO! l P SRL A6,2 P ADK A6,12 RF DWT30 PDWT20 EQU * P SRL A6,2 P SUK A6,2 PDWT30 EQU * A
0x32260c…3227a0 Dummy {f00=0x00fe, f01=0x0190, f02=»A6 DWT ALREADY GENERATED? P RF(Z) DWT32 NO! " P CALL DWT50 : P LDKL A1,DWT70 N P AD A1,M:REL,A13 d P ABR A1 | P* P* CHECK IF DWT IN DRIVER P* PDWT32 LDKL A2,SYSLOD P TNM A1,A2 P RF(NN) DWT34 P C
0x3227a0…322934 (5, 469) Dummy {f00=0x00ff, f01=0x0190, f02=»F DWT70 PDWT38 EQU * STR A12,A6 SAVE DWT-ADDRESS $ * H * COPY DEVICE TYPE DWT R * r LDR A2,A12 TO-ADDRESS | P LD A3,DWTOR,A1 LENGTH ADR A12,A3 NEXT FREE ENTRY CALL MOVE P EJECT * $ *
0x322934…322ac8 Dummy {f00=0x00ff, f01=0x0190, f02=»* CHECK IF INPUT DEVICE * * & LDR* A3,A1 GET FIRST WORD OF TYPE DWT * ANKL A3,/0100 INPUT DEVICE? X P RF(Z) DWT45 NO | * * INPUT DEVICE: * CHECK IF KEYBOARD * LD A3,DWTADR,A1 LD A3,DEVIND,A3
0x322ac8…322c5c Dummy {f00=0x00ff, f01=0x0190, f02=»TORE ADDRESS OF KEYBOARD RUNTIME-DWT : P* AND ECHO DEVICE PROTOTYPE-DWT IN ECHO DEVICE TABLE , P* j * t P LD A5,DWTECH,A1 ECHO? ~ RF(Z) DWT40 NO P AD A5,M:REL,A13 4 P LD* A3,SCTSFA+2 GET LENGTH OF ECHO DEVICE TABLE ( P RF(
0x322c5c…322df0 Dummy {f00=0x00ff, f01=0x0190, f02=»,SCTSFA+2 NEXT FREE ENTRY 8 P STR A2,A4 SAVE RUNTIME DWT-ADDRESS FOR INPUT DEVICE " < P ST A5,2,A4 SAVE PROTOTYPE DWT ADDRESS FOR OUTPUT DEVICE ^ P ADK A3,4 UPDATE LENGTH $ P ST* A3,SCTSFA+2 SAVE NEW LENGTH P EJECT PDWT40 EQU *
0x322df0…322f84 Dummy {f00=0x00ff, f01=0x0190, f02=»TO START OF BUFFER t $ ST A5,DWTSQ-4,A2 STORE POINTER $ ST A5,DWTSQ-2,A2 STORE POINTER B * j * IF DOUBLE KEYBOARD: t D @* ADD 1 TO DWT-ADDRESS AND SAVE IT IN TEMPORARY INTERRUPT TABLE 6 2* IN ENTRY CORRESPONDING TO SECOND DEVICE ADD
0x322f84…323118 Dummy {f00=0x00ff, f01=0x0190, f02=»YBOARD v $ LDR A5,A2 GET REAL DWT-ADDRESS ADK A5,1 ADD ONE 6 0 , SUK A3,1 DISPLACEMENT=0 IF DEVICE ADDRESS=1 P ADR A3,A3 BYTE DISPLACEMENT . P AD A3,SAVE07,A13 ENTRY IN INTERRUPT TABLE $ STR A5,A3 STORE DEVICE-ADDRESS RF DW
0x323118…3232ac Dummy {f00=0x00ff, f01=0x0190, f02=»S OF PROTOTYPE DWT IS ODD, 0 P* THE DEVICE IS TO BE USED FOR ECHOING ON. " 6 P* THE ADDRESSES OF THE PROTOTYPE- AND RUNTIME-DWT V 0 P* IS THEN STORED IN THE ECHO DEVICE TABLE. P* 0 P LD A5,DWTTAB,A1 GET DEVICE TYPE CHARACTERS , P RF(NN
0x3232ac…323440 Dummy {f00=0x00ff, f01=0x0190, f02=» P ADK A3,2 INCLUDE LENGTH PDWT55 LDR A4,A3 SAVE LENGTH $ $ P AD A4,SCTSFA+2 NEXT FREE ENTRY H . P STR A1,A4 STORE ADDRESS OF PROTOTYPE DWT p , P ST A2,2,A4 STORE ADDRESS OF RUNTIME DWT P ADK A3,4 UPDATE LENGTH & P ST* A3,SCTSFA+2 STORE
0x323440…3235d4 (5, 470) Dummy {f00=0x00ff, f01=0x0190, f02=»D t P ANK A5,1 MMU PAGING? RF(Z) DWT70 ( P EJECT < , P LD A5,DWTMEC,A2 GET MONITOR ECB ADDRESS J ( P LDR A4,A1 GET PROTOTYPE DWT-ADDRESS z * P SUR A4,A2 COMPUTE RELOCATION CONSTANT , P SUR A5,A4 RELOCATE MONITOR ECB ADDRESS $ P ANK
0x3235d4…323768 Dummy {f00=0x00ff, f01=0x0190, f02=»TED P* & P LD A5,DWTADR,A2 GET ADDRESS BLOCK 2 P LD A4,BUFLEN,A5 GET LENGTH OF INTERNAL BUFFER @ $ P RF(Z) DWT70 ALLOCATE NO BUFFER! v * L P* ALLOCATE INTERNAL BUFFER AND STORE ADDRESS IN SECOND WORD OF INTERNAL * , P LD A5
0x323768…3238fc Dummy {f00=0x00ff, f01=0x0190, f02=»EN ADDRESS r P ST A3,2,A5 SAVE P LDR A3,A4 GET LENGTH , ( P ADK A3,3 ADD BO FERMS CONSTANT+1 =1 J . P ANKL A3,/FFFE MAKE SURE OF EVEN LENGTH =1 v P EJECT * 4 0* CHECK IF INTERNAL BUFFER SIZE IS GREATER THAN 6 1* THE SIZE OF B
0x3238fc…323a90 Dummy {f00=0x00ff, f01=0x0190, f02=»Z. j * CW A3,BUFSIZ,A13 RF(NG) DWT65 0 ST A3,BUFSIZ,A13 F P ST A12,SYSBUF,A13 ` PDWT65 EQU * z ADR A12,A3 NEXT FREE ENTRY P =1 P =1 P EJECT PDWT70 EQU * P* . P* STORE FILE-
0x323a90…323c24 Dummy {f00=0x00ff, f01=0x0190, f02=»ORE IN TASK CONF. TABLE " P ADKL A10,2 NEXT ENTRY IN TTAB " P STR A2,A10 STORE DWT-ADDRESS F P* l , '* CHECK IF MOORE DEVICES IN THIS CLASS v * SUKL A8,4 RF(Z) DWTEX ADK A7,4 NEXT DEVICE P LDKL A1,DWT05
0x323c24…323db8 Dummy {f00=0x00ff, f01=0x0190, f02=»ERY COINCIDENCE n 4 P* BETWEEN THE FIRST POINTER IN ONE POINTER-SET 4 P* AND SECOND POINTER IN THE OTHER POINTER-SET: P 0 P* STORE SECOND POINTER OF FIRST POINTER-SET 2 P* IN RUNTIME-DWT POINTED AT BY FIRST POINTER 2 P* OF SECOND POINTER-S
0x323db8…323f4c Dummy {f00=0x00ff, f01=0x0190, f02=»ICE TABLE IS CLEARED. P* 8 PECHO LD* A3,SCTSFA+2 GET LENGTH OF ECHO DEVICE TABLE ( " P RF(Z) DWT160 NO ECHO DEVICES! d 4 P AD A3,SCTSFA+2 COMPUTE END OF ECHO DEVICE TABLE 2 P LD A1,SCTSFA+2 GET START OF ECHO DEVICE TABLE P ADK A1,2 BYPASS
0x323f4c…3240e0 Dummy {f00=0x00ff, f01=0x0190, f02=» POINTER IN FIRST SET t > PDWT110 CWR* A4,A2 COMPARE WITH FIRST POINTER IN SECOND SET P RF(E) DWT130 COINCIDENCE! ` P ADK A2,4 NEXT POINTER-SET ( P CWR A2,A3 END OF ECHO DEVICE TABLE $ P RB(NE) DWT110 NO:CHECK NEXT SET P RF DWT140 :
0x3240e0…324274 (5, 471) Dummy {f00=0x00ff, f01=0x0190, f02=» STORE DEVICE-ADDRESS TO ECHO-DEVICE P CMR A1 CLEAR FIRST POINTER , " P CM 2,A1 CLEAR SECOND POINTER P $ PDWT140 ADK A1,4 NEXT POINTER-SET v ( P CWR A1,A3 END OF ECHO DEVICE TABLE P RB(NE) DWT90 NO! $ PDWT150 CM* SCTSFA+2 CLEAR LENGTH
0x324274…324408 Dummy {f00=0x00ff, f01=0x018e, f02=» * %************************************* * 2 * REFERENCED IN: DWTGEN < * , (* ENTRY: A1 - POINTER TO PROTOTYPE DWT f ( #* A2 - POINTER TO REAL DWT * &* A6 - LINE CONNECTION NUMBER * P* A9 - POINTER
0x324408…32459c Dummy {f00=0x00ff, f01=0x0190, f02=» R 0 P* SAVE06 - SELECTS LINE ENTRY (1-8) * < * WORK REGISTERS: A3,A4,A5 F * j * SUBROUTINES: t * EJECT PI:CHP EQU * 0 P LD A6,SAVE08,A13 GET LINE CONNECTION NUMBER * P CWK A6,0032 CONNECTION NUMB
0x32459c…324730 Dummy {f00=0x00ff, f01=0x0190, f02=»CONNECTION NUMBER z 0 + LDR* A5,A1 GET FIRST WOED OF PROTOTYPE DWT ( # ANKL A5,/F1F0 CLEAR BITS TO MODIFY N 2 . LDR A3,A6 GET MODIFIED LINE CONNECTION NUMBER z & " LC A4,TDC+5,A9 CHECK TYPE OF LINE CCK A4,'LL' LOCAL LINE? RF(NE) I:CHPR
0x324730…3248c4 Dummy {f00=0x00ff, f01=0x0190, f02=» ORR A5,A3 MERGE WITH OLD CONTENTS * % LDR A3,A6 GET LINE CONNECTION NUMBER * ANK A3,/18 GET BITS 11-12 X SRL A3,2 MOVE TO BITS 13-14 z P ST A3,SAVE05,A13 SAVE SRL A3,1 MOVE TO BITS 14-15 & " ORR A5,A3 MERGE WITH OLD CONTENTS
0x3248c4…324a58 Dummy {f00=0x00ff, f01=0x0190, f02=»I:CH10 0 , ANKL A5,/F1FF CLEAR BITS 4-6 (= STORE ZERO) * P ST A3,SAVE06,A13 SAVE ENTRY SELECTOR B RF I:CH50 p 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 SELECT
0x324a58…324bec Dummy {f00=0x00ff, f01=0x0190, f02=» | RF(NZ) I:CH30 & " ORKL A5,/0200 STORE 1 IN BITS 4-6 LDK A3,1 ENTRY SELECTOR H P ST A3,SAVE06,A13 SAVE h RF I:CH50 PI:CH30 EQU * & " ORKL A5,/0A00 STORE 5 IN BITS 4-6 LDK A3,5 ENTRY SELECTOR P ST A3,SAVE06,A13
0x324bec…324d80 Dummy {f00=0x00ff, f01=0x018e, f02=»UK A3,2 DECREMENT LINE CONNECTION NUMBER RF(N) I:CH70 0 & " ADK A4,1 INCREMENT TABLE SELECTOR F RB I:CH60 p PI:CH70 EQU * ( $ ORR A5,A4 STORE COMPUTED BITS 12-15 SUK A4,4 ANK A4,6 ADK A4,8 P ST A4,SAVE05,A1
0x324d80…324f14 (5, 472) Dummy {f00=0x00ff, f01=0x0190, f02=» P EJECT : P****************************************************** : P* * T : P* B:ITAS - BUILD INTERRUPT TABLES FO ASCU4Z/SALCUZ * : P* ================================================ *
0x324f14…3250a8 Dummy {f00=0x00ff, f01=0x0190, f02=» * : P* REFERENCED IN: DWTGEN * 8 : P* * v : P* ENTRY: A1 - POINTER TO PROTOTYPE-DWT * : P* A6 - LINE C
0x3250a8…32523c Dummy {f00=0x00ff, f01=0x0190, f02=» * n : P* EXIT: A5 - CHANNEL PARAMETER * : P* A6 - LINE ENTRY * Z : P* * : P* WORK REGISTERS: A2,A3,A4,A5,A6
0x32523c…3253d0 Dummy {f00=0x00ff, f01=0x0190, f02=»* * : P****************************************************** > P EJECT | PB:ITAZ EQU * * P CWK A6,0016 CONNECTION NUMBER <= 16? P RB(G) NUMERR NO! * P CWK A6,0001 CONNECTION NUMBER >=
0x3253d0…325564 Dummy {f00=0x00ff, f01=0x0190, f02=»BITZ10 YES * P ADK A2,ASZLEN FIXED NUMBER OF ENTRIES P ST A2,INTAS SAVE @ , PBITZ10 LD A5,SAVE03,A13 FIRST LINE ENTRY Z P RF BITZ30 PB:ITSZ EQU * ( P CWK A6,0004 CONNECTION NUMBER <= 4? P RB(G) NUMERR NO! * P CWK A6,0001 CONNE
0x325564…3256f8 Dummy {f00=0x00ff, f01=0x0190, f02=» h P RF(NZ) BITZ20 YES! * P ADK A2,SCZLEN FIXED NUMBER OF ENTRIES $ P ST A2,INTSL SAVE R . PBITZ20 LD A5,SAVE04,A13 FIRST LINE ENTRY? l " PBITZ30 ADR A2,A5 END OF TABLE P SUK A6,1 & P SLL A6,1 CONVERT TO DISPLACEMENT P ADR A6,
0x3256f8…32588c Dummy {f00=0x00ff, f01=0x0190, f02=»UR A3,A6 COMPUTE RELATIVE DISPLACEMENT " P STR A3,A6 STORE IN LINE ENTRY . P LDK A3,6 TABLE INCREMENT T P ADR* A3,A4 UPDATE LENGTH v P STR A3,A4 STORE NEW LENGTH P LDR* A3,A6 GET DISPLACEMENT 2 PBITZ40 ADR A6,A3 GET START OF LINE CONF.
0x32588c…325a20 Dummy {f00=0x00ff, f01=0x0190, f02=»OR 3 ALLOWED n P SUK A3,2 MAKE DISPLACEMENT 0 P ADR A6,A3 SELECT ENTRY IN LINE CONF. TABLE 8 0 P LD A4,SAVE08,A13 GET LINE CONNECTION NUMBER l P SUK A4,1 LINE NUMBER 0-15 P LDR A3,A4 SAVE LINE NUMBER P SRL A3,3 SELECT ASCU4Z CARD (
0x325a20…325bb4 (5, 473) Dummy {f00=0x0100, f01=0x0190, f02=»ION x " PBITZ50 ADK A3,/C CHANNEL INDEX $ P ANK A3,/F ISOLATE CHANNEL INDEX 2 " P ANK A4,7 ISOLATE LINE NUMBER Z P SRC A4,7 MOVE TO BITS 4-6 , P ORR A4,A3 MERGE LINE NO AND CH. PARAM. 0 P LDR* A5,A1 GET PROTOTYPE CHANNEL PARAMETER > P A
0x325bb4…325d48 Dummy {f00=0x0100, f01=0x0190, f02=» 2 .********************************************** 2 .* B:ITAB - BUILD REAL-TIME INTERRUPT TABLE * : 2 .********************************************** p * * REFERENCED IN: DWTGEN * * &* ENTRY: SCTSFA - START OF FREE AREA
0x325d48…325edc Dummy {f00=0x0100, f01=0x0190, f02=» A2 - " " * A3 - " > P* A4 - LENGTH OF LINE SAVE01URATION TABLE B * %* A5 - DEVICE COUNTER ( #* A6 - LINE COUNTER 2 P* A7 - DISPLACEMENT IN SAV
0x325edc…326070 Dummy {f00=0x0100, f01=0x0190, f02=»L INT. TABLE X > 9* A12- LINE ENTRY IN REAL INTERRUPT TABLE * V * SUBROUTINES ` * v P EJECT PB:ITAB EQU * 2 - LD A12,SCTSFA INIT POINTER TO FIRST R. I. T. P LDR A11,A12 $ LDK A7,0 RESET POINTER IN I
0x326070…326204 Dummy {f00=0x0100, f01=0x0190, f02=» LINE CONF. TABLE t * 0 +* GET ADDRESS TO TEMPORARY INTERRUPT TABLE $ * X P LD A10,SAVE10,A13 b ADR A10,A7 | LDR* A10,A10 & P LDK A6,0 RESET LINE ENTRY POINTER PBIT20 EQU * * 8 P* SAVE POINTER TO START O
0x326204…326398 Dummy {f00=0x0100, f01=0x0190, f02=» SAVE START OF LINE SAVE01URATION TABLE ~ . ) LDK A4,0 RESET LENGTH OF LINE CONF.TABLE 0 * b 0 -* INIT POINTER IN TEMPORARY INTERRUPT TABLE l * &* TO POINT AT LAST INPUT DEVICE ENTRY * ADKL A10,12 LDK A5,7 ADKL A11,
0x326398…32652c Dummy {f00=0x0100, f01=0x0190, f02=»* PBIT30 EQU * LDR* A1,A10 OCCUPIED ENTRY? RF(NZ) BIT40 YES B PBIT35 EQU * , ( SUK A5,1 NO; CHECK IF LAST DEVICE ENTRY p RF(Z) BIT50 YES * < 7* NO ENTRIES IN THE INPUT DEVICE PART OF THE TEMPORARY 0 +* INT
0x32652c…3266c0 Dummy {f00=0x0100, f01=0x0190, f02=» INT. TABLE r RB BIT30 * & F B* AN OCCUPIED ENTRY IN THE TEMPORARY INTERRUPT TABLE HAS OCURRED. 0 D @* COPY THE CONTENTS OF THE INPUT DEVICE PART (INCLUDING ZEROES) z H C* OF THE TEMPORARY INTERRUPT TABLE UP TO AND INCLUDING THIS ENTRY.
0x3266c0…326854 (5, 474) Dummy {f00=0x0100, f01=0x0190, f02=» ENTRY? | RF(Z) BIT50 YES $ SUKL A10,2 NEXT ENTRY IN T.I.T. ( $ SUKL A11,2 NEXT ENTRY IN R.I.T. P * & LDR* A1,A10 GET CONTENT OF NEXT ENTRY x RB BIT40 EJECT PBIT50 EQU * * B >* ALL ENTRIES OF THE INPUT DEVICE P
0x326854…3269e8 Dummy {f00=0x0100, f01=0x0190, f02=» THE TEMPORARY INTERRUPT TABLE. * -INIT DEVICE COUNTER. ( * H ADKL A10,14 R LDK A5,7 f * x L G* SCAN ENTRIES IN OUTPUT DEVICE PART OF THE TEMPORARY INTERRUPT TABLE. $ * -IF AN OCCUPIED ENTRY OCCUR: L P* FIND FIRST
0x3269e8…326b7c Dummy {f00=0x0100, f01=0x0190, f02=» J 6 P* -IF THIS EXTENDS THE LINE SAVE01URATION TABLE: * INCREMENT LENGTH B * ^ PBIT70 EQU * h LDR* A1,A10 OCCUPIED ENTRY? | RF(NZ) BIT90 YES SUK A5,1 LAST ENTRY RF(Z) BIT120 YES PBIT80 EQU * ADK
0x326b7c…326d10 Dummy {f00=0x0100, f01=0x0190, f02=»ERRUPT TAB R L P* HAS OCURRED. FIND FIRST UNOCCUPIED ENTRY IN LINE SAVE01URATION TABLE * OF REAL INTERRUPT TABLE. b * P LDR* A2,A11 RF(Z) BIT100 P ADKL A11,2 RB BIT90 EJECT PBIT100 EQU * *
0x326d10…326ea4 Dummy {f00=0x0100, f01=0x0190, f02=»GTH IF TABLE WAS EXTENDED. * " STR A1,A11 STORE CONTENT , * P LD A1,SAVE23,A13 GET START OF L.C.T. N " LDR A3,A11 GET CURRENT ENTRY | P SUR A3,A1 COMPUTE LENGTH CWR A3,A4 L.C.T. EXTENDED? RF(NG) BIT110 LDR A4,A3
0x326ea4…327038 Dummy {f00=0x0100, f01=0x0190, f02=»NTRIES OF THIS LINE IN TEMPORARY INTERRUPT TABLE HAS BEEN SCANNE D ?* -IF ANY ENTRY WAS OCCUPIED (LENGTH>0): STORE POINTER TO LINE H L P* SAVE01URATION TABLE IN THIS LINE ENTRY AND STORE LENGTH IN FIRST WOR * " LDR A4,A4 ANY ENTRY OCCUPIED?
0x327038…3271cc Dummy {f00=0x0100, f01=0x0190, f02=»A12 STORE IN LINE ENTRY 4 / STR A4,A1 STORE LENGTH IN FIRST WORD OF L.C.T. LDR A11,A1 START OF L.C.T. X . ) ADR A11,A4 LAST OCCUPIED ENTRY IN L.C.T. | ADKL A11,2 NEXT FREE ENTRY RF BIT140 EJECT PBIT130 EQU * *
0x3271cc…327360 Dummy {f00=0x0100, f01=0x0190, f02=» CONTAIN ZERO * SUKL A11,2 SKIP LENGTH WORD PBIT140 EQU * D $ ADKL A10,2 NEXT ENTRY IN T.I.T. X $ ADK A6,1 INCREMENT LINE COUNTER CWK A6,8 ALL LINES SCANNED? RF(E) BIT150 YES ADKL A12,2 NEXT LINE ENTRY
0x327360…3274f4 (5, 475) Dummy {f00=0x0100, f01=0x0190, f02=»ANY LINE t P* * P LD A1,SAVE24,A13 ANY DEVICE PRESENT? P RF(Z) BIT155 NO! H 2 P LD A1,SAVE21,A13 GET INTERRUPT TABLE ADDRESS b P ST A1,INTLT1,A7 SAVE P RF BIT158 PBIT155 EQU * . P LD A11,SAVE21,A13 GET START OF FREE AREA
0x3274f4…327688 Dummy {f00=0x0100, f01=0x0190, f02=»LT1-INTRT4) HAS BEEN GENERATED j * & ADK A7,2 NEXT ENTRY IN ITAB 0 CWK A7,16 LAST ENTRY? T RF(E) BIT160 YES r $ LDR A12,A11 GET NEXT FREE ENTRY RB BIT10 PBIT160 EQU * * D @* ALL ENTRIES IN THE TEMPORARY INTE
0x327688…32781c Dummy {f00=0x0100, f01=0x0190, f02=»BLES HAS BEEN INSERTED IN MOXTAB. l * * P* 4 2 P* MOVE INTERRUPT TABLE FOR SALCUZ AND ASCU4Z > < P* TO CONCATENATE INTERRUPT TABLES FOR CHLT/CHRT DEVICES t P* ( P LD A3,INTAS ANY ASCU4Z CONNECTION? P RF(Z) BIT180 NO! P LDR
0x32781c…3279b0 Dummy {f00=0x0100, f01=0x0190, f02=» STORE ADDRESS TO INTERRUPT TABLE $ P ADK A2,ASZLEN LAST LINE ENTRY+2 * , PBIT170 SUK A2,2 DECREMENT ENTRY POINTER R , P LDR* A1,A2 ANY CONNECTION ON THIS LINE? P RF(Z) BIT175 NO! P ADRS A2,A2 RELOCATE POINTER . PBIT175 CW A2,INTAS ALL P
0x3279b0…327b44 Dummy {f00=0x0100, f01=0x018e, f02=»A11 GET TO-ADDRESS & P ADR A11,A3 END OF INTERRUPT TABLE & P LD A1,SAVE04,A13 GET FROM-ADDRESS D $ P CALL MOVE MOVE INTERRUPT TABLE n 2 P ST A2,INTSL STORE ADDRESS TO INTERRUPT TABLE $ P ADK A2,SCZLEN LAST LINE ENTRY+2 , PBIT190 SUK A2,2 DECR
0x327b44…327cd8 Dummy {f00=0x0100, f01=0x0190, f02=» . PBIT195 CW A2,INTSL ALL POINTERS RELOCATED? P RB(NE) BIT190 NO! 6 PBIT200 EQU * P P LD A2,SCTSFA d P SUK A2,2 z PBIT210 ADK A2,2 * P CW A2,SCTEFA CHECK IF MEMORY OVERFLOW P RF(NE) BIT220 P LDKL A1,LMP3 ( P CALL ERRO
0x327cd8…327e6c Dummy {f00=0x0100, f01=0x0190, f02=»A11,SCTSFA UPDATE START OF FREE AREA RTN A14 RETURN , EJECT D T P*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*= R 6 1* GENERAL SUBROUTINES * T P*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=
0x327e6c…328000 Dummy {f00=0x0100, f01=0x018e, f02=»* GETTSK - GET NUMBER OF TASKS IN A TASK-CLASS * P* < 6 P* GETCTC - GET NUMBER OF COMMON TERMINAL CLASSES F P* 8 4**************************************************** * " P* REFERENCED IN: B:TCT,B:CDT * > :* ENTRY
0x328000…328194 (5, 476) Dummy {f00=0x0100, f01=0x0190, f02=» L * * WORK REGISTERS: A5 * 0 * SUBROUTINES: CONVRT : * Z PGETTSK EQU * d PGETCTC EQU * x P LC A5,TDBNT,A11 SLL A5,8 P LC A5,TDBNT+1,A11 CALL CONVRT RTN A14 EJECT 8 4******
0x328194…328328 Dummy {f00=0x0100, f01=0x0190, f02=»****************************** z * & * REFERENCED IN: B:TT 0 * P > :* ENTRY: A11 - POINTER TO START OF TASK DEFINITION BLOCK Z * D @* EXIT: A1 - NUMBER OF TERMINAL DEVICE CLASSES (BINRY VALUE) * * WORK REGISTER
0x328328…3284bc Dummy {f00=0x0100, f01=0x0190, f02=»NC+1,A11 CALL CONVRT RTN A14 $ EJECT 4 8 3*************************************************** B 8 3* GETSDC - GET NUMBER OF SPECIAL DEVICE CLASSES * ~ 8 3*************************************************** * * REFER
0x3284bc…328650 Dummy {f00=0x0100, f01=0x0190, f02=»VICE CLASSES (BINARY VALUE) l * $ * WORK REGISTERS: A5 . * L * SUBROUTINES: CONVRT V * v PGETSDC EQU * LCR A5,A9 P SLL A5,8 LC A5,1,A9 CALL CONVRT RTN A14 EJECT 2 .**********
0x328650…3287e4 Dummy {f00=0x0100, f01=0x0190, f02=»******** j * * REFERENCED IN: B:TT * : 6 2* ENTRY: A9 - POINTER TO CLASS DEFINITION RECORD D * ~ > :* EXIT: A1 - CLASS IDENTIFICATION NUMBER (BINARY VALUE) * * WORK REGISTERS: A5 * * SUBROUTIN
0x3287e4…328978 Dummy {f00=0x0100, f01=0x0190, f02=» RTN A14 RETURN P EJECT . )***************************************** & . )* GETLCN - GET LINE CONNECTION NUMBER * X . )***************************************** * * REFERENCED IN: B:DWTT * 8 3* ENTRY: A9 - POINTE
0x328978…328b0c Dummy {f00=0x0100, f01=0x0190, f02=»S: A5 * * SUBROUTINES: CONVRT * 8 PGETLCN EQU * B P LC A5,LCND1,A9 V P SLL A5,8 n P LC A5,LCND2,A9 P CALL CONVRT RTN A14 P EJECT : P***************************************************** : P
0x328b0c…328ca0 Dummy {f00=0x0100, f01=0x0190, f02=»======================= * : P* * 2 : P* REFERENCED IN: B:TT * p : P* * : P* ENTRY: A5 - TCL IN CURRE
0x328ca0…328e34 (5, 477) Dummy {f00=0x0101, f01=0x018e, f02=»TASK CLASS * h : P* * : P* WORK REGISTERS: A1-A7,A10 * T : P* * : P* SUBROUTINES: GETTSK,NXTBLK *
0x328e34…328fc8 Dummy {f00=0x0101, f01=0x0190, f02=» PGETTCL EQU * P LDR A6,A5 SAVE TCL P LDR A7,A6 TCL START VALUE 4 8 P LDR A10,A11 SAVE POINTER TO CURRENT TASK DEF. BLOCK V 2 P LD A11,SAVE01,A13 START OF CONFIGURATION DATA 4 PTCL:10 CWR A11,A10 ALL PREVIOUS BLOCKS SCANNED? P RF(E) T
0x328fc8…32915c Dummy {f00=0x0101, f01=0x0190, f02=»AR IN TCL p P CWR A5,A6 SAME TCL? P RF(NE) TCL:50 NO! . & P CALL GETTSK GET NUMBER OF COPIES H P ADR A7,A1 INCREMENT TCL r 0 PTCL:50 CALL NXTBLK GET NEXT TASK DEF. BLOCK P RB TCL:10 , PTCL:60 LDR A5,A7 SAVE START VALUE OF TCL P
0x32915c…3292f0 Dummy {f00=0x0101, f01=0x0190, f02=»*********************************** * , * REFERENCED IN: SEGGEN 6 * X " * ENTRY: A2 - MEMORY ADDRESS b . )* MMUOPT - MMU OPTION SWITCH (X) * , (* EXIT: A1 - CONTENT OF MEMORY ADDRESS * * WORK RE
0x3292f0…329484 Dummy {f00=0x0101, f01=0x0190, f02=»ON ~ P RF(Z) GCON10 NO MMU ELR A1,A2 & P RF GCON20 8 PGCON10 EQU * J LDR* A1,A2 ^ PGCON20 EQU * r RTN A14 RETURN EJECT B >************************************************************** B >* BINASC - CONVERT A
0x329484…329618 Dummy {f00=0x0101, f01=0x0190, f02=» B >************************************************************** * J * REFERENCED IN: B:DWTT T * v , (* ENTRY: A1 - BINARY NUMBER TO CONVERT * 0 ,* EXIT: A5 - TWO-DIGIT ASCII-CODED NUMBER * * WORK REGISTER
0x329618…3297ac Dummy {f00=0x0101, f01=0x018e, f02=» LDK A2,0 LDR A1,A1 PBIN:20 EQU * $ RF(Z) BINEX 8 ADK A2,1 L CWK A2,10 ^ RF(E) BIN:30 p SUK A1,1 RB BIN:20 PBIN:30 EQU * ADKL A5,/0100 LDK A2,0 SUK A1,1 RB BIN:20
0x3297ac…329940 Dummy {f00=0x0101, f01=0x0190, f02=» N D P* START MONITOR SAVE01URATION * D P**************************************************************** P PCONMON EQU * ( P CALL B:TCT BUILD TASK CONTROL TABLE & P CALL B:FWT BUILD FILE WORK TABLES ( P CALL
0x329940…329ad4 (5, 478) Dummy {f00=0x0101, f01=0x0190, f02=» 2 P CALL B:SWBT BUILD SWAPPABLE WORK BLOCK TABLE P XIF > 2 P CALL B:DMTT BUILD DATA MANAGEMENT TASK TABLES J & P CALL B:TT BUILD USER TASK TABLES 2 P CALL B:DWTS BUILD SPECIAL DEVICE WORK TABLES 2 P CALL B:DWTT BUILD TERMINAL DEVICE WORK
0x329ad4…329c68 Dummy {f00=0x0101, f01=0x0190, f02=»F ASSEMBLER APPLICATION P* " P LD A4,SCTOPT GET OPTION WORD * ( P RF(N) SLDM80 ASSEMBLER APPLICATION P ( P LD A1,SCTLAC GET ADDRESS TO S:GTAB | P IFF MMUPAG=1 & P LDR* A3,A1 GET ADDRESS TO P:MTAB $ P LD A1,2,A1 GET APPLICATON TYPE
0x329c68…329dfc Dummy {f00=0x0101, f01=0x0190, f02=»E r 2 P EL A2,I:RSTE,A3 GET INTERPRETER RESTART ENTRY P XIF @ PSLDM70 EQU * L P ST A2,SCTIOE SAVE IN SYSTAB ` P* " P* CHECK IF CREDIT APPLICATION P* P CWK A1,'CR' CREDIT? P RF(NE) SLDM80 NO P IFF MMUPAG=1 "
0x329dfc…329f90 Dummy {f00=0x0101, f01=0x0190, f02=» P EJECT F P***************************************************************** F P* END OF MONITOR SAVE01URATION PART * ` F P* -CONTINUE WITH APPLICATION SAVE01URATION PART * F P********************
0x329f90…32a124 Dummy {f00=0x0101, f01=0x4060, f02=»T BASE-ADDRESS & P ADKL A8,SYSLDX APPL. CONF. ENTRY P ABR A8 @ P END P@ * END OF MONITOR SAVE01URATION PART * ` F P* -CONTINUE WITH APPLICATION SAVE01URATION PART * F P********************
0x32a124…32a2b8 Dummy {f00=0x0101, f01=0x403c, f02=» 0 P******************************************** @ 8* -CONTINUE WITH APPLICATION SAVE01URATION PART * < F P***************************************************************** P LDKL A8,/FFFF * P ST A8,SCTEFA MODIFY END OF FREE A
0x32a2b8…32a44c Dummy {f00=0x0101, f01=0x2008, f02=» P X ` h p
0x32a44c…32a5e0 Dummy {f00=0x0101, f01=0x0000, f02=»
0x32a5e0…32a774 (5, 479) Opaque[0x194]
0x32a774…32a908 # DirEnt {nam=»SYSLOD«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2030, f03=0x0000}
0x32a774…32a908 IdxSect {
0x32a774…32a908 f00 = 0x0101 // 0x32a774 @0x0
0x32a774…32a908 f01 = 0x0034 // 0x32a776 @0x2
0x32a774…32a908 gno = [ // 0x32a778 @0x4
0x32a774…32a908 [0x00]: C0x0101.0x2.0
0x32a774…32a908 [0x01]: C0x0101.0x3.0
0x32a774…32a908 [0x02]: C0x0102.0x0.0
0x32a774…32a908 [0x03]: C0x0102.0x1.0
0x32a774…32a908 [0x04]: C0x0102.0x2.0
0x32a774…32a908 [0x05]: C0x0102.0x3.0
0x32a774…32a908 [0x06]: C0x0103.0x0.0
0x32a774…32a908 [0x07]: C0x0103.0x1.0
0x32a774…32a908 [0x08]: C0x0103.0x2.0
0x32a774…32a908 [0x09]: C0x0103.0x3.0
0x32a774…32a908 [0x0a]: C0x0104.0x0.0
0x32a774…32a908 [0x0b]: C0x0104.0x1.0
0x32a774…32a908 [0x0c]: C0x0104.0x2.0
0x32a774…32a908 [0x0d]: C0x0104.0x3.0
0x32a774…32a908 [0x0e]: C0x0105.0x0.0
0x32a774…32a908 [0x0f]: C0x0105.0x1.0
0x32a774…32a908 [0x10]: C0x0105.0x2.0
0x32a774…32a908 [0x11]: C0x0105.0x3.0
0x32a774…32a908 [0x12]: C0x0106.0x0.0
0x32a774…32a908 [0x13]: C0x0106.0x1.0
0x32a774…32a908 [0x14]: C0x0106.0x2.0
0x32a774…32a908 [0x15]: C0x0106.0x3.0
0x32a774…32a908 [0x16]: C0x0107.0x0.0
0x32a774…32a908 [0x17]: C0x0107.0x1.0
0x32a774…32a908 [0x18]: C0x0107.0x2.0
0x32a774…32a908 [0x19]: C0x0107.0x3.0
0x32a774…32a908 ]
0x32a774…32a908 }
0x32a908…32aa9c Dummy {f00=0x0101, f01=0x0190, f02=» 2 P IDENT SYSLOD REL 10.0 80-03-15 870105041000 P : P PRR 10.0 80-03-14 B . P =3,CONDITIONAL ASSEMBLY FOR SYSLOD TEST ^ P PRR 10.0 80-01-18 & P =2,S:GTAB LIMITED TO ONE SECTOR P PRR 10.0 79-12-20 4 P =1,SEGBLK/PAGBLK NO
0x32aa9c…32ac30 Dummy {f00=0x0101, f01=0x0190, f02=»************* P* * P* ENTRIES AND EXTERNALS * : P* * ^ P*************************** P EXTRN CONVRT P EXTRN LDALEN P EXTRN SCTADA P EXTRN SCTANO P EXTRN SCT
0x32ac30…32adc4 Dummy {f00=0x0101, f01=0x0190, f02=» P EXTRN SCTNOP P EXTRN SCTNPE P EXTRN SCTOPT 4 P EXTRN SCTIPL J P EXTRN SCTPSZ ` P EXTRN SCTSFA v P EXTRN SCTSWB P EJECT P EXTRN SAVE01 P EXTRN SAVE02 P EXTRN SAVE03 P EXTRN SAVE04 P
0x32adc4…32af58 Dummy {f00=0x0101, f01=0x018e, f02=»RN SAVE11 P EXTRN SAVE12 P EXTRN SAVE13 ( P EXTRN SAVE18 > P EXTRN SAVE20 T P EXTRN SAVE22 j P EXTRN SAVE25 P EXTRN SAVE26 P EXTRN SAVE27 P EXTRN SAVE28 P EXTRN SAVE29 P EXTRN APPTYP P EXT
0x32af58…32b0ec Dummy {f00=0x0101, f01=0x0190, f02=» P EXTRN MOVE 4 P EXTRN TTB:MT DISPLACEMENT TO MMU TABLE IN TTAB P EXTRN TTB:CB P P EJECT f P t P $ P******************************* $ P* CONFIGURATION FILE (CONFIG) * $ P******************************* P
0x32b0ec…32b280 Dummy {f00=0x0101, f01=0x0190, f02=»6A TASK ID SAVE09 VALUE ~ , PTDBMC EQU TDBID+6 6A MATCHING TASK CLASS $ PTDBTL EQU TDBMC+6 6A TASK LEVEL P : PTDBNC EQU TDBTL+6 2N NUMBER OF TERMINAL DEVICE CLASSES x P* & PTDBFST EQU TDBNC+2 SAVE05 TERM DEF $ PTDC EQU 7 TERMINAL DEVICE CLAS
0x32b280…32b414 (5, 480) Dummy {f00=0x0101, f01=0x0190, f02=» j P* P* COMMON DEVICE DEF. BLOCK: PCDBBT EQU 0 1A BLOCK TYPE 6 6 PCDBNC EQU CDBBT+1 2N NUMBER OF SPEC. DEV. CLASSES X ( PSDCFST EQU CDBNC+2 SAVE05 SDC-RECORD P* P* & P* USER WORK BLOCK TYPE DEF. BLOCK PUDBBT EQU 0
0x32b414…32b5a8 Dummy {f00=0x0101, f01=0x0190, f02=» NAME OF UWB " PNUMUBL EQU 3 NUMBER OF BLOCKS . PUDBREC EQU NAMUWB+NUMUBL UDB RECORD-LENGTH : P**************** l P* SOP-HANDLING * P**************** PSOP EQU /2E DEVICE ADDRESS P PLMP1 EQU /400 LAMP 1 CODE PLMP2 EQU
0x32b5a8…32b73c Dummy {f00=0x0101, f01=0x0190, f02=»P9 EQU 4 PLMP10 EQU 2 PLMP11 EQU 1 $ P EJECT 8 P********************* F P* OTHER CONSTANTS * d P********************* P 8 PNUMSEG EQU 10 DISPL. TO NUMBER OF SEGMENTS IN S:GTAB & PCOMLG EQU 4 LENGTH OF COMMON PAR
0x32b73c…32b8d0 Dummy {f00=0x0101, f01=0x0190, f02=» & PPAGLG EQU 8 PAGE LENGTH IN S:GTAB PPRGLG1 EQU 2 . , PNCHTID EQU 5 NBR OF CHAR. IN TID RECORD B $ PSWPFEL EQU 14 FILE EXTENT LENGTH r P EJECT P*********************** P* CASSETTE HANDLING * P*********************** , P
0x32b8d0…32ba64 Dummy {f00=0x0101, f01=0x018e, f02=»C SEARCH TAPEMARK FORWARD P* " " P* DISC/FLEXIBLE DISC HANDLING , P* R ( PBUFLEN EQU 256 LENGTH OF READ BUFFER * PDKBA3 EQU 514 BUFFER LENGTH VERSION A3 2 PRECLEN EQU 9 CONFIGURATION FILE RECORD LENGTH * PFDCU EQU /09 FLEXIBLE DISC C
0x32ba64…32bbf8 Dummy {f00=0x0101, f01=0x018e, f02=» h PQBLFAC EQU 6 BLOCKING FACTOR P* , P* DATA AREA DEFINITION 6 P* V PSYSBAS EQU * ` PSAVCON DATA BUFLEN t 2 PMXBUF DATA 0 DISC/FLEXIBLE DISC BUFFER ADDRESS PSAVMEM DATA 0 SAVE AREA & PCYLNBR DATA /FFFF CYLINDER NUMBER
0x32bbf8…32bd8c Dummy {f00=0x0101, f01=0x018e, f02=» P F P***************************************************************** F P* CALL-FORMAT, PERFORMS: CFR A14,A13 * ^ F P* DATA [REL-ADDRESS] * F P*
0x32bd8c…32bf20 Dummy {f00=0x0101, f01=0x0190, f02=» P P PCALL FORM 16=/F697,16 P EJECT : P************************** H P* CONDITIONAL ASSEMBLY * j P************************** 0 PCASS EQU 1 1-PROGRAM LOAD DEVICE = CASSETTE , PDISC EQU 1 1-PROGRAM LOAD DEVICE = DIS
0x32bf20…32c0b4 (5, 481) Dummy {f00=0x0102, f01=0x0190, f02=» EQU 1 1-TEST THE CONFIGURATION FILE PCFTCAS EQU CFTEST+CASS , PCFTFLD EQU CFTEST+FLDISC J 8 PLODTST EQU 0 1-BUGGER START AFTER MONITOR LOADING =3 j P EJECT : P****************************************************** : P*
0x32c0b4…32c248 Dummy {f00=0x0102, f01=0x0190, f02=»======== * n : P* * 8 P* ENTRY: A1 - FORMAT AND DEVICE TYPE * Z : P* A2 - PROGRAM LOAD DEVICE * : P* A3 - APPLICATION NUMBER
0x32c248…32c3dc Dummy {f00=0x0102, f01=0x0190, f02=» A9 - SAVE09 OF FREE AREA * < P* A13 - MONITOR SAVE09 ADDRESS * > : P* * ~ : P* EXIT: * : P*
0x32c3dc…32c570 Dummy {f00=0x0102, f01=0x0190, f02=»BUF,MOVBUF,RDBLK, * v : P* CONLOD,CONEX,MOVREV * $ : P* * b : P****************************************************** PSYSLOD EQU * P* P* SAVE REGI
0x32c570…32c704 Dummy {f00=0x0102, f01=0x0190, f02=»APPLICATION NUMBER 8 P ST A8,SCTADA SAVE APPLICATION DISC ADDRESS BIT 0-15 < P ST A7,SCTADA+2 SAVE APPLICATION DISC ADDRESS BIT 16-31 V * P ST A9,SCTSFA SAVE SAVE09 OF FREE AREA P IFT LODTST=1 =3 P LDKL A14,SYSBAS =3 P LDR A13,P =3
0x32c704…32c898 Dummy {f00=0x0102, f01=0x0190, f02=»SYSLOD RUNS P* P LDKL A1,LMP1 P OTR A1,0,SOP 4 P* J B P* INIT POINTER TO SUBROUTINE HANDLER (A13), STACK BASE (A14) T $ P* AND ADDRESS TO GETPSW-ROUTINE P* P LDR A8,P RETURN ADDRESS & P LDKL A3,REL+2 RELOCATION RO
0x32c898…32ca2c Dummy {f00=0x0102, f01=0x0190, f02=»D t P ANK A1,1 MMU IN SYSTEM? P RF(Z) AP:100 NO! * P EJECT D P* R > P* EXECUTION PATH FOR SYSTEMS WITH MMU OPTION EXCLUSIVELY P* " P SLL A6,2 UPPER SAVE20=256 KB P LDK A1,0 MMU ENTRY POINTER PAP:010 EQU * " P L
0x32ca2c…32cbc0 Dummy {f00=0x0102, f01=0x0190, f02=»AD MMU REGISTERS * P ES A5,PAGSIZ-2,A1 STORE TEST PATTERN * P EL A2,PAGSIZ-2,A1 GET MEMORY CONTENT F ( P CWR A2,A5 COMPARE WITH TEST PATTERN t P RF(E) AP:200 ( P SUK A6,4 DECREMENT NUMBER OF PAGES P RB AP:010 P* D P* END OF
0x32cbc0…32cd54 (5, 482) Dummy {f00=0x0102, f01=0x0190, f02=»R SYSTEMS WITHOUT MMU OPTION EXCLUSIVELY | P* 0 & P LDKL A1,PAGSIZ-2 SAVE09 AT /FFFE : PAP:110 EQU * d & P SUKL A1,PAGSIZ NEXT PHYSICAL PAGE x ( P LDR* A2,A1 SAVE OLD MEMORY CONTENT " P STR A5,A1 STORE TEST PATTERN P CWR* A5,A1 CHECK IF
0x32cd54…32cee8 Dummy {f00=0x0102, f01=0x0190, f02=» * P STR A2,A1 RESTORE OLD MEMORY CONTENT P* 6 H P* END OF EXECUTION PATH FOR SYSTEMS WITHOUT MMU OPTION EXCLUSIVELY @ P* P EJECT P* P* COMMON EXECUTION PATH P* PAP:200 EQU * 0 P ST A6,SCTMSZ SAVE NUMBER OF
0x32cee8…32d07c Dummy {f00=0x0102, f01=0x0190, f02=»PARTITION =2 n P ST A6,SCTEFA STORE =2 P* 2 2 P* GET DISC ADDRESS OF APPLICATION VTOC RECORD < P* r P LD A11,SCTADA+2 | P LDKL A12,SCTADA P* H P* INIT POINTER TO READ BUFFER. INIT DEVICE ADDRESS FOR READ-ROUTINE ( P LD A9
0x32d07c…32d210 Dummy {f00=0x0102, f01=0x0190, f02=»YSTAB x * P LD A2,SCTIPL GET PROGRAM LOAD DEVICE P LDR A1,A2 SAVE < P* T P* CHECK PROGRAM LOAD MEDIUM ^ P* " P ANK A2,/C0 CHECK IF CASSETTE P RF(P) AP:210 YES! 2 P ST A9,MXBUF FLEXIBLE DISC/DISC BUFFER ADDRESS & P LDR A
0x32d210…32d3a4 Dummy {f00=0x0102, f01=0x0190, f02=» P RF(NP) FDTERR P SUK A3,3 P RF(N) AP:230 DISC , " P RF(Z) AP:225 MINI FIXED DISC F P SUK A3,5 l P RF(Z) AP:220 FLEXIBLE DISC ~ : PFDTERR LDKL A1,LMP10 INDICATE FORMAT/DEVICE TYPE ERROR P CALL ERROR PAP:210 EQU * P
0x32d3a4…32d538 Dummy {f00=0x0102, f01=0x018e, f02=»,A1 SAVE =2 0 P ST A1,READ STORE IN PROGRAM LOAD SUBROUTINE PAP:215 EQU * H * P CF A14,RDBLK READ ONE CASSETTE BLOCK P LDR A1,A1 TAPE MARK? P RF(Z) AP:235 NO! , P CF A14,CASSIN INIT APPLICATION CASSETTE P RB AP:215 P XIF
0x32d538…32d6cc Dummy {f00=0x0102, f01=0x0190, f02=» P IFT FLDISC=1 P* * P* PROGRAM LOAD DEVICE = FLEXIBLE DISC $ P* R P* 2 P* MODIFY SCTIPL: /F8 - DRIVE 1, /F9 - DRIVE 2 f P* P ORK A2,/F8 P ST A2,SCTIPL P* P* INIT FLEXIBLE DISC P* P CF A1
0x32d6cc…32d860 Dummy {f00=0x0102, f01=0x018e, f02=»,LMP9 & P CALL ERROR ILLEGAL MONITOR OPTION P XIF 8 P EJECT D PAP:225 EQU * R P IFT MFDISC=1 f P* | , P* PROGRAM LOAD DEVICE = MINI FIXED DISC P* , P* MODIFY SCTIPL:/F4-DRIVE 1,/F5-DRIVE 2 P* P ORK A2,/F4
0x32d860…32d9f4 (5, 483) Dummy {f00=0x0102, f01=0x0190, f02=» P =2 P RF AP:232 =2 P XIF , P IFF MFDISC=1 8 P LDKL A1,LMP9 N & P CALL ERROR ILLEGAL MONITOR OPTION d P XIF P EJECT PAP:230 EQU * P IFT DISC=1 P* " P* PROGRAM LOAD DEVICE = DISC P*
0x32d9f4…32db88 Dummy {f00=0x0102, f01=0x0190, f02=» P ST A2,SCTIPL P* P* INITIALIZE DISC COMMANDS $ P* H P CF A14,DUINIT R PAP:232 EQU * =2 h * P LD A10,READ GET SUBROUTINE ADDRESS =2 & P CFR A14,A10 READ FIRST SECTOR =2 P XIF P IFF DISC=1 P LDKL A1,LMP9
0x32db88…32dd1c Dummy {f00=0x0102, f01=0x0190, f02=» SAVE INFORMATION ABOUT THE LOAD MODULE P* 0 6 P LDR* A6,A9 GET SAVE09 ADDRESS (UNSEGMENTED APPL.) : P ST A6,SAVE09,A13 SAVE t . P LD A6,COMLG,A9 GET LENGTH OF COMMON PART P ST A6,SAVE04,A13 SAVE " P LD A2,SCTOPT GET OPTION WORD ( P
0x32dd1c…32deb0 Dummy {f00=0x0102, f01=0x0190, f02=»E) AP2340 YES " P CWK A3,'BA' BASIC APPLICATION ! P RF(E) AP2340 YES ! < $ P CWK A3,'CO' COBOL APPLICATION? ! V P RF(E) AP2340 YES ! ~ P* ! P* ASSEMBLER APPLICATION ! P* ! 2 P ORKL A2,/8000 INDICATE ASSEMBLER APPLICATION ! P ST A2
0x32deb0…32e044 Dummy {f00=0x0102, f01=0x0190, f02=»,SCTMSZ GET NUMBER OF PHYSICAL PAGES ! P SRC A2,1 MMU IN SYSTEM? " , P RF(NN) AP:240 NO! " L P EJECT " f P* " t 2 P* EXECUTION PATH FOR SYSTEMS WITH MMU OPTION " ~ P* " P LD A3,SCTPSZ GET PAGE SIZE " P LDR A1,A3 SAVE " $ P ANKL A1,/03FF
0x32e044…32e1d8 Dummy {f00=0x0102, f01=0x0190, f02=» SRL A3,2 LOGICAL PAGE SIZE " P SLL A5,8 MAP IT ON MMU # $ 2 P ANKL A5,/FC00 PAGE ADDRESS IN 6 LEFTMOST BITS # D P LDR A1,A5 SAVE # z P* # & P* CHECK IF ASSEMBLER APPLICATION # P* # $ P SLC A2,1 ASSEMBLER APPLICATION # P ABL(N) AP:330 Y
0x32e1d8…32e36c Dummy {f00=0x0102, f01=0x0190, f02=»ND OF EXECUTION PATH EXCLUSIVELY FOR SYSTEMS WITH MMU OPTION # P* $ D P EJECT $ N PAP:240 EQU * $ P* $ p @ P* EXECUTION PATH EXCLUSIVELY FOR SYSTEMS WITHOUT MMU OPTION $ z P* $ : P SLL A5,10 HIGHEST PHYSICAL AND LOGICAL MEMORY ADDRESS $ P L
0x32e36c…32e500 Dummy {f00=0x0102, f01=0x018e, f02=»5 YES $ * P LD A2,NUMSEG+8,A9 NUMBER OF SEGMENTS % P RF(Z) AP:275 NO SEGMENTS! % < P EJECT % ^ PAP:245 EQU * % l P* % P* COMMON EXECUTION PATH % P* % P ST A1,SAVE06,A13 SAVE A1 =2 % . P ST A2,SAVE29,A13 SAVE NUMBER OF SEGMENTS % "
0x32e500…32e694 (5, 484) Dummy {f00=0x0102, f01=0x0190, f02=» % h " P SUK A4,/F0 CHECK IF CASSETTE & 0 P RF(N) AP:260 CASSETTE - LOAD ALL SEGMENTS! & . P* & b , P* COMPUTE NUMBER OF CORE RESIDENT PAGES & l P* & P CM SAVE05,A13 RESET COUNTER & $ P LDR A6,A9 START OF APPLICATION & & P ADK A6,14 START OF SE
0x32e694…32e828 Dummy {f00=0x0102, f01=0x0190, f02=»A9,SAVE03,A13 SAVE A9 =2 & " P ST A11,SAVE13,A13 SAVE A11 =2 ' ( P LDR A11,A6 GET POINTER IN S:GTAB =2 ' F , P ADKL A9,BUFLEN-16 END OF READ BUFFER =2 ' r , P CALL CMPADR POINTER OUTSIDE BUFFER? =2 ' P RF(L) AP:252 NO! =2 ' . P SUR A6,A9 DISPLACEMENT IN
0x32e828…32e9bc Dummy {f00=0x0102, f01=0x0190, f02=»T SECTOR NUMBER =2 ' v P ST A3,SAVE07,A13 SAVE A3 =2 ( P ST A5,SAVE08,A13 SAVE A5 =2 ( > * P CFR A14,A10 READ NEXT SECTOR/BLOCK =2 ( b $ P LD A3,SAVE07,A13 RESTORE A3 =2 ( $ P LD A5,SAVE08,A13 RESTORE A5 =2 ( 4 P ST A11,SAVE13,A13 SAVE CURRENT SECTOR N
0x32e9bc…32eb50 Dummy {f00=0x0102, f01=0x0190, f02=»MENT TYPE ( ~ ( P CCK A4,'RR' CORE RESIDENT SEGMENT? ) P RF(NE) AP:255 NO! ) > 6 P IM SAVE05,A13 INCREMENT RESIDENT SEGMENT COUNTER ) X PAP:255 EQU * ) 4 P LD A2,SAVE01,A13 GET REMAINING NBR OF SEGM. =2 ) P SUK A2,1 MOORE SEGMENTS? ) P RB(NZ)
0x32eb50…32ece4 Dummy {f00=0x0102, f01=0x0190, f02=» A5 =2 ) z & P CFR A14,A10 READ FIRST SECTOR =2 * $ P LD A3,SAVE03,A13 RESTORE A3 =2 * 8 $ P LD A5,SAVE08,A13 RESTORE A5 =2 * ` 2 P LD A2,SAVE05,A13 NUMBER OF RESIDENT SEGMENTS * ( P RF(Z) AP:270 NO RESIDENT SEGMENTS! * PAP:260 EQU * * & P ST A2,SCT
0x32ece4…32ee78 Dummy {f00=0x0102, f01=0x0190, f02=»* * , P LD A7,SCTEFA+2 GET PARTITION NUMBER =2 + * PAP:262 LD A11,SCTPSZ GET PAGE SIZE =2 + : * P LD A9,SCTEFA GET END OF FREE AREA =2 + h 8 P CALL CMPADR ENOUGTH SPACE IN THIS PARTITION? =2 =2 + P RF(NG) AP:265 YES! =2 + P SUK A7,1 DECREMENT =2 +
0x32ee78…32f00c Dummy {f00=0x0102, f01=0x0190, f02=»AREA =2 + j P ST A9,SCTEFA STORE =2 , ( P CWK A7,1 FIRST MEMORY PARTITION? =2 , . P RF(G) AP:266 NO! =2 , Z , P LD A11,SCTSFA GET START OF FREE AREA =2 , v & P CALL CMPADR COMPARE ADDRESSSES =2 , & P RF(NL) AP:280 MEMORY OVERFLOW! =2 , PAP:266 EQU *
0x32f00c…32f1a0 Dummy {f00=0x0102, f01=0x0190, f02=»A4 RESTORE A9 , P LDR A11,A8 RESTORE A11 - 8 P ST A5,SAVE22,A13 SAVE PHYS.ADDRESS TO FIRST SEGMENT - 6 PAP:270 EQU * - r $ P LD A1,SAVE06,A13 RESTORE A1 =2 - " P LD A2,SCTOPT GET OPTION WORD - P ANK A2,1 MMU IN SYSTEM? - P RF(NZ) AP:292 YES!
0x32f1a0…32f334 (5, 485) Dummy {f00=0x0103, f01=0x0190, f02=»THOUT MMU OPTION - d P* . P ST A5,SAVE08,A13 . " PAP:275 EQU * . < . P LD A10,COMLG,A9 GET LENGTH OF COMMON PART . P & P ADKL A10,3 RESERV ONE EXTRA WORD . P ANKL A10,/FFFE . P . P LDR A4,A9 SAVE A9 . P LDR A8,A11 SAVE A11 . P LDR A
0x32f334…32f4c8 Dummy {f00=0x0103, f01=0x0190, f02=» $ P CALL CMPADR A11 COMPARED TO A9 / P RB(G) AP:285 / , PAP:280 LDKL A1,LMP3 / B P CALL ERROR MEMORY OVERFLOW! / ^ PAP:290 EQU * / P LDR A12,A11 RELOCATION BASE / P LDR A9,A4 RESTORE A9 / P LDR A11,A8 RESTORE A11 / 0 P LDR A8,A12 A8 -
0x32f4c8…32f65c Dummy {f00=0x0103, f01=0x0190, f02=»ESS / d . P LD A10,COMLG,A9 GET LENGTH OF COMMON PART 0 P ABL AP:355 0 > P EJECT 0 R PAP:292 EQU * 0 ` P* 0 t 2 P* EXECUTION PATH FOR SYSTEMS WITH MMU OPTION 0 ~ P* 0 P LDR A4,A5 SAVE 0 & P ANKL A5,/FC00 GET 6 LEFTMOST BITS 0 P LDR A6,
0x32f65c…32f7f0 Dummy {f00=0x0103, f01=0x0190, f02=» 0 ` P* THE FIRST LOGICAL PAGE 1 P* 1 * ( P LDKL A7,MMEND GET END OF MMU TABLE 1 4 & P LDKL A8,16 INIT MMU ENTRY POINTER 1 ` PAP:295 EQU * 1 * P SUK A7,2 DECREMENT MMU ENTRY ADDRESS 1 * P SUKL A8,1 DECREMENT MMU ENTRY POINTER 1 2 P SUKL A3,/400
0x32f7f0…32f984 Dummy {f00=0x0103, f01=0x0190, f02=» P CWK A3,/400 PAGE SIZE=1K? 2 P RF(E) AP:300 YES 2 & P* 2 @ 0 P* RESERV ONE EXTRA MMU ENTRY WHEN PAGE SIZE 2 J $ P* IS NOT AN EVEN MULTIPLE OF 4K 2 ~ P* 2 P SUK A7,2 2 P SUKL A8,1 2 PAP:300 EQU * 2 . P LD A3,SCTNOP ANY CORE RESIDENT
0x32f984…32fb18 Dummy {f00=0x0103, f01=0x0190, f02=»10 2 < PAP:302 LDR A3,A7 SAVE MMU ENTRY ADDRESS TO LOGICAL PAGE 3 PAP:305 EQU * 3 J . P STR A6,A3 STORE ADDRESS TO PHYSICAL PAGE 3 ^ * P ADK A3,2 INCREMENT MMU ENTRY ADDRESS 3 $ P CWK A3,MMEND END OF MMU TABLE? 3 P RF(E) AP:310 YES! 3 2 P ADKL A6
0x32fb18…32fcac Dummy {f00=0x0103, f01=0x0190, f02=») AP:315 YES! 3 , P SUKL A5,/400 NEXT PHYSICAL PAGE ADDRESS 4 P* 4 F PAP:315 EQU * 4 P $ P SLL A4,2 PHYSICAL DISPLACEMENT 4 d PAP:325 EQU * 4 P* 4 . P* SAVE LOGICAL ADDRESS OF SAVE05 SEGMENT 4 P* 4 P LDR A2,A8 GET MMU ENTRY 4 & P S
0x32fcac…32fe40 Dummy {f00=0x0103, f01=0x0190, f02=»EMENT 4 z P ST A2,SAVE08,A13 SAVE 5 , P LDR A2,A8 GET MMU ENTRY FOR FIRST PAGE 5 , P ADR A2,A2 BYTE DISPLACEMENT 5 6 P ADKL A2,TTB:MT COMPUTE DISPL. TO FIRST PAGE ENTRY 5 P ST A2,SCTMMP SAVE IN SYSTAB 5 P* 5 & P* COMPUTE NUMBER OF PAGE ENTRIE
0x32fe40…32ffd4 (5, 486) Dummy {f00=0x0103, f01=0x0190, f02=»ENTRY IS ENTERED IF MMU OPTION IN SYSTEM BUT 5 > P* THE APPLICATION LOADED WAS UNSEGMENTED (CORE RESIDENT) 6 4 P* 6 v , P SUKL A5,/400 INIT POINTER TO LAST PAGE 6 & P LDKL A4,PAGSIZ PHYSICAL PAGE SIZE 6 $ P LDKL A7,MMEND END OF MMU TABLE 6 " P LDKL
0x32ffd4…330168 Dummy {f00=0x0103, f01=0x0190, f02=»SIZ 6 PAP:337 EQU * 7 P* 7 ( P* COMPUTE APPLICATION SAVE09 ADDRESS 7 * P* 7 V & P* A1 - LAST PHYSICAL PAGE NUMBER 7 ` P* A4 - DISPLACEMENT IN PAGE 7 " P* A5 - PHYSICAL PAGE ADDRESS 7 P* A7 - MMU ENTRY ADDRESS 7 P* A8 - CURRENT MM
0x330168…3302fc Dummy {f00=0x0103, f01=0x0190, f02=»E EVEN LENGTH 7 ~ P RF AP:344 8 PAP:340 EQU * 8 ( L P* RESERV ENTRIES IN MMU TABLE FOR PHYSICAL PAGE ADDRESSES TO COMMON PA 8 < P* 8 ( P SUR A2,A4 AREA LEFT IN CURRENT PAGE 8 & P LDKL A4,PAGSIZ PHYSICAL PAGE SIZE 8 * P SUKL A8,1 DECREMENT MMU ENT
0x3302fc…330490 Dummy {f00=0x0103, f01=0x0190, f02=» * 8 P =2 9 * P SUK A7,2 DECREMENT MMU ENTRY ADDRESS 9 ( P STR A5,A7 STORE PAGE ADDRESS IN MMU 9 F P SUKL A5,/400 NEXT PAGE 9 r PAP:344 EQU * 9 & P TNM A2,A4 PROGRAM LENGTH > 32 KB? 9 P RF(NN) AP:345 NO! 9 P CWR A4,A2 9 P RF AP:348 9
0x330490…330624 Dummy {f00=0x0103, f01=0x018e, f02=»1 9 P SUKL A8,1 : " P RB(N) AP:341 TABBE OVERFLOW! : P SUK A7,2 NEXT TABBE ENTRY : B " P STR A5,A7 STORE PAGE ADDRESS : d PAP:351 EQU * : " P SUR A4,A2 MODIFY DISPLACEMENT : P LDR A2,A8 GET MMU ENTRY : P ADR A8,A8 BYTE DISPLACEMENT : 8 P
0x330624…3307b8 Dummy {f00=0x0103, f01=0x0190, f02=» P LDR A8,A2 ; & P ADR A8,A4 COMPUTE LOGICAL ADDRESS ; , P ST A8,SAVE07,A13 SAVE IN TEMPORARY AREA ; B , P LDR* A1,A7 GET ADDRESS TO PHYSICAL PAGE ; r $ P ANKL A1,/C000 GREATER THAN 64K? ; P RF(Z) AP:353 NO! ; P LDKL A1,0 UPPER LIMIT 64 KB ; P
0x3307b8…33094c Dummy {f00=0x0103, f01=0x0190, f02=»A2,SCTSFA GET START OF FREE AREA ; ( P TNM A1,A2 ON SAME SIDE OF 32K-LIMIT < ( P RF(NN) AP3532 YES! < T P CWR A2,A1 < p P RF AP3534 < PAP3532 CWR A1,A2 < PAP3534 RF(G) AP:354 < P LDKL A1,LMP3 < P CALL ERROR MEMORY OVERFLOW < PAP:354
0x33094c…330ae0 Dummy {f00=0x0103, f01=0x018e, f02=» : P* READ AND RELOCATE CORE RESIDENT PART OF APPLICATION = P* = B $ P* A8 - APPLICATION LOAD ADDRESS = L * P* A10 - LENGTH OF CORE RESIDENT PART = t P* = PAP:355 EQU * = & P LDKL A1,/FFFF END OF FREE AREA =2 = P ST A1,SCTEFA STORE =2 = P
0x330ae0…330c74 (5, 487) Dummy {f00=0x0103, f01=0x018e, f02=» = Z P* > & P* CHECK IF ASSEMBLER APPLICATION > P* > < " P LD A1,SCTOPT GET OPTION WORD > F ( P ABL(N) CONLOD ASSEMBLER APPLICATION > l , P LD A2,SAVE29,A13 GET NUMBER OF SEGMENTS > , P CM SAVE06,A13 CLEAR SEGMENT COUNTER =2 > . P ABL(Z) CONLOD N
0x330c74…330e08 Dummy {f00=0x0103, f01=0x0190, f02=» > d PAP:360 EQU * ? P* ? & P* READ AND RELOCATE THE SEGMENTS ? & P* ? P . P* A8 - LOGICAL ADDRESS OF SAVE05 SEGMENT ? Z P* A10 - SEGMENT LENGTH ? P* ? 4 P LD A2,SCTLAC GET LOGICAL ADDRESS TO APPLICATION ? P ADKL A2,BLKLEN+BLKLEN ?
0x330e08…330f9c Dummy {f00=0x0103, f01=0x0190, f02=»DECREMENT BLOCK COUNTER ? P RB AP:365 @ PAP:370 EQU * @ 2 P* @ F P* CHECK IF DISC PAGING @ P P* @ p " P LD A1,SCTOPT GET OPTION WORD @ z P ANK A1,2 DISC PAGING? @ P RF(Z) AP:376 NO! @ P* @ & P* CHECK IF CORE RESIDENT SEGMENT @
0x330f9c…331130 Dummy {f00=0x0103, f01=0x0190, f02=» =REL 11 @ r , P SRL A1,8 SEGMENT TYPE TO RIGHT BYTE =1 A ( P CCK A1,'RR' CORE RESIDENT SEGMENT? A @ * P RF(E) AP:376 YES: LOAD THIS SEGMENT! A l P* A * P* BYPASS THIS SEGMENT AND CHECK NEXT A P* A * P LD A1,SAVE06,A13 GET SEGMENT COUNTER A 2
0x331130…3312c4 Dummy {f00=0x0103, f01=0x0190, f02=» A | 2 P ST A1,SAVE06,A13 SAVE CURRENT SEGMENT NUMBER B P RB AP:360 B > & PAP:375 LDKL A1,LMP2 DISC I/O ERROR B P P CALL ERROR B z P EJECT B PAP:376 EQU * B " P ADK A2,2 DISC SECTOR ADDRESS B ( P CALL GETCON GET DISC SECTOR ADDRESS B P LDR A
0x3312c4…331458 Dummy {f00=0x0103, f01=0x0190, f02=»OW =REL 11 B z > P*AP:377 ADKL A12,1 INCR. M. S. P. OF DISC ADDRESS =REL 11 C , P* ANKL A11,/7FFF RESET OVERFLOW =REL 11 C T : P*AP:378 AD A12,SCTADA ADD M. S. P. OF A. D. A. =REL 11 C $ P* CWK A12,255 OVERFLOW? =REL 11 C 6 P* RB(G) AP:375 YES: ILLEGAL DI
0x331458…3315ec Dummy {f00=0x0103, f01=0x018e, f02=» C $ P ANKL A10,/FFFE MAKE EVEN LENGTH D P ST A8,SAVE07,A13 D 0 P CF A14,LODSEG LOAD SEGMENT D J * P LD A1,SAVE06,A13 GET SEGMENT COUNTER D n 2 P LD A2,SAVE29,A13 GET TOTAL NUMBER OF SEGMENTS D ( P ADK A1,1 INCREMENT SEGMENT COUNTER D $ P CWR A1,A2
0x3315ec…331780 Dummy {f00=0x0103, f01=0x0190, f02=» D p " P LD A1,SCTOPT GET OPTION WORD E P ANK A1,1 MMU IN SYSTEM? E . P RF(NZ) AP:379 YES! E N , P ADR A8,A4 COMPUTE ADDRESS TO NEXT PAGE E j P RB AP:360 E P EJECT E PAP:379 EQU * E P LDR A1,A4 SAVE E . P ANKL A4,/0C00 GET MODULO 4K DISCR
0x331780…331914 (5, 488) Dummy {f00=0x0103, f01=0x0190, f02=»NKL A4,/0C00 GET MODULO 4K DISCRIMINANT E 0 P ANKL A1,/F000 LOGICAL ADDRESS TO NEXT PAGE F 0 2 P ANKL A8,/F000 LOGICAL ADDRESS TO CURRENT PAGE F d * P SUR A1,A8 COMPUTE PHYSICAL INCREMENT F PAP:380 EQU * F , P LD A8,SCTLAP GET LOGICAL PAGE ADDRESSE F
0x331914…331aa8 Dummy {f00=0x0103, f01=0x0190, f02=»OVE TO 4 RIGHTMOST BITS F P ADR A2,A2 2*MMU ENTRY G P ADR A2,A13 G > & P ADKL A2,MMDDIV MMU ENTRY ADDRESS G R P LDR A3,A13 G | P ADKL A3,MMDDIV+32 G * P SRL A1,2 MAP PHYSICAL ADDRESS ON MMU G PAP:385 EQU * G , P ADRS A1,A2 LOGICAL ADDRESS
0x331aa8…331c3c Dummy {f00=0x0103, f01=0x0190, f02=»B AP:360 G P EJECT H > P********************************************************** H > P* * H ` > P* LOAD CONFIGURATION PART OF SYSLOD * H > P* ========================
0x331c3c…331dd0 Dummy {f00=0x0103, f01=0x0190, f02=» * H h > P* * I > P* EXIT: * I > P* * I > P* SUBROUTINES: CASSIN,RDBLK,MOVBUF
0x331dd0…331f64 Dummy {f00=0x0103, f01=0x0190, f02=»************** I d PCONLOD EQU * J * P LD A1,SCTIPL GET PROGRAM LOAD DEVICE J * " P SUK A1,/F0 CHECK DEVICE TYPE J X P RF(NN) CONRAD NOT CASSETTE J ~ P IFT CFTEST+CASS=2 J P* J & P* PROGRAM LOAD DEVICE = CASSETTE J P* J PCON:30 EQU * J
0x331f64…3320f8 Dummy {f00=0x0103, f01=0x0190, f02=» P ST A1,COR:38 MODIFY K P LDR A1,A9 START OF BUFFER K " P ADKL A1,BUFLEN END OF BUFFER K B ( P ST A1,SAVE08,A13 SAVE END OF BUFFER K h P ST A1,SAVE03,A13 SAVE K P CF A14,RDBLK READ ONE BLOCK K " P CF A14,RDBLK READ NEXT BLOCK K P LDR A8,A9 K
0x3320f8…33228c Dummy {f00=0x0103, f01=0x0190, f02=»ETTE K j P CALL CON:40 L P RF TST:10 L PCONEX EQU * L 2 P* L F > P* UNLOAD CASSETTE IF NO APPLICATION DATA ON SAME CASSETTE L P P* L " P CF A14,RDBLK READ NEXT BLOCK L P LDR A1,A1 APPLICATION DATA? L P RF(NZ) CON:80 NO! L P LDK A1,
0x33228c…332420 Dummy {f00=0x0103, f01=0x018e, f02=» A1,/F L " P CF A14,CHCRIO UNLOAD CASSETTE M PCON:90 EQU * M 4 P ABL CONMOV M H P XIF M P IFT CFTEST=1 M h P EJECT M ~ PCONRAD EQU * M P* M 6 P* LOAD CONFIGURATION DATA FROM DISC/FLEXIBLE DISC M P* M * P CF A14,GETFIL GET CONFIGU
0x332420…3325b4 (5, 489) Dummy {f00=0x0104, f01=0x0190, f02=» M j " P LDR A1,A9 GET START OF BUFFER N & P AD A1,SAVCON START OF SAVE BUFFER N . P ST A1,SAVE03,A13 SAVE =2 N X $ P LDKL A10,0 RESET RECORD COUNTER N z P* N 0 P* READ ONE SECTOR FROM RANDOM ACCESS DEVICE N P* N P CALL READC READ SECTOR N
0x3325b4…332748 Dummy {f00=0x0104, f01=0x0190, f02=»L CONRD N P CALL TID O P CALL TEST O " P CALL AA O 4 P CALL CONRD O D P CALL TCL O X P CALL TEST O j P CALL AA O | P CALL CONRD O P CALL LEV O P CALL TEST O P CALL NN1 O PTST:20 CALL CONRD O P CALL NN1 O P CALL
0x332748…3328dc Dummy {f00=0x0104, f01=0x0190, f02=» CALL SUKASC O P CALL TDCT P P CALL TEST P & P CALL NN P 8 P CALL CONRD P H P CALL LC P P CALL TEST P l P CALL NNL P ~ P CALL CONRD P P RB TST:30 P PTST:40 EQU * P P CALL NN1 P P CALL CONRD P PTST:50 EQU * P 8 P LD
0x3328dc…332a70 Dummy {f00=0x0104, f01=0x0190, f02=»SDCS P P CALL TEST Q P CALL NN Q P CALL CONRD Q . P RB TST:50 Q B PTST:60 EQU * Q T P LCR A5,A4 GET CHARACTER Q h $ PTST:70 CCK A5,'TT' BLOCK TYPE T? Q P RB(E) TST:10 YES! Q P LDKL A3,/570C Q * P ST A3,TST:70 MODIFY INSTRUCTION TO RF Q
0x332a70…332c04 Dummy {f00=0x0104, f01=0x0190, f02=» Q P RB TST:20 R PTST:80 EQU * R & P ADK A4,1 INCREMENT BUFFER POINTER R . P LCR A5,A4 GET CHARACTER R X P CCK A5,';;' END OF RECORD R x P ABL(NE) CONERR NO! R PTST:85 EQU * R P CALL CONRD R P RB TST:85 R PCOR:50 EQU * R P LDK
0x332c04…332d98 Dummy {f00=0x0104, f01=0x0190, f02=»NLOCK FLEXIBLE DISC R P* S " P LD A1,SCTIPL GET LOAD DEVICE S & P SUK A1,/F8 CHECK TYPE S L $ P RF(N) COR:60 NOT FLEXIBLE DISC S j P XIF S P IFT CFTEST+FLDISC=2 S " P LD A1,SCTOPT GET OPTION WORD S P ANK A1,2 DISC PAGING? S $ P RF(NZ) CO
0x332d98…332f2c Dummy {f00=0x0104, f01=0x0190, f02=» EX FRD:40 SENSE STATUS S $ P RB(NA) *-4 LOOP UNTIL ACCEPTED T P XIF T H P IFT CFTEST=1 T T PCOR:60 EQU * T j P EJECT T ~ PCONMOV EQU * T P* T 4 P* MOVE CONFIGURATION DATA TO END OF SYSTEM AREA T P* T " P LDR A1,A9 GET START OF BUFF
0x332f2c…3330c0 Dummy {f00=0x0104, f01=0x018e, f02=»T END OF SYSTEM AREA T | * P CM -2,A2 MAKE SURE CONFIGURATION FILE U " P SUK A2,1 IS FOLLOWED BY X'00' U J , P SUR A3,A1 LENGTH OF CONFIGURATION DATA U p P U P SUR A2,A3 TO-ADDRESS U P* U $ P ANKL A2,/FFFE MAKE EVEN ADDRESS U P CALL MOVE U 6
0x3330c0…333254 (5, 490) Dummy {f00=0x0104, f01=0x0190, f02=» $ P SUR A12,A1 SUBTRACT MONITOR END V . P ST A12,M:REL,A13 SAVE RELOCATION CONSTANT V , ( P LD A2,SAVE01,A13 GET START OF CONFF V ^ P* V < P* MOVE SYSLDA+SYSLDM+DWT-PROTOTYPES TO END OF FREE AREA V P* V PMOPRO SUK A1,2 V P SUK A2,2 V P L
0x333254…3333e8 Dummy {f00=0x0104, f01=0x0190, f02=»N,A2 BYPASS SYSLDA V ( P ABR A2 CONTINUE EXECUTION IN SYSLDM W P EJECT W F D P*************************************************************** W T D P* SUROUTINES USED TO TEST THE SYNTAX OF THE CONFIGURATION FILE W D P************************************
0x3333e8…33357c Dummy {f00=0x0104, f01=0x0190, f02=» W 4 P LD A1,SAVE03,A13 GET CURRENT POINTER IN BUFFER X P LDR A2,A1 SAVE X @ & P LDK A3,0 RESET CHARACTER COUNTER X X P LDR A4,A8 START OF RECORD X PCOR:30 EQU * X P LCR A5,A4 GET CHARACTER X P CCK A5,';;' END OF RECORD? X P RF(E) COR:4
0x33357c…333710 Dummy {f00=0x0104, f01=0x0190, f02=»AVE01,A13 MEMORY OVERFLOW? X P RF(E) MEMOFL YES! Y " & P ADK A1,1 INCREMENT BUFFER POINTER Y < * P ADK A3,1 INCREMENT CHARACTER COUNTER Y f & P ADK A4,1 INCREMENT RECORD POINTER Y P RB COR:30 LOOP Y PCOR:40 EQU * Y " P LC A5,1,A4 GET NEXT CHARACTER
0x333710…3338a4 Dummy {f00=0x0104, f01=0x018e, f02=»MICOLON CHARACTER IN RECORD Y | PCOR:45 EQU * Z $ . P ST A1,SAVE03,A13 SAVE CURRENT DESTINATION Z 8 P LDR A1,A8 START OF RECORD Z j P CALL MOVE Z PCOR:48 EQU * Z ( P ADKL A10,1 INCREMENT RECORD COUNTER Z " P CW A10,SAVE20,A13 LAST RECORD Z P RB(
0x3338a4…333a38 Dummy {f00=0x0104, f01=0x0190, f02=» P CALL READC READ SECTOR [ $ PCOR:10 LDR A4,A8 START OF RECORD [ $ P RTN A14 [ L P XIF [ P IFT CFTEST+CASS=2 [ h PCON:40 EQU * [ " P CF A14,RDBLK READ NEXT BLOCK [ P LDR A1,A1 TAPEMARK? [ P ABL(NZ) CONEX YES! [ P LDR A8,A9 [ " P L
0x333a38…333bcc Dummy {f00=0x0104, f01=0x018e, f02=»OVERFLOW [ r P CALL ERROR P EJECT $ PREADC EQU * 2 P CF A14,READS READ SECTOR F PREADS EQU *-2 h P LDR A8,A9 ~ " P LDR A4,A8 GET START OF BUFFER P RTN A14 PT EQU * P LCR A5,A4 GET CHARACTER P CCK A5,'TT' BLOCK
0x333bcc…333d60 Dummy {f00=0x0104, f01=0x0190, f02=» P CCK A5,';;' END OF RECORD? ] P RF(NE) CONERR NO! ] ( P RTN A14 ] B P EJECT ] R PNNL EQU * ] ` P LDK A2,1 ] r P LDK A3,3 ] P RF NN:10 ] PNN EQU * ] P LDK A2,0 ] P LDK A3,3 ] P RF NN:10 ] PNN1 EQU * ] P LDK A3,
0x333d60…333ef4 (5, 491) Dummy {f00=0x0104, f01=0x018e, f02=»> 9? ] p P RF(G) CONERR YES! ^ P SUK A3,1 ^ & P RF(Z) NN:20 ^ 8 ( P CCK A5,/3030 NUMERIC CHARACTER < 0? ^ L P RF(L) CONERR YES! ^ x P RF(Z) NN:15 ^ P LDKL A1,/3030 ^ P RF NN:16 ^ PNN:15 LDKL A1,/3131 ^ PNN:16 ST A1,NN:20+2 MODIFY ^
0x333ef4…334088 Dummy {f00=0x0104, f01=0x0190, f02=» ^ j P RF(L) CONERR YES! _ P SUK A2,1 _ " P RF(NZ) NN:50 _ 4 " P LCR A5,A4 GET NEXT CHARACTER _ J P CCK A5,'LL' LINE L? _ p P RF(E) NN:40 YES! _ P CCK A5,'RR' LINE R? _ P RF(E) NN:40 YES! _ P CCK A5,'AA' LINE A? _ P RF(E) NN:40 YES
0x334088…33421c Dummy {f00=0x0104, f01=0x0190, f02=» _ n P RF NN:50 ` PNN:30 EQU * ` . P ST A5,SAVE13,A13 STORE NUMBER OF CLASSES ` . " PNN:50 LCR A5,A4 GET CHARACTER ` ` P CCK A5,';;' END OF RECORD? ` P RF(NE) CONERR NO! ` P RTN A14 ` P EJECT ` PAA EQU * ` P LDK A3,2 ` PAA:1
0x33421c…3343b0 Dummy {f00=0x0104, f01=0x0190, f02=»9 ALPHA-NUMERIC CHARACTER > 39? ` P RF(NG) AA:20 NO! a ( 0 P CCK A5,/4141 ALPHA-NUMERIC CHARACTER < 41? a B P RF(L) CONERR a v 0 P CCK A5,/5A5A ALPHA-NUMERIC CHARACTER > 5A? a P RF(G) CONERR a PAA:20 EQU * a & P ADK A4,1 INCREMENT BUFFER POI
0x3343b0…334544 Dummy {f00=0x0104, f01=0x018e, f02=»NERR NO! a P RTN A14 b P EJECT b PTID EQU * b . " P LDKL A2,SEQ1 SELECT SEQUENCE b @ & P LDK A3,4 GET NUMBER OF CHARACTERS b f P RTN A14 b PTCL EQU * b " P LDKL A2,SEQ2 SELECT SEQUENCE b & P LDK A3,4 GET NUMBER OF CHARACTERS b P RTN A
0x334544…3346d8 Dummy {f00=0x0104, f01=0x0190, f02=» PTDCT EQU * c " P LDKL A2,SEQ4 SELECT SEQUENCE c & P LDK A3,5 GET NUMBER OF CHARACTERS c < P RTN A14 c f PLC EQU * c v " P LDKL A2,SEQ5 SELECT SEQUENCE c & P LDK A3,3 GET NUMBER OF CHARACTERS c P RTN A14 c PSDCS EQU * c " P LDKL A2,SEQ6 SE
0x3346d8…33486c Dummy {f00=0x0104, f01=0x0190, f02=» c x P CCR A5,A2 d P RF(NE) CONERR d & P ADK A4,1 INCREMENT BUFFER POINTER d 0 ( P ADK A2,1 INCREMENT SEQUENCE POINTER d Z . P SUK A3,1 MORE CHARACTERS IN THE SEQUENCE? d P RB(NZ) TEST YES! d P RTN A14 d P EJECT d PSUKASC EQU * d 2 P CCK
0x33486c…334a00 Dummy {f00=0x0104, f01=0x018e, f02=»E13,A13 STORE NUMBER OF CLASSES d P RTN A14 e ( PCONERR EQU * e 8 ( P LDKL A1,LMP4 INDICATE FORMAT ERROR e L P CALL ERROR e x P EJECT e P* e P* e 6 P************************************************** e 6 P*
0x334a00…334b94 (5, 492) Dummy {f00=0x0104, f01=0x0190, f02=» e 6 P************************************************** f P* f B P* f L P* f V P* f ` PSEQ1 EQU * TID= f j P DATA 'TI' f P DATA 'D=' f PSEQ2 EQU * TCL= f P DATA 'TC' f P DATA 'L=' f PSEQ3 EQU * LEV= f P DATA 'LE' f
0x334b94…334d28 Dummy {f00=0x0104, f01=0x018e, f02=» P DATA '=0' g PSEQ6 EQU * SDC=S g P DATA 'SD' g . P DATA 'C=' g @ P DATA 'S0' g R P XIF g d P IFT CFTCAS+CASS=2 g p P* g & P* PROGRAM LOAD DEVICE = CASSETTE g P* g PCON:30 EQU * g P LDR A1,A9 START OF BUFFER g " P ADKL A1,B
0x334d28…334ebc Dummy {f00=0x0104, f01=0x0190, f02=» " P CF A14,RDBLK READ NEXT BLOCK h P LDR A1,A1 TAPEMARK? h * P RF(Z) CON:50 NO! h F . P CF A14,CASSIN INIT CONFIGURATION CASSETTE h ` PCON:40 EQU * h " P CF A14,RDBLK READ NEXT BLOCK h P LDR A1,A1 TAPEMARK? h P RF(NZ) CONEX YES! h PCON:50
0x334ebc…335050 Dummy {f00=0x0104, f01=0x0190, f02=» h ` P LDR A2,A1 SAVE i & P LDK A3,0 RESET CHARACTER COUNTER i $ P LDR A4,A9 GET SAVE09 OF BUFFER i J PCON:60 EQU * i r & P LCR A5,A4 GET CHARACTER IN BUFFER i P CCK A5,';;' CHECK IF SPACE i & P RF(E) CON:70 NO MOORE CHARACTERS i PCON:65 EQU
0x335050…3351e4 Dummy {f00=0x0104, f01=0x018e, f02=» , P ADK A1,1 INCREMENT DESTINATION POINTER j * P ADK A3,1 INCREMENT CHARACTER COUNTER j 4 & P ADK A4,1 INCREMENT BUFFER POINTER j b P RB CON:60 j PCON:70 EQU * j " P LC A5,1,A4 GET NEXT CHARACTER j " P CCK A5,';;' TWO SEMI-COLONS? j P RF(NE) CO
0x3351e4…335378 Dummy {f00=0x0104, f01=0x0190, f02=» . P ST A1,SAVE03,A13 SAVE CURRENT DESTINATION k $ P LDR A1,A9 GET SAVE09 OF BUFFER k 6 P CALL MOVE k ^ P RB CON:40 k p PCONEX EQU * k P* k > P* UNLOAD CASSETTE IF NO APPLICATION DATA ON SAME CASSETTE k P* k " P CF A14,RDBLK READ NEXT BLOC
0x335378…33550c Dummy {f00=0x0104, f01=0x0190, f02=» CF A14,RDBLK BYPASS TAPEMARK k P RF CON:90 l & PCON:80 EQU * l 8 P LDK A1,/F l L " P CF A14,CHCRIO UNLOAD CASSETTE l ^ PCON:90 EQU * l P ABL CONMOV l P XIF l P IFF CFTEST=1 l PMEMOFL EQU * l * P LDKL A1,LMP3 INDICATE MEMORY OVERFLOW
0x33550c…3356a0 Dummy {f00=0x0104, f01=0x0190, f02=» * P CF A14,GETFIL GET CONFIGURATION FILE m " P LDR A1,A9 GET START OF BUFFER m 2 $ P ADKL A1,BUFLEN-6 END OF BUFFER m X ( P ST A1,SAVE08,A13 SAVE END OF BUFFER m " P LDR A1,A9 GET START OF BUFFER m & P AD A1,SAVCON START OF SAVE BUFFER m P ST A1,SAVE0
0x3356a0…335834 (5, 493) Dummy {f00=0x0105, f01=0x0190, f02=» m d P* n P CF A14,READS READ SECTOR n PREADS EQU *-2 n 4 " P LDR A8,A9 GET START OF BUFFER n J PCOR:20 EQU * n p P* n 2 P* COMPUTE NUMBER OF CHARACTERS IN THIS RECORD n P* n 4 P LD A1,SAVE03,A13 GET CURRENT POINTER IN BUFFER n P L
0x335834…3359c8 Dummy {f00=0x0105, f01=0x0190, f02=»RACTER n ~ P CCK A5,';;' END OF RECORD? o P RF(E) COR:40 YES! o 2 PCOR:35 EQU * o L * P CWK A3,RECLEN MAXIMUM SIZE ACHIEVED? o ` P RF(E) COR:40 YES! o & P CW A1,SAVE01,A13 MEMORY OVERFLOW? o P RB(E) MEMOFL YES! o & P ADK A1,1 INCREMENT BUFFER P
0x3359c8…335b5c Dummy {f00=0x0105, f01=0x0190, f02=» * o " P LC A5,1,A4 GET NEXT CHARACTER p P CCK A5,';;' TWO SEMICOLONS? p 0 P RF(NE) COR:45 NO! p T * P CWK A3,NCHTID CHECK IF END OF RECORD p n 4 P RB(E) COR:35 NO: SEMICOLON CHARACTER IN RECORD p PCOR:45 EQU * p . P ST A1,SAVE03,A13 SAVE CURRENT D
0x335b5c…335cf0 Dummy {f00=0x0105, f01=0x0190, f02=»T RECORD p z P RF(E) COR:50 YES! q . P ADKL A8,RECLEN+1 INCREMENT RECORD POINTER q * $ P CW A8,SAVE08,A13 END OF BUFFER q P RB(E) COR:10 NEXT SECTOR q P RB COR:20 NEXT RECORD q PCOR:50 EQU * q P LDK A3,'S' q & P SC A3,GET:25+1 MODIFY INSTR
0x335cf0…335e84 Dummy {f00=0x0105, f01=0x0190, f02=»,SCTIPL GET LOAD DEVICE q P SUK A1,/F8 CHECK TYPE r $ P RF(N) COR:60 NOT FLEXIBLE DISC r > P XIF r f P IFT CFTFLD+FLDISC=2 r r " P LD A1,SCTOPT GET OPTION WORD r P ANK A1,2 DISC PAGING? r $ P RF(NZ) COR:60 YES; DON'T UNLOCK r P LDK A1,/C UNL
0x335e84…336018 Dummy {f00=0x0105, f01=0x0190, f02=»LOOP UNTIL ACCEPTED r P XIF s P IFF CFTEST=1 s ( PCOR:60 EQU * s > P EJECT s R PCONMOV EQU * s ` P* s t 4 P* MOVE CONFIGURATION DATA TO END OF SYSTEM AREA s ~ P* s " P LDR A1,A9 GET START OF BUFFER s ( P AD A1,SAVCON COMPUTE END OF BUFFE
0x336018…3361ac Dummy {f00=0x0105, f01=0x0190, f02=»URE CONFIGURATION FILE s " P SUK A2,1 IS FOLLOWED BY X'00' t , P SUR A3,A1 LENGTH OF CONFIGURATION DATA t D P t t P SUR A2,A3 TO-ADDRESS t | P* t $ P ANKL A2,/FFFE MAKE EVEN ADDRESS t P CALL MOVE t 6 P ST A2,SAVE01,A13 SAVE START OF CONFIGURAT
0x3361ac…336340 Dummy {f00=0x0105, f01=0x0190, f02=»T A12,M:REL,A13 SAVE RELOCATION CONSTANT t ( P LD A2,SAVE01,A13 GET START OF CONFF u 0 P* u < P* MOVE SYSLDA+SYSLDM+DWT-PROTOTYPES TO END OF FREE AREA u f P* u PMOPRO SUK A1,2 u P SUK A2,2 u P LDR* A4,A1 u P STR A4,A2 u P CWR A1,A1
0x336340…3364d4 (5, 494) Dummy {f00=0x0105, f01=0x0190, f02=»CUTION IN SYSLDM u | P XIF v P EJECT v $ L P************************************************************************ v 2 L P* SUBROUTINES USED IN THE APPLICATION AND CONFIGURATION LOADING PHASE O v L P******************************************************
0x3364d4…336668 Dummy {f00=0x0105, f01=0x0190, f02=»* v r $ P* * w $ P* ENTRY: * w 2 $ P* * w Z $ P* EXIT: A1 - SOP INPUT * w $ P* BIT 6 - SWITCH 1 * w $ P* BIT 15 - SWITCH 10 * w $ P*
0x336668…3367fc Dummy {f00=0x0105, f01=0x0190, f02=»* w r $ P* * x $ P******************************* x 2 PSOPIN EQU * x Z P CIO A1,1,SOP x n P INR A1,0,SOP x P RB(NA) *-2 x P RTN A14 x P IFT CASS=1 x P EJECT x < P****************************************
0x3367fc…336990 Dummy {f00=0x0105, f01=0x0190, f02=» * x ` < P* * y < P* REFERENCED IN: SYSLOD -LOADING PART- * y P < P* * y < P* ENTRY: *
0x336990…336b24 Dummy {f00=0x0105, f01=0x0190, f02=»* * y < P* WORK REGISTERS: A1,A3 * z @ < P* * z < P* SUBROUTINES: SOPIN,CHCRIO * z < P*
0x336b24…336cb8 Dummy {f00=0x0105, f01=0x0190, f02=» P LDK A1,/F { " P CF A14,CHCRIO UNLOAD CASSETTE { 2 P LDKL A3,LMP1+LMP2 INDICATE EXPECTED SWITCHES { < P OTR A3,0,SOP { r PCAS:10 EQU * { P CF A14,SOPIN READ SOP { $ P ANKL A1,/0300 ALLOWED SWITCHES? { P RB(Z) CAS:10 NO! { & P LDKL A3,LMP
0x336cb8…336e4c Dummy {f00=0x0105, f01=0x018e, f02=»IT { x P LDK A1,LOCK | P CF A14,CHCRIO LOCK CASSETTE | P ANK A3,1 CASSETTE OPERABLE? | B P RB(NZ) CAS:10 NO! | f P LDK A1,SBOT | , P CF A14,CHCRIO SEARCH BEGINNING OF TAPE | P LDK A1,STMF | * P CF A14,CHCRIO SEARCH TAPEMARK FORWARD | P
0x336e4c…336fe0 Dummy {f00=0x0105, f01=0x0190, f02=» 2 P* ======================================= * } 2 P* * } : 2 P* REFERENCED IN: CASSIN,SYSLOD * } p 2 P* * } 2 P* ENTRY: A1 - I/O INSTRUCTION COMMAND
0x336fe0…337174 (5, 495) Dummy {f00=0x0105, f01=0x018e, f02=» * } ~ 2 P* WORK REGISTERS: A1,A3 * ~ $ 2 P* * ~ Z 2 P* SUBROUTINES: * ~ 2 P* * ~ 2 P************
0x337174…337308 Dummy {f00=0x0105, f01=0x0190, f02=» ~ P EJECT 6 P************************************************** 6 P* * P 6 P* RDBLK - READ ONE CASSETTE BLOCK * 6 P* =============================== * 6 P*
0x337308…33749c Dummy {f00=0x0105, f01=0x0190, f02=» * r 6 P* ENTRY: A9 - CASSETTE BUFFER POINTER * 6 P* * V 6 P* EXIT: A2 - NUMBER OF CHARACTERS IN BLOCK * 6 P* * : P* W
0x33749c…337630 Dummy {f00=0x0105, f01=0x018e, f02=» * | 6 P************************************************** & PRDBLK EQU * ` P LDK A5,0 t PRDB:10 EQU * P LDR A3,A9 SAVE09 OF BUFFER & P LDK A2,0 RESET CHARACTER COUNTER $ P LDR A4,A3 SAVE SAVE09 OF BUFFER
0x337630…3377c4 Dummy {f00=0x0105, f01=0x0190, f02=» P INR A1,0,CHCR P RF(NA) RDB:30 P CWR A4,A3 END OF BUFFER? 0 P RF(E) RDERR YES! R P SCR A1,A4 STORE CHARACTER l * P ADK A2,1 INCREMENT CHARACTER COUNTER & P ADK A4,1 INCREMENT BUFFER POINTER PRDB:30 EQU * P SST A1,CHCR
0x3377c4…337958 Dummy {f00=0x0105, f01=0x0190, f02=»IF TAPEMARK P RF(N) RDBEX OK IF TAPEMARK PRDERR EQU * 8 P* L < P* READ ERROR HAS OCCURRED: MAKE ANOTHER ATTEMPT TO READ V > P* THE SAME BLOCK IF NOT 3 ATTEMPTS ALREADY HAS BEEN MADE P* P ADK A5,1 NEXT ATTEMPT P CWK A5,
0x337958…337aec Dummy {f00=0x0105, f01=0x0190, f02=»NA) *-2 LOOP UNTIL ACCEPTED P RB RDB:10 $ PRDERR3 EQU * 6 P LDKL A1,LMP2 J P CALL ERROR ` PRDBEX EQU * t P RTN A14 P XIF P IFT DISC=1 P EJECT ( #*********************************** ( #*
0x337aec…337c80 Dummy {f00=0x0105, f01=0x0190, f02=» * v ( #* REFERENCED IN: SYSLOD,GETFIL * ( #* * > ( #* ENTRY: A1 - DEVICE ADDRESS * j ( #* * ( #* EXIT: * ( #*
0x337c80…337e14 (5, 496) Dummy {f00=0x0105, f01=0x0190, f02=» * t ( #* * ( #*********************************** < P h DUINIT EQU * p P LC A2,SCTSFA+2 GET FORMAT P ANK A2,/FF P SUK A2,2 SELECT FORMAT P RF(Z) DUI:20 FORMAT A2 P SUK A2,1
0x337e14…337fa8 Dummy {f00=0x0105, f01=0x0190, f02=» $ P* INIT DISC COMMANDS VERSION A2 P* 0 P ADS A1,SEEK20 : P ADS A1,SEEK21 P P ADS A1,READ21 f P ADS A1,READ22 | P P RF DUI:40 0 PDUI:30 LDKL A2,RDSEC3 GET SUBROUTINE ADDRESS P* $ P* INIT DISC COMMANDS VERSION A
0x337fa8…33813c Dummy {f00=0x0105, f01=0x0190, f02=»DS A1,READ30 P ADS A1,READ31 * * * INIT SUBROUTINE ADDRESSES 4 * X PDUI:40 EQU * =2 b ST A2,READ READ PROGRAM z ( $ ST A2,READS READ CONFIGURATION DATA $ ST A2,READVL READ VOLUME LABEL * % ST A2,READCF READ CONFIGU
0x33813c…3382d0 Dummy {f00=0x0105, f01=0x0190, f02=» * r 4 /* RDSEC - READ ONE SECTOR FROM DISC * 4 /* ================================= * R 4 /* * 4 /* REFERENCED IN: SYSLOD * 4 /*
0x3382d0…338464 Dummy {f00=0x0105, f01=0x0190, f02=»* A11 - SECTOR NUMBER * 4 /* * 8 4 /* EXIT: * p 4 /* * ( P* WORK REGISTERS: A1,A2,A3,A4,A7
0x338464…3385f8 Dummy {f00=0x0105, f01=0x0190, f02=» * | 4 /*********************************************** $ P* P EJECT f P* t " P* READ DISC SECTOR VERSION A2 ~ P* PRDSEC2 EQU * P LDK A2,0 * P LDR A1,A11 GET LOGICAL SECTOR NUMBER PDIV200
0x3385f8…33878c Dummy {f00=0x0105, f01=0x0190, f02=»RL A2,5 P SUR A1,A2 P SUR A1,A11 " P ADK A1,31 6 * P RF(P) DIV210 NO CORRECTION OF RESULT H P ADK A2,1 v PDIV210 EQU * . P LDR A2,A2 A2:=CYL NBR = LOG SEC NBR / 31 P RF(Z) DIV220 CYLINDER 0 P ADK A2,1 PDIV220 E
0x33878c…338920 Dummy {f00=0x0105, f01=0x0190, f02=» RF(E) INT200 SAME CYLINDER NUMBER P ST A1,CYLNBR * P SLL A1,3 @ P ORK A1,2 SET BIT 14 R P EJECT n P* | P* SEEK CYLINDER P* PSEEK20 CIO A1,1,0 P RB(NA) SEEK20 P* PSEEK21 SST A1,0 P RB(NA) SEEK21
0x338920…338ab4 (5, 497) Dummy {f00=0x0106, f01=0x0190, f02=»3 r P ANK A2,/1F & P LD A1,CYLNBR GET CYLINDER NUMBER P ANK A1,1 H P RF(Z) INT210 EVEN CYLINDER Z P ADK A2,8 ~ PINT210 EQU * P ANK A2,/1F , P SLL A2,2 PHYSICAL SECTOR AND ORDER CODE P ST A2,SECNBR P EJECT
0x338ab4…338c48 Dummy {f00=0x0106, f01=0x0190, f02=»4,/10 WRITE NUMBER OF WORDS $ P WER A1,/11 WRITE BUFFER ADDRESS $ " PREAD21 CIO A2,1,0 READ SECTOR L & P RB(NA) READ21 LOOP UNTIL ACCEPTED r PREAD22 SST A2,0 STATUS & P RB(NA) READ22 LOOP UNTIL ACCEPTED P ANK A2,/1F STATUS * P RB(NZ) RD
0x338c48…338ddc Dummy {f00=0x0106, f01=0x0190, f02=»OR VERSION A3 P* PRDSEC3 EQU * P LDK A2,0 4 * P LDR A1,A11 GET LOGICAL SECTOR NUMBER F P LDKL A7,/1000 t P LDKL A4,/3000 PDIV300 EQU * P SUR A1,A4 P RF(N) DIV310 P ADR A2,A7 P RB DIV300 PDIV310 E
0x338ddc…338f70 Dummy {f00=0x0106, f01=0x018e, f02=» A1,1 P ST A1,SAVMEM 6 P RF(NP) CASE10 ,XXXX , , OR , XX,XX , $ P ADK A2,1 , , XXXX, ^ PCASE10 EQU * P LDR A4,A2 P SRL A4,5 P CW A4,CYLNBR P RF(E) INT300 , P ST A4,CYLNBR STORE NEW CYLINDER NUM
0x338f70…339104 Dummy {f00=0x0106, f01=0x0190, f02=» | P RB(NA) SEEK30 P* PSEEK31 SST A4,0 GET STATUS ( P RB(NA) SEEK31 J P* ` P* INTERLACING j P* PINT300 EQU * P LDR A3,A2 P ADR A2,A2 $ P ADR A2,A3 INTERLACING FACTOR 3 P ANK A2,/1F & P LD A4,CYL
0x339104…339298 Dummy {f00=0x0106, f01=0x0190, f02=» PINT310 EQU * P ANK A2,/1F & P SLL A2,2 INTERLACED SECTOR NUMBER , . P ST A2,SECNBR STORE PHYSICAL SECTOR NUMBER V P EJECT P* P* READ SECTOR P* P LDR A7,A9 BUFFER ADDRESS * PREAD34 LDKL A4,MXCCD3 NUMBER OF WORDS
0x339298…33942c Dummy {f00=0x0106, f01=0x0190, f02=» r & P RB(NA) READ30 LOOP UNTIL ACCEPTED P* 2 PREAD31 SST A2,0 GET STATUS < & P RB(NA) READ31 LOOP UNTIL ACCEPTED ^ P ANK A2,/1F STATUS * P RB(NZ) RDSEC3 LOOP UNTIL CORRECT READ P LDR A2,A9 BUFFER ADDRESS P LDR A1,A1 " P RF(
0x33942c…3395c0 Dummy {f00=0x0106, f01=0x0190, f02=»O MOVE t PREAD32 EQU * , XX,XX , P LDR* A1,A2 2 P STR A1,A7 F P ADK A2,2 X P ADK A7,2 j P SUK A4,1 | " P RB(NZ) READ32 CONTINUE MOVING P LD A1,SAVMEM P RF(P) RETURN ( P LD A2,SECNBR PHYSICAL SECTOR NUMBER
0x3395c0…339754 (5, 498) Dummy {f00=0x0106, f01=0x0190, f02=» A2,128 SOURCE POINTER ( P LDK A4,128 NUMBER OF WORDS TO MOVE P RB READ32 J . PRETURN ADKL A11,1 INCREMENT SECTOR NUMBER P RTN A14 P XIF P IFT MFDISC=1 P EJECT < P********************************************************
0x339754…3398e8 Dummy {f00=0x0106, f01=0x0190, f02=» ======================================= * < P* * > < P* REFERENCED IN: SYSLOD,GETFIL * ~ < P* * < P* ENTRY:
0x3398e8…339a7c Dummy {f00=0x0106, f01=0x0190, f02=» * ~ < P* * . < P* WORK REGISTERS: * n < P* * < P* SUBROUTINES: ERROR
0x339a7c…339c10 Dummy {f00=0x0106, f01=0x0190, f02=»********************** n PMDINIT EQU * P* 2 $ P* INIT MINI FIXED DISC COMMANDS < P* d PMDI:00 ADS A1,SEEKM1 n P ADS A1,SEEKM2 P ADS A1,READM2 P ADS A1,READM3 P EJECT P* * P LDKL A2,MRDSEC GET SUBROUTINE ADDRE
0x339c10…339da4 Dummy {f00=0x0106, f01=0x0190, f02=»****************************************** : P* * 2 : P* MRDSEC - READ ONE SECTOR FROM MINI FIXED DISC * p : P* ============================================= * : P*
0x339da4…339f38 Dummy {f00=0x0106, f01=0x0190, f02=» * h : P* ENTRY: A9 = BUFFER ADDRESS * : P* A11 = SECTOR NUMBER * T : P* * : P* EXIT: *
0x339f38…33a0cc Dummy {f00=0x0106, f01=0x0190, f02=» * : P* SUBROUTINES: * 8 : P* * v : P***************************************************** PMRDSEC EQU * " P L
0x33a0cc…33a260 Dummy {f00=0x0106, f01=0x0190, f02=»2,3 SET BIT 14 AND 15 P* " P* A1=SECTOR NUMBER ON CYLINDER ( P* A2=CYLINDER NUMBER N P* j & P ST A1,SECNBR STORE SECTOR NUMBER t P CW A2,CYLNBR & P RF(E) INTM10 SAME CYLINDER NUMBER ( P ST A2,CYLNBR STORE CYLINDER NUMBER
0x33a260…33a3f4 (5, 499) Dummy {f00=0x0106, f01=0x0190, f02=» P* PSEEKM2 SST A2,0 GET STATUS & P RB(NA) SEEKM2 WAIT UNTIL ACCEPTED 0 P* Z P* INTERLACING d P* z PINTM10 EQU * P CWK A1,52 P RF(L) INTM20 SECTOR 0-51 P SUK A1,52 SECTOR 52-103 PINTM20 EQU * P LDR A2,
0x33a3f4…33a588 Dummy {f00=0x0106, f01=0x0190, f02=»UMBER n P* " P* A1:=INTERLACED SECTOR NUMBER P* > & P LD A2,CYLNBR GET CYLINDER NUMBER H P SRC A2,3 r ( P RF(NN) INTM30 EVEN CYLINDER NUMBER P SUK A1,26 SKEW FACTOR 26 P RF(NN) INTM30 P ADK A1,52 PINTM30 EQU *
0x33a588…33a71c Dummy {f00=0x0106, f01=0x0190, f02=» ORKL A1,/4000 HEAD NUMBER 1 PINTM40 EQU * $ P* 8 P* READ SECTOR B P* X PREADM1 EQU * b " P LDKL A4,MUXCC NUMBER OF WORDS v P LDR A7,A9 BUFFER ADDRESS P* * PWERIOM WER A4,8 WRITE NUMBER OF WORDS " P WER A7,9 WRITE BU
0x33a71c…33a8b0 Dummy {f00=0x0106, f01=0x0190, f02=»GET STATUS & P RB(NA) READM3 LOOP UNTIL ACCEPTED P ANK A1,/1F STATUS < * P RB(NZ) MRDSEC LOOP UNTIL CORRECT READ V ( P ADKL A11,1 INCREMENT SECTOR NUMBER P RTN A14 P XIF P IFT FLDISC=1 EJECT 4 0************************
0x33a8b0…33aa44 Dummy {f00=0x0106, f01=0x0190, f02=» ` 4 0* ================================= * 4 0* * @ 4 0* REFERENCED IN: SYSLOD,GETFIL * x 4 0* * 4 0* ENTRY: A1 - DEVICE ADDRESS
0x33aa44…33abd8 Dummy {f00=0x0106, f01=0x018e, f02=»* * 4 0* WORK REGISTERS: * 8 4 0* * p 4 0* SUBROUTINES: * 4 0*
0x33abd8…33ad6c Dummy {f00=0x0106, f01=0x018e, f02=» ST A2,READ STORE ST A2,READS ST A2,READVL 2 ST A2,READCF H * ^ " * INIT FLEXIBLE DISC COMMANDS h * , ' ORS A1,FRD:10 MODIFY READ SECTOR ORDER ANK A1,8 PROGRAMMED CHANNEL RF(NZ) FDI:10 YES! , P
0x33ad6c…33af00 Dummy {f00=0x0106, f01=0x0190, f02=» FDI:10 EQU * LDK A1,/14 LOCK ORDER EX FRD:10 EXECUTE ORDER 6 $ RB(NA) *-4 LOOP UNTIL ACCEPTED V SST A1,FDCU SENSE STATUS ~ RB(NA) *-2 & ! ANK A1,1 FLEXIBLE DISC OPERABLE? RB(NZ) FDI:10 NO! RTN A14
0x33af00…33b094 (5, 500) Dummy {f00=0x0106, f01=0x0190, f02=» * Z @ ;* FRDSEC - READ SECTOR FROM FLEXIBLE DISC * @ ;* ======================================= * R @ ;* * @ ;* REFERENCED IN: SYSLOD
0x33b094…33b228 Dummy {f00=0x0106, f01=0x0190, f02=» * b @ ;* A11 - SECTOR NUMBER * @ ;* * Z @ ;* EXIT: * @ ;*
0x33b228…33b3bc Dummy {f00=0x0106, f01=0x0190, f02=» * j @ ;* SUBROUTINES: ERROR * @ ;* * b @ ;*********************************************************** FRDSEC EQU * " LDR A1,A1
0x33b3bc…33b550 Dummy {f00=0x0106, f01=0x0190, f02=» WORD v & ! WER A2,FDIOP WRITE 1:ST MUX WORD ( # WER A3,FDIOP+1 WRITE 2:ND MUX WORD 8 $ P LDR A2,A3 BUFFER START ADDRESS d $ P AD A2,SAVCON BUFFER END ADDRESS $ FRD:10 CIO A1,1,FDCU START READ & " RB(NA) FRD:10 LOOP UNTIL ACCEPTED 4 /FR
0x33b550…33b6e4 Dummy {f00=0x0106, f01=0x0190, f02=»3,2 INCREMENT BUFFER POINTER P CWR A3,A2 $ P RB(NE) FRD:20 6 P* L " PFRD:25 CIO A1,0,FDCU STOP READ V P RB FRD:20 | $ FRD:40 SST A1,FDCU SENSE STATUS & " RB(NA) FRD:20 LOOP UNTIL ACCEPTED P ANKL A1,/4E15 FATAL ERROR? RF(
0x33b6e4…33b878 Dummy {f00=0x0106, f01=0x0190, f02=» 8 P ADKL A12,1 INCREMENT MOST SIGNIFICANT PART OF D.A. & P RF(O) FRD:50 DISC ADDRESS ERROR! @ PFRD:45 EQU * j RTN A14 ~ FRD:50 LDKL A1,LMP2 CALL ERROR P XIF EJECT 8 3************************************************
0x33b878…33ba0c Dummy {f00=0x0106, f01=0x0190, f02=» =============================== * 8 3* * 8 8 3* REFERENCED IN: SYSLOD * t 8 3* * 8 P* ENTRY: A9 - BUFFER ADDRE
0x33ba0c…33bba0 Dummy {f00=0x0106, f01=0x0190, f02=» * d 8 3* * 6 P* WORK REGISTERS: A1,A2,A3,A4,A5,A6,A7,A8,A10 * L 8 3* * 8 3* SUBROUTINES: READVL,READCF * 8 3*
0x33bba0…33bd34 (5, 501) Dummy {f00=0x0107, f01=0x0190, f02=»A11,0 VOLUME LABEL $ CF A14,READVL GET VOLUME LABEL READVL EQU *-2 B LD A10,10,A9 GET VTOC BASE X LDR A11,A10 SAVE | " AD A10,6,A9 LAST VTOC SECTOR ( # LD A8,12,A9 GET VTOC RECORD LENGTH * % ADKL A11,1 FIRST FILE SECTOR IN
0x33bd34…33bec8 Dummy {f00=0x0107, f01=0x0190, f02=»A9 GET START OF BUFFER GET:20 EQU * P LDK A5,/20 LOAD SPACE 2 P CCR A5,A6 UNUSED FILE? P P RF(E) GET:50 YES! p LDR A4,A6 START OF RECORD ( P LDK A5,'S' STANDARD FILE CHARACTER CC A5,27,A6 STANDARD FILE? RF(NE) GET:
0x33bec8…33c05c Dummy {f00=0x0107, f01=0x0190, f02=»3,'C' THIS INSTRUCTION IS MODIFIED ( P CCK A3,'CC' LOOKING FOR CONF. FILE? * P RF(NE) GET:85 NO! V ADK A4,5 SIXTH CHARACTER p , P LDK A5,':' CHARACTER TO PRECEED NUMBER ( $GET:30 CCR A5,A4 CONFIGURATION FILE? RF(E) GET:40 YES!
0x33c05c…33c1f0 Dummy {f00=0x0107, f01=0x0190, f02=» * CHECK APPLICATION NUMBER * , LC A5,1,A4 GET LEFT DIGIT 6 SLL A5,8 SHIFT TO LEFT BYTE X LC A5,2,A4 GET RIGHT DIGIT | " CALL CONVRT CONVERT TO BINARY , ( CW A1,SCTANO SAME AS APPLICATION NUMBER RF(NE) GET:50
0x33c1f0…33c384 Dummy {f00=0x0107, f01=0x018e, f02=»1,18,A6 SECTOR ADDRESS RTN A14 GET:50 EQU * . ADR A6,A8 NEXT VTOC RECORD B & ! ADK A6,1 BYPASS STATUS CHARACTER f , ' SUK A7,1 MOORE RECORDS IN THIS SECTOR? RB(P) GET:20 YES! " CWR A11,A10 LAST VTOC SECTOR? RB(NE)
0x33c384…33c518 Dummy {f00=0x0107, f01=0x0190, f02=» | * : 6* CONFIGURATION FILE NOT FOUND - READ SOP AND SELECT * %* LOAD MEDIUM FOR CONFIGURATION FILE P * ~ P LDK A2,/78 & ! OTR A2,0,SOP SWITCH ON SOP LAMPS GET:70 EQU * CF A14,SOPIN " P ANKL A1,/003C ALLOWED S
0x33c518…33c6ac Dummy {f00=0x0107, f01=0x0190, f02=»A2 GET DEVICE ADDRESS CWK A2,5 DISC? RF(G) GET:80 YES! 6 P IFT FLDISC=1 P & ! CF A14,FDINIT INIT FLEXIBLE DISC f RB GETFIL P XIF P IFF FLDISC=1 P LDKL A1,LMP9 & P CALL ERROR ILLEGAL MONITOR OPTION P XIF
0x33c6ac…33c840 Dummy {f00=0x0107, f01=0x0190, f02=»A1,LMP9 & P CALL ERROR ILLEGAL MONITOR OPTION P XIF : PGET:85 EQU * F $ P CCK A3,'SS' LOOKING FOR $SWAPP? Z P RF(NE) GET:99 NO! & P LDK A5,0 RESET CHARACTER COUNTER * PGET:90 LCR A1,A4 GET CHAR IN FILENAME . P CC A1,SWPTAB,A5 CHE
0x33c840…33c9d4 (5, 502) Dummy {f00=0x0107, f01=0x0190, f02=»WK A5,8 ALL CHARACTERS CHECKED? P RB(NE) GET:90 NO! ( P* B : P* SWAPPABLE WORK BLOCK FILE FOUND - SAVE DISC ADDRESS L , P* TO FILE AND TO NEXT SECTOR AFTER FILE P* & P IM SCTSWB INDICATE SWB-FILE FOUND & P LD A1,18,A6 GET BIT 16-31
0x33c9d4…33cb68 Dummy {f00=0x0107, f01=0x0190, f02=»ET BIT 16-31 OF LENGTH ~ . P LD A4,SWPFEL-2,A6 GET BIT 0-15 OF LENGTH ( P ADR A4,A2 ADD MOST SIGNIFICANT PART P * P ADR A3,A1 ADD LEAST SIGNIFICANT PART | & P RF(O) GET:92 OVERFLOW - ADD CARRY P RF GET:98 PGET:92 ADK A4,1 ADD CARRY " P
0x33cb68…33ccfc Dummy {f00=0x0107, f01=0x0190, f02=» PGET:99 RTN A14 P EJECT : P***************************************************** ( : P* * f : P* LODCOM - LOAD CORE RESIDENT PART OF APPLICATION * : P* ===================================
0x33ccfc…33ce90 Dummy {f00=0x0107, f01=0x0190, f02=» * ^ : P* ========================= * : P* * J : P* ENTRY: A8 - RELOCATION BASE * : P* A10 - EFFECTIVE LENGTH * : P*
0x33ce90…33d024 Dummy {f00=0x0107, f01=0x0190, f02=» * : P* WORK REGISTERS: A1,A2,A3,A4,A7 * . : P* * l : P* SUBROUTINES: MOVE,READ * : P*
0x33d024…33d1b8 Dummy {f00=0x0107, f01=0x0190, f02=» BUFFER x P LDR A2,A3 SAVE & P LDKL A7,240 NUMBER OF CODE WORDS ( PLOD:10 EQU *-2 R P LDR A10,A10 APP >32 KB? h P RF(NN) LOD:20 NO! P SUR A10,A7 DEC. LENGTH P RF LOD:50 PLOD:20 EQU * . P SUR A10,A7 CHECK IF IN END OF O
0x33d1b8…33d34c Dummy {f00=0x0107, f01=0x0190, f02=»ER OF CODE WORDS x ( P LDKL A10,0 INDICATE END OF SEGMENT P RF LOD:52 D PLOD:30 EQU * V 2 P ADR A7,A10 JUST MOVE SIGNIFICANT CHARACTERS! j ( P LDKL A10,0 INDICATE END OF SEGMENT PLOD:50 EQU * " P CWK A7,256 128 WORDS/SECTOR? P R
0x33d34c…33d4e0 Dummy {f00=0x0107, f01=0x0190, f02=»F CODE PART ~ * P LD A4,SAVE12,A13 FIRST SECTOR/BLOCK? P RF(NZ) LOD:55 NO! B 2 P IM SAVE12,A13 INDICATE NOT FIRST SECTOR/BLOCK 0 P ADK A1,8 SKIP 4 WORDS IN FIRST SECTOR/BLOCK 0 P SUK A7,8 DECREMENT NUMBER OF CHAR. TO MOVE P LD A3,COMLG,A
0x33d4e0…33d674 (5, 503) Dummy {f00=0x0107, f01=0x0190, f02=» LOD:55 YES! PLOD:54 ADKL A10,8 PLOD:55 EQU * . , P LDR A3,A7 NUMBER OF CHARACTERS TO MOVE B $ P LD A2,SAVE07,A13 GET TO-ADDRESS r , P ADS A3,SAVE07,A13 UPDATE MEMORY ADDRESS " P LD A4,SCTOPT GET OPTION WORD P ANK A4,1 MMU IN SYSTEM?
0x33d674…33d808 Dummy {f00=0x0107, f01=0x018e, f02=» EQU * P LDR A10,A10 END OF SEGMENT? P RF(NZ) LOD:70 2 P RTN A14 EXIT H PLODSEG EQU * ^ ( P LDKL A1,256 NUMBER OF WORDS/SECTOR r $ P ST A1,LOD:10 MODIFY INSTRUCTION PLOD:70 EQU * P CF A14,READ PREAD EQU *-2 P RB LO
0x33d808…33d99c Dummy {f00=0x0107, f01=0x0190, f02=» 6 P* REBUF - RELOCATE BUFFER ROUTINE * 6 P* =============================== * B 6 P* * | 6 P* REFERENCED IN: LODCOM/LODSEG * 6 P*
0x33d99c…33db30 Dummy {f00=0x0107, f01=0x0190, f02=» * d 6 P* * 6 P* EXIT: * H 6 P* * 6 P* WORK REGISTERS: A1,A4,A5,A6 * 6 P*
0x33db30…33dcc4 Dummy {f00=0x0107, f01=0x0190, f02=» * j 6 P************************************************* PREBUF EQU * N . P LDR A4,A2 GET SAVE09 OPF RELOCATION TABLE b P SUK A4,2 PREB:10 EQU * " P ADK A4,2 NEXT RELOCATION WORD ( P LDK A6,16 NUMBER OF RELOCATION BITS
0x33dcc4…33de58 Dummy {f00=0x0107, f01=0x0190, f02=»D x P ADR A5,A8 RELOCATE P STR A5,A3 STORE IT BACK & PREB:30 EQU * F P ADK A3,2 NEXT CODE WORD Z & P CWR A3,A2 END OF CODE WORD PART? z P RF(E) EXREL YES! $ P SUK A6,1 MOORE RELOCATION BITS? P RB(Z) REB:10 NO! " P SLL A1,
0x33de58…33dfec Dummy {f00=0x0107, f01=0x0190, f02=»*** j . )* GETCON - GET CONTENT IN MEMORY WORD * . )***************************************** > * p * REFERENCED IN: SEGGEN z * " * ENTRY: A2 - MEMORY ADDRESS . )* MMUOPT - MMU OPTION SWITCH (X) * , (
0x33dfec…33e180 Dummy {f00=0x0107, f01=0x40fa, f02=»QU * " P LD A1,SCTOPT GET OPTION WORD P ANK A1,1 MMU OPTION 2 P RF(Z) GCON10 NO MMU N ELR A1,A2 j P RF GCON20 | PGCON10 EQU * LDR* A1,A2 PGCON20 EQU * RTN A14 RETURN P END SYSLOD @ * , (
0x33e180…33e314 (5, 504) Dummy {f00=0x0107, f01=0x4060, f02=» T P S @ MU N ELR A1,A2 j P RF GCON20 | PGCON10 EQU * LDR* A1,A2 PGCON20 EQU * RTN A14 RETURN P END SYSLOD @ * , (
0x33e314…33e4a8 Dummy {f00=0x0107, f01=0x2008, f02=» P X ` h p
0x33e4a8…33e63c Dummy {f00=0x0107, f01=0x0190, f02=» V XT W X F P , ( H P V , W , @ $ P $ , ( p W D T : A _ T , ( % 0V , - P X 9A_ : E@ @ ! P (W ( : H D ! KP$ kP P Q" U R> P0 P
0x33e63c…33e7d0 Dummy {f00=0x0107, f01=0x0190, f02=»TJ P P P T W P T n H D ! OW cT sW V V W P P W V W Q ! %P * H D !/ 7P EP* I D QP a u D D PZ T P V^ $ v H D ! - 1 9PH = v A & CW> G KT Q U WW ] a e > H
0x33e7d0…33e964 Dummy {f00=0x0107, f01=0x018e, f02=» P : " Z H D ! * b 7T ? L C H Q J U ] a e mR uT { f z P H D ! P PN T T ! > ) A @ OT YT aW gW sQ wP }R P W b H D ! P. R T$ P P P P W W T~ Rr U Rf Q` TR H D ! R V
0x33e964…33eaf8 Dummy {f00=0x0107, f01=0x417a, f02=» H D ! K S W sQ yP P P R U P P ER, GQ$ _Q { H D ! P R V V R L ! % f P H D !x` )T - x 1 j 9 j ? f mT T V S PJ T@ T: Tr P H D ! P$ T #Tx CQ UTF S W
0x33eaf8…33ec8c Dummy {f00=0x0107, f01=0x0190, f02=» J F IDENT SYSLOD REL 10.0 80-03-15 870105041000 & " SYSLODK SYSBAS NUMSEG PRGLG1 R NUMSEG | PRGLG1 SYSBAS SYSLODK SCTSFA SCTIPL , ( (
0x33ec8c…33ee20 Dummy {f00=0x0107, f01=0x0190, f02=» TABBE , ( 5 A. UU @ @ ! P >B , ( QB@ @ A @ E D D SCTMSZ| t * & k P _ $ % $P _ % A SCTEFA * & H >f A A , ( H
0x33ee20…33efb4 (5, 505) Opaque[0x194]
0x33efb4…33f148 # DirEnt {nam=»SYSTAB«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2100, f03=0x0000}
0x33efb4…33f148 IdxSect {
0x33efb4…33f148 f00 = 0x0108 // 0x33efb4 @0x0
0x33efb4…33f148 f01 = 0x0006 // 0x33efb6 @0x2
0x33efb4…33f148 gno = [ // 0x33efb8 @0x4
0x33efb4…33f148 [0x00]: C0x0108.0x0.0
0x33efb4…33f148 [0x01]: C0x0108.0x1.0
0x33efb4…33f148 [0x02]: C0x0108.0x2.0
0x33efb4…33f148 ]
0x33efb4…33f148 }
0x33f148…33f2dc Dummy {f00=0x0108, f01=0x0190, f02=» 2 P IDENT SYSTAB REL 10.0 80-03-14 870105041000 P : P* B P* L 8 P*************************************************** V P* $ P* PHILIPS TERMINAL SYSTEM PTS P* 2 P* SYSTAB = INTERRUPT VECTORS, SYSTEM CONTROL 2 P*
0x33f2dc…33f470 Dummy {f00=0x0108, f01=0x018e, f02=»*************** l P* P* " P EJECT SYSTAB , P* D P* N P*********** X P* ENTRIES * l P*********** P* P* 4 P ENTRY SCTMSZ,SCTSFA,SCTEFA SYSTEM CONTROL TABLE P ENTRY SCTIPL P ENTRY SCTANO,SCTA
0x33f470…33f604 Dummy {f00=0x0108, f01=0x0190, f02=» P ENTRY SCTSTB P ENTRY SCTOPT P ENTRY SCTTCT,SCTCDT 0 P ENTRY SCTBUG L & P ENTRY SCTDMT,SCTDMI,SCTFWT,SCTNOF b & P ENTRY SCTNFT,SCTFWL,SCTBLK,SCTDCT P ENTRY SEG:FC,SEG:NS & P ENTRY SEG:ST,SEG:DS,SEG:EL,SEG:PB & P ENTRY PAG:Q
0x33f604…33f798 Dummy {f00=0x0108, f01=0x0190, f02=»* P* EXTERNALS * P************* P* 6 P* @ P EXTRN TDISP J , P EXTRN IHPFAR POWER FAIL / AUTO RESTART ^ P EXTRN IHLKM LKM INTERRUPT P EXTRN IHRTC REAL TIME CLOCK P EXTRN IHTW TYPEWRITER P EXTRN IHTC CASSETTE T
0x33f798…33f92c Dummy {f00=0x0108, f01=0x0190, f02=» NO. 1 p * P EXTRN CHRT2 REMOTE CHANNEL UNIT NO. 2 P EXTRN CHRT3 < P EXTRN CHRT4 P ( P EXTRN IHCC1 CASSETTE CHANGER NO. 1 d ( P EXTRN IHCC2 2 ( P EXTRN IHCC3 3 * P EXTRN CHLT1 LOCAL CHANNEL UNIT
0x33f92c…33fac0 Dummy {f00=0x0108, f01=0x018e, f02=» M) DISC l P EXTRN IHLP LINE PRINTER P EXTRN IHCR CARD-READER 0 ( P EXTRN IHDU1,IHDU2 DISC UNIT NO. 1/2 P 0 P EXTRN IHMD,IASCUZ,ISLCI,ISLCO MINI FIX DISC | P EXTRN IHMT MAG. TAPE $ P EXTRN ILLINT ILLEGAL INTERRUPT P EXTRN HALT HALT R
0x33fac0…33fc54 (5, 506) Dummy {f00=0x0108, f01=0x0190, f02=» P* PSEG:FC EQU -4 FILE CODE $ PSEG:NS EQU -2 NUMBER OF SEGMENTS . PSEG:ST EQU 0 STATUS V $ PSEG:DS EQU 2 DISC SECTOR ADDRESS r " PSEG:EL EQU 4 EFFECTIVE LENGTH $ PSEG:PB EQU 6 PAGE BLOCK ADDRESS P* & PPAG:QF EQU 0 QUEUE POI
0x33fc54…33fde8 Dummy {f00=0x0108, f01=0x018e, f02=» P* 2 PSWB:NC EQU 0 NUMBER OF COPIES WITHIN SWB TYPE 2 PSWB:DS EQU 2 DISC SECTOR ADDRESS OF FIRST COPY D $ PSWB:EL EQU 4 SWB LENGTH (BYTES) z & PSWB:NS EQU 6 SWB LENGTH (SECTORS) P* P P P P P EJECT SYSTAB
0x33fde8…33ff7c Dummy {f00=0x0108, f01=0x0190, f02=» P DATA ILLINT 3 P DATA ILLINT 4 P DATA ILLINT 5 < P DATA ILLINT 6 X P DATA IHTW 7 t P DATA IHTC 8 P DATA IHSOP 9 P DATA ILLINT 10 P DATA ILLINT 11 P DATA ILLINT
0x33ff7c…340110 Dummy {f00=0x0108, f01=0x0190, f02=»2 17 P DATA CHRT3 18 P DATA CHRT4 19 . P DATA IHCC1 20 J P DATA IHCC2 21 f P DATA ILLINT 22 P DATA IHCC3 23 P DATA CHLT1 24 P DATA CHLT2 25 P DATA CHLT3 26
0x340110…3402a4 Dummy {f00=0x0108, f01=0x0190, f02=» | P DATA ILLINT 32 P DATA ILLINT 33 $ P DATA IHLP 34 @ P DATA IHCR 35 Z P DATA ILLINT 36 t P DATA ILLINT 37 P DATA ILLINT 38 P DATA ILLINT 39 P DATA IHDU1 40 P DATA IH
0x3402a4…340438 Dummy {f00=0x0108, f01=0x0190, f02=»ILLINT 46 P DATA ILLINT 47 P DATA IHCD 48 2 P DATA ILLINT 49 L P DATA ILLINT 50 h P DATA ILLINT 51 P DATA ILLINT 52 P DATA ILLINT 53 P DATA ILLINT 54 P DATA ILLINT 55
0x340438…3405cc Dummy {f00=0x0108, f01=0x0190, f02=» 60 P DATA ILLINT 61 P DATA ILLINT 62 ( P DATA TRAP TRAP ROUTINE D P EJECT SYSTAB d P | P* " P* SYSTEM CONTROL TABLE POINTER P* P DATA SCT P P P* P* SYSTEM TRAP P*
0x3405cc…340760 Dummy {f00=0x0108, f01=0x0190, f02=»,A13 P XRR A14,A14 P LD A1,SCTBUG P ABR(NZ) A1 6 P HLT J P* V P EJECT SYSTAB ` P* x P* PX:A EQU 0 MONITOR OPTION ( PX:B EQU 0 DATA MAN .TASKS IN SYSTEM * PX:C EQU 0 DM INDEX RECORD BUFFER SIZE $ PX:
0x340760…3408f4 (5, 507) Dummy {f00=0x0108, f01=0x0190, f02=»ASK IN SYSTEM P* P EJECT SYSTAB P* 8 P* SYSTEM CONTROL TABLE B P* ` PSCT EQU * j P | * PSCTMSZ DATA 0 MEMORY SIZE MOD K BYTES & PSCTSFA DATA 0,0 START OF FREE AREA $ PSCTEFA DATA 0,0 END OF FREE AREA ( PSCTI
0x3408f4…340a88 Dummy {f00=0x0108, f01=0x0190, f02=»A 0,0 APPLICATION DISC SECTOR ADDRESS . PSCTIOE DATA 0 APPLICATION RESTART ADDRESS . PSCTTCT DATA 0 TCTAB ADDRESS ` PSCTCDT DATA 0 CDTAB ADDRESS PSCTPAG DATA 0 PAGTAB ADDRESS PSCTSWB DATA 0 SWBTAB ADDRESS " PSCTNOP DATA 0 NUMBER OF
0x340a88…340c1c Dummy {f00=0x0108, f01=0x0190, f02=»LOGICAL ADDRESS OF COMMON PART & PSCTMMP DATA 0 MMU TABLE PAGE ENTRY & P INDEX REL TTAB P * PSCTLAP DATA 0 LOGICAL ADDRESS OF PAGES j ( PSCTNPE DATA 0 NUMBER OF PAGE ENTRIES & PSCTSTB DATA STB SYSTEM STACK BASE $ PSCTOPT DATA X:A MONITOR OP
0x340c1c…340db0 Dummy {f00=0x0108, f01=0x0190, f02=»X:B DMTASKS IN SYSTEM & P BIT 12:#G, 13:#F, 14:#E, 15:#D 0 PSCTDMI DATA X:C DM INDEX RECORD BUFFER SIZE H P EJECT SYSTAB | P* P* * PSCTFWT DATA 0 FWT CHAIN START ADDRESS $ PSCTNOF DATA X:D NUMBER OF FILES ( PSCTNFT DAT
0x340db0…340f44 Dummy {f00=0x0108, f01=0x413e, f02=»X:G DC-TASK IN SYSTEM/REMOTE P EJECT SYSTAB $ P < P* D P* SYSTEM STACK N P* d P RES 143 n P DATA /FCC0 AND PSW ~ & PSTB DATA LOOP AND PC FOR IDLE LOOP P P P* P* IDLE LOOP P* P PLOOP
0x340f44…3410d8 Dummy {f00=0x0108, 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
0x3410d8…34126c Dummy {f00=0x0108, f01=0x400c, f02=» @ K O S D W H h H D ! [ . c g Q P P P R U P /P UR, WQ$ oQ $ H D ! . P R V V R ! % . - 1 5 v p H D !x` 9T = A z I z O v }T T V S PJ T@ T: Tr P H D
0x34126c…341400 Dummy {f00=0x0108, f01=0x2008, f02=»
0x341400…341594 (5, 508) Opaque[0x194]
0x341594…341728 # DirEnt {nam=»TABORT«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2118, f03=0x0000}
0x341594…341728 IdxSect {
0x341594…341728 f00 = 0x0108 // 0x341594 @0x0
0x341594…341728 f01 = 0x0004 // 0x341596 @0x2
0x341594…341728 gno = [ // 0x341598 @0x4
0x341594…341728 [0x00]: C0x0108.0x3.0
0x341594…341728 [0x01]: C0x0109.0x0.0
0x341594…341728 ]
0x341594…341728 }
0x341728…3418bc Dummy {f00=0x0108, f01=0x0190, f02=» 2 P IDENT TABORT REL 10.0 80-03-14 870105041000 P : P* B P* L 6 P************************************************* V P* $ P* PHILIPS TERMINAL SYSTEM PTS P* " P* TABORT = ABORT I/O REQUEST P* P* P*
0x3418bc…341a50 Dummy {f00=0x0108, 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 EJECT TABORT P* P*
0x341a50…341be4 Dummy {f00=0x0108, 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/
0x341be4…341d78 Dummy {f00=0x0108, 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
0x341d78…341f0c Dummy {f00=0x0108, 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
0x341f0c…3420a0 Dummy {f00=0x0108, 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
0x3420a0…342234 (5, 509) Dummy {f00=0x0109, 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
0x342234…3423c8 Dummy {f00=0x0109, 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
0x3423c8…34255c Dummy {f00=0x0109, f01=0x018e, f02=» : P CF A15,FREBLK I/O AND ACTIVATE. FREE DISPATCHER BLOCK " P CM DWTWAT,A6 INDICATE NO WAIT B P* h PTABO30 EQU * r 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) TAB
0x34255c…3426f0 Dummy {f00=0x0109, f01=0x40c4, f02=» t P CF A15,TENDIO ABORT 0 P ABL LKMQDI QUEUE TASK AND GO TO DISPATCHER $ P* X 0 PTABOER ABL LKMRQE GO AND INDICATE LKM ERROR b P* P* P* P END @ D A2,ABTADR,A2 GET ABORT ROUTINE ADDRESS (IF ANY) * P RF(Z) TAB
0x3426f0…342884 Dummy {f00=0x0109, f01=0x2008, f02=»
0x342884…342a18 Dummy {f00=0x0109, f01=0x0190, f02=» v P* PSYSBAS EQU * PSAVCON DATA BUFLEN & 2 PMXBUF DATA 0 DISC/FLEXIBLE DISC BUFFER ADDRESS @ PSAVMEM DATA 0 SAVE AREA v & PCYLNBR DATA /FFFF CYLINDER NUMBER ( PSECNBR DATA 0 PHYSICAL SECTOR NUMBER " PDEVTAB DATA /1909,/1101,/082
0x342a18…342bac Dummy {f00=0x0109, f01=0x0190, f02=»***** T F P* CALL-FORMAT, PERFORMS: CFR A14,A13 * F P* DATA [REL-ADDRESS] * X F P* * F P****************************
0x342bac…342d40 Dummy {f00=0x0109, f01=0x0190, f02=»**************** P* CONDITIONAL ASSEMBLY * P************************** : 0 PCASS EQU 1 1-PROGRAM LOAD DEVICE = CASSETTE , PDISC EQU 1 1-PROGRAM LOAD DEVICE = DISC 8 PFLDISC EQU 1 1-PROGRAM LOAD DEVICE = =FLEXIBLE DISC 8 PMFDISC EQU 1
0x342d40…342ed4 (5, 510) Opaque[0x194]
0x342ed4…343068 # DirEnt {nam=»TCLASS«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2128, f03=0x0000}
0x342ed4…343068 IdxSect {
0x342ed4…343068 f00 = 0x0109 // 0x342ed4 @0x0
0x342ed4…343068 f01 = 0x0002 // 0x342ed6 @0x2
0x342ed4…343068 gno = [ // 0x342ed8 @0x4
0x342ed4…343068 [0x00]: C0x0109.0x1.0
0x342ed4…343068 ]
0x342ed4…343068 }
0x343068…3431fc Dummy {f00=0x0109, f01=0x40e8, f02=» 2 P IDENT TCLASS REL 10.0 80-03-14 870105041000 P : P* B P* L P ENTRY TCLASS V P* l P* v P* P* P* P* PTCLASS DATA TCLASE-* PTCLASE EQU * P END @
0x3431fc…343390 Dummy {f00=0x0109, f01=0x2008, f02=» NT TCLASS * * $ * . ENTRY TCLASS 8 * N * X * b * l * v * * TCLASS DATALTCLASE-* TCLASE EQU * END @ 1 INTLT2 INTRT1
0x343390…343524 Dummy {f00=0x0109, f01=0x2008, f02=»
0x343524…3436b8 Dummy {f00=0x0109, f01=0x0190, f02=»DR A8,P RETURN ADDRESS & P LDKL A3,REL+2 RELOCATION ROUTINE P CFR A8,A3 H $ P LDKL A5,/5555 LOAD TEST PATTERN Z P LDK A6,64 INIT PAGE COUNTER " P LD A1,SCTOPT GET OPTION WORD P ANK A1,1 MMU IN SYSTEM? P RF(Z) AP:100 NO! P E
0x3436b8…34384c Dummy {f00=0x0109, f01=0x0190, f02=» LDK A1,0 MMU ENTRY POINTER PAP:010 EQU * $ " P LD A2,TABBE GET PAGE ADDRESS 8 2 P SUKL A2,/400 DECREMENT PHYSICAL PAGE ADDRESS ^ P ST A2,TABBE STORE IT BACK P TL TABBE LOAD MMU REGISTERS * P ES A5,PAGSIZ-2,A1 STORE TEST PATTERN * P
0x34384c…3439e0 Dummy {f00=0x0109, f01=0x0190, f02=»ER OF PAGES x P RB AP:010 P* & D P* END OF EXECUTION PATH FOR SYSTEMS WITH MMU OPTION EXCLUSIVELY 0 P* x P EJECT PAP:100 EQU * P* @ P* EXECUTION PATH FOR SYSTEMS WITHOUT MMU OPTION EXCLUSIVELY P* & P LDKL A1,PAG
0x3439e0…343b74 (5, 511) Opaque[0x194]
0x343b74…343d08 # DirEnt {nam=»TDISP «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2130, f03=0x0000}
0x343b74…343d08 IdxSect {
0x343b74…343d08 f00 = 0x0109 // 0x343b74 @0x0
0x343b74…343d08 f01 = 0x0008 // 0x343b76 @0x2
0x343b74…343d08 gno = [ // 0x343b78 @0x4
0x343b74…343d08 [0x00]: C0x0109.0x2.0
0x343b74…343d08 [0x01]: C0x0109.0x3.0
0x343b74…343d08 [0x02]: C0x010a.0x0.0
0x343b74…343d08 [0x03]: C0x010a.0x1.0
0x343b74…343d08 ]
0x343b74…343d08 }
0x343d08…343e9c Dummy {f00=0x0109, f01=0x0190, f02=» 0 P IDENT TDISP REL 10.0 80-03-14 870105041000 P 8 P* @ P* J 6 P************************************************** T P* $ P* PHILIPS TERMINAL SYSTEM PTS P* P* TDISP = TOSS DISPATCHER P* 6 P****************
0x343e9c…344030 Dummy {f00=0x0109, f01=0x0190, f02=» WITH 8 REGISTERS ON A15 STACK. v > P* THE DISPATCHER CHECKS IF THERE IS A TASK IN DISPATCHER ( < P* QUEUE WITH HIGHER PRIORITY THAN INTERRUPTED PROGRAM. j : P* - IF SO, THE RUNNING TASK IS QUEUED AND THE HIGHER $ P* PRIORITY TASK IS STARTED.
0x344030…3441c4 Dummy {f00=0x0109, f01=0x0190, f02=» 6 P* ENTRY 'DISIOE' SETS BIT 0 IN A1 BEFORE DISEND. P* B 8 P* ENTRY 'MEXIT' EXITS A MONITOR TASK BEFORE TDISP. L P* H P* ENTRY 'QMEXIT' CALLS QTJOB BEFORE EXIT IS MADE ON MONITOR TASK. P* 0 P* ENTRY 'TEXIT' EXITS A TASK B
0x3441c4…344358 Dummy {f00=0x0109, f01=0x0190, f02=» A TASK BEFORE TDISP. t P* D P* ENTRY 'RETUR8' LOADS 8 REGISTERS FROM A15 STACK AND RETURNS. ( P* p P EJECT TDISP z P* P* P*********** P* ENTRIES * P*********** P* P* " P ENTRY TDISP DISPATC
0x344358…3444ec Dummy {f00=0x0109, f01=0x018e, f02=»E TASK AND EXIT MONITOR TASK ~ , P ENTRY ACTDIS ACTIVATE TASK AND DISPATCH $ " P ENTRY DISIOE I/O ERROR ENTRY T & P ENTRY DISEND END I/O AND DISPATCH z 6 P ENTRY DISQUE POINTER TO FIRST TASK IN DISP. QUEUE , P ENTRY PRUN TTAB ADDRESS OF RUNNING TASK
0x3444ec…344680 Dummy {f00=0x0109, f01=0x0190, f02=» P************* P* P* ( P EXTRN ACTOT ACTIVATE TASK 2 P EXTRN TTB:SA SAVE AREA T P EXTRN TTB:ST STATUS t & P EXTRN TTB:PW PROGRAM STATUS WORD P EXTRN TTB:MT MMUTAB & P EXTRN TTB:CB CURRENT SEGMENT BASE ( P EXTRN T
0x344680…344814 (5, 512) Dummy {f00=0x0109, f01=0x0190, f02=» QUEUE BACKWARD POINTER ~ P EXTRN TENDIO END I/O P EXTRN EXIT PROGRAM EXIT > 2 P EXTRN QLTDSK ACTIVATE LDTASK AT ENTRY LT:DSK ^ , P EXTRN QTJOB QUEUE TASK FOR DISPATCHING . P EXTRN SCTLAP LOGICAL ADDRESS OF CODE PAGE & P EXTRN SCTMMP MMU
0x344814…3449a8 Dummy {f00=0x0109, f01=0x0190, f02=»*************** v P* P* CONDITIONAL ASSEMBLY " P* @ . P***************************************** J P* | . P* A PROGRAM VERSION USING TOSS MMU PAGING * P* IS OBTAINED BY SETTING MMUPAG EQU 1. P* PMMUPAG EQU 0 P*
0x3449a8…344b3c Dummy {f00=0x0109, f01=0x0190, f02=»U852 EQU 1 P* * . ** A PROGRAM VERSION USING TOSS DISC PAGING & * &* IS OBTAINED BY SETTING DSKPAG EQU 1. X * PDSKPAG EQU 0 * P* @ P* A PROGRAM VERSION PREVENTING SEGMENTS TO MOVE WHEN HAVING > P* APPLICATIO
0x344b3c…344cd0 Dummy {f00=0x0109, f01=0x0190, f02=» P* P EJECT TDISP P* ( P* D I S Q U E 2 P* J 2 P* POINTER TO FIRST TASK IN DISPATCHER QUEUE T P* PDISQUE DATA 0 P* P* P R U N P* $ P* TTAB ADDRESS OF RUNNING TASK P* PPRUN
0x344cd0…344e64 Dummy {f00=0x0109, f01=0x018e, f02=» P* PRETUR8 EQU * P " P IFT CPU852=0 * P MLR 8,A15 @ P XIF R P ^ P IFT CPU852=1 f P LDR* A8,A15 | P LDR* A7,A15 P LDR* A6,A15 P LDR* A5,A15 P LDR* A4,A15 P LDR* A3,A15 P LDR* A2,A15 P
0x344e64…344ff8 Dummy {f00=0x0109, f01=0x0190, f02=» h P* 2 P* DO EXIT ON (MONITOR) TASK AND GO TO TDISP P* H 2 PQMEXIT CF A15,QTJOB QUEUE TASK FOR DISPATCHING R P* PMEXIT INH P LD A5,PRUN P CM PRUN P* PTEXIT EQU * P CF A15,EXIT P RF TDISP
0x344ff8…34518c Dummy {f00=0x0109, f01=0x0190, f02=» RF TDISP P EJECT TDISP P ( P* 0 P* D I S I O E : P* R 6 P* SET BIT 0 IN ECB RETURN CODE AND GO TO DISEND P* PDISIOE LDKL A1,/8000 P P* P* D I S E N D P* $ P* CALL TENDIO AND GO T
0x34518c…345320 Dummy {f00=0x0109, f01=0x0190, f02=»ISP) r P* PTPAUSE EQU * P EJECT TDISP * P* @ P* T D I S P J P* ` $ P* THIS IS THE DISPATCHER ENTRY j P* PTDISP INH & P LC A1,18,A15 LOAD PSW FROM STACK P ANK A1,/FC P SUK A1,/C4 . P RB(L) R
0x345320…3454b4 (5, 513) Dummy {f00=0x010a, f01=0x0190, f02=» P RB(Z) RETUR8 QUEUE EMPTY P * P LD A5,PRUN 2 $ P RF(Z) TDCQ10 IDLE LOOP RUNNING F & P LD A4,TTB:ST+1,A5 COMPARE RUNNING n 4 P CC A4,TTB:ST+1,A3 AND QUEUED TASK'S PRIORITIES * P RB(NG) RETUR8 RUNNING HIGHER OR SAME $ PTDCQ10 LDR
0x3454b4…345648 Dummy {f00=0x010a, f01=0x0190, f02=»DDR l P RF(Z) TDISSW NONE P LDR* A7,A1 & 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 P EJECT TDISP P* P* SWITCH TASKS P* *
0x345648…3457dc Dummy {f00=0x010a, f01=0x018e, f02=»0 QUEUE OLD TASK FIRST ON PRIORITY P RF(Z) TDSW20 EMPTY QUEUE * 0 PTDSW10 CC A4,TTB:ST+1,A6 COMPARE PRIORITIES L 0 P RF(NG) TDSW20 SAME OR LOWER PRIORITY FOUND P LDR A2,A6 P LDR* A6,A2 , P RB(NZ) TDSW10 STILL SOMETHING IN QUEUE
0x3457dc…345970 Dummy {f00=0x010a, f01=0x0190, f02=» P IFT CPU852=0 P MLR 8,A15 P MS 13,TTB:SA+2,A14 , P MLR 2,A15 H P Z P XIF b P IFT CPU852=1 n P LDR* A8,A15 P LDR* A7,A15 P LDR* A6,A15 P LDR* A5,A15 P LDR* A4,A15 P LDR* A3,A15 P LDR* A2,A15
0x345970…345b04 Dummy {f00=0x010a, f01=0x0190, f02=»A14 ~ P ST A9,TTB:SA+18,A14 P ST A8,TTB:SA+16,A14 ( P ST A7,TTB:SA+14,A14 D 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,A14 P ST A2,TTB:SA+4,A14 P ST A1,TTB:SA+2,A14 P
0x345b04…345c98 Dummy {f00=0x010a, f01=0x0190, f02=»FT DSKPAG+DIFPRI=2 P * P LD A1,TTB:SB,A14 GET SEGM BLOCK ADDR " P RF(Z) TDISST NONE P P LDR* A2,A1 GET SEGM STATUS j P LDKL A3,/1000 , P TM A2,A3 CHECK IF SEGM USED BY INT TASK P RF(NZ) TDISST YES * P ORRS A3,A1 SET SEGM USED
0x345c98…345e2c Dummy {f00=0x010a, f01=0x0190, f02=» P* START NEW TASK P* PTDISST LD A14,PRUN & P IFT DSKPAG=1 @ P V * P LD A1,TTB:SB,A14 GET SEGM BLOCK ADDR ^ P RF(Z) TDST30 NONE ( P LD A4,SEG:PB,A1 GET PAGE BLOCK ADDR P IFT DIFPRI=0 P ( P LDR* A2,A4 CHECK IF PAG
0x345e2c…345fc0 Dummy {f00=0x010a, f01=0x0190, f02=»IN PAGQUE v P RF(NZ) TDST10 YES " P LDR* A3,A1 NO GET SEGM STATUS , 2 P ANKL A3,/1000 CHECK IF SEGM USED BY INT TASK R P RF(Z) TDST20 NO 4 P CW A14,PAG:QB,A4 YES CHECK IF IT WAS THIS TASK P RF(NE) TDST20 NO * P XRRS A3,A1 YES RESET
0x345fc0…346154 (5, 514) Dummy {f00=0x010a, f01=0x0190, f02=»E d P STR A2,A3 P ST A3,PAG:QB,A2 P CMR A4 4 P D , PTDST20 LD A1,PAG:PA,A4 GET PAGE ADDRESS L P | P IFT MMUPAG=1 P " P ECR A2,A1 CALC PHYS PAGE ADDR P ANK A2,/FC * P LDR A3,A14 AND MMU PAGE ENTRY IN TTAB
0x346154…3462e8 Dummy {f00=0x010a, f01=0x0190, f02=»UK A4,1 P RF(Z) TDST25 P ADK A2,4 & P ADK A3,2 8 P RB TDST22 J P PTDST25 EQU * d " P TL TTB:MT,A14 LOAD MMU TABLE x 2 P SLL A1,2 UPDATE BASE IN T:A ALSO JUST IN CASE P ANKL A1,/FFE P OR A1,SCTLAP 2 P ES* A1,
0x3462e8…34647c Dummy {f00=0x010a, f01=0x0190, f02=»E CURRENT SEGMENT BASE x P XIF P * PTDST30 EQU * 2 P IFT MMUPAG=1 F " P TL TTB:MT,A14 LOAD MMU TABLE P XIF P & PTDST35 LD A1,TTB:SA,A14 GET NEW PC P LD A2,TTB:PW,A14 AND PSW P IFT CPU852=0 P & P MSR 2,A
0x34647c…346610 Dummy {f00=0x010a, f01=0x0190, f02=»5 PUT PC P STR A2,A15 AND PSW ON STACK & P LD A1,TTB:SA+2,A14 LOAD REGISTERS 4 P LD A2,TTB:SA+4,A14 ^ P LD A3,TTB:SA+6,A14 z P LD A4,TTB:SA+8,A14 P LD A5,TTB:SA+10,A14 P LD A6,TTB:SA+12,A14 P LD A7,TTB:SA+14,A14 P L
0x346610…3467a4 Dummy {f00=0x010a, f01=0x4098, f02=» z P LD A13,TTB:SA+26,A14 P LD A14,TTB:SA+28,A14 & P D P XIF L P X P RTN A15 START THE TASK ` P P END @ D A4,TTB:SA+8,A14 P LD A5,TTB:SA+10,A14 P LD A6,TTB:SA+12,A14 P LD A7,TTB:SA+14,A14 P L
0x3467a4…346938 Dummy {f00=0x010a, 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
0x346938…346acc Dummy {f00=0x010a, f01=0x0190, f02=»SEGMENT 3 n P* 4 P LDR A2,A8 GET MMU ENTRY 4 & P SLL A2,12 MOVE TO 4 LEFTMOST BITS 4 : , P ANKL A2,/F000 MMU ENTRY TO LOGICAL PAGE 4 d P ST A2,SCTLAP SAVE 4 P ADR A2,A4 ADD DISPLACEMENT 4 P ST A2,SAVE08,A13 SAVE 4 , P LDR A2,A8 GET MMU ENTRY
0x346acc…346c60 Dummy {f00=0x010a, f01=0x0190, f02=» IN SYSTAB 4 ~ P* 5 & P* COMPUTE NUMBER OF PAGE ENTRIES 5 P* 5 F P LDKL A2,16 5 P P SUR A2,A8 5 d P ST A2,SCTNPE 5 v P RF AP:335 5 PAP:330 EQU * 5 P* 5 8 P* THIS ENTRY IS ENTERED IF MMU OPTION IN SYSTEM BUT 5 > P* THE APPLICATI
0x346c60…346df4 (5, 515) Opaque[0x194]
0x346df4…346f88 # DirEnt {nam=»TIMER «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2150, f03=0x0000}
0x346df4…346f88 IdxSect {
0x346df4…346f88 f00 = 0x010a // 0x346df4 @0x0
0x346df4…346f88 f01 = 0x0006 // 0x346df6 @0x2
0x346df4…346f88 gno = [ // 0x346df8 @0x4
0x346df4…346f88 [0x00]: C0x010a.0x2.0
0x346df4…346f88 [0x01]: C0x010a.0x3.0
0x346df4…346f88 [0x02]: C0x010b.0x0.0
0x346df4…346f88 ]
0x346df4…346f88 }
0x346f88…34711c Dummy {f00=0x010a, f01=0x0190, f02=» 0 P IDENT TIMER REL 10.0 80-03-14 870105041000 P 8 P* @ P* J 8 P*************************************************** T P* $ P* PHILIPS TERMINAL SYSTEM PTS P* P* TIMER = TIMER FUNCTIONS P* P* P*
0x34711c…3472b0 Dummy {f00=0x010a, 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
0x3472b0…347444 Dummy {f00=0x010a, f01=0x0190, f02=» . P ENTRY SETIMP SETIME + STORE TIMER POINTER P EJECT TIMER 6 P* L P* V P*********** ` P* EXTRNALS * t P************ P* P* P EXTRN TDISP DISPATCHER . P EXTRN LKMQDI QUEUE TERMINAL AND DISPATCH $ P EXTRN
0x347444…3475d8 Dummy {f00=0x010a, f01=0x0190, f02=»DRESS v , P EXTRN ACTDIS ACTIVATE TASK AND DISPATCH * P EXTRN SAVE8 SAVE 8 REGISTERS ON STACK > 8 P EXTRN TIMQUE POINTER TO FIRST BLOCK IN TIMER QUEUE l 0 P EXTRN IHRET8 RESTORE 8 REGISTERS FROM STACK P EJECT TIMER P* P* . P**
0x3475d8…34776c Dummy {f00=0x010a, f01=0x0190, f02=»*** j P* 6 P* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION . P* SET IS OBTAINED BY SETTING CPU852 EQU 0. P P* PCPU852 EQU 1 P* P EJECT TIMER P* P* P* T I M E R P* ( P* THIS IS THE TIME
0x34776c…347900 Dummy {f00=0x010a, f01=0x018e, f02=»AM DELAY P* P* A4 = 0 P* A5 = TTAB ADDRESS , P* A8 = DELAY J P* ` P* j P* 2. TIMING AND ACTIVATION t P* P* A1 = PARAMETER 8 P* A4 = DISPATCH ADDRESS OF PROGRAM TO BE ACTIVATED , P* A5 = TTAB AD
0x347900…347a94 (5, 516) Dummy {f00=0x010a, f01=0x0190, f02=» PTIMER EQU * P ADK A4,0 SET CR ( P RF(NZ) TIM010 TIMING AND ACTIVATION 4 P* ` P EJECT TIMER j P* P* PROGRAM DELAY P* P LDR A1,A5 SET PARAMETER P ST A8,PAR1+2 SET TIME P CF A15,SETIME PPAR1 D
0x347a94…347c28 Dummy {f00=0x010a, f01=0x0190, f02=»10 EQU * $ P CF A15,FNDTID FIND TTAB ADDRESS P ADK A2,0 SET CR 8 " P ABL(Z) LKMRQE TTAB NOT FOUND P ( P LDR A3,A2 IN BLOCK: A3=TTAB ADDRESS v , P LDR A2,A4 A2=DISPATCH ADDRESS ( P CF A15,GETBLK A1=PARAMETER . P LDR A1,A4
0x347c28…347dbc Dummy {f00=0x010a, f01=0x0190, f02=»QU * P ABL LKMQDI P* P EJECT TIMER * P* @ P* J P* RETURN AFTER TIME OUT T P* v P* 1.PROGRAM DELAY P* PDELAY EQU * P LDR A5,A1 SET TTAB ADDRESS * P RB QUEDIS QUEUE TASK FOR DISPATCHING
0x347dbc…347f50 Dummy {f00=0x010a, f01=0x0190, f02=»ET IT FREE | P LDR A5,A3 SET TTAB ADDRESS * P ABL ACTDIS ACTIVATE TASK AND DISPATCH 6 P* d P EJECT TIMER n P* P* " P* S E T I M E , S E T I M P P* . P* SUBROUTINE TO SET BLOCK IN TIMER QUEUE , P* AND IF SET
0x347f50…3480e4 Dummy {f00=0x010a, f01=0x0190, f02=»POINTER ADDRESS v , P* P1 = DISPATCH ADDRESS AFTER TIME OUT P* P2 = DELAY H P* ^ : P* P1 AND P2 ARE STORED AFTER THE SUBROUTINE REQUEST. h P* P* EXIT PARAMETER:- P* P* A4 = ADDRESS TO TIMER P* P*
0x3480e4…348278 Dummy {f00=0x010a, f01=0x0190, f02=» XIF P* P IFT CPU852=0 P INH , " P MSR 8,A15 SAVE A1-A8 ON STACK 8 P XIF ^ P* j P EJECT TIMER t P* P* * P LDR A6,A4 SAVE TIMER POINTER ADDRESS P LDR A3,A4 . P LD A5,20,A15 LOAD FIRST PARAMETER ADDRESS
0x348278…34840c Dummy {f00=0x010a, f01=0x0190, f02=» PROGRAM COUNTER | $ P CF A15,GETBLK GET A FREE BLOCK P LDR A2,A4 @ P C1R A1,A8 R " P CF A15,GETBLK GET TIMER BLOCK d P LD A1,TIMQUE " P STR A1,A4 SET BLOCK IN QUEUE P ST A4,TIMQUE P ADK A4,4 0 P ST A4,10,A15 SET TIMER AD
0x34840c…3485a0 Dummy {f00=0x010a, f01=0x412e, f02=»CT TIMER P* P* PSETEND EQU * & P IFT CPU852=1 : ( P ABL IHRET8 RESTORE A1-A8 AND RETURN P P XIF | P* P IFT CPU852=0 * P MLR 8,A15 RESTORE A1-A8 FROM STACK... P RTN A15 ...AND RETURN P XIF P*
0x3485a0…348734 (5, 517) Dummy {f00=0x010b, 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
0x348734…3488c8 Dummy {f00=0x010b, f01=0x0190, f02=» F P* ! -RELOCATE ALL W.B.-ADDRESSES IN DDIV-PROTOTYPE. ! F P* ! -REMOVE NOT USED ENTRIES IN T:ATAB ! N F P* ! -RELOCATE ADDRESSES IN U:BTAB ! F P* ! -MOVE SYSLDA (NOT PART 1
0x3488c8…348a5c Dummy {f00=0x010b, f01=0x0190, f02=» PART 2.A ! v F P* !-----------------------------------------------------! 0 P EJECT z P P ***************** P ***************** P ** ** P ** CONSTANTS ** P **
0x348a5c…348bf0 Dummy {f00=0x010b, f01=0x0190, f02=»** PT:ATAB EQU 0 PU:BTAB EQU 2 PP:BAS EQU 6 SEGMENT BASE 2 . PT:AID EQU 32 ADDRESS TO 'TABLE OF T:A TID' R ( PS:BTAB EQU 40 DISP TO S:BTAB ADDRESS , PI:RSTE EQU 42 INTERPRETER RESTART ENTRY P P P********** P* U:BT
0x348bf0…348d84 Dummy {f00=0x010b, f01=0x0190, f02=»TOTYPE NAME 8 PUPNUMB EQU 7 SAVE AREA NUMBER OF COPIES (SHADOW-TBL) P* P . PUR:REC EQU 6 RECORD LENGTH IN REAL U:BTAB Z * PURADDR EQU 2 ADDRESS TO FIRST REAL UWB PURNUMB EQU 4 NUMBER OF UWB'S PURLENG EQU 6 LENGTH OF UWB P EJECT
0x348d84…348f18 Dummy {f00=0x010b, f01=0x0190, f02=»***************** P P* TASK DEFINITION BLOCK: & PTDBBT EQU 0 1A BLOCK TYPE F ( PTDBNT EQU TDBBT+1 2N NUMBER OF TASKS h , PTDBID EQU TDBNT+2 6A TASK ID START VALUE , PTDBMC EQU TDBID+6 6A MATCHING TASK CLASS $ PTDBTL EQU TDBMC+6 6A
0x348f18…3490ac Dummy {f00=0x010b, f01=0x0190, f02=»C EQU 7 TERMINAL DEVICE CLASS PTLC EQU 6 LINE CONNECTION & ( PTDBREC EQU TDC+TLC TDB-RECORD LENGTH H P* t * PSDC EQU 7 SPECIAL DEVICE CLASS-RECORD ~ P* P* COMMON DEVICE DEF. BLOCK: PCDBBT EQU 0 1A BLOCK TYPE 6 PCDBNC EQU CD
0x3490ac…349240 Dummy {f00=0x010b, f01=0x0190, f02=». BLOCK v PUDBBT EQU 0 1A BLOCK TYPE , PUDBNU EQU UDBBT+1 3A NUMBER OF UWB TYPES 2 P* b ( PUDBFST EQU UDBNU+3 FIRST UDB-RECORD l PNAMUWB EQU 3 NAME OF UWB " PNUMUBL EQU 3 NUMBER OF BLOCKS . PUDBREC EQU NAMUWB+NUMUBL UDB RECORD-LENGTH
0x349240…3493d4 (5, 518) Opaque[0x194]
0x3493d4…349568 # DirEnt {nam=»TIODM «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2168, f03=0x0000}
0x3493d4…349568 IdxSect {
0x3493d4…349568 f00 = 0x010b // 0x3493d4 @0x0
0x3493d4…349568 f01 = 0x0010 // 0x3493d6 @0x2
0x3493d4…349568 gno = [ // 0x3493d8 @0x4
0x3493d4…349568 [0x00]: C0x010b.0x1.0
0x3493d4…349568 [0x01]: C0x010b.0x2.0
0x3493d4…349568 [0x02]: C0x010b.0x3.0
0x3493d4…349568 [0x03]: C0x010c.0x0.0
0x3493d4…349568 [0x04]: C0x010c.0x1.0
0x3493d4…349568 [0x05]: C0x010c.0x2.0
0x3493d4…349568 [0x06]: C0x010c.0x3.0
0x3493d4…349568 [0x07]: C0x010d.0x0.0
0x3493d4…349568 ]
0x3493d4…349568 }
0x349568…3496fc Dummy {f00=0x010b, f01=0x0190, f02=» 0 P IDENT TIODM REL 10.0 80-03-14 870105041000 P 8 P =1, COMMIT CHECK @ P 79-11-02 8 P**************************************************** p P* $ P* PHILIPS TERMINAL SYSTEM PTS P* 0 P* TIODM = DATA MANAGEMENT ACT
0x3496fc…349890 Dummy {f00=0x010b, f01=0x0190, f02=» 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 T P* H P* THE DM REQUEST IS PROCESSED HERE UP TO THE POINT WHERE A SECTOR $ P* FROM A DISC MUST BE ACCESSED P*
0x349890…349a24 Dummy {f00=0x010b, f01=0x0190, f02=» A7 = ORDER WORD WITH W BIT = 0 P* A8 = ECB ADDRESS ( P* L P* V P* ` 6 P* IN ALL DM MODULES FDB WILL BE THE SAME AS FWT j P* 4 P* THE FOLLOWING WORDS WILL BE SET IN THE FDB: & P* FDBSNR SECTOR NUMBER IN FILE
0x349a24…349bb8 Dummy {f00=0x010b, f01=0x018e, f02=»T BLOCK POINTER v P* P* " D P* IF AN ERROR CONDITION IS DETECTED THE ERROR RETURN WILL BE: , P* LDKL A1,/<RETURN CODE> t P* ABL DISEND P* P* P EJECT P* P************** P* ENTRIES *
0x349bb8…349d4c Dummy {f00=0x010b, f01=0x0190, f02=» P ENTRY FDBRLE P ENTRY FDBBLF P ENTRY FDBTNR 4 P ENTRY FDBLRN J 4 P ENTRY FDBNIF,FDBEAL,FDBCRL,FDBKA,FDBMIA,FDBADF ` & P ENTRY FDBAI1,CRNTID,CRNCDF,CRNSTA P ENTRY FDBBLZ BLOCK SIZE P ENTRY FDBDMI DMTASK IDENT P E
0x349d4c…349ee0 Dummy {f00=0x010b, f01=0x0190, f02=»HLT,FDBSTA,DWDM01 P ENTRY REQER2 2 P ENTRY RETRIE,EOMERR,NOKEY,NXTKYS,EOFRC,NODERR 0 , P ENTRY PROT,KEYERR,PROERR,REQERR,LGTERR f P ENTRY EOFERR,EDMERR P EJECT P EXTRN SCTTCT P EXTRN RELPRO P EXTRN TDISP P EXTRN H
0x349ee0…34a074 (5, 519) Dummy {f00=0x010b, f01=0x0190, f02=» ORDER v P EXTRN DWTOPT OPTION BYTE & P EXTRN DWTTAB DM TASK TTAB ADDRESS 0 P EXTRN TTB:ID TASK ID Z P EXTRN MOVZUS,MOVZSU x P EXTRN DMTASK P EXTRN CALSNO P EXTRN ECBFC P EXTRN ECBBA P EXTRN ECBRL P EXTRN ECBEL
0x34a074…34a208 Dummy {f00=0x010b, f01=0x0190, f02=»XTRN FWTEW1 P EXTRN FWTFNR FILE NR P EXTRN FNDFDB DMTASK ROUTINE 2 P EXTRN FPB:FR V P EXTRN TTB:SA,QTJOB l P EXTRN DMTBM P EXTRN DMTIDS P EXTRN DFTAB,FWTVOL ( P EXTRN CRNCIF INDEX CURRENCY OFFSET P EJECT P
0x34a208…34a39c Dummy {f00=0x010b, f01=0x0190, f02=»ION CONTAINING INDEXED REQUEST ORDERS IS OBTAINED P* BY SETTING INDXAC EQU 1 : * P* INDXAC EQU 0 OTHRERWISE ^ PX:A EQU 0 PINDXAC EQU X:A P* . P* A PROGRAM VERSION USING TOSS MMU PAGING * P* IS OBTAINED BY SETTING
0x34a39c…34a530 Dummy {f00=0x010b, f01=0x0190, f02=» OUTSIDE MEDIUM LIMITS & PPROT EQU /0040 THIS DATA PROTECTED & PNODERR EQU /8800 NO EXPECTED DATA H , PKEYERR EQU /8400 EXPECTED KEY NOT FOUND r 2 PPROERR EQU /0010 ROLLBACK FOR PROTECT REASONS * PREQERR EQU /8000 GENERAL REQUEST ERROR " PRE
0x34a530…34a6c4 Dummy {f00=0x010b, f01=0x0190, f02=»9000 END OF FILE P* P* MESSAGES " P* 6 " PRETRIE EQU /0100 DISC RETRIES @ $ PNOKEY EQU /0400 NOT SEARCHED KEY f " PNXTKYS EQU /0200 NEXT KEY SAME PEOFRC EQU /1000 END OF FILE P* " PFCUSED EQU 7 INVALID FILE CODE P
0x34a6c4…34a858 Dummy {f00=0x010b, f01=0x018e, f02=» P* P* & PTIODMF EQU * TIODM FUNCTION TABLE P DATA READ DIRECT RANDOM B P DATA READ SEQUENTIAL b P IFT INDXAC=1 P DATA READ INDEXED P DATA READ INDEXED NEXT P XIF P IFT INDXAC=0 P DATA TIOD19,TIOD19
0x34a858…34a9ec Dummy {f00=0x010b, f01=0x0190, f02=» P XIF P IFT INDXAC=0 P DATA TIOD19 & P XIF : P DATA WRITE (RESERVED) F P DATA REWRIT REWRITE DIRECT d P IFT INDXAC=1 P DATA REWRIT REWRITE INDEXED P XIF P IFT INDXAC=0 P DATA TIOD19 P XIF P DAT
0x34a9ec…34ab80 Dummy {f00=0x010b, f01=0x0190, f02=»ATA TIOD19 P XIF PQSTA EQU *-TIODMF P DATA STARTO START DIRECT 8 P IFT INDXAC=1 Z P DATA STARTO START INDEXED p P XIF P IFT INDXAC=0 P DATA TIOD19 P XIF P* F P* FOLLOWING FILE ADMINISTRATION FUNCTION
0x34ab80…34ad14 (5, 520) Dummy {f00=0x010b, f01=0x018e, f02=» | P DATA OPEN PCLOSOF EQU *-TIODMF P DATA CLOSE 6 PRDSTOF EQU *-TIODMF J P DATA RDSTAT READ STATUS f PRDFPOF EQU *-TIODMF & P DATA RDFILP READ FILE PARAMETERS P EJECT P* PTIODMO EQU * DM ORDERS P DATA
0x34ad14…34aea8 Dummy {f00=0x010b, f01=0x0190, f02=» P DATA /0BFF START P DATA /2122 OPEN,CLOSE 0 P DATA /0003 READ STATUS,READ FILE PARAMETERS < P* p $ PNOOFOR EQU 18 NO OF ORDER CODES z P* P EJECT P* 0 PDWTDRD EQU 42 START OF NON-STANDARD DWT PART P* P IFT M
0x34aea8…34b03c Dummy {f00=0x010b, f01=0x0190, f02=»NGUISHED r P XIF P EJECT P* * P* FDB OFFSET DEFINITIONS 4 P* V PFDBSTA EQU * ` PDWDM01 EQU * t . P DATA 0,/8000,0,0,TIODM,0,0,0 DWT STANDARD P IFT MMUPAG=1 $ P DATA 0,FDBMMU SPECIAL DWT ITEMS P XIF P DAT
0x34b03c…34b1d0 Dummy {f00=0x010b, f01=0x0190, f02=»DBADF 4 P DATA 0,0,0,0,0,0,0 54,BYTE FDB AREA SYSTEM FDB P IFT MMUPAG=1 F PFDBMMU RES 7 MMU ECB AREA P XIF ~ P EJECT PFDBECB EQU START+2 ECB START & PFDBSNR EQU START+16 SECTOR NUMBER . PFDBRRO EQU START+20 RELATIVE RECOR
0x34b1d0…34b364 Dummy {f00=0x010b, f01=0x018e, f02=»LLING TASK n * PFDBLRN EQU START+27 LAST RECORD NUMBER * PFDBNIF EQU START+26 NO OF INDEX FILES @ $ PFDBEAL EQU START+30 EA LINK ROOT n & PFDBCRL EQU START+32 CRN LINK ROOT 0 PFDBKA EQU START+34 KEY ADDRESS IN DATA FILE 0 PFDBMIA EQU START+36
0x34b364…34b4f8 Dummy {f00=0x010b, f01=0x0190, f02=» 8 PFDBDBR EQU START+48 DELAY,BASIC AND REL BUFFER FLAGS * PFDBDMI EQU START+49 RELATIVE DMTASK ID @ " PFDBMRO EQU START+50 MAX FDBRRO n , PFDBBLZ EQU START+52 NR OF SECT IN BLOCK , PFDBMEC EQU START+54 MMU ECB DISPLACEMENT P IFT MMUPAG=1 <
0x34b4f8…34b68c Dummy {f00=0x010b, f01=0x0190, f02=»EXED ACC l P XIF P* & P* CRN BUFFER OFFSET DEFINITIONS & P* P PCRNTID EQU 2 TASK ID Z PCRNSTA EQU 3 CURRENT STATUS v " PCRNCDF EQU 4 CURRENT DATA FILE P EJECT ( P DATA 0 DATA MANAGEMENT DEVICE INDEX & PTIODM DATA *+2
0x34b68c…34b820 Dummy {f00=0x010b, f01=0x0190, f02=»USE ECB AS STACK P ENB P* $ 6 P* GET CALLING TASK NUMBER AND STORE IT IN FDBTNR . P* h P LDK A2,0 r PTIOD05 LD A1,SCTTCT P ADR A1,A2 P LD A3,2,A1 P CW A3,DWTTAB,A6 P RF(E) TIOD10 THIS TASK P ADK A2,2
0x34b820…34b9b4 (5, 521) Dummy {f00=0x010c, f01=0x018e, f02=»DER INDEX IN DWTOR RIGHT BYTE P* & P LD A7,DWTOR,A6 ORDER WORD 0 P LDR A5,A7 R & P ANKL A5,/C0C0 SOME BITS FORBIDDEN d P RF(NZ) TIOD19 ERR P LD A5,FDBBLZ,A6 =1 P ANK A5,/FF =1 $ P RF(NZ) TIOD19 COMMIT MISSING =1 & P LDK
0x34b9b4…34bb48 Dummy {f00=0x010c, f01=0x0190, f02=» P RB(NN) TIOD15 >= 0 PTIOD19 EQU * P LDKL A1,REQERR 4 P ABL TIODMX ERR L PTIOD20 EQU * d P SLL A5,1 *2 x & P SC A5,DWTOR+1,A6 SAVE ORDER INDEX P CWK A6,FDBSTA " P RF(NE) TIOD25 NOT SYSTEM FWT P CWK A5,RDSTOF P
0x34bb48…34bcdc Dummy {f00=0x010c, f01=0x0190, f02=» CF A14,CRNGET CURRENCY P LDK A3,0 NEW STATUS P LC A4,CRNSTA,A2 OLD STATUS < P SC A3,CRNSTA,A2 ` ( P ABI TIODMF,A5 BRANCH TO DM FUNCTION x P* " P* A1 = FDB ADDRESS DATA FILE $ P* A2 = CURRENCY BUFFER ADDRESS & P* A4 = OLD
0x34bcdc…34be70 Dummy {f00=0x010c, f01=0x0190, f02=» USER ORDER WORD P* A8 = USER ECB ADDRESS P EJECT : PRDSTAT EQU * READ STATUS H P SC A4,CRNSTA,A2 STATUS CHAR h P ANK A4,/FF " P ST A4,ECBCW,A8 RETURN STATUS P CM ECBCW+2,A8 P LDK A1,0 RET CODE OK P ABL TIODMX
0x34be70…34c004 Dummy {f00=0x010c, f01=0x0190, f02=»DKL A3,/700 P TM A3,A7 ( P RB(NZ) TIOD19 NOT OPTION SEQUENTIAL & P SRL A7,10 INDEX * 2 R P ABL(Z) SEQREA SEQ READ n & P ABL IXRDNX INDEXED SEQ READ NEXT PREADDI EQU * DIRECT READ P SRL A7,10 INDEX * 2 & P ABL(Z) RANREA DIREC
0x34c004…34c198 Dummy {f00=0x010c, f01=0x0190, f02=»IXINS EQU * P RB TIOD19 P XIF & P EJECT 2 PWRITE EQU * WRITE ORDERS @ P LC A3,FDBDBR,A6 ` P ANK A3,/3 SHARABILITY x & P RB(Z) TIOD19 ONLY INPUT ACCEPTED P LDKL A4,/100 " P LC A3,FDBNIF,A6 NR OF INDEXES P ANK A3,/FF
0x34c198…34c32c Dummy {f00=0x010c, f01=0x018e, f02=»ITE t P RB TIOD19 ERR PWRITE2 EQU * INDEXED " P TM A4,A7 > " P ABL(NZ) IXINS INDEXED INSERT P P RB TIOD19 NOT ALLOWED v P EJECT PREWRIT EQU * REWRITE ORDERS P* PDELETE EQU * DELETE ORDERS P* P LC A3,FDBDB
0x34c32c…34c4c0 Dummy {f00=0x010c, f01=0x0190, f02=» P RF(Z) REW010 NO INDEX P LDK A3,2 " P ADS A3,DWTOR,A6 ORDER INDEX 4 PREW010 EQU * X P LDKL A4,/400 l P TM A4,A7 P RF(NZ) REW020 CURRENT P SRL A7,8 P SUK A7,1 P RB(NZ) TIOD19 ERROR P ABL TIODMB DIRECT
0x34c4c0…34c654 (5, 522) Dummy {f00=0x010c, f01=0x018e, f02=»R DATA FILE) j P ABL TIODMA P IFT INDXAC=1 ( P EJECT > PSTAIND EQU * START INDEXED L P SRL A7,10 INDEX * 2 n P LD A9,ECBRL,A8 KEY LENGTH P LDK A1,2 P RF STA090 P EJECT $ PIXRARE EQU * INDEXED RANDOM READ P L
0x34c654…34c7e8 Dummy {f00=0x010c, f01=0x0190, f02=» P LDR A2,A7 P ANKL A2,/FFF9 1-4 INDEXES P RB(NZ) TIOD19 ERROR 8 P ADR A7,A6 BASE IN DATA FDB T $ P LD A2,FDBAI1,A7 INDEX FDB ADDR x P ABL(Z) TIOD19 ERR P LDR A7,A2 P* P* COPY DWT ITEMS P* P LD A1,DWTECB,
0x34c7e8…34c97c Dummy {f00=0x010c, f01=0x018e, f02=»DBRLE,A2 P SUK A1,6 KEY LENGTH PIXR050 EQU * , P CM FDBKEY,A2 @ P ADK A2,2 V P SUK A1,2 h P RB(P) IXR050 MORE TO CLEAR z P EJECT P* P* FETCH KEY TO INDEX FDB P* P LD A1,ECBBA,A8 RECORD ADDR P A
0x34c97c…34cb10 Dummy {f00=0x010c, f01=0x0190, f02=» P* ! P LD A2,FDBRLE,A7 ! P SUK A2,6 MAX KEY LGTH ! & P CWR A2,A9 ! D P RF(NG) IXR070 ! V " P LDR A2,A9 TAKE SMALLEST LGTH ! n PIXR070 EQU * ! P LDR A9,A2 SAVE ! P IFT MMUPAG=0 ! P CF A14,DMTBM FETCH KEY ! P XIF ! P IFT M
0x34cb10…34cca4 Dummy {f00=0x010c, f01=0x018e, f02=» P IFT INDXAC=1 " P* " 0 P* INCREASE KEY IF 'START GREATER ' IS REQ " $ P* " X P CWK A5,QSTA " b P RF(NE) STA020 NOT START " v P LC A2,DWTOPT,A7 " P ANK A2,/7 OPTION " P SUK A2,1 " P RF(NZ) STA020 NOT GREATER " P LDR A2,A7 "
0x34cca4…34ce38 Dummy {f00=0x010c, f01=0x018e, f02=» " t P LCR A1,A3 # P ADK A1,1 NEXT HIGHER KEY # P SCR A1,A3 # < P ANK A1,/FF OVERFLOW ? # N P RF(NZ) STA020 NO # l P CWR A2,A3 # P RB(NE) STA010 MORE BYTES # PSTA020 EQU * # P* # P* SWITCH TO INDEX FDB # P* # P LDR A
0x34ce38…34cfcc Dummy {f00=0x010c, f01=0x0190, f02=» # r P LDKL A1,EDMERR $ P LDK A4,FCUSED FC USED $ P SC A4,CRNSTA,A2 STATUSA $ > P ABL TIODMX $ ^ POPE050 EQU * $ r P LDK A1,LGTERR $ P LDKL A4,FPB:FR+8 MIN LGTH $ P CW A4,ECBRL,A8 REQ $ P ABL(G) TIODMX ERR $ PTIORRO EQU * $ P
0x34cfcc…34d160 Dummy {f00=0x010c, f01=0x0190, f02=»ERS $ r P LD A3,CRNCDF+2,A2 % $ P LD A2,CRNCDF,A2 CURRENT RECORD % & P ST A2,ECBCW,A8 % N P ST A3,ECBCW+2,A8 % f P RB TIORRO % P EJECT % PCLOSE EQU * CLOSE FILE % P* % ( P* CONNECT FILE CODE TO SYSTEM FWT % P* % $ P LD A1,DWT
0x34d160…34d2f4 (5, 523) Dummy {f00=0x010c, f01=0x0190, f02=»EARCH % $ P LDKL A2,FDBSTA SYSTEM FWT ADDR & P ST A2,2,A4 FC ENTRY & 6 P LDK A2,0 & R P LC A2,FDBLRN,A6 & d & P LD A3,FDBLRN+1,A6 LAST RECORD NR & | P RF(NZ) CLO100 & P LDR A2,A2 & P RF(NZ) CLO100 & P LDK A3,1 LRN & PCLO100 EQU * &
0x34d2f4…34d488 Dummy {f00=0x010c, f01=0x0190, f02=»,CRNCDF+2,A2 CURR LOG REC NO & . P LD A2,CRNCDF,A2 NO FILE ID FOR DATA FILE ' $ P ADK A3,1 CRN+1 ' V P RF(O) SEQR10 OVERFLOW ' n P RF SEQR20 ' PSEQR10 EQU * ' " P ANKL A3,/7FFF REMOVE OVERFLOW ' P ADK A2,1 ADD CARRY ' PSEQR20 EQU * ' P
0x34d488…34d61c Dummy {f00=0x010c, f01=0x018e, f02=»CW,A8 REC NR ' P LD A3,ECBCW+2,A8 ( PRAN050 EQU * ( . $ P LDK A1,LGTERR INCORRECT LENGTH ( B P LD A4,ECBRL,A8 ( j , P ABL(NP) TIODME ERROR RETURN IF RL <= 0 ( P RF TIODMA ( P EJECT ( P IFT INDXAC=1 ( PIXINS EQU * INDEXED INSRERT (
0x34d61c…34d7b0 Dummy {f00=0x010c, f01=0x0190, f02=» P LDK A5,8 ) PIXINS3 EQU * ) P LDR A2,A6 FDB DATA ) * P ADR A2,A5 ) F P LD A3,FDBADF,A2 FDB INDEX ) X P RF(Z) IXINS4 NO INDEX ) z P LD A1,FDBKA,A3 KEY ADDR ) & P AD A1,ECBBA,A8 ADD USER BUF ADDR ) " P LDK A2,FDBKEY KEY AREA DISPL ) P
0x34d7b0…34d944 Dummy {f00=0x010c, f01=0x0190, f02=» EQU * ) P SUK A5,2 * P RB(NZ) IXINS3 MORE INDEXS * P XIF * B P* * N $ PSEQWRITE EQU * SEQUENTIAL WRITE * X P* * P LDK A2,2 * P ADS A2,DWTOR,A6 ORDER INDEX * P LC A2,FDBLRN,A6 * P LD A3,FDBLRN+1,A6 LRN * P IFT INDXAC=1 *
0x34d944…34dad8 Dummy {f00=0x010c, f01=0x0190, f02=»6 * P ADS A1,DWTOR,A6 ORDER INDEX + P SUK A7,2 + . P LDR A2,A7 + @ P ANKL A2,/FFF9 1-4 INDEXES + R P ABL(NZ) TIOD19 ERR + t P LD A2,DWTOR,A6 + ( P LD A3,DWTECB,A6 ITEMS TO INDEX FDB + P* + P* SWITCH FDB + P* + P ADR A7,A6
0x34dad8…34dc6c Dummy {f00=0x010c, f01=0x0190, f02=»MS FROM DATA FILE + | P* , P* GET CRN , $ P* , 8 P LDK A2,0 , B P LDK A3,0 , T P* , f P* CHECK THAT FILE ID IS OK , p P* , P LC A7,FWTFNR,A6 FILE NR , P CC A7,CRNCIF,A4 , . P RF(NE) IXR020 OTHER INDEX FILE IS CURRENT , P
0x34dc6c…34de00 Dummy {f00=0x010c, f01=0x018e, f02=»XR030 OVERFLOW , P RF IXR040 - , PIXR030 ANKL A3,/7FFF REMOVE OVERFLOW BIT - ( P ADK A2,1 ADK CARRY - X PIXR040 EQU * - t * P RF TIODMA DO NOT CHECK EOF CONDITION - P EJECT - PSTARTO EQU * START ORDER - P IFT INDXAC=1 - P LDR A4,A7 -
0x34de00…34df94 (5, 524) Dummy {f00=0x010c, f01=0x0190, f02=» P ECR A4,A7 . P ANK A4,/7 OPTION . P SUK A4,1 . 0 P RF(NZ) TIODMA NOT GREATER . B P RB IXR020 GET NEXT REC NR . d P EJECT . P* . P************************* . P* DMTASK ACTIVATION * . P************************* . P* .
0x34df94…34e128 Dummy {f00=0x010c, f01=0x0190, f02=» LD A3,ECBCW+2,A8 . PTIODMC EQU * / P* / . P* NO EA FOR OTHER TASK / 8 P* / X P LD A1,FDBADF,A6 FDB ADDR / b P CF A14,EATEST / P LDR A4,A4 RTN INF / P RF(N) TIODPE EA OTHER TASK / PTIODMD EQU * / P LDR A1,A2 / P LDR A2,A3
0x34e128…34e2bc Dummy {f00=0x010c, f01=0x0190, f02=» P* 0 . P* ACTIVATE DMTASK WITH FDB ADDRESS IN A1 0 P* 0 @ PTIOD68 EQU * 0 J P* 0 ^ P* PREPARE DM INTERFACE 0 h P* 0 P LDKL A8,'#D' 0 P INH 0 P LDK A7,0 0 P LD A1,DWTOR,A6 ORDER 0 P ANK A1,/FF 0 P SUK A1,OPENOF 0
0x34e2bc…34e450 Dummy {f00=0x010c, f01=0x0190, f02=» P LDR A5,A2 1 P RF(Z) TASHLT 1 P LD A1,TTB:SA,A2 1 , P RF(Z) TIOD70 NOT ACTIVE 1 D P LDK A7,0 1 d P EJECT 1 v P* 1 P* GET SECONDARY DMTASK 1 P* 1 & P LC A1,FWTVOL,A6 VOLUME FILE CODE 1 PTIOD69 EQU * 1 P CC A1,DFTAB,A7 1
0x34e450…34e5e4 Dummy {f00=0x010c, f01=0x018e, f02=»ASK REL ID 1 r PTIOD72 EQU * 2 P ADR A7,A8 TASK ID 2 & P CF A15,FNDTID A2:=TTAB ADDR 2 @ P LDR A5,A2 2 d P RF(NZ) TIOD70 2 v ( PTASHLT EQU * ABNORMAL SYSTEM ERRORS 2 P LDK A1,/11 DM ERR 2 P CF A15,HALT 2 * PTIOD70 LDKL A2,DMTASK DISPATCH ADD
0x34e5e4…34e778 Dummy {f00=0x010c, f01=0x0190, f02=» P EJECT 3 P* 3 P************** 3 P* TIODME * 3 2 P************** 3 H P* 3 ^ J P* TIODM ERROR CALL TENDIO WITH RETURN CODE IN A1 AND GOTO DISPATCHER 3 h P* 3 " PTIODPE EQU * PROTECT ERR EXIT 3 P SUR A9,A9 3 " P LC A9,FDBTNR,A6
0x34e778…34e90c Dummy {f00=0x010c, f01=0x40ae, f02=»DDR 3 p PTIODMX EQU * 4 P* A1 = ERROR CODE 4 P* A6 = FDB ADDRESS 4 < P INH 4 X , P ABL DISEND CALL TENDIO GOTO DISPATCHER 4 d P* 4 P END 4 @ 4 3 h P* 3 " PTIODPE EQU * PROTECT ERR EXIT 3 P SUR A9,A9 3 " P LC A9,FDBTNR,A6
0x34e90c…34eaa0 Dummy {f00=0x010c, f01=0x2008, f02=» 5
0x34eaa0…34ec34 (5, 525) Dummy {f00=0x010d, f01=0x0190, f02=» EQU TTPAG-* DISPL. TO 'ENTRY-POINTER' 5 P DATA 0 6 . P 6 > PMMBEG EQU TABBE-* 6 F P EJECT 6 ` P 6 n 6 P*** *** 6 z 6 P*** S U B R O U T I N E S *** 6 6 P*** -COMMON TO ALL PARTS
0x34ec34…34edc8 Dummy {f00=0x010d, f01=0x0190, f02=»*** 6 b 6 P************************************************* 7 P 7 F P 7 R , P** E R R O R ** 7 ^ , P** ** 7 , P** ** 7 , P** ERROR HANDLING ROUTINE
0x34edc8…34ef5c Dummy {f00=0x010d, f01=0x0190, f02=»TIVE CALLING ADDRESS** 7 ~ , P** (REG-CONTENTS IS SAVED) ** 8 , P**************************************** 8 N P 8 ~ PERROR EQU * 8 P ST A2,SAVE01,A13 SAVE A2 8 . P LD A2,4,A14 GET CALLING ABSOLUTE ADDRESS 8 P SUR A2,A13 RELATIVE DITO
0x34ef5c…34f0f0 Dummy {f00=0x010d, f01=0x0190, f02=» 8 n & P** ** 9 & P** ** 9 2 & P** MOVE BLOCKS INSIDE MEMORY ** 9 & P** ** 9 & P** INPUT:A1=FROM-ADDRESS ** 9 & P** A2=TO-ADDRESS ** 9 & P**
0x34f0f0…34f284 Dummy {f00=0x010d, f01=0x0190, f02=»******************* 9 P : PMOVE EQU * : ( $ PMOVES ADR A1,A3 END OF FROM AREA : : P ADR A2,A3 END OF TO-AREA : b & P LD A4,SCTEFA GET END OF FREE AREA : P TNM A2,A4 SIGN EQUAL? : P RF(NN) MOVNN YES : ( P CWR A4,A2 COMPARE WHEN UNEQUAL SI
0x34f284…34f418 Dummy {f00=0x010d, f01=0x0190, f02=» LDKL A1,LMP3 INDICATE MEMORY OVERFLOW : P CALL ERROR ; . PMOVE10 SUK A3,1 DEC LENGTH ; B P RF(N) MOVE20 ALL DONE ; d P SUK A1,1 ; P SUK A2,1 ; P LCR A4,A1 GET CHARACTER ; P SCR A4,A2 STORE CHARACTER ; P RB MOVE10 ; PMOVE20 RTN A14
0x34f418…34f5ac Dummy {f00=0x010d, f01=0x0190, f02=» ** ; 4 P** ** < 2 4 P** USES ROUTINE 'MOVE' ABOVE. TO-ADDRESS IS ** < j 4 P** ASSUMED TO BE DATA-PART OF MEMORY ** < 4 P** LSTADR POINTS AT LAST (HIGHEST) FREE *
0x34f5ac…34f740 Dummy {f00=0x010d, f01=0x0190, f02=» A1 AS IN 'MOVE' ** < 4 P** OUTPUT: A2=TO-ADDRESS (LSTADR UPDATED) ** = * 4 P** WORK-REG: A4 ** = b 4 P*********************************************** = P = PMOVING EQU * = & P LD A2,LSTADR,A13 GET
0x34f740…34f8d4 (5, 526) Opaque[0x194]
0x34f8d4…34fa68 # DirEnt {nam=»TIODMX«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x21a8, f03=0x0000}
0x34f8d4…34fa68 IdxSect {
0x34f8d4…34fa68 f00 = 0x010d // 0x34f8d4 @0x0
0x34f8d4…34fa68 f01 = 0x0002 // 0x34f8d6 @0x2
0x34f8d4…34fa68 gno = [ // 0x34f8d8 @0x4
0x34f8d4…34fa68 [0x00]: C0x010d.0x1.0
0x34f8d4…34fa68 ]
0x34f8d4…34fa68 }
0x34fa68…34fbfc Dummy {f00=0x010d, f01=0x018e, f02=» 2 P IDENT TIODMX REL 10.0 80-03-14 870105041000 P : P* B 8 P**************************************************** L P* $ P* PHILIPS TERMINAL SYSTEM PTS P* 8 P**************************************************** P* (
0x34fbfc…34fd90 Dummy {f00=0x010d, f01=0x403c, f02=» $ P DATA /6300 SOMETHING BAD, TRAP P END ,@ 8 : P* B 8 P**************************************************** L P* $ P* PHILIPS TERMINAL SYSTEM PTS P* 8 P**************************************************** P* (
0x34fd90…34ff24 Dummy {f00=0x010d, f01=0x2008, f02=» ES | PTTABE EQU * P* & P END 0@ <LER TERMINAL , P* T P* ^ P ENTRY TTABX TABLE ENTRY h P* P* P* P* P* PTTABX DATA 0 P DATA 60 TERMINAL STATUS & P DATA /EE TERMINAL IDENTIF
0x34ff24…3500b8 Dummy {f00=0x010d, f01=0x0190, f02=»ADF@ N FDBAI1 P FDBDBR: X " FDBDMIL Y 6 FDBMRO Z J FDBBLZ ^ FDBMEC ^ r FDBKEY ^ CRNTID CRNSTA CRNCDF TIODM ECBCW * & 6
0x3500b8…35024c Dummy {f00=0x010d, f01=0x0190, f02=» _ Y A X T X % T U , ( $P ^ =A Y 6T * CRNGETG Z , ( P H I T l , ( I $ C C T , ( / X?j ?j W _l X X , ( O # Xt
0x35024c…3503e0 Dummy {f00=0x010d, f01=0x0190, f02=»PB:FR ECBRL , ( 6P I , ( @ B Y < H H C N FNDFDB ~ , ( C _ X "" * & 6 Q X C X DT T W Y , ( H H S W
0x3503e0…350574 (5, 527) Opaque[0x194]
0x350574…350708 # DirEnt {nam=»TLDSEG«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x21b0, f03=0x0000}
0x350574…350708 IdxSect {
0x350574…350708 f00 = 0x010d // 0x350574 @0x0
0x350574…350708 f01 = 0x0006 // 0x350576 @0x2
0x350574…350708 gno = [ // 0x350578 @0x4
0x350574…350708 [0x00]: C0x010d.0x2.0
0x350574…350708 [0x01]: C0x010d.0x3.0
0x350574…350708 [0x02]: C0x010e.0x0.0
0x350574…350708 ]
0x350574…350708 }
0x350708…35089c Dummy {f00=0x010d, f01=0x0190, f02=» 2 P IDENT TLDSEG REL 10.0 80-03-14 870105041000 P : P* B P* L 6 P************************************************** V P* $ P* PHILIPS TERMINAL SYSTEM PTS P* P* TLDSEG = LOAD SEGMENT P* P* P*
0x35089c…350a30 Dummy {f00=0x010d, 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
0x350a30…350bc4 Dummy {f00=0x010d, 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 SEG:NS NUMBER OF SEGMENTS
0x350bc4…350d58 Dummy {f00=0x010d, f01=0x0190, f02=»TTAB SAVE AREA P EXTRN TTB:MT MMU TABLE & P EXTRN TTB:CB CURRENT SEGMENT BASE 6 ( P EXTRN TTB:SP SEGMENT TABLE ADDRESS ` ( P EXTRN TTB:SB SEGMENT BLOCK ADDRESS 2 P EXTRN QLTDSK ACTIVATE LDTASK AT ENTRY LT:DSK & P EXTRN SCTMMP MMU TABLE PA
0x350d58…350eec Dummy {f00=0x010d, f01=0x0190, f02=» P* . P***************************************** P* @ P* CONDITIONAL ASSEMBLY J P* h . P***************************************** r P* . P* A PROGRAM VERSION USING TOSS MMU PAGING * P* IS OBTAINED BY SETTING MMUPAG EQU 1.
0x350eec…351080 Dummy {f00=0x010d, f01=0x0190, f02=»ETTING CPU852 EQU 0. z P* PCPU852 EQU 1 & P* : * D . ** A PROGRAM VERSION USING TOSS DISC PAGING N * &* IS OBTAINED BY SETTING DSKPAG EQU 1. * PDSKPAG EQU 0 * P EJECT TLDSEG P* P* P******
0x351080…351214 (5, 528) Dummy {f00=0x010d, f01=0x0190, f02=» IS ENTERED FROM THE LKM HANDLER & P* WITH THE FOLLOWING PARAMETERS: ( P* R 4 P* A2 = DISPATCH ADDRESS (NOT UPDATED BY IHLKM) P* A5 = TTAB ADDRESS P* A7 = SEGMENT NUMBER P* ( P* IT RETURNS TO CALLING TASK WITH " P
0x351214…3513a8 Dummy {f00=0x010d, f01=0x0190, f02=» ERROR, ELSE z ( P* A7 = -2 IF DISC I/O ERROR, ELSE $ P* A7 = -3 IF DISC NOT OPERABLE @ P* h 2 P* WHEN REQUESTED SEGMENT IS ALREADY IN CORE: r < P* THE REQUEST WILL NOT GO THROUGH THE DISPATCHER AFTER > P* COMPLETION, THUS NO TASK SWI
0x3513a8…35153c Dummy {f00=0x010d, f01=0x0190, f02=»S NOT IN CORE TLDSEG WILL t : P* ACTIVATE LDTASK WHICH WILL LOAD SEGMENT INTO CORE. " P* ` P* j P EJECT TLDSEG t P* & P* CHECK VALIDITY OF SEGMENT NUMBER P* PTLDSEG EQU * LOAD SEGMENT $ P LD A3,TTB:SP,A5 SEGTAB ADDR
0x35153c…3516d0 Dummy {f00=0x010d, f01=0x0190, f02=»OO BIG f P RF(NG) TLDS00 OK P* ( $ PTLDERR LDK A6,/FF INDICATE ERROR 2 , P ABL LKM030 BRANCH TO LKM REQUEST ERROR Z P* P* GET SEGMENT BLOCK ADDRESS. P* UPDATE RETURN ADDRESS P* PTLDS00 EQU * , P SLL A1,3 ADJUST F
0x3516d0…351864 Dummy {f00=0x010d, f01=0x0190, f02=»S v P* P IFT DSKPAG=0 $ P SUKL A15,4 ADJUST STACKPOINTER * . P ST A2,4,A15 SET DISPATCH ADDRESS ON STACK R P XIF P* " P ADK A7,0 CHECK SEGMENT NUMBER P RF(NZ) TLDS05 NOT SEGMENT 0 0 P ST A7,TTB:SB,A3 RESET SEGMENT BLOCK
0x351864…3519f8 Dummy {f00=0x010d, f01=0x0190, f02=»R r . P ST A2,4,A15 SET DISPATCH ADDRESS ON STACK P XIF < P RF TLDS40 H P* Z P EJECT TLDSEG d P* | P* PTLDS05 EQU * P IFT DSKPAG=1 2 P ST A1,TTB:SB,A3 UPDATE SEGMENT BLOCK ADDRESS " P LDR* A4,A1 GET SEGMENT
0x3519f8…351b8c Dummy {f00=0x010d, f01=0x0190, f02=»* 6 P CF A15,QLTDSK ACTIVATE LOAD TASK AT ENTRY LT:DSK P ABL TDISP GO TO DISPATCHER D P* h PTLDS10 EQU * r $ P SUKL A15,4 ADJUST STACKPOINTER . P ST A2,4,A15 SET DISPATCH ADDRESS ON STACK P XIF P* & PTLDS15 EQU * ENTRY
0x351b8c…351d20 Dummy {f00=0x010d, f01=0x0190, f02=» l P* & P LDR* A2,A1 GET QUEUE LINK FORWARD * P RF(Z) TLDS20 PAGE BLOCK NOT IN QUEUE < , P LD A4,PAG:QB,A1 GET QUEUE LINK BACKWARD j 4 P CMR A1 RESET QUEUE LINK FORWARD OF REMOVED BLK " P STR A2,A4 UPDATE QUEUE LINKS P ST A4,PAG:QB,A2
0x351d20…351eb4 (5, 529) Dummy {f00=0x010e, f01=0x0190, f02=»NTRY USED BY LDTASK & P LD A1,PAG:PA,A1 GET PAGE ADDRESS P* F P IFT MMUPAG=1 P P ECR A2,A1 f P ANK A2,/FC x P* 4 P* GET PAGE ENTRY/ENTRIES TO UPDATE IN MMU TABLE P* 0 P AD A3,SCTMMP POINT TO FIRST USED PAGE ENTRY
0x351eb4…352048 Dummy {f00=0x010e, f01=0x0190, f02=»A3 UPDATE PAGE ENTRY P SUK A4,1 ( P RF(NP) TLDS30 NO MORE PAGE ENTRIES . & P ADK A3,2 POINT TO NEXT PAGE ENTRY Z " P ADK A2,4 UPDATE PAGE ADDRESS P RB TLDS25 P* P EJECT TLDSEG P* P* 4 PTLDS30 ANKL A1,/300 CO
0x352048…3521dc Dummy {f00=0x010e, f01=0x018e, f02=» 2 P ES* A1,TTB:CB,A5 UPDATE CURRENT SEGMENT BASE P XIF > P* J P IFT MMUPAG=0 T PTLDS40 EQU * j 2 P ST* A1,TTB:CB,A5 UPDATE CURRENT SEGMENT BASE ~ P XIF P* P IFT CPU852=0 P LDR A6,A5 $ P ML 6,TTB:SA+2,A6 REST
0x3521dc…352370 Dummy {f00=0x010e, f01=0x40f0, f02=» n P LD A2,TTB:SA+4,A5 P LD A3,TTB:SA+6,A5 " P LD A4,TTB:SA+8,A5 < P LD A6,TTB:SA+12,A5 V P LD A5,TTB:SA+10,A5 r $ P RTN A15 RETURN TO CALLING TASK P XIF P* P* P* END @ P ML 6,TTB:SA+2,A6 REST
0x352370…352504 Dummy {f00=0x010e, f01=0x2008, f02=» NT TLDSEG PREREL.9.1 780907 BOFE END 6@ B
0x352504…352698 Dummy {f00=0x010e, f01=0x0190, f02=» Z < P** M O V D W B ** [ < P** ** [ L < P** ** [ < P** SEARCH T:D FOR DUMMY W.B. IF ANY FOUND, MOVE D.T. ** [
0x352698…35282c Dummy {f00=0x010e, f01=0x0190, f02=»INPUT : A12=T:D-ADDRESS ** [ < P** A8= POINTER TO T:A-ADDRESS ** < < P** BIT=BIT NUMBER SAT IN DWBMSK ( 0-15 ) ** | < P** WORK.REGS: A1-A4 ** < P************
0x35282c…3529c0 Dummy {f00=0x010e, f01=0x0190, f02=»MOVD10 LD A4,BIT,A13 GET BIT NUMBER " P ADK A4,1 FIRST WAT-ELEMENT =1 ] , P IFT CREDIT-MMUPAG=1 ] R P LD A2,WATLEN,A12 ] n P XIF ] P IFT CREDIT+MMUPAG=2 ] P EL A2,WATLEN,A12 ] P XIF ] P IFF CREDIT=0 ] " P SUR A2,A6 ACTUAL TABLE LENG
0x3529c0…352b54 (5, 530) Opaque[0x194]
0x352b54…352ce8 # DirEnt {nam=»TMMLKM«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x21c8, f03=0x0000}
0x352b54…352ce8 IdxSect {
0x352b54…352ce8 f00 = 0x010e // 0x352b54 @0x0
0x352b54…352ce8 f01 = 0x0006 // 0x352b56 @0x2
0x352b54…352ce8 gno = [ // 0x352b58 @0x4
0x352b54…352ce8 [0x00]: C0x010e.0x1.0
0x352b54…352ce8 [0x01]: C0x010e.0x2.0
0x352b54…352ce8 [0x02]: C0x010e.0x3.0
0x352b54…352ce8 ]
0x352b54…352ce8 }
0x352ce8…352e7c Dummy {f00=0x010e, f01=0x0190, f02=» 2 P IDENT TMMLKM REL 10.0 80-03-14 870105041000 P : P* B P* L 6 P************************************************** V P* $ P* PHILIPS TERMINAL SYSTEM PTS P* ( P* TMMLKM = TOSS MMU LKM PROCESSORS P* P*
0x352e7c…353010 Dummy {f00=0x010e, 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**
0x353010…3531a4 Dummy {f00=0x010e, f01=0x0190, f02=» MMU TABLE | & P ENTRY TLUSEG LOCK/UNLOCK SEGMENT P EJECT TMMLKM < P* T P* ^ P************* h P* EXTERNALS * ~ P************* P* P* 0 P EXTRN FNDTID FIND TTAB ADDRESS FROM TASK ID P EXTRN RELPAG RELEASE
0x3531a4…353338 Dummy {f00=0x010e, f01=0x0190, f02=» IN TTAB l ( P EXTRN TTB:SP SEGMENT TABLE ADDRESS $ P EXTRN SEG:NS NUMBER OF SEGMENTS < P EJECT TMMLKM d P* | P* P********** P* TCHPAG * P********** P* P* 2 P* THIS IS THE CHANGE MMU PAGE LKM PROCESSOR.
0x353338…3534cc Dummy {f00=0x010e, f01=0x0190, f02=» AT A TIME. ` P* * P* IT IS ENTERED FROM THE LKM HANDLER & P* WITH THE FOLLOWING PARAMETERS: L P* v P* A5 = TTAB ADDRESS ( P* A7 = PAGE TO BE CHANGED, 0 - 15 * P* A8 = NEW LOCATION OF PAGE, 0 - 63 P* < P* IT
0x3534cc…353660 Dummy {f00=0x010e, f01=0x018e, f02=»(IF ANY) p 0 P ADR A7,A7 ADJUST FOR INDEXING IN MMU TABLE P ADR A7,A5 ADD TTAB ADDRESS D P LDR A2,A8 NEW PAGE LOCATION h . P ANK A2,/3F SKIP IRRELEVANT BITS (IF ANY) P SLL A2,2 < P SC A2,TTB:MT,A7 STORE NEW LOCATION OF PAGE IN MMU TABLE
0x353660…3537f4 (5, 531) Dummy {f00=0x010e, f01=0x0190, f02=» P* TCHMMU * P********** P* , P* 6 4 P* THIS IS THE CHANGE MMU TABLE LKM PROCESSOR. @ P* x D P* TCHMMU WILL CHANGE THE MMU TABLE CONTENTS OF REQUESTING TASK 4 P* TO THE MMU TABLE CONTENTS OF SPECIFIED TASK. P*
0x3537f4…353988 Dummy {f00=0x010e, f01=0x0190, f02=»A7 = TASK IDENTIFICATION OF SEARCHED TASK P* 2 ( P* IT RETURNS TO CALLING TASK WITH < P* THE FOLLOWING PARAMETER: h P* 2 P* A7 = UNCHANGED IF REQUEST SUCCESSFUL, ELSE & P* A7 = -1 IF TASK NOT IN SYSTEM P* " PTCHMMU E
0x353988…353b1c Dummy {f00=0x010e, f01=0x0190, f02=» TL TTB:MT,A2 LOAD SEARCHED MMU TABLE CONTENTS 4 P TS TTB:MT,A5 STORE IN MMU TABLE OF CALLING TASK 6 * P RB T:DISP QUEUE TASK FOR DISPATCHING n P* P EJECT TMMLKM P* P* P********** P* TLUSEG * P********** P
0x353b1c…353cb0 Dummy {f00=0x010e, f01=0x018e, f02=» CORE RESIDENT, ` D P* UNTIL AN UNLOCK SEGMENT REQUEST IS ISSUED FOR THAT SEGMENT. P* ` * P* IT IS ENTERED FROM THE LKM HANDLER j & P* WITH THE FOLLOWING PARAMETERS: P* P* A5 = TTAB ADDRESS P* A7 = SEGMENT NUMBER &
0x353cb0…353e44 Dummy {f00=0x010e, f01=0x0190, f02=» j " P* THE FOLLOWING PARAMETERS: P* . 2 P* A7 = UNCHANGED IF REQUEST SUCCESSFUL, ELSE 8 P* A7 = -1 IF REQUEST ERROR n P* P* P EJECT TMMLKM P* P* $ PTLUSEG EQU * LOCK/UNLOCK SEGMENT $ P LD A4,TTB:SP,
0x353e44…353fd8 Dummy {f00=0x010e, f01=0x0190, f02=»GMENT NUMBER TOO BIG t P RF(NG) TLUS00 OK P* 6 PTLCERR EQU * @ , P ABL LKMRQE BRANCH TO LKM REQUEST ERROR T P* PTLUS00 EQU * , P SLL A3,3 ADJUST FOR INDEXING IN SEGTAB " P ADR A3,A4 ADD SEGTAB ADDRESS " P LCR A4,A3 GET S
0x353fd8…35416c Dummy {f00=0x010e, f01=0x018e, f02=»T IT IS t " P RF(NZ) TLUS10 UNLOCK SEGMENT P* 6 P EJECT TMMLKM @ P* X P* LOCK SEGMENT b P* x 4 P ORRS A4,A3 INDICATE SEGMENT TO BE CORE RESIDENT P RB T:DISP P* P* UNLOCK SEGMENT P* PTLUS10 EQU *
0x35416c…354300 Dummy {f00=0x010e, f01=0x4036, f02=» P* P* P* END &@ 2* 6 P EJECT TMMLKM @ P* X P* LOCK SEGMENT b P* x 4 P ORRS A4,A3 INDICATE SEGMENT TO BE CORE RESIDENT P RB T:DISP P* P* UNLOCK SEGMENT P* PTLUS10 EQU *
0x354300…354494 (5, 532) Dummy {f00=0x010e, f01=0x2008, f02=» NT TCHPAG PRR 9.1 78-10-16 870105040910 END <@ H
0x354494…354628 Dummy {f00=0x010e, f01=0x0190, f02=» n P IFF CREDIT=0 o P RB ALLB10 o P o 0 , P* RESERVE STACK AND SET STACKPOINTERS * o < P o l PALLB70 EQU * o t P IFT CREDIT-MMUPAG=1 o P LDR* A1,A8 GET T:A-ADDRESS o P LD A4,LSTADR,A13 o P SUK A4,2 o P LD A3,CSE,A1 GET ST
0x354628…3547bc Dummy {f00=0x010e, f01=0x0190, f02=»TR A4,A1 STACK POINTER o P CALL MOVING ALLOCATE STACK p P ST A2,STKE,A1 SET STACK-END p B P XIF p f P IFT CREDIT+MMUPAG=2 p r P ELR A1,A8 GET T:A-ADDRESS p P EL A3,CSE,A1 GET STACK SIZE p * P RF(NZ) ALLB80 USER DEFINED STACK SIZE p $ P LDK A
0x3547bc…354950 Dummy {f00=0x010e, f01=0x0190, f02=»TACK END p z " P EL A3,STKB,A1 GET STACK SIZE q " P ADR A2,A3 COMPUTE STACK BASE q 6 $ P ES A2,STKB,A1 STORE STACK BASE q * P ESR A2,A1 STORE CURRENT STACK POINTER q P XIF q P IFF CREDIT=0 q P RTN A14 q P EJECT q P q 4 P**
0x354950…354ae4 Dummy {f00=0x010e, f01=0x0190, f02=»SSES IN ** q j 4 P** FORMAT CONTROL BLOCK ** r 4 P** ** r J 4 P** INPUT : A8=T:A-ADDRESS ** r 4 P** A12=T:D-ADDRESS ** r 4 P** CIA (IN T:
0x354ae4…354c78 Dummy {f00=0x010e, f01=0x0190, f02=»** r b 4 P************************************************ s P s B PMOVT:A EQU * s J P IFT CREDIT-MMUPAG=1 s ^ P LDR* A1,A8 GET T:A-ADDRESS s z ( P LD A3,WATLEN,A12 GET LENGTH OF WAT s P SLL A3,2 BYTES s , P SU A3,CIA,A1 ADD DISPLACEMENT TO STAR
0x354c78…354e0c Dummy {f00=0x010e, f01=0x0190, f02=»A-ADDRESS s | $ P SU A1,CIA,A4 'OLD' T:A-ADDRESS t P t : 8 P* COMPUTE AND STORE ADDRESSES TO DATA-SETS IN FCB * t B P t ~ P LD A3,FCD,A12 ANY FCD? t P RF(Z) MOVT10 NO! t P ADR A3,A2 START OF FCB t P LDR A4,A2 SAVE T:A-ADDRESS t 0 P LD
0x354e0c…354fa0 Dummy {f00=0x010e, f01=0x0190, f02=»MOVT05 EQU * t P ADS A4,FCBDD1,A3 u P ADS A4,FCBDD2,A3 u . PMOVT10 RTN A14 u H P XIF u ^ P IFT CREDIT+MMUPAG=2 u j P u P ELR A1,A8 GET T:A-ADDRESS u ( P EL A3,WATLEN,A12 GET LENGTH OF WAT u P SLL A3,2 BYTES u P EL A10,CIA,A1 u $
0x354fa0…355134 (5, 533) Opaque[0x194]
0x355134…3552c8 # DirEnt {nam=»TOSSFM«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x21e0, f03=0x0000}
0x355134…3552c8 IdxSect {
0x355134…3552c8 f00 = 0x010f // 0x355134 @0x0
0x355134…3552c8 f01 = 0x000a // 0x355136 @0x2
0x355134…3552c8 gno = [ // 0x355138 @0x4
0x355134…3552c8 [0x00]: C0x010f.0x0.0
0x355134…3552c8 [0x01]: C0x010f.0x1.0
0x355134…3552c8 [0x02]: C0x010f.0x2.0
0x355134…3552c8 [0x03]: C0x010f.0x3.0
0x355134…3552c8 [0x04]: C0x0110.0x0.0
0x355134…3552c8 ]
0x355134…3552c8 }
0x3552c8…35545c Dummy {f00=0x010f, f01=0x0190, f02=» 2 P IDENT TOSSFM REL 10.0 80-03-14 870105041000 P : P* B P* L 6 P************************************************** V P* 6 P* PHILIPS TERMINAL SYSTEM PTS * P* 6 P* TOSSFM = TOSS FILE MANAGEMENT LKM PROC
0x35545c…3555f0 Dummy {f00=0x010f, f01=0x0190, f02=» TOSS FILE MANAGEMENT LKM PROCESSOR HANDLES 4 P* PREPARATIONS FOR DISC I/O, AND ACTIVATION OF 4 2 P* THE FILE MANAGEMENT TASK (FMTASK) FOR FILE l " P* ADMINISTRATION FUNCTIONS. P* P* P EJECT TOSSFM P* P* P
0x3555f0…355784 Dummy {f00=0x010f, f01=0x018e, f02=» ENTRY FCHECK CHECK ACCESS PAR. AND RETURN FWT ADDRESS " P ENTRY FCHEC2 FCHECK 2ND ENTRY > P EJECT TOSSFM d P* | P* P************* P* EXTERNALS * P************* P* P* P EXTRN FMRDWR FM READ/WRITE .
0x355784…355918 Dummy {f00=0x010f, f01=0x0190, f02=» " P EXTRN TIO:FM FM ENTRY IN TIO , P EXTRN ACTDIS ACTIVATE TASK AND DISPATCH * " P EXTRN FNDDWD FIND DWT ADDRESS Z 0 P EXTRN TIOERR ERROR: QUEUE TASK AND DISPATCH * P EXTRN SCTFWT FWT CHAIN START ADDRESS " P EXTRN SCTNOF NUMBER OF FILES ( P
0x355918…355aac Dummy {f00=0x010f, f01=0x0190, f02=»LOCK IN FWT n P EXTRN EWTEXL EXTENT LENGTH P EXTRN EWTEXB EXTENT BASE 8 " P EXTRN EWTVOL VOLUME FILE CODE Z & P EXTRN ECBRL ECB REQUESTED LENGTH $ P EXTRN ECBCW1 ECB CONTROL WORD 1 $ P EXTRN ECBCW2 ECB CONTROL WORD 2 P EXTRN DWTST D
0x355aac…355c40 Dummy {f00=0x010f, f01=0x0190, f02=»L 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 0 P* P* 6 P* A PROGRAM VERSION USING THE EX
0x355c40…355dd4 (5, 534) Dummy {f00=0x010f, f01=0x0190, f02=»M VERSION SUPPORTING SPLIT EXTENT I/O * P* IS OBTAINED BY SETTING XTSPLI EQU 1. . P* PXTSPLI EQU 0 f P* z P EJECT TOSSFM P* P* P********** P* TOSSFM * P********** P* P* 8 P* THIS IS TH
0x355dd4…355f68 Dummy {f00=0x010f, f01=0x0190, f02=» n P* P* A5 = TTAB ADDRESS P* A7 = ORDER CODE 0 P* A8 = ECB ADDRESS L P* h . P* WHEN FILE ADMINISTRATION IS REQUESTED, r ( P* TOSSFM WILL ACTIVATE THE FMTASK. P* . P* WHEN I/O FUNCTION IS REQUESTED, TOSSFM
0x355f68…3560fc Dummy {f00=0x010f, f01=0x0190, f02=»JECT TOSSFM P* P* 4 PTOSSFM EQU * FILE MANAGEMENT LKM PROCESSOR ENTRY * P* b P* CHECK ORDER CODE l P* LDR A2,A7 ORDER CODE P ANK A2,/FF SKIP OPTION P XRK A2,/80 WAIT BIT SUK A2,/01 P RF(Z) FM:
0x3560fc…356290 Dummy {f00=0x010f, f01=0x0190, f02=»E x SUK A2,/11-/05 P RF(Z) FM:030 PHYSICAL READ " SUK A2,/15-/11 F P RF(Z) FM:030 PHYSICAL WRITE ^ SUK A2,/21-/15 $ P RF(Z) FM:010 OPEN/CREATE/EXTEND SUK A2,/22-/21 4 P RF(NZ) FM:RQE REQUEST ERROR IF NOT CLOSE/DELE
0x356290…356424 Dummy {f00=0x010f, f01=0x0190, f02=»ARAMETERS: h * " P* A1 = ORDER CODE AND OPTION * A2 = DISPATCH ADDRESS B * %* A3 = TTAB ADDRESS OF CALLING TASK d P* A4 = ECB ADDRESS * A5 = FMTASK TTAB ADDRESS * PFM:010 EQU * $ P LDR A1,A7 ORDER CODE AN
0x356424…3565b8 Dummy {f00=0x010f, f01=0x0190, f02=»DR A4,A8 ECB ADDRESS ( # LDKL A5,TTABFM FMTASK TTAB ADDRESS , P ABL ACTDIS ACTIVATE FMTASK AND DISPATCH H * x EJECT TOSSFM * * ********** * FM I/O * ********** * $ * FILE MANAGEMENT I/O FUNC
0x3565b8…35674c Dummy {f00=0x010f, f01=0x0190, f02=»DK A1,0 CHECK RETURN CODE P RF(Z) FM:050 OK " * : PFM:040 EQU * D P LDR A3,A1 RETURN CODE X . P ABL TIOERR ERROR: QUEUE TASK AND DISPATCH v * EJECT TOSSFM * " P* CHECK RELATIVE SECTOR NUMBER * PFM:0
0x35674c…3568e0 Dummy {f00=0x010f, f01=0x0190, f02=» MMUPAG=1 , ' EL A1,ECBCW1,A8 RELATIVE SECTOR NUMBER EL A2,ECBCW2,A8 B XIF Z * f P RF(NZ) FM:060 p ADK A1,0 , P RF(Z) FM:RQE RELATIVE SECTOR NUMBER = 0 * PFM:060 EQU * P ECR A6,A1 P ANK A6,/FF
0x3568e0…356a74 (5, 535) Dummy {f00=0x010f, f01=0x0190, f02=»RE d P LDKL A14,/7FFF P* " P EJECT TOSSFM , P* D ( P* SEARCH THE FILE EXTENT THAT HOLDS N P* THE REQUESTED SECTORS z * PFM:070 EQU * * P LC A6,EWTEXL-1,A3 FILE EXTENT LENGTH P LD A7,EWTEXL,A3 " P CWR A1,A6
0x356a74…356c08 Dummy {f00=0x010f, f01=0x0190, f02=»ENT FOUND ~ * PFM:080 EQU * P IFT CPU852=0 0 . P DSR A6 SUBTRACT LENGTH FROM SECTOR NUMBER F P XIF x P* P IFT CPU852=1 2 P SUR A1,A6 SUBTRACT LENGTH FROM SECTOR NUMBER P SUR A2,A7 P RF(NN) FM:090 NOT UNDERFLOW
0x356c08…356d9c Dummy {f00=0x010f, f01=0x0190, f02=»DRESS TO 2ND EWT BLOCK . ) LDR* A3,A3 ADDRESS TO NEXT EWT STRUCTURE $ P RB(NZ) FM:070 CHECK NEXT EXTENT P * x 4 /FM:RQE EQU * FILE MANAGEMENT REQUEST ERROR EXIT P LDKL A1,/A000 REQUEST ERROR P RB FM:040 * EJECT TOSSF
0x356d9c…356f30 Dummy {f00=0x010f, f01=0x0190, f02=» LC A10,EWTEXB-1,A4 FILE EXTENT BASE P LD A11,EWTEXB,A4 , * F IFT CPU852=0 P " P DAR A10 COMPUTE SECTOR NUMBER f XIF * IFT CPU852=1 & P ADR A1,A10 COMPUTE SECTOR NUMBER P ADR A2,A11 RF(O) FM:140 OVER
0x356f30…3570c4 Dummy {f00=0x010f, f01=0x018e, f02=»ON t SUK A1,1 * EJECT TOSSFM & * > * H PFM:115 EQU * R " P LDR A12,A1 SAVE SECTOR NUMBER f P LDR A13,A2 P* IFT MMUPAG=0 . P LC A3,ECBRL,A8 REQUESTED LENGTH (SECTORS) XIF *
0x3570c4…357258 Dummy {f00=0x010f, f01=0x0190, f02=» . P ADR A2,A3 COMPUTE LAST REQUESTED SECTOR+1 RF(O) FM:150 OVERFLOW 6 * T PFM:120 EQU * ^ 0 P ADR A6,A10 COMPUTE LAST SECTOR+1 IN EXTENT r P ADR A7,A11 P RF(O) FM:160 OVERFLOW * PFM:125 EQU * P CWR A6,A1 0 P
0x357258…3573ec Dummy {f00=0x010f, f01=0x0190, f02=» P CWR A7,A2 4 P RB(L) FM:RQE ALL SECTORS NOT WITHIN THIS EXTENT P XIF N P* Z P IFT XTSPLI=1 d 4 P RF(L) FM:170 ALL SECTORS NOT WITHIN THIS EXTENT z P CWR A7,A2 4 P RF(L) FM:170 ALL SECTORS NOT WITHIN THIS EXTENT P XIF
0x3573ec…357580 Dummy {f00=0x010f, f01=0x0190, f02=» = DISC INDEX (FROM FNDDWD) 0 P* A4 = 0 (INDICATES NOT I/O-AND-ACTIVATION) $ P* A5 = TTAB ADDRESS X * P* A6 = DISC DWT ADDRESS (FROM FNDDWD) t P* A7 = ORDER CODE P* A8 = ECB ADDRESS * PFM:130 EQU * $ P LC A2,EWTVOL,A4 FIL
0x357580…357714 (5, 536) Dummy {f00=0x010f, f01=0x018e, f02=» CODE x P LD A1,DWTST,A6 DWT STATUS , P ABL(NN) QUEDEV DISC BUSY, QUEUE REQUEST 0 P* ` P IFT MMUPAG=0 j . P ST A12,ECBCW1,A8 SET SECTOR NUMBER IN ECB P ST A13,ECBCW2,A8 P XIF P* P IFT MMUPAG=1 . P ES A12,ECBCW1,A
0x357714…3578a8 Dummy {f00=0x010f, f01=0x0190, f02=» EJECT TOSSFM * 6 2* OVERFLOW CORRECTIONS FOR DOUBLE WORD ARITHMETICS & * ` FM:140 EQU * j P IFT CPU852=1 ~ ADK A1,1 P ANR A2,A14 SKIP SIGN BIT P RB FM:110 P XIF * FM:150 EQU * ADK
0x3578a8…357a3c Dummy {f00=0x010f, f01=0x0190, f02=»BIT z P RB FM:125 * EJECT TOSSFM ( P* @ 0 P* REQUESTED SECTORS CONTINUE IN NEXT EXTENT J P* ~ PFM:170 EQU * IFT XTSPLI=1 & P LDR A1,A4 EWT ADDRESS (2ND BLOCK) $ LDKL A2,FMRDWR DISPATCH ADDRESS ****
0x357a3c…357bd0 Dummy {f00=0x010f, f01=0x0190, f02=»** P* FCHECK * P* FCHEC2 * P********** . P* @ P* J 6 P* FCHECK/FCHEC2 CONVERTS THE FILE NUMBER TO FWT T . P* ADDRESS AND CHECKS ACCESS PARAMETERS. P* " P* INPUT: A5 = TTAB ADDRESS P* A7 = ORDER C
0x357bd0…357d64 Dummy {f00=0x010f, f01=0x0190, f02=»* A2 IS DESTROYED P* " PFCHECK EQU * FCHECK MAIN ENTRY & P IFT MMUPAG=0 L P LDR* A2,A8 FILE NUMBER b P XIF P* P IFT MMUPAG=1 P ELR A2,A8 FILE NUMBER P XIF P* 4 PFCHEC2 EQU * FCHECK 2ND ENTRY (A2 = FI
0x357d64…357ef8 Dummy {f00=0x010f, f01=0x0190, f02=»UMBER TOO BIG | 0 P LDKL A3,SCTFWT ADDRESS TO FWT CHAIN POINTER P* J P EJECT TOSSFM T P* l P* v $ PFC:010 EQU * COMPUTE FWT ADDRESS P LDR* A3,A3 NEXT FWT ADDRESS P SUK A2,1 P RB(P) FC:010 P* P* CHECK AC
0x357ef8…35808c Dummy {f00=0x010f, f01=0x0190, f02=»1 CHECK IF FWT USED " P RF(Z) FC:050 FILE NOT OPENED , P LD A2,FWTTAB,A3 TTAB ADDRESS (EA TASK) B ( P RF(Z) FC:020 OPENED NON-EXCLUSIVELY r & P CWR A2,A5 EA, CHECK IF THIS TASK . P RF(NE) FC:060 EXCLUSIVE FOR ANOTHER TASK P* PFC:0
0x35808c…358220 Dummy {f00=0x010f, f01=0x0190, f02=»CAL ORDERS | P ANK A7,/85 BASIC ORDER P* 2 , PFC:040 EQU * COMMON FCHECK RETURN LABEL < P RTN A15 l P* | P EJECT TOSSFM P* P* ERROR RETURNS P* $ PFC:050 EQU * REQUEST ERROR EXIT & P LDKL A1,/7FC0 RETURN
0x358220…3583b4 (5, 537) Dummy {f00=0x0110, f01=0x4088, f02=»OLUME LOADED EXIT ~ " P ADK A1,/20 RETURN CODE = /20 P RB FC:040 RETURN @ P* Z * d * n END x@
0x3583b4…358548 Dummy {f00=0x0110, f01=0x2008, f02=» O t * * * & END 0@ <:127 : XIF L * X EJECT TOSSFM b * z * 8 3FM:170 EQU * MAKE ALL PARAMETERS READY FOR DISC I/O $ LC A2,EWTVOL,A3 FILE CODE DISC ( $ CF A15,FNDDW2 FIND DI
0x358548…3586dc Dummy {f00=0x0110, f01=0x0190, f02=» * l @ P* * @ P* REFERENCED IN: SYSLDA PART 2 B. * d @ P* * @ P* ENTRY: A5 - POINTER TO N
0x3586dc…358870 Dummy {f00=0x0110, f01=0x0190, f02=» * t @ P* EXIT: * ( @ P* * l @ P* WORK REGISTERS: A1,A3,A6,A8 * @ P*
0x358870…358a04 Dummy {f00=0x0110, f01=0x0190, f02=» * | @ P************************************************************ 0 PCHTAID EQU * t 2 P LDR A8,A7 GET NEXT FREE ENTRY IN REAL T:ATAB $ P LDR* A6,A5 GET NUMBER OF COPIES " PCHT:10 RF(Z) CHT:90 NO MOORE!
0x358a04…358b98 Dummy {f00=0x0110, f01=0x0190, f02=»TID,A1 GET TCL IN T:A . PCHT:20 CALL GETTTB GET CORRESPONDING TTAB * P LD A4,TTBTID,A2 GET REAL TID IN TTAB P 6 P LD A3,TTB:SA+26,A2 GET CORRESPONDING T:A-ADDRESS ~ ( P ST A4,T:ATID,A3 REPLACE TCL IN T:A & P LDR A3,A8 GET REAL T:ATAB POINTER
0x358b98…358d2c Dummy {f00=0x0110, f01=0x0190, f02=»MMUPAG=2 & P ELR A1,A8 GET POINTER TO REAL T:A $ P EL A1,T:ATID,A1 GET TCL IN T:A : . PCHT:20 CALL GETTTB GET CORRESPONDING TTAB b ( P LDR A3,A2 GET POINTER TO TTAB ENTRY 2 P ADKL A3,MMBEG START OF MM-TABLE FOR THIS TTAB P TLR A3 4 P L
0x358d2c…358ec0 Dummy {f00=0x0110, f01=0x0190, f02=» TCL IN T:A *79-04-11* x 0 P EL* A3,T:ATNW,A13 GET LENGTH OF REAL T:ATAB $ P NGR A3,A3 NEGATIVE DISPLACEMENT R . P ADR A3,A8 COMPUTE ENTRY IN AUX. TID TABLE z 8 P ESR A4,A3 SAVE TID FOR DEBUGGER PURPOSE *79-04-11* P XIF P IFT CREDIT=1 &
0x358ec0…359054 (5, 538) Opaque[0x194]
0x359054…3591e8 # DirEnt {nam=»TOSSIO«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2208, f03=0x0000}
0x359054…3591e8 IdxSect {
0x359054…3591e8 f00 = 0x0110 // 0x359054 @0x0
0x359054…3591e8 f01 = 0x0022 // 0x359056 @0x2
0x359054…3591e8 gno = [ // 0x359058 @0x4
0x359054…3591e8 [0x00]: C0x0110.0x1.0
0x359054…3591e8 [0x01]: C0x0110.0x2.0
0x359054…3591e8 [0x02]: C0x0110.0x3.0
0x359054…3591e8 [0x03]: C0x0111.0x0.0
0x359054…3591e8 [0x04]: C0x0111.0x1.0
0x359054…3591e8 [0x05]: C0x0111.0x2.0
0x359054…3591e8 [0x06]: C0x0111.0x3.0
0x359054…3591e8 [0x07]: C0x0112.0x0.0
0x359054…3591e8 [0x08]: C0x0112.0x1.0
0x359054…3591e8 [0x09]: C0x0112.0x2.0
0x359054…3591e8 [0x0a]: C0x0112.0x3.0
0x359054…3591e8 [0x0b]: C0x0113.0x0.0
0x359054…3591e8 [0x0c]: C0x0113.0x1.0
0x359054…3591e8 [0x0d]: C0x0113.0x2.0
0x359054…3591e8 [0x0e]: C0x0113.0x3.0
0x359054…3591e8 [0x0f]: C0x0114.0x0.0
0x359054…3591e8 [0x10]: C0x0114.0x1.0
0x359054…3591e8 ]
0x359054…3591e8 }
0x3591e8…35937c Dummy {f00=0x0110, f01=0x0190, f02=» 2 P IDENT TOSSIO REL 10.0 80-04-30 870105041000 P : P REL 10.0 80-03-15 POHO B $ P =1,RELEASE DC-BUFFER UPDATED d P* P* 6 P************************************************** P* $ P* PHILIPS TERMINAL SYSTEM PTS
0x35937c…359510 Dummy {f00=0x0110, f01=0x0190, f02=»** ` P* P* , P* THIS IS THE TOSS I/O LKM PROCESSOR. 6 P* IT CONTAINS THE FOLLOWING MONITOR SUBROUTINES: N P* P* -TIO INITIALIZE I/O P* P* -TENDIO END I/O P* P* -ATTACH ATTACH DEVICE P
0x359510…3596a4 Dummy {f00=0x0110, f01=0x0190, f02=» DATA COMMUNICATION MOVE ROUTINE (WRITE) P* 0 4 P* SPECIAL ROUTINES ARE CARRIED OUT IN SYSTEMS : * P* WITH MEMORY MANAGEMENT UNIT (MMU). r P* 8 P* THIS MODULE ALSO CONTAINS STANDARD DISPLACEMENT * P* VALUES FOR ECB, DWT AND DAB AR
0x3596a4…359838 Dummy {f00=0x0110, f01=0x0190, f02=»* P ENTRY TIO I/O PROCESSOR 0 P ENTRY TIO:FM ENTRY USED BY FILE MANAGEMENT * 0 P ENTRY TIOERR ERROR: QUEUE TASK AND DISPATCH ^ P ENTRY TENDIO END I/O 0 P ENTRY QUEDEV QUEUE REQUEST IN DEVICE QUEUE 4 P ENTRY QUEFIL QUEUE FILE REQUEST IN
0x359838…3599cc Dummy {f00=0x0110, f01=0x0190, f02=»ONMMU MONITOR (SYSTEM) MMU TABLE P* ( P ENTRY ECBFC FILE CODE 2 P ENTRY ECBBA BUFFER ADDRESS P " P ENTRY ECBRL REQUESTED LENGTH t " P ENTRY ECBEL EFFECTIVE LENGTH P ENTRY ECBRC RETURN CODE P ENTRY ECBCW CONTROL WORD P ENTRY
0x3599cc…359b60 Dummy {f00=0x0110, f01=0x0190, f02=» DM:DIX DEVICE INDEX DATA MANAGEMENT 2 P ENTRY PC:DIX DEVICE INDEX PROGRAMMED CHANNEL , 0 P ENTRY MX:DIX DEVICE INDEX MULTIPLEX CHANNEL b , P ENTRY KB:DIX DEVICE INDEX KEYBOARD/CTW 6 P ENTRY IT:DIX DEVICE INDEX INTERTASK COMMUNICATION $ P ENTRY D
0x359b60…359cf4 (5, 539) Dummy {f00=0x0110, f01=0x0190, f02=» ENTRY ACTADR ACTIVATION ADDRESS P ENTRY ABTADR ABORT ADDRESS ( $ P ENTRY INTADR INTERRUPT ADDRESS L 2 P ENTRY POLADR BUFFER POOL ADDRESS (DC DRIVERS) t 4 P ENTRY HDRLEN BUFFER HEADER LENGTH (DC DRIVERS) " P ENTRY RECADR RECOVERY ADDRESS P
0x359cf4…359e88 Dummy {f00=0x0110, f01=0x0190, f02=» ENTRY DWTECB ECB ADDRESS P ENTRY DWTOPT ORDER OPTION " P ENTRY DWTOR INDEX AND ORDER D ( P ENTRY DWTOCH LAST OUTPUT CHARACTER h & P ENTRY DWTADR DRIVER ADDRESS BLOCK P ENTRY DWTTAB TTAB ADDRESS * P ENTRY DWTWAT WAIT/ACTIVATE INDICATOR
0x359e88…35a01c Dummy {f00=0x0110, f01=0x0190, f02=»U ECB ADDRESS P ENTRY DWTA2 SAVE AREA A2 P ENTRY DWTA3 SAVE AREA A3 8 P ENTRY DWTA4 SAVE AREA A4 Z 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 TIMER POI
0x35a01c…35a1b0 Dummy {f00=0x0110, f01=0x0190, f02=»NTRY DWTNVL NEW VOLUME LOADED FLAGS " P ENTRY DWTVOL DISC VOLUME NAME , P* R P EJECT TOSSIO P* t P* ~ P************* P* EXTERNALS * P************* P* P* " P EXTRN SAVE8 SAVE 8 REGISTERS 0 P EXT
0x35a1b0…35a344 Dummy {f00=0x0110, f01=0x018e, f02=»(LIFO) p P EXTRN FNDDWT SEARCH DWT , P EXTRN QTJOB QUEUE TASK FOR DISPATCHING . P EXTRN TDISP DISPATCHER ^ 2 P EXTRN DISEND BRANCH TO DISPATCHER VIA TENDIO ~ * P EXTRN LKMQDI QUEUE TASK AND DISPATCH , P EXTRN GETBLK PUT BLOCK IN PENDING QUE
0x35a344…35a4d8 Dummy {f00=0x0110, f01=0x0190, f02=» ( P EXTRN TTB:ST TASK STATUS AND LEVEL & P EXTRN TTB:PW PROGRAM STATUS WORD 0 P EXTRN TTB:SA SAVE AREA Z P EXTRN TTB:MT MMUTAB z P* P EJECT TOSSIO P* P* . P***************************************** P* P
0x35a4d8…35a66c Dummy {f00=0x0110, f01=0x0190, f02=»AGING l * P* IS OBTAINED BY SETTING MMUPAG EQU 1. P* < PMMUPAG EQU 0 F P* Z P* d 6 P* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION n . P* SET IS OBTAINED BY SETTING CPU852 EQU 0. P* PCPU852 EQU 1 P* P*
0x35a66c…35a800 Dummy {f00=0x0110, f01=0x018e, f02=» EQU X:A P* P* 4 P* A PROGRAM VERSION SPECIALIZED FOR THE 857 CPU $ * P* IS OBTAINED BY SETTING CPU857 EQU 1. P* PX:B EQU 0 PCPU857 EQU X:B P* P EJECT TOSSIO P* P* P*******************
0x35a800…35a994 (5, 540) Dummy {f00=0x0110, f01=0x0190, f02=» P* P* P********************* P* DWT DISPLACEMENTS * 6 P********************* T P* r 2 P* DEVICE WORK TABLE DISPLACEMENTS: FIXED PART | P* & PDWTCHP EQU /00 CHANNEL PARAMETERS PDWTST EQU /02 STATUS PDWTBC
0x35a994…35ab28 Dummy {f00=0x0110, f01=0x0190, f02=»DWTOCH EQU /06 LAST OUTPUT CHARACTER ( PDWTADR EQU /08 DRIVER ADDRESS BLOCK , PDWTTAB EQU /0A TTAB ADDRESS X * PDWTWAT EQU /0C WAIT/ACTIVATE INDICATOR | PDWTTQ EQU /0E TERMINAL QUEUE $ PDWTUEC EQU /10 USER ECB ADDRESS " PDWTMEC EQU /12 MMU
0x35ab28…35acbc Dummy {f00=0x0110, f01=0x018e, f02=»MUPAG=1 4 PDWTDRD EQU DWTMEC+2 START OF DRIVER DEFINED PART P XIF H P* T P EJECT TOSSIO ^ P* v , P* DWT DISPLACEMENTS: DRIVER DEFINED PART P* , PDWTOTQ EQU DWTDRD+/00 OUTPUT QUEUE LINK & PDWTA2 EQU DWTDRD+/02 SAVE AREA
0x35acbc…35ae50 Dummy {f00=0x0110, f01=0x018e, f02=» . PDWTSB1 EQU DWTDRD+/0A STACK BASE 1 IN DWT . PDWTSB2 EQU DWTDRD+/0E STACK BASE 2 IN DWT 6 & PDWTTP EQU DWTDRD+/10 TIMER POINTER h 4 PDWTORD EQU DWTDRD+/10 SAVE AREA INDEX AND ORDER 2 PDWTNVL EQU DWTDRD+/12 NEW VOLUME LOADED FLAGS * PDWTECH E
0x35ae50…35afe4 Dummy {f00=0x0110, f01=0x0190, f02=» P EJECT TOSSIO P* P* & P********************* 0 P* DAB DISPLACEMENTS * N P********************* l P* ( P* DRIVER ADDRESS BLOCK DISPLACEMENTS P* & PKEYLEN EQU -6 DWT KEYTABLE LENGTH $ PBUFLEN EQU -4 DWT BU
0x35afe4…35b178 Dummy {f00=0x0110, f01=0x0190, f02=»QU 4 INTERRUPT ADDRESS 2 PPOLADR EQU 4 BUFFER POOL ADDRESS (DC DRIVERS) 2 PHDRLEN EQU 6 BUFFER HEADER LENGTH (DC DRIVERS) T " PRECADR EQU 6 RECOVERY ADDRESS PECHADR EQU 8 ECHO ADDRESS P* P* P*********************** P*
0x35b178…35b30c Dummy {f00=0x0110, f01=0x0190, f02=» SPECIAL ROUTINE Z F P* FROM ADDRESS TABLES TIOTAB AND TENTAB AT READ/WRITE REQUESTS. P* b $ PDC:DIX EQU -2 DATA COMMUNICATION l PDM:DIX EQU 0 DATA MANAGEMENT $ PPC:DIX EQU 2 PROGRAMMED CHANNEL " PMX:DIX EQU 4 MULTIPLEX CHANNEL PKB
0x35b30c…35b4a0 Dummy {f00=0x0110, f01=0x0190, f02=»* P* P********************* P* ECB DISPLACEMENTS * 2 P********************* P P* n ( P* EVENT CONTROL BLOCK DISPLACEMENTS x P* PECBFC EQU /01 FILE CODE PECBBA EQU /02 BUFFER ADDRESS " PECBRL EQU /04 REQUESTE
0x35b4a0…35b634 (5, 541) Dummy {f00=0x0111, f01=0x0190, f02=» CONTROL WORD 1 " PECBCW2 EQU /0C CONTROL WORD 2 P* > P EJECT TOSSIO H P* ` P* j P IFT MMUPAG=1 t P* P* P********** P* TIOTAB * P********** P* < P* TIOTAB CONTAINS ADDRESSES TO ROUTINES EN
0x35b634…35b7c8 Dummy {f00=0x0111, f01=0x0190, f02=» DATA TIOPCI PROGRAMMED CHANNEL, INPUT P DATA TIOMXI MUX, INPUT . $ P DATA TIOKBI KEYBOARD/CTW, INPUT N 0 P DATA TIOITI INTERTASK COMMUNICATION, INPUT v P* PTINDEX EQU *-TIOTAB P DATA TIODKI DISC, INPUT , P DATA TIOPCO PROGRAMMED
0x35b7c8…35b95c Dummy {f00=0x0111, f01=0x0190, f02=»OUTPUT j P DATA TIODKO DISC, OUTPUT P* 0 P EJECT TOSSIO : P* R P* P********** f P* TENTAB * x P********** P* @ P* TENTAB CONTAINS ADDRESSES TO ROUTINES ENTERED FROM TENDIO P* 2 PTENTAB EQU * DEVICE
0x35b95c…35baf0 Dummy {f00=0x0111, f01=0x0190, f02=»TENMXI MUX, INPUT $ P DATA TENKBI KEYBOARD/CTW, INPUT 0 P DATA TENITI INTERTASK COMMUNICATION, INPUT B P DATA TENDKI DISC, INPUT v , P DATA TENPCO PROGRAMMED CHANNEL, OUTPUT P DATA TENMXO MUX, OUTPUT & P DATA TENKBO KEYBOARD/CTW, OUTPUT
0x35baf0…35bc84 Dummy {f00=0x0111, f01=0x0190, f02=» P* P* P********** P* MONMMU * * P********** < P* N P* MONITOR (SYSTEM) MMU TABLE X P* | PMONMMU EQU * P IFT MMUPAG=1 " P DATA /0000,/0400,/0800,/0C00 " P DATA /1000,/1400,/1800,/1C00 " P DATA /2000,
0x35bc84…35be18 Dummy {f00=0x0111, f01=0x0190, f02=»TTDET=1 P* 2 P* SUBROUTINES BELOW ARE USED BY ATTACH/DETACH P* P P* T I M O U T Z P* p P* INPUT: A1 = DWT ADDRESS z . P* A2 = ADDRESS TO 2ND TIMER BLOCK P* P* OUTPUT: A4 = BLOCK ADDRESS P* A5
0x35be18…35bfac Dummy {f00=0x0111, f01=0x0190, f02=»A2,A2 TIMER POINTER ADDRESS P LD A5,2,A2 TTAB ADDRESS $ P CF A15,FNDBLK D P LDR* A1,A4 Z " P STR A1,A2 REMOVE FROM ATT:CH n P CF A15,FREBLK P* P EJECT TOSSIO P* & P* REMOVE TTAB FROM DEVICE QUEUE P*
0x35bfac…35c140 Dummy {f00=0x0111, f01=0x0190, f02=» RF(Z) TIM:20 END OF QUEUE P CWR A1,A5 " P RB(NE) TIM:10 NOT FOUND 6 P* V P EJECT TOSSIO ` P* x & P* TTAB FOUND - REMOVE FROM QUEUE P* P LDR* A1,A1 P STR A1,A2 P* PTIM:20 EQU * P LDK A3,4
0x35c140…35c2d4 (5, 542) Dummy {f00=0x0111, f01=0x0190, f02=»BIT x P* P IFT MMUPAG=0 * P ST A3,ECBRC,A8 INDICATE ERROR IN ECB , P XIF Z P* f P IFT ATTDET=1 p P IFT MMUPAG=1 . P TL TTB:MT,A5 LOAD MMU REGISTERS FROM TTAB * P ES A3,ECBRC,A8 INDICATE ERROR IN ECB . P TL MONMMU L
0x35c2d4…35c468 Dummy {f00=0x0111, f01=0x0190, f02=»JECT TOSSIO P* P* F N D B L K P* 6 ( P* SUBROUTINE TO FIND BLOCK IN ATT:CH @ P* l P* INPUT: A5 = TTAB ADDRESS v P* 6 P* OUTPUT: A2 = ADDRESS TO PRECEDING BLOCK IN CHAIN 2 P* A4 = BLOCK ADDRESS IF FOUND, ELS
0x35c468…35c5fc Dummy {f00=0x0111, f01=0x018e, f02=»ND:20 END OF ATT:CH P CW A5,4,A4 P RB(NE) FND:10 NOT FOUND 0 P* P PFND:20 EQU * Z P IFT CPU852=1 n P ABL IHRTN RETURN P XIF P* P IFT ATTDET=1 P IFT CPU852=0 P RTN A15 RETURN P XIF P*
0x35c5fc…35c790 Dummy {f00=0x0111, f01=0x0190, f02=» P* ATTACH * ! P********** ! P* ! , P* ! 6 * P* THIS MODULE IS CALLED FROM TIO WITH ! @ P* THE FOLLOWING PARAMETERS: ! n P* ! & P* A3 /8000 (REQUEST ERROR BIT) ! & P* A4 I/O AND ACTIVATE INDICATOR ! P* A5 TTAB ADDRESS !
0x35c790…35c924 Dummy {f00=0x0111, f01=0x0190, f02=»TO DRIVER ADDRESS BLOCK ! P* A13 DWT STATUS " P* " : PATTACH EQU * ENTRY " D P ADK A4,0 SET CR " ^ * P RF(NZ) TIOERR I/O AND ACTIVATE ERROR " v P* " P IFT MMUPAG=0 " " P CM ECBRC,A8 RESET RETURN CODE " P XIF " P* " P IFT ATT
0x35c924…35cab8 Dummy {f00=0x0111, f01=0x0190, f02=» " P IFT ATTDET=1 # P TM A10,A13 # * P RF(NZ) ATT:40 DEVICE ALREADY ATTACHED # 2 P LDR A13,A13 # ` P RF(NN) ATT:50 DEVICE BUSY # t P* # P* ATTACH REQUESTING TASK # P* # P ORS A10,DWTST,A6 ATTACH # , P ST A5,DWTTAB,A6 PUT TTAB
0x35cab8…35cc4c Dummy {f00=0x0111, f01=0x0190, f02=»O # P* $ & P* FREE BLOCK AND TIMER IN ATT:CH $ P* $ > P CM* 2,A4 FREE TIMER $ H " P LDR* A3,A4 REMOVE FROM ATT:CH $ d P STR A3,A2 $ P CF A15,FREBLK RELEASE BLOCK $ P RF ATTRTN END REQUEST $ P* $ PATT:40 CW A5,DWTTAB,A6 $ . P R
0x35cc4c…35cde0 Dummy {f00=0x0111, f01=0x0190, f02=»ACTIVE $ x P* % P* SET TIMER % P* % 0 P IFT MMUPAG=0 % : P LD A1,ECBCW,A8 TIME % P P XIF % l P* % x P EJECT TOSSIO % P* % P* % P IFT ATTDET=1 % P IFT MMUPAG=1 % P EL A1,ECBCW,A8 TIME % P XIF % P* %
0x35cde0…35cf74 (5, 543) Dummy {f00=0x0111, f01=0x0190, f02=» A1,A5 TTAB ADDRESS % P LD A3,ATT:CH ANCHOR & P CF A15,GETBLK BLOCK & 8 P ST A4,ATT:CH UPDATE ANCHOR & T $ P ADK A4,2 TIMER POINTER ADDRESS & x P LDR A1,A6 DWT ADDRESS & P CF A15,SETIMP SET TIMER & P DATA TIMOUT & P* & PATTIM DATA 0
0x35cf74…35d108 Dummy {f00=0x0111, f01=0x0190, f02=» RF TIOERR RETURN & P* ' P EJECT TOSSIO ' $ P* ' < P* ' F P********** ' P P* DETACH * ' b P********** ' t P* ' * P* THIS MODULE IS CALLED FROM TIO WITH ' $ P* THE SAME PARAMETERS AS ATTACH. ' P* ' PDETACH EQU * ' P ADK
0x35d108…35d29c Dummy {f00=0x0111, f01=0x0190, f02=» ' * P RF(NE) TIOERR ATTACHED TO OTHER TASK ( P XRS A10,DWTST,A6 DETACH ( 6 P LDR A3,A5 SAVE TTAB ADDRESS ( V P LD A5,DWTTQ,A6 QUEUE ANCHOR ( z P RF(Z) DET:10 QUEUE EMPTY ( $ P LDR* A2,A5 UPDATE QUEUE ANCHOR ( P ST A2,DWTTQ,A6 ( P CF A15,
0x35d29c…35d430 Dummy {f00=0x0111, f01=0x0190, f02=»H NORMAL EXIT ( p PDETRTN LDK A3,0 RETURN CODE ) P XIF ) : P* ) F P EJECT TOSSIO ) P P* ) h P* ) r P********** ) | P* TIOERR * ) P********** ) P* ) P* ERROR: FILE CODE UNKNOWN ) ( P* TIOERR IS ALSO USED AS COMMON EXIT ) (
0x35d430…35d5c4 Dummy {f00=0x0111, f01=0x0190, f02=» ) j ( P CM ECBEL,A8 RESET EFFECTIVE LENGTH * P XIF * 4 P* * @ P IFT MMUPAG=1 * J * P ES A3,ECBRC,A8 SET RETURN CODE IN ECB * ` P LDK A3,0 * * P ES A3,ECBEL,A8 RESET EFFECTIVE LENGTH * P XIF * P* * PTIORTN EQU * * ( P ABL LKMQDI QUEU
0x35d5c4…35d758 Dummy {f00=0x0111, f01=0x018e, f02=»********** * P* + P* + 8 P* THIS IS THE ROUTINE FOR QUEUEING DEVICE REQUESTS. + & > P* THE ROUTINE IS ENTERED AT DIFFERENT LABELS DEPENDING ON + b @ P* WHETHER THE DEVICE IS AN ECHO DEVICE OR NOT, AND DEPENDING + 8 P* ON WHETHER THE DEVICE IS ATTAC
0x35d758…35d8ec Dummy {f00=0x0111, f01=0x0190, f02=» + t P* , PTIOQ00 LDR A6,A2 , P* , * P* QUEUE DEVICE FIRST , 4 P* , P $ PTIOQ05 ADK A6,DWTTQ QUEUE ANCHOR , Z P LDR A2,A6 , P LDR* A6,A6 , $ P RF TIOQ40 INSERT FIRST IN QUEUE , P* , & PTIOQ10 LDR A6,A2 QUEUE ECHO DEVICE , P* ,
0x35d8ec…35da80 Dummy {f00=0x0111, f01=0x0190, f02=»E MANAGEMENT , r P LD A1,TTB:ST+1,A5 LEVEL - P* - 4 P EJECT TOSSIO - > P* - V * P* SEARCH QUEUE FOR PLACE OF INSERTION - ` P* - PTIOQ30 LDR A2,A6 - $ P LDR* A6,A6 FOLLOW QUEUE TO END - P RF(Z) TIOQ40 END FOUND - & P CC A1,TTB:ST+1,
0x35da80…35dc14 (5, 544) Dummy {f00=0x0111, f01=0x0190, f02=» LDKL A3,-4 - P STR A6,A5 INSERT IN QUEUE . P STR A5,A2 . 6 P ADK A4,0 SET CR . H P RF(Z) TIOQ50 NO ACTIVATION . ` P SUK A3,2 ACTIVATION . P* . 4 PTIOQ50 ADS A3,TTB:SA,A5 UPDATE PC TO REPEAT LKM . P* . PTIOQ60 EQU * . P ABL TDI
0x35dc14…35dda8 Dummy {f00=0x0111, f01=0x018e, f02=» P* / . P* THIS MODULE IS ENTERED WHEN TERMINAL I/O / 2 P* IS REQUIRED. IF A REQUEST CANNOT BE SERVICED / @ 4 P* DUE TO E.G. BUSY DEVICE, THE REQUEST IS QUEUED / v 2 P* AND THE TERMINAL PROGRAM SET IN WAIT STATE. / P* / 2 P* WHEN RUNNING WITH MMU OP
0x35dda8…35df3c Dummy {f00=0x0111, f01=0x0190, f02=» / & P* WITH THE FOLLOWING PARAMETERS:- 0 P* 0 2 . P* A1 = PARAMETER WHEN I/O AND ACTIVATION 0 < P* 0 n $ P* A4 = ZERO, NORMAL I/O REQUEST 0 x ( P* NOT ZERO, I/O AND ACTIVATION 0 P* 0 P* A5 = TTAB ADDRESS 0 P* 0 P* A7 = ORDE
0x35df3c…35e0d0 Dummy {f00=0x0111, f01=0x0190, f02=»EQUESTED ACTIVATION DRIVER 0 r * P* WITH THE FOLLOWING REGISTER VAULES:- 1 " P* 1 P P* A5 = STACK BASE 2 IN DWT 1 Z P* 1 ~ P* A6 = DWT ADDRESS 1 P* 1 P* A7 = ORDER CODE 1 P* 1 P* A8 = ECB ADDRESS 1 P* 1 , P* A12 = ADDRESS
0x35e0d0…35e264 Dummy {f00=0x0111, f01=0x0190, f02=» 1 f P* 2 P* 2 , P* THE FOLLOWING DWT FIELDS ARE UPDATED:- 2 P* 2 L " P* -DWTOR DWT INDEX AND ORDER 2 V P* -DWTECB ECB ADDRESS 2 | $ P* -DWTST READY AND ECHO FIELDS 2 P* -DWTTAB TTAB ADDRESS 2 & P* -DWTWAT WAIT/ACTIVATE INDICATOR 2
0x35e264…35e3f8 Dummy {f00=0x0111, f01=0x0190, f02=»T 0 IN THE FIRST WORD 2 P* -ECBEL EFFECTIVE LENGTH 3 P* -ECBRC RETURN CODE 3 B P* 3 ` P EJECT TOSSIO 3 j P* 3 . P* DWT ADDRESS AND CHECK IF REQUEST IS BUSY 3 P* 3 ( PTIO CF A15,FNDDWT SEARCH DWT ADDRESS 3 P* 3 . PTIO:FM EQU
0x35e3f8…35e58c Dummy {f00=0x0111, f01=0x0190, f02=»B(Z) TIOERR FILE CODE UNKNOWN 3 6 P LD A12,DWTADR,A6 ADDRESS TO DRIVER ADDRESS BLOCK 4 & P LD A13,DWTST,A6 DWT STATUS 4 ` P* 4 P EJECT TOSSIO 4 P* 4 @ P* CHECK IF ATTACH/DETACH ORDER OR IF DEVICE IS BUSY/ATTACHED 4 P* 4 P IFT ATTDE
0x35e58c…35e720 Dummy {f00=0x0111, f01=0x0190, f02=»H DETACH ORDER 4 P TM A10,A13 5 P RF(Z) TIO020 NOT ATTACHED 5 * P CW A5,DWTTAB,A6 5 L * P RB(NE) TIOQ20 ATTACHED TO OTHER TASK 5 d P TM A3,A13 5 " P RF(NZ) TIO030 DEVICE NOT BUSY 5 " P RB TIOQ05 BUSY, QUEUE DEVICE 5 P XIF 5 P* 5 PTI
0x35e720…35e8b4 (5, 545) Dummy {f00=0x0112, f01=0x0190, f02=»HEN TRUE CHECK IF ECHO DEVICE IS BUSY/ATTACHED 5 z P* 6 6 * PTIO030 SC A2,DWTOR,A6 STORE DWT INDEX 6 @ P LDK A2,/40 CHECK IF ECHO 6 n P ANR A2,A7 6 P RF(Z) TIO070 NOT ECHO 6 P* 6 " P LD A2,DEVIND,A12 DEVICE INDEX 6 $ P SUK A2,KB:DIX CHECK IF
0x35e8b4…35ea48 Dummy {f00=0x0112, f01=0x0190, f02=» ECHO DEVICE 6 $ P LD A14,DWTST,A2 ECHO DWT STATUS 7 P* 7 < P IFT ATTDET=1 7 F P TM A10,A14 7 * P RF(Z) TIO050 ECHO DEVICE NOT ATTACHED 7 p P CW A5,DWTTAB,A2 7 6 P RB(NE) TIOQ10 ECHO DEVICE ATTACHED TO OTHER TASK 7 P TM A3,A14 7 ( P RF(NZ
0x35ea48…35ebdc Dummy {f00=0x0112, f01=0x0190, f02=»* 7 PTIO050 TM A3,A14 8 " P RB(Z) TIOQ10 ECHO DEVICE BUSY 8 " P* 8 H PTIO060 LDKL A3,/A000 8 R : P XRS A3,DWTST,A2 UPDATE BUSY & ECHO BITS IN DWT STATUS 8 n P* 8 P* UPDATE ECB AND DWT FIELDS 8 P* 8 @ PTIO070 XRS A3,DWTST,A6 UPDATE BUSY &
0x35ebdc…35ed70 Dummy {f00=0x0112, f01=0x0190, f02=»F(NZ) TIO100 JUMP IF USER MODE 8 P LDKL A2,/7FFF 9 & , P ANRS A2,A8 RESET BIT 0 IN ECB FILE CODE 9 < , P ST A8,DWTECB,A6 SET ACTUAL ECB ADDRESS 9 l ( P CM ECBEL,A8 RESET EFFECTIVE LENGTH 9 $ P CM ECBRC,A8 RESET RETURN CODE 9 P RF TIO110 9 P* 9
0x35ed70…35ef04 Dummy {f00=0x0112, f01=0x0190, f02=»OAD FIRST WORD OF USER ECB 9 0 P ANR A3,A2 RESET BITS 0,2,3 IN ECB FILE CODE : " P ESR A3,A8 : V ( P LD A2,DWTMEC,A6 DWT MMU ECB ADDRESS : h , P ST A2,DWTECB,A6 SET ACTUAL ECB ADDRESS : P STR A3,A2 : * P ST A8,DWTUEC,A6 SAVE USER ECB ADDRESS : P LDR
0x35ef04…35f098 Dummy {f00=0x0112, f01=0x0190, f02=»10,A1 SAVE PARAMETER : P LDR A1,A8 ; P ADK A1,ECBRL ; . ( P LDR A8,A2 SET A8 TO DWT ECB ADDRESS ; D P ADK A2,ECBRL ; p P LDK A3,8 ; . P MVUS A3 MOVE PART OF USER ECB TO DWT ECB ; " P LDR A1,A10 RESTORE PARAMETER ; P XIF ; P* ; P I
0x35f098…35f22c Dummy {f00=0x0112, f01=0x0190, f02=»M ECBRC,A8 RESET RETURN CODE ; P XIF < & P* < 2 P EJECT TOSSIO < < P* < T P* < ^ PTIO110 EQU * < h P ECR A3,A7 < | P ANK A3,/FF ORDER OPTION < , P RF(Z) TIO120 NO SPECIAL OPTION IF ZERO < ( P SC A3,DWTOPT,A6 STORE OPTION IN DWT <
0x35f22c…35f3c0 Dummy {f00=0x0112, f01=0x018e, f02=»TTAB ADDRESS IN DWTTAB < z P* = PTIO130 EQU * = ( P IFT MMUPAG=0 = < & P ST A8,DWTECB,A6 SET ECB ADDRESS = R P XIF = | P* = P EJECT TOSSIO = P* = . P* UPDATE DWTWAT (WAIT/ACTIVATE INDICATOR) = P* = P LDR A2,A4 CHECK PARAMET
0x35f3c0…35f554 (5, 546) Dummy {f00=0x0112, f01=0x0190, f02=» P LDK A4,1 INDICATE WAIT > P RF TIO230 > $ P* > 6 < PTIO210 CF A15,GETBLK SAVE PARAMETER AND DISPATCH ADDRESS > @ P* > 2 PTIO220 CF A15,QTJOB QUEUE TASK FOR DISPATCHING > P* > 8 PTIO230 ST A4,DWTWAT,A6 STORE WAIT/ACTIVATE INDICATOR > P*
0x35f554…35f6e8 Dummy {f00=0x0112, f01=0x0190, f02=»MP IF SYSTEM MODE > " P LD A3,DEVIND,A12 DEVICE INDEX ? , P RF(N) TIO250 NO SPECIAL ACTION REQUIRED ? @ " P RF(Z) TIO240 DATA MANAGEMENT ? p P CWK A3,DK:DIX CHECK IF DISC ? P RF(NE) TIO235 NOT DISC ? ( P CF A15,TIOCW2 MOVE 2ND CONTROL WORD ? P*
0x35f6e8…35f87c Dummy {f00=0x0112, f01=0x0190, f02=» IS READ/WRITE ? r . P RF(Z) TIO250 JUMP IF NO READ/WRITE ORDER @ P* @ H PTIO240 EQU * @ R P ENB @ f < P CFI A15,TIOTAB,A3 BRANCH TO RELEVANT READ/WRITE ROUTINE @ r P XIF @ P* @ * PTIO250 ENB GIVE OTHER TASKS A CHANCE @ P* @ * PTIO260 L
0x35f87c…35fa10 Dummy {f00=0x0112, f01=0x0190, f02=» @ P* A P* A P********** A P* SWITCH * A . P********** A @ P* A R P* SWITCH PRIORITY LEVEL: A P* A | ( P* IF CPU851, THEN SWITCH TO LEVEL 12 A ( P* IF CPU852, " " " " 16 A ( P* IF CPU857, " " " " 16 A
0x35fa10…35fba4 Dummy {f00=0x0112, f01=0x0190, f02=» A3,/30 CPU851: LEVEL 12 A P XIF B P* B , P IFF CPU852+CPU857=0 B 6 ( P LDK A3,/40 CPU852/CPU857: LEVEL 16 B R P XIF B ~ P* B ( P SC A3,2,A15 SET NEW LEVEL ON STACK B " P RTN A15 RETURN WITH NEW LEVEL B P* B P EJECT TOSSIO B P
0x35fba4…35fd38 Dummy {f00=0x0112, f01=0x0190, f02=»CTING B Z @ P* THE APPROPRIATE ROUTINE AT READ/WRITE REQUESTS, DEPENDING C > P* ON THE DEVICE CONNECTION (PROGRAMMED CHANNEL, MUX ETX). C R > P* IF NO READ/WRITE REQUEST, CONDITION REGISTER ON STACK IS C * P* SET TO ZERO, ELSE NOT EQUAL TO ZERO. C P* C
0x35fd38…35fecc Dummy {f00=0x0112, f01=0x0190, f02=»ING C ^ . P* CR = 0 IF NO READ/WRITE REQUEST D , P* CR <> 0 IF READ/WRITE REQUEST D > P* A4 IS DESTROYED D n P* D , PRD:WR LD A4,DWTOR,A6 ORDER CODE FROM DWT D P ANK A4,/3F D P* D * PRD:WR2 ADKL A15,4 ADJUST STACKPOINTER D
0x35fecc…360060 Dummy {f00=0x0112, f01=0x0190, f02=»3,A4 ADD READ/WRITE INDEX D ( P ABR* A15 RETURN WITHOUT CHANGING CR E " P* E N P EJECT TOSSIO E X P* E p P* E z P********** E P* ORDTAB * E P********** E P* E 2 P* ORDTAB CONTAINS ORDER CONSTANTS AS FOLLOWS: E P* E P* =
0x360060…3601f4 (5, 547) Dummy {f00=0x0112, f01=0x018e, f02=» BYTES 0,1 /00, /01 E P BYTES 1,1 /02, /03 F P BYTES 0,TINDEX+1 /04, /05 F 8 & P BYTES TINDEX+1,TINDEX+1 /06, /07 F Z P BYTES TINDEX+1,0 /08, /09 F P BYTES 1,TINDEX+1 /0A, /0B F P BYTES 0,0 /0C, /0D F P BYTES 0,0 /0E, /0F F P BYTES 0
0x3601f4…360388 Dummy {f00=0x0112, f01=0x0190, f02=» P BYTES 0,0 /1A, /1B G P BYTES 0,0 /1C, /1D G P BYTES 0,0 /1E, /1F G < P BYTES 0,TINDEX+1 /20, /21 G X P BYTES TINDEX+1,0 /22, /23 G z P BYTES TINDEX+1,0 /24, /25 G P BYTES 0,TINDEX+1 /26, /27 G P BYTES 0,0 /28, /29 G P BYTES 0,0 /
0x360388…36051c Dummy {f00=0x0112, f01=0x0190, f02=»YTES 0,0 /34, /35 G P BYTES 0,0 /36, /37 H P BYTES 0,0 /38, /39 H 6 P BYTES 0,0 /3A, /3B H R P BYTES 0,0 /3C, /3D H n P BYTES 0,0 /3E, /3F H P* H P EJECT TOSSIO H P* H P* T I O : D M H P* H 4 P* THIS MODULE IS CALLE
0x36051c…3606b0 Dummy {f00=0x0112, f01=0x018e, f02=»* COMPLETION OF THE REQUEST IS 'TEN:DM'. H P* I 0 " P* INPUT: A8 = DWT ECB ADDRESS I : $ P* A9 = USER ECB ADDRESS I ` P* I P* OUTPUT: A2 IS DESTROYED I P* I . PTIO:DM EQU * DATA MANAGEMENT, INPUT/OUTPUT I ( P EL A2,ECBBA,A9 USER BUF
0x3606b0…360844 Dummy {f00=0x0112, f01=0x0190, f02=» I ~ P* J PA15RTN EQU * J P RTN A15 J & P* J 6 P EJECT TOSSIO J @ P* J X P* T I O P C I J b P* J x B P* THIS MODULE IS CALLED BY 'TIO' WHEN A READ REQUEST HAS BEEN J > P* ISSUED AND THE DEVICE IS RUNNING ON PROGRAMMED CHANNEL. J B
0x360844…3609d8 Dummy {f00=0x0112, f01=0x0190, f02=»* THE CORRESPONDING MODULE CALLED BY 'TENDIO' AT J , P* COMPLETION OF THE REQUEST IS 'TENPCI'. K 8 4 P* NOTICE THAT ENTRY TIPI05 IS USED BY 'TIOKBI'. K h P* K " P* INPUT: A8 = DWT ECB ADDRESS K $ P* A9 = USER ECB ADDRESS K , P* A12 = ADDRESS
0x3609d8…360b6c Dummy {f00=0x0112, f01=0x0190, f02=»A1,ECBRL,A8 REQUESTED LENGTH K 2 P CW A1,BUFLEN,A12 COMPARE WITH DWT BUFFER SIZE L $ 6 P RF(G) IO:ERR REQ. LENGTH EXCEEDS DWT BUFFER SIZE L Z P* L . PTIPI05 EQU * ENTRY POINT USED BY 'TIOKBI' L ( P EL A1,ECBBA,A9 USER BUFFER ADDRESS L P ANK A1,1 L
0x360b6c…360d00 Dummy {f00=0x0112, f01=0x0190, f02=»DRESS EVEN L n P ANS A1,ECBBA,A8 M P RTN A15 M * P* M : P EJECT TOSSIO M D P* M P* T I O M X I M f P* M | B P* THIS MODULE IS CALLED BY 'TIO' WHEN A READ REQUEST HAS BEEN M > P* ISSUED AND THE DEVICE IS RUNNING ON MULTIPLEXOR CHANNEL. M
0x360d00…360e94 (5, 548) Dummy {f00=0x0112, f01=0x0190, f02=»ING MODULE CALLED BY 'TENDIO' AT M , P* COMPLETION OF THE REQUEST IS 'TENMXI'. N ( N P* NOTICE THAT MODULES 'TIOMXO', 'TIODKI' AND 'TIODKO' ARE EQUAL TO TIOMXI. N X P* N P* INPUT: A5 = TTAB ADDRESS N " P* A8 = DWT ECB ADDRESS N P* A9 = US
0x360e94…361028 Dummy {f00=0x0112, f01=0x018e, f02=» P* O PTIOMXI EQU * MUX, INPUT O ( P EL A1,ECBBA,A9 USER BUFFER ADDRESS O . P ECR A2,A1 O Z & P ANKL A1,/FFF SKIP 4 LEFTMOST BITS O l P SRL A2,3 O & P ANK A2,/1E MMUTAB INDEX (5 BITS) O P ADR A2,A5 ADD TTAB ADDRESS O * P LC A2,TTB:MT,A2 P
0x361028…3611bc Dummy {f00=0x0112, f01=0x0190, f02=» O P SRC A2,4 P P ORR A1,A2 P 2 P ST A1,ECBBA,A8 STORE MODIFIED BUFFER ADDRESS P , P RTN A15 P b P* P r P EJECT TOSSIO P | P* P P* T I O K B I P P* P B P* THIS MODULE IS CALLED BY 'TIO' WHEN A READ REQUEST HAS BEEN P N P* IS
0x3611bc…361350 Dummy {f00=0x0112, f01=0x018e, f02=»* IN 'TIOPCI' AND ENTRY TIPO05 IN 'TIOPCO'. P 4 P* THE CORRESPONDING MODULE CALLED BY 'TENDIO' AT Q 4 , P* COMPLETION OF THE REQUEST IS 'TENKBI'. Q l P* Q P* INPUT: A6 = DWT ADDRESS Q P* A7 = ORDER CODE Q " P* A8 = DWT ECB ADDRESS Q P
0x361350…3614e4 Dummy {f00=0x0112, f01=0x0190, f02=» PTIOKBI EQU * KEYBOARD/CTW R $ P LD A1,ECBRL,A8 REQUESTED LENGTH R & 2 P CW A1,BUFLEN,A12 COMPARE WITH DWT BUFFER SIZE R N 6 P RF(G) IO:ERR REQ. LENGTH EXCEEDS DWT BUFFER SIZE R 6 P CF A15,TIPI05 CHECK AND CORRECT BUFFER ADDRESSES R P CWK A7,1 CHECK
0x3614e4…361678 Dummy {f00=0x0112, f01=0x0190, f02=»E R x P* S P EJECT TOSSIO S P* S , P* S 6 P LDR A1,A9 S @ P ADK A1,8 S R P ADKL A8,12 S d * P ST A8,-2,A8 SET DWT KEYTABLE ADDRESS S x P SUKL A8,4 S * P ELR A3,A4 FIRST WORD OF USER KEYTABLE S P ANK A4,1 S * P RF(NZ) TIKB10 K
0x361678…36180c Dummy {f00=0x0112, f01=0x0190, f02=»DK A3,1 S 0 P CW A3,KEYLEN,A12 CHECK KEYTABLE BUFFER SIZE T P RF(G) IO:ERR TOO SMALL T D P CF A15,TIPO05 T d & P SUKL A8,8 ADJUST DWT ECB ADDRESS T z P* T PTIKB20 EQU * T P RTN A15 T P* T P EJECT TOSSIO T P* T P* T I O I
0x36180c…3619a0 Dummy {f00=0x0112, f01=0x0190, f02=»I DISC, INPUT T P* U P EJECT TOSSIO U P* U 8 P* T I O P C O U B P* U X B P* THIS MODULE IS CALLED BY 'TIO' WHEN A WRITE REQUEST HAS BEEN U b > P* ISSUED AND THE DEVICE IS RUNNING ON PROGRAMMED CHANNEL. U B P* TIOPCO CHECKS THAT REQUESTED
0x3619a0…361b34 (5, 549) Dummy {f00=0x0113, f01=0x0190, f02=»ER. U x 4 P* THE CORRESPONDING MODULE CALLED BY 'TENDIO' AT V , P* COMPLETION OF THE REQUEST IS 'TENPCO'. V D 6 P* NOTICE THAT MODULE 'TIOKBO' IS EQUAL TO TIOPCO. V t F P* NOTICE ALSO THAT ENTRY TIPO05 IS USED BY 'TIOKBI' AND 'TENITO'. V & P* TIOPCO IS ALSO
0x361b34…361cc8 Dummy {f00=0x0113, f01=0x018e, f02=»E DESTROYED V ~ P* W , PTIOPCO EQU * PROGRAMMED CHANNEL, OUTPUT W 4 P LD A2,DWTADR,A6 ADDRESS TO DRIVER ADDRESS BLOCK W N $ P LD A3,ECBRL,A8 REQUESTED LENGTH W ( P RF(NP) TIPO20 REQUESTED LENGTH <= 0 W 2 P CW A3,BUFLEN,A2 COMPARE WITH DWT BUFFER SIZE
0x361cc8…361e5c Dummy {f00=0x0113, f01=0x018e, f02=» W ~ P* X P* X : PTIPO05 EQU * ENTRY POINT USED BY 'TIOKBI' AND 'TENITO' X P ADK A3,1 X Z . P ANKL A3,/FFFE MAKE REQUESTED LENGTH EVEN X l ( P EL A1,ECBBA,A1 USER BUFFER ADDRESS X & P LD A2,ECBBA,A8 DWT BUFFER ADDRESS X 0 P ANKL A2,/FFFE MAKE
0x361e5c…361ff0 Dummy {f00=0x0113, f01=0x0190, f02=» X ~ P* Y 6 PTIPO10 MVUS A3 MOVE (USER BUFFER) TO SYSTEM BUFFER Y P* Y L PTIPO20 RTN A15 Y V P* Y l 0 PTIPO30 EQU * USER BUFFER ADDRESS WAS UNEVEN Y v 4 P ORS A4,ECBBA,A8 MAKE DWT BUFFER ADDRESS UNEVEN Y 0 P ELR A4,A1 FIRST CHARACTER FROM USER B
0x361ff0…362184 Dummy {f00=0x0113, f01=0x0190, f02=»FER POINTER Y x ( P RB TIPO10 MOVE REMAINING CHARACTERS Z P* Z @ P EJECT TOSSIO Z J P* Z b P* I O : E R R Z l P* Z , P* DRIVER (DWT) MMU BUFFER IS TOO SMALL. Z B P* SET RETURN CODE /8008 (REQUEST ERROR AND INCORRECT LENGTH). Z & P* BRAN
0x362184…362318 Dummy {f00=0x0113, f01=0x0190, f02=»ACKPOINTER Z z P LD A1,DWTST,A6 DWT STATUS [ P SLL A1,2 CHECK ECHO BIT [ 4 P RF(NN) IO:E10 NOT ECHO [ T P LDR A1,A6 SAVE DWT ADDRESS [ t & P LD A6,DWTECH,A6 ECHO DWT ADDRESS [ P CF A15,TENDIO [ " P LDR A6,A1 RESTORE DWT ADDRESS [ P* [ P
0x362318…3624ac Dummy {f00=0x0113, f01=0x0190, f02=» [ P* P* T I O M X O P* ( " PTIOMXO EQU TIOMXI MUX, OUTPUT 2 P* X P* T I O K B O b P* x * PTIOKBO EQU TIOPCO KEYBOARD/CTW, OUTPUT P* P* T I O I T O P* 6 PTIOITO EQU A15RTN INTERTASK COMMUNICATION, OUT
0x3624ac…362640 Dummy {f00=0x0113, f01=0x0190, f02=»* T E N : D M P* ] 6 P* THIS MODULE IS CALLED BY 'TENDIO' WHEN A REQUEST ] . P* FOR DATA MANAGEMENT HAS BEEN COMPLETED. ] Z D P* NOTICE THAT MODULES 'TENDKI' AND 'TENDKO' ARE EQUAL TO TEN:DM. ] P* ] P* INPUT: A6 = DWT ADDRESS ] $ P*
0x362640…3627d4 (5, 550) Dummy {f00=0x0113, f01=0x018e, f02=» LD A1,DWTMEC,A6 MMU ECB ADDRESS ] ( P LD A1,ECBCW2,A1 SECOND CONTROL WORD ^ ( P ES A1,ECBCW2,A8 ^ T P RTN A15 ^ l P* ^ | P EJECT TOSSIO ^ P* ^ P* T E N P C I ^ P* ^ D P* THIS MODULE IS CALLED BY 'TENDIO' WHEN A READ REQUEST HAS BEEN
0x3627d4…362968 Dummy {f00=0x0113, f01=0x018e, f02=» ^ T P* TO THE USER BUFFER. _ 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'. _ n P* _ P* INPUT: A6 = DWT ADDRESS _ $ P* A8 = USER ECB ADDRESS _ P* _ & P
0x362968…362afc Dummy {f00=0x0113, f01=0x0190, f02=» $ P LD A4,ECBEL,A2 EFFECTIVE LENGTH ` " P RF(NP) TEPI30 NO MOVE IF ZERO ` , & P LD A1,ECBBA,A2 DWT BUFFER ADDRESS ` R P* ` | . PTEN:DC EQU * ENTRY POINT USED BY 'DC:MIN' ` ( P EL A2,ECBBA,A8 USER BUFFER ADDRESS ` $ P LDK A3,1 CHECK BUFFER ADDRESSES `
0x362afc…362c90 Dummy {f00=0x0113, f01=0x0190, f02=»UFFER ADDRESS EVEN ` | P* a P EJECT TOSSIO a $ P* a < P* a F 2 PTEPI10 EQU * BOTH BUFFER ADDRESSES WERE UNEVEN a P 0 P LDR* A3,A1 FIRST CHARACTER FROM DWT BUFFER a P ELR A8,A2 a P* a * PTEPI15 ANK A3,/FF SKIP LEFT CHARACTER a ( P ANK
0x362c90…362e24 Dummy {f00=0x0113, f01=0x0190, f02=»TERS a t P ADK A2,1 b P SUK A4,1 b * P RF(P) TEPI25 MORE CHARACTERS TO MOVE b 0 P RTN A15 NO, RETURN b ^ P* b z PTEPI20 TM A3,A2 b * P RF(Z) TEPI25 USER BUFFER ADDRESS EVEN b " P LDR A3,A1 DWT BUFFER ADDRESS b $ P ADR A3,A4 ADD EFFECTIVE
0x362e24…362fb8 Dummy {f00=0x0113, f01=0x0190, f02=»T TO NEXT CHARACTER b 4 P CWR A3,A1 COMPARE WITH START ADDRESS OF BUFFER c * P RB(NE) TEPI23 MORE CHARACTERS TO MOVE c T 0 P ADK A1,1 NO, MAKE DWT BUFFER ADDRESS UNEVEN c P RB TEPI10 c P* c P EJECT TOSSIO c P* c P* c , PTEPI25 LDR
0x362fb8…36314c Dummy {f00=0x0113, f01=0x0190, f02=»SER BUFFER c n P* d PTEPI30 RTN A15 d P* d 2 , PTEPI40 EQU * EFFECTIVE LENGTH WAS UNEVEN d < ( P SUK A4,1 MAKE EFFECTIVE LENGTH EVEN d l , P RF(Z) TEPI50 ONLY ONE CHARACTER TO MOVE d P LDR A8,A4 NO, SAVE A4 d 0 P MVSU A4 MOVE (SYSTEM BUFFER) TO U
0x36314c…3632e0 Dummy {f00=0x0113, f01=0x0190, f02=»ROM DWT BUFFER d t P ELR A3,A2 e P RB TEPI15 e ( P* e : . PTEPI60 EQU * DWT BUFFER ADDRESS WAS UNEVEN e D " P LDR A3,A1 DWT BUFFER ADDRESS e v $ P ADR A1,A4 ADD EFFECTIVE LENGTH e P* e " PTEPI70 LCR A8,A3 ONE CHARACTER e 6 P SC A8,-1,A3 MOVE TH
0x3632e0…363474 (5, 551) Dummy {f00=0x0113, f01=0x0190, f02=»PI70 MORE CHARACTERS TO MOVE e . P SUR A1,A4 NO, RESTORE DWT BUFFER ADDRESS f $ * P SUK A1,1 MAKE DWT BUFFER ADDRESS EVEN f V P RB TEPI25 f P* f P EJECT TOSSIO f P* f P* T E N M X I f P* f PTENMXI EQU A15RTN MUX, INPUT f P*
0x363474…363608 Dummy {f00=0x0113, f01=0x0190, f02=»ENPCI INTERTASK COMMUNICATION, INPUT f P* g , P* T E N D K I g 6 P* g L " PTENDKI EQU TEN:DM DISC, INPUT g V P* g | P EJECT TOSSIO g P* g P* T E N P C O g P* g 0 PTENPCO EQU A15RTN PROGRAMMED CHANNEL, OUTPUT g P* g P*
0x363608…36379c Dummy {f00=0x0113, f01=0x0190, f02=»/CTW, OUTPUT g v P* h P* T E N D K O h P* h 4 " PTENDKO EQU TEN:DM DISC, OUTPUT h > P* h d P EJECT TOSSIO h n P* h P* T E N I T O h P* h F P* THIS MODULE IS CALLED BY 'TENDIO' WHEN A WRITE REQUEST HAS BEEN h L P* COMPLETED FO
0x36379c…363930 Dummy {f00=0x0113, f01=0x0190, f02=» h J , P* 'TIOPCO' IS USED FOR MOVING THE DATA. i P* i 8 P* INPUT: A6 = DWT ADDRESS i B P* i d & P* OUTPUT: A1-A4, A8 ARE DESTROYED i n P* i 0 PTENITO EQU * INTERTASK COMMUNICATION, OUTPUT i $ P LD A8,DWTECB,A6 DWT ECB ADDRESS i $ P LD A3,ECB
0x363930…363ac4 Dummy {f00=0x0113, f01=0x018e, f02=»S i n P* j PTEIO10 RTN A15 j P* j * P EJECT TOSSIO j 4 P* j L P* D C : M O T j V P* j l < P* THIS MODULE IS CALLED BY THE DATA COMMUNICATION DRIVER j v < P* IN PURPOSE TO MOVE THE CONTENTS OF THE USER BUFFER TO j < P* THE DRIVER BUFFE
0x363ac4…363c58 Dummy {f00=0x0113, f01=0x0190, f02=» ( P* OUTPUT: NO REGISTERS ARE DESTROYED k P* k 0 , PDC:MOT EQU * DATA COMMUNICATION, OUTPUT k : " P MSR 8,A15 SAVE A1-A8 ON STACK k j $ P SUKL A15,32 ADJUST STACKPOINTER k * P TS 2,A15 SAVE MMU REGISTERS ON STACK k " P LD A5,DWTTAB,A6 TTAB ADDRESS k
0x363c58…363dec Dummy {f00=0x0113, f01=0x0190, f02=» P* l $ PDC:RTN EQU * RETURN TO DC DRIVER l . P TL 2,A15 RESTORE MMU REGISTERS FROM STACK l 6 $ P ADKL A15,32 ADJUST STACKPOINTER l h * P MLR 8,A15 RESTORE A1-A8 FROM STACK... l P RTN A15 ...AND RETURN l P XIF l P* l P EJECT TOSSIO l
0x363dec…363f80 Dummy {f00=0x0113, f01=0x0190, f02=»TENTS OF THE DRIVER BUFFER TO THE USER BUFFER. l t P* m 6 P* INPUT: A1 = RETURN CODE m @ ( P* A4 = DRIVER BUFFER ADDRESS m b P* A6 = DWT ADDRESS m P* m ( P* OUTPUT: NO REGISTERS ARE DESTROYED m P* m PDC:MIN EQU * m P IFT
0x363f80…364114 (5, 552) Dummy {f00=0x0113, f01=0x0190, f02=» SAVE A1-A8 ON STACK m P* n P IFT MMUPAG=1 n & $ P SUKL A15,32 ADJUST STACKPOINTER n < * P TS 2,A15 SAVE MMU REGISTERS ON STACK n d " P LD A5,DWTTAB,A6 TTAB ADDRESS n $ P TL TTB:MT,A5 LOAD MMU REGISTERS n P XIF n P* n P EJECT TOSSIO n
0x364114…3642a8 Dummy {f00=0x0113, f01=0x0190, f02=»A6 = DWT ADDRESS n P* o " PMINMOV EQU * DC:MIN MOVE ENTRY o " P ENB o H P LD A3,DWTECB,A6 ECB ADDRESS o T * P LDR A7,A4 SAVE DRIVER BUFFER ADDRESS o x $ P LD A2,ECBEL,A3 EFFECTIVE LENGTH o " P RF(NP) MIN:40 NOTHING TO MOVE o 8 P CW A2,ECBRL,A3 CHEC
0x3642a8…36443c Dummy {f00=0x0113, f01=0x018e, f02=»FER ADDRESS o x P LDR A3,A5 p ( P ANK A3,1 CHECK USER BUFFER ADDRESS p & . P RF(NZ) MIN:30 USER BUFFER ADDRESS UNEVEN p R P SUK A2,2 p , P RF(N) MIN:30 ONLY ONE CHARACTER TO MOVE p P* p P EJECT TOSSIO p P* p P* WORD MOVE p P*
0x36443c…3645d0 Dummy {f00=0x0113, f01=0x0190, f02=» p $ P SUK A2,2 DECREMENT LOOP COUNTER q 2 P RB(NN) MIN:10 AT LEAST ONE MORE WORD TO MOVE q 0 P* q f PMIN:20 EQU * q p P ADK A2,1 q P RF(N) MIN:40 MOVE FINISHED q P* q P* CHARACTER MOVE q P* q PMIN:30 EQU * q " P LCR A3,A7 MOV
0x3645d0…364764 Dummy {f00=0x0113, f01=0x0190, f02=» q p 6 P RB(P) MIN:30 AT LEAST ONE MORE CHARACTER TO MOVE r P XIF r B P* r N P IFT MMUPAG=1 r X * P ST A1,ECBRC,A3 SET RETURN CODE IN ECB r n $ P LDR A1,A4 DRIVER BUFFER ADDRESS r P LDR A4,A2 EFFECTIVE LENGTH r & P LD A8,DWTUEC,A6 USER ECB ADDRES
0x364764…3648f8 Dummy {f00=0x0113, f01=0x018e, f02=» EJECT TOSSIO r P* s P* s " PMIN:40 EQU * s , P INH s @ " P CF A15,TENDIO PERFORM TENDIO s L P* s r P* RELEASE BUFFER s | P* s * P LD A1,DWTADR,A6 DRIVER ADDRESS BLOCK s , P SU A4,HDRLEN,A1 REAL BUFFER ADDRESS =1 s ( P LD A1,POLAD
0x3648f8…364a8c Dummy {f00=0x0113, f01=0x0190, f02=» s p $ P LDR* A1,A2 NEXT BUFFER ADDRESS t , P RB(NZ) MIN:50 NOT LAST BUFFER IN CHAIN t 0 P* t ` $ P* INSERT BUFFER AT END OF CHAIN t j P* t " P STR A4,A2 UPDATE QUEUE LINKS t P CMR A4 t P* t PMIN:60 EQU * t P IFT CPU852=1 t ( P A
0x364a8c…364c20 Dummy {f00=0x0113, f01=0x0190, f02=»PU852=0 t * P MLR 8,A15 RESTORE A1-A8 FROM STACK... u P* u > PDC:MOT RTN A15 ...AND RETURN u H P XIF u l P* u x P IFT MMUPAG=1 u " P RB DC:RTN RETURN TO DC DRIVER u P XIF u P* u P* ERROR EXIT u P* u " PMIN:70 EQU * DC:MIN ER
0x364c20…364db4 (5, 553) Dummy {f00=0x0114, f01=0x0190, f02=» u P* v P* v P IFT MMUPAG=0 v P IFT CPU852=1 v 2 PDC:MOT EQU * v H 2 P ABL IHRTN RETURN WITHOUT ENABLING INTERRUPTS v P XIF v P* v P EJECT TOSSIO v P* v P* v P********** v P* TENDIO * v P********** v
0x364db4…364f48 Dummy {f00=0x0114, f01=0x0190, f02=»T:- v p P* w * P* ACTOTP IS CALLED TO START THE TASK w P* w D P* -IF NORMAL I/O WITH WAIT:- w N P* w r * P* QTJOB IS CALLED TO QUEUE THE TASK w | 8 P* FOR DISPATCHING WITH THE FOLLOWING PARAMETERS:- w P* w P* A5 = TTAB ADDRESS w
0x364f48…3650dc Dummy {f00=0x0114, f01=0x018e, f02=»HIS DEVICE (DWTTQ NOT ZERO) w r J P* THAT TASK IS PUT IN DISPATCHER QUEUE TO REPEAT THE LKM INSTRUCTION. x $ P* x r P EJECT TOSSIO x | P* x P* x 0 P* ENTRY PARAMETERS TO THIS SUBROUTINE ARE:- x P* x P* A1 = RETURN CODE x P* x
0x3650dc…365270 Dummy {f00=0x0114, f01=0x0190, f02=» x ` * P* DEPENDENT SUBROUTINES ARE PERFORMED. y P* y 6 P EJECT TOSSIO y @ P* y X P* END I/O ENTRY y b P* y z PTENDIO EQU * y P IFT CPU852=1 y & P CF A15,SAVE8 SAVE A1-A8 ON STACK y P XIF y P* y P IFT CPU852=0 y P INH
0x365270…365404 Dummy {f00=0x0114, f01=0x0190, f02=»4,DWTST POINT TO DWT STATUS y P INH z $ ( P LD A5,DWTTQ,A6 TERMINAL QUEUE LINK z 0 P RF(Z) TEN110 NO TASK QUEUED z P LDKL A2,/800 ATTACH BIT z P ANR* A2,A4 z & P RF(Z) TEN100 DEVICE NOT ATTACHED z , P CW A5,DWTTAB,A6 ATTACHED TO OTHER TASK z
0x365404…365598 Dummy {f00=0x0114, f01=0x0190, f02=»UPDATE QUEUE ANCHOR ADDRESS z P ST A3,DWTTQ,A6 { $ . P CF A15,QTJOB QUEUE TASK TO REPEAT REQUEST { < P* { n P* UPDATE ECB AND DWT { x P* { 0 PTEN110 LD A5,DWTTAB,A6 TTAB ADDRESS FROM DWT { P* { PTEN120 LDKL A2,/8000 { , P ORRS A2,A4 INDI
0x365598…36572c Dummy {f00=0x0114, f01=0x0190, f02=»F(Z) TEN260 BRANCH IF ENTERED FROM ECHO OR RECOVERY { P* | < P EJECT TOSSIO | F P* | ^ P* | h * P ORRS A2,A3 SET EVENT COMPLETED IN ECB | r , P ORS A1,ECBRC,A3 SET RETURN CODE IN ECB | P* | P IFT MMUPAG=1 | P LD A4,TTB:PW,A5 PSW |
0x36572c…3658c0 Dummy {f00=0x0114, f01=0x0190, f02=» | $ P SUKL A15,32 ADJUST STACKPOINTER } * P TS 2,A15 SAVE MMU REGISTERS ON STACK } 0 . P TL TTB:MT,A5 LOAD MMU REGISTERS FROM TTAB } ^ P* } P EJECT TOSSIO } P* } P* MOVE DWT ECB TO USER ECB } P* } & P LD A8,DWTUEC,A6 USER ECB ADDRES
0x3658c0…365a54 (5, 554) Dummy {f00=0x0114, f01=0x0190, f02=» A2,A8 } P ADK A2,ECBEL ~ P LDK A4,6 ~ $ 4 P MVSU A4 MOVE EFF. LENGTH, RTN CODE & CNTRL WORD ~ 6 P* ~ n 4 P LD A3,DWTADR,A6 ADDRESS TO DRIVER ADDRESS BLOCK ~ x " P LD A3,DEVIND,A3 DEVICE INDEX ~ , P RF(N) TEN160 NO SPECIAL ACTION REQUIRED ~ " P R
0x365a54…365be8 Dummy {f00=0x0114, f01=0x0190, f02=»E ~ t P* , P CF A15,RD:WR CHECK IF IT WAS READ/WRITE . P RF(Z) TEN160 JUMP IF NO READ/WRITE ORDER D P* v PTEN140 EQU * P ENB < P CFI A15,TENTAB,A3 BRANCH TO RELEVANT READ/WRITE ROUTINE P* P EJECT TOSSIO P*
0x365be8…365d7c Dummy {f00=0x0114, f01=0x0190, f02=»ERS FROM STACK t $ P ADKL A15,32 ADJUST STACKPOINTER P XIF > P* J P EJECT TOSSIO T P* l : P* CHECK IF NO WAIT, WAIT, MULTIPLE WAIT OR ACTIVATION v P* PTEN200 EQU * , P LD A4,DWTWAT,A6 WAIT/ACTIVATE INDICATOR ( P RF(Z)
0x365d7c…365f10 Dummy {f00=0x0114, f01=0x0190, f02=» RF(Z) TEN230 ACTIVATION P LD A8,DWTECB,A6 ECB ADDRESS P* D P IFT MMUPAG=1 N * P AN A3,TTB:PW,A5 SYSTEM/USER MODE BIT d P RF(Z) TEN210 SYSTEM MODE . P LD A8,DWTUEC,A6 NO, GET USER ECB ADDRESS P XIF P* PTEN210 EQU *
0x365f10…3660a4 Dummy {f00=0x0114, f01=0x0190, f02=» LDR* A3,A4 NEXT DWT ADDRESS P RF(Z) TEN240 NO MORE DWT:S $ P CMR A4 SET TO NO WAIT AGAIN H P LDR A4,A3 l P RB TEN220 ~ P* P EJECT TOSSIO P* P* PTEN230 EQU * 8 P CF A15,FREBLK ACTIVATE: GET PARAMETER AND DIS
0x3660a4…366238 Dummy {f00=0x0114, f01=0x415e, f02=»E TASK FOR DISPATCHING x P* PTEN250 EQU * ( $ P CM DWTECB,A6 RESET ECB ADDRESS < P* d PTEN260 EQU * n P IFT CPU852=1 P ABL IHRET8 P XIF P* P IFT CPU852=0 * P MLR 8,A15 RESTORE A1-A8 FROM STACK... P R
0x366238…3663cc Dummy {f00=0x0114, f01=0x2008, f02=» NT TOSSIO END @ &
0x3663cc…366560 Dummy {f00=0x0114, f01=0x0190, f02=» P EJECT M P* M < P* FIND DWT CONTAINING SUBTERMINAL ADDRESS AS GIVEN IN A2 M P* M $ P* CALLING SEQUENCE: CF A5,FINTER M f P* A2=SUBTERMINAL ADDRESS M P* A4 DESTROYED M " P* A3#0: DWT TO FOUND TERMINAL M P* M PFINTER EQU * M P
0x366560…3666f4 (5, 555) Opaque[0x194]
0x3666f4…366888 # DirEnt {nam=»TPROC «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2290, f03=0x0000}
0x3666f4…366888 IdxSect {
0x3666f4…366888 f00 = 0x0114 // 0x3666f4 @0x0
0x3666f4…366888 f01 = 0x0006 // 0x3666f6 @0x2
0x3666f4…366888 gno = [ // 0x3666f8 @0x4
0x3666f4…366888 [0x00]: C0x0114.0x2.0
0x3666f4…366888 [0x01]: C0x0114.0x3.0
0x3666f4…366888 [0x02]: C0x0115.0x0.0
0x3666f4…366888 ]
0x3666f4…366888 }
0x366888…366a1c Dummy {f00=0x0114, f01=0x0190, f02=» 0 P IDENT TPROC REL 10.0 80-03-14 870105041000 P 8 P* @ P* J 6 P************************************************** T P* $ P* PHILIPS TERMINAL SYSTEM PTS P* $ P* TPROC = TOSS LKM PROCESSORS P* P* P*
0x366a1c…366bb0 Dummy {f00=0x0114, f01=0x0190, f02=»AINS THE FOLLOWING | P* TOSS LKM PROCESSORS: P* : P* - TWAIT = WAIT D P* ` P* - TMWAIT = MULTIPLE WAIT j P* ( P* - TACTOT = ACTIVATE/RESTART TASK P* P EJECT TPROC P* P* P***********
0x366bb0…366d44 Dummy {f00=0x0114, f01=0x0190, f02=»R l , P ENTRY TACTOT ACTIVATE/RESTART PROCESSOR P EJECT TPROC : P* P P* Z P************* d P* EXTERNALS * z P************* P* P* P EXTRN TDISP DISPATCHER , P EXTRN QTJOB QUEUE TASK FOR DISPATCHING *
0x366d44…366ed8 Dummy {f00=0x0114, f01=0x0190, f02=» EXTRN FNDDWT FIND DWT ADDRESS FROM FILE CODE 0 P EXTRN FNDTID FIND TTAB ADDRESS FROM TASK ID 6 P EXTRN TTB:SA TTAB SAVE AREA j P EXTRN DWTST DWT STATUS P EXTRN DWTTAB TTAB ADDRESS * P EXTRN DWTWAT WAIT/ACTIVATE INDICATOR P EJECT T
0x366ed8…36706c Dummy {f00=0x0114, 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 0 P* P EJECT TPROC P* P* P******** P* WAIT *
0x36706c…367200 Dummy {f00=0x0114, f01=0x0190, f02=» 6 P* WANTS TO SYNCHRONIZE WITH A PARTICULAR EVENT. P* > * P* IT IS ENTERED FROM THE LKM HANDLER H & P* WITH THE FOLLOWING PARAMETERS: v P* P* A5 = TTAB ADDRESS P* A8 = ECB ADDRESS P* P* * PTWAIT CF A15,FND
0x367200…367394 (5, 556) Dummy {f00=0x0114, f01=0x018e, f02=»,A8 RETURN IF EVENT COMPLETED P XIF & P* 2 P IFT MMUPAG=1 < ( P ELR A1,A8 RETURN IF EVENT COMPLETED R P XIF ~ P* ( P RF(N) TP:QDI I/O ALREADY COMPLETED 0 P IM DWTWAT,A6 NO, SET WAIT INDICATOR IN DWT P* & PT:DISP ABL
0x367394…367528 Dummy {f00=0x0114, f01=0x0190, f02=» P* P* 8 P* THIS IS THE ACTIVATE/RESTART TASK LKM PROCESSOR. P* T 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* (
0x367528…3676bc Dummy {f00=0x0114, f01=0x0190, f02=»NTIFICATION FOR TASK TO BE ACTIVATED P* , P* 6 PTACTOT EQU * @ $ P CF A15,FNDTID FIND TTAB ADDRESS T P ADK A2,0 SET CR | $ 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 G
0x3676bc…367850 Dummy {f00=0x0114, f01=0x0190, f02=»ASK AND DISPATCH z P* P EJECT TPROC " P* 8 P* B P********** L P* TMWAIT * ^ P********** p P* P* 0 P* THIS IS THE MULTIPLE WAIT LKM PROCESSOR. P* * P* IT IS ENTERED FROM THE LKM HANDLER & P* WI
0x367850…3679e4 Dummy {f00=0x0114, f01=0x0190, f02=»E SPECIFIED EVENTS IS COMPLETED, ~ 6 P* RETURN IS MADE TO THE CALLING TASK VIA TENDIO ( & P* WITH THE FOLLOWING PARAMETERS: b P* , P* A8 = ECB ADDRESS OF COMPLETED EVENT P* > P* IF REQUEST ERROR, A7 := -1 (AND NO RETURN VIA TENDIO
0x3679e4…367b78 Dummy {f00=0x0114, f01=0x0190, f02=» TPROC P* P* $ PTMWAIT EQU * MULTIPLE WAIT ENTRY " P LDK A3,0 J P* P IFT MMUPAG=0 f * P LDR* A1,A7 GET NO OF ECB:S IN ECBBLK | P XIF P* P IFT MMUPAG=1 ( P ELR A1,A7 GET NO OF ECB:S IN ECBBLK P XIF
0x367b78…367d0c Dummy {f00=0x0114, f01=0x0190, f02=» b P* P IFT MMUPAG=0 P LDR* A8,A7 GET ECB ADDRESS ( & P LDR* A2,A8 GET FIRST WORD OF ECB L P XIF v P* P IFT MMUPAG=1 P ELR A8,A7 GET ECB ADDRESS $ P ELR A2,A8 GET FIRST WORD OF ECB P XIF P* ( P RF(N)
0x367d0c…367ea0 Dummy {f00=0x0114, f01=0x0190, f02=»NOT FOUND P* P EJECT TPROC P* 2 P* < " P LD A2,DWTST,A6 GET DWT STATUS F P RF(N) TP:RQE NOT BUSY l P CW A5,DWTTAB,A6 2 P RF(NE) TP:RQE REQUEST NOT ISSUED BY THIS TASK 0 P LD A2,DWTWAT,A6 GET WAIT/ACTIVATE INDICATOR
0x367ea0…368034 (5, 557) Dummy {f00=0x0115, f01=0x018e, f02=»F(NZ) TMW:20 NOT THE FIRST ECB IN ECBBLK & P LDR A9,A6 SAVE FIRST DWT ADDRESS 0 P LDR A3,A6 Z P* l PTMW:20 EQU * v 8 P ST A6,DWTWAT,A9 CHAIN THIS DWT WITH THE ONE BEFORE $ P LDR A9,A6 SAVE THIS DWT ADDRESS P SUK A1,1 & P RB(P) T
0x368034…3681c8 Dummy {f00=0x0115, f01=0x0190, f02=» PTMW:30 EQU * 4 P ST A8,TTB:SA+16,A5 UPDATE A8 IN TTAB SAVE AREA 2 P ADK A3,0 CHECK FLAG IF FIRST ECB TO WAIT FOR T & P RF(Z) TP:QDI FIRST ECB IN ECBBLK P* : PTMW:40 ADKL A3,DWTWAT POINT TO WAIT/ACTIVATE INDICATOR $ P LDR* A2,A3
0x3681c8…36835c Dummy {f00=0x0115, f01=0x40e6, f02=»* P EJECT TPROC P* P* * PTP:RQE EQU * 4 " P ABL LKMRQE LKM REQUEST ERROR H P* n PTP:QDI EQU * x ( P ABL LKMQDI QUEUE TASK AND DISPATCH P* P* P* P END @ VATE INDICATOR $ P LDR* A2,A3
0x36835c…3684f0 Dummy {f00=0x0115, 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
0x3684f0…368684 Dummy {f00=0x0115, f01=0x0190, f02=»R INF =3 A x & P SUK A3,1 DEC TRANSFER COUNTER =3 B , P RB(P) RCDY12 NOT ENOUGH OF TRANSFERS =3 B : . P LDK A2,CTYCOD SEND 'SET COUNTRY CODE' =1 B j P CF A5,OUTPUT =1 B * P LDK A2,COUNTRY SEND 'COUNTRY CODE' =1 B P ORK A2,/30 =1 B P CF A5,OUTPU
0x368684…368818 Dummy {f00=0x0115, f01=0x0190, f02=»CLEHOM CLEAR AND HOME B P CF A5,OUTPUT SEND C P LDKL A2,/101 C 8 6 P ST A2,DWTAP,A6 SET HEAD LINE-AND-POSITION COUNTER C N P LDR A3,A3 GET OLD STATUS C P RB(N) ENDIO NOT BUSY C " P LDK A1,OPERR SET RETURN CODE C PRCDY15 ABL ADY420 C P
0x368818…3689ac Dummy {f00=0x0115, f01=0x0190, f02=»DY25 NO C ( P LDK A1,2 INDICATE THROUGHPUT ERROR D P RB RCDY15 D < & PRCDY25 LDK A2,STX START OF MESSAGE D N P CF A5,OUTPUT D x 4 P LC A4,DWTBC,A6 GET NUMBER OF POSITIONS TO BACK D P ANK A4,/FF D P RF(E) RCDY30 D . P CF A5,BACCAN SEND BACKS
0x3689ac…368b40 Dummy {f00=0x0115, f01=0x0190, f02=»* D 0 P* ECHODY = DEVICE-DEPENDENT ECHO-ROUTINE E P* E > PECHODY EQU * E H P LDR A7,A7 EOR? E P RF(N) ECDY17 YES E t P LDR A3,A2 SAVE CHARACTER E P* E P IFT EORECH=0 E P* E P SUK A2,/80 E $ P RF(NN) ECDY20 NOT TO BE E
0x368b40…368cd4 (5, 558) Opaque[0x194]
0x368cd4…368e68 # DirEnt {nam=»TSWBLK«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x22a8, f03=0x0000}
0x368cd4…368e68 IdxSect {
0x368cd4…368e68 f00 = 0x0115 // 0x368cd4 @0x0
0x368cd4…368e68 f01 = 0x0004 // 0x368cd6 @0x2
0x368cd4…368e68 gno = [ // 0x368cd8 @0x4
0x368cd4…368e68 [0x00]: C0x0115.0x1.0
0x368cd4…368e68 [0x01]: C0x0115.0x2.0
0x368cd4…368e68 ]
0x368cd4…368e68 }
0x368e68…368ffc Dummy {f00=0x0115, f01=0x0190, f02=» 2 P IDENT TSWBLK REL 10.0 80-03-14 870105041000 P : * B * L 6 2************************************************** V * $ * PHILIPS TERMINAL SYSTEM PTS * 0 ,* TSWBLK = LOAD/STORE SWAPPABLE WORK BLOCK *
0x368ffc…369190 Dummy {f00=0x0115, f01=0x0190, f02=»HE LOAD/STORE SWAPPABLE WORK BLOCK v > :* LKM PROCESSOR, USED IN TOSS MEMORY MANAGEMENT SYSTEMS. * * l * v EJECT TSWBLK * * *********** * ENTRIES * *********** * * 2 - ENTRY TSWBL
0x369190…369324 Dummy {f00=0x0115, f01=0x0190, f02=»******* * * EXTRN TDISP DISPATCHER $ $ EXTRN LKMRQE LKM REQUEST ERROR D EXTRN SCTSWB SWBTAB ADDRESS l 2 - EXTRN QLTSWB ACTIVATE LDTASK AT ENTRY LT:SWB EJECT TSWBLK * * ********** * TS
0x369324…3694b8 Dummy {f00=0x0115, f01=0x0190, f02=»IT IS ENTERED FROM THE LKM HANDLER & "* WITH THE FOLLOWING PARAMETERS: * * T * A5 = TTAB ADDRESS ^ 0 +* A6 = LKM DATA DIRECTIVE: 19 IF LOAD SWB | 0 ,* = 20 IF STORE SWB * &* A7 = LEFT BYTE : SWB TYPE (NUMBE
0x3694b8…36964c Dummy {f00=0x0115, f01=0x0190, f02=» " " THE SWB TO STORE (A6 = 20) * 4 D ?* TSWBLK WILL ACTIVATE LDTASK (THE LOAD TASK) AT LABEL LT:SWB > 8 8* AND LDTASK WILL LOAD/STORE REQUESTED WORK BLOCK. * ( #* IT RETURNS TO CALLING TASK WITH " * THE FOLLOWIN
0x36964c…3697e0 Dummy {f00=0x0115, f01=0x0190, f02=» ( #* A7 = -2 IF DISC I/O ERROR, ELSE $ * A7 = -3 IF DISC NOT OPERABLE 0 * X EJECT TSWBLK b * z * %* CHECK VALIDITY OF SWPBLK PARAMETERS * $ TSWBLK EQU * SWB HANDLING ENTRY $ LD A1,SCTSWB GET SWBTAB ADDRESS
0x3697e0…369974 (5, 559) Dummy {f00=0x0115, f01=0x0190, f02=»* TSW:10 EQU * ECR A4,A7 ANK A4,/FF GET TYPE NUMBER 0 CWR* A4,A1 CHECK IF LEGAL T * P RB(G) SWBERR SWB TYPE NUMBER TOO BIG v P ADR A4,A4 . * ADR A1,A4 GET ADDRESS TO SWB TYPE POINTER ( # LDR* A1,A1 GET ADDRESS TO SWB T
0x369974…369b08 Dummy {f00=0x0115, f01=0x4116, f02=» * * ACTIVATE LOAD TASK * * 0 + LDR A3,A5 GET TTAB ADDRESS OF CALLING TASK 4 " P LDR A4,A6 LKM DATA DIRECTIVE h 2 . CF A15,QLTSWB ACTIVATE LDTASK AT ENTRY LT:SWB ABL TDISP GO TO DISPATCHER * * * E
0x369b08…369c9c Dummy {f00=0x0115, f01=0x2008, f02=» REQUEST x * * ACTIVATE LOAD TASK " * > TSW:20 EQU * H ( $ LDKL A2,LT:SWB GET DISPATCH ADDRESS 2 . CF A15,QLTSWB ACTIVATE LDTASK AT ENTRY LT:SWB ABL TDISP GO TO DISPATCHER * * * END
0x369c9c…369e30 Dummy {f00=0x0115, f01=0x0190, f02=»ND P P RTN A5 Q P EJECT Q P* Q ( P* Q 2 * P* CURPOS = SUBROUTINE TO SET CURSOR Q < > P* AT ENTRY A4 = CURSOR POS (POSITION AND LINE) Q j P* Q PCURPOS EQU * Q P ADKL A4,/1F1F CONVERT Q P LDK A2,SCADD SET CURSOR Q P
0x369e30…369fc4 Dummy {f00=0x0115, f01=0x0190, f02=» * Q P LDR A2,A4 R & P CF A5,OUTPUT OUTPUT POSITION (X) R P LDR A2,A4 R F P RF(NN) CURR10 Y < /80! R X P LDK A2,/7F R x P RF CURR15 R PCURR10 EQU * R P SRL A2,8 SHIFT RIGHT R PCURR15 EQU * R P CF A5,OUTPUT OUTPUT LINE(Y) R P
0x369fc4…36a158 Dummy {f00=0x0115, f01=0x018e, f02=»=2 R P* =2 S 0 P* AT ENTRY A4 = CHAR TO ERASE FROM USER =2 S . P* AT EXIT A4 = CHAR TO END OF SCREEN =2 S L P* =2 S ~ PERA EQU * =2 S " P LD A2,DWTPOS,A6 MAX CHAR. =2 S P ANK A2,/FF GET MAX CHAR. =2 S 0 P LC A3,DWTAP+1,A6 CURRENT PO
0x36a158…36a2ec Dummy {f00=0x0115, f01=0x4156, f02=» P CWR A4,A2 OUTSIDE SCREEN =2 T P RF(L) ERAEND NO =2 T ( . P LDR A4,A2 OUTSIDE SCREEN MODIFY LENGTH =2 T D P LDKL A3,/FFFF SET OVER =4 T v " PERAEND EQU * END SUBROUTINE =2 T P RTN A5 RETURN =2 T PABDY EQU * T , P CF A15,UPDAPP UPDATE CURSOR P
0x36a2ec…36a480 Dummy {f00=0x0115, f01=0x2008, f02=» U NE) BACA10 7 P NGR A3,A3 NEGATE REGISTER 7 , P ADS A3,DWTST,A6 UPDATE POSITION COUNTER 7 < P RTN A5 7 l P END 7 |@ 7 6 t P* 6 PBACCAN EQU * 6 P LDR A3,A4 6 " PBACA10 LDK A2,BACKSP BACKSPACE 6 P CF A5,OUTPUT SEND 6 $ P LDK
0x36a480…36a614 (5, 560) Opaque[0x194]
0x36a614…36a7a8 # DirEnt {nam=»TTMJOB«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x22b8, f03=0x0000}
0x36a614…36a7a8 IdxSect {
0x36a614…36a7a8 f00 = 0x0115 // 0x36a614 @0x0
0x36a614…36a7a8 f01 = 0x0004 // 0x36a616 @0x2
0x36a614…36a7a8 gno = [ // 0x36a618 @0x4
0x36a614…36a7a8 [0x00]: C0x0115.0x3.0
0x36a614…36a7a8 [0x01]: C0x0116.0x0.0
0x36a614…36a7a8 ]
0x36a614…36a7a8 }
0x36a7a8…36a93c Dummy {f00=0x0115, f01=0x0190, f02=» 2 P IDENT TTMJOB REL 10.0 80-03-14 870105041000 P : P* B P* L P* MONITOR JOB TASK TABLE V P* v P* P********* P*ENTRIES* P********* P* P* P ENTRY TTB:AM ALLOCATION MAP P ENTRY TTB:MT MM
0x36a93c…36aad0 Dummy {f00=0x0115, f01=0x0190, f02=»S n P ENTRY TTMJOB TABLE ENTRY ( P ENTRY TTB:QL DISPATCHER QUEUE LINK , & P ENTRY TTB:ID TASK IDENTIFICATION X P ENTRY TTB:ST TASK STATUS " P ENTRY TTB:PP PENDING POINTER & P ENTRY TTB:PW PROGRAM STATUS WORD $ P ENTRY TTB:SA TERMIN
0x36aad0…36ac64 Dummy {f00=0x0115, f01=0x0190, f02=»***************** x P* P* CONDITIONAL ASSEMBLY $ P* B . P***************************************** L P* ~ . P* A PROGRAM VERSION USING TOSS MMU PAGING * P* IS OBTAINED BY SETTING MMUPAG EQU 1. P* PMMUPAG EQU 0 P*
0x36ac64…36adf8 Dummy {f00=0x0115, f01=0x0190, f02=» TABLE DISPLACEMENT ~ P IFT MMUPAG=1 " P DATA /0000,/0400,/0800,/0C00 2 " P DATA /1000,/1400,/1800,/1C00 X " P DATA /2000,/2400,/2800,/2C00 ~ " P DATA /3000,/3400,/3800,/3C00 P XIF P* & PTTB:CB EQU -6 CURRENT SEGMENT BASE
0x36adf8…36af8c Dummy {f00=0x0115, f01=0x0190, f02=»K ADDRESS DISPLACEMENT v P DATA 0 P* . P EJECT TTMJOB 8 P* P P* Z PTTMJOB EQU * TTMJOB ENTRY d . PTTB:QL EQU *-TTMJOB DISPATCHER QUEUE LINK P DATA 0 P* , PTTB:ID EQU *-TTMJOB TASK IDENTIFICATION P DATA
0x36af8c…36b120 Dummy {f00=0x0115, f01=0x0190, f02=»A 0 P* PTTB:PW EQU *-TTMJOB 4 P DATA /C4C0 PROGRAM STATUS WORD FOR MONITOR JOB 2 P* j P EJECT TTMJOB t P* P* * PTTB:SA EQU *-TTMJOB TERMINAL SAVE AREA P DATA 0 DISPATCH ADDRESS 2 P DATA 0,0,0,0,0,0,0 SAVE A
0x36b120…36b2b4 (5, 561) Dummy {f00=0x0116, f01=0x4014, f02=» P END @
0x36b2b4…36b448 Dummy {f00=0x0116, 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,
0x36b448…36b5dc Dummy {f00=0x0116, f01=0x0190, f02=» 2 P IDENT SYSTAB PRR 10.0 79-12-07 870105041000 P : P* B P* L 8 P*************************************************** V P* $ P* PHILIPS TERMINAL SYSTEM PTS P* 2 P* SYSTAB = INTERRUPT VECTORS, SYSTEM CONTROL 2 P*
0x36b5dc…36b770 Dummy {f00=0x0116, f01=0x018e, f02=»*************** l P* P* " P EJECT SYSTAB , P* D P* N P*********** X P* ENTRIES * l P*********** P* P* 4 P ENTRY SCTMSZ,SCTSFA,SCTEFA SYSTEM CONTROL TABLE P ENTRY SCTIPL P ENTRY SCTANO,SCTA
0x36b770…36b904 Dummy {f00=0x0116, f01=0x0190, f02=» P ENTRY SCTSTB P ENTRY SCTOPT P ENTRY SCTTCT,SCTCDT 0 P ENTRY SCTBUG L & P ENTRY SCTDMT,SCTDMI,SCTFWT,SCTNOF b & P ENTRY SCTNFT,SCTFWL,SCTBLK,SCTDCT P ENTRY SEG:FC,SEG:NS & P ENTRY SEG:ST,SEG:DS,SEG:EL,SEG:PB & P ENTRY PAG:Q
0x36b904…36ba98 Dummy {f00=0x0116, f01=0x0190, f02=»* P* EXTERNALS * P************* P* 6 P* @ P EXTRN TDISP J , P EXTRN IHPFAR POWER FAIL / AUTO RESTART ^ P EXTRN IHLKM LKM INTERRUPT P EXTRN IHRTC REAL TIME CLOCK P EXTRN IHTW TYPEWRITER P EXTRN IHTC CASSETTE T
0x36ba98…36bc2c Dummy {f00=0x0116, f01=0x0190, f02=» NO. 1 p * P EXTRN CHRT2 REMOTE CHANNEL UNIT NO. 2 P EXTRN CHRT3 < P EXTRN CHRT4 P ( P EXTRN IHCC1 CASSETTE CHANGER NO. 1 d ( P EXTRN IHCC2 2 ( P EXTRN IHCC3 3 * P EXTRN CHLT1 LOCAL CHANNEL UNIT
0x36bc2c…36bdc0 Dummy {f00=0x0116, f01=0x018e, f02=» M) DISC l P EXTRN IHLP LINE PRINTER P EXTRN IHCR CARD-READER 0 ( P EXTRN IHDU1,IHDU2 DISC UNIT NO. 1/2 P 0 P EXTRN IHMD,IASCUZ,ISLCI,ISLCO MINI FIX DISC | P EXTRN IHMT MAG. TAPE $ P EXTRN ILLINT ILLEGAL INTERRUPT P EXTRN HALT HALT R
0x36bdc0…36bf54 (5, 562) Opaque[0x194]
0x36bf54…36c0e8 # DirEnt {nam=»DRDC17«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x22c8, f03=0x0000}
0x36bf54…36c0e8 IdxSect {
0x36bf54…36c0e8 f00 = 0x0116 // 0x36bf54 @0x0
0x36bf54…36c0e8 f01 = 0x0032 // 0x36bf56 @0x2
0x36bf54…36c0e8 gno = [ // 0x36bf58 @0x4
0x36bf54…36c0e8 [0x00]: C0x0116.0x1.0
0x36bf54…36c0e8 [0x01]: C0x0116.0x2.0
0x36bf54…36c0e8 [0x02]: C0x0116.0x3.0
0x36bf54…36c0e8 [0x03]: C0x0117.0x0.0
0x36bf54…36c0e8 [0x04]: C0x0117.0x1.0
0x36bf54…36c0e8 [0x05]: C0x0117.0x2.0
0x36bf54…36c0e8 [0x06]: C0x0117.0x3.0
0x36bf54…36c0e8 [0x07]: C0x0118.0x0.0
0x36bf54…36c0e8 [0x08]: C0x0118.0x1.0
0x36bf54…36c0e8 [0x09]: C0x0118.0x2.0
0x36bf54…36c0e8 [0x0a]: C0x0118.0x3.0
0x36bf54…36c0e8 [0x0b]: C0x0119.0x0.0
0x36bf54…36c0e8 [0x0c]: C0x0119.0x1.0
0x36bf54…36c0e8 [0x0d]: C0x0119.0x2.0
0x36bf54…36c0e8 [0x0e]: C0x0119.0x3.0
0x36bf54…36c0e8 [0x0f]: C0x011a.0x0.0
0x36bf54…36c0e8 [0x10]: C0x011a.0x1.0
0x36bf54…36c0e8 [0x11]: C0x011a.0x2.0
0x36bf54…36c0e8 [0x12]: C0x011a.0x3.0
0x36bf54…36c0e8 [0x13]: C0x011b.0x0.0
0x36bf54…36c0e8 [0x14]: C0x011b.0x1.0
0x36bf54…36c0e8 [0x15]: C0x011b.0x2.0
0x36bf54…36c0e8 [0x16]: C0x011b.0x3.0
0x36bf54…36c0e8 [0x17]: C0x011c.0x0.0
0x36bf54…36c0e8 [0x18]: C0x011c.0x1.0
0x36bf54…36c0e8 ]
0x36bf54…36c0e8 }
0x36c0e8…36c27c Dummy {f00=0x0116, f01=0x0190, f02=» 2 P IDENT DRDC17 REL 10.0 80-05-07 870105041000 P : & P =6, A15-CALLS IN TRIDLE 800507 B & P =5, 6805 READ HANGUPS 800507 l P P =4, DC:MIN HEADER P REL 10.1 80-02-13 P =3,MASK+I/P ACT. IND. P 80-02-13
0x36c27c…36c410 Dummy {f00=0x0116, f01=0x018e, f02=»*************************** t P* $ B P* PHILIPS ELECTRONIC INDUSTRIES - TERMINAL DIVISION. PEAB-T . P* t . P* DATA COMMUNICATION DRIVER FOR PTS 6800 ~ P* 4 P* LINE PROCEDURE: BSC CONTENTION/SIEMENS MSV2 P* P* P*
0x36c410…36c5a4 Dummy {f00=0x0116, f01=0x0190, f02=» n P* P* A1 WORK REGISTER " P* A2 I/O AND WORK REGISTER 0 P* A3 WORK REGISTER V P* A4 WORK REGISTER t P* A5 STACK POINTER P* A6 DWT ADDRESS P* A7 BCC ACCUMULATOR P* A8 ECB ADDRESS P
0x36c5a4…36c738 Dummy {f00=0x0116, f01=0x0190, f02=»***************** j P* P* ENTRY POINTS $ P* : < P******************************************************* D P* & P ENTRY DC17ON RECOVERY AT POWER ON P* INTERRUPT HANDLERS P ENTRY IH1701 LINE 01 INPUT P ENTRY IH1702
0x36c738…36c8cc Dummy {f00=0x0116, f01=0x018e, f02=»H1706 OUTPUT P ENTRY IH1707 LINE 04 INPUT P ENTRY IH1708 OUTPUT @ P* DEVICE WORK TABLES d P ENTRY DW1701 LINE 01 DWT P ENTRY DW1702 LINE 02 DWT P ENTRY DW1703 LINE 03 DWT P ENTRY DW1704 LINE 04 DWT P
0x36c8cc…36ca60 Dummy {f00=0x0116, f01=0x0190, f02=» P* < P******************************************************* P* N " P EXTRN TDISP DISPATCHER ENTRY X $ P EXTRN TENDIO REQUEST COMPLETION ~ P EXTRN DISIOE REQUEST ERROR ( P EXTRN SETIME SET TIMER CALL ADDRESS P EXTRN DWTST DWT S
0x36ca60…36cbf4 (5, 563) Dummy {f00=0x0116, f01=0x018e, f02=»CB REQUESTED LENGTH & P EXTRN ECBEL ECB EFFECTIVE LENGTH P EXTRN ECBRC ECB RETURN CODE F " P EXTRN ECBCW ECB CONTROL WORD j 0 P EXTRN TASCII CODE CONV. TABLE EBCDIC-ASCII 0 P EXTRN TEBCDIC CODE CONV. TABLE ASCII-EBCDIC P EXTRN INTSAV
0x36cbf4…36cd88 Dummy {f00=0x0116, f01=0x0190, f02=» P EJECT P* P* . P* PARAMETERS FOR CONDITIONALLY ASSEMBLY & P* X P* b PX:A EQU 1 <=4 l 0 PNLINE EQU X:A NUMBER OF COMMUNICATION LINES P PX:B EQU 1 . PBSC EQU X:B IF = 0. SIEMENS MSV2 PROCEDURE P IF
0x36cd88…36cf1c Dummy {f00=0x0116, f01=0x018e, f02=» : PTRANSP EQU X:D IF = 1. EBCDIC TRANSPARANCY (BSC ONLY) P F PX:E EQU 10 N . PTBID EQU X:E BID TIME OUT VALUE (X100 MS) ` P PX:F EQU 500 4 PLOGG EQU X:F IF NOT ZERO INTERRUPT LOG INCLUDED & P LOGG = LOG AREA LENGTH PER LINE
0x36cf1c…36d0b0 Dummy {f00=0x0116, f01=0x0190, f02=» P* DEVICE ADDRESSES P IFT SALCUZ=1 " ( PX:H EQU /0A INPUT DEV ADDR LINE 01 : ( PX:I EQU /3E 02 f ( PX:J EQU /3E 03 ( PX:K EQU /3E 04 P XIF P IFF SALCUZ=1
0x36d0b0…36d244 Dummy {f00=0x0116, f01=0x0190, f02=»X:K EQU /05 04 * PDAMI01 EQU X:H INPUT DEV ADDR LINE 01 * * PDAMI02 EQU X:I INPUT DEV ADDR LINE 02 X * PDAMI03 EQU X:J INPUT DEV ADDR LINE 03 * PDAMI04 EQU X:K INPUT DEV ADDR LINE 04 P XIF . P IFT SALCUZ=1 *
0x36d244…36d3d8 Dummy {f00=0x0116, f01=0x0190, f02=» * PDAMI04 EQU /3E INPUT DEV ADDR LINE 04 0 PDAMU01 EQU DAMI01+1 OUTPUT DEV ADDR LINE 01 2 0 PDAMU02 EQU DAMI02+1 OUTPUT DEV ADDR LINE 02 f 0 PDAMU03 EQU DAMI03+1 OUTPUT DEV ADDR LINE 03 0 PDAMU04 EQU DAMI04+1 OUTPUT DEV ADDR LINE 04 P XIF
0x36d3d8…36d56c Dummy {f00=0x0116, f01=0x0190, f02=»2 b 4 PDAMU03 EQU DAMI03+/10 OUTPUT DEV. ADDR. LINE 03 4 PDAMU04 EQU DAMI04+/10 OUTPUT DEV. ADDR. LINE 04 B P XIF z P* P PX:L EQU 0 : PCOMPRS EQU X:L IF =1, SPACE COMPR./DECOMPR. PERFORMED P* PX:M EQU 0 B P
0x36d56c…36d700 Dummy {f00=0x0116, f01=0x018e, f02=»SPEED EQU 1 IF =1, HIGH SPEED (CT111) P* . PX:N EQU 0 8 . PTBUFL EQU X:N SIZE OF MMU BUFFER IN WORDS J P | . P* A PROGRAM VERSION USING TOSS MMU PAGING * P* IS OBTAINED BY SETTING MMUPAG EQU 1 P* PMMUPAG EQU 0 P*
0x36d700…36d894 (5, 564) Dummy {f00=0x0116, f01=0x0190, f02=» P* P* PDEVIND EQU 2 * PBUFLEN EQU TBUFL+TBUFL MMU BUFFER SIZE 0 P EJECT ^ P* l < P******************************************************* v P* P* SYSTEM PARAMETERS P* < P**********************************
0x36d894…36da28 Dummy {f00=0x0116, f01=0x0190, f02=» EQU 30 ENQ TIMER: 3 S PTIMACK EQU 30 ACK TIMER: 3 S " PTIMWAC EQU 20 WACK TIMER: 2 S B $ PTIMCON EQU 20 CONNECT TIMER: 2 S h $ PTIMWRT EQU 200 WRITE TIMER: 20 S 4 PTIMIDL EQU 150 IDLE LINE ACTIVITY TIME: 15 SEC'S P* P* ( PENQC
0x36da28…36dbbc Dummy {f00=0x0116, f01=0x0190, f02=» P* P IFT SPEED=1 . PLSPEED EQU /0200 HIGH SPEED SELECTION 6834 " P XIF T P IFT SPEED=0 ` * PLSPEED EQU 0 LOW SPEED SELECTION 6834 t P XIF P IFT COMPRS=1 . PCOMPMX EQU 43 MAX NO OF SPACES COMPR <64 , P MUST BE ADJUS
0x36dbbc…36dd50 Dummy {f00=0x0116, f01=0x0190, f02=» ( P SPACE COMPRESSION/DECOMPRESSION " PSPCMIN EQU 2 MIN NO OF SPACES 0 ( PSPCMAX EQU COMPMX MAX NO OF SPACES V 0 PSPCCHB EQU /40 SPACE COUNT CHAR SPECIAL BIT * PSPCCHM EQU /3F SPACE COUNT CHAR MASK 0 PSPCASC EQU /20 ASCII SPACE CHAR FOR
0x36dd50…36dee4 Dummy {f00=0x0116, f01=0x0190, f02=»****************** p P* 4 P* APPLICATION INTERFACE; ORDERS AND RETURN CODES $ P* 6 P************************************************** f P* P* ORDERS: P* P* /02 - READ P* P* /06 - WRITE P* P* /0
0x36dee4…36e078 Dummy {f00=0x0116, f01=0x018e, f02=»M z P* P* /39 - SET REQUEST TIMEOUT P* 8 P EJECT B P* RETURN CODES: P P* h 6 P* STATUS WORD = 0 REQUEST COMPLETED NORMALLY r P* B P* " " <> 0 ABNORMAL RETURN (SEE BIT EQU'S BELOW) P* B P**
0x36e078…36e20c Dummy {f00=0x0116, f01=0x0190, f02=» " PBIT1 EQU /4000 REQUEST ABORTED . PBIT2 EQU /2000 BEGIN/END OF DEVICE E.G EOT * & PBIT3 EQU /1000 END OF FILE E.G ETX < PBIT4 EQU /0800 DEVICE DEPENDENT (SEE FURTHER REQ. ORDER) & PBIT5 EQU /0400 " " & PBIT6 EQU /0200 "
0x36e20c…36e3a0 Dummy {f00=0x0116, f01=0x018e, f02=»T10 EQU /0020 DEVICE DEPENDENT PBIT11 EQU /0010 " " & B PBIT12 EQU /0008 INCORRECT BUFFER LENGTH (TRANSM./REC. BUFFER) F PBIT13 EQU /0004 DATA ERROR $ PBIT14 EQU /0002 THROUGHPUT ERROR & PBIT15 EQU /0001 MODEM NOT OPERABLE P* *
0x36e3a0…36e534 (5, 565) Dummy {f00=0x0117, f01=0x0190, f02=» $ PRCABRT EQU BIT1 REQUEST ABORTED , PRCEOT EQU BIT2 EOT RECEIVED DURING READ , : P***************************************************** P* ( PRCETX EQU BIT3 ETX " " " 6 PRCISEQ EQU BIT4+BIT0 ILLEGAL REQ. - SEQUENCE ERROR 4
0x36e534…36e6c8 Dummy {f00=0x0117, f01=0x0190, f02=» EQU BIT7 RETRIES PERFORMED $ PRCTIMO EQU BIT9 REQUEST TIMEOUT $ " PRCCARR EQU BIT10 CARRIER DOWN L . PRCNCON EQU BIT11 NO CONNECTION ESTABLISHED r , PRCINCL EQU BIT12 INCORRECT BUFFER LENGTH " PRCIDAT EQU BIT13 INVALIDE DATA & PRCTHRU EQU BIT
0x36e6c8…36e85c Dummy {f00=0x0117, f01=0x0190, f02=»********* h P* P* DEVICE WORK AREAS P* 8 2 P********************************************** B P* x P* DWT STATUS WORD P* ( P* DWTST BIT #00 : 0 = DEVICE BUSY , P* 1 = DEVICE NOT BUSY 6 P*
0x36e85c…36e9f0 Dummy {f00=0x0117, f01=0x0190, f02=»***************************************** P* 2 $ P* LINE CONTROL CHARACTER EQUATES < P* d < P******************************************************* n P* PPAD EQU /FF TRAILING PAD PDLE EQU /10 DATA LINK ESCAPE " PSOH EQU /01
0x36e9f0…36eb84 Dummy {f00=0x0117, f01=0x0190, f02=»EQU /04 PENQ EQU /05 * PETB EQU /17 END OF TRANSMISSION BLOCK $ ( PNAK EQU /15 NEGATIVE ACKNOWLEDGEMENT R ( PRVI EQU /3C SEC CHAR IN RVI SEQUENCE ~ , PACK0 EQU /30 SEC CHAR IN ACK 0 SEQUENCE * PEXCACK EQU 1 DIFFERENCE BETWEEN ACK0/1 P
0x36eb84…36ed18 Dummy {f00=0x0117, f01=0x0190, f02=»SC=1 * PWACK EQU /3B SEC CHAR IN WACK SEQUENCE P XIF : P IFT CODE=0 F P IFT BSC=0 Z * PWACK EQU /BF SEC CHAR IN WABT SEQUENCE l P SIEMENS MSV2 PROCEDURE P XIF ( P IFT CODE=1 EBCDIC CHARACTER EQUATES PSYN EQU /32 P
0x36ed18…36eeac Dummy {f00=0x0117, f01=0x0190, f02=» PEXCACK EQU /11 PIGS EQU /1D GROUP SEPARATOR PGS EQU IGS RENAME IGS > PSPACE EQU /40 SPACE PIUS EQU /1F UNIT SEPARATOR x PUS EQU IUS RENAME US P XIF P EJECT B P****************************************************
0x36eeac…36f040 Dummy {f00=0x0117, f01=0x0190, f02=»************* ` P* P IFT SALCUZ=1 $ PCBBREK EQU /80 CIO START BREAK 8 " PCBECHO EQU /10 ECHO ` , PCBNPAR EQU /0 NO CHAR PARITY . PCBEPAR EQU /4 EVEN CHAR PARITY , PCBOPAR EQU /C ODD CHAR
0x36f040…36f1d4 (5, 566) Dummy {f00=0x0117, f01=0x018e, f02=»IF P IFF SALCUZ=1 PCBCARR EQU /100 CARRIER ON & : PCBCRSP EQU CBCARR+LSPEED CARRIER ON + SPEED SELECTION J P XIF P* P* P IFT SALCUZ=1 P IFT CODE=0 , PPARITY EQU CBOPAR ODD PARITY FOR ASCII
0x36f1d4…36f368 Dummy {f00=0x0117, f01=0x0190, f02=» 8 P*************************************************** P* D ( P* LINE CONTROL UNIT SST STATUS BITS N P* z 8 P*************************************************** P* 0 PSBNOOP EQU /1 SST STATUS MODEM NOT OPERABLE 0 PSBTHRU EQU
0x36f368…36f4fc Dummy {f00=0x0117, f01=0x0190, f02=»CARR EQU /20 CARRIER OFF , PSBCALL EQU /40 INCOMING CALL , P* P IFT SALCUZ=1 f . PSBERR EQU /27 SBNOOP,SBTHRU,SBPARI,SBCARR ~ P XIF P IFF SALCUZ=1 ( PSBERR EQU /23 SBNOOP,SBTHRU,SBCARR P XIF
0x36f4fc…36f690 Dummy {f00=0x0117, f01=0x0190, f02=»*************** h P* ! P* ! " & P* D R I V E R A C T I V A T I O N ! , P* ! V P* ! ` < P******************************************************* ! j < P******************************************************* ! P* ! P* ! P DATA BUFL
0x36f690…36f824 Dummy {f00=0x0117, f01=0x018e, f02=»DC:MIN HEADER =4 ! P* " P* " " PDRMACT EQU * " , ( P LDK A5,DWTSTB SET UP A5 STACK BASE " @ $ P ADR A5,A6 IN CASE OF I/O START " l , P LD A1,DWTST,A6 GET CURRENT LINE STATUS " P SUK A7,/02 " P RF(Z) RD READ " P SUK A7,/06-/02 " P A
0x36f824…36f9b8 Dummy {f00=0x0117, f01=0x0190, f02=» " x P SUK A7,/31-/22 # P ABL(Z) ACCALL ACCEPT CALL # P SUK A7,/37-/31 # B P ABL(Z) CONNCT CONNECT MODEM # Z P SUK A7,/38-/37 # ~ " P ABL(Z) DISCON DISCONNECT LINE # , P SUK A7,/39-/38 SET REQUEST TIMER VALUE # P ABL(Z) REQTIM # P ABL D
0x36f9b8…36fb4c Dummy {f00=0x0117, f01=0x0190, f02=»RT ROUTINE # P* $ P************************ $ P $ < PABORT EQU * . $ D " P CF A15,CLRTIM CLEAR REQ TIMER $ Z $ P CF A15,CLPTIM CLEAR PROC TIMER $ $ P CF A15,CLMTIM CLEAR MODEM TIMER $ PAB:10 EQU * $ $ P ST A5,DWTSAV+4,A6 SAVE A5 TEMP. $
0x36fb4c…36fce0 Dummy {f00=0x0117, f01=0x018e, f02=» START IDLE LINE ACTIVITY TIMER $ XIF % ( P LD A5,DWTSAV+4,A6 RELOAD A5 % 4 ( P CM DWTSAV+4,A6 CLEAR STACK-POINTER % X $ P CM DWTXST,A6 SET CONTROL STATE % PAB:RTN EQU * % P IFT CPU852=1 % P ADKL A15,4 % $ P ABR* A15 RETURN IN INHIBIT MO
0x36fce0…36fe74 (5, 567) Dummy {f00=0x0117, f01=0x018e, f02=» % P* & PRD EQU * & P ANK A1,1 CHECK STATUS & " " P RF(NZ) RD400 MODEM CONNECTED & @ 0 P ABL RXMNOP NO CONNECTION ESTABLISHED; EXIT & f P* & P* & & P* ORDER 0A : READ RANDOM (CREDIT) & P* & PRDRNM EQU * & * P LDK
0x36fe74…370008 Dummy {f00=0x0117, f01=0x0190, f02=» & P* START THE READ REQUEST ' P* ' ( P* ' 2 PRD400 EQU * ' < P IFT MMUPAG=1 ' P $ P LD A2,ECBRL,A8 REQUESTED LENGTH ' f " P CWK A2,BUFLEN INVALID LENGTH? ' " P ABL(G) RXINCL ILLEGAL LENGTH ' & P LD A1,DWTTIM,A6 GET CONTROL WORD ' P XIF
0x370008…37019c Dummy {f00=0x0117, f01=0x0190, f02=»TIME START REQUEST TIMER ' " P DATA RD500 TIME OUT SEQUENCE ( PRD410 DATA 0 TIMER VALUE ( F ( P ST A4,DWTRTI,A6 STORE TIMER POINTER ( f PRD420 EQU * ( IFT IDLELN=1 ( 2 P CF A15,CLIDLE CLEAR IDLE LINE ACTIVITY TIMER ( XIF ( ( P LD A1,DWT
0x37019c…370330 Dummy {f00=0x0117, f01=0x0190, f02=»- READ WHEN TRANSMITTING ( r . P LD A1,DWTACK,A6 GET WACK DELAY INDICATOR ) 8 P ABL(Z) EXDISP NOT WACK DELAY - WAIT FOR ENQ OR EOT ) R ( P CF A15,CLPTIM STOP PROCEDURE TIMER ) , P CM DWTACK,A6 RESET WACK DELAY INDICATOR ) P CF A5,TRACK SEND ACK 0/1 )
0x370330…3704c4 Dummy {f00=0x0117, f01=0x018e, f02=»A6,A1 READ REQUEST TIME OUT, RESTORE A6 ) & P CF A15,CLRTIM CLEAR TIMER LINKS * 0 $ P CF A15,CLPTIM CLEAR PROC TIMER * Z $ P CF A15,CLMTIM CLEAR MODEM TIMER * P CF A5,CHALTI HALT INPUT & * P CF A5,CHALTO OUTPUT * ( P CM DWTSAV+4,A6 CLEAR STACK
0x3704c4…370658 Dummy {f00=0x0117, f01=0x018e, f02=» P EJECT + P* + P* + P* ORDER 06: WRITE + & P* + @ : P* IF CONTROL CHARACTER = 0 NOT, TEXT IS ENDED BY ETB + J : P* IF CONTROL CHARACTER = 0 , TEXT IS ENDED BY ETX + P* + PWR EQU * + P ANK A1,1 CHECK STATUS + , P ABL(Z) RX
0x370658…3707ec Dummy {f00=0x0117, f01=0x0190, f02=» " P ABL(G) RXINCL ILLEGAL LENGTH , P XIF , * ( P LD A1,DWTXST,A6 GET PROCEDURE STATE , 6 " P RF(Z) BID CONTROL STATE: BID , b P SUK A1,1 , P RF(Z) WR100 TRANSMIT MODE , @ P ABL RXISEQ ILLEGAL SEQUENCE; TRYING TO WRITE WHEN RECEIVING , P* ,
0x3707ec…370980 Dummy {f00=0x0117, f01=0x0190, f02=»6 , & P ST A1,DWTACK,A6 AND BID SEQUENCE - $ P CM DWTENQ,A6 RESET ENQ COUNTER - 4 P LDK A1,ACK0 - , P ST A1,DWTRSN,A6 INDICATE ACK 0 EXPECTED - p IFT IDLELN=1 - 2 P CF A15,CLIDLE CLEAR IDLE LINE ACTIVITY TIMER - XIF - P ABL TRENQB SEND
0x370980…370b14 (5, 568) Dummy {f00=0x0117, f01=0x0190, f02=»SPONSE STATE - t P SUK A1,2 . ( P ABL(NZ) EXDISP NOT IN TTD SEQUENCE . & . PWR110 CM DWTRTR,A6 RSET RETRANSMIT COUNTER . R $ P CM DWTENQ,A6 RESET ENQ COUNTER . $ P CM DWTWAC,A6 RESET WACK COUNTER . ( P CF A15,CLPTIM STOP PROCEDURE TIMER . P LDK A1,
0x370b14…370ca8 Dummy {f00=0x0117, f01=0x0190, f02=» SEND RVI . P* / 4 P* RVI IS SENT INSTEAD OF ACK0/1 AS AFFIRMATIVE / 2 P* ACKNOWLEDGEMENT TO PREVIOUS TEXT RECEPTION / T P* / P* / PSRVI ANK A1,1 CHECK STATUS / & P ABL(Z) RXMNOP MODEM NOT OPERABLE / & P LD A1,DWTTIM,A6 GET CONTROL W
0x370ca8…370e3c Dummy {f00=0x0117, f01=0x0190, f02=»ST TIMER / v P DATA RVI400 0 PRVI100 DATA 0 TIMER VALUE 0 $ ( P ST A4,DWTRTI,A6 STORE TIMER POINTER 0 F . PRVI120 LD A1,DWTXST,A6 GET PROCEDURE STATE 0 r P SUK A1,2 0 F P ABL(NZ) RXISEQ SEQ. ERROR; TRANSM. MODE OR REC. MODE,RTX RECEIVED 0 4 PRVI200 L
0x370e3c…370fd0 Dummy {f00=0x0117, f01=0x018e, f02=»URE TIMER 0 v , P CM DWTACK,A6 RESET WACK DELAY INDICATOR 1 PRVI300 CF A5,TRRVI SEND RVI 1 B & P CF A15,CLRTIM RESET REQUEST TIMER 1 f , P LDK A1,RCCMPL SET RVI SENT. RC= RCCMPL 1 $ P CF A15,TENDIO COMPLETE REQUEST 1 P ABL BMM CONTINUE RECEPTION 1
0x370fd0…371164 Dummy {f00=0x0117, f01=0x0190, f02=» P ABL RXTIMO REQUEST TIMEOUT 2 P EJECT 2 ( P* 2 6 P* 2 @ P* ACCEPT A CALL 2 J P* 2 b P* 2 l PACCALL EQU * 2 v P ANK A1,1 2 < P ABL(NZ) RXISEQ SEQUENCE ERROR; MODEM ALREADY CONNECTED 2 & P LD A1,DWTTIM,A6 GET CONTROL WORD 2 * P R
0x371164…3712f8 Dummy {f00=0x0117, f01=0x018e, f02=»EQUEST TIMER 2 z " P DATA ACC200 TIME OUT SEQUENCE 3 PACC100 DATA 0 TIMER VALUE 3 : ( P ST A4,DWTRTI,A6 SAVE TIMER POINTER 3 PACC110 INH 3 $ P CF A5,CCALL ACCEPT CALL BY CU 3 , P ABL(A) EXDISP ACCEPTED - WAIT FOR CALL 3 " P ABL RXMNOP MODEM NOT
0x3712f8…37148c Dummy {f00=0x0117, f01=0x0190, f02=» 3 2 - CF A15,STIDLE START IDLE LINE ACTIVITY TIMER 4 XIF 4 > P ABL RXCMPL COMPLETE REQUEST 4 J P* 4 n P* TIME OUT 4 x P* 4 PACC200 LDR A6,A1 DWT ADDRESS 4 " P CF A15,CLRTIM CLEAR POINTER 4 ( P LDK A5,DWTSTB SET UP A5 STACK BASE 4
0x37148c…371620 Dummy {f00=0x0117, f01=0x018e, f02=»ECT MODEM TO LINE 4 P* 5 P* 5 $ PCONNCT EQU * 5 . P LDR A1,A6 5 B P CF A15,SETIME START TIMER 5 T P DATA CON100,TIMCON 5 v ( P ST A4,DWTPTI,A6 SAVE TIMER POINTER 5 * P CF A5,CSYNCI START I/P WITH SYNC DEF 5 P RF(A) CON010 5 P CF A1
0x371620…3717b4 (5, 569) Dummy {f00=0x0118, f01=0x0190, f02=» 5 p 4 PCON010 CF A5,CHALTI STOP RECEIVER, NO INTERRUPTS 6 $ P ABL EXDISP EXIT THRU DISPATCHER 6 @ PCON100 LDR A6,A1 TIME OUT 6 h " P CF A15,CLPTIM CLEAR POINTER 6 & P LDK A5,DWTSTB LOAD A5 STACK BASE 6 P ADR A5,A6 6 . P CF A5,CHALTI HALT LINE CONT
0x3717b4…371948 Dummy {f00=0x0118, f01=0x0190, f02=» A1,DWTST,A6 INDICATE CONNECTED IN DWT 6 P CM DWTXST,A6 CONTROL MODE 7 . P ABL RXCMPL REQUEST COMPLETE 7 P P EJECT 7 t P* 7 P* 7 P* DISCONNECT MODEM FROM LINE 7 P* 7 P* 7 PDISCON EQU * 7 IFT IDLELN=1 7 2 P CF A15,CLIDLE C
0x371948…371adc Dummy {f00=0x0118, f01=0x0190, f02=» RESET "MODEM OPERABLE"-BIT 7 P ABL RXCMPL COMPLETE REQUEST 8 $ P EJECT 8 H D P**************************************************************** 8 V P* 8 P* SET REQUEST TIMER VALUE 8 P* 8 D P****************************************************
0x371adc…371c70 Dummy {f00=0x0118, f01=0x0190, f02=»********************************************* 8 P* 9 6 , P* REQUEST COMPLETION (NORMAL/ABNORMAL) 9 @ P* 9 p 2 P********************************************* 9 z P* 9 PRXCMPL EQU * 9 . P LDKL A1,RCCMPL NORMAL COMPLETE OF REQUEST 9 P RF RXTE
0x371c70…371e04 Dummy {f00=0x0118, f01=0x0190, f02=»RRVI EQU * 9 P LDKL A1,RCRRVI RVI RECEIVED : P RF RXTEND : 6 PRXRENQ EQU * : H 0 P LDKL A1,RCRENQ ENQ RECEIVED (BID COLLITION) : P RF RXTEND : PRXRTRY EQU * : & P LDKL A1,RCRTRY RETRIES PERFORMED : P RF RXTEND : PRXTIMO EQU * : $ P L
0x371e04…371f98 Dummy {f00=0x0118, f01=0x0190, f02=» : PRXINCL EQU * ; * P LDKL A1,RCINCL INCORR. BUFFER LENGTH ; P RF RXTEND ; J PRXTHRU EQU * ; $ P LDKL A1,RCTHRU THROUGHPUT ERROR ; p P RF RXTEND ; PRXMNOP EQU * ; P LD A1,/FFFE ; . P ANS A1,DWTST,A6 RESET MODEM OPERABLE BIT ; & P LDK
0x371f98…37212c Dummy {f00=0x0118, f01=0x0190, f02=» REQUEST ; t P* < PEXDISP EQU * < $ P ABL TDISP ESCAPE TO DISPATCHER < . P EJECT < V P* < d < P******************************************************* < n < P******************************************************* < P* < P* < * P* R E
0x37212c…3722c0 Dummy {f00=0x0118, f01=0x0190, f02=»******************************************* < P* = 4 PDRDCON EQU * = > PDC17ON EQU * = R P LDK A2,0 RESET INDEX = f PDRM100 ADK A2,2 = P CW A2,DCTAB = & P RF(E) DRM150 ALL LINES PROCESSED = $ P LD A6,DCTAB,A2 GET DWT ADDRESS = ( P CM DW
0x3722c0…372454 (5, 570) Dummy {f00=0x0118, f01=0x0190, f02=»DLE LINE ACTIVITY TIMER = z XIF > PDRM110 LDKL A1,/FFFE > , * P ANS A1,DWTST,A6 RESET MODEM READY BIT > H $ P CF A15,CINIT INIT LINE CU INFO > v P LD A1,DWTST,A6 > P RB(N) DRM100 NO REQUEST > 0 P CF A15,CLRTIM STOP REQUEST TIMER IF RUNNING > 8
0x372454…3725e8 Dummy {f00=0x0118, f01=0x0190, f02=» RTN A15 > P EJECT ? P* ? < P******************************************************* ? ( < P******************************************************* ? h P* ? P* ? 0 P* P R O C E D U R E C O N T R O L P A R T ? P* ? P* ? < P****
0x3725e8…37277c Dummy {f00=0x0118, f01=0x0190, f02=»***************************************************** ? P* @ > P* BMM : BASIC MASTER MODE @ H P* @ j < P******************************************************* @ t P* @ PBMM EQU * @ P LDK A5,DWTSTB @ " P ADR A5,A6 LOAD A5 STACK BASE @
0x37277c…372910 Dummy {f00=0x0118, f01=0x018e, f02=»D CHAR @ . P RF(NZ) BMM905 SST STATUS OR PARITY ERROR A ( P LD A1,DWTXST,A6 GET OPERATION MODE A @ P SUK A1,1 A l , P RF(Z) TRANSM TRANSMIT MODE/MASTER MODE A ~ * P ABL(P) RECEIV RECEIVE MODE/SLAVE MODE A P EJECT A P* A P* CONTROL STATE A
0x372910…372aa4 Dummy {f00=0x0118, f01=0x0190, f02=» A x P LD A1,DWTOR,A6 GET ORDER B P SUK A1,2 B * P RB(P) BMM NO READ REQUEST B < IFT IDLELN=1 B ^ 2 P CF A15,CLIDLE CLEAR IDLE LINE ACTIVITY TIMER B t XIF B P LDK A1,2 B * P ST A1,DWTXST,A6 INDICATE RECEIVE MODE B , P CM DWTACK,A6 RESE
0x372aa4…372c38 Dummy {f00=0x0118, f01=0x018e, f02=»IZED B z P* C PBMM900 CWK A2,EOT C P RF(NE) BMM910 NOT EOT C 0 . P CM DWTXST,A6 EOT: RESET TO CONTROL STATE C N ( P CF A15,CLPTIM STOP PROCEDURE TIMER C P CF A15,CLRTIM CLEAR TIMER C P LDKL A1,RCEOT EOT RECEIVED C P CF A15,TENDIO C P
0x372c38…372dcc Dummy {f00=0x0118, f01=0x0190, f02=» C P ANK A2,/7F D P SUK A2,/7F D $ P RB(Z) BMM RESYNCHRONIZE ON /FF D 2 P RB BMM100 READ NEXT CHAR D Z P EJECT D | P* D P* D $ P* TRANSMIT MODE, RECEPTION PART D P* D P* D PTRANSM EQU * D ( P LD A1,DWTACK,A6 GET TRANS
0x372dcc…372f60 Dummy {f00=0x0118, f01=0x0190, f02=»EQUENCE D | P DATA TR420 4: WACK SEQUENCE E P DATA TR100 6: BID SEQUENCE E 4 8 P DATA TR200 8: ACK EXPECTED AFTER TRANSMIT TIME OUT E X P EJECT E P* E P* E P* BID SEQUENCE E P* E P* E PTR100 EQU * E P CWK A2,ENQ E P
0x372f60…3730f4 (5, 571) Dummy {f00=0x0118, f01=0x0190, f02=») BMM910 PARITY ERROR E P CWK A2,ACK0 F P RF(NE) TR120 NOT PROPER ACK F 2 0 P CF A15,CLPTIM ACK 0 : STOP PROCEDURE TIMER F V " P ABL WR110 START TRANSMISSION F P* NOT ACK RECEIVED F PTR120 CWK A2,WACK F P RB(NE) BMM900 NOT WACK F ( P C
0x3730f4…373288 Dummy {f00=0x0118, f01=0x0190, f02=»AR BID-TIMER (PROCEDURE) F ~ P LDKL A1,RCRENQ ENQ RECEIVED G , P CF A15,TENDIO COMPLETE WRITE, RC BIT 11 G D P RB BMM150 BID ACCEPTED G t P EJECT G P* G P* G " P* TRANSMIT MODE: ACK EXPECTED G P* G P* G PTR200 CWK A2,DLE G P
0x373288…37341c Dummy {f00=0x0118, f01=0x0190, f02=»RE TIMER G p P ABL TRTEXT RETRANSMIT TEXT H PTR210 EQU * H 4 $ P LDKL A1,RCTHRU THROUGHPUT ERROR H H PTR220 EQU * H p P CF A5,TREOT SEND EOT H ( P CM DWTXST,A6 INDICATE CONTROL STATE H P LDR A1,A4 RETURN CODE H , P ABL RXTEND GO FOR COMPLETIO
0x37341c…3735b0 Dummy {f00=0x0118, f01=0x0190, f02=» P RF(NE) TR280 NOT PROPER ACK I ( P CF A15,CLPTIM STOP PROCEDURE TIMER I ( $ P LDKL A4,RCCMPL RETURN CODE - OK I T $ P LD A8,DWTECB,A6 GET ECB ADDRESS I | & P LD A1,ECBBA,A8 GET BUFFER ADDRESS I & P LC A1,1,A1 GET CONTROL CHARACTER I P ANK A1,/FF I
0x3735b0…373744 Dummy {f00=0x0118, f01=0x0190, f02=»QUEST, RC = 0 I p $ PTR255 CF A5,CHALTI STOP RECEIVER J PTR260 LDR A1,A6 DWT ADDRESS J > P CF A15,SETIME START TIMER J b P DATA TRTTD,TIMTTD J ( P ST A4,DWTPTI,A6 SAVE TIMER POINTER J P LDK A1,2 J * P ST A1,DWTACK,A6 INDICATE TTD SEQUENCE J
0x373744…3738d8 Dummy {f00=0x0118, f01=0x0190, f02=» J P RF(E) TR340 WACK RECEIVED K PTR285 EQU * K * " P XRK A2,EXCACK CHANGE ACK TYPE K > P CW A2,DWTRSN,A6 K d P RB(NE) BMM900 NO ACK AT ALL K | PTR290 EQU * K ( P CF A15,CLPTIM STOP PROCEDURE TIMER K 2 P LD A1,DWTACK,A6 ACK AFTER TRANSMIT TIME
0x3738d8…373a6c Dummy {f00=0x0118, f01=0x0190, f02=»ROPER ACK: SEND ENQ K P* RVI RECEIVED L , PTR320 CF A15,CLPTIM STOP PROCEDURE TIMER L 4 * P LDKL A1,RCRRVI INDICATE RVI RECEIVED L d 4 P CF A15,TENDIO COMPLETE WRITE REQUEST, RC BIT 10 L P RB TR255 GO TO TTD SEQUENCE L P* WACK RECEIVED L , P
0x373a6c…373c00 Dummy {f00=0x0118, f01=0x0190, f02=»CBBA,A8 GET BUFFER ADDRESS L & P LC A1,1,A1 GET CONTROL CHARACTER M " P ANK A1,/FF M L 8 P RB(Z) TR220 ETX SENT: SEND EOT AND COMPLETE REQUEST M ` 4 P LDKL A1,RCCMPL WACK RECEIVED; RETURN CODE - OK M , P CF A15,TENDIO COMPLETE REQUEST, RC = 0 M P LDK
0x373c00…373d94 (5, 572) Dummy {f00=0x0118, f01=0x0190, f02=»CE M P* N P* N PTR400 EQU * N P CWK A2,NAK N 2 P ABL(NE) BMM900 NOT NAK N F ( P CF A15,CLPTIM STOP PROCEDURE TIMER N f PTR410 EQU * N * P LD A1,DWTST,A6 CHECK IF WRITE REQUEST N P RB(N) TR260 NO REQUEST N P LD A1,DWTOR,A6 GET
0x373d94…373f28 Dummy {f00=0x0118, f01=0x0190, f02=»* WACK SEQUENCE N P* O P* O " PTR420 EQU * O , P CWK A2,DLE O @ P ABL(NE) BMM900 NOT DLE O T $ P CF A5,READP READ CHAR AFTER DLE O t P ABL(NZ) BMM910 PARITY ERROR O P CWK A2,WACK O P RF(NE) TR440 NOT WACK O . P CF A15,CLPTIM WACK: S
0x373f28…3740bc Dummy {f00=0x0118, f01=0x0190, f02=» LD A1,DWTWAC,A6 O P CWK A1,WACCNT P * P ABL(L) TRENQ NOT COUNT OUT; SEND ENQ P . P LDKL A4,RCRTRY COUNT OUT P , P ABL TR220 SEND EOT AND COMPLETE REQUEST P ~ PTR440 CW A2,DWTRSN,A6 P P RB(NE) TR285 IMPROPER ACK P , P CF A15,CLPTIM EXPECTED AC
0x3740bc…374250 Dummy {f00=0x0118, f01=0x018e, f02=» P EJECT Q P* Q P* Q P* RECEIVE MODE Q & P* Q < P* Q F PRECEIV EQU * Q P P CWK A2,ENQ Q d 4 P ABL(E) REC400 ENQ RECEIVED: SEND LAST RESPONSE Q x P IFT TRANSP=1 Q P CWK A2,DLE Q P ABL(NE) BMM900 NOT DLE Q P CF A5,READP R
0x374250…3743e4 Dummy {f00=0x0118, f01=0x018e, f02=» Q v PREC098 EQU * R P LDK A7,0 STX: RESET BCC R P LDK A3,0 R > $ P LD A8,DWTECB,A6 GET ECB ADDRESS R P & P LD A4,ECBBA,A8 GET BUFFER ADDRESS R x PREC100 CF A5,READP READ CHAR R " P ABL(NZ) REC200 PARITY ERROR R P IFT TRANSP=1 R P CWK A
0x3743e4…374578 Dummy {f00=0x0118, f01=0x0190, f02=» R P RB(E) REC100 DELETE SYN S P CWK A2,ENQ S ( & P ABL(E) REC220 TTD REC. SEND NAK S < P IFT TRANSP=1 S f P CWK A2,DLE S | $ P RF(E) REC120 2:ND DLE RECEIVED S P XIF S P LD A1,DWTST,A6 S P ABL(N) REC251 NO READ REQ S P LD A1,D
0x374578…37470c Dummy {f00=0x0118, f01=0x0190, f02=» S P IFT COMPRS=1 T P CWK A2,GS GROUP SEPARATOR T P RF(E) REC140 YES T D P XIF T ^ PREC110 EQU * T n P CWK A2,US UNIT SEPARATOR T P RF(E) REC14A YES T PREC115 EQU * T P CWK A2,ETB T P RF(E) REC150 ETB RECEIVED T
0x37470c…3748a0 Dummy {f00=0x0118, f01=0x0190, f02=» P LD A1,DWTST,A6 U " P RF(N) REC250 NO READ REQUEST U P CF A5,ACBPAR ACCUMULATE CRC U B P XIF U f PREC125 EQU * U r P CW A3,ECBRL,A8 CHECK LENGTH U $ P ABL(NL) REC250 BUFFER OVERFLOW U P IFT TRANSP=0 U P IFT CODE=1 U 2 P LC A2,T
0x3748a0…374a34 (5, 573) Dummy {f00=0x0119, f01=0x0190, f02=»1 INCR POINTER U P IFT TRANSP=0 V P IFT COMPRS=0 V . P CWK A2,GS GROUP SEPARATOR V F . P RF(E) REC140 YES SKIP TRANSL OF SPACE # V j P XIF V P RB REC100 NEXT CHAR V P IFT TRANSP=0 V J P* GS RECEIVED DECOMPRESS SEQ : ...GS S
0x374a34…374bc8 Dummy {f00=0x0119, f01=0x0190, f02=» P CWK A2,SYN W , P RB(E) REC140 DELETE SYN IF IT IS THERE W $ P CF A5,ACBPAR ACC BLOCK PARITY W J P IFT COMPRS=0 W r " P CW A3,ECBRL,A8 CHECK LENGTH W $ P RF(NL) REC250 BUFFER OVERFLOW W " P SCR A2,A4 STORE CHAR TO USER W P ADK A3,1
0x374bc8…374d5c Dummy {f00=0x0119, f01=0x0190, f02=»S=1 W * P LDR A1,A2 CHECK CHAR FOR SPACE COUNT X . P ANK A1,SPCCHB SPACE COUNT CHAR BIT SET ? X < & P RF(Z) REC146 NO IGNORE SEQUENCE X n " P LDR A1,A2 CHECK COUNT VALUE X ( P ANK A1,SPCCHM MASK OFF IRRELEVANT X P CWK A1,SPCMIN TOO SMALL ? X
0x374d5c…374ef0 Dummy {f00=0x0119, f01=0x0190, f02=» PREC142 EQU * Y P CW A3,ECBRL,A8 Y $ P RF(NL) REC250 BUFFER OVERFLOW Y 4 P SCR A2,A4 STORE CHAR Y P ADK A3,1 INCR COUNTER Y z P ADK A4,1 INCR POINTER Y P ADK A1,1 INCR INSERT COUNT Y & P RB(N) REC142 INSERT MORE SPACES Y 0 P
0x374ef0…375084 Dummy {f00=0x0119, f01=0x0190, f02=»CBRL,A8 Y $ P RF(NL) REC250 BUFFER OVERFLOW Z P LDK A1,GS Z : P IFT CODE=1 Z N . P LC A1,TASCII,A1 CONVERT EBCDIC TO ASCII Z b P XIF Z P IFT TRANSP=0 Z P IFT COMPRS=1 Z P SCR A1,A4 RESTORE GS Z P ADK A3,1 INCR COUNTER
0x375084…375218 Dummy {f00=0x0119, f01=0x0190, f02=»4A EQU * Z P IFT IUSUSE=1 [ P IFT CODE=1 [ * . P LC A2,TASCII,A2 CONVERT EBCDIC TO ASCII [ @ P XIF [ r P IFT IUSUSE=1 [ " P CW A3,ECBRL,A8 END OF BUFFER [ $ P RF(NL) REC253 BUFFER OVERFLOW [ $ P SCR A2,A4 STORE CHAR TO BUFFER
0x375218…3753ac Dummy {f00=0x0119, f01=0x0190, f02=»PAR READ BLOCK PARITY AND CHECK IT [ P RF(NZ) REC200 PARITY ERROR , $ P LD A7,DWTIUS,A6 RELOAD BCC/CRC P PREC14C EQU * x P CF A5,READP P RF(NZ) REC200 PARITY ERROR P CWK A2,SYN P RB(E) REC14C DELETE SYNC P IFT TRA
0x3753ac…375540 Dummy {f00=0x0119, f01=0x0190, f02=»F A5,ACBPAR ACCUMULATE BLOCK PARITY P CWK A2,STX ] , P ABL(E) REC100 IGNORE STX ] B P RB REC115 HANDLE CHAR ] d P* ETB RECEIVED ] PREC150 EQU * ] , P LDKL A4,RCETB PRESET FOR ETB RECEPTION ] P LDK A1,2 ] ( P ST A1,DWTXST,A6 RESET
0x375540…3756d4 (5, 574) Dummy {f00=0x0119, f01=0x018e, f02=» A1,3 ] 4 P ST A1,DWTXST,A6 SET RECEIVE MODE. ETX RECEIVED ^ PREC170 EQU * ^ F & P CF A5,RDBPAR READ BLOCK PARITY=10 ^ Z P RF(NZ) REC220 BCC ERROR ^ P IFT SALCUZ=1 ^ P IFT CODE=0 ^ , P CF A5,CHALTI HALT I/P TO CHECK PARITY ^ ( P ANK A
0x3756d4…375868 Dummy {f00=0x0119, f01=0x0190, f02=» ^ h 0 P CF A15,CLRTIM STOP REQUEST TIMER IF RUNNING _ P LDR A1,A4 STORE RETURN CODE _ < ( P CF A15,TENDIO COMPLETE READ REQUEST _ ` P LDK A1,EXCACK _ , P XRS A1,DWTRSN,A6 CHANGE ACK TO BE SENT _ PREC190 EQU * _ P CF A5,CHALTI STOP RECEIVER _
0x375868…3759fc Dummy {f00=0x0119, f01=0x0190, f02=» _ l P LDK A1,1 ` . P ST A1,DWTACK,A6 SET WACK DELAY INDICATOR ` & P WAIT FOR NEXT READ TO SEND ACK ` L P ABL TDISP GO TO DISPATCHER ` v ( P* PARITY ERROR FIND END OF BLOCK ` , PREC200 CF A5,READP PARITY ERROR RECEIVED ` P RB(NZ) REC200 PAR
0x3759fc…375b90 Dummy {f00=0x0119, f01=0x0190, f02=»T SEPARATOR ` P RF(NE) REC205 NO a . P CF A5,RDBPAR READ AND CHECK BLOCK PARITY a . P RB REC200 a ` PREC205 EQU * a t P CWK A2,ETB a P RF(E) REC210 ETB RECEIVED a P CWK A2,ETX a P RB(NE) REC200 NOT ETB/ETX a PREC210 EQU * a
0x375b90…375d24 Dummy {f00=0x0119, f01=0x0190, f02=» a h PREC250 EQU * b , P CF A5,READP NO REQUEST/BUFFER OVERFLOW b P RB(NZ) REC250 PARITY ERROR b L PREC251 EQU * b p P IFT TRANSP=1 b P CWK A2,DLE b P RB(NE) REC250 NOT DLE b P CF A5,READ b P XIF b P CWK A2,US UNIT SEPARATOR
0x375d24…375eb8 Dummy {f00=0x0119, f01=0x0190, f02=» PREC255 EQU * c P CWK A2,ETB c P RF(E) REC260 ETB RECEIVED c . P CWK A2,ETX c P P RB(NE) REC250 NOT ETB/ETX c d PREC260 EQU * c $ P CF A5,RDBPAR READ BLOCK PARITY c ( P CF A15,CLRTIM CLEAR TIMER POINTER c . P LDKL A4,RCINCL PRESET F
0x375eb8…37604c Dummy {f00=0x0119, f01=0x0190, f02=»ACKNOWLEDGMENT c t P* d P* d , PREC400 LD A1,DWTLRS,A6 GET LAST RESPONSE d * P CWK A1,NAK d Z P RB(E) REC220 NAK SENT d n P CWK A1,RVI d P RF(E) REC420 RVI SENT d P CWK A1,WACK d * P RF(NE) REC410 WACK NOT SENT:= ACK 0/1 d P LD A1,D
0x37604c…3761e0 Dummy {f00=0x0119, f01=0x0190, f02=» d v P SUK A1,/22-/02 e 0 P ABL(Z) RVI300 SEND RVI AND COMPLETE REQUEST e P RB REC190 e T PREC410 EQU * e f P CF A5,TRACK SEND ACK 0/1 e z " P ABL BMM WAIT FOR NEXT MESSAGE e PREC420 EQU * e P CF A5,TRRVI SEND RVI e P ABL BMM CONTINUE RE
0x3761e0…376374 (5, 575) Dummy {f00=0x0119, f01=0x0190, f02=» " P LDR A6,A1 RESTORE DWT ADDRESS f " P CF A15,CLPTIM CLEEAR POINTER f * & P LDK A5,DWTSTB LOAD A5 STACK BASE f P P ADR A5,A6 f z , P CM DWTACK,A6 RESET WACK DELAY INDICATOR f P CF A5,TRWACK SEND WACK f P ABL BMM WAIT FOR ENQ f P EJECT f P
0x376374…376508 Dummy {f00=0x0119, f01=0x0190, f02=»D A1,DWTRTR,A6 f P CWK A1,RTRCNT g & P ABL(G) TR210 COUNT OUT, SEND EOT g , 0 P CF A5,WRSYN START TRANSMITTER AND SEND SYN g V P IFT TRANSP=1 g P LDK A2,DLE g P CF A5,WRBCCN SEND ONE DLE g P XIF g P LDK A2,STX g P CF A5,WRITEP SEND
0x376508…37669c Dummy {f00=0x0119, f01=0x0190, f02=» BUFFER ADDRESS g | ( P ADK A4,2 SKIP FIRST WORD IN BUFFER h ( P LD A3,ECBRL,A8 GET REQUESTED LENGTH h D P SUK A3,1 SKIP FIRST BYTE h p P IFT TRANSP=0 h P IFT COMPRS=1 h . P CM DWTCMP,A6 CLEAR SPACE COMPRESS CTNL h P XIF h PTRT1
0x37669c…376830 Dummy {f00=0x0119, f01=0x018e, f02=»1 INCR POINTER h $ P ANK A2,/FF MASK TO 8 BITS!! =3 i P IFT TRANSP=0 i > P ANK A2,/7F REMOVE P-BIT =3 i T P CWK A2,ETB i x " P RF(G) TRT110 NOT ETB IN TEXT i P CWK A2,SYN i ( P RF(NL) TRT105 REPLACE SYN BY SPACE i P CWK A2,/07 CHECK CODE
0x376830…3769c4 Dummy {f00=0x0119, f01=0x0190, f02=» PTRT110 EQU * j P IFT TRANSP=0 j P IFT COMPRS=0 j 0 P CWK A2,GS GROUP SEPARATOR j H P RF(E) TRT117 YES j l P XIF j P IFT TRANSP=0 j P IFT COMPRS=1 j P CWK A2,SPCASC ASCII SPACE j P RF(NE) TRT112 NO j P I
0x3769c4…376b58 Dummy {f00=0x0119, f01=0x0190, f02=»XT CHAR j t . P CF A5,TRCOMP TRANSMIT COMPRESSED SPACES k & P RB TRT100 COMPRESSED MODE ENDED k B PTRT112 EQU * CHAR /= SPACE k l & P LD A1,DWTCMP,A6 COMPRESS MODE ? k P RF(Z) TRT114 NO k . P CF A5,TRCOMP TRANSMIT COMPRESSED SPACES k PTR
0x376b58…376cec Dummy {f00=0x0119, f01=0x0190, f02=»DIC k f P XIF l P IFT TRANSP=1 l P CWK A2,DLE l . P RF(NE) TRT115 NOT DLE l B , P CF A5,WRBCCN INSERT ONE DLE. NO CRC-CAL l ` P LDK A2,DLE l P XIF l PTRT115 EQU * l P CF A5,WRITEP SEND CHAR l P RB TRT100 NEXT CHAR l P IFT TRA
0x376cec…376e80 Dummy {f00=0x0119, f01=0x0190, f02=»S l x P SUK A3,1 DECR BUFF POINTER m " P RF(NP) TRT120 END OF BUFFER m . P LCR A2,A4 GET CHAR m T P ADK A4,1 INCR POINTER m p P ANK A2,/7F CLEAN CHAR m $ P ORK A2,/40 SET SPACE CHAR BIT m ( P CF A5,WRITEP TRANSMIT SPACE COUNT m * P RB
0x376e80…377014 (5, 576) Dummy {f00=0x0119, f01=0x0190, f02=»ND ONE DLE. NO CRC-CAL m P XIF n $ P LD A8,DWTECB,A6 GET ECB ADDRESS n * & P LD A1,ECBBA,A8 GET BUFFER ADDRESS n R & P LC A1,1,A1 GET CONTROL CHARACTER n | P LDK A2,ETX n P ANK A1,/FF n P RF(Z) TRT130 WRITE LAST n P LDK A2,ETB n PTRT130
0x377014…3771a8 Dummy {f00=0x0119, f01=0x0190, f02=» CF A5,TRCOMP TRANSMIT COMPRESSED SPACES n PTRT132 EQU * o 2 P XIF o H P CF A5,WRITEP SEND ETB/ETX o X P IFT CODE=1 o | P LDR A3,A7 SAVE CRC o P LDR A2,A7 o P ANK A2,/FF o ( P CF A5,WRITE SEND 1ST CRC CHARACTER o 0 P ECR A7,A3
0x3771a8…37733c Dummy {f00=0x0119, f01=0x0190, f02=»1,A6 DWT ADDRESS o " P CF A15,SETIME START ACK TIMER p P DATA TRT200,TIMACK p > ( P ST A4,DWTPTI,A6 SAVE TIMER POINTER p Z ( P CM DWTACK,A6 INDICATE ACK EXPECTED p P ABL BMM p P EJECT p P* p P* p $ P* TIME OUT ON TEXT TRANSMISSION p
0x37733c…3774d0 Dummy {f00=0x0119, f01=0x0190, f02=»ASE p r P ADR A5,A6 q P LDK A1,8 q 0 P ST A1,DWTACK,A6 INDICATE TRANSMIT TIME OUT q 0 P ABL TRENQ SEND ENQ q d P IFT TRANSP=0 q P IFT COMPRS=1 q P EJECT q P* q P* q D P* SEND SPACES COMPRESSED ...... GS SC ....
0x3774d0…377664 Dummy {f00=0x0119, f01=0x0190, f02=»AVE NEXT CHAR IF ANY q ~ . P CWK A1,SPCMIN NO OF SPACES LESS THAN MIN r P RF(NL) TRCO20 NO r P PTRCO10 EQU * r j * P LDK A2,SPACE SEND APPROPRIATE SPACE r P CF A5,WRITEP SEND IT r P LDK A1,0 CLEAN FIRST r ( P LC A1,DWTCMP+1,A6 DECR SPACE
0x377664…3777f8 Dummy {f00=0x0119, f01=0x0190, f02=»XT SPACE r ~ 0 PTRCO20 EQU * NO OF SPACES >MIN SEND: GS SC s P LDK A2,GS s F P CF A5,WRITEP SEND GS s Z P LDK A2,0 CLEAN FIRST s x & P LC A2,DWTCMP+1,A6 NO OF SPACES s * P ORK A2,SPCCHB FORM SPACE COUNT CHAR s P CF A5,WRITEP SEND IT s
0x3777f8…37798c Dummy {f00=0x0119, f01=0x018e, f02=» s l P RTN A5 RETURN TO CALLER t P XIF t * P EJECT t : P* t H P* t R P* SEND ENQ IN BID SEQUENCE t P* t ~ P* t PTRENQB CF A5,WRENQ SEND ENQ t P LDR A1,A6 DWT ADDRESS t " P CF A15,SETIME START BID TIMER t P DATA TRE200,T
0x37798c…377b20 Dummy {f00=0x0119, f01=0x0190, f02=» t ( PTRE200 LDR A6,A1 RESTORE DWT ADDRESS u $ P CF A15,CLPTIM CLEAR TIMER LINK u 4 & P LDK A5,DWTSTB LOAD A5 STACK BASE u P ADR A5,A6 u P LD A1,DWTENQ,A6 u P CWK A1,ENQCNT u * P RB(L) TRENQB NOT COUNT OUT: BID AGAIN u PTRE210 EQU * u . P
0x377b20…377cb4 (5, 577) Dummy {f00=0x011a, f01=0x0190, f02=» P* v P* v PTRENQ EQU * v $ P LD A1,DWTENQ,A6 GET ENQ COUNTER v , P CWK A1,ENQCNT v T * P RB(G) TRE210 ENQ COUNT OUT: SEND EOT v j P CF A5,WRENQ SEND ENQ v P LDR A1,A6 DWT ADDRESS v P CF A15,SETIME START TIMER v P DATA TRE300,TIMEN
0x377cb4…377e48 Dummy {f00=0x011a, f01=0x0190, f02=»RESS v p & P LDK A5,DWTSTB LOAD A5 STACK BASE w P ADR A5,A6 w 6 P RB TRENQ SEND ENQ AGAIN w H P* w h P* w r P EJECT w | P* w P* w P* TRANSMIT TTD w P* w P* w PTRTTD EQU * w " P LDR A6,A1 RESTORE DWT ADDRESS w $ P CF A1
0x377e48…377fdc Dummy {f00=0x011a, f01=0x0190, f02=»E STATE = 3 DURING TTD - NAK w x 0 P CF A5,WRSYN START TRANSMITTER AND SEND SYN x $ P IFT TRANSP=1 x X P LDK A2,DLE x n P CF A5,WRBCCN SEND ONE DLE x P XIF x P LDK A2,STX x P CF A5,WRITEP SEND STX x P IFT TRANSP=1 x P LDK A2,DLE x
0x377fdc…378170 Dummy {f00=0x011a, f01=0x0190, f02=» x v P DATA TRT500,TIMENQ y ( P ST A4,DWTPTI,A6 SAVE TIMER POINTER y $ P ABL BMM y P P* y ` P* y j " P* NO RESPONSE ON TTD SEQUENCE y t P* y P* y ( PTRT500 LDR A6,A1 RESTORE DWT ADDRESS y ( P CF A15,CLPTIM CLEAR TIMER POINTER y $ P L
0x378170…378304 Dummy {f00=0x011a, f01=0x018e, f02=» . P* WRSYN : START TRANSMITTER IF 2-WIRE LINE z P* AND SEND SYN z 6 P* z T P* z ^ PWRSYN EQU * z h * P CF A5,CHALTI HALT RECEIVER IF ACTIVE z | * P CF A5,CSYNCO START O/P WITH SYNC DEF z P LDR A1,A6 DWT ADDRESS z P STR A4,A15 SAVE A
0x378304…378498 Dummy {f00=0x011a, f01=0x0190, f02=» " P LDR* A4,A15 GET A4 FROM STACK { $ P CF A5,READ WAIT FOR INTERRUPT { * P LDK A2,SYN { R P CF A5,WRITE SEND SYN { f P LDK A2,SYN { P CF A5,WRITE SEND SYN { P LDK A2,SYN { P CF A5,WRITE SEND SYN { P RTN A5 { P EJECT { P*
0x378498…37862c Dummy {f00=0x011a, f01=0x0190, f02=»TORE DWT ADDRESS { ( P CF A15,CLMTIM CLEAR TIMER POINTER | & P LDK A5,DWTSTB LOAD A5 STACK BASE | D P ADR A5,A6 | n ( P CF A15,CLPTIM STOP PROCEDURE TIMER | , P CF A5,CDISC DISCONNECT MODEM FROM LINE | ( P CM DWTSAV+4,A6 CLEAR STACK POINTER | " P
0x37862c…3787c0 Dummy {f00=0x011a, f01=0x018e, f02=»* | * P CF A5,WRSYN START OUTPUT AND SEND SYN } P LDK A2,EOT } 8 POUTEND EQU * } L , P CF A15,CLMTIM STOP MODEM TRANSMIT TIMER } ` P CF A5,WRITEP SEND CHARACTER } P LDK A2,PAD } P CF A5,WRITE SEND PAD } P LDK A2,PAD } P CF A5,WRITE }
0x3787c0…378954 (5, 578) Dummy {f00=0x011a, f01=0x0190, f02=» } P* ~ P* ~ P* WRENQ : SEND SINGLE ENQ ~ P* ~ > P* ~ H PWRENQ EQU * ~ R * P CF A5,WRSYN START OUTPUT AND SEND SYN ~ f PWRENQ5 EQU * ~ " P IM DWTENQ,A6 COUNT ENQ:S SENT ~ P LDK A2,ENQ ~ P RB OUTEND ~ P EJECT ~ P* ~
0x378954…378ae8 Dummy {f00=0x011a, f01=0x0190, f02=»DK A2,NAK ~ ( P ST A2,DWTLRS,A6 SAVE LAST RESPONSE P RB OUTEND > P* P P EJECT Z P* h " P* TRACK : SEND ACK-0 OR ACK-1 r P* P* PTRACK EQU * 0 P LD A3,DWTRSN,A6 GET PROPER ACK TO BE SENT PTRA100 EQU * * P
0x378ae8…378c7c Dummy {f00=0x011a, f01=0x018e, f02=»LAST RESPONSE z P RB OUTEND P* ( P* 2 P* TRWACK : SEND WACK < P* X P* b PTRWACK EQU * l P LDK A3,WACK P RB TRA100 P EJECT P* P* P* TRACK0 : SEND ACK 0 P* P* PTRACK0 LDK A3,
0x378c7c…378e10 Dummy {f00=0x011a, f01=0x0190, f02=» PTRRVI LDK A3,RVI P RB TRA100 P EJECT . P* @ P* N 0 P* CINIT : INITIALIZE LINE CONTROL UNIT INFO P* PCINIT EQU * ( P CM DWTLCI,A6 CLEAR I/P ACTIVE IND ( P CM DWTLCO,A6 CLEAR OUTP. ACT. FLAG
0x378e10…378fa4 Dummy {f00=0x011a, f01=0x0190, f02=» FOR INPUT DATA t P* P* " PCSYNCI EQU * , P LD A2,PFPOST =1 B ( P ABL(NZ) TDISP WAIT FOR POWER UP =1 P CF A5,CHALTI STOP I/P * P ST A5,DWTLCI,A6 SET I/P ACT. IND. =3 ( P ADK A5,4 ADD RETURN OFFSET FOR ABR P IFT SAL
0x378fa4…379138 Dummy {f00=0x011a, f01=0x0190, f02=» EX DWTOSI,A6 SEND I/P SYNC PATTERN TO LC P XIF 2 P IFF SALCUZ=1 B & P LDKL A2,CBCRSP+SYN SYNC PATTERN X . P EX DWTCSI,A6 SEND I/P SYNC PATTERN TO LC P XIF * P ABR* A5 RETURN TO CALLER WITH CR SET P* P*
0x379138…3792cc Dummy {f00=0x011a, f01=0x0190, f02=»T FOR POWER UP =1 ~ P IFT SALCUZ=1 0 P LDK A2,PARITY CHAR PARITY TYPE CHECK BY CU 2 P EX DWTCSU,A6 CIO START f P RF(A) CSYNC2 ACCEPTED -> * P EX DWTSSU,A6 TRY TO READ STATUS THEN P RF(A) CSYNC1 ACCEPTED -> * P ABL BMM NOT ACC
0x3792cc…379460 Dummy {f00=0x011a, f01=0x018e, f02=» LDK A2,SYN SYNC PATTERN P EX DWTOSU,A6 DEFINE SYNC " ( P ST A5,DWTLCO,A6 SET OUTP. ACT. FLAG D P XIF p P IFF SALCUZ=1 $ P EX DWTCSU,A6 START TRANSMITTER P XIF P RTN A5 P EJECT P* P* " P* CH
0x379460…3795f4 (5, 579) Dummy {f00=0x011a, f01=0x0190, f02=» l P XIF P EX DWTCHI,A6 HALT I/P ( P CM DWTLCI,A6 CLEAR I/P ACTIVE IND 6 P EX DWTSSI,A6 SST INPUT b P** LOGG P IFF LOGG=0 P CF A5,LOGSST LOGG I/P SST P XIF P ADK A5,4 INCR STACK POINTE P ABR* A5
0x3795f4…379788 Dummy {f00=0x011a, f01=0x0190, f02=»CUZ=1 " P LDK A2,CBSTOP STOP FUNCTION P EX DWTCHU,A6 STOP CU 6 P LD A2,DWTLCO,A6 . T " P RF(Z) CHLTO1 OUTP. NOT ACTIVE n ( P CM DWTLCO,A6 CLEAR OUTP. ACT. FLAG $ P CF A5,READ WAIT FOR INTERRUPT PCHLTO1 EQU * . =5 P XIF
0x379788…37991c Dummy {f00=0x011a, f01=0x0190, f02=»GET STATUS P ABR* A5 RETURN TO CALLER P EJECT 6 P* H P* V * P* CCALL : ACTIVATE CU TO ACCEPT CALL d P* PCCALL EQU * P LD A2,PFPOST =1 ( P ABL(NZ) TDISP WAIT FOR POWER UP =1 ( P CM DWTLCI,A
0x37991c…379ab0 Dummy {f00=0x011a, f01=0x0190, f02=» P XIF P IFF SALCUZ=1 P LDK A2,0 2 P EX DWTCSI,A6 F P XIF ^ P ABR* A5 n P* P* * P* CDISC : DISCONNECT MODEM FROM LINE P* PCDISC EQU * ( P CM DWTLCI,A6 CLEAR I/P AC
0x379ab0…379c44 Dummy {f00=0x011a, f01=0x0190, f02=»DWTCHU,A6 DISC O/P P XIF P IFF SALCUZ=1 , P EX DWTCHI,A6 HALT I/P D P EX DWTSSI,A6 . b P EX DWTCHU,A6 HALT O/P z P EX DWTSSU,A6 . P LDK A2,0 P EX DWTCSI,A6 P XIF P ABR* A5 RETURN TO CALLER
0x379c44…379dd8 Dummy {f00=0x011a, f01=0x0190, f02=»ER POINTER r " P RF(Z) CLPRTN NO TIMER RUNNING P CM* DWTPTI,A6 STOP TIMER 8 & P CM DWTPTI,A6 CLEAR TIMER POINTER Z PCLPRTN EQU * P IFT CPU852=1 P ADKL A15,4 P ABR* A15 RETURN P XIF P IFT CPU852=0 P RTN A15
0x379dd8…379f6c Dummy {f00=0x011a, f01=0x0190, f02=» GET TIMER POINTER =2 " P RB(Z) CLPRTN NO TIMER RUNNING P CM* DWTRTI,A6 STOP TIMER D & P CM DWTRTI,A6 CLEAR TIMER POINTER f P RB CLPRTN P* P EJECT P* P* , P* CLEAR MODEM TRANSMIT TIMER IF RUNNING P* P
0x379f6c…37a100 Dummy {f00=0x011a, f01=0x0190, f02=» v & P CM DWTMTI,A6 CLEAR TIMER POINTER P RB CLPRTN 2 P IFT IDLELN=1 D P EJECT Z B P************************************************************* h P* P* LINE ACTIVITY: D P* A TIMER IS STARTED WHENEVER THE LINE IS IDLE (NOT
0x37a100…37a294 (5, 580) Dummy {f00=0x011a, f01=0x0190, f02=» THR LINE ` P* B P************************************************************** P* b P* START IDLE TIMER l P* PSTIDLE EQU * P LDR A1,A6 " P CF A15,SETIME SET IDLE TIMER P DATA TRIDLE,TIMIDL * P ST A4,DWTITI SA
0x37a294…37a428 Dummy {f00=0x011a, f01=0x0190, f02=»LE EQU * " P LDR A6,A1 RELOAD DWT-ADDRESS $ P CF A15,CLIDLE CLEAR IDLE TIMER 6 & P CF A15,STIDLE RE-START IDLE TIMER ^ " P CF A5,CHALTI HALT RECEIVER =6 P CF A5,CSYNCO * RISE RTS =6 $ P CF A5,CHALTO * JUST A MOMENT =6 & P CF A5,CSYNCI
0x37a428…37a5bc Dummy {f00=0x011a, f01=0x0190, f02=»IMER BLOCK POINTER z P RF(Z) CLIRTN NOT RUNNING " P CM* DWTITI,A6 * CLEAR TIME & < " P CM DWTITI,A6 * BLOCK POINTER b PCLIRTN EQU * P RTN A15 P XIF P EJECT P* P* $ P* SST SEQUENCE FOR INPUT CHANNEL P*
0x37a5bc…37a750 Dummy {f00=0x011a, f01=0x0190, f02=»WTSAV+6,A6 P LD A8,DWTSAV+8,A6 " P EX DWTSSI,A6 SST INSTRUCTION 0 P RF(NA) SST205 NOT ACCEPTED V P**LOGG z P IFF LOGG=0 P P CF A5,LOGSST LOGG INPUT SST P XIF P LDR A1,A2 2 P ANK A1,SBERR+SBCALL ERROR OR
0x37a750…37a8e4 Dummy {f00=0x011a, f01=0x0190, f02=»G CALL ? z ( P RF(Z) SST150 NOT CALLING INDICATOR & P LD A1,DWTST,A6 CALLING INDICATOR < P ABL(N) BMM NO REQUEST f P LD A1,DWTOR,A6 GET ORDER P SUK A1,/31 ( P ABL(NZ) BMM NOT ACCEPT CALL REQUEST . P ABL ACC150 CALL RECEIVED - COMPLE
0x37a8e4…37aa78 Dummy {f00=0x011a, f01=0x0190, f02=»RITY ERROR ? z P RF(NZ) SST205 YES P XIF 2 P LDR A1,A2 MOVE STATUS B P ANK A1,SBNOOP b P RF(NZ) SST200 YES z 0 P LD A1,DWTLCI,A6 CARRIER OFF: I/P ACTIVE ? * P ABL(Z) EXDISP NO IGNORE CARRIER IF P I/P IS NOT AC
0x37aa78…37ac0c Dummy {f00=0x011a, f01=0x0190, f02=»6 CLEAR STACK POINTER & P ABL RXMNOP MODEM NOT OPERABLE =2 PSST204 EQU * H " P LDKL A2,/100 IND SST STATUS Z ^ PSST205 EQU * P LDR A5,A5 . 0 P ABL(Z) TDISP IGNORE INT. IF STACKP. CLEARED & P ADK A5,4 INCREMENT RETURN OFFSET
0x37ac0c…37ada0 Dummy {f00=0x011a, f01=0x0190, f02=»ERATE PARITY AND SEND CHARACTER P* ( P* 2 PWRITEP EQU * < P IFT CODE+SALCUZ=0 P P ECR A1,A2 l P ORK A2,/80 ~ PWRP100 EQU * P SLL A1,1 P RB(P) WRP100 P RF(Z) WRP110 P XRK A2,/80 P RB WRP100
0x37ada0…37af34 (5, 581) Dummy {f00=0x011b, f01=0x0190, f02=»E EQU * P IFT CODE=0 P XRR A7,A2 ACCUMULATE BCC $ P XIF F P IFT CODE=1 R P CF A5,ACBPAR ACCUMULATE CRC f P XIF PWRBCCN EQU * * P EX DWTOTR,A6 PERFORM OTR INSTRUCTION P**LOGG P IFF LOGG=0 P RF(NA) WRIT10
0x37af34…37b0c8 Dummy {f00=0x011b, f01=0x0190, f02=» P* . P* READP : READ CHARACTER AND CHECK PARITY * P* ON PARITY ERROR CR NOT ZERO @ P* n P* x PREADP EQU * P CF A5,READ READ CHARACTER P LDR A1,A1 ANY SST STATUS P RF(NZ) REPEXI YES P IFT CODE+SALCUZ=0
0x37b0c8…37b25c Dummy {f00=0x011b, f01=0x0190, f02=»0 P RB REP10 PREP20 EQU * P LD A3,DWTSAV,A6 RESTORE A3 0 P XRK A1,/80 T P ANK A2,/7F h P ANK A1,/80 | P XIF P IFT SALCUZ=1 P IFT CODE=0 $ P ANK A1,0 SET CR AS FROM READP P XIF P IFT C
0x37b25c…37b3f0 Dummy {f00=0x011b, f01=0x0190, f02=» SET CR P ABR* A5 P EJECT P* . & P* READ : SAVE REGISTER A3-A5,A7,A8 8 P* GO TO DISPATCHER b P* PREAD EQU * P ST A3,DWTSAV,A6 P ST A4,DWTSAV+2,A6 P ST A5,DWTSAV+4,A6 P ST A7,DWTSAV+6,A6 P S
0x37b3f0…37b584 Dummy {f00=0x011b, f01=0x0190, f02=»ATION OF BCC P* A2= CHARACTER||=4 P* A7= ACCUMULATED CRC 2 PACBPAR EQU * R P XRR A7,A2 ACC CHAR h P RTN A5 P* P* P* READ AND CHECK BCC P* PRDBPAR EQU * P CF A5,READ READ C
0x37b584…37b718 Dummy {f00=0x011b, f01=0x0190, f02=»F RDBP02 PRDBP01 EQU * PARITY ERROR * P ADK A5,4 SET CR AND INCR STACK POINT 4 PRDBP02 EQU * b P ABR* A5 RETURN TO CALLER x P XIF P IFT CODE=1 P EJECT P* P* P* CALCULATION OF CRC P* P*
0x37b718…37b8ac Dummy {f00=0x011b, f01=0x0190, f02=» P ST A3,CRCSAV+4 P LDK A1,8 PCRC100 LDR A3,A7 . P SRL A7,1 F P XRR A3,A2 X P SRL A2,1 j P ANK A3,1 | P RF(Z) CRC110 P XRKL A7,/A001 PCRC110 SUK A1,1 P RB(NZ) CRC100 P LD A1,CRCSAV P LD A2,CRC
0x37b8ac…37ba40 Dummy {f00=0x011b, f01=0x0190, f02=»* " P* ON RETURN CR=0 IF CRC IS OK P* 0 P* : PRDBPAR EQU * D " P CF A5,READ READ 1ST CRC CHAR Z & P XRR A7,A2 CHECK WITH ACCUMULATED " P CF A5,READ READ 2ND CRC CHAR P ECR A7,A7 P ADK A5,4 $ P XRR A2,A7 CHECK CRC
0x37ba40…37bbd4 (5, 582) Dummy {f00=0x011b, f01=0x0190, f02=» ( P* INTERRUPT HANDLER , CHLC RECEIVER P* 4 < P******************************************************* > P* ~ PIHLCIN EQU * PIH1701 EQU * P ST P,INTSAV P IFT CPU852=1 * P CF A15,SAVE8 SAVE A1-A8 ON A15 STACK P
0x37bbd4…37bd68 Dummy {f00=0x011b, f01=0x0190, f02=» CHARACTER FROM LINR | PIHI100 EQU * P ABL(NA) SSTIN 0 P**LOGG F P IFF LOGG=0 T P LD A5,DWTSAV+4,A6 h & P CF A5,LOGIN LOGG INPUT CHARACTER P XIF & P LDR A1,A2 MOVE CHAR TO FORM FLAG , P ORKL A1,/FF00 SET FLAG FOR CARRIER ON
0x37bd68…37befc Dummy {f00=0x011b, f01=0x0190, f02=»V+6,A6 P LD A8,DWTSAV+8,A6 , P LD A5,DWTSAV+4,A6 RELOAD STACK POINTER ( ( P ABL(Z) TDISP IGNORE INT IF CLEARED X P ADK A5,4 INCR STACK POINT P LDKL A1,0 SET CR=0 P ABR* A5 RETURN WITH CR P IFF NLINE=1 P EJECT P*
0x37befc…37c090 Dummy {f00=0x011b, f01=0x0190, f02=» ADDRESS x , P INR A2,0,DAMI02 GET CHARACTER FROM LINE P RB IHI100 @ P IFF NLINE=2 R P* f P* p P* z PIH1705 EQU * P ST P,INTSAV * P CF A15,SAVE8 SAVE A1-A8 ON A15 STACK $ P LDKL A6,DW1703 LOAD DWT ADDRESS , P INR A
0x37c090…37c224 Dummy {f00=0x011b, f01=0x0190, f02=»INTSAV P * P CF A15,SAVE8 SAVE A1-A8 ON A15 STACK $ P LDKL A6,DW1704 LOAD DWT ADDRESS D , P INR A2,0,DAMI04 GET CHARACTER FROM LINE l P RB IHI100 P XIF P EJECT < P******************************************************* P
0x37c224…37c3b8 Dummy {f00=0x011b, f01=0x0190, f02=» P* P* PIHLCUT EQU * PIH1702 EQU * , P IFT CPU852=1 @ " P CF A15,SAVE8 SAVE REGISTERSA V P XIF | P IFT CPU852=0 P MSR 8,A15 SAVE REGISTERS P XIF $ P LDKL A6,DW1701 LOAD DWT ADDRESS P RB IHI110 LOAD REGI
0x37c3b8…37c54c Dummy {f00=0x011b, f01=0x018e, f02=» A1-A8 ON A15 STACK ~ $ P LDKL A6,DW1702 LOAD DWT ADDRESS P RB IHI110 LOAD REGISTERS D P IFF NLINE=2 f P* z P* P* PIH1706 EQU * P ST P,INTSAV * P CF A15,SAVE8 SAVE A1-A8 ON A15 STACK $ P LDKL A6,DW1703 LOAD DWT A
0x37c54c…37c6e0 Dummy {f00=0x011b, f01=0x0190, f02=» * P CF A15,SAVE8 SAVE A1-A8 ON A15 STACK $ P LDKL A6,DW1704 LOAD DWT ADDRESS 2 P RB IHI110 LOAD REGISTERS Z P XIF | P EJECT P* P* ILLEGAL INTERRUPTS P* P IFF NLINE=4 PIH1707 EQU * PIH1708 EQU * P IFF N
0x37c6e0…37c874 (5, 583) Dummy {f00=0x011b, f01=0x0190, f02=»AV * P LDK A1,/5 INDICATE ILLEGAL INTERRUPT * P ABL ILLINT ILLEGAL INTERRUPT ROUTINE 8 P EJECT f P* t P* ~ & P* DCTAB: LINE CONFIGURATION TABLE P* P* PDCTAB EQU * $ P DATA DCTABE-DCTAB TABLE LENGTH P DATA
0x37c874…37ca08 Dummy {f00=0x011b, f01=0x0190, f02=»IF PDCTABE EQU * P EJECT P* , P* 6 $ P* DEVICE WORK TABLE FOR LINE 01 @ P* h P* r PDW1701 EQU * | P DATA DAMU01 DEVICE ADDRESS 2 P DATA /8000 STATUS , /8000 MEANS DEVICE READY P DATA 0 ECB ADDRESS P D
0x37ca08…37cb9c Dummy {f00=0x011b, f01=0x0190, f02=»A 0 TASK QUEUE FOR THIS DEVICE P IFT MMUPAG=1 & P DATA 0 USER ECB < P DATA ECBDC1 MMU ECB T P XIF p , PDWTTIM EQU *-DW1701 REQUEST TIMER VALUE | P DATA 0 PDWTRTI EQU *-DW1701 " P DATA 0 REQUEST TIMER POINTER PDWTPTI EQU
0x37cb9c…37cd30 Dummy {f00=0x011b, f01=0x0190, f02=»DLELN=1 PDWTITI EQU * $ P DATA 0 IDLE ACT. TIMER POINTER $ P XIF L PDWTSAV EQU *-DW1701 X $ P RES 5 SAVE AREA FOR A3-A5,A7,A8 t PDWTXST EQU *-DW1701 . P DATA 0 PROCEDURE STATUS: 0= CONTROL STATE . P 1= TRANSM
0x37cd30…37cec4 Dummy {f00=0x011b, f01=0x018e, f02=»1 ~ P DATA 0 RESPONSE STATE P 0= ACK EXPECTED ( P 1= WACK SEQ. DELAY (REC) B P 2= TTD SEQ. DELAY (TRANS) f ( P 3= TTD SEQ. WAIT FOR NAK (TRANS) P 4= WACK SEQ. (TRANS) P 6= BID SEQ. * P 8= ACK EXP. AFTER TRANSMI
0x37cec4…37d058 Dummy {f00=0x011b, f01=0x0190, f02=» n PDWTWAC EQU *-DW1701 P DATA 0 WACK COUNTER $ PDWTRTR EQU *-DW1701 @ " P DATA 0 RETRANSMISSION COUNTER PDWTLRS EQU *-DW1701 P DATA NAK LAST SENT RESPONSE PDWTIUS EQU *-DW1701 P DATA 0 BCC/CRC SAVE P IFT COMPR
0x37d058…37d1ec Dummy {f00=0x011b, f01=0x0190, f02=»701-2 STACK BASE PDWTLCI EQU *-DW1701 $ P DATA 0 LINE CU I/P ACTIVE IND 6 PDWTLCO EQU *-DW1701 . ^ P DATA 0 OUTP. ACT. IND. | PDWTOTR EQU *-DW1701 P OTR A2,0,DAMU01 PDWTSSI EQU *-DW1701 P SST A2,DAMI01 PDWTSSU
0x37d1ec…37d380 Dummy {f00=0x011b, f01=0x018e, f02=»MU01 PDWTCHI EQU *-DW1701 P CIO A2,0,DAMI01 ( PDWTCHU EQU *-DW1701 @ P CIO A2,0,DAMU01 P IFT SALCUZ=1 t PDWTOSI EQU *-DW1701 P OTR A2,1,DAMI01 PDWTOSU EQU *-DW1701 P OTR A2,1,DAMU01 P XIF
0x37d380…37d514 (5, 584) Dummy {f00=0x011b, f01=0x018e, f02=» P**LOGG P IFF LOGG=0 PLOGPNT EQU *-DW1701 * P DATA LGST01 F PLOGSTA EQU *-DW1701 Z PLGST01 EQU * v P RES LOGG PLOGEND EQU *-DW1701-4 PSAVE2 EQU *-DW1701 P DATA 0 PSAVE3 EQU *-DW1701 P DATA 0
0x37d514…37d6a8 Dummy {f00=0x011b, f01=0x0190, f02=» PDW1702 EQU * P DATA DAMU02 DEVICE ADDRESS 2 P DATA /8000 STATUS , /8000 MEANS DEVICE READY @ P DATA 0 ECB ADDRESS v P DATA 0 ORDER ( P DATA DRMAD POINTER TO ADDRESS BLOCK P DATA 0 TTAB ADDRESS $ P DATA 0 WAIT/ACTIVATE IN
0x37d6a8…37d83c Dummy {f00=0x011b, f01=0x0190, f02=» P IFF NLINE=1 P DATA 0 REQUEST TIMER VALUE " P DATA 0 REQUEST TIMER POINTER B $ P DATA 0 PROCEDURE TIMER POINTER h ( P DATA 0 MODEM TRANSMIT TIMER POINTER P IFT IDLELN=1 $ P DATA 0 IDLE ACT. TIMER POINTER P XIF P I
0x37d83c…37d9d0 Dummy {f00=0x011b, f01=0x0190, f02=»UNTER $ P DATA 0 ACK TO BE SENT/RECEIVED P DATA 0 WACK COUNTER 6 " P DATA 0 RETRANSMISSION COUNTER R P DATA NAK LAST SENT RESPONSE x P DATA 0 BCC/CRC SAVE AREA P IFT COMPRS=1 & P DATA 0 SPACE COMPRESS WORK AREA P XIF
0x37d9d0…37db64 Dummy {f00=0x011b, f01=0x018e, f02=»DAMU02 P SST A2,DAMI02 P SST A2,DAMU02 $ P CIO A2,1,DAMI02 : P CIO A2,1,DAMU02 R P CIO A2,0,DAMI02 j P CIO A2,0,DAMU02 P IFT SALCUZ=1 P OTR A2,1,DAMI02 P OTR A2,1,DAMI02 P XIF P IFF NLINE=1
0x37db64…37dcf8 Dummy {f00=0x011b, f01=0x0190, f02=» P IFF NLINE=1 P**LOGG P IFF LOGG=0 , P DATA LGST02 @ PLGST02 EQU * T P RES LOGG h P DATA 0 z P DATA 0 P XIF P* P IFF NLINE=1 P IFF NLINE=2 P EJECT P* P* $ P* DEVICE WORK
0x37dcf8…37de8c Dummy {f00=0x011b, f01=0x0190, f02=»EVICE READY n P DATA 0 ECB ADDRESS P DATA 0 ORDER 0 ( P DATA DRMAD POINTER TO ADDRESS BLOCK F P DATA 0 TTAB ADDRESS r $ P DATA 0 WAIT/ACTIVATE INDICATOR & P DATA 0 TASK QUEUE FOR THIS DEVICE P IFT MMUPAG=1 P DATA 0 USER ECB
0x37de8c…37e020 Dummy {f00=0x011b, f01=0x018e, f02=»0 REQUEST TIMER POINTER $ P DATA 0 PROCEDURE TIMER POINTER ( P DATA 0 MODEM TRANSMIT TIMER POINTER H P IFT IDLELN=1 t $ P DATA 0 IDLE ACT. TIMER POINTER P XIF P IFF NLINE=1 P IFF NLINE=2 $ P RES 5 SAVE AREA FOR A3-A5,A7,A8
0x37e020…37e1b4 (5, 585) Dummy {f00=0x011c, f01=0x0190, f02=» P DATA 0 WACK COUNTER " P DATA 0 RETRANSMISSION COUNTER P DATA NAK LAST SENT RESPONSE F P DATA 0 BCC/CRC SAVE AREA j P IFT COMPRS=1 & P DATA 0 SPACE COMPRESS WORK AREA P XIF P IFF NLINE=1 P IFF NLINE=2
0x37e1b4…37e348 Dummy {f00=0x011c, f01=0x018e, f02=» P SST A2,DAMU03 P CIO A2,1,DAMI03 P CIO A2,1,DAMU03 6 P CIO A2,0,DAMI03 N P CIO A2,0,DAMU03 f P IFT SALCUZ=1 ~ P OTR A2,1,DAMI03 P OTR A2,1,DAMU03 P XIF P IFF NLINE=1 P IFF NLINE=2 P I
0x37e348…37e4dc Dummy {f00=0x011c, f01=0x0190, f02=» P IFF NLINE=1 P IFF NLINE=2 P**LOGG 0 P IFF LOGG=0 > P DATA LGST03 R PLGST03 EQU * f P RES LOGG z P DATA 0 P DATA 0 P XIF P* P IFF NLINE=1 P IFF NLINE=2 P IFF NLINE=3 P EJECT
0x37e4dc…37e670 Dummy {f00=0x011c, f01=0x018e, f02=» 2 P DATA /8000 STATUS , /8000 MEANS DEVICE READY P DATA 0 ECB ADDRESS : P DATA 0 ORDER V ( P DATA DRMAD POINTER TO ADDRESS BLOCK l P DATA 0 TTAB ADDRESS $ P DATA 0 WAIT/ACTIVATE INDICATOR & P DATA 0 TASK QUEUE FOR THIS DEVICE P I
0x37e670…37e804 Dummy {f00=0x011c, f01=0x0190, f02=» $ P DATA 0 SET REQUEST TIMER VALUE " P DATA 0 REQUEST TIMER POINTER 0 $ P DATA 0 PROCEDURE TIMER POINTER V ( P DATA 0 MODEM TRANSMIT TIMER POINTER ~ P IFT IDLELN=1 $ P DATA 0 IDLE ACT. TIMER POINTER P XIF P IFF NLINE=1 P
0x37e804…37e998 Dummy {f00=0x011c, f01=0x0190, f02=» x P DATA 0 ENQ COUNTER $ P DATA 0 ACK TO BE SENT/RECEIVED $ P DATA 0 WACK COUNTER L " P DATA 0 RETRANSMISSION COUNTER h P DATA NAK LAST SENT RESPONSE P DATA 0 BCC/CRC SAVE AREA P IFT COMPRS=1 & P DATA 0 SPACE COMPRESS WORK
0x37e998…37eb2c Dummy {f00=0x011c, f01=0x0190, f02=»I/P ACTIVE IND P DATA 0 OUTP. ACT. IND. P OTR A2,0,DAMU04 8 P SST A2,DAMI04 P P SST A2,DAMU04 f P CIO A2,1,DAMI04 | P CIO A2,1,DAMU04 P CIO A2,0,DAMI04 P CIO A2,0,DAMU04 P IFT SALCUZ=1 P OTR A2,1,DAMI04
0x37eb2c…37ecc0 Dummy {f00=0x011c, f01=0x018e, f02=»ECBDC4 EQU * P DATA 0 P DATA DCBUF4 $ P DATA 0,0,0,0 8 PDCBUF4 RES TBUFL+1 N P XIF h P IFF NLINE=1 t P IFF NLINE=2 P IFF NLINE=3 P**LOGG P IFF LOGG=0 P DATA LGST04 PLGST04 EQU * P RES LOG
0x37ecc0…37ee54 (5, 586) Dummy {f00=0x011c, f01=0x0190, f02=» P IFF NLINE=4 PDW1704 EQU * P IFF NLINE=3 , PDW1703 EQU * @ P IFF NLINE=2 T PDW1702 EQU * h P XIF | P DATA 0 DUMMY DWT P DATA 0 STATUS BUSY P EJECT P* P* P* INTERRUPT LOGGING ROUTINE P*
0x37ee54…37efe8 Dummy {f00=0x011c, f01=0x0190, f02=» /1F x , P* OUTPUT STATUS MARKED /0F - NOT USED P* < P IFF LOGG=0 F PLOGSST ST A2,SAVE2,A6 Z P ORKL A2,/1F00 x P RF LOG10 PLOGOUT ST A2,SAVE2,A6 P ORKL A2,/0000 P RF LOG10 PLOGIN CWK A2,/FF P RF(E) LOG
0x37efe8…37f17c Dummy {f00=0x011c, f01=0x4114, f02=»2 P SUR A3,A6 P CWK A3,LOGEND P RF(L) LOGEXI 2 P LDKL A3,LOGSTA H PLOGEXI EQU * ` P ADR A3,A6 t P ST A3,LOGPNT,A6 P LD A2,SAVE2,A6 P LD A3,SAVE3,A6 PLOGE10 RTN A5 P XIF P* P* P END
0x37f17c…37f310 Dummy {f00=0x011c, f01=0x2008, f02=» 0 8 @ x @
0x37f310…37f4a4 Dummy {f00=0x011c, f01=0x0190, f02=» 6 P************************************************** P* B P* ORDERS: L P* ^ P* /02 - READ h P* | P* /06 - WRITE P* P* /0A - READ RANDOM P* P* /31 - ACCEPT A CALL P* P* /37 - CONNECT MODE
0x37f4a4…37f638 Dummy {f00=0x011c, f01=0x0190, f02=»: P* 6 P* STATUS WORD = 0 REQUEST COMPLETED NORMALLY P* N B P* " " <> 0 ABNORMAL RETURN (SEE BIT EQU'S BELOW) X P* B P************************************************************** P* 8 PBIT0 EQU /8000 R
0x37f638…37f7cc Dummy {f00=0x011c, f01=0x0190, f02=» EQU /1000 END OF FILE E.G ETX < PBIT4 EQU /0800 DEVICE DEPENDENT (SEE FURTHER REQ. ORDER) & & PBIT5 EQU /0400 " " f & PBIT6 EQU /0200 " " $ PBIT7 EQU /0100 RETRIES PERFORMED * PBIT8 EQU /0080 MORE INFO E.G NOT USED
0x37f7cc…37f960 Dummy {f00=0x011c, f01=0x0190, f02=»BUFFER LENGTH (TRANSM./REC. BUFFER) v PBIT13 EQU /0004 DATA ERROR , $ PBIT14 EQU /0002 THROUGHPUT ERROR N & PBIT15 EQU /0001 MODEM NOT OPERABLE v P* * PRCCMPL EQU 0 REQUESTED ORDER PERFORMED . PRCETB EQU RCCMPL ETB RECEIVED DURING READ $
0x37f960…37faf4 (5, 587) Opaque[0x194]
0x37faf4…37fc88 # DirEnt {nam=»DRDC81«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2390, f03=0x0000}
0x37faf4…37fc88 IdxSect {
0x37faf4…37fc88 f00 = 0x011c // 0x37faf4 @0x0
0x37faf4…37fc88 f01 = 0x0040 // 0x37faf6 @0x2
0x37faf4…37fc88 gno = [ // 0x37faf8 @0x4
0x37faf4…37fc88 [0x00]: C0x011c.0x2.0
0x37faf4…37fc88 [0x01]: C0x011c.0x3.0
0x37faf4…37fc88 [0x02]: C0x011d.0x0.0
0x37faf4…37fc88 [0x03]: C0x011d.0x1.0
0x37faf4…37fc88 [0x04]: C0x011d.0x2.0
0x37faf4…37fc88 [0x05]: C0x011d.0x3.0
0x37faf4…37fc88 [0x06]: C0x011e.0x0.0
0x37faf4…37fc88 [0x07]: C0x011e.0x1.0
0x37faf4…37fc88 [0x08]: C0x011e.0x2.0
0x37faf4…37fc88 [0x09]: C0x011e.0x3.0
0x37faf4…37fc88 [0x0a]: C0x011f.0x0.0
0x37faf4…37fc88 [0x0b]: C0x011f.0x1.0
0x37faf4…37fc88 [0x0c]: C0x011f.0x2.0
0x37faf4…37fc88 [0x0d]: C0x011f.0x3.0
0x37faf4…37fc88 [0x0e]: C0x0120.0x0.0
0x37faf4…37fc88 [0x0f]: C0x0120.0x1.0
0x37faf4…37fc88 [0x10]: C0x0120.0x2.0
0x37faf4…37fc88 [0x11]: C0x0120.0x3.0
0x37faf4…37fc88 [0x12]: C0x0121.0x0.0
0x37faf4…37fc88 [0x13]: C0x0121.0x1.0
0x37faf4…37fc88 [0x14]: C0x0121.0x2.0
0x37faf4…37fc88 [0x15]: C0x0121.0x3.0
0x37faf4…37fc88 [0x16]: C0x0122.0x0.0
0x37faf4…37fc88 [0x17]: C0x0122.0x1.0
0x37faf4…37fc88 [0x18]: C0x0122.0x2.0
0x37faf4…37fc88 [0x19]: C0x0122.0x3.0
0x37faf4…37fc88 [0x1a]: C0x0123.0x0.0
0x37faf4…37fc88 [0x1b]: C0x0123.0x1.0
0x37faf4…37fc88 [0x1c]: C0x0123.0x2.0
0x37faf4…37fc88 [0x1d]: C0x0123.0x3.0
0x37faf4…37fc88 [0x1e]: C0x0124.0x0.0
0x37faf4…37fc88 [0x1f]: C0x0124.0x1.0
0x37faf4…37fc88 ]
0x37faf4…37fc88 }
0x37fc88…37fe1c Dummy {f00=0x011c, f01=0x0190, f02=» 2 P IDENT DRDC81 REL 10.0 80-03-14 870105041000 P : P =2, DC:MIN HEADER B P REL 10.1 80-01-08 ^ P =1,POWER UP z P 79-10-19 < P******************************************************* P* 0 P* PEAB-T , SOFTWARE FOR
0x37fe1c…37ffb0 Dummy {f00=0x011c, f01=0x018e, f02=»* P* < P******************************************************* P* T 0 P* THIS DRIVER PERFORMS DATA COMMUNICATION ^ 0 P* WITH TC'S CONNECTED TO THE CONCENTRATOR 4 P* VIA LEASED 4-WIRE OR DIALED UP 2-WIRE LINES. P* < P
0x37ffb0…380144 Dummy {f00=0x011c, f01=0x018e, f02=» P* $ P* STANDARD USE OF REGISTERS : P* 6 P* A1 WORK REGISTER @ " P* A2 I/O AND WORK REGISTER ^ P* A3 WORK REGISTER P* A4 WORK REGISTER P* A5 STACK POINTER P* A6 OUTPUT DWT ADDRESS P* A7
0x380144…3802d8 Dummy {f00=0x011c, f01=0x018e, f02=» P* < P******************************************************* P* R P* ENTRY POINTS P* r < P******************************************************* | P* & P ENTRY DC81ON RECOVERY AT POWER ON 8 P ENTRY IH8101 INTERRUPT
0x3802d8…38046c Dummy {f00=0x011c, f01=0x0190, f02=» B P ENTRY IH8123 P ENTRY IH8102,IH8104 P P ENTRY IH8106,IH8108,IH8110,IH8112,IH8114,IH8116,IH8118,IH8120,IH8122,IH8124 : P ENTRY IH8124 8 P ENTRY DW8102,DW8104,DW8106 OUTPUT AND CONTROL DWT:S P ENTRY DW8108,DW8110,DW8112 P ENT
0x38046c…380600 Dummy {f00=0x011c, f01=0x0190, f02=»,DW8111 | P ENTRY DW8113,DW8115,DW8117 P ENTRY DW8119,DW8121,DW8123 4 P EJECT X P* f < P******************************************************* p P* P* EXTERNAL REFERENCES P* < P**************************************
0x380600…380794 (5, 588) Dummy {f00=0x011c, f01=0x0190, f02=»ES ABOVE TOGETHER z P EXTRN DISIOE REQUEST ERROR ( P EXTRN SETIME SET TIMER CALL ADDRESS > P EXTRN SETIMP j P EXTRN DWTST DWT STATUS " P EXTRN DWTECB DWT ECB ADDRESS P EXTRN DWTOR DWT ORDER $ P EXTRN ECBBA ECB BUFFER ADDRESS
0x380794…380928 Dummy {f00=0x011c, f01=0x018e, f02=» ECB CONTROL WORD P EXTRN ILLINT P EXTRN INTSAV 0 . P EXTRN PFPOST WAIT FOR POWER UP IF SET =1 F P EJECT x P* P* P************************** P* * P* SYSTEM ADOPTION * P*
0x380928…380abc Dummy {f00=0x011c, f01=0x0190, f02=» " P***************************** P* * P* 4 P* > P* H PX:A EQU 1 R . P* X:A = NUMBER OF LINES HANDLED BY DRDC81 d 0 PHILINO EQU X:A HIGHEST LINE NUMBER IN SYSTEM P* P* PX:B EQU 10 P* X:B = LENGTH OF POLL L
0x380abc…380c50 Dummy {f00=0x011c, f01=0x0190, f02=»:C MAX LENGTH OF TRANSMISSION BLOCK P* , P* 6 PX:D EQU 400 @ PLOGG EQU X:D T @ P* IF X:D IS UNEQUAL TO ZERO, THE INTERRUPT LOGG IS INCLUDED. h P* LOGG AREA LENGTH = X:D P* P* PX:E EQU 3 $ P* X:E = RETRY LIMIT FO
0x380c50…380de4 Dummy {f00=0x011c, f01=0x0190, f02=» DC CONTROL UNIT 6834 z " P =1 DC CONTROL UNIT 6857 P* D P IFF SALCUZ=1 N P* d P* n P* x PX:G EQU /22 , P* X:G = INPUT DEVICE ADDRESS FOR LINE 01 P* P* PX:H EQU /4 , P* X:H = INPUT DEVICE ADDRESS
0x380de4…380f78 Dummy {f00=0x011c, f01=0x018e, f02=» , P* X:J = INPUT DEVICE ADDRESS FOR LINE 04 P* 8 P* B PX:K EQU /7 L , P* X:K = INPUT DEVICE ADDRESS FOR LINE 05 ^ P* P* PX:L EQU /20 , P* X:L = INPUT DEVICE ADDRESS FOR LINE 06 P* P* PX:M EQU /21
0x380f78…38110c Dummy {f00=0x011c, f01=0x018e, f02=» f P* P* PX:O EQU /24 , P* X:O = INPUT DEVICE ADDRESS FOR LINE 09 0 P* ` P* j PX:P EQU /25 t , P* X:P = INPUT DEVICE ADDRESS FOR LINE 10 P* P* PX:Q EQU /26 , P* X:Q = INPUT DEVICE ADDRESS FOR LINE 11
0x38110c…3812a0 Dummy {f00=0x011c, f01=0x0190, f02=» P IFT SALCUZ=1 P* P* $ P* . PX:G EQU /0A 8 , P* X:G = INPUT DEVICE ADDRESS FOR LINE 01 L P* | P* P* PX:H EQU /1A , P* X:H = INPUT DEVICE ADDRESS FOR LINE 02 P* P* P* P* P*
0x3812a0…381434 (5, 589) Dummy {f00=0x011d, f01=0x0190, f02=» P* PMMUPAG EQU 0 , P* IF MMUPAG = 1 MMU-PAGING IS INCLUDED & P* V PCPU852 EQU 1 ` * P IF CPU852=1 NO MULTIPLE STORE/LOAD v 2 P IF CPU852=0 INCLUDES MULTIPLE STORE/LOAD =0 P* P* PDEVIND EQU 2 * PBUFL
0x381434…3815c8 Dummy {f00=0x011d, f01=0x018e, f02=» P* SYSTEM PARAMETERS P* < P******************************************************* * P* j PLINE01 EQU PLTLEN t PLINE02 EQU PLTLEN PLINE03 EQU PLTLEN PLINE04 EQU PLTLEN PLINE05 EQU PLTLEN PLINE06 EQU PLTLEN
0x3815c8…38175c Dummy {f00=0x011d, f01=0x018e, f02=» PLINE12 EQU PLTLEN 0 PTIMRE4 EQU 2 RECEIVE TIMEOUT 4-WIRE (200MS) & PTIMMRY EQU 5 MODEM READY TIME OUT R " PTIMACT EQU 150 ACTIVITY TIMER | 0 PRTYLIM EQU -RTYSYS RETRY LIMIT FOR RECOVERY " PNUMSYN EQU -3 NUMBER OF SYN:S 4 PDELAY EQU 1
0x38175c…3818f0 Dummy {f00=0x011d, f01=0x0190, f02=» B P* IF BDA = 1, TC ADDRESSES ARE ADAPTED FOR THE BANKDATA CASE: " P* INPUT = /41 -/4F (A - O) N L P* OUTPUT = ADDRESSES ACCORDING TO IBM REMOTE CONTROL UNIT ADDRESSING t ( PRQLOGG EQU 0 FOR TEST PURPOSES ONLY 8 P* IF RQLOGG = 1, A REQUE
0x3818f0…381a84 Dummy {f00=0x011d, f01=0x0190, f02=»* P* CONSTANTS P* P* ( PBIT0 EQU /8000 2 PBIT1 EQU /4000 H PBIT2 EQU /2000 ^ PBIT3 EQU /1000 t PBIT4 EQU /800 PBIT5 EQU /400 PBIT6 EQU /200 PBIT7 EQU /100 PBIT8 EQU /80 PBIT9 EQU /40
0x381a84…381c18 Dummy {f00=0x011d, f01=0x0190, f02=» > P********************************************************* P* F 4 P* APPLICATION INTERFACE : ORDERS AND RETURNCODES P P* > P********************************************************** P* P* ORDERS P* P* /00 - TEST LIN
0x381c18…381dac Dummy {f00=0x011d, f01=0x0190, f02=»7 - START POLLING P* /37 - OPEN TC P* /38 - CLOSE TC 2 P EJECT J P* X P* RETURN CODES: b P* z 4 P* STATUS WORD - 0 REQUEST COMPLETED AS EXPECTED P* & P* STATUS WORD =/ 0 SEE BITS BELOW P* P* PCOMP
0x381dac…381f40 Dummy {f00=0x011d, f01=0x0190, f02=» < PTCINPL EQU BIT14 TC ALLREADY IN POLLING LIST, ORDER /37 : PPOLPER EQU BIT14 POLLING ALLREADY PERMITTED, ORDER /27 D 0 PCODERR EQU BIT13 CODE NOT ALLOWED, ORDER /06 0 PINCLEN EQU BIT12 INCORRECT LENGTH, ORDER /02 6 PTCINAC EQU BIT11 TC INACTIVE,
0x381f40…3820d4 (5, 590) Dummy {f00=0x011d, f01=0x0190, f02=» BIT6 CALLING INDICATOR, NOT USED 6 PLINSTE EQU BIT4+BIT0 LINE OPEN/CLOSED, ALL ORDERS * 2 PPOLHLT EQU BIT4+BIT0 POLLING HALTED, ORDER/02 d ( PTCACT EQU BIT2 TC ACTIVE, ORDER /02 0 PLSTOVF EQU BIT0 POLLIST OVERFLOW, ORDER /37 8 PTCNLST EQU BIT
0x3820d4…382268 Dummy {f00=0x011d, f01=0x0190, f02=»***************************************** P* 2 P* DEVICE WORK AREA EQUATES < P* ^ < P******************************************************* h P* P IFT MMUPAG=0 6 PDWTDRD EQU /10 START OF DRIVER DEFINED PART OF DWT P XIF
0x382268…3823fc Dummy {f00=0x011d, f01=0x0190, f02=»00 DWT TIMER POINTER ~ 0 PDWTATP EQU DWTDRD+/02 ACTIVITY TIMER POINTER " PSTB EQU DWTDRD+/0E STACK BASE P ( PDWTSAV EQU DWTDRD+/10 DWT SAVE AREA v PDWTA5 EQU DWTSAV+4 A5 PDWTA6 EQU DWTSAV+6 A6 PDWTA7 EQU DWTSAV+8 A7 PDWTA8 EQU DW
0x3823fc…382590 Dummy {f00=0x011d, f01=0x018e, f02=»/P ACT t , PDWTRTY EQU DWTDRD+/1E DWT RETRY COUNTER * PDWTBCC EQU DWTDRD+/20 DWT BCC COUNTER > * PDWTACK EQU DWTDRD+/22 DWT ACK COUNTER l . PPACT EQU DWTDRD+/24 LAST POLLED ACTIVE TC 2 PPINACT EQU DWTDRD+/26 LAST POLLED INACTIVE TC 6 PPLIST
0x382590…382724 Dummy {f00=0x011d, f01=0x0190, f02=» d P EJECT P* P* P* * & P* CONDITIONAL ASSEMBLY PARAMETERS 4 P* ^ P IFF LINE01=0 h PMLIN01 EQU 1 AT LEAST 1 LINE ~ P IFF HILINO=1 " PMLIN02 EQU 1 AT LEAST 2 LINES P IFF HILINO=2 " PMLIN03 EQU 1 AT LEAS
0x382724…3828b8 Dummy {f00=0x011d, f01=0x0190, f02=» IFF HILINO=5 " PMLIN06 EQU 1 AT LEAST 6 LINES P IFF HILINO=6 < " PMLIN07 EQU 1 AT LEAST 7 LINES R P IFF HILINO=7 x " PMLIN08 EQU 1 AT LEAST 8 LINES P IFF HILINO=8 " PMLIN09 EQU 1 AT LEAST 9 LINES P IFF HILINO=9 " PML
0x3828b8…382a4c Dummy {f00=0x011d, f01=0x0190, f02=»NES ~ P XIF P IFF HILINO=12 PMLIN12 EQU 0 LESS THAN 12 . P IFF HILINO=11 P PMLIN11 EQU 0 LESS THAN 11 f P IFF HILINO=10 PMLIN10 EQU 0 LESS THAN 10 P IFF HILINO=9 PMLIN09 EQU 0 LESS THAN 09 P IFF HILINO=8
0x382a4c…382be0 Dummy {f00=0x011d, f01=0x0190, f02=» 6 z P IFF HILINO=5 PMLIN05 EQU 0 LESS THAN 5 P IFF HILINO=4 @ PMLIN04 EQU 0 LESS THAN 4 V P IFF HILINO=3 v PMLIN03 EQU 0 LESS THAN 3 P IFF HILINO=2 PMLIN02 EQU 0 LESS THAN 2 P XIF P IFT LINE01=0 PMLIN
0x382be0…382d74 (5, 591) Dummy {f00=0x011d, f01=0x0190, f02=»US WORD CONTENTS P* < P******************************************************* " P* b ( P* DWTST BIT #00 : 0 = DEVICE BUSY l , P* 1 = DEVICE NOT BUSY P* BIT 13 : 1 = TC BUSY . P* BIT #14 : 0 = POLLING
0x382d74…382f08 Dummy {f00=0x011d, f01=0x0190, f02=»1 = LINE OPEN | P* < P******************************************************* P* ` $ P* CHLC RECEIVER STATUS CONTENTS j P* < P******************************************************* P* 4 P* STATUS : /00 = MODEM READY / CAR
0x382f08…38309c Dummy {f00=0x011d, f01=0x0190, f02=»ECTED p & P* : /40 = CALLING INDICATOR P* 8 < P******************************************************* B P EJECT P* < P******************************************************* P* $ P* LINE CONTROL CHARACTER EQUATES
0x38309c…383230 Dummy {f00=0x011d, f01=0x0190, f02=» PDLE EQU /10 DATA LINK ESCAPE ! $ PEOT EQU /04 END OF TRANSMISSION ! ( PENQ EQU /85 ENQUIRY ! P PSTX EQU /02 START OF TEXT ! l PETX EQU /03 END OF TEXT ! * PETB EQU /17 END OF TRANSMISSION BLOCK ! PETXP EQU /83 ETX WITH PARITY ! PETBP EQU
0x383230…3833c4 Dummy {f00=0x011d, f01=0x0190, f02=» ! p 6 PSEMIKO EQU /3B SECOND CHARACTER IN WACK, AFTER DLE " P EJECT " B P* " P F P***************************************************************** " Z P* " P* " 8 P* LINE CONTROL UIT CONTROL EQU:S AND SST STATUS BITS " P* " F P**********
0x3833c4…383558 Dummy {f00=0x011d, f01=0x0190, f02=»QU /4 EVEN CHAR PARITY " " PCBOPAR EQU /C ODD CHAR PARITY # * PPARITY EQU CBNPAR ODD PARITY FOR ASCII # D P XIF # r P IFF SALCUZ=1 # , PCBDISC EQU /0 DISCONNECT MODEM FROM LINE # PCBSTOP EQU /0 CIO STOP # P XIF # P IFT SALCUZ=1 # 0 P
0x383558…3836ec Dummy {f00=0x011d, f01=0x0190, f02=» . PSBNOOP EQU /1 SST STAUS MODEM NOT OPERABEL $ $ PSBTHRU EQU /02 THROUGHPUT ERROR $ 6 " PSBPARI EQU /04 CHAR PAR ERROR $ ^ PSBCARR EQU /20 CARRIER OFF $ " PSBCALL EQU /40 INCOMMING CALL $ . PSBERR EQU /27 SBNOOP,SBTHRU,SBPARI,SBCARR $ PSBCRCL EQU
0x3836ec…383880 Dummy {f00=0x011d, f01=0x0190, f02=»E ADDRESS EQUATES $ P* % < P******************************************************* % $ P* % d PDAMI01 EQU X:G INPUT CHLC 1 % n PDAMI02 EQU X:H % P IFF SALCUZ=1 % P* % P* % PDAMI03 EQU X:I % PDAMI04 EQU X:J % PDAMI05 EQU
0x383880…383a14 (5, 592) Dummy {f00=0x011d, f01=0x0190, f02=» % PDAMI12 EQU X:R & ( PDAMU01 EQU DAMI01+/10 OUTPUT CHLC 1 & PDAMU02 EQU DAMI02+/10 & J PDAMU03 EQU DAMI03+/10 & h PDAMU04 EQU DAMI04+/10 & PDAMU05 EQU DAMI05+/10 & PDAMU06 EQU DAMI06+/10 & PDAMU07 EQU DAMI07+/10 & PDAMU08 EQU
0x383a14…383ba8 Dummy {f00=0x011d, f01=0x0190, f02=» P* ' P XIF ' P* ' P* ' $ P* ' . P IFT SALCUZ=1 ' 8 P* ' N & PDAMU01 EQU DAMI01+1 OUTPUT CHLC 1 ' X PDAMU02 EQU DAMI02+1 ' P* ' P XIF ' P EJECT ' P* ' P* ' $ P* BSC MASTER CONFIGURATION TABLE ' P* ' P
0x383ba8…383d3c Dummy {f00=0x011d, f01=0x0190, f02=» LINE 1 ' f P IFF HILINO=1 ( P DATA DW8104,DW8103 ( & P IFF HILINO=2 ( B P DATA DW8106,DW8105 ( X P IFF HILINO=3 ( t P DATA DW8108,DW8107 ( P IFF HILINO=4 ( P DATA DW8110,DW8109 ( P IFF HILINO=5 ( P DATA DW8112,DW8111 (
0x383d3c…383ed0 Dummy {f00=0x011d, f01=0x0190, f02=»,DW8117 ( P IFF HILINO=9 ) P DATA DW8120,DW8119 ) & P IFF HILINO=10 ) B P DATA DW8122,DW8121 ) X P IFF HILINO=11 ) t P DATA DW8124,DW8123 ) P XIF ) PDWMTE EQU * ) P* ) P* ) P EJECT ) P* ) P* ) " P************
0x383ed0…384064 Dummy {f00=0x011d, f01=0x0190, f02=»************************* ) P* * " P IFF LINE01=0 * , P* * B P* * L 8 P* DEVICE WORK TABLE FOR LINE 01, OUTPUT AND CONTROL * V P* * P* * PDW8102 EQU * TABLE ENTRY * P DATA DAMU01 DEVICE ADDRESS * 2 P DATA /8000 STATUS , /8000 MEA
0x384064…3841f8 Dummy {f00=0x011d, f01=0x0190, f02=»RESS * $ P DATA 0 WAIT/ACTIVATE INDICATOR + & P DATA 0 TASK QUEUE FOR THIS DEVICE + 4 P IFT MMUPAG=1 + ^ P DATA 0 ADDRESS OF USER ECB + t & P DATA MECB02 ADDRESS OF DRIVER ECB + P XIF + P IFT MLIN01=1 + P DATA 0 TIMER POINTER + " P DATA
0x3841f8…38438c Dummy {f00=0x011d, f01=0x0190, f02=»ESS + t " P DATA DW8101 INPUT DWT ADDRESS , P DATA 0 SAVE AREA FOR A8 , 2 P DATA 0 CU 6857 I/O IND , R P DATA 0 RETRY COUNTER , r P DATA 0 BCC COUNTER , P DATA 0 ACK COUNTER , P DATA 0 PACT , P DATA 0 PINACT , P EJECT , * P DATA LI
0x38438c…384520 Dummy {f00=0x011d, f01=0x0190, f02=»02,0,0,0,0 DRIVER ECB , ~ ( PDCBF02 RES TBUFL+1 OUTPUT MMU-BUFFER - P XIF - J P IFT MLIN01=1 - V P EJECT - l P* - z P* - * P* DEVICE WORK TABLE FOR LINE 01, INPUT - P* - P* - PDW8101 EQU * TABLE ENTRY - P DATA DAMI01 DEVICE ADDR
0x384520…3846b4 (5, 593) Dummy {f00=0x011e, f01=0x0190, f02=» TO ADDRESS BLOCK - | P DATA 0 TTAB ADDRESS . $ P DATA 0 WAIT/ACTIVATE INDICATOR . 6 & P DATA 0 TASK QUEUE FOR THIS DEVICE . ^ P IFT MMUPAG=1 . P DATA 0 ADDRESS OF USER ECB . P DATA MECB01 DRIVER ECB . P XIF . P IFF LINE01=0 . P DAT
0x3846b4…384848 Dummy {f00=0x011e, f01=0x0190, f02=» $ P DATA DW8102 OUTPUT DWT ADDRESS / " P DATA DW8101 INPUT DWT ADDRESS / , P DATA 0 SAVE AREA FOR A8 / R P DATA 0 CU 6857 I/O IND / r P IFT MMUPAG=1 / , PMECB01 DATA 0,DCBF01,0,0,0,0 DRIVER ECB / ( PDCBF01 RES TBUFL+1 INPUT MMU BUFFER / P XIF
0x384848…3849dc Dummy {f00=0x011e, f01=0x0190, f02=»* / PDW8104 EQU * TABLE ENTRY 0 P DATA DAMU02 DEVICE ADDRESS 0 * 2 P DATA /8000 STATUS , /8000 MEANS DEVICE READY 0 N P DATA 0 ECB ADDRESS 0 P DATA 0 ORDER 0 * P DATA DRMUAD POINTER TO ADDRESS BLOCK 0 P DATA 0 TTAB ADDRESS 0 $ P DATA 0
0x3849dc…384b70 Dummy {f00=0x011e, f01=0x018e, f02=»A MECB04 DRIVER ECB 0 P XIF 1 P IFT MLIN02=1 1 ( P DATA 0 TIMER POINTER 1 > " P DATA 0 ACTIVITY TIMER POINTER 1 & P DATA 0,0,0,0,0,0 SUBROUTINE STACK 1 P RES 3 SAVE AREA FOR A3-A5 1 $ P DATA DW8104 OUTPUT DWT ADDRESS 1 " P DATA DW8103 INPUT
0x384b70…384d04 Dummy {f00=0x011e, f01=0x0190, f02=» 1 z P DATA 0 ACK COUNTER 2 P DATA 0 PACT 2 $ P DATA 0 PINACT 2 8 P DATA LINE02+LINE02 2 N P RES LINE02 2 j P DATA /FFFF 2 ~ P IFT MMUPAG=1 2 , PMECB04 DATA 0,DCBF04,0,0,0,0 DRIVER ECB 2 ( PDCBF04 RES TBUFL+1 OUTPUT MMU BUFFER 2 P XIF
0x384d04…384e98 Dummy {f00=0x011e, f01=0x0190, f02=» PDW8103 EQU * TABLE ENTRY 3 P DATA DAMI02 DEVICE ADDRESS 3 $ 2 P DATA /8000 STATUS , /8000 MEANS DEVICE READY 3 H P DATA 0 ECB ADDRESS 3 ~ P DATA 0 ORDER 3 * P DATA DRMIAD POINTER TO ADDRESS BLOCK 3 P DATA 0 TTAB ADDRESS 3 $ P DATA 0 WAIT/A
0x384e98…38502c Dummy {f00=0x011e, f01=0x0190, f02=»03 DRIVER ECB 3 P XIF 4 P IFT MLIN02=1 4 " P DATA 0 TIMER POINTER 4 8 " P DATA 0 ACTIVITY TIMER POINTER 4 V & P DATA 0,0,0,0,0,0 SUBROUTINE STACK 4 | P RES 3 SAVE AREA FOR A3-A5 4 $ P DATA DW8104 OUTPUT DWT ADDRESS 4 " P DATA DW8103 INPUT DWT A
0x38502c…3851c0 Dummy {f00=0x011e, f01=0x0190, f02=»ECB 4 l & PDCBF03 RES TBUFL+1 INPUT MMUBUFFER 5 P XIF 5 6 P IFT MLIN03=1 5 B P EJECT 5 X P* 5 f P* 5 p 8 P* DEVICE WORK TABLE FOR LINE 03, OUTPUT AND CONTROL 5 z P* 5 P* 5 PDW8106 EQU * TABLE ENTRY 5 P DATA DAMU03 DEVICE ADDRESS 5
0x3851c0…385354 (5, 594) Dummy {f00=0x011e, f01=0x0190, f02=»DRESS BLOCK 5 v P DATA 0 TTAB ADDRESS 6 $ P DATA 0 WAIT/ACTIVATE INDICATOR 6 0 & P DATA 0 TASK QUEUE FOR THIS DEVICE 6 X P IFT MMUPAG=1 6 P DATA 0 USER ECB 6 P DATA MECB06 6 P XIF 6 P IFT MLIN03=1 6 P DATA 0 TIMER POINTER 6 " P DAT
0x385354…3854e8 Dummy {f00=0x011e, f01=0x0190, f02=»DRESS 6 v " P DATA DW8105 INPUT DWT ADDRESS 7 P DATA 0 SAVE AREA FOR A8 7 4 P DATA 0 CU 6857 I/O IND 7 T P DATA 0 RETRY COUNTER 7 t P DATA 0 BCC COUNTER 7 P DATA 0 ACK COUNTER 7 P DATA 0 PACT 7 P DATA 0 PINACT 7 P DATA LINE03+LINE03
0x3854e8…38567c Dummy {f00=0x011e, f01=0x0190, f02=» OUTPUT MMU BUFFER 7 ~ P XIF 8 P IFT MLIN03=1 8 & P* 8 < P EJECT 8 F P* 8 T P* 8 ^ * P* DEVICE WORK TABLE FOR LINE 03, INPUT 8 h P* 8 P* 8 PDW8105 EQU * TABLE ENTRY 8 P DATA DAMI03 DEVICE ADDRESS 8 2 P DATA /8000 STATUS , /8000
0x38567c…385810 Dummy {f00=0x011e, f01=0x0190, f02=» ADDRESS 8 $ P DATA 0 WAIT/ACTIVATE INDICATOR 9 & P DATA 0 TASK QUEUE FOR THIS DEVICE 9 8 P IFT MMUPAG=1 9 b P DATA 0 USER ECB 9 x P DATA MECB05 DRIVER ECB 9 P XIF 9 P IFT MLIN03=1 9 P DATA 0 TIMER POINTER 9 " P DATA 0 ACTIVITY TIMER P
0x385810…3859a4 Dummy {f00=0x011e, f01=0x0190, f02=»DW8105 INPUT DWT ADDRESS 9 P DATA 0 SAVE AREA FOR A8 : P DATA 0 CU 6857 I/O IND : @ P IFT MMUPAG=1 : ` , PMECB05 DATA 0,DCBF05,0,0,0,0 DRIVER ECB : v PDCBF05 RES TBUFL+1 : P XIF : P IFT MLIN04=1 : P EJECT : P* : P* : 8 P* DE
0x3859a4…385b38 Dummy {f00=0x011e, f01=0x0190, f02=» : t 2 P DATA /8000 STATUS , /8000 MEANS DEVICE READY ; P DATA 0 ECB ADDRESS ; > P DATA 0 ORDER ; Z * P DATA DRMUAD POINTER TO ADDRESS BLOCK ; p P DATA 0 TTAB ADDRESS ; $ P DATA 0 WAIT/ACTIVATE INDICATOR ; & P DATA 0 TASK QUEUE FOR THIS DEVICE ;
0x385b38…385ccc Dummy {f00=0x011e, f01=0x018e, f02=»TIMER POINTER ; " P DATA 0 ACTIVITY TIMER POINTER < & P DATA 0,0,0,0,0,0 SUBROUTINE STACK < < P RES 3 SAVE AREA FOR A3-A5 < f $ P DATA DW8108 OUTPUT DWT ADDRESS < " P DATA DW8107 INPUT DWT ADDRESS < P DATA 0 SAVE AREA FOR A8 < P DATA 0 CU 6857 I/
0x385ccc…385e60 Dummy {f00=0x011e, f01=0x018e, f02=» < P DATA LINE04+LINE04 = P RES LINE04 = $ P DATA /FFFF = 8 P IFT MMUPAG=1 = L , PMECB08 DATA 0,DCBF08,0,0,0,0 DRIVER ECB = b ( PDCBF08 RES TBUFL+1 OUTPUT MMU BUFFER = P XIF = P IFT MLIN04=1 = P* = P EJECT = P* = P* =
0x385e60…385ff4 (5, 595) Dummy {f00=0x011e, f01=0x0190, f02=» 2 P DATA /8000 STATUS , /8000 MEANS DEVICE READY > P DATA 0 ECB ADDRESS > : P DATA 0 ORDER > V * P DATA DRMIAD POINTER TO ADDRESS BLOCK > l P DATA 0 TTAB ADDRESS > $ P DATA 0 WAIT/ACTIVATE INDICATOR > & P DATA 0 TASK QUEUE FOR THIS DEVICE > P
0x385ff4…386188 Dummy {f00=0x011e, f01=0x018e, f02=»R > | " P DATA 0 ACTIVITY TIMER POINTER ? & P DATA 0,0,0,0,0,0 SUBROUTINE STACK ? 0 P RES 3 SAVE AREA FOR A3-A5 ? Z $ P DATA DW8108 OUTPUT DWT ADDRESS ? | " P DATA DW8107 INPUT DWT ADDRESS ? P DATA 0 SAVE AREA FOR A8 ? P DATA 0 CU 6857 I/O IND ? ,
0x386188…38631c Dummy {f00=0x011e, f01=0x0190, f02=» ? P* @ P* @ 8 P* DEVICE WORK TABLE FOR LINE 05, OUTPUT AND CONTROL @ P* @ X P* @ b PDW8110 EQU * TABLE ENTRY @ l P DATA DAMU05 DEVICE ADDRESS @ 2 P DATA /8000 STATUS , /8000 MEANS DEVICE READY @ P DATA 0 ECB ADDRESS @ P DATA
0x38631c…3864b0 Dummy {f00=0x011e, f01=0x018e, f02=»0 TASK QUEUE FOR THIS DEVICE @ P IFT MMUPAG=1 A $ P DATA 0 USER ECB A : P DATA MECB10 DRIVER ECB A R P XIF A r P IFT MLIN05=1 A ~ P DATA 0 TIMER POINTER A " P DATA 0 ACTIVITY TIMER POINTER A & P DATA 0,0,0,0,0,0 SUBROUTINE STACK A P RES 3
0x3864b0…386644 Dummy {f00=0x011e, f01=0x0190, f02=» P DATA 0 CU 6857 I/O IND B P DATA 0 RETRY COUNTER B $ P DATA 0 BCC COUNTER B B P DATA 0 ACK COUNTER B ^ P DATA 0 PACT B z P DATA 0 PINACT B P DATA LINE05+LINE05 B P RES LINE05 B P DATA /FFFF B P IFT MMUPAG=1 B , PMECB10 DAT
0x386644…3867d8 Dummy {f00=0x011e, f01=0x0190, f02=» P* C P* C * P* DEVICE WORK TABLE FOR LINE 05, INPUT C P* C F P* C P PDW8109 EQU * TABLE ENTRY C Z P DATA DAMI05 DEVICE ADDRESS C z 2 P DATA /8000 STATUS , /8000 MEANS DEVICE READY C P DATA 0 ECB ADDRESS C P DATA 0 ORDER C * P D
0x3867d8…38696c Dummy {f00=0x011e, f01=0x0190, f02=»HIS DEVICE C x P IFT MMUPAG=1 D P DATA 0 USER ECB D ( P DATA MECB09 DRIVER ECB D @ P XIF D ` P IFT MLIN05=1 D l P DATA 0 TIMER POINTER D " P DATA 0 ACTIVITY TIMER POINTER D & P DATA 0,0,0,0,0,0 SUBROUTINE STACK D P RES 3 SAVE AREA FOR A3-
0x38696c…386b00 Dummy {f00=0x011e, f01=0x0190, f02=»I/O IND D P IFT MMUPAG=1 E , PMECB09 DATA 0,DCBF09,0,0,0,0 DRIVER ECB E & ( PDCBF09 RES TBUFL+1 MMU BUFFER INPUT E V P XIF E P IFT MLIN06=1 E P EJECT E P* E P* E 8 P* DEVICE WORK TABLE FOR LINE 06, OUTPUT AND CONTROL E P* E
0x386b00…386c94 (5, 596) Dummy {f00=0x011e, f01=0x0190, f02=» DATA 0 ECB ADDRESS E P DATA 0 ORDER F * P DATA DRMUAD POINTER TO ADDRESS BLOCK F 2 P DATA 0 TTAB ADDRESS F ` $ P DATA 0 WAIT/ACTIVATE INDICATOR F | & P DATA 0 TASK QUEUE FOR THIS DEVICE F P IFT MMUPAG=1 F P DATA 0 USER ECB F P DATA MECB12
0x386c94…386e28 Dummy {f00=0x011e, f01=0x0190, f02=»0,0 SUBROUTINE STACK F P RES 3 SAVE AREA FOR A3-A5 G $ P DATA DW8112 OUTPUT DWT ADDRESS G > " P DATA DW8111 INPUT DWT ADDRESS G f P DATA 0 SAVE AREA FOR A8 G P DATA 0 CU 6857 I/O IND G P DATA 0 RETRY COUNTER G P DATA 0 BCC COUNTER G P D
0x386e28…386fbc Dummy {f00=0x011e, f01=0x0190, f02=»MECB12 DATA 00,DCBF12,0,0,0,0 DRIVER ECB G PDCBF12 RES TBUFL+1 H 0 P XIF H J P IFT MLIN06=1 H V P* H l P EJECT H v P* H P* H * P* DEVICE WORK TABLE FOR LINE 06, INPUT H P* H P* H PDW8111 EQU * TABLE ENTRY H P DATA DAMI06 D
0x386fbc…387150 Dummy {f00=0x011e, f01=0x018e, f02=»AD POINTER TO ADDRESS BLOCK H P DATA 0 TTAB ADDRESS I $ $ P DATA 0 WAIT/ACTIVATE INDICATOR I @ & P DATA 0 TASK QUEUE FOR THIS DEVICE I h P IFT MMUPAG=1 I P DATA 0 USER ECB I P DATA MECB11 DRIVER ECB I P XIF I P IFT MLIN06=1 I P DATA
0x387150…3872e4 Dummy {f00=0x011e, f01=0x0190, f02=» $ P DATA DW8112 OUTPUT DWT ADDRESS J " P DATA DW8111 INPUT DWT ADDRESS J , P DATA 0 SAVE AREA FOR A8 J R P DATA 0 CU 6857 I/O IND J r P IFT MMUPAG=1 J , PMECB11 DATA 0,DCBF11,0,0,0,0 DRIVER ECB J ( PDCBF11 RES TBUFL+1 MMU BUFFER INPUT J P XIF
0x3872e4…387478 Dummy {f00=0x011e, f01=0x0190, f02=» J PDW8114 EQU * TABLE ENTRY K P DATA DAMU07 DEVICE ADDRESS K ( 2 P DATA /8000 STATUS , /8000 MEANS DEVICE READY K L P DATA 0 ECB ADDRESS K P DATA 0 ORDER K * P DATA DRMUAD POINTER TO ADDRESS BLOCK K P DATA 0 TTAB ADDRESS K $ P DATA 0 WA
0x387478…38760c Dummy {f00=0x011e, f01=0x0190, f02=»R ECB K ~ P XIF L P IFT MLIN07=1 L P DATA 0 TIMER POINTER L 2 " P DATA 0 ACTIVITY TIMER POINTER L P & P DATA 0,0,0,0,0,0 SUBROUTINE STACK L v P RES 3 SAVE AREA FOR A3-A5 L $ P DATA DW8114 OUTPUT DWT ADDRESS L " P DATA DW8113 INPUT DWT ADDRESS
0x38760c…3877a0 Dummy {f00=0x011e, f01=0x0190, f02=»0 ACK COUNTER L P DATA 0 PACT M P DATA 0 PINACT M * P DATA LINE07+LINE07 M @ P RES LINE07 M P DATA /FFFF M p P IFT MMUPAG=1 M , PMECB14 DATA 0,DCBF14,0,0,0,0 DRIVER ECB M PDCBF14 RES TBUFL+1 M P XIF M P IFT MLIN07=1 M P*
0x3877a0…387934 (5, 597) Dummy {f00=0x011f, f01=0x0190, f02=» P DATA DAMI07 DEVICE ADDRESS N 2 P DATA /8000 STATUS , /8000 MEANS DEVICE READY N ( P DATA 0 ECB ADDRESS N ^ P DATA 0 ORDER N z * P DATA DRMIAD POINTER TO ADDRESS BLOCK N P DATA 0 TTAB ADDRESS N $ P DATA 0 WAIT/ACTIVATE INDICATOR N & P DATA
0x387934…387ac8 Dummy {f00=0x011f, f01=0x0190, f02=»7=1 N P DATA 0 TIMER POINTER O " P DATA 0 ACTIVITY TIMER POINTER O * & P DATA 0,0,0,0,0,0 SUBROUTINE STACK O P P RES 3 SAVE AREA FOR A3-A5 O z $ P DATA DW8114 OUTPUT DWT ADDRESS O " P DATA DW8113 INPUT DWT ADDRESS O P DATA 0 SAVE AREA FOR A8 O
0x387ac8…387c5c Dummy {f00=0x011f, f01=0x018e, f02=»PUT O p P XIF P P IFT MLIN08=1 P P EJECT P . P* P < P* P F 8 P* DEVICE WORK TABLE FOR LINE 08, OUTPUT AND CONTROL P P P* P P* P PDW8116 EQU * TABLE ENTRY P P DATA DAMU08 DEVICE ADDRESS P 2 P DATA /8000 STATUS , /8000 MEANS DEV
0x387c5c…387df0 Dummy {f00=0x011f, f01=0x0190, f02=» P z $ P DATA 0 WAIT/ACTIVATE INDICATOR Q & P DATA 0 TASK QUEUE FOR THIS DEVICE Q 0 P IFT MMUPAG=1 Q Z P DATA 0 USER ECB Q p P DATA MECB16 DRIVER ECB Q P XIF Q P IFT MLIN08=1 Q P DATA 0 TIMER POINTER Q " P DATA 0 ACTIVITY TIMER POINTER Q
0x387df0…387f84 Dummy {f00=0x011f, f01=0x0190, f02=»NPUT DWT ADDRESS Q P DATA 0 SAVE AREA FOR A8 R P DATA 0 CU 6857 I/O IND R 8 P DATA 0 RETRY COUNTER R X P DATA 0 BCC COUNTER R v P DATA 0 ACK COUNTER R P DATA 0 PACT R P DATA 0 PINACT R P DATA LINE08+LINE08 R P RES LINE08 R P
0x387f84…388118 Dummy {f00=0x011f, f01=0x0190, f02=»IF R P IFT MLIN08=1 S P* S P EJECT S * P* S 8 P* S B * P* DEVICE WORK TABLE FOR LINE 08, INPUT S L P* S z P* S PDW8115 EQU * TABLE ENTRY S P DATA DAMI08 DEVICE ADDRESS S 2 P DATA /8000 STATUS , /8000 MEANS DEVICE READY S P
0x388118…3882ac Dummy {f00=0x011f, f01=0x0190, f02=»/ACTIVATE INDICATOR S & P DATA 0 TASK QUEUE FOR THIS DEVICE T P IFT MMUPAG=1 T F P DATA 0 USER ECB T P DATA MECB15 DRIVER ECB T t P XIF T P IFT MLIN08=1 T P DATA 0 TIMER POINTER T " P DATA 0 ACTIVITY TIMER POINTER T & P DATA 0,0,0,0,
0x3882ac…388440 Dummy {f00=0x011f, f01=0x0190, f02=» P DATA 0 SAVE AREA FOR A8 U P DATA 0 CU 6857 I/O IND U $ P IFT MMUPAG=1 U D , PMECB15 DATA 0,DCBF15,0,0,0,0 DRIVER ECB U Z ( PDCBF15 RES TBUFL+1 MMU BUFFER INPUT U P XIF U P IFT MLIN09=1 U P EJECT U P* U P* U 8 P* DEVICE WORK
0x388440…3885d4 (5, 598) Dummy {f00=0x011f, f01=0x0190, f02=»ATA /8000 STATUS , /8000 MEANS DEVICE READY U P DATA 0 ECB ADDRESS V 4 P DATA 0 ORDER V P * P DATA DRMUAD POINTER TO ADDRESS BLOCK V f P DATA 0 TTAB ADDRESS V $ P DATA 0 WAIT/ACTIVATE INDICATOR V & P DATA 0 TASK QUEUE FOR THIS DEVICE V P IFT M
0x3885d4…388768 Dummy {f00=0x011f, f01=0x0190, f02=» DATA 0 ACTIVITY TIMER POINTER V & P DATA 0,0,0,0,0,0 SUBROUTINE STACK W & P RES 3 SAVE AREA FOR A3-A5 W P $ P DATA DW8118 OUTPUT DWT ADDRESS W r " P DATA DW8117 INPUT DWT ADDRESS W P DATA 0 SAVE AREA FOR A8 W P DATA 0 CU 6857 I/O IND W P DATA 0
0x388768…3888fc Dummy {f00=0x011f, f01=0x0190, f02=»E09 W P RES LINE09 X P DATA /FFFF X P IFT MMUPAG=1 X 4 , PMECB18 DATA 0,DCBF18,0,0,0,0 DRIVER ECB X J ( PDCBF18 RES TBUFL+1 MMUBUFFER OUTPUT X z P XIF X P IFT MLIN09=1 X P* X P EJECT X P* X P* X * P* DEVICE WORK TABLE
0x3888fc…388a90 Dummy {f00=0x011f, f01=0x0190, f02=»8000 MEANS DEVICE READY X z P DATA 0 ECB ADDRESS Y P DATA 0 ORDER Y < * P DATA DRMIAD POINTER TO ADDRESS BLOCK Y R P DATA 0 TTAB ADDRESS Y $ P DATA 0 WAIT/ACTIVATE INDICATOR Y & P DATA 0 TASK QUEUE FOR THIS DEVICE Y P IFT MMUPAG=1 Y P DAT
0x388a90…388c24 Dummy {f00=0x011f, f01=0x0190, f02=»ER POINTER Y | & P DATA 0,0,0,0,0,0 SUBROUTINE STACK Z P RES 3 SAVE AREA FOR A3-A5 Z < $ P DATA DW8118 OUTPUT DWT ADDRESS Z ^ " P DATA DW8117 INPUT DWT ADDRESS Z P DATA 0 SAVE AREA FOR A8 Z P DATA 0 CU 6857 I/O IND Z P IFT MMUPAG=1 Z , PMECB17
0x388c24…388db8 Dummy {f00=0x011f, f01=0x0190, f02=» Z P* [ 8 P* DEVICE WORK TABLE FOR LINE 10, OUTPUT AND CONTROL [ P* [ N P* [ X PDW8120 EQU * TABLE ENTRY [ b P DATA DAMU10 DEVICE ADDRESS [ 2 P DATA /8000 STATUS , /8000 MEANS DEVICE READY [ P DATA 0 ECB ADDRESS [ P DATA 0 ORDER [
0x388db8…388f4c Dummy {f00=0x011f, f01=0x0190, f02=»UE FOR THIS DEVICE [ P IFT MMUPAG=1 P DATA 0 USER ECB 0 P DATA MECB20 DRIVER ECB H P XIF h P IFT MLIN10=1 t P DATA 0 TIMER POINTER " P DATA 0 ACTIVITY TIMER POINTER & P DATA 0,0,0,0,0,0 SUBROUTINE STACK P RES 3 SAVE AREA
0x388f4c…3890e0 Dummy {f00=0x011f, f01=0x018e, f02=»CU 6857 I/O IND P DATA 0 RETRY COUNTER ] P DATA 0 BCC COUNTER ] 6 P DATA 0 ACK COUNTER ] R P DATA 0 PACT ] n P DATA 0 PINACT ] P DATA LINE10+LINE10 ] P RES LINE10 ] P DATA /FFFF ] P IFT MMUPAG=1 ] , PMECB20 DATA 0,DCBF20,0
0x3890e0…389274 (5, 599) Dummy {f00=0x011f, f01=0x0190, f02=» P* ^ * P* DEVICE WORK TABLE FOR LINE 10, INPUT ^ P* ^ < P* ^ F PDW8119 EQU * TABLE ENTRY ^ P P DATA DAMI10 DEVICE ADDRESS ^ p 2 P DATA /8000 STATUS , /8000 MEANS DEVICE READY ^ P DATA 0 ECB ADDRESS ^ P DATA 0 ORDER ^ * P DATA DRMIAD
0x389274…389408 Dummy {f00=0x011f, f01=0x018e, f02=» ^ n P IFT MMUPAG=1 _ P DATA 0 USER ECB _ P DATA MECB19 DRIVER ECB _ 6 P XIF _ V P IFT MLIN10=1 _ b P DATA 0 TIMER POINTER _ x " P DATA 0 ACTIVITY TIMER POINTER _ & P DATA 0,0,0,0,0,0 SUBROUTINE STACK _ P RES 3 SAVE AREA FOR A3-A5 _ $ P
0x389408…38959c Dummy {f00=0x011f, f01=0x0190, f02=» _ v P IFT MMUPAG=1 ` , PMECB19 DATA 0,DCBF19,0,0,0,0 DRIVER ECB ` ( PDCBF19 RES TBUFL+1 MMU BUFFER INPUT ` N P XIF ` z P IFT MLIN11=1 ` P EJECT ` P* ` P* ` 8 P* DEVICE WORK TABLE FOR LINE 11, OUTPUT AND CONTROL ` P* ` P* `
0x38959c…389730 Dummy {f00=0x011f, f01=0x0190, f02=»ECB ADDRESS ` P DATA 0 ORDER a * P DATA DRMUAD POINTER TO ADDRESS BLOCK a * P DATA 0 TTAB ADDRESS a X $ P DATA 0 WAIT/ACTIVATE INDICATOR a t & P DATA 0 TASK QUEUE FOR THIS DEVICE a P IFT MMUPAG=1 a P DATA 0 USER ECB a P DATA MECB22 DRIVER
0x389730…3898c4 Dummy {f00=0x011f, f01=0x0190, f02=»OUTINE STACK a z P RES 3 SAVE AREA FOR A3-A5 b $ P DATA DW8122 OUTPUT DWT ADDRESS b 6 " P DATA DW8121 INPUT DWT ADDRESS b ^ P DATA 0 SAVE AREA FOR A8 b P DATA 0 CU 6857 I/O IND b P DATA 0 RETRY COUNTER b P DATA 0 BCC COUNTER b P DATA 0 AC
0x3898c4…389a58 Dummy {f00=0x011f, f01=0x0190, f02=»PAG=1 b , PMECB22 DATA 0,DCBF22,0,0,0,0 DRIVER ECB c ( PDCBF22 RES TBUFL+1 MMUBUFFER OUTPUT c > P XIF c j P IFT MLIN11=1 c v P* c P EJECT c P* c P* c * P* DEVICE WORK TABLE FOR LINE 11, INPUT c P* c P* c PDW8121 EQU * T
0x389a58…389bec Dummy {f00=0x011f, f01=0x0190, f02=» DATA 0 ORDER c * P DATA DRMIAD POINTER TO ADDRESS BLOCK d P DATA 0 TTAB ADDRESS d D $ P DATA 0 WAIT/ACTIVATE INDICATOR d ` & P DATA 0 TASK QUEUE FOR THIS DEVICE d P IFT MMUPAG=1 d P DATA 0 USER ECB d P DATA MECB21 DRIVER ECB d P XIF d
0x389bec…389d80 Dummy {f00=0x011f, f01=0x0190, f02=» RES 3 SAVE AREA FOR A3-A5 d $ P DATA DW8122 OUTPUT DWT ADDRESS e " " P DATA DW8121 INPUT DWT ADDRESS e J P DATA 0 SAVE AREA FOR A8 e p P DATA 0 CU 6857 I/O IND e P IFT MMUPAG=1 e , PMECB21 DATA 0,DCBF21,0,0,0,0 DRIVER ECB e ( PDCBF21 RES TBUFL+1
0x389d80…389f14 (5, 600) Dummy {f00=0x011f, f01=0x0190, f02=»D CONTROL e f P* f P* f PDW8124 EQU * TABLE ENTRY f & P DATA DAMU12 DEVICE ADDRESS f F 2 P DATA /8000 STATUS , /8000 MEANS DEVICE READY f j P DATA 0 ECB ADDRESS f P DATA 0 ORDER f * P DATA DRMUAD POINTER TO ADDRESS BLOCK f P DATA 0
0x389f14…38a0a8 Dummy {f00=0x011f, f01=0x0190, f02=» ECB f P DATA MECB24 DRIVER ECB g P XIF g , P IFT MLIN12=1 g 8 P DATA 0 TIMER POINTER g N " P DATA 0 ACTIVITY TIMER POINTER g l & P DATA 0,0,0,0,0,0 SUBROUTINE STACK g P RES 3 SAVE AREA FOR A3-A5 g $ P DATA DW8124 OUTPUT DWT ADDRESS g " P D
0x38a0a8…38a23c Dummy {f00=0x011f, f01=0x0190, f02=»0 BCC COUNTER g P DATA 0 ACK COUNTER h P DATA 0 PACT h 2 P DATA 0 PINACT h F P DATA LINE12+LINE12 h P RES LINE12 h x P DATA /FFFF h P IFT MMUPAG=1 h , PMECB24 DATA 0,DCBF24,0,0,0,0 DRIVER ECB h ( PDCBF24 RES TBUFL+1 MMU BUFFER OUTP
0x38a23c…38a3d0 Dummy {f00=0x011f, f01=0x0190, f02=» h P* i PDW8123 EQU * TABLE ENTRY i P DATA DAMI12 DEVICE ADDRESS i 2 2 P DATA /8000 STATUS , /8000 MEANS DEVICE READY i V P DATA 0 ECB ADDRESS i P DATA 0 ORDER i * P DATA DRMIAD POINTER TO ADDRESS BLOCK i P DATA 0 TTAB ADDRESS i $ P
0x38a3d0…38a564 Dummy {f00=0x011f, f01=0x0190, f02=»CB23 DRIVER ECB i P XIF j P IFT MLIN12=1 j $ P DATA 0 TIMER POINTER j : " P DATA 0 ACTIVITY TIMER POINTER j X & P DATA 0,0,0,0,0,0 SUBROUTINE STACK j ~ P RES 3 SAVE AREA FOR A3-A5 j $ P DATA DW8124 OUTPUT DWT ADDRESS j " P DATA DW8123 INPUT DWT
0x38a564…38a6f8 Dummy {f00=0x011f, f01=0x0190, f02=»R ECB j n ( PDCBF23 RES TBUFL+1 MMU BUFFER INPUT k P XIF k : P XIF k F P IFF HILINO=12 k R P EJECT k h P* k v P* k P* k P* DUMMY ENTRIES k P* k P* k PDW8123 EQU * k PDW8124 EQU * k PIH8123 EQU * k PIH8124 EQU *
0x38a6f8…38a88c Dummy {f00=0x011f, f01=0x0190, f02=»19 EQU * k PDW8120 EQU * l PIH8119 EQU * l $ PIH8120 EQU * l 8 P IFF HILINO=9 l L PDW8117 EQU * l b PDW8118 EQU * l v PIH8117 EQU * l PIH8118 EQU * l P IFF HILINO=8 l PDW8115 EQU * l PDW8116 EQU * l PIH8115 EQU * l PIH81
0x38a88c…38aa20 Dummy {f00=0x011f, f01=0x0190, f02=» PDW8111 EQU * m PDW8112 EQU * m PIH8111 EQU * m , PIH8112 EQU * m @ P IFF HILINO=5 m T PDW8109 EQU * m j PDW8110 EQU * m ~ PIH8109 EQU * m PIH8110 EQU * m P IFF HILINO=4 m PDW8107 EQU * m PDW8108 EQU * m PIH8107 EQU * m
0x38aa20…38abb4 (5, 601) Dummy {f00=0x0120, f01=0x0190, f02=»O=2 m PDW8103 EQU * n PDW8104 EQU * n PIH8103 EQU * n 4 PIH8104 EQU * n H P ST P,INTSAV n P ABL ILLINT n p P XIF n P EJECT n P n P n P n P n P n P n P n P n P n P* n P* n P* n P* n
0x38abb4…38ad48 Dummy {f00=0x0120, f01=0x0190, f02=» T I O N n v P* o P* o < P******************************************************* o $ < P******************************************************* o d P* o P* o P* o P* o P* o P EJECT o < P************************************
0x38ad48…38aedc Dummy {f00=0x0120, f01=0x0190, f02=»* o P* p P* p P* ACTIVATION BLOCK p P* p 8 P DATA BUFLEN p B P DATA DEVIND p V $ PDRMIAD DATA MIACT DWT REFERENCE p j ( P DATA ABORT ADDRESS OF ABORT ROUTINE p P DATA 0,0 DC:MIN HEADER =2 p P* p P* p PMIACT EQU * p P
0x38aedc…38b070 Dummy {f00=0x0120, f01=0x0190, f02=»* p P* q PRD EQU * q P IFT MMUPAG=1 q $ $ P LD A2,ECBRL,A8 REQUESTED LENGTH q : P CWK A2,BUFLEN SIZE OK? q b " P ABL(G) IL:LEN ILLEGAL LENGTH q P XIF q P LD A1,DWTST,A6 GET STATUS q P LDR A2,A1 q P ANK A1,1 q P RF(NZ) RD400
0x38b070…38b204 Dummy {f00=0x0120, f01=0x018e, f02=»QLOG q P XIF r $ P CF A15,TENDIO COMPLETE REQUEST r PRD300 EQU * r @ P ABL TDISP GO TO DISPATCHER r T PRD400 EQU * r x P LCR A1,A6 r P ANK A1,/40 r P RB(Z) RD300 4-WIRE r P ANK A2,4 r P RB(Z) RD300 r PRD450 EQU * r P
0x38b204…38b398 Dummy {f00=0x0120, f01=0x0190, f02=» P CF A5,HALTIN s * P LDKL A1,CALIND RC: CALLING INDICATOR s P RB RD200 s H P EJECT s Z < P******************************************************* s h P* s " P* OUTPUT AND CONTROL REQUESTS s P* s < P**************************************
0x38b398…38b52c Dummy {f00=0x0120, f01=0x0190, f02=»AD DATA MUACT DWT REFERENCE s P DATA ABORT ABORT ROUTINE t $ P DATA 0,0 DC:MIN HEADER =2 t F P* t h P* t r PMUACT EQU * t | P LDR A7,A7 t $ P RF(Z) TEST ORDER 00, TEST LINE t P SUK A7,6 t P ABL(Z) WRT ORDER 06: WRITE t P SUK A7,
0x38b52c…38b6c0 Dummy {f00=0x0120, f01=0x018e, f02=»(Z) CLIN ORDER 26,HALT POLLING t P SUK A7,1 u & ( P ABL(Z) CLIN ORDER 27, START POLLING u 8 P SUK A7,/37-/27 u d " P ABL(Z) OTC ORDER 37: OPEN TC u | P SUK A7,1 u $ P ABL(Z) WRT150 ORDER 38,CLOSE TC u P RB MIA100 ILLEGAL ORDER u P EJECT u
0x38b6c0…38b854 (5, 602) Dummy {f00=0x0120, f01=0x0190, f02=» " P RB(NZ) RD100 LINE NOT CLOSED v P ABL TST000 v * P EJECT v > P* v L P* v V P* CW = 0 : OPEN LINE v ` P* v | P* v POLIN EQU * v P LD A7,DWTA7,A6 v P LD A1,DWTST,A6 GET STATUS v P ANK A1,1 v & P RB(NZ) RD100 LINE ALREADY
0x38b854…38b9e8 Dummy {f00=0x0120, f01=0x0190, f02=»E POLLIST v ~ P SUK A1,2 w P SUK A2,2 w $ " P RB(NZ) OLI100 NOT END OF LIST w 6 P CM PACT,A6 w P CM PINACT,A6 w p P LD A7,DWTSAV+8,A6 w POLI105 EQU * w P CF A5,HALTIN w P CF A5,STINP CONNECT MODEM w P LDR A1,A6 w P CF A15,SE
0x38b9e8…38bb7c Dummy {f00=0x0120, f01=0x0190, f02=» STATUS INT. OR TIME OUT w P LDR A6,A1 x POLI115 EQU * x 2 P CM DWTTP,A6 x F P LDK A5,STB IF TIME OUT x Z P LD A7,DWTA7,A6 x z P ADR A5,A6 x P CF A5,HALTIN x P ANK A1,1 x & P RF(NZ) OLI160 MODEM NOT OPERABLE x P LD A1,DWTST,A6 x
0x38bb7c…38bd10 Dummy {f00=0x0120, f01=0x0190, f02=»1,DWTST,A7 x P LDK A1,0 y P IFT RQLOGG=1 y $ P CF A15,REQLOG y : P XIF y P $ P CF A15,TENDIO COMPLETE REQUEST y POLI130 EQU * y P LDR A1,A6 y P LDR A4,A6 y P ADK A4,DWTATP y & P CF A15,SETIMP SET ACTIVITY TIMER y P DATA OLI150
0x38bd10…38bea4 Dummy {f00=0x0120, f01=0x0190, f02=» P INH z P LDR A6,A1 z P LD A7,DWTA7,A6 z " P LDK A5,STB z : P ADR A5,A6 z N POLI160 EQU * z ` P CF A5,DISCON z t " P LDK A1,MODNOP RC: MOD NOT OP z P LD A8,DWTECB,A6 z P RF(Z) OLI165 z P CM ECBRC,A8 z P IFT RQLOGG=1 z P
0x38bea4…38c038 Dummy {f00=0x0120, f01=0x018e, f02=» P CM ECBRC,A8 { POLI170 EQU * { P IFT RQLOGG=1 { , P CF A15,REQLOG { B P XIF { X P ABL DISEND { d P* { x P* { & P* CLOSE LINE / HALT POLLING { P* { P* { PCLIN EQU * { P LD A1,DWTST,A6 GET STATUS { P ANK A1,1
0x38c038…38c1cc Dummy {f00=0x0120, f01=0x0190, f02=» P* | P* | POTC EQU * | P LD A7,DWTA7,A6 | * P LD A1,DWTST,A7 GET STATUS | B P LDR A2,A1 | d P ANK A1,1 | v P ABL(Z) RD100 SEQ ERROR | P ANKL A2,/200 | $ P RF(NZ) OTC110 WAITING FOR CALL | P LD A2,ECBCW,A8 GET TCA | P S
0x38c1cc…38c360 Dummy {f00=0x0120, f01=0x0190, f02=»TCA RC : INVALID ADDRESS | P RB OLI170 } POTC110 EQU * } 2 * P LDKL A1,CALIND RC: CALLING INDICATOR } F P RB OLI170 } t P EJECT } P* } P* } P* ORDER 06 : WRITE } P* } P* } PWRT EQU * } P IFT MMUPAG=1 } & P LD A2,ECB
0x38c360…38c4f4 (5, 603) Dummy {f00=0x0120, f01=0x0190, f02=»C* A2,ECBBA,A8 TCA } PWRT105 EQU * ~ P LD A1,DWTST,A6 ~ . P ANK A1,1 ~ F P ABL(Z) RD100 SEQ ERROR ~ X P ANK A2,/7F ~ x 0 P CF A15,FINDTC SEARCH FOR TCA IN POLLINGLIST ~ " P RF(P) WRT130 TC NOT IN P-LIST ~ P RF(N) WRT110 TCA INACTIVE ~ * P
0x38c4f4…38c688 Dummy {f00=0x0120, f01=0x0190, f02=»LLIST ~ p P LD A1,DWTOR,A6 P ANK A1,/FF & P SUK A1,/38 : P RB(Z) WRT107 N " P LDK A1,TCINAC RC: TC INACTIVE d PWRT120 EQU * P IFT RQLOGG=1 P CF A15,REQLOG P XIF P ABL DISEND PWRT130 EQU * * P LDKL A1,T
0x38c688…38c81c Dummy {f00=0x0120, f01=0x0190, f02=» P LD A2,ECBCW,A8 TCA P RB WRT105 N P************************************************************************** 2 P* P* ILLEGAL LENGTH P* N P************************************************************************* PIL:LEN
0x38c81c…38c9b0 Dummy {f00=0x0120, f01=0x0190, f02=»********************************* h P* * P* ABORT ROUTINE 4 P* L L P************************************************************************ V PABORT EQU * P LD A1,DWTTP TIMER POINTER " P RF(Z) AB:10 NO TIMER RUNNING P CM* D
0x38c9b0…38cb44 Dummy {f00=0x0120, f01=0x0190, f02=»A15,4 P ABR* A15 P XIF P IFF CPU852=1 , P RTN A15 B P XIF R P EJECT ^ P* l < P******************************************************* v < P******************************************************* P* P* *
0x38cb44…38ccd8 Dummy {f00=0x0120, f01=0x018e, f02=»*************************************************** P* < PDC81ON EQU * F P INH Z P LD A3,DWMTAB TABLE LENGTH f PDRM000 EQU * P SUK A3,2 P RF(Z) DRM300 END ODF TABLE P LD A6,DWMTAB,A3 DWT ADDRESS P IFT SALCUZ=1
0x38ccd8…38ce6c Dummy {f00=0x0120, f01=0x0190, f02=» P RF(Z) DRM200 LINE CLOSED P ANK A4,/10 & P RF(NZ) DRM250 OUTPUT DWT : PDRM100 EQU * INPUT DWT P ANKL A1,/8000 z P RB(NZ) DRM000 NO REQUEST P LD A8,DWTECB,A6 P LD A2,ECBEL,A8 . P RB(Z) DRM000 NO COMPLETE MESSAGE RECE
0x38ce6c…38d000 Dummy {f00=0x0120, f01=0x0190, f02=»M200 EQU * P ANK A4,/10 P RB(Z) DRM000 INPUT DWT & P ANKL A1,/8000 F P RB(NZ) DRM000 NO RQUEST P LD A1,DWTOR,A6 GET ORDER | P ANK A1,/FF P SUK A1,/22 P RB(NZ) DRM000 PDRM250 EQU * P LDK A5,STB P LD
0x38d000…38d194 (5, 604) Dummy {f00=0x0120, f01=0x0190, f02=» P DATA TIMMRY P ST A4,DWTTP,A6 P RB DRM000 4 PDRM300 RTN A15 F P* P* REOPEN LINE f P* | PDRM400 EQU * P LDR A6,A1 P LD A7,DWTA7,A6 P CM DWTTP,A6 P LDK A5,STB P ADR A5,A6 P ABL OLI10
0x38d194…38d328 Dummy {f00=0x0120, f01=0x0190, f02=»***************************** v P* & P* 0 0 P* P R O C E D U R E C O N T R O L P A R T : P* n P* x < P******************************************************* < P******************************************************* P*
0x38d328…38d4bc Dummy {f00=0x0120, f01=0x0190, f02=»***************************************** $ PBMM000 EQU * ENTRY AFTER TENDIO 2 P LDKL A1,TDISP Z P STR A1,A15 p P LDKL A1,/C040 P STR A1,A15 P SUKL A15,16 ( PBMM010 EQU * RESTART ACTIVITY TIMER P LDKL A1,-TIMACT P S
0x38d4bc…38d650 Dummy {f00=0x0120, f01=0x0190, f02=»TROL REQUEST t PBMM100 EQU * $ P LD A1,DWTST,A7 GET INPUT STATUS ( P ABL(NN) POLL READ REQUEST P 2 PBMM200 EQU * ENTRY AFTER ACTIVITY WITHOUT I/O r P CF A5,STOUT P LDK A2,PAD P CF A5,WRITE P RB BMM010 P EJECT P*
0x38d650…38d7e4 Dummy {f00=0x0120, f01=0x0190, f02=»,DWTECB,A6 GET ECB ADDRESS . P ST A8,DWTA8,A6 LOAD A8 INTERUPT REGISTERS " P ST A8,DWTA8,A7 T P LD A1,DWTOR,A6 GET ORDER l P ANK A1,/FF P SUK A1,6 $ P ABL(Z) SELECT ORDER 06 : WRITE P SUK A1,/24-6 ( P RF(Z) OUT400 ORDER 24
0x38d7e4…38d978 Dummy {f00=0x0120, f01=0x0190, f02=»LLING p P SUK A1,/10 $ P RF(Z) OUT100 ORDER 37 : OPEN TC " P* J P* T P* ORDER 38 : CLOSE TC ^ P* | P* ( P LC A3,DWTOR,A6 GET INDEX IN POLLIST P ANK A3,/FF P ADR A3,A6 P CM PLIST,A3 DELETE TCA P RF OU
0x38d978…38db0c Dummy {f00=0x0120, f01=0x0190, f02=»A2,ECBCW,A8 GET TCA . P CF A15,FINDTC CHECK IF IT'S ALREADY THERE P RF(P) OUT105 TCA NOT FOUND N " P RF OUT300 TC ALLREADY IN LIST r POUT105 EQU * P LDK A2,0 4 P CF A15,FINDTC SEARCH EMPTY PLACE IN POLLINGLIST P RF(Z) OUT110
0x38db0c…38dca0 Dummy {f00=0x0120, f01=0x0190, f02=»6 SAVE INDEX IN POLLIST P LD A1,ECBCW,A8 GET TCA " P ORKL A1,/8000 SET TC INACTIVE @ ( P STR A1,A3 INSERT TCA IN POLLINGLIST f P ANK A1,/7F P LDKL A2,RTYLIM ( P ST A2,DWTRTY,A6 RESET RETRY COUNTER P IFF BDA=1 ( P ORK A1,/20
0x38dca0…38de34 (5, 605) Dummy {f00=0x0121, f01=0x0190, f02=»DK A4,/20 STA & P CF A5,SEPOSE SEND SELECT SEQUENCE 6 P CF A5,READTO WAIT FOR REPLY WITH TIME SUPERVISION @ P LDR A2,A2 z P RF(N) OUT130 POUT125 EQU * P CF A5,READP 0 P RB(NN) OUT125 WAIT FOR END OF TRANSMISSION , P CF A5,HAL
0x38de34…38dfc8 Dummy {f00=0x0121, f01=0x0190, f02=»X IN POLLIST x P ANK A2,/FF P ADR A2,A6 ( P ADK A2,PLIST : P STR A3,A2 SET TC ACTIVE P P LD A1,PACT,A6 p $ P RF(NZ) OUT300 NOT FIRST IN LIST P ST A2,PACT,A6 P RF OUT300 POUT130 EQU * P CF A5,HALTIN HALT INPUT (
0x38dfc8…38e15c Dummy {f00=0x0121, f01=0x0190, f02=»50 NOT FIRST IN LIST ( P LC A2,DWTOR,A6 GET INDEX IN POLLIST P ANK A2,/FF H P ADR A2,A6 P ADK A2,PLIST n P ST A2,PINACT,A6 POUT150 EQU * 0 P LDK A1,TCINAC SET RETURN CODE : TC INACTIVE P RF OUT310 P EJECT P*
0x38e15c…38e2f0 Dummy {f00=0x0121, f01=0x0190, f02=»POLLING | " P LDKL A1,POLHLT RC:POLL HALTED P LDR A6,A7 6 P IFT RQLOGG=1 H P CF A15,REQLOG ^ P XIF t " P LDK A1,COMPLT RC = COMPLETED P CF A15,TENDIO P LD A6,DWTA6,A7 RELOAD A6 POUT300 EQU * P LDK A1,COMPLT RC = CO
0x38e2f0…38e484 Dummy {f00=0x0121, f01=0x0190, f02=»MM000 P* P* POUT350 EQU * START POLLING " P LD A1,DWTST,A7 D P ANK A1,2 , P RB(Z) OUT300 POLLING ALLREADY PERMITTED n P XRS A1,DWTST,A7 P RB OUT300 P EJECT P* P* $ P* ORDER /24 : CLOSE LIN
0x38e484…38e618 Dummy {f00=0x0121, f01=0x0190, f02=»G=1 P CF A15,REQLOG P XIF " P CF A15,TENDIO . P LDKL A1,LINSTE D P LDR A6,A7 P IFT RQLOGG=1 n P CF A15,REQLOG P XIF P ABL DISEND P EJECT P* P* P* P* < P************************
0x38e618…38e7ac Dummy {f00=0x0121, f01=0x0190, f02=»D U R E T R A N S F E R P A R T P* * P* 4 < P******************************************************* > < P******************************************************* ~ P* P* " P* POLL : PERFORM READ REQUEST P* P*
0x38e7ac…38e940 Dummy {f00=0x0121, f01=0x0190, f02=»TIME P DATA POLL10,DELAY P ST A4,DWTTP,A7 & P ABL READ10 > . PPOLL10 EQU * COMPLETE READREQ AFTER DELAY R P LDR A7,A1 RELOAD A7 P LD A6,DWTA6,A7 RELOAD A6 P CM DWTTP,A7 P LDK A5,STB P ADR A5,A6 P LD A8,DWTEC
0x38e940…38ead4 (5, 606) Dummy {f00=0x0121, f01=0x0190, f02=» ST A8,DWTA8,A6 P ST A8,DWTA8,A7 P CM ECBRC,A8 0 P CM ECBEL,A8 D P LD A1,PACT,A6 X ( P RF(Z) POL130 NO ACTIVE TCA PRESENT n PPOL110 EQU * P ADK A1,2 P LDR* A3,A1 GET NEXT TCA P RB(Z) POL110 EMPTY PLACE " P RF(NN
0x38ead4…38ec68 Dummy {f00=0x0121, f01=0x0190, f02=» P ST A1,PACT,A6 UPDATE 'PACT' PPOL130 EQU * ( P LD A1,PINACT,A6 < * P ABL(Z) BMM200 NO INACTIVE TC PRESENT T PPOL132 EQU * P ADK A1,2 NEXT POS IN LIST P CW A1,PINACT,A6 P RF(E) POL134 LIST SCANNED P LDR* A3,A1 " P R
0x38ec68…38edfc Dummy {f00=0x0121, f01=0x0190, f02=» ADR A1,A6 P RB POL132 PPOL134 EQU * $ P LDR* A3,A1 8 $ P RF(N) POL140 INACTIVE TC FOUND L ( P CM PINACT,A6 NO INACTIVE TC IN LIST t P ABL BMM200 PPOL138 EQU * P SUK A3,1 PPOL140 EQU * $ P ST A1,PINACT,A6 UPPDATE P
0x38edfc…38ef90 Dummy {f00=0x0121, f01=0x0190, f02=» PPOL150 EQU * P ST A1,PACT,A6 UPPDATE PACT P LDK A1,0 < & P SC A1,DWTOR,A7 INDICATE ACTIVE TC N P LDKL A2,RTYLIM x " PPOL200 EQU * INITIATE POLLING ( P ST A2,DWTRTY,A6 RESET RETRYCOUNTER P SC* A3,ECBBA,A8 SC*ORE TCA P I
0x38ef90…38f124 Dummy {f00=0x0121, f01=0x0190, f02=» EQU * $ P CF A5,SEPOSE SEND POLL SEQUENCE PPOL212 EQU * 6 P CF A5,READTO WAIT FOR REPLY J P LDR A2,A2 n P RF(NN) POL230 PPOL215 EQU * P CF A5,HALTIN P ANK A1,1 & P ABL(NZ) OLI160 MODEM NOT OPERABLE P IM DWTRTY,A
0x38f124…38f2b8 Dummy {f00=0x0121, f01=0x0190, f02=»M010 TC ALLREADY INACTIVE P LC* A3,ECBBA,A8 " P ANK A3,/7F : " P ORKL A3,/8000 SET TC INACTIVE N P ST* A3,PACT,A6 t P LD A2,PINACT,A6 P RF(NZ) POL224 P LD A1,PACT,A6 P ST A1,PINACT,A6 PPOL224 EQU * 0 P LDK A1,TCIN
0x38f2b8…38f44c Dummy {f00=0x0121, f01=0x0190, f02=»F A15,TENDIO END READ REQ P LD A6,DWTA6,A7 RESTORE A6 " P ABL BMM000 D PPOL230 EQU * X P CWK A2,STX l P RF(E) MIP STX RECEIVED P CWK A2,EOT P RF(E) POL240 PPOL235 EQU * & P CF A5,READP WAIT FOR CARRIER DOWN P
0x38f44c…38f5e0 Dummy {f00=0x0121, f01=0x0190, f02=»QU * P LC* A3,ECBBA,A8 P ANK A3,/7F MASK TCA $ $ P ST* A3,PINACT,A6 SET TC ACTIVE @ P LD A3,PACT,A6 h P RF(NZ) POL250 ~ P LD A1,PINACT,A6 P ST A1,PACT,A6 PPOL250 EQU * P LDKL A1,TCACT RC: TC ACTIVE P RB POL225
0x38f5e0…38f774 (5, 607) Dummy {f00=0x0121, f01=0x018e, f02=»,DWTRTY,A6 RESET RETRY COUNTER PMIP050 EQU * & P LDK A4,2 BUFFER POINTER : $ P CM DWTACK,A6 RESET ACK COUNTER Z $ P CM DWTBCC,A6 RESET BCC COUNTER P CF A5,READP READ TCA $ P RF(NZ) MIP110 SST OR PAR ERROR P XRS A2,DWTBCC,A6
0x38f774…38f908 Dummy {f00=0x0121, f01=0x0190, f02=» P RF(N) MIP130 SST P RF(NZ) MIP110 PARITY ERROR P CWK A2,SYN B P RB(E) MIP100 SKIP SYN V $ P XRS A2,DWTBCC,A6 CALCULATE BCC t P CWK A2,ETB P RF(E) MIP210 ETB RECEIVED P CWK A2,ETX P ABL(E) MIP220 ETX RECEIVED
0x38f908…38fa9c Dummy {f00=0x0121, f01=0x0190, f02=»00 P CF A5,READ P RF(N) MIP130 P XRS A2,DWTBCC,A6 4 P CWK A2,ETX N P RF(E) MIP220 b . PMIP110 EQU * PARITY ERROR, BUFFER OVERFLOW x 4 P CF A5,READP WAIT FOR END OF TRANSMISSION BLOCK " P RF(N) MIP130 STATUS INTERRUPT P
0x38fa9c…38fc30 Dummy {f00=0x0121, f01=0x0190, f02=»F A5,READ READ BCC PMIP130 EQU * & P LDK A3,0 INDICATE BLOCK RECOVERY . PMIP135 EQU * X P CF A5,HALTIN l P IM DWTRTY,A6 ( P RF(NL) MIP200 RETRY LIMIT OVERFLOW P CF A5,WRNAK SEND NAK P LDKL A2,RETRAN 0 P ORS A2,ECBRC,
0x38fc30…38fdc4 Dummy {f00=0x0121, f01=0x0190, f02=» CWK A2,ENQ P RB(E) MIP135 PMIP145 EQU * * P CWK A2,EOT > P ABL(E) POL240 EOT RECEIVED R P LDR A2,A2 v P RF(N) MIP155 TIME OUT PMIP150 EQU * P CF A5,READP 0 P RB(NN) MIP150 WAIT FOR END OF TRANSMISSION P LDKL
0x38fdc4…38ff58 Dummy {f00=0x0121, f01=0x0190, f02=»,A6 ( P RF(NL) MIP200 RETRY LIMIT OVERFLOW P CF A5,WRENQ SEND ENQ 8 P RB MIP140 V PMIP160 EQU * h P LDR A3,A3 | & P RB(NZ) MIP105 RECEIVE NEXT BLOCK P SUKL A4,MAXTBL P RB(N) MIP050 1:ST BLOCK P SUK A4,1 P RB(E)
0x38ff58…3900ec Dummy {f00=0x0121, f01=0x0190, f02=»1 PMIP170 EQU * P ADKL A4,MAXTBL P SUK A1,1 6 P RB(P) MIP170 H P CM DWTBCC,A6 ^ P RB MIP100 t PMIP200 EQU * P CF A5,WREOT SEND EOT P CM ECBRC,A8 P CW A4,ECBRL,A8 " P RF(G) MIP260 BUFFER OVERFLOW
0x3900ec…390280 Dummy {f00=0x0121, f01=0x0190, f02=»WTBCC,A6 P RB(NE) MIP130 BCC ERROR P CM DWTBCC,A6 0 P CF A5,HALTIN HALT INPUT F P CF A5,WRACK SEND ACK 0/1 f P LDKL A1,RTYLIM ( P ST A1,DWTRTY,A6 RESET RETRY COUNTER PMIP215 EQU * P CF A5,REDLTS P CWK A2,STX
0x390280…390414 (5, 608) Dummy {f00=0x0121, f01=0x0190, f02=»DWTRTY,A6 P RB(NL) MIP200 P CF A5,WRACK ( P RB MIP215 < PMIP220 EQU * N P CF A5,READP READ BCC b P RB(NZ) MIP130 PARITY ERROR P CW A2,DWTBCC,A6 P RB(NE) MIP130 BCC ERROR PMIP225 EQU * P CF A5,HALTIN HALT INPUT
0x390414…3905a8 Dummy {f00=0x0121, f01=0x0190, f02=»2,A2 & P RF(N) MIP230 TIMEOUT HAS OCCURRED P CWK A2,ENQ 6 P RF(NE) MIP240 J $ P LDK A1,1 ENQ HAS BEEN RECEIVED ` * P XRS A1,DWTACK,A6 INCREASE ACK COUNTER P LDKL A2,RETRAN 0 P ORS A2,ECBRC,A8 PRELOAD RC: RETRANSMISSION P IM DW
0x3905a8…39073c Dummy {f00=0x0121, f01=0x018e, f02=» CF A5,WREOT SEND EOT PMIP240 EQU * P LDK A1,0 2 P LD A2,DWTOR,A7 D $ P ABL(NN) POL225 TC NOT INACTIVE P ABL POL245 SET TC ACTIVE PMIP260 EQU * BUFFER OVERFLOw P CM ECBRC,A8 ( P LDK A1,INCLEN RC: INCORRECT LENGTH
0x39073c…3908d0 Dummy {f00=0x0121, f01=0x0190, f02=» P LD A1,DWTST,A6 P ANK A1,4 P RF(NZ) SEL160 TC BUSY . P LDKL A1,RTYLIM L ( P ST A1,DWTRTY,A6 RESET RETRY COUNTER d PSEL100 EQU * & P LD A4,ECBBA,A8 GET BUFFER ADDRESS P LCR A3,A4 GET TCA P IFF BDA=1 P ORK A3,/20 MO
0x3908d0…390a64 Dummy {f00=0x0121, f01=0x0190, f02=»EPOSE SEND SELECTSEQUENCE P CF A5,READTO WAIT FOR REPLY " P LDR A2,A2 F P RF(NN) SEL120 X P CF A5,HALTIN n P ANK A1,1 P ABL(NZ) OLI160 MOD NOT OP PSEL110 EQU * " P IM DWTRTY,A6 RECEIVE TIMEOUT 0 P RB(N) SEL100 LIMIT NO
0x390a64…390bf8 Dummy {f00=0x0121, f01=0x0190, f02=»OGG=1 P CF A15,REQLOG P XIF $ * P CF A15,TENDIO COMPLETE WRITE REQUEST 0 P LC* A3,ECBBA,A8 ^ P ANK A3,/7F v ( P LC A2,DWTOR,A6 GET INDEX IN POLLIST P ANK A2,/FF P ADR A2,A6 P ADK A2,PLIST " P ORKL A3,/8000 SET TC
0x390bf8…390d8c Dummy {f00=0x0121, f01=0x018e, f02=»0 PSEL120 EQU * P CWK A2,DLE P RB(NE) SEL110 INVALID REPLY 2 " P CF A5,READ GET NEXT CHARACTER V P CF A5,HALTIN | P CWK A2,PAR:0 P RF(E) MUT ACK 0 RECEIVED P CWK A2,SEMIKO P RB(NE) SEL110 INVALID REPLY PSEL1
0x390d8c…390f20 Dummy {f00=0x0121, f01=0x0190, f02=» P DATA SEL150,BSYTIM P ST A4,DWTTP,A6 P ABL BMM100 8 " PSEL150 EQU * TC BUSY TIME OUT L P LDR A6,A1 r P LDK A5,STB P ADR A5,A6 P LD A7,DWTA7,A6 $ P CM DWTTP,A6 CLEAR TIMER POINTER P LDK A1,4 & P ORS A1,DWTS
0x390f20…3910b4 (5, 609) Dummy {f00=0x0122, f01=0x0190, f02=» RESET STATUS P LDKL A1,TCBUSY RC: TC BUSY P IFT RQLOGG=1 : P CF A15,REQLOG P P XIF f * P CF A15,TENDIO COMPLETE WRITE REQUEST r P CF A5,WREOT SEND EOT P ABL BMM000 P EJECT P* P* P* MUT : MESSAGE OUTP
0x3910b4…391248 Dummy {f00=0x0122, f01=0x0190, f02=»MUT000 EQU * $ P CM DWTACK,A6 RESET ACK COUNTER P LDK A3,3 BUFFER INDEX < P ST A3,ECBEL,A8 Z P AD A3,ECBBA,A8 r PMUT100 EQU * P LDKL A1,RTYLIM ( P ST A1,DWTRTY,A6 RESET RETRY COUNTER PMUT110 EQU * $ P CM DWTBCC,A6 RESE
0x391248…3913dc Dummy {f00=0x0122, f01=0x0190, f02=»SET CHARACTER COUNTER PMUT120 EQU * P LD A1,ECBEL,A8 2 P CW A1,ECBRL,A8 J ( P RF(E) MUT150 END OF MESSAGE REACHED b P CWK A4,MAXTBL 4 P RF(E) MUT140 END OF TRANSMISSION BLOCK REACHED P LCR A2,A3 P IM ECBEL,A8 P ADK A
0x3913dc…391570 Dummy {f00=0x0122, f01=0x0190, f02=»F(E) MUT135 PMUT130 EQU * ( P XRS A2,DWTBCC,A6 UPDATE BCC COUNTER ( $ P CF A5,WRITEP SEND ONE CHARACTER T P RB MUT120 | PMUT135 EQU * ( P LDK A1,CODERR RC: CODE CHECK ERROR P ORS A1,ECBRC,A8 * P LDK A2,/20 REPLACE ILLEGAL CHARAC
0x391570…391704 Dummy {f00=0x0122, f01=0x0190, f02=»QU * P XRS A2,DWTBCC,A6 UPDATE BCC P CF A5,WRITE SEND ETB / ETX 0 P LD A2,DWTBCC,A6 T P CF A5,WRITEP SEND BCC l P LDK A2,PAD P CF A5,WRITE SEND PAD P LDK A1,1 * P XRS A1,DWTACK,A6 INCREASE ACK COUNTER " P CF A5,HALTU
0x391704…391898 Dummy {f00=0x0122, f01=0x0190, f02=»IME OUT, UNDEFINED REPLY P CF A5,HALTIN P LDKL A1,RETRAN 6 0 P ORS A1,ECBRC,A8 PRELOAD RC: RETRANSMISSION N P IM DWTRTY,A6 ( P ABL(NL) SEL115 RETRY LIMIT OVERFLOW P CF A5,WRENQ SEND ENQ P RB MUT170 PMUT190 EQU * P
0x391898…391a2c Dummy {f00=0x0122, f01=0x0190, f02=»UT250 WACK P LD A1,DWTACK,A6 P RF(Z) MUT210 * P CWK A2,'1' @ P RB(NE) MUT180 T & PMUT200 EQU * CORRECT ACKK RECEIVED j P LD A1,ECBEL,A8 P CW A1,ECBRL,A8 & P RB(NE) MUT100 NOT END OF MESSAGE " PMUT205 EQU * TRANSFER COMP
0x391a2c…391bc0 Dummy {f00=0x0122, f01=0x0190, f02=»ETE WRITE REQUEST | P ABL BMM000 PMUT210 EQU * . P CWK A2,PAR:0 B P RB(E) MUT200 ACK 0 RECEIVED X P RB MUT180 | PMUT220 EQU * P CF A5,HALTIN P CWK A2,NAK P RF(NE) MUT230 $ PMUT225 EQU * NAK OR ENQ RECEIVED
0x391bc0…391d54 (5, 610) Dummy {f00=0x0122, f01=0x0190, f02=»3,A4 P ADS A4,ECBEL,A8 P LDKL A1,RETRAN $ P ORS A1,ECBRC,A8 < P ABL MUT110 T PMUT230 EQU * h P CWK A2,ENQ | P RB(E) MUT225 ENQ RECEIVED P RB MUT180 PMUT250 EQU * WACK RECEIVED P LD A1,ECBEL,A8 P CW A1,ECB
0x391d54…391ee8 Dummy {f00=0x0122, f01=0x0190, f02=»END POLL OR SELECT SEQUENCE P* $ $ P* ON ENTRY A3 CONTAINS TCA (S/P) . $ P* A4 CONTAINS STA / GP V P* ~ P* 0 PSEPOSE CF A5,WRSYN START OUTPUT AND SEND SYN P LDK A2,EOT P CF A5,WRITE SEND EOT P LDK A2,PAD
0x391ee8…39207c Dummy {f00=0x0122, f01=0x0190, f02=» CF A5,WRITEP P LDR A2,A4 P CF A5,WRITEP SEND STA / GP ( P LDR A2,A4 L P CF A5,WRITEP ^ P LDK A2,ENQ t P CF A5,WRITE SEND ENQ P LDK A2,PAD P CF A5,WRITE P LDK A2,PAD P CF A5,WRITE " P CF A5,HALTUT TERM
0x39207c…392210 Dummy {f00=0x0122, f01=0x018e, f02=»UNIT INFO n P* PCINIT EQU * ( P CM DWTST1,A6 CLEAR I/O ACTIVE IND. 0 ( P ADKL A15,4 INCREMENT STACK POINTER P ABR* A15 RETURN TO CALLER P XIF P EJECT P* P* $ P* START TRANSMITTER AND SEND SYN P*
0x392210…3923a4 Dummy {f00=0x0122, f01=0x0190, f02=» d P ST A2,SYNCON,A7 PWRSY20 EQU * P LDK A2,SYN 4 P CF A5,WRITE H P IM SYNCON,A7 P RB(NZ) WRSY20 r P RTN A5 P EJECT P* P* P* WREOT : SEND SINGLE EOT P* P* PWREOT EQU * * P CF
0x3923a4…392538 Dummy {f00=0x0122, f01=0x018e, f02=»A5,WRITE SEND PAD P LDK A2,PAD P CF A5,WRITE . " P CF A5,HALTUT TERMINATE OUTPUT B P RTN A5 h P* x P* P* WRENQ : SEND SINGLE ENQ P* P* PWRENQ EQU * * P CF A5,WRSYN START OUTPUT AND SEND SYN P LDK
0x392538…3926cc Dummy {f00=0x0122, f01=0x0190, f02=» P* PWRNAK EQU * * P CF A5,WRSYN START OUTPUT AND SEND SYN & P LDK A2,NAK T P CF A5,WRITE SEND NAK h P RB WRE10 P* P* " P* WRACK : SEND ACK-0 OR ACK-1 P* P* PWRACK EQU * * P CF A5,WRSYN S
0x3926cc…392860 Dummy {f00=0x0122, f01=0x0190, f02=»ER l P LD A2,DWTACK,A6 P RF(NZ) WRA10 " P LDK A2,PAR:0 8 P RF WRA20 N PWRA10 EQU * ` P LDK A2,'1' t PWRA20 EQU * P CF A5,WRITE SEND '0' OR '1' P RB WRE10 P EJECT P* P* * P* STINP : CONNECT MO
0x392860…3929f4 (5, 611) Dummy {f00=0x0122, f01=0x0190, f02=» IFF SALCUZ=1 P LDR* A1,A7 P ADR* A1,P * P CIO A2,1,0 < P LDKL A2,/100+SYN P P EXR A1 j . P ABL(NA) SST055 HW NOT PRESENT OR ERRONEUS z P RTN A5 P XIF P IFT SALCUZ=1 P LDK A2,PARITY DEF.PARITY P LDR* A1
0x3929f4…392b88 Dummy {f00=0x0122, f01=0x0190, f02=»R. l P LDK A2,SYN P LDR* A1,A7 GET OTR INST. P ADR* A1,P @ P OTR A2,1,0 R P EXR A1 f * P ABL(NA) SST055 HW NOT PRESENT OR ERE. v $ P ST A1,DWTST1,A7 SET I/P ACTIVE P RTN A5 P XIF P* P* P* STOUT : ST
0x392b88…392d1c Dummy {f00=0x0122, f01=0x0190, f02=»FF SALCUZ=1 P LDR* A1,A6 P ADR* A1,P ( P CIO A2,1,0 : P EXR A1 N P RF(NA) STOU10 ^ P RF WRI200 t PSTOU10 EQU * P RTN A5 P XIF P IFT SALCUZ=1 * P LD A1,DWTST1,A6 O/P ALREADY ACTIVE ? P RF(NZ) STOUT3
0x392d1c…392eb0 Dummy {f00=0x0122, f01=0x0190, f02=»ARITY x P RF(A) STOUT2 ACCEPTED P LDR* A1,A6 NOT ACC. , P ADR* A1,P H P SST A2,0 Z P EXR A1 CHECK SST l P RF(A) STOUT1 P HLT PSTOUT1 EQU * P LDK A2,PARITY RETRY CIO P LDR* A1,A6 P ADR* A1,P P CIO A
0x392eb0…393044 Dummy {f00=0x0122, f01=0x0190, f02=»TR A2,1,0 OTR SYN P EXR A1 P RF(NA) STOUT3 NOT ACCEPTED * $ P ST A1,DWTST1,A6 SET O/P ACTIVE N $ P RF WRI200 ACCEPTED WAIT FOR INT v PSTOUT3 EQU * P RTN A5 P XIF P EJECT P* P* P* DISCON : DISCONNECT
0x393044…3931d8 Dummy {f00=0x0122, f01=0x0190, f02=» P ADR* A1,P P IFF SALCUZ=1 P CIO A2,1,0 0 P XIF D P IFT SALCUZ=1 R P CIO A2,0,0 h P XIF ~ P LDK A2,CBDISC DISCONNECT P EXR A1 PDISC05 EQU * P LD A1,DWTATP,A6 P RF(Z) DISC10 P CM* DWT
0x3931d8…39336c Dummy {f00=0x0122, f01=0x0190, f02=» PDISC20 EQU * P LD A1,DWTTP,A7 P RF(Z) DISC30 4 P CM* DWTTP,A7 J P CM DWTTP,A7 ` PDISC30 EQU * t P RTN A5 P* P* P* HALTIN : HALT LINE INPUT P* P* PHALTIN EQU * P ST A2,DWTST1,A7 S
0x39336c…393500 Dummy {f00=0x0122, f01=0x0190, f02=»:= SST INSTR P EXR A1 P LDR A1,A2 $ P LD A2,DWTST1,A7 RELOAD A2 8 $ P CM DWTST1,A7 CLEAAR I/P ACTIVE Z P RTN A5 P* P* P* HALTUT : HALT LINE OUTPUT P* P* PHALTUT EQU * P IFT SALCUZ=1 P
0x393500…393694 (5, 612) Dummy {f00=0x0122, f01=0x0190, f02=» " P LD A1,DWTST1,A6 O/P ACTIVE ? & P RF(Z) HALTU1 NO NO INTERRUPT THEN . $ P CF A5,WRI200 WAIT FOR INTERRUPT X PHALTU1 EQU * P XIF P LDR* A1,A6 P ADR* A1,P P SST A2,0 P EXR A1 P IFT SALCUZ=1 & P CM
0x393694…393828 Dummy {f00=0x0122, f01=0x0190, f02=»D CHARACTER n P* P* PWRITEP EQU * ( P ANK A2,/7F < P LC A2,PARTAB,A2 P P* h P* r $ P* WRITE : TRANSMIT ONE CHARACTER | P* P* PWRITE EQU * " P LDR* A1,A6 GET DEVICE ADDRESS P ADR* A1,P P OTR
0x393828…3939bc Dummy {f00=0x0122, f01=0x0190, f02=»WTSAV,A6 P ST A4,DWTSAV+2,A6 P ST A5,DWTSAV+4,A6 * P RF READ10 D PWRI300 EQU * V P LDR* A1,A6 j P ADR* A1,P ~ P SST A1,0 P EXR A1 P IFT SALCUZ=1 ( P CM DWTST1,A6 CLEAR O/P ACTIVE FLAG P XIF ( P ANK A
0x3939bc…393b50 Dummy {f00=0x0122, f01=0x0190, f02=»B P ADR A5,A6 P ABL BMM RESTART REQUEST P EJECT < P* J P* T * P* READTO : READ WITH TIME SUPERVISION ^ " P* FOR 2-/4-WIRE LINE P* P* PREADTO EQU * P ST A4,DWTSAV+2,A7 P LDR A1,A7 & P C
0x393b50…393ce4 Dummy {f00=0x0122, f01=0x0190, f02=» l P LD A4,DWTSAV+2,A7 PRESYNC EQU * RESYNCRONIZE " P IFT SALCUZ=1 D " P CF A5,HALTIN STOP I/P BEFORE Z P XIF P CF A5,STINP PRES20 EQU * P CF A5,READ WAIT FOR SYN P LDR A2,A2 " P RB(N) RESYNC STATUS INTERRUPT
0x393ce4…393e78 Dummy {f00=0x0122, f01=0x0190, f02=»TN A5 P EJECT PRET040 EQU * TIME OUT ENTRY P LDR A7,A1 @ P CM DWTTP,A7 R P LDK A5,4 f P ADS A5,DWTA5,A7 x P LDKL A2,/8000 PRETO50 EQU * P ABL IHI200 P* P P* . P* REDLTS: READ WITH LONG TIME
0x393e78…39400c Dummy {f00=0x0122, f01=0x0190, f02=» | P RB READT0 P EJECT P* ( P* 2 . P* READP : READ CHARACTER AND CHECK PARITY < * P* ON PARITY ERROR CR POSITIVE n P* P* PREADP EQU * P CF A5,READ READ CHARACTER P ADK A5,4 P LDR A2,A2 "
0x39400c…3941a0 Dummy {f00=0x0122, f01=0x0190, f02=»A5 PREADP1 ADK A1,1 P RB REDRET " P EJECT 4 P* B P* READ : SAVE REGISTER A3-A5 L 2 P* RELOAD REGISTER A1-A8 FROM A15 STACK p * P* RETURN TO INTERRUPTED PROGRAM P* PREAD EQU * P ST A3,DWTSAV,A7 P
0x3941a0…394334 (5, 613) Dummy {f00=0x0123, f01=0x018e, f02=»DR* A7,A15 P LDR* A6,A15 P LDR* A5,A15 & P LDR* A4,A15 : P LDR* A3,A15 N P LDR* A2,A15 b P LDR* A1,A15 v P XIF P IFF CPU852=1 P MLR 8,A15 P XIF P RTN A15 P EJECT P* P* SAVE 8 REG ON STAC
0x394334…3944c8 Dummy {f00=0x0123, f01=0x0190, f02=» P STR A6,A15 P STR A7,A15 P STR A8,A15 0 P LD A2,16,A15 D P ST A1,16,A15 Z P ABR A2 p P XIF P IFF CPU852=1 P ST A8,-10,A15 P LD A8,4,A15 P ADKL A15,4 P MSR 7,A15 P SUKL A15,2 P
0x3944c8…39465c Dummy {f00=0x0123, f01=0x018e, f02=», CHLC RECEIVER | P* < P******************************************************* " P* b P* l P* v PIH8101 EQU * P ST P,INTSAV P CF A15,SAVER P LDKL A7,DW8101 , P INR A2,0,DAMI01 GET CHARACTER FROM LINR P A
0x39465c…3947f0 Dummy {f00=0x0123, f01=0x018e, f02=» P LD A4,DWTSAV+2,A7 P LD A5,DWTSAV+4,A7 P LD A6,DWTA6,A7 8 P LD A8,DWTA8,A7 P P RTN A5 h P IFF HILINO=1 x P EJECT P* P* P* PIH8103 EQU * P ST P,INTSAV P CF A15,SAVER P LDKL A7,DW8103
0x3947f0…394984 Dummy {f00=0x0123, f01=0x018e, f02=» P* P* PIH8105 EQU * P ST P,INTSAV 0 P CF A15,SAVER D P LDKL A7,DW8105 Z , P INR A2,0,DAMI03 GET CHARACTER FROM LINE r P RB(A) IHI100 P ABL SSTIN P IFF HILINO=3 P EJECT P* P* P*
0x394984…394b18 Dummy {f00=0x0123, f01=0x0190, f02=» P RB(A) IHI100 P RF SSTIN P IFF HILINO=4 , P EJECT B P* P P* Z P* d PIH8109 EQU * n P ST P,INTSAV P CF A15,SAVER P LDKL A7,DW8109 , P INR A2,0,DAMI05 GET CHARACTER FROM LINE P RB(A) IHI100
0x394b18…394cac Dummy {f00=0x0123, f01=0x0190, f02=»VER P LDKL A7,DW8111 , P INR A2,0,DAMI06 GET CHARACTER FROM LINE $ P RB(A) IHI100 T P RF SSTIN j P IFF HILINO=6 | P EJECT P* P* P* PIH8113 EQU * P ST P,INTSAV P CF A15,SAVER P LDKL A7,DW8
0x394cac…394e40 Dummy {f00=0x0123, f01=0x0190, f02=»* P* P* PIH8115 EQU * P ST P,INTSAV 2 P CF A15,SAVER F P LDKL A7,DW8115 , P INR A2,0,DAMI08 GET CHARACTER FROM LINE t P RB(A) IHI100 P RF SSTIN P IFF HILINO=8 P EJECT P* P* P*
0x394e40…394fd4 (5, 614) Dummy {f00=0x0123, f01=0x0190, f02=» P ABL(A) IHI100 P RF SSTIN P IFF HILINO=9 , P EJECT B P* P P* Z P* d PIH8119 EQU * n P ST P,INTSAV P CF A15,SAVER P LDKL A7,DW8119 , P INR A2,0,DAMI10 GET CHARACTER FROM LINE P ABL(A) IHI100
0x394fd4…395168 Dummy {f00=0x0123, f01=0x0190, f02=»VER P LDKL A7,DW8121 , P INR A2,0,DAMI11 GET CHARACTER FROM LINE $ P ABL(A) IHI100 T P RF SSTIN j P IFF HILINO=11 | P EJECT P* P* P* PIH8123 EQU * P ST P,INTSAV P CF A15,SAVER P LDKL A7,DW8
0x395168…3952fc Dummy {f00=0x0123, f01=0x018e, f02=»********************************************* P* 6 . P* STATUS INTERRUPT HANDLER , CHLC RECEIVER @ P* r < P******************************************************* | P* P* P* PSSTIN EQU * P LD A6,DWTA6,A7 P L
0x3952fc…395490 Dummy {f00=0x0123, f01=0x0190, f02=» P RF(NZ) SST030 P IFF SALCUZ=1 P LDR* A1,A7 4 P ADR* A1,P H P CIO A2,1,0 Z P LDKL A2,/116 n P EXR A1 START INPUT P XIF P ABL READ10 PSST030 EQU * P ANK A1,SBCARR CARRIER OFF ? P RF(NZ) SST69A Y
0x395490…395624 Dummy {f00=0x0123, f01=0x0190, f02=» t P XIF " P IM TPCONT,A7 COUNT TP ERRORS P LD A1,DWTTP,A7 < P RF(Z) SST040 T P CM* DWTTP,A7 j P CM DWTTP,A7 PSST040 EQU * P LDK A5,STB P ADR A5,A6 P ABL BMM RESTART REQUEST PSST050 EQU * P LDR A
0x395624…3957b8 Dummy {f00=0x0123, f01=0x018e, f02=»CON PSST65 EQU * P IFT SALCUZ=1 ( P CM DWTST1,A7 CLEAR I/P ACTIVE FLAG 6 P XIF b * P LDK A1,MODNOP RC: MODEM NOT OPERABLE p P LD A8,DWTECB,A6 P RF(Z) SST067 P CM ECBRC,A8 P IFT RQLOGG=1 P CF A15,REQLOG
0x3957b8…39594c Dummy {f00=0x0123, f01=0x0190, f02=» P IFT RQLOGG=1 P CF A15,REQLOG P XIF 4 PSST069 EQU * @ P ABL DISEND T PSST69A EQU * h P IFT SALCUZ=1 | " P LD A1,DWTST1,A7 GET I/O IND. " P ABL(Z) TDISP INACTIV GO TDISP P XIF PSST070 EQU * 2 P ORKL A2
0x39594c…395ae0 Dummy {f00=0x0123, f01=0x0190, f02=» X P* * P* INTERRUPT HANDLER , CHLC TRANSMITTER P* @ < P******************************************************* J P* P* P* PIH8102 EQU * P ST P,INTSAV P CF A15,SAVER P LDKL A6,DW8102 PIHU100 EQU
0x395ae0…395c74 (5, 615) Dummy {f00=0x0123, f01=0x0190, f02=»TN A5 P IFF HILINO=1 P EJECT $ P* 2 P* < P* F PIH8104 EQU * P P ST P,INTSAV d P CF A15,SAVER x P LDKL A6,DW8104 P RB IHU100 P IFF HILINO=2 P EJECT P* P* P* PIH8106 EQU *
0x395c74…395e08 Dummy {f00=0x0123, f01=0x0190, f02=»* P* PIH8108 EQU * P ST P,INTSAV ( P CF A15,SAVER < P LDKL A6,DW8108 R P RB IHU100 j P IFF HILINO=4 | P EJECT P* P* P* PIH8110 EQU * P ST P,INTSAV P CF A15,SAVER P LDKL A6,DW8
0x395e08…395f9c Dummy {f00=0x0123, f01=0x0190, f02=» CF A15,SAVER P LDKL A6,DW8112 P RB IHU100 . P IFF HILINO=6 @ P EJECT V P* d P* n P* x PIH8114 EQU * P ST P,INTSAV P CF A15,SAVER P LDKL A6,DW8114 P RB IHU100 P IFF HILINO=7 P EJECT
0x395f9c…396130 Dummy {f00=0x0123, f01=0x018e, f02=» P IFF HILINO=8 P EJECT P* ( P* 2 P* < PIH8118 EQU * F P ST P,INTSAV Z P CF A15,SAVER n P LDKL A6,DW8118 P RB IHU100 P IFF HILINO=9 P EJECT P* P* P* PIH8120 EQU * P ST
0x396130…3962c4 Dummy {f00=0x0123, f01=0x0190, f02=» P* PIH8122 EQU * P ST P,INTSAV " P CF A15,SAVER 6 P LDKL A6,DW8122 L P ABL IHU100 d P IFF HILINO=11 x P EJECT P* P* P* PIH8124 EQU * P ST P,INTSAV P CF A15,SAVER P LDKL A6,DW8124
0x3962c4…396458 Dummy {f00=0x0123, f01=0x0190, f02=»* P* A2 CONTAINS TCA AT ENTRY P* , . P* A3 CONTAINS ADDRESS TO FOUND TC AT EXIT 6 , P* A4 CONTAINS INDEX IN LIST TO FOUND TC h P* P* A1 A3 A4 ARE DESTROYED " P* CR = (Z) : ACTIVE TCA FOUND $ P* CR = (N) : INACTIVE TCA FOUND
0x396458…3965ec Dummy {f00=0x0123, f01=0x0190, f02=»INGLIST n P LDR A3,A6 P ADK A3,PLIST " P ADR A3,A4 8 PFIND10 EQU * J P LDR* A1,A3 GET TCA ^ P CWR A1,A2 z " P RF(E) FIND40 ACTIVE TC FOUND P ANK A1,/FF P CWR A1,A2 $ P RF(E) FIND30 INACTIVE TC FOUND P SUK A3,
0x3965ec…396780 Dummy {f00=0x0123, f01=0x0190, f02=» PFIND40 EQU * P ABR* A15 P* . P* 8 PPARTAB EQU * B P* V P NLIST ` @ P DATA /8001,/0283,/0485,/8607,/0889,/8A0B,/8C0D,/0E8F,/1091 n @ P DATA /9213,/9415,/1697,/9819,/1A9B,/1C9D,/9E1F,/20A1,/A223 " P DATA /A425,/26A7,
0x396780…396914 (5, 616) Dummy {f00=0x0123, f01=0x0190, f02=»/4CCD,/CE4F ` @ P DATA /D051,/52D3,/54D5,/D657,/58D9,/DA5B,/DC5D,/5EDF,/E061 @ P DATA /62E3,/64E5,/E667,/68E9,/EA6B,/EC6D,/6EEF,/70F1,/F273 X . P DATA /F475,/76F7,/F879,/7AFB,/7CFD,/FE7F P LIST P EJECT P* P* P* P
0x396914…396aa8 Dummy {f00=0x0123, f01=0x018e, f02=» P* P LDR A1,A6 P CF A15,SETIME P DATA TLTO,TIMACT 6 P ST A4,DWTATP,A6 P P* h P* CONNECT MODEM r P* P LD A7,DWTA7,A6 P ST A8,DWTA8,A7 P CF A5,STINP P LDR A1,A6 P CF A15,SETIME P DATA TE
0x396aa8…396c3c Dummy {f00=0x0123, f01=0x0190, f02=» PTES030 EQU * P CM DWTTP,A6 P LD A7,DWTA7,A6 0 P LD A8,DWTA8,A7 H P LDK A5,STB ` P ADR A5,A6 t P CF A5,HALTIN P ANK A1,1 & P RF(NZ) TES330 MODEM NOT OPERABLE P* & P* START INPUT AND SEND SYNCPATTERN
0x396c3c…396dd0 Dummy {f00=0x0123, f01=0x0190, f02=» RESET BIT ERROR COUNTER P CF A5,STINP P CF A5,WRSYN 4 P* H P* TRANSMITT TEST PATTERN R P* r PTES100 EQU * | ( P LDK A4,0 BIT AND CHARACTER COUNTER " P LDKL A3,/1FF 1:ST SHIFT STATE PTES110 EQU * P LDR A2,A3 P
0x396dd0…396f64 Dummy {f00=0x0123, f01=0x018e, f02=»MPLETE PATTERN TRAMSMITTED P* " PTES150 EQU * , P LDK A2,PAD @ P CF A5,WRITE T P RB TES150 h P EJECT z P* P* P* SYNCRONIZE INPUT P* PREC000 EQU * P CF A5,READ PRECPAT EQU * P LDR A2,A2
0x396f64…3970f8 Dummy {f00=0x0123, f01=0x0190, f02=» ( P LDK A4,0 BIT AND CHARACTER COUNTER " P LDKL A3,/1FF 1:ST SHIFT STATE 4 PTES200 EQU * Z P XRR A2,A3 n P ANK A2,/FF P RF(Z) TES240 NO BIT ERRORS P ECR A2,A2 P LDR A2,A2 P RF(NN) TES220 PTES210 EQU * P I
0x3970f8…39728c Dummy {f00=0x0123, f01=0x0190, f02=» P RF(E) TES300 P CF A5,READ P CF A5,PATGEN . P LDR A2,A2 D P RF(N) TES400 V P RB TES200 l P* ~ P* COMPLETE PATTERN RECEIVED P* PTES300 EQU * P CF A5,HALTIN P LDKL A1,TES320 P ST A1,STB,A6
0x39728c…397420 Dummy {f00=0x0123, f01=0x0190, f02=»OG P XIF P CF A15,TENDIO P CF A5,DISCON , P ABL TDISP B P EJECT T P* b P* TIME OUT l P* ~ PTLTO EQU * P LDR A6,A1 P LD A7,DWTA7,A6 P LD A5,DWTA5,A6 P LDK A1,NORESP P RB TES340 P*
0x397420…3975b4 (5, 617) Dummy {f00=0x0124, f01=0x0190, f02=»TTERN GENERATOR P* P* A3:= CURRENT SHIFT STATE " $ P* A4:= BIT AND CHARACTER COUNTER D P* l PPATGEN EQU * v P LDR A1,A3 P SLL A1,4 P XRR A1,A3 P ANK A1,/10 BIT9 XOR BIT5 P RF(Z) PAT100 P LDKL A1,/200
0x3975b4…397748 Dummy {f00=0x0124, f01=0x018e, f02=» P RB(NZ) PATGEN P RTN A5 P IFT BDA=1 * P EJECT < P* J P* T < P* POLL AND SELECT ADDRESS CONVERTING ROUTINES AND TABLES ^ P* PSELADR EQU * P ANK A3,/7F P SUK A3,/41 P LC A3,SELTAB,A3 P RTN A5
0x397748…3978dc Dummy {f00=0x0124, f01=0x0190, f02=» P DATA /4647 P DATA /4849 P DATA /5B2E 0 P DATA /3C28 D P DATA /2BFF X P* l P* SELECT ADDRESSES v P* PSELTAB EQU * P DATA /2D2F P DATA /5354 P DATA /5556 P DATA /5758 P DATA /595
0x3978dc…397a70 Dummy {f00=0x0124, f01=0x0190, f02=»T LOGG ( P* 1:ST WORD=DEVICE ADDRESS, ORDER P* 2:ND WORD = RETURN CODE : P* 3:RD WORD = TID ^ P* z PREQLOG EQU * P STR A2,A15 P STR A3,A15 P LD A3,REQPEK P LD A2,DWTST,A6 P RF(N) RQLRTN NO REQUEST
0x397a70…397c04 Dummy {f00=0x0124, f01=0x0190, f02=»B,A6 P OR A1,ECBRC,A2 P STR A1,A3 RETURN CODE $ P ADK A3,2 B P LD A2,10,A6 TTAB ADDRESS T P ADK A2,4 v P LDR* A2,A2 TID P STR A2,A3 P ADK A3,2 P CWK A3,ENDLOG P RF(NG) RQLRTN P LDKL A3,REQBUF P
0x397c04…397d98 Dummy {f00=0x0124, f01=0x018e, f02=» P* REQUEST LOGG AREA P* $ ( P* 1:ST WORD=DEVICE ADDRESS, ORDER . P* 2:ND WORD = RETURN CODE Z P* 3:RD WORD = TID ~ P* P* PREQPEK DATA REQBUF PREQBUF RES 300 " PENDLOG DATA /FFFF,/FFFF,/FFFF P XIF
0x397d98…397f2c Dummy {f00=0x0124, f01=0x0190, f02=» P ORKL A2,/C000 P RF LOG PLOGSST EQU * * P ORKL A2,/8000 > PLOGIN EQU * T PLOG EQU * h P LD A1,LOGPNT z P CWK A2,/C000+PAD P RF(E) PADLOG PAD OUTPUT P CWK A2,SYN P RF(E) SYNLOG SYN INPUT PLOG010 STR
0x397f2c…3980c0 Dummy {f00=0x0124, f01=0x0190, f02=»TN EQU * P ST A1,LOGPNT P ANKL A2,/FF & P ADKL A15,4 : P ABR* A15 N P* ` PPADLOG EQU * j P* ~ P CW A2,-2,A1 P RF(E) PAD10 P CM PADOUT P ADK A1,2 PPAD10 ADKL A1,-2 P IM PADOUT P RB LOG010
0x3980c0…398254 (5, 618) Dummy {f00=0x0124, f01=0x4190, f02=»1,-2 P IM SYNIN P RB LOG010 P EJECT 0 P* > P* H PSYNIN DATA 0 R PPADOUT DATA 0 f P* | P* P* LOGG AREA P* * P* /C0XX XX = OUTPUT CHARACTER * P* /80XX XX = INPUT CHLC STATUS
0x398254…3983e8 Dummy {f00=0x0124, f01=0x2008, f02=» ********************* v * & * 0 DRBMON EQU * : END N@ Z
0x3983e8…39857c Dummy {f00=0x0124, f01=0x0190, f02=»DK A2,0 ? . *PAG:70 ST A11,2,A12 STORE BACKWARD POINTER @ $ ST A9,4,A12 STORE PAGE ADDRESS @ B $ ST A2,6,A12 INDICATE PAGE FREE @ j * & ADK A4,1 INCREMENT PAGE BLOCK COUNTER @ CWR A4,A7 LAST PAGE BLOCK? @ RF(E) PAG:80 YES! @ , ' LDR A11,A
0x39857c…398710 Dummy {f00=0x0124, f01=0x0190, f02=»NEXT PAGE BLOCK @ ADR A9,A10 NEXT PAGE A RB PAG:70 A 6 PAG:80 EQU * A H & ! LDKL A1,PAGQUE POINTER TO PAGQUE A $ STR A1,A12 STORE IN LAST BLOCK A & " ST A12,PAGQUE+2 STORE IN PAGQUE+2 A PPAG:90 EQU * A PPAGEX EQU *-REL A P EJE
0x398710…3988a4 Dummy {f00=0x0124, f01=0x018e, f02=»OCATION BASE A r * P ADKL A13,SYA360 CONTINUATION ADDRESS B $ P LDK A1,0 INDICATE SYSLOAD ENDED B B P OTR A1,0,SOP B j $ P LD A1,SCTBUG GET BUGGER ADDRESS B P ABR(NZ) A1 B P B PSYA360 EQU *-REL B P LDR A13,P B PSYA370 EQU *-REL B 0 P S
0x3988a4…398a38 Dummy {f00=0x0124, f01=0x0190, f02=» P C P* START APPLICATION C P C ( . P LD A1,IHRTC GET INTERRUPT ADDRESS FOR RTC C 0 P ST A1,SAVRTC,A13 SAVE C b 4 P LDKL A1,IHRTCO LOAD TEMPORARY INTERRUPT ADDRESS C P ADR A1,A13 RELOCATE C * P ST A1,IHRTC STORE IN INTERRUPT VECTOR C & P CF A1
0x398a38…398bcc Dummy {f00=0x0124, f01=0x0190, f02=»IMATELY 0.62 SECONDS BEFORE BRANCHING TO DISPATCHER C P* D < P LDKL A1,/FFFF SET COUNTER D F PDELAY SRC A2,31 D h P SUK A1,1 D P RB(NZ) DELAY D P INH D ( P LDKL A1,0 GET RTC INTERRUPT ADDRESS D PSAVRTC EQU *-REL-2 D P ST A1,IHRTC R
0x398bcc…398d60 Dummy {f00=0x0124, f01=0x0190, f02=»PORARY INTERRUPT ROUTINE FOR RTC D P* E ( PIHRTCO EQU *-REL E 2 P RIT RTCDA E J P RTN A15 E & PLENGT3 EQU *-REL LENGTH OF PART 3 E l P EJECT E P E & P** M O V E ** E & P** ** E & P**
0x398d60…398ef4 (5, 619) Opaque[0x194]
0x398ef4…399088 # DirEnt {nam=»DRDC82«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2490, f03=0x0000}
0x398ef4…399088 IdxSect {
0x398ef4…399088 f00 = 0x0124 // 0x398ef4 @0x0
0x398ef4…399088 f01 = 0x0036 // 0x398ef6 @0x2
0x398ef4…399088 gno = [ // 0x398ef8 @0x4
0x398ef4…399088 [0x00]: C0x0124.0x2.0
0x398ef4…399088 [0x01]: C0x0124.0x3.0
0x398ef4…399088 [0x02]: C0x0125.0x0.0
0x398ef4…399088 [0x03]: C0x0125.0x1.0
0x398ef4…399088 [0x04]: C0x0125.0x2.0
0x398ef4…399088 [0x05]: C0x0125.0x3.0
0x398ef4…399088 [0x06]: C0x0126.0x0.0
0x398ef4…399088 [0x07]: C0x0126.0x1.0
0x398ef4…399088 [0x08]: C0x0126.0x2.0
0x398ef4…399088 [0x09]: C0x0126.0x3.0
0x398ef4…399088 [0x0a]: C0x0127.0x0.0
0x398ef4…399088 [0x0b]: C0x0127.0x1.0
0x398ef4…399088 [0x0c]: C0x0127.0x2.0
0x398ef4…399088 [0x0d]: C0x0127.0x3.0
0x398ef4…399088 [0x0e]: C0x0128.0x0.0
0x398ef4…399088 [0x0f]: C0x0128.0x1.0
0x398ef4…399088 [0x10]: C0x0128.0x2.0
0x398ef4…399088 [0x11]: C0x0128.0x3.0
0x398ef4…399088 [0x12]: C0x0129.0x0.0
0x398ef4…399088 [0x13]: C0x0129.0x1.0
0x398ef4…399088 [0x14]: C0x0129.0x2.0
0x398ef4…399088 [0x15]: C0x0129.0x3.0
0x398ef4…399088 [0x16]: C0x012a.0x0.0
0x398ef4…399088 [0x17]: C0x012a.0x1.0
0x398ef4…399088 [0x18]: C0x012a.0x2.0
0x398ef4…399088 [0x19]: C0x012a.0x3.0
0x398ef4…399088 [0x1a]: C0x012b.0x0.0
0x398ef4…399088 ]
0x398ef4…399088 }
0x399088…39921c Dummy {f00=0x0124, f01=0x0190, f02=» 2 P IDENT DRDC82 REL 10.0 80-03-14 870105041000 P : P =4, DC:MIN HEADER B P REL 10.1 80-01-08 ^ P =3,POWER UP z P 80-01-08 P =2,WRONG LABEL P 79-11-01 , P =1,STACK OVERFLOW,BAD INDEX,LOGG AREA P PRR
0x39921c…3993b0 Dummy {f00=0x0124, f01=0x0190, f02=»R DATA COM DRIVER z P* P******** $ 0 P* THIS DRIVER PERFORMS DATA COMMUNICATION 4 2 P* WITH TC'S CONNECTED TO THE CONCENTRATOR h . P* VIA LEASED 4-WIRE ON PROGRAM CHANNEL P* 6 P* PROTOCOL : HDLC MASTER FOR MULTIPOINT DATA
0x3993b0…399544 Dummy {f00=0x0124, f01=0x0190, f02=»O AND WORK REGISTER P* A3:WORK REGISTER P* A4:WORK REGISTER < P* A5:STACK POINTER P* A6:OUTPUT DWT ADDRESS | P* A7:INPUT DWT ADDRESS P* A8:ECB ADDRESS P* P********** P EJECT
0x399544…3996d8 Dummy {f00=0x0124, f01=0x0190, f02=» P ENTRY IH8201,IH8203 . P ENTRY IH8205,IH8207,IH8209,IH8211,IH8213 $ . P ENTRY IH8215,IH8217,IH8219,IH8221,IH8223 V P* P* OUTPUT VECTORS P* P ENTRY IH8202,IH8204 . P ENTRY IH8206,IH8208,IH8210,IH8212,IH8214 . P ENTRY
0x3996d8…39986c Dummy {f00=0x0124, f01=0x0190, f02=»8212,DW8214 r . P ENTRY DW8216,DW8218,DW8220,DW8222,DW8224 P* F P* P $ P ENTRY DW8201,DW8203 INPUT DWT'S Z . P ENTRY DW8205,DW8207,DW8209,DW8211,DW8213 . P ENTRY DW8215,DW8217,DW8219,DW8221,DW8223 P EJECT P* P**********
0x39986c…399a00 Dummy {f00=0x0124, f01=0x0190, f02=»XTRN DISEND P EXTRN DISIOE REQUEST ERROR P EXTRN SETIME SET TIMER CALL 8 P EXTRN SETIMP P EXTRN DWTST DWT STATUS r " P EXTRN DWTECB DWT ECB ADDRESS P EXTRN DWTOR DWT ORDER $ P EXTRN ECBBA ECB BUFFER ADDRESS & P EXTRN ECB
0x399a00…399b94 (5, 620) Dummy {f00=0x0124, f01=0x0190, f02=»ORD v P EXTRN ILLINT P EXTRN INTSAV " . P EXTRN PFPOST WAIT FOR POWER UP IF SET =3 8 P EJECT j P* x P* CONDITIONNAL ASSEMBLY P* PX:A EQU 12 LINE NUMBER P* PX:B EQU 10 POLL LIST LENGTH PPLT EQU X:B
0x399b94…399d28 Dummy {f00=0x0124, f01=0x0190, f02=»U /22 INPUT LINE 01 P* PX:F EQU /4 INPUT LINE 02 & P* F PX:G EQU /5 INPUT LINE 03 P P* p PX:H EQU /6 INPUT LINE 4 z P* PX:I EQU /7 INPUT LINE 5 P* PX:J EQU /20 INPUT LINE 6 P* PX:K EQU /21 INPU
0x399d28…399ebc Dummy {f00=0x0124, f01=0x018e, f02=» v P* PX:O EQU /26 INPUT LINE 11 P* 4 PX:P EQU /27 INPUT LINE 12 > P* ` PX:Q EQU 1000 MMU-BUFFER SIZE j P EJECT P* P* SYSTEM PARAMETERS P* 0 PHILINO EQU X:A HIGHEST LINE NUMBER IN SYSTEM & PPLTLEN E
0x399ebc…39a050 Dummy {f00=0x0124, f01=0x0190, f02=» PLINE05 EQU PLTLEN PLINE06 EQU PLTLEN PLINE07 EQU PLTLEN 8 PLINE08 EQU PLTLEN R PLINE09 EQU PLTLEN l PLINE10 EQU PLTLEN PLINE11 EQU PLTLEN PLINE12 EQU PLTLEN P* PTBUFL EQU X:Q PMMUPAG EQU 0 , P
0x39a050…39a1e4 Dummy {f00=0x0124, f01=0x0190, f02=»FLEN EQU TBUFL+TBUFL BUFFER SIZE IN BYTES P EJECT 2 P* @ P* J P* T PDCUSLI EQU 4 BUFFER LIMIT ^ . PTIMRE4 EQU 20 RECEIVE TIME-OUT (2 SECONDS) PTIMMRY EQU 5 MODEM READY T-O " PTIMACT EQU 100 ACTIVITY TIMER PRTYLIM EQU X
0x39a1e4…39a378 Dummy {f00=0x0124, f01=0x0190, f02=» /2000 PBIT3 EQU /1000 PBIT4 EQU /800 $ PBIT5 EQU /400 : PBIT6 EQU /200 P PBIT7 EQU /100 f PBIT8 EQU /80 | PBIT9 EQU /40 PBIT10 EQU /20 PBIT11 EQU /10 PBIT12 EQU /8 PBIT13 EQU /4 PBIT14 EQU /2
0x39a378…39a50c Dummy {f00=0x0124, f01=0x0190, f02=»**************************** v P* $ 4 P* APPLICATION INTERFACE : ORDERS AND RETURNCODES . P* f : P****************************************************** p P* P* ORDERS: P* P* /00 - TEST P* /02 - READ P* /06 - WRIT
0x39a50c…39a6a0 Dummy {f00=0x0124, f01=0x0190, f02=» P* /38 - CLOSE TC P EJECT P* . P* RETURN CODES: 8 P* P 6 P* STATUS WORD = 0 REQUEST COMPLETED AS EXPECTED Z P* & P* STATUS WORD =/ 0 SEE BITS BELOW P* P* PCOMPLT EQU 0 STATUS WORD = 0 P* (
0x39a6a0…39a834 (5, 621) Dummy {f00=0x0125, f01=0x018e, f02=» BIT14 POLLING ALREADY PERMITTED PINCLEN EQU BIT12 INC. LENGTH ( PTCINAC EQU BIT11 TC INACTIVE L PTCBUSY EQU BIT10 TC BUSY p ( PLINSTE EQU BIT4+BIT0 LINE OPEN/CLOSE ( PPOLHLT EQU BIT4+BIT0 POLLING HALTED PTCACT EQU BIT2 TC ACTIVE P
0x39a834…39a9c8 Dummy {f00=0x0125, f01=0x018e, f02=» " P* DEVICE WORK AREA EQUALS P* . P IFT MMUPAG=0 8 6 PDWTDRD EQU /10 START OF DRIVER DEFINED PART OF DWT N P XIF P* P IFF MMUPAG=0 6 PDWTDRD EQU /14 START OF DRIVER DEFINED PART OF DWT P XIF P* PDWTT
0x39a9c8…39ab5c Dummy {f00=0x0125, f01=0x0190, f02=» PDCBUCU EQU DWTDRD+/20 PPACT EQU DWTDRD+/1C " PPINACT EQU DWTDRD+/1E @ PSENDF EQU DWTDRD+/20 ^ PLNR EQU DWTDRD+/22 z PCPS EQU DWTDRD+/24 PVSS EQU DWTDRD+/26 PVRS EQU DWTDRD+/28 PDWTRTY EQU DWTDRD+/2A PPLIST EQ
0x39ab5c…39acf0 Dummy {f00=0x0125, f01=0x0190, f02=»IO HALT PSST EQU /4AC0 SST POTR EQU /4200 * P* @ " PMSKMOD EQU /1 CARRIER + MODEM J PSSTTHR EQU 2 THROUGPUT p & PSSTMSK EQU /F09F SIGNIFICANT BITS P* P* CIO START IN COMMAND P* PCICMO EQU 2 CONNECT MODEM
0x39acf0…39ae84 Dummy {f00=0x0125, f01=0x0190, f02=»IO START OUT COMMAND P* & PCIT4WP EQU 2 TRANSMIT 4-WIRE ON PC & P EJECT P P* ^ " P* CHLC DEVICE ADDRESS EQUATES h P* PDAMI01 EQU X:E INPUT PDAMI02 EQU X:F PDAMI03 EQU X:G PDAMI04 EQU X:H PDAMI05 EQU X:I
0x39ae84…39b018 Dummy {f00=0x0125, f01=0x0190, f02=»DAMI12 EQU X:P P* PDAMU01 EQU DAMI01+/10 OUTPUT PDAMU02 EQU DAMI02+/10 D PDAMU03 EQU DAMI03+/10 b PDAMU04 EQU DAMI04+/10 PDAMU05 EQU DAMI05+/10 PDAMU06 EQU DAMI06+/10 PDAMU07 EQU DAMI07+/10 PDAMU08 EQU DAMI0
0x39b018…39b1ac Dummy {f00=0x0125, f01=0x0190, f02=»JECT P* & P* CONDITIONAL ASSEMBLY PARAMETERS P* @ P IFF LINE01=0 J PMLIN01 EQU 1 AT LEAST 1 LINE ` P IFF HILINO=1 " PMLIN02 EQU 1 AT LEAST 2 LINES P IFF HILINO=2 " PMLIN03 EQU 1 AT LEAST 3 LINES P IFF HILINO=
0x39b1ac…39b340 Dummy {f00=0x0125, f01=0x0190, f02=»QU 1 AT LEAST 6 LINES P IFF HILINO=6 " PMLIN07 EQU 1 AT LEAST 7 LINES 4 P IFF HILINO=7 Z " PMLIN08 EQU 1 AT LEAST 8 LINES p P IFF HILINO=8 " PMLIN09 EQU 1 AT LEAST 9 LINES P IFF HILINO=9 " PMLIN10 EQU 1 AT LEAST 10 LINES
0x39b340…39b4d4 (5, 622) Dummy {f00=0x0125, f01=0x018e, f02=»ILINO=12 PMLIN12 EQU 0 LESS THAN 12 P IFF HILINO=11 2 PMLIN11 EQU 0 LESS THAN 11 H P IFF HILINO=10 j PMLIN10 EQU 0 LESS THAN 10 P IFF HILINO=9 PMLIN09 EQU 0 LESS THAN 09 P IFF HILINO=8 PMLIN08 EQU 0 LESS THAN 8
0x39b4d4…39b668 Dummy {f00=0x0125, f01=0x0190, f02=» PMLIN05 EQU 0 LESS THAN 5 P IFF HILINO=4 $ PMLIN04 EQU 0 LESS THAN 4 : P IFF HILINO=3 Z PMLIN03 EQU 0 LESS THAN 3 p P IFF HILINO=2 PMLIN02 EQU 0 LESS THAN 2 P XIF P IFT LINE01=0 PMLIN01 EQU 0 P XIF P
0x39b668…39b7fc Dummy {f00=0x0125, f01=0x0190, f02=»UT ON LINE 1 | 6 P DATA DW8202 DWT FOR OUTPUT AND CONTROL ON LINE 1 P IFF HILINO=1 N P DATA DW8204,DW8203 d P IFF HILINO=2 P DATA DW8206,DW8205 P IFF HILINO=3 P DATA DW8208,DW8207 P IFF HILINO=4 P DATA DW8210,D
0x39b7fc…39b990 Dummy {f00=0x0125, f01=0x0190, f02=» DATA DW8216,DW8215 P IFF HILINO=8 P DATA DW8218,DW8217 2 P IFF HILINO=9 N P DATA DW8220,DW8219 d P IFF HILINO=10 P DATA DW8222,DW8221 P IFF HILINO=11 P DATA DW8224,DW8223 P XIF PDWMTE EQU * P EJE
0x39b990…39bb24 Dummy {f00=0x0125, f01=0x0190, f02=»R FRAME PMRNR EQU /5 RNR FRAME PMROL EQU /1F ROL FRAME . PMSKFF EQU /FF U/S MASK L PRECMDR EQU /97 CMDR FRAME j PREUA EQU /73 UA FRAME P* . P* LINE CONTROL OUTPUT CONTROL FIELD MASK P* PTRRP EQU /11 RR+POLL
0x39bb24…39bcb8 Dummy {f00=0x0125, f01=0x0190, f02=»JECT P* P* DWT STATUS WORD CONTENTS P* : P****************** D P* ^ P* DWTST : h " P* BIT 11 =1 WRONG N(S) z " P* BIT 12 =1 WRONG N(R) $ P* BIT 13 =1 RNR RECEIVED ( P* BIT 14 =0 POLLING
0x39bcb8…39be4c Dummy {f00=0x0125, f01=0x0190, f02=» r P* P****************** P* CHLC RECEIVER STATUS , P****************** J P* d 0 P* STATUS :/00 MODEM READY,CARRIER DETECTED n $ P* :/01 MODEM NOT READY $ P* :/02 THROUGPUT ERROR ( P* :/20 CARRIE
0x39be4c…39bfe0 Dummy {f00=0x0125, f01=0x0190, f02=» P* DEVICE WORK TABLE P* $ P IFF LINE01=0 . P* D ( P* DWT FOR LINE 01,OUTPUT AND CONTROL N P* z PDW8202 EQU * TABLE ENTRY P DATA DAMU01 DEVICE ADDRESS $ P DATA /8000 STATUS,DEVICE READY P DATA 0 ECB ADDRESS
0x39bfe0…39c174 (5, 623) Dummy {f00=0x0125, f01=0x0190, f02=»0 TASK QUEUE P IFT MMUPAG=1 P DATA 0 ADDRESS OF USER ECB * & P DATA MECB02 ADDRESS OF DRIVER ECB N P XIF x P IFT MLIN01=1 P DATA 0 TIMER POINTER P DATA 0 ACTIVITY TIMER P DATA 0,0,0,0,0,0 STACK BASE P RES 3 SAVE RE
0x39c174…39c308 Dummy {f00=0x0125, f01=0x0190, f02=» P DATA 0 SENDF P DATA 0 LNR P DATA 0 CPS . P DATA 0 VSS B P DATA 0 VRS V P DATA 0 RETRY j P* P* POLLIST P* P DATA LINE01+LINE01 LENGTH P RES LINE01 $ P DATA /FFFF,/FFFF END OF POLLIST P IFT
0x39c308…39c49c Dummy {f00=0x0125, f01=0x0190, f02=» P EJECT P* P* DEVICE WORK TABLE P* DWT FOR LINE 01 INPUT < P* PDW8201 EQU * TABLE ENTRY f P DATA DAMI01 DEVICE ADDRESS P DATA /8000 STATUS P DATA 0 ECB ADDRESS P DATA 0 ORDER * P DATA DRMIAD POINT
0x39c49c…39c630 Dummy {f00=0x0125, f01=0x0190, f02=»ATA 0 ADDRESS OF USER ECB P DATA MECB01 DRIVER ECB ! " P XIF ! B P IFF LINE01=0 ! N P DATA 0 TIMER ! d P DATA 0 ACTIVITY TIMER ! z P DATA 0,0,0,0,0,0 STACK BASE ! P RES 3 SAVE REGISTER 3-5 ! $ P DATA DW8202 OUTPUT DWT ADDRESS ! P DAT
0x39c630…39c7c4 Dummy {f00=0x0125, f01=0x0190, f02=»MECB01 DATA 0,DCBF01,0,0,0,0 DRIVER ECB ! ( PDCBF01 RES TBUFL+1 INPUT MMU BUFFER " 0 P XIF " P IFT MLIN02=1 " j P EJECT " P* " P* DEVICE WORK TABLE " ( P* DWT FOR LINE 02,OUTPUT AND CONTROL " P* " PDW8204 EQU * TABLE ENTRY "
0x39c7c4…39c958 Dummy {f00=0x0125, f01=0x018e, f02=»S BLOCK " r P DATA 0 TTAB # P DATA 0 W/A # $ P DATA 0 TASK QUEUE # 8 P IFT MMUPAG=1 # R P DATA 0 ADDRESS OF USER ECB # h P DATA MECB04 DRIVER ECB # P XIF # P IFT MLIN02=1 # P DATA 0 TIMER POINTER # P DATA 0 ACT TIMER # P D
0x39c958…39caec Dummy {f00=0x0125, f01=0x0190, f02=» # P DATA 0 PACT $ P DATA 0 PINACT $ P DATA 0 SENDF $ 2 P DATA 0 LNR $ H P DATA 0 CPS $ P DATA 0 VSS $ p P DATA 0 VRS $ P DATA 0 RETRY $ P* $ P* POLLIST $ P* $ P DATA LINE02+LINE02 LENGHT $ P RES LINE02 $
0x39caec…39cc80 Dummy {f00=0x0125, f01=0x0190, f02=»UTPUT MMU BUFFER $ | P XIF % P IFT MLIN02=1 % $ P EJECT % : P* % H P* DEVICE WORK TABLE % R P* % n P* DWT FOR LINE 02 INPUT % x P* % PDW8203 EQU * TABLE ENTRY % P DATA DAMI02 % P DATA /8000 STATUS % P DATA 0 ECB % P D
0x39cc80…39ce14 (5, 624) Dummy {f00=0x0125, f01=0x0190, f02=»PAG=1 % P DATA 0 ADDRESS OF USER ECB & P DATA MECB03 DRIVER ECB & 2 P XIF & R P IFT MLIN02=1 & ^ P DATA 0 TIMER POINTER & t P DATA 0 ACT TIMER & P DATA 0,0,0,0,0,0 STACK BASE & P RES 3 SAVE REGISTERS 3-5 & P DATA DW8204 OUTPUT DW
0x39ce14…39cfa8 Dummy {f00=0x0125, f01=0x0190, f02=»PAG=1 & , PMECB03 DATA 0,DCBF03,0,0,0,0 DRIVER ECB ' & PDCBF03 RES TBUFL+1 INPUT MMUBUFFER ' > P XIF ' h P IFT MLIN03=1 ' t P EJECT ' P* ' ( P* DWT FOR LINE 03 OUTPUT AND CONTROL ' P* ' PDW8206 EQU * ' P DATA DAMU03 ' P DATA /8
0x39cfa8…39d13c Dummy {f00=0x0125, f01=0x0190, f02=»MUPAG=1 ' P DATA 0 USER ECB ( P DATA MECB06 ( ( P XIF ( < P IFT MLIN03=1 ( H P DATA 0 TIMER POINTER ( ^ P DATA 0 ACT TIMER ( | P DATA 0,0,0,0,0,0 ( P RES 3 ( P DATA DW8206 ( P DATA DW8205 ( P DATA 0,0,0,0,0 ( P DATA 0,0,
0x39d13c…39d2d0 Dummy {f00=0x0125, f01=0x018e, f02=» DRIVER ECB ( t ( PDCBF06 RES TBUFL+1 OUTPUT MMU BUFFER ) P XIF ) @ P IFT MLIN03=1 ) L P EJECT ) b P* ) p P* DWT FOR LINE 03 INPUT ) z P* ) PDW8205 EQU * ) P DATA DAMI03 ) P DATA /8000 ) P DATA 0,0 ) P DATA DRMIAD ) P D
0x39d2d0…39d464 Dummy {f00=0x0125, f01=0x0190, f02=» ) v P XIF * P IFT MLIN03=1 * P DATA 0 TIMER POINTER * * P DATA 0 ACT TIMER * H P DATA 0,0,0,0,0,0 * b P RES 3 * | P DATA DW8206 * P DATA DW8205 * P DATA 0,0,0,0 * P EJECT * P IFT MMUPAG=1 * , PMECB05 DATA 0,DCBF05,0,0,0,0
0x39d464…39d5f8 Dummy {f00=0x0125, f01=0x0190, f02=»TROL * p P* + PDW8208 EQU * + " P DATA DAMU04,/8000,0,0,DRMUAD + * P DATA 0 TTAB + P P DATA 0 W/A + d P DATA 0 TASK QUEUE + x P IFT MMUPAG=1 + P DATA 0 ADDRESS OF USER ECB + P DATA MECB08 DRIVER ECB + P XIF + P IFT MLIN04=1 +
0x39d5f8…39d78c Dummy {f00=0x0125, f01=0x018e, f02=»0,0,0,0 + P DATA 0,0,0,0,0 , P DATA LINE04+LINE04 , ( P RES LINE04 , D P DATA /FFFF,/FFFF , X P IFT MMUPAG=1 , r , PMECB08 DATA 0,DCBF08,0,0,0,0 DRIVER ECB , ( PDCBF08 RES TBUFL+1 OUTPUT MMU BUFFER , P XIF , P IFT MLIN04=1 , P E
0x39d78c…39d920 Dummy {f00=0x0125, f01=0x0190, f02=» , P DATA 0 W/A - P DATA 0 TASK QUEUE - P IFT MMUPAG=1 - 6 P DATA 0 USER BUFFER - L P DATA MECB07 DRIVER ECB - h P XIF - P IFT MLIN04=1 - P DATA 0 TIMER POINTER - P DATA 0 ACT TIMER - P DATA 0,0,0,0,0,0 - P RES 3 -
0x39d920…39dab4 (5, 625) Dummy {f00=0x0126, f01=0x0190, f02=» - l P XIF . P IFT MLIN05=1 . P EJECT . * P* . 8 ( P* DWT FOR LINE 05,OUTPUT AND CONTROL . B P* . n PDW8210 EQU * . x " P DATA DAMU05,/8000,0,0,DRMUAD . P DATA 0 TTAB . P DATA 0 W/A . P DATA 0 TASK QUEUE . P IFT MMUPAG=1 .
0x39dab4…39dc48 Dummy {f00=0x0126, f01=0x0190, f02=»MER . P DATA 0,0,0,0,0,0 / P RES 3 / & P DATA DW8210,DW8209 / 4 P DATA 0,0,0,0 / P P DATA 0,0,0,0,0 / f P DATA LINE05+LINE05 / ~ P RES LINE05 / P DATA /FFFF,/FFFF / P IFT MMUPAG=1 / , PMECB10 DATA 0,DCBF10,0,0,0,0 DRIVER ECB /
0x39dc48…39dddc Dummy {f00=0x0126, f01=0x0190, f02=» P* 0 PDW8209 EQU * 0 " P DATA DAMI05,/8000,0,0,DRMIAD 0 " P DATA 0 TTAB 0 H P DATA 0 W/A 0 P DATA 0 TASK QUEUE 0 p P IFT MMUPAG=1 0 P DATA 0 USER ECB 0 P DATA MECB09 DRIVER ECB 0 P XIF 0 P IFT MLIN05=1 0 P DATA 0 TIMER
0x39dddc…39df70 Dummy {f00=0x0126, f01=0x0190, f02=» MMUPAG=1 0 , PMECB09 DATA 0,DCBF09,0,0,0,0 DRIVER ECB 1 ( PDCBF09 RES TBUFL+1 MMU BUFFER INPUT 1 B P XIF 1 n P IFT MLIN06=1 1 z P EJECT 1 P* 1 ( P* DWT FOR LINE 06,OUTPUT AND CONTROL 1 P* 1 PDW8212 EQU * 1 " P DATA DAMU06,/8000,0,0
0x39df70…39e104 Dummy {f00=0x0126, f01=0x0190, f02=»CB12 DRIVER ECB 1 P XIF 2 P IFT MLIN06=1 2 $ P DATA 0 TIMER POINTER 2 : P DATA 0 ACT TIMER 2 X P DATA 0,0,0,0,0,0 2 r P RES 3 2 P DATA DW8212,DW8211 2 P DATA 0,0,0,0 2 P DATA 0,0,0,0,0 2 P DATA LINE06+LINE06 2 P RES LIN
0x39e104…39e298 Dummy {f00=0x0126, f01=0x018e, f02=»1 2 P EJECT 3 P* 3 P* DWT FOR LINE06,INPUT 3 " P* 3 @ PDW8211 EQU * 3 J " P DATA DAMI06,/8000,0,0,DRMIAD 3 ^ P DATA 0 TTAB 3 P DATA 0 W/A 3 P DATA 0 TASK QUEUE 3 P IFT MMUPAG=1 3 P DATA 0 USER ECB 3 P DATA MECB11 DRIVER
0x39e298…39e42c Dummy {f00=0x0126, f01=0x0190, f02=» 3 P DATA DW8212,DW8211 4 P DATA 0,0,0,0 4 $ P IFT MMUPAG=1 4 : , PMECB11 DATA 0,DCBF11,0,0,0,0 DRIVER ECB 4 P ( PDCBF11 RES TBUFL+1 MMU BUFFER INPUT 4 P XIF 4 P IFT MLIN07=1 4 P EJECT 4 P* 4 ( P* DWT FOR LINE 07,OUTPUT AND CONTR
0x39e42c…39e5c0 Dummy {f00=0x0126, f01=0x0190, f02=» 4 ~ P IFT MMUPAG=1 5 P DATA 0 USERECB 5 P DATA MECB14 DRIVER ECB 5 6 P XIF 5 V P IFT MLIN07=1 5 d P DATA 0 TIMER POINTER 5 z P DATA 0 ACT TIMER 5 P DATA 0,0,0,0,0,0 5 P RES 3 5 P DATA DW8214,DW8213 5 P DATA 0,0,0,0 5
0x39e5c0…39e754 (5, 626) Dummy {f00=0x0126, f01=0x0190, f02=»0,DCBF14,0,0,0,0 DRIVER ECB 5 PDCBF14 RES TBUFL+1 6 $ P XIF 6 > P IFT MLIN07=1 6 J P EJECT 6 ` P* 6 n P* DWT FOR LINE 07,INPUT 6 x P* 6 PDW8213 EQU * 6 " P DATA DAMI07,/8000,0,0,DRMIAD 6 P DATA 0 TTAB 6 P DATA 0 W/A 6 P DAT
0x39e754…39e8e8 Dummy {f00=0x0126, f01=0x0190, f02=»ATA 0 TIMER POINTER 6 P DATA 0 ACT TIMER 7 P DATA 0,0,0,0,0,0 7 6 P RES 3 7 P P DATA DW8214,DW8213 7 ^ P DATA 0,0,0,0 7 z P IFT MMUPAG=1 7 , PMECB13 DATA 0,DCBF13,0,0,0,0 DRIVER ECB 7 ( PDCBF13 RES TBUFL+1 MMU BUFFER INPUT 7 P XIF 7
0x39e8e8…39ea7c Dummy {f00=0x0126, f01=0x0190, f02=»08,/8000,0,0,DRMUAD 7 P DATA 0 TTAB 8 P DATA 0 W/A 8 0 P DATA 0 TASK QUEUE 8 D P IFT MMUPAG=1 8 ^ P DATA 0 USER ECB 8 t P DATA MECB16 DRIVER ECB 8 P XIF 8 P IFT MLIN08=1 8 P DATA 0 TIMER POINTER 8 P DATA 0 ACT TIMER 8 P D
0x39ea7c…39ec10 Dummy {f00=0x0126, f01=0x0190, f02=» P RES LINE08 9 P DATA /FFFF,/FFFF 9 P IFT MMUPAG=1 9 2 , PMECB16 DATA 0,DCBF16,0,0,0,0 DRIVER ECB 9 H ( PDCBF16 RES TBUFL+1 MMU OUTPUT BUFFER 9 x P XIF 9 P IFT MLIN08=1 9 P EJECT 9 P* 9 P* DWT FOR LINE 08,INPUT 9 P* 9 P
0x39ec10…39eda4 Dummy {f00=0x0126, f01=0x0190, f02=»1 9 P DATA 0 USER ECB : P DATA MECB15 DRIVER ECB : " P XIF : B P IFT MLIN08=1 : N P DATA 0 TIMER POINTER : d P DATA 0 ACT TIMER : P DATA 0,0,0,0,0,0 : P RES 3 : P DATA DW8216,DW8215 : P DATA 0,0,0,0 : P IFT MMUPAG=1 :
0x39eda4…39ef38 Dummy {f00=0x0126, f01=0x0190, f02=» : P* ; ( P* DWT FOR LINE 09,OUTPUT AND CONTROL ; P* ; > PDW8218 EQU * ; H " P DATA DAMU09,/8000,0,0,DRMUAD ; P DATA 0 TTAB ; P DATA 0 W/A ; P DATA 0 TASK QUEUE ; P IFT MMUPAG=1 ; P DATA 0 USER ECB ; P DATA MECB18 DRIVER EC
0x39ef38…39f0cc Dummy {f00=0x0126, f01=0x0190, f02=» P DATA DW8218,DW8217 < P DATA 0,0,0,0 < P DATA 0,0,0,0,0 < 6 P DATA LINE09+LINE09 < N P RES LINE09 < j P DATA /FFFF,/FFFF < ~ P IFT MMUPAG=1 < , PMECB18 DATA 0,DCBF18,0,0,0,0 DRIVER ECB < ( PDCBF18 RES TBUFL+1 MMUBUFFER OUTPUT <
0x39f0cc…39f260 Dummy {f00=0x0126, f01=0x0190, f02=»00,0,0,DRMIAD < P DATA 0 TTAB = P DATA 0 W/A = * P DATA 0 TASK QUEUE = > P IFT MMUPAG=1 = X P DATA 0 USER ECB = n P DATA MECB17 DRIVER ECB = P XIF = P IFT MLIN09=1 = P DATA 0 TIMER POINTER = P DATA 0 ACT TIMER = P DATA 0,
0x39f260…39f3f4 (5, 627) Dummy {f00=0x0126, f01=0x0190, f02=»VER ECB = p ( PDCBF17 RES TBUFL+1 MMU BUFFER INPUT > P XIF > < P IFT MLIN10=1 > H P EJECT > ^ P* > l ( P* DWT FOR LINE 10,OUTPUT AND CONTROL > v P* > PDW8220 EQU * > " P DATA DAMU10,/8000,0,0,DRMUAD > P DATA 0 TTAB > P DATA 0 W/A >
0x39f3f4…39f588 Dummy {f00=0x0126, f01=0x0190, f02=» > P DATA 0 TIMER POINTER ? P DATA 0 ACT TIMER ? & P DATA 0,0,0,0,0,0 ? @ P RES 3 ? Z P DATA DW8220,DW8219 ? h P DATA 0,0,0,0 ? P DATA 0,0,0,0,0 ? P DATA LINE10+LINE10 ? P RES LINE10 ? P DATA /FFFF,/FFFF ? P IFT MMUPAG=
0x39f588…39f71c Dummy {f00=0x0126, f01=0x0190, f02=» EJECT ? P* @ P* DWT FOR LINE 10,INPUT @ P* @ 8 PDW8219 EQU * @ B " P DATA DAMI10,/8000,0,0,DRMIAD @ V P DATA 0 TTAB @ | P DATA 0 W/A @ P DATA 0 TASK QUEUE @ P IFT MMUPAG=1 @ P DATA 0 USER ECB @ P DATA MECB19 DRIVER ECB @
0x39f71c…39f8b0 Dummy {f00=0x0126, f01=0x0190, f02=»ATA DW8220,DW8219 @ P DATA 0,0,0,0 A P IFT MMUPAG=1 A 0 , PMECB19 DATA 0,DCBF19,0,0,0,0 DRIVER ECB A F ( PDCBF19 RES TBUFL+1 MMU BUFFER INPUT A v P XIF A P IFT MLIN11=1 A P EJECT A P* A ( P* DWT FOR LINE 11,OUTPUT AND CONTROL A P
0x39f8b0…39fa44 Dummy {f00=0x0126, f01=0x0190, f02=»FT MMUPAG=1 A P DATA 0 USER ECB B P DATA MECB22 DRIVER ECB B , P XIF B L P IFT MLIN11=1 B X P DATA 0 TIMER POINTER B n P DATA 0 ACT TIMER B P DATA 0,0,0,0,0,0 B P RES 3 B P DATA DW8222,DW8221 B P DATA 0,0,0,0 B P DATA 0,
0x39fa44…39fbd8 Dummy {f00=0x0126, f01=0x0190, f02=»,0,0 DRIVER ECB B x ( PDCBF22 RES TBUFL+1 MMUBUFFER OUTPUT C P XIF C D P IFT MLIN11=1 C P P EJECT C f P* C t P* DWT FOR LINE 11,INPUT C ~ P* C PDW8221 EQU * C " P DATA DAMI11,/8000,0,0,DRMIAD C P DATA 0 TTAB C P DATA 0 W/A C
0x39fbd8…39fd6c Dummy {f00=0x0126, f01=0x0190, f02=» P DATA 0 TIMER POINTER D P DATA 0 ACT TIMER D " P DATA 0,0,0,0,0,0 D < P RES 3 D V P DATA DW8222,DW8221 D d P DATA 0,0,0,0 D P IFT MMUPAG=1 D , PMECB21 DATA 0,DCBF21,0,0,0,0 DRIVER ECB D ( PDCBF21 RES TBUFL+1 MMU BUFFER INPUT D P
0x39fd6c…39ff00 Dummy {f00=0x0126, f01=0x0190, f02=»A DAMU12,/8000,0,0,DRMUAD D P DATA 0 TTAB E " P DATA 0 W/A E 6 P DATA 0 TASK QUEUE E J P IFT MMUPAG=1 E d P DATA 0 USER ECB E z P DATA MECB24 DRIVER ECB E P XIF E P IFT MLIN12=1 E P DATA 0 TIMER POINTER E P DATA 0 ACT TIMER E
0x39ff00…3a0094 (5, 628) Dummy {f00=0x0126, f01=0x0190, f02=»2 E ~ P RES LINE12 F P DATA /FFFF,/FFFF F P IFT MMUPAG=1 F 8 , PMECB24 DATA 0,DCBF24,0,0,0,0 DRIVER ECB F N ( PDCBF24 RES TBUFL+1 MMU BUFFER OUTPUT F ~ P XIF F P IFT MLIN12=1 F P EJECT F P* F P* DWT FOR LINE 12,INPUT F P* F
0x3a0094…3a0228 Dummy {f00=0x0126, f01=0x0190, f02=»MUPAG=1 F P DATA 0 USER ECB G P DATA MECB23 DRIVER ECB G ( P XIF G H P IFT MLIN12=1 G T P DATA 0 TIMER POINTER G j P DATA 0 ACT TIMER G P DATA 0,0,0,0,0,0 G P RES 3 G P DATA DW8224,DW8223 G P DATA 0,0,0,0 G P IFT MMUPAG=
0x3a0228…3a03bc Dummy {f00=0x0126, f01=0x0190, f02=»O=12 G P EJECT H P* H P* DUMMY ENTRIES H $ P* H < PDW8223 EQU * H F PDW8224 EQU * H Z PIH8223 EQU * H n PIH8224 EQU * H P IFF HILINO=11 H PDW8221 EQU * H PDW8222 EQU * H PIH8221 EQU * H PIH8222 EQU * H P IFF HILINO=
0x3a03bc…3a0550 Dummy {f00=0x0126, f01=0x0190, f02=»18 EQU * H PIH8217 EQU * I PIH8218 EQU * I $ P IFF HILINO=8 I 8 PDW8215 EQU * I N PDW8216 EQU * I b PIH8215 EQU * I v PIH8216 EQU * I P IFF HILINO=7 I PDW8213 EQU * I PDW8214 EQU * I PIH8213 EQU * I PIH8214 EQU * I P IFF
0x3a0550…3a06e4 Dummy {f00=0x0126, f01=0x0190, f02=» PDW8210 EQU * J PIH8209 EQU * J PIH8210 EQU * J , P IFF HILINO=4 J @ PDW8207 EQU * J V PDW8208 EQU * J j PIH8207 EQU * J ~ PIH8208 EQU * J P IFF HILINO=3 J PDW8205 EQU * J PDW8206 EQU * J PIH8205 EQU * J PIH8206 EQU * J
0x3a06e4…3a0878 Dummy {f00=0x0126, f01=0x0190, f02=»T J P XIF K P EJECT K P* K $ P* ACTIVATION PART: K . P* INPUT REQUESTS K J P* K d P* K n P* ACTIVATION BLOCK K x P* K P DATA BUFLEN K P DATA DEVIND K $ PDRMIAD DATA MIACT DWT REFERENCE K P* K ( P DATA ABORT ADDRES
0x3a0878…3a0a0c Dummy {f00=0x0126, f01=0x018e, f02=» ABL DISIOE ILLEGAL ORDER K P* L " P* ORDER 02 READ L , P* L D PRD EQU * L N P IFT MMUPAG=1 L ^ $ P LD A2,ECBRL,A8 REQUESTED LENGTH L t P CWK A2,BUFLEN SIZE OK? L " P ABL(G) IL:LEN ILLEGAL LENGTH L P XIF L P LD A1,DWTST,A6 GET STATUS
0x3a0a0c…3a0ba0 Dummy {f00=0x0126, f01=0x018e, f02=» L j ( PRD200 CF A15,TENDIO COMPLETE REQUEST M PRD300 EQU * M 4 P ABL TDISP GO TO DISPATCHER M H P EJECT M l P* M z P* ACTIVATION PART: M " P* OUTPUT AND CONTROL REQUESTS M P* M P* M P* ACTIVATION BLOCK M P* M P DATA BUFL
0x3a0ba0…3a0d34 (5, 629) Dummy {f00=0x0127, f01=0x0190, f02=» P* N PMUACT EQU * N P LDR A7,A7 N " " P RF(Z) TEST ORDER 00,TEST LINE N 4 P SUK A7,6 N Z P ABL(Z) WRT ORDER 06,WRITE N n P SUK A7,/22-6 N " P RF(Z) OLIN ORDER 22,OPEN LINE N P SUK A7,2 N $ P ABL(Z) CLIN ORDER 24,CLOSE LINE N P S
0x3a0d34…3a0ec8 Dummy {f00=0x0127, f01=0x0190, f02=» N P ABL(Z) OTC ORDER 37,OPEN TC O P SUK A7,1 O , $ P ABL(Z) WRT150 ORDER 38 CLOSE TC O > P RB MIA100 ILLEGAL ORDER O f P EJECT O P* O P* ORDER 00:TEST LINE O P* O PTEST EQU * O P LD A1,DWTST,A6 GET STATUS O P ANK A1,1 O "
0x3a0ec8…3a105c Dummy {f00=0x0127, f01=0x0190, f02=»A1,DWTST,A6 GET STATUS O P ANK A1,1 P & P RB(NZ) RD100 LINE ALREADY OPENED P 0 * P LD A1,PLIST,A6 GET LENGTH OF POLLIST P Z P LDR A2,A1 P P ADR A1,A6 P POLI100 EQU * P P CM PLIST,A1 DELETE POLLIST P P SUK A1,2 P P SUK A2,2 P & P
0x3a105c…3a11f0 Dummy {f00=0x0127, f01=0x018e, f02=»,HALTIN P P LDK A2,CIDISC Q " P CF A5,STHCIN DISCONNECT MODEM Q & P LDK A2,CICMO Q L P CF A5,STHCIN CONNECT MODEM Q b & P RF(NN) OLI160 MODEM NOT OPERABLE Q P LDK A1,1 Q * P ORS A1,DWTST,A6 INDICATE LINE OPENED Q P ORS A1,DWTST,A7 Q P
0x3a11f0…3a1384 Dummy {f00=0x0127, f01=0x0190, f02=» Q P LDR A1,A6 R P LDR A4,A6 R P ADK A4,DWTATP R , P LDR* A2,A4 R B " P ABL(NZ) BMM RECOVERY POWER ON R V & P CF A15,SETIMP SET ACTIVITY TIMER R | P DATA OLI159,TIMACT R & P ABL BMM ENTER BASIS RECEIVE MODE R P* R P* ACTIVITY TIME-O
0x3a1384…3a1518 Dummy {f00=0x0127, f01=0x018e, f02=»,DWTATP,A6 R P ABL(Z) OLI161 S P CM* DWTATP,A6 CLEAR TIMER S ( & P CM DWTATP,A6 CLEAR TIMER POINTER S J P EJECT S t P* S P* SET ALL TC'S INACTIVE S P* S POLI161 EQU * S P LD A4,PLIST,A6 S P LDKL A3,/8000 S P LDR A2,A6 S
0x3a1518…3a16ac Dummy {f00=0x0127, f01=0x0190, f02=» S P ADR A5,A6 RELOAD STACK BAS T P CF A5,HALTIN T , $ P LDK A1,0 DECLARE LINE CLOSED =1 T B P SC A1,DWTST+1,A6 T j P SC A1,DWTST+1,A7 T P LDK A2,CIDISC T " P CF A5,STHCIN DISCONNECT MODEM T , P LDK A1,MODNOP RC:MODEM NOT OPERATIONAL T
0x3a16ac…3a1840 Dummy {f00=0x0127, f01=0x0190, f02=»WTECB,A6 T P RF(Z) OLI170 U P CM ECBRC,A8 U & POLI170 EQU * U : P ABL DISEND U N P EJECT U b P* U p ( P* CLOSE LINE,HALT AND START POLLING U z P* U PCLIN EQU * U P LD A1,DWTST,A6 GET STATUS U P ANK A1,1 U & P ABL(Z) RD100 LINE
0x3a1840…3a19d4 (5, 630) Dummy {f00=0x0127, f01=0x0190, f02=»8,A6 U P LD A1,DWTST,A7 V P LDR A2,A1 V $ P ANK A1,1 V 6 P ABL(Z) RD100 SEQ ERROR V H P LD A2,ECBCW,A8 GET TCA V h P SUK A2,/41 V $ P RF(N) OTC100 INVALID TC ADDRESS V P SUK A2,/5A-/41 V P ABL(NP) TDISP V POTC100 EQU * V & P L
0x3a19d4…3a1b68 Dummy {f00=0x0127, f01=0x0190, f02=» IFT MMUPAG=1 V & P LD A2,ECBRL,A8 REQUESTED LENGTH? W 2 P CWK A2,BUFLEN GREATER THAN MMU BUFFER LENGTH W @ P RF(G) IL:LEN ILLEGAL LENGTH W v P XIF W P LC* A2,ECBBA,A8 TCA W PWRT105 EQU * W P LD A1,DWTST,A6 STATUS W P ANK A1,1 W P A
0x3a1b68…3a1cfc Dummy {f00=0x0127, f01=0x0190, f02=»F(N) WRT110 TCA INACTIVE W * P SC A4,DWTOR,A6 SAVE INDEX IN POLLIST X PWRT107 EQU * X N P ABL TDISP X b PWRT110 EQU * X t * P SC A4,DWTOR,A6 SAVE INDEX IN POLLIST X P LD A1,DWTOR,A6 X P ANK A1,/FF X P SUK A1,/38 CLOSE TC? X P RB(Z) W
0x3a1cfc…3a1e90 Dummy {f00=0x0127, f01=0x0190, f02=» P* Y P* ORDER 38:CLOSE TC Y P* Y * PWRT150 EQU * Y 4 P LD A2,ECBCW,A8 TCA Y H P RB WRT105 Y d P EJECT Y v N P************************************************************************** Y P* Y P* ILLEGAL LENGTH Y P* Y N P******
0x3a1e90…3a2024 Dummy {f00=0x0127, f01=0x0190, f02=» DISEND DISPATCHER Y P EJECT Z N P************************************************************************* Z ( P* Z z P* ABORT ROUTINE Z P* Z L P************************************************************************ Z PABORT EQU * Z
0x3a2024…3a21b8 Dummy {f00=0x0127, f01=0x018e, f02=»NTER Z t PAB:10 EQU * [ PAB:RTN EQU * [ P IFT CPU852=1 [ 4 P ADKL A15,4 [ J P ABR* A15 [ ^ P XIF [ p P IFF CPU852=1 [ | P RTN A15 [ P XIF [ P EJECT [ P* [ P* RECOVERY AT POWER ON [ P* [ PDC82ON EQU * [ $ P LD A3
0x3a21b8…3a234c Dummy {f00=0x0127, f01=0x018e, f02=» [ r P LD A1,DWTST,A6 P LDR A2,A1 P LDR* A4,A6 DEVICE ADDRESS 2 P ANK A2,1 STATUS T P RF(Z) DRM200 LINE CLOSED l P ANK A4,/10 P RF(NZ) DRM250 OUTPUT DWT PDRM100 EQU * INPUT DWT P ANKL A1,/8000 P RB(NZ) DRM000 N
0x3a234c…3a24e0 Dummy {f00=0x0127, f01=0x0190, f02=» P RB DRM000 ] PDRM200 EQU * ] P ANK A4,/10 ] * P RB(Z) DRM000 INPUT DWT ] > P ANKL A1,/8000 ] ^ P RB(NZ) DRM000 NO REQUEST ] t P LD A1,DWTOR,A6 GET ORDER ] P ANK A1,/FF ] P SUK A1,/22 OPEN LINE? ] P RB(NZ) DRM000 NO ] PDRM2
0x3a24e0…3a2674 (5, 631) Dummy {f00=0x0127, f01=0x0190, f02=»7 ] PDRM275 EQU * ^ P LDR A1,A6 ^ P CF A15,SETIMP ^ 0 P DATA DRM400,TIMMRY ^ F P RB DRM000 ^ b PDRM300 RTN A15 ^ t P* ^ P* REOPEN LINE ^ P* ^ PDRM400 EQU * ^ P LDR A6,A1 ^ P LD A7,DWTSAV+8,A6 ^ P CM DWTTP,A7 ^ P
0x3a2674…3a2808 Dummy {f00=0x0127, f01=0x0190, f02=»L PART ^ ~ P* _ P* BMM:BASIS RECEIVE MODE _ P* _ : PBMM EQU * _ D P LDK A5,STB _ V P ADR A5,A6 _ j & P LD A1,DWTST,A6 GET OUTPUT STATUS _ | , P RF(NN) OUTPUT OUTPUT OR CONTROL REQUEST _ $ P LD A1,DWTST,A7 GET INPUT STATUS _ P ABL(NN) P
0x3a2808…3a299c Dummy {f00=0x0127, f01=0x0190, f02=» DATA BMM15,1 _ P ABL TDISP ` PBMM15 EQU * ` ( P LDR A6,A1 ` < P LD A7,DWTSAV+8,A6 ` N P LD A1,DWTATP,A6 ` h P RB(Z) BMM ` P LDKL A2,-TIMACT NO TIME-OUT ` " P STR A2,A1 RESTART ACT. TIMER ` P RB BMM ` P EJECT ` P* ` . P* OU
0x3a299c…3a2b30 Dummy {f00=0x0127, f01=0x0190, f02=» ` | 2 P ST A8,DWTSAV+10,A7 LOAD A8,INTERRUPT REGISTER a P LD A1,DWTOR,A6 GET ORDER a > P ANK A1,/FF a ` P SUK A1,6 a t P ABL(Z) WRITE ORDER 06:WRITE a P SUK A1,/24-6 a & P ABL(Z) OUT400 ORDER 24:CLOSE LINE a P SUK A1,2 a ( P RF(Z) OUT20
0x3a2b30…3a2cc4 Dummy {f00=0x0127, f01=0x0190, f02=»:OPEN TC a z P EJECT b P* b P* ORDER 38:CLOSE TC b ( P* b D ( P LC A3,DWTOR,A6 GET INDEX IN POLLIST b N P ANK A3,/FF b z P ADR A3,A6 b P LDR* A2,A3 b , P LD A2,PLIST,A3 RELOAD P-LIST POINTER =1 b P CM PLIST,A3 b P LDR A1,A3 b
0x3a2cc4…3a2e58 Dummy {f00=0x0127, f01=0x018e, f02=»TE REQUEST b t P* c P LDR A1,A2 c P ANK A1,/7F c . P ECR A1,A1 c B P ORK A1,TDISC c T P CF A5,TRUF c j P CF A5,RDUSTI c ~ P CF A5,HALTIN c P ABL BMM10 c P EJECT c P* c P* ORDER 37:OPEN TC c P* c POUT100 EQU * c
0x3a2e58…3a2fec Dummy {f00=0x0127, f01=0x0190, f02=» POUT105 EQU * d P LDK A2,0 d & P CF A15,FINDTC SEARCH EMPTY PLACE d * P RF(Z) OUT110 d T $ P LDKL A1,LSTOVF POLLIST OVERFLOW d j P RF OUT310 COMPLETE REQUEST d POUT110 EQU * d * P SC A4,DWTOR,A6 SAVE INDEX IN POLLIST d P LD A1,ECBCW,A8
0x3a2fec…3a3180 Dummy {f00=0x0127, f01=0x0190, f02=» SUK A2,2 d P CMR A2 e P LDKL A2,RTYLIM e " P ST A2,DWTRTY,A6 e : P* e R 4 P* SEND SNRM AND WAIT WITH TIME-OUT SUPERVISION e P* e PSSNRM EQU * e P LD A1,ECBCW,A8 e P ANK A1,/7F GET TC ADDRESS e P ECR A1,A1 e $ P ORK A1,TS
0x3a3180…3a3314 (5, 632) Dummy {f00=0x0127, f01=0x0190, f02=» TIME-OUT? e P RF(N) OUT130 YES f P* f , , P* REPLY RECEIVED,TEST IF UA AS EXPECTED f 6 P* f f P LDR A1,A2 f p P ANK A1,/FF f P CWK A1,REUA f P RF(E) OUT113 f P RF OUT131 RETRY CUNTERS f POUT113 EQU * f P LD A3,ECBCW,A8 f
0x3a3314…3a34a8 Dummy {f00=0x0127, f01=0x0190, f02=»A2 SET TC ACTIVE f P LD A1,PACT,A6 g $ P RF(NZ) OUT300 NOT FIRST IN LIST g . P ST A2,PACT,A6 g V P RF OUT300 g l POUT130 EQU * g ~ . POUT131 IM DWTRTY,A6 INCREASE RETRY COUNTER g ( P RB(L) SSNRM LIMIT NOT REACHED RETRY g P LD A1,PINACT,A6 g $ P
0x3a34a8…3a363c Dummy {f00=0x0127, f01=0x0190, f02=»T A2,PINACT,A6 INDICATE INACTIVE g POUT150 EQU * h ( " P LDK A1,TCINAC RC:TC INACTIVE h < P RF OUT310 COMPLETE REQUEST h b P EJECT h P* h P* ORDER /26:HALT POLLING h P* h POUT200 EQU * h P LDK A1,2 h P ORS A1,DWTST,A7 NO POLLIN
0x3a363c…3a37d0 Dummy {f00=0x0127, f01=0x0190, f02=»OAD A6 h z POUT300 EQU * i P LDK A1,0 i " 0 POUT310 CF A15,TENDIO COMPLETE OUTPUT RQUEST i 4 P ABL BMM10 i h P* i z P* ORDER /27 :START POLLING i P* i POUT350 EQU * i P LD A1,DWTST,A7 i P ANK A1,2 i , P RB(Z) OUT300 POLLING AL
0x3a37d0…3a3964 Dummy {f00=0x0127, f01=0x0190, f02=» EQU * i P CF A5,HALTIN j P LDK A2,CIDISC j $ P CF A5,STHCIN j : P LD A1,DWTATP,A6 j P P ABL(Z) OUT410 j h ( P CM* DWTATP,A6 CLEAR TIMER ACTIVITY j ~ P CM DWTATP,A6 j POUT410 EQU * j P LDK A1,0 j P SC A1,DWTST+1,A6 j P SC A1,D
0x3a3964…3a3af8 Dummy {f00=0x0127, f01=0x0190, f02=» P EJECT k P* k P* k P* PROCEDURE TRANSFER PART k & P* POLL: k H * P* PERFORMED ON READ REQUEST ON k Z P* k P* k PPOLL EQU * k P LD A8,DWTECB,A7 k P ST A8,DWTSAV+10,A6 k P ST A8,DWTSAV+10,A7 k P CM ECBRC,
0x3a3af8…3a3c8c Dummy {f00=0x0127, f01=0x0190, f02=» * k P LD A1,PACT,A6 l ( P RF(Z) POL130 NO ACTIVE TCA PRESENT l PPOL110 EQU * l L P ADK A1,4 l ` P LDR* A3,A1 GET NEXT TCA l r P RB(Z) POL110 EMPTY PLACE l " P RF(NN) POL150 ACTIVE TC FOUND l P ADK A3,1 l P RB(NZ) POL110 INACTIVE TCA
0x3a3c8c…3a3e20 Dummy {f00=0x0127, f01=0x018e, f02=» LD A1,PINACT,A6 l ( P ABL(Z) BMM10 NO ACTIVE TC PRESENTS m PPOL132 EQU * m D & P ADK A1,4 NEXT POSITION IN POLLIST m X P CW A1,PINACT,A6 m P RF(E) POL134 LIST SCANNED m P LDR* A3,A1 m " P RB(NN) POL132 NOT INACTIVE TC m P ADK A3,1 m $ P
0x3a3e20…3a3fb4 (5, 633) Dummy {f00=0x0128, f01=0x0190, f02=» P LDR* A3,A1 n $ P RF(N) POL140 INACTIVE TC FOUND n ( P CM PINACT,A6 NO INACTIVE IN POLLIST n @ P ABL BMM10 n l PPOL138 EQU * n ~ P SUK A3,1 n PPOL140 EQU * n " P ST A1,PINACT,A6 UPDATE PINACT n P SUR A1,A6 n P SUK A1,PLIST n P S
0x3a3fb4…3a4148 Dummy {f00=0x0128, f01=0x0190, f02=»POL150 EQU * n P ST A1,PACT,A6 UPDATE PACT o P SUR A1,A6 o 6 P SUK A1,PLIST o H * P SC A1,DWTOR,A6 SAVE INDEX IN POLLIST o ^ P LDK A1,0 o P SC A1,DWTOR,A7 ACTIVE TC o P LDKL A2,RTYLIM o PPOL200 EQU * o ( P ST A2,DWTRTY,A6 RESET RETRY
0x3a4148…3a42dc Dummy {f00=0x0128, f01=0x018e, f02=»CA IN LEFT BYTE o P ORK A1,TRRP p P* p , P* SEND POLL p 6 P* p J P CF A5,TRSF p T P* p h P* READ ANSWER p r P* p P CF A5,RDITI p P LDR A2,A2 TIME OUT p P RF(NN) POL230 NO p P* p P* TIME OUT p P* p PPOL211
0x3a42dc…3a4470 Dummy {f00=0x0128, f01=0x0190, f02=» p P* q P* UPDATE POLL LIST q P* q , PTINACT EQU * q 6 P LD A1,DWTOR,A7 q J & P ABL(N) BMM10 TC ALREADY INACTIVE q b " P LD* A3,PACT,A6 GET TC ADDRESS q P ANK A3,/7F q " P ORKL A3,/8000 SET TC INACTIVE q P ST* A3,PACT,A6 q ( P SC*
0x3a4470…3a4604 Dummy {f00=0x0128, f01=0x0190, f02=»24 EQU * q " P LDK A1,TCINAC RC:TC INACTIVE r PPOL225 EQU * r 6 P LDR A6,A7 r J $ P CF A15,TENDIO END READ REQUEST r PPOL226 EQU * r " P LD A6,DWTSAV+6,A7 RESTORE A6 r P ABL BMM10 r P EJECT r P* r P* r & P* POLL OK,ANSWER RECEI
0x3a4604…3a4798 Dummy {f00=0x0128, f01=0x018e, f02=» ** RNR :BUSY r 0 P* ** ROL :REQUEST ON LINE s 0 P* **CMDR :OUT OF SEQUENCE s T P* s P* s PPOL230 EQU * s P LDR A1,A2 GET CONTROL WORD s P ANK A1,REMI s " P RF(Z) POL280 I-FRAME-DETECTED s
0x3a4798…3a492c Dummy {f00=0x0128, f01=0x0190, f02=» P ANK A1,REMRR t P SUK A1,MRNR t P RF(Z) POL260 RNR DETECTED t . P* t P P LDR A1,A2 t Z P ANK A1,MSKFF t l P SUK A1,MROL t P RF(Z) SOFTDI ROL DETECTED t P* t P LDR A1,A2 t P ANK A1,MSKFF t P SUK A1,RECMDR t 0 P RB(NZ)
0x3a492c…3a4ac0 Dummy {f00=0x0128, f01=0x0190, f02=»LL LIST t r P RF SOFTDI u P EJECT u " P* u 0 P* RNR RECEIVED u : P* u R PPOL260 EQU * u P LDKL A1,BIT13 RNR u p P ORS A1,DWTST,A7 u PPOL261 EQU * u , P CF A5,UPDCON UPDATE PROTOCOL'S CONTERS u P LD A1,DWTST,A7 WRONG N(R)? u
0x3a4ac0…3a4c54 (5, 634) Dummy {f00=0x0128, f01=0x018e, f02=»DK A3,PLIST RESTORE P-LIST POINTER u P LDR A4,A3 v * P SUK A4,2 v < P LDK A1,0 v N P STR A1,A4 RESET COUNTERS v ` P LDR* A1,A3 GET TC v P ANK A1,/7F v P ECR A1,A1 v P ORK A1,TSNRM v P CF A5,TRUF TRANSMIT SNRM v PSOFTD1 CF A5,R
0x3a4c54…3a4de8 Dummy {f00=0x0128, f01=0x0190, f02=» v P LD A1,DWTST,A7 w P ANKL A1,BIT13 w P RF(NZ) POL265 RNR w 6 P RF TACT RR w P PPOL265 EQU * w d P LC A3,DWTOR,A6 SET INDEX w x P ANK A3,/FF w P ADR A3,A6 w P ADK A3,PLIST w P LDR A1,A3 INDEX w P SUK A1,2 w P LDKL A2
0x3a4de8…3a4f7c Dummy {f00=0x0128, f01=0x0190, f02=»BIT13 w P ANS A1,DWTST,A7 x P RB POL261 x & P EJECT x 8 P* x F , P* HERE TO COMPLETE I/O AND UPDATE PLIST x P P* ACTIVE TENDENCE x P* x PTACT EQU * x P LD A1,DWTOR,A7 x " P ABL(NN) BMM10 TC NOT INACTIVE x PTACT1 EQU * x
0x3a4f7c…3a5110 Dummy {f00=0x0128, f01=0x0190, f02=»A1,PACT,A6 x PTACT2 EQU * y P LDKL A1,TCACT RC:TC ACTIVE y & P RB POL225 y J P* y P EJECT y f P* y t P* I-FRAME DETECTED y ~ P* y PPOL280 EQU * y P CF A5,UPDCON y P LD A1,DWTST,A7 GET STATUS y P ANKL A1,BIT12 WRONG N(R
0x3a5110…3a52a4 Dummy {f00=0x0128, f01=0x018e, f02=»* y PPOL281 EQU * z P LD A1,DWTST,A7 z P ANKL A1,BIT11 WRONG N(S) ? z 6 P RF(Z) POL282 NO z Z " P RB TACT INDICATE ACTIVE ONLY z r P* z ( P* N(S) AND N(R) OK,COMPLETE REQUEST z P* z PPOL282 EQU * z P LD A1,DWTOR,A7 z P RB(
0x3a52a4…3a5438 Dummy {f00=0x0128, f01=0x0190, f02=» z PWRITE EQU * { P* { & P* BEFORE TRANSMIT TEST IF TC BUSY { & P* { P ( P LC A2,DWTOR,A6 GET INDEX IN POLLIST { Z P ANK A2,/FF { P ADR A2,A6 { P SUK A2,2 { P ADK A2,PLIST-2 =1 { P LDR* A2,A2 GET STATUS TC { P ANKL A2,BIT
0x3a5438…3a55cc Dummy {f00=0x0128, f01=0x0190, f02=»NDIO { P CF A5,HALTIN | P ABL BMM10 | " P* | 4 PWRITE1 EQU * | > P LDKL A1,RTYLIM | R ( P ST A1,DWTRTY,A6 RESET RETRY COUNTER | j PWRT100 EQU * | P LD A1,DWTST,A7 | " P RF(N) WRT200 NO READ REQUEST | P ANK A1,2 HALT POLLING ? | P
0x3a55cc…3a5760 Dummy {f00=0x0128, f01=0x0190, f02=»* READ WITH BUFFER FOR I-FRAME | P* } & PWRT020 EQU * } 0 P CF A5,RDITI } D P LDR A2,A2 TIME-OUT } X P RF(NN) WRT050 NO } t , PWRT021 IM DWTRTY,A6 YES,INCREMENT RETRY } P RF(Z) WRT400 DISCONNECT } P* } P* SEND RR FRAME } P* }
0x3a5760…3a58f4 (5, 635) Dummy {f00=0x0128, f01=0x0190, f02=»* } P* NO TIME-OUT ~ P* ~ PWRT050 EQU * ~ * PWRT055 EQU * ~ > P LDR A1,A2 ~ R P ANK A1,REMI I-FRAME ? ~ d P RF(Z) WRT060 ~ P EJECT ~ P* ~ P* TEST RR,RNR,CMDR* ~ P* ~ PWRT056 EQU * ~ P LDR A1,A2 ~ P ANK A1,REMR
0x3a58f4…3a5a88 Dummy {f00=0x0128, f01=0x0190, f02=»0 RNR ~ P* P LDR A1,A2 P SUK A1,RECMDR * P RF(Z) WRT090 CMDR @ P* Z * P* HERE INVALID FRAME HAS BEEN RECEIVED d P* P RB WRT021 TRY TO RECOVER P EJECT P* P* I-FRAME DETECTED P* PWRT060 EQU *
0x3a5a88…3a5c1c Dummy {f00=0x0128, f01=0x018e, f02=»RT P* PWRT061 EQU * P LD A1,DWTST,A7 ( P ANKL A1,BIT11 WRONG N(S) ? @ P RF(Z) WRT062 NO d ( P ABL POL226 INDICATE WITH NEXT POLL | P* PWRT062 EQU * P RB POL282 COMPLETE REQUEST P EJECT P* P* RNR
0x3a5c1c…3a5db0 Dummy {f00=0x0128, f01=0x0190, f02=» P LD A1,DWTST,A7 P ANKL A1,BIT12 WRONG N(R) ? P RF(Z) WRT072 @ P RF INPDIS YES V P* l PWRT072 EQU * v ( P LC A2,DWTOR,A6 GET INDEX IN POLLIST P ANK A2,/FF P ADR A2,A6 P SUK A2,2 P ADK A2,PLIST P LD
0x3a5db0…3a5f44 Dummy {f00=0x0128, f01=0x0190, f02=»L A1,BIT0 P ORRS A1,A2 P ABL POL226 & PWRT074 EQU * : P LDKL A1,/7FFF N P ANRS A1,A2 d P ABL POL226 x P* PWRT080 EQU * P LDKL A1,NBIT13 P ANS A1,DWTST,A7 RR P RB WRT071 P* PWRT090 EQU *
0x3a5f44…3a60d8 Dummy {f00=0x0128, f01=0x0190, f02=»00 EQU * P LDK A1,1 P CF A5,TRI " PWRT201 EQU * 4 P CF A5,RDUSTI H P LDR A2,A2 ^ $ P RF(N) WRT300 TIME-OUT DETECTED p " P RB WRT056 TEST RECEIVED FRAME PWRT300 EQU * " P IM DWTRTY,A6 INCREMENT RETRY P RF(Z) WRT400
0x3a60d8…3a626c Dummy {f00=0x0128, f01=0x0190, f02=»* HERE ON RETRY EXPIRATION.COMPLETE RTEQUEST P* SET TC INACTIVE 4 P* P PWRT400 EQU * Z P CM ECBRC,A8 n " P LDK A1,TCINAC RC:TC INACTIVE PWRT401 EQU * P CF A15,TENDIO P LC* A3,ECBBA,A8 P ANK A3,/7F $ P LC A2,DWT
0x3a626c…3a6400 Dummy {f00=0x0128, f01=0x0190, f02=»A2 P LD A1,PINACT,A6 P RF(NZ) WRT402 =1 " P LD A2,PACT,A6 < P ST A2,PINACT,A6 R PWRT402 EQU * =1 j P CF A5,HALTIN P ABL BMM10 P* P* RECOVER WRONG N(R) P* PINPDIS EQU * P IM DWTRTY,A6 RETRY COUNTE
0x3a6400…3a6594 (5, 636) Dummy {f00=0x0128, f01=0x0190, f02=»IST P SUK A3,2 P LDK A1,0 P STR A1,A3 RESET COUNTERS 0 P LC* A3,ECBBA,A8 R P ANK A3,/7F j P ECR A3,A3 ~ P ORK A3,TSNRM P LDR A1,A3 P CF A5,TRUF TRANSMIT SNRM P CF A5,RDUSTIS P LDR A2,A2 =1 P R
0x3a6594…3a6728 Dummy {f00=0x0128, f01=0x0190, f02=»RNAL SUBROUTINES P* P* " P* RESTITUTE COUNTERS , P* J PLOADCO EQU * T ( P LC A3,DWTOR,A6 GET INDEX IN POLLIST h P ANK A3,/FF P ADR A3,A6 P ADK A3,PLIST $ P SUK A3,2 A2 POINTS ON COUNTERS P LDR* A1,A3
0x3a6728…3a68bc Dummy {f00=0x0128, f01=0x0190, f02=»6 P LDR* A1,A3 P SRL A1,6 ISOLATE LNR P ANKL A1,7 < P ST A1,LNR,A6 N P LDR* A1,A3 d P SRL A1,9 x $ P ANKL A1,7 ISOLATE CHECK P]OINT P ST A1,CPS,A6 P RTN A5 P EJECT P* . P* GET CURRENT VARIABLE C
0x3a68bc…3a6a50 Dummy {f00=0x0128, f01=0x018e, f02=»RAME NO N(S) z P LDR A1,A2 P SRL A1,1 & P ANK A1,7 8 P CW A1,VRS,A6 CHECK N(S) J P RF(NE) UPD080 NOT OK j P LDKL A1,NBIT11 ( P ANS A1,DWTST,A7 RESTORE WRONG N(S) " P IM VRS,A6 INCREMENT VARIABLE P LDK A1,7 P ANS
0x3a6a50…3a6be4 Dummy {f00=0x0128, f01=0x0190, f02=» PUPD100 EQU * P LDR A1,A2 P SRL A1,5 PICK OUT N(R) * P ANK A1,7 J " P LD A3,CPS,A6 GET CHECK-POINT P CW A3,LNR,A6 & P RF(E) UPD210 NO TRANSMISSION DONE , P CW A1,CPS,A6 TRANSMISSION ACKNOLEDGED ? P RF(NE) UPD130 * P
0x3a6be4…3a6d78 Dummy {f00=0x0128, f01=0x0190, f02=» " P ANS A1,DWTST,A7 RESTORE N(R) P LDK A1,0 . P CF A15,TENDIO @ , P CF A5,STORCO RESTORE POLLIST'S COUNTERS V P RTN A5 P* ( P* LAST TRANSMISSION NOT ACKNOLEDGED P* PUPD130 EQU * P LDKL A4,-1 P ADS A4,VS
0x3a6d78…3a6f0c Dummy {f00=0x0128, f01=0x0190, f02=» P ADK A5,4 UPDATE STACK =1 P IM DWTRTY,A6 RETRY & P ABL(Z) WRT400 INACTIVE TC B P ABL WRT100 RESEND FRAME d P* P* INDICATE WRONG N(R) P* PUPD205 EQU * P LDKL A1,BIT12 P ORS A1,DWTST,A7 P CF A5,STORCO
0x3a6f0c…3a70a0 Dummy {f00=0x0128, f01=0x0190, f02=» CW A1,VSS,A6 P RB(NE) UPD205 P LDKL A1,NBIT12 , ( P ANS A1,DWTST,A7 RESTORE N(R) STATUS D P CF A5,STORCO p P RTN A5 P* P EJECT P* 0 P* BEFORE RETURN,RESTORE COUNTERS IN POLLIST P* PSTORCO EQU *
0x3a70a0…3a7234 (5, 637) Dummy {f00=0x0129, f01=0x0190, f02=»2 $ P ANKL A3,/8000 ISOLATE BUSY FLAG P CMR A2 2 P LD A1,VRS,A6 B P ORRS A1,A2 X P LD A1,VSS,A6 l P SLL A1,3 P ORRS A1,A2 P LD A1,LNR,A6 P SLL A1,6 P ORRS A1,A2 P LD A1,CPS,A6 P SLL A1,9
0x3a7234…3a73c8 Dummy {f00=0x0129, f01=0x0190, f02=»ED TO TRANSFER FRAMES x * P* TRSF :SHORT FRAME (16 BITS) . P* TRUF :UNNUMBERED FRAME (16 BITS) L 0 P* TRI :I-FRAME WITH POLL-BIT OR NOT ~ P* , P* A1 CONTAINS ADDRESS+C-FIELD P* PTRSF EQU * P
0x3a73c8…3a755c Dummy {f00=0x0129, f01=0x0190, f02=»A6 P ADK A2,PLIST P SUK A2,2 P LDR* A3,A2 2 P ANKL A3,7 F P SLL A3,5 X & P ORR A1,A3 STORE VR IN SENT FRAME j P* PTRUF EQU * & P ST A1,SENDF,A6 INIT OUTPUT FIELD P LDKL A3,SENDF P ADR A3,A6 P LDK A
0x3a755c…3a76f0 Dummy {f00=0x0129, f01=0x0190, f02=»L POLL-BIT ON P RF TRISGL POLL-BIT OFF PTRIPOL EQU * 6 P LDK A2,/10 J P CF A5,PRCFI INIT C-FIELD ^ & P LD A3,ECBBA,A8 GET BUFFER ADDRESS P LDKL A1,/FF00 " P ANRS A1,A3 SAVE ADDRESS FIELD " P ORRS A2,A3 MERGE WITH C-FIELD
0x3a76f0…3a7884 Dummy {f00=0x0129, f01=0x0190, f02=»CBBA,A8 P LDKL A1,/FF00 P ANRS A1,A3 & P ORRS A2,A3 : P LD A4,ECBRL,A8 N P RF SENDZ0 f P EJECT x P* < P* SUBROUTINE USED TO UPDATE C-FIELD WHEN SENDIND I-FRAME P* PPRCFI EQU * P CF A5,LOADCO LOAD COUNTER
0x3a7884…3a7a18 Dummy {f00=0x0129, f01=0x018e, f02=»S) ~ P RTN A5 P EJECT P* ( P* SEND MODULES 2 P* H PSENDX0 EQU * R P* f . P* START TRANSMITTER AND SEND SHORT FRAME p P* P CF A5,STHCUT CIO START & P ABL(NN) OLI160 MODEM NOT OPERABLE P RF SENDXX P
0x3a7a18…3a7bac Dummy {f00=0x0129, f01=0x0190, f02=» P* PSENDY0 EQU * P CF A5,STHCUT CIO START " & P ABL(NN) OLI160 MODEM NOT OPERABLE B P LD A1,VSS,A6 l P ADK A1,1 P ANK A1,7 MODULO 7 P ST A1,VSS,A6 N(S) P ST A1,CPS,A6 CHECK POINT " P CF A5,STORCO RESTORE COUNTERS
0x3a7bac…3a7d40 Dummy {f00=0x0129, f01=0x0190, f02=» x & P ABL(NN) OLI160 MODEM NOT OPERABLE P LD A1,VSS,A6 2 P ADK A1,1 H P ANK A1,7 Z P ST A1,VSS,A6 l P ST A1,CPS,A6 P CF A5,STORCO P* P* SEND POLL-BIT IN RNR P* P LDKL A1,TRNRP P LD A2,VRS,A6 GE
0x3a7d40…3a7ed4 (5, 638) Dummy {f00=0x0129, f01=0x0190, f02=» P ST A1,SENDF,A6 P LDKL A3,SENDF P ADR A3,A6 2 P CF A5,STHCUT CIO START D P ABL(NN) OLI160 d P RTN A5 | P EJECT P* P* 2 P* COMMON SUBROUTINES TO READ A COMPLETE FRAME 0 P* RDUSTI : READ WITHOUT BUFF
0x3a7ed4…3a8068 Dummy {f00=0x0129, f01=0x018e, f02=» j " P ST A4,DCBUCU,A7 STORE IN DWT P* . P* INIT RECEIVE BUFFER 8 P* V P LDKL A4,USBUF ` P ADR A4,A7 BUFFER ADDRESS v P LDK A3,0 INIT LENGTH P RF RDUT10 P* PRDITI EQU * $ P LD A8,DWTECB,A7 GET ECB POINTER
0x3a8068…3a81fc Dummy {f00=0x0129, f01=0x0190, f02=» P* PRDUT10 EQU * P LDR A1,A7 " P* 4 P* START TIMER > P* T " P ST A4,DWTSAV+2,A7 SAVE A4 =1 ^ P CF A15,SETIME P DATA RDUT20,TIMRE4 ( P ST A4,DWTTP,A7 STORE TIMER POINTER " P LD A4,DWTSAV+2,A7 RESTORE A4 P
0x3a81fc…3a8390 Dummy {f00=0x0129, f01=0x0190, f02=» ~ P LD A3,DWTSAV,A7 P LD A4,DWTSAV+2,A7 P LD A5,DWTSAV+4,A7 : P LD A6,DWTSAV+6,A7 T P LD A8,DWTSAV+10,A7 n P ADK A5,4 STACK =1 P CF A5,HALTIN " P ABL(Z) OLI160 MODEM NOT READY P* PRDUT30 EQU * P ORKL A2
0x3a8390…3a8524 Dummy {f00=0x0129, f01=0x0190, f02=»M CHANNEL p P CF A5,STHCIN " P RB(O) RDUT10 RETRY CIO START ( P* N P* READ FRAME OK? X P* ON RETURN A3 = LENGTH p P* P ABL(Z) OLI160 P RF(N) READOK P* & P* ERRORS WITHIN FRAME,POLL AGAIN P* P LDK
0x3a8524…3a86b8 Dummy {f00=0x0129, f01=0x0190, f02=» A2,A4 , P CC A2,SENDF,A6 SAME ADDRESS AS POLLED ? P RF(E) RDOK1 YES > P LDKL A2,/8000 V P RTN A5 l PRDOK1 EQU * | P LDR* A2,A4 P LDR A1,A2 P ANK A1,REMI READ FRAME ? P RF(NZ) READUT NO , P ST A3,ECBEL,A8 INIT L
0x3a86b8…3a884c Dummy {f00=0x0129, f01=0x0190, f02=»RT TRANSMITTER 6 P* GO TO DISPATCHER TO ACCEPT OUTPUT INTERRUPTS P* P PSTHCUT EQU * Z P LD A1,PFPOST =3 n ( P ABL(NZ) TDISP WAIT FOR POWER UP =3 P LCR A1,A3 =1 P SC A1,SENDF,A6 " P LDR* A1,A6 GET DEVICE ADDRESS $ P
0x3a884c…3a89e0 Dummy {f00=0x0129, f01=0x0190, f02=»NIFICANTS v P LDKL A2,/800 . PSTHCU0 ADK A2,CIT4WP TRANSMIT 4-WIRES P.C ( $ P ADR A4,A3 END OF BUFFER ADDRESS Z PSTHCUX EQU * P HLT * P RF IHU400 *** SHOULD BE ACCEPTED *** P* P* IDLE ONE ON LINE P* PSTHID1 EQU
0x3a89e0…3a8b74 (5, 639) Dummy {f00=0x0129, f01=0x0190, f02=» P RF IHU400 P EJECT P* ( P* 2 , P* INTERRUPT HANDLER,CHLC TRANSMITTER 1 < P* l P* v PIH8202 EQU * $ P STR A1,A15 SAVE A1,A8 ON STACK P STR A2,A15 P STR A3,A15 P STR A4,A15 P STR A5,A15
0x3a8b74…3a8d08 Dummy {f00=0x0129, f01=0x018e, f02=»SAV,A6 P LD A4,DWTSAV+2,A6 P LD A5,DWTSAV+4,A6 ( P LD A7,DWTSAV+8,A6 B P LD A8,DWTSAV+10,A6 " P LCR A2,A3 ODD OR EVEN ADDRESS x P SLL A2,8 P LC A2,+1,A3 PIHU200 EQU * P OTR A2,0,DAMU01 OUTPUT WORD P* PIH
0x3a8d08…3a8e9c Dummy {f00=0x0129, f01=0x0190, f02=» P CWR A3,A4 END OF BUFFER ? P RF(L) IHU400 & P* < ( P* TRANSMISSION DONE,HALT TRANSMITTER F P* r P LD A1,PFPOST =3 | ( P ABL(NZ) TDISP WAIT FOR POWER UP =3 . P LDKL A1,CIOH CREATE CIO HALT INSTRUCTION P ADR* A1,A6 P
0x3a8e9c…3a9030 Dummy {f00=0x0129, f01=0x0190, f02=»V+4,A6 P* & P* RETURN TO INTERRUPTED PROGRAMM P* B PRETURN EQU * L P LDR* A8,A15 ` P LDR* A7,A15 t P LDR* A6,A15 P LDR* A5,A15 P LDR* A4,A15 P LDR* A3,A15 P LDR* A2,A15 P LDR* A1,A15 P RTN A15
0x3a9030…3a91c4 Dummy {f00=0x0129, f01=0x0190, f02=»TR A2,A15 P STR A3,A15 P STR A4,A15 & P STR A5,A15 : P STR A6,A15 N P STR A7,A15 b P STR A8,A15 v P* & P LDKL A6,DW8204 RESTORE OUTPUT DWT P LD A3,DWTSAV,A6 P LD A4,DWTSAV+2,A6 P LD A5,DWTSAV+4,A6
0x3a91c4…3a9358 Dummy {f00=0x0129, f01=0x018e, f02=»02 P ABL IHUXX P IFF HILINO=2 P EJECT 2 P* @ P* CHLC TRANSMITTER 3 J P* f PIH8206 EQU * p P STR A1,A15 P STR A2,A15 P STR A3,A15 P STR A4,A15 P STR A5,A15 P STR A6,A15 P STR A7,A15
0x3a9358…3a94ec Dummy {f00=0x0129, f01=0x0190, f02=» P LD A7,DWTSAV+8,A6 P LD A8,DWTSAV+10,A6 P* : P LCR A2,A3 D P SLL A2,8 V P LC A2,+1,A3 h P OTR A2,0,DAMU03 | P ABL IHUXX P IFF HILINO=3 P EJECT P* P* CHLC TRANSMITTER 4 P* PIH8208 EQU *
0x3a94ec…3a9680 Dummy {f00=0x0129, f01=0x018e, f02=»5 P STR A8,A15 P* P LDKL A6,DW8208 ( P LD A3,DWTSAV,A6 @ P LD A4,DWTSAV+2,A6 X P LD A5,DWTSAV+4,A6 r P LD A7,DWTSAV+8,A6 P LD A8,DWTSAV+10,A6 P* P LCR A2,A3 P SLL A2,8 P LC A2,+1,A3 P OTR
0x3a9680…3a9814 (5, 640) Dummy {f00=0x0129, f01=0x0190, f02=» P STR A1,A15 P STR A2,A15 P STR A3,A15 0 P STR A4,A15 D P STR A5,A15 X P STR A6,A15 l P STR A7,A15 P STR A8,A15 P* P LDKL A6,DW8210 P LD A3,DWTSAV,A6 P LD A4,DWTSAV+2,A6 P LD A5,DWTSA
0x3a9814…3a99a8 Dummy {f00=0x0129, f01=0x0190, f02=»TR A2,0,DAMU05 P ABL IHUXX P IFF HILINO=5 ( P EJECT > P* L P* CHLC TRANSMITTER 6 V P* r PIH8212 EQU * | P STR A1,A15 P STR A2,A15 P STR A3,A15 P STR A4,A15 P STR A5,A15 P STR A6,A15 P
0x3a99a8…3a9b3c Dummy {f00=0x0129, f01=0x0190, f02=»V+4,A6 P LD A7,DWTSAV+8,A6 P LD A8,DWTSAV+10,A6 ( P* D P LCR A2,A3 N P SLL A2,8 ` P LC A2,+1,A3 r P OTR A2,0,DAMU06 P ABL IHUXX P IFF HILINO=6 P EJECT P* P* TRANSMITTER 7 P* PIH8214 E
0x3a9b3c…3a9cd0 Dummy {f00=0x0129, f01=0x0190, f02=» A7,A15 P STR A8,A15 P* $ P LDKL A6,DW8214 . P LD A3,DWTSAV,A6 F P LD A4,DWTSAV+2,A6 ^ P LD A5,DWTSAV+4,A6 x P LD A7,DWTSAV+8,A6 P LD A8,DWTSAV+10,A6 P* P LCR A2,A3 P SLL A2,8 P LC A2,+1,A3
0x3a9cd0…3a9e64 Dummy {f00=0x0129, f01=0x018e, f02=»QU * P STR A1,A15 P STR A2,A15 P STR A3,A15 4 P STR A4,A15 H P STR A5,A15 P STR A6,A15 p P STR A7,A15 P STR A8,A15 P* P LDKL A6,DW8216 P LD A3,DWTSAV,A6 P LD A4,DWTSAV+2,A6 P LD A5,D
0x3a9e64…3a9ff8 Dummy {f00=0x0129, f01=0x0190, f02=» P OTR A2,0,DAMU08 P ABL IHUXX P IFF HILINO=8 . P EJECT D P* R P* CHLC TRANSMITTER 9 P* x PIH8218 EQU * P STR A1,A15 P STR A2,A15 P STR A3,A15 P STR A4,A15 P STR A5,A15 P STR A6,A15
0x3a9ff8…3aa18c Dummy {f00=0x0129, f01=0x0190, f02=»,DWTSAV+4,A6 P LD A7,DWTSAV+8,A6 P LD A8,DWTSAV+10,A6 . P* J P LCR A2,A3 T P SLL A2,8 f P LC A2,+1,A3 x P OTR A2,0,DAMU09 P ABL IHUXX P IFF HILINO=9 P EJECT P* P* CHLC TRANSMITTER 10 P*
0x3aa18c…3aa320 Dummy {f00=0x0129, f01=0x018e, f02=» P STR A7,A15 P STR A8,A15 P* 0 P LDKL A6,DW8220 : P LD A3,DWTSAV,A6 R P LD A4,DWTSAV+2,A6 j P LD A5,DWTSAV+4,A6 P LD A7,DWTSAV+8,A6 P LD A8,DWTSAV+10,A6 P* P LCR A2,A3 P SLL A2,8 P LC A2
0x3aa320…3aa4b4 (5, 641) Dummy {f00=0x012a, f01=0x0190, f02=» PIH8222 EQU * P STR A1,A15 P STR A2,A15 0 P STR A3,A15 D P STR A4,A15 X P STR A5,A15 l P STR A6,A15 P STR A7,A15 P STR A8,A15 P* P LDKL A6,DW8222 P LD A3,DWTSAV,A6 P LD A4,DWTSAV+2,A6
0x3aa4b4…3aa648 Dummy {f00=0x012a, f01=0x0190, f02=»C A2,+1,A3 P OTR A2,0,DAMU11 P ABL IHUXX * P IFF HILINO=11 < P EJECT R P* ` P* CHLC TRANSMITTER 12 j P* PIH8224 EQU * P STR A1,A15 P STR A2,A15 P STR A3,A15 P STR A4,A15 P STR A5,A15
0x3aa648…3aa7dc Dummy {f00=0x012a, f01=0x0190, f02=»A6 P LD A5,DWTSAV+4,A6 P LD A7,DWTSAV+8,A6 $ P LD A8,DWTSAV+10,A6 > P* Z P LCR A2,A3 d P SLL A2,8 v P LC A2,+1,A3 P OTR A2,0,DAMU12 P ABL IHUXX P XIF P EJECT P* . P* SST INTERRUPT HANDLER,CHLC
0x3aa7dc…3aa970 Dummy {f00=0x012a, f01=0x0190, f02=» P RF(A) SSTU20 SST ACCEPTED P HLT * PSSTU20 EQU * 6 P IFF LOGG=0 =1 J P CF A5,LOGSST b P XIF x " P ANK A2,3 GET ONLY BITS 14.15 P LDR A1,A2 GET STATUS P RF(NZ) SSTU40 SST NOT OK P LDK A2,2 PSSTU30 EQU *
0x3aa970…3aab04 Dummy {f00=0x012a, f01=0x0190, f02=» LDR A1,A2 P ANK A1,MODNOP P RF(Z) SSTU50 MODEM OK ( P LDK A2,0 F " P RB SSTU30 MODEM NOT OPERABLE X P* ~ PSSTU50 EQU * P LDR A1,A2 P ANK A1,2 P RF(Z) SSTU60 ERRORS P ABL IHU400 THROUGPUT PSSTU60 EQU *
0x3aab04…3aac98 Dummy {f00=0x012a, f01=0x0190, f02=»GO TO DISPATCHER TO ACCEPT INPUT INTERRUPTS , P* A2 COUNTAINS CIO PARAMETER 4 P* d PSTHCIN EQU * n P LD A1,PFPOST =3 ( P ABL(NZ) TDISP WAIT FOR POWER UP =3 " P LDR* A1,A7 GET DEVICE ADDRESS , P ADKL A1,CIOST CREATE STAR
0x3aac98…3aae2c Dummy {f00=0x012a, f01=0x0190, f02=»RUPT HANDLER,CHLC RECEIVER P* " PIH8201 EQU * , $ P STR A1,A15 SAVE A1,A8 ON STACK @ P STR A2,A15 h P STR A3,A15 | P STR A4,A15 P STR A5,A15 P STR A6,A15 P STR A7,A15 P STR A8,A15 P* " P LDKL A7,D
0x3aae2c…3aafc0 Dummy {f00=0x012a, f01=0x0190, f02=»,DWTSAV+10,A7 P* ( P INR A2,0,DAMI01 GET WORD FROM LINE PIHI200 EQU * L P ABL(NA) SSTIN0 ` P IFF LOGG=0 =1 x P CF A5,LOGIN P XIF P* P* INPUT INTERRUPT ACCEPTED P* P ADR A4,A3 GET BUFFER ADDESS
0x3aafc0…3ab154 (5, 642) Dummy {f00=0x012a, f01=0x0190, f02=» P ADK A3,2 P CW A3,DCBUCU,A7 $ P RF(L) IHI300 NO BUFFER OVERFLOW . , P SUK A3,2 YES,MAINTAIN DATA IN LAST WORD V P* PIHI300 EQU * P ST A3,DWTSAV,A7 P ST A4,DWTSAV+2,A7 P ST A5,DWTSAV+4,A7 P ABL RETURN P IFF
0x3ab154…3ab2e8 Dummy {f00=0x012a, f01=0x018e, f02=» P STR A3,A15 P STR A4,A15 P STR A5,A15 , P STR A6,A15 @ P STR A7,A15 T P STR A8,A15 h P* | P LDKL A7,DW8203 P LD A3,DWTSAV,A7 P LD A4,DWTSAV+2,A7 P LD A5,DWTSAV+4,A7 P LD A6,DWTSAV+6,A7 P LD
0x3ab2e8…3ab47c Dummy {f00=0x012a, f01=0x0190, f02=» P EJECT P* P* CHLC RECEIVER 3 P* 6 PIH8205 EQU * @ P STR A1,A15 T P STR A2,A15 h P STR A3,A15 | P STR A4,A15 P STR A5,A15 P STR A6,A15 P STR A7,A15 P STR A8,A15 P LDKL A7,DW8205
0x3ab47c…3ab610 Dummy {f00=0x012a, f01=0x0190, f02=» P INR A2,0,DAMI03 P ABL IHI200 P IFF HILINO=3 4 P EJECT J P* X P* CHLC RECEIVER 4 b P* | PIH8207 EQU * P STR A1,A15 P STR A2,A15 P STR A3,A15 P STR A4,A15 P STR A5,A15 P STR A6,A1
0x3ab610…3ab7a4 Dummy {f00=0x012a, f01=0x0190, f02=»D A5,DWTSAV+4,A7 P LD A6,DWTSAV+6,A7 P LD A8,DWTSAV+10,A7 2 P* N P INR A2,0,DAMI04 X P ABL IHI200 p P IFF HILINO=4 P EJECT P* P* CHLC RECEIVER 5 P* PIH8209 EQU * P STR A1,A15 P STR A2,A1
0x3ab7a4…3ab938 Dummy {f00=0x012a, f01=0x0190, f02=» P LDKL A7,DW8209 P LD A3,DWTSAV,A7 P LD A4,DWTSAV+2,A7 4 P LD A5,DWTSAV+4,A7 N P LD A6,DWTSAV+6,A7 h P LD A8,DWTSAV+10,A7 P* P INR A2,0,DAMI05 P ABL IHI200 P IFF HILINO=5 P EJECT P* P* CHLC
0x3ab938…3abacc Dummy {f00=0x012a, f01=0x0190, f02=»5,A15 P STR A6,A15 P STR A7,A15 " P STR A8,A15 6 P* J P LDKL A7,DW8211 T P LD A3,DWTSAV,A7 l P LD A4,DWTSAV+2,A7 P LD A5,DWTSAV+4,A7 P LD A6,DWTSAV+6,A7 P LD A8,DWTSAV+10,A7 P* P INR A2,0,DAMI06
0x3abacc…3abc60 Dummy {f00=0x012a, f01=0x018e, f02=»1,A15 P STR A2,A15 P STR A3,A15 " P STR A4,A15 6 P STR A5,A15 J P STR A6,A15 ^ P STR A7,A15 r P STR A8,A15 P* P LDKL A7,DW8213 P LD A3,DWTST,A7 P LD A4,DWTST+2,A7 P LD A5,DWTST+4,A7 P
0x3abc60…3abdf4 (5, 643) Dummy {f00=0x012a, f01=0x0190, f02=» P* P* CHLC RECEIVER 8 P* , PIH8215 EQU * 6 P STR A1,A15 J P STR A2,A15 ^ P STR A3,A15 r P STR A4,A15 P STR A5,A15 P STR A6,A15 P STR A7,A15 P STR A8,A15 P* P LDKL A7,DW8215
0x3abdf4…3abf88 Dummy {f00=0x012a, f01=0x0190, f02=» P INR A2,0,DAMI08 P ABL IHI200 P IFF HILINO=8 4 P EJECT J P* X P* CHLC RECEIVER 9 b P* | PIH8217 EQU * P STR A1,A15 P STR A2,A15 P STR A3,A15 P STR A4,A15 P STR A5,A15 P STR A6,A1
0x3abf88…3ac11c Dummy {f00=0x012a, f01=0x0190, f02=»D A5,DWTSAV+4,A7 P LD A6,DWTSAV+6,A7 P LD A8,DWTSAV+10,A7 2 P* N P INR A2,0,DAMI09 X P ABL IHI200 p P IFF HILINO=9 P EJECT P* P* CHLC RECEIVER 10 P* PIH8219 EQU * P STR A1,A15 P STR A2,A1
0x3ac11c…3ac2b0 Dummy {f00=0x012a, f01=0x0190, f02=» P LDKL A7,DW8219 P LD A3,DWTSAV,A7 P LD A4,DWTSAV+2,A7 4 P LD A5,DWTSAV+4,A7 N P LD A6,DWTSAV+6,A7 h P LD A8,DWTSAV+10,A7 P* P INR A2,0,DAMI10 P ABL IHI200 P IFF HILINO=10 P EJECT P* P* CHLC
0x3ac2b0…3ac444 Dummy {f00=0x012a, f01=0x0190, f02=»5,A15 P STR A6,A15 P STR A7,A15 " P STR A8,A15 6 P* J P LDKL A7,DW8221 T P LD A3,DWTSAV,A7 l P LD A4,DWTSAV+2,A7 P LD A5,DWTSAV+4,A7 P LD A6,DWTSAV+6,A7 P LD A8,DWTSAV+10,A7 P* P INR A2,0,DAMI11
0x3ac444…3ac5d8 Dummy {f00=0x012a, f01=0x0190, f02=»1,A15 P STR A2,A15 P STR A3,A15 " P STR A4,A15 6 P STR A5,A15 J P STR A6,A15 ^ P STR A7,A15 r P STR A8,A15 P* P LDKL A7,DW8223 P LD A3,DWTSAV,A7 P LD A4,DWTSAV+2,A7 P LD A5,DWTSAV+4,A7 P
0x3ac5d8…3ac76c Dummy {f00=0x012a, f01=0x018e, f02=» . P* STATUS INTERRUPT HANDLER,CHLC RECEIVER P* : , P* A2 INPUT REGISTER FOR STATUS INFO D P* t PSSTIN0 EQU * ~ & P LD A1,DWTTP,A7 GET TIMER POINTER P RF(Z) SSTI03 NO TIMER P CMR A1 P CM DWTTP,A7 CLEAR TIMER
0x3ac76c…3ac900 Dummy {f00=0x012a, f01=0x0190, f02=» P HLT P RF(A) SSTI06 P HLT , PSSTI06 EQU * 8 P IFF LOGG=0 =1 L P CF A5,LOGSST d P XIF z $ P LDR A1,A2 SAVE STATUS IN REG A1 , P ANKL A1,SSTMSK ISOLATE SIGNIFICANT BITS P RF(NZ) SST10 STATUS PRESENT P*
0x3ac900…3aca94 (5, 644) Dummy {f00=0x012a, f01=0x0190, f02=» PSSTI07 EQU * P LDK A2,2 P RF SST22 * P* < $ P* HERE TO HANDLE RECEIVER STATUS F P* n PSST10 EQU * x P LDR A1,A2 ( P ANK A1,MSKMOD MODEM AND CARRIER OFF P RF(Z) SST20 P* P* MODEM NOT OPERABLE P*
0x3aca94…3acc28 Dummy {f00=0x012a, f01=0x0190, f02=» P* P* CRC ERROR (RESTART INPUT) P* 2 P LDK A2,3 ALL TYPE ERRORS < P RF SST22 ^ P* p P* THROUGPUT ERROR z P* PSST21 LDK A2,1 PSST22 CF A5,A5CND P RTN A5 P EJECT P* P* HALT LINE INPUT
0x3acc28…3acdbc Dummy {f00=0x012a, f01=0x018e, f02=»A2,A7 P ST A2,HALT10 PHALT10 EQU * $ P HLT 8 $ P ABL IHI300 RETURN TO DISPATCHER D P EJECT l P* z P* SET CND AT A5 STACK P* PA5CND EQU * P LD A1,6,A5 GET CND WORD P ANKL A1,/FCFF P ECR A2,A2 CND WOR
0x3acdbc…3acf50 Dummy {f00=0x012a, f01=0x0190, f02=» P* SEARCH TCA IN POLLIST & P* A3=ADDRESS TO FIND TCA FOR EXIT ( P* A4=INDEX IN POLLIST R P* A2=TCA IN ENTRY p P* CR=Z ACTIVE TCA FOUND P* CR=N INACTIVE TCA FOUND P* CR=P TCA NOT FOUND P* PFINDTC EQU *
0x3acf50…3ad0e4 Dummy {f00=0x012a, f01=0x0190, f02=»QU * P LDR* A1,A3 GET TCA P CWR A1,A2 ( " P RF(E) FIND40 ACTIVE TC FOUND : P ANK A1,/FF ` P CWR A1,A2 t $ P RF(E) FIND30 INACTIVE TC FOUND P SUK A3,4 P SUK A4,4 P RB(P) FIND10 GET NEXT TCA P ADK A4,1 P A
0x3ad0e4…3ad278 Dummy {f00=0x012a, f01=0x0190, f02=»* PTST000 EQU * ** TEMP ** P ABL DISIOE ILLEGAL ORDER * P EJECT L P* Z P* INTERRUPT LOGGING ROUTINE d P* P IFF LOGG=0 =1 PLOGSST EQU * P LDKL A1,/5555 P RF LOG10 PLOGOUT EQU * P LDK A1,0
0x3ad278…3ad40c Dummy {f00=0x012a, f01=0x0190, f02=» A1,A3 P ADK A3,2 P STR A2,A3 P ADK A3,2 2 P CWK A3,LOGEND D P RF(L) LOGEXI Z P LDKL A3,LOGSTA p PLOGEXI ST A3,LOGPNT P LD A2,SAVE2 P LD A3,SAVE3 PLOGE10 RTN A5 P EJECT P* P* WORK AREAS F
0x3ad40c…3ad5a0 Dummy {f00=0x012a, f01=0x4036, f02=»3 DATA 0 P XIF P* P END &@ 2 A3,2 2 P CWK A3,LOGEND D P RF(L) LOGEXI Z P LDKL A3,LOGSTA p PLOGEXI ST A3,LOGPNT P LD A2,SAVE2 P LD A3,SAVE3 PLOGE10 RTN A5 P EJECT P* P* WORK AREAS F
0x3ad5a0…3ad734 (5, 645) Dummy {f00=0x012b, f01=0x2008, f02=» CF A5,RDUSTI ' CF A5,HALTIN ' ABL BMM10 ' 4 END ' F@ ' RF & L ADR A3,A6 & ` LDR* A2,A3 & r CM PLIST,A3 & . ) CM PLIST,+2,A3 DELETE 2 WORDS IN POLLIST & LDK A1,0 & $ CF A15,TENDIO COMPLETE REQUEST & *
0x3ad734…3ad8c8 Dummy {f00=0x012b, f01=0x0190, f02=» 0 , ADKL A9,2 NEXT WORD IN MMU ALLOCATION TABLE ' , ' CWR A9,A8 END OF MMU ALLOCATION TABLE? ' 8 P RB(E) PAGERR YES:ERROR! ' h & " RB REL:10 CHECK NEXT FOUR ENTRIES ' P EJECT ' * &REL:40 SUK A4,1 MOORE 1K-DISPLACEMENTS ' $ RF(N) REL:50 NO:SUBENTRY
0x3ad8c8…3ada5c Dummy {f00=0x012b, f01=0x0190, f02=» OCCUPIED? ' | $ RB(Z) REL:30 NO: TRY NEXT ENTRY ( C1R A2,A2 COMPLEMENT BITS ( : $ P ANRS A2,A9 CLEAR OCCUPATION BIT ( : P ANR* A6,A9 ANY OTHER SUBENTRY IN THIS ENTRY OCCUPIED? ( RF(NE) REL:60 YES ( < P LDKL A6,/FC00 ADDRESS TO LAST 4K-PAGE IN 25
0x3ada5c…3adbf0 Dummy {f00=0x012b, f01=0x0190, f02=»WR* A4,A1 GET REQUEST ISSUED BY THIS TASK? ( P RF(NE) REL:70 NO! ) 2 * P CMR A1 EXTINGUISH TRACK TO THIS TASK ) L PREL:70 SUK A7,2 A7:=-1 ) z . P ADS A7,PAG:SB,A1 DECREMENT ATTACH COUNTER ) 2 P LD A7,PAG:SB,A1 GET REMAINING NUMBER OF USERS ) . P ST A7,T
0x3adbf0…3add84 Dummy {f00=0x012b, f01=0x405e, f02=» ) ( P CF A15,RELPA2 INSERT RELEASED PAGE * PREL:80 ABL RET:50 * 4 END * N@ * Z TRACK TO THIS TASK ) L PREL:70 SUK A7,2 A7:=-1 ) z . P ADS A7,PAG:SB,A1 DECREMENT ATTACH COUNTER ) 2 P LD A7,PAG:SB,A1 GET REMAINING NUMBER OF USERS ) . P ST A7,T
0x3add84…3adf18 Dummy {f00=0x012b, f01=0x2008, f02=» +
0x3adf18…3ae0ac Dummy {f00=0x012b, f01=0x0190, f02=»P X _ @ l I :a A l ;a L # A A P A T #( W @ BP 2 #( : d M ^ R _ W D_ * $ @ @P P R " R Q 2 #( @ @ T R A @_. @ l
0x3ae0ac…3ae240 Dummy {f00=0x012b, f01=0x0190, f02=» A ~ H A v ( $ P P >P P P W _ A n T >FV :A H @ nY H @ nZ >AV W _ _ @ n @ r >BV -W >AV -W >AV B j R LPOP 0XLS TK1 TK2 MT1 MT2 pqCSH @ j !NNP !YYP !> A n : @ j! P P !> A n
0x3ae240…3ae3d4 (5, 646) Opaque[0x194]
0x3ae3d4…3ae568 # DirEnt {nam=»ST8000«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2568, f03=0x0000}
0x3ae3d4…3ae568 IdxSect {
0x3ae3d4…3ae568 f00 = 0x012b // 0x3ae3d4 @0x0
0x3ae3d4…3ae568 f01 = 0x0004 // 0x3ae3d6 @0x2
0x3ae3d4…3ae568 gno = [ // 0x3ae3d8 @0x4
0x3ae3d4…3ae568 [0x00]: C0x012b.0x1.0
0x3ae3d4…3ae568 [0x01]: C0x012b.0x2.0
0x3ae3d4…3ae568 ]
0x3ae3d4…3ae568 }
0x3ae568…3ae6fc Dummy {f00=0x012b, f01=0x018e, f02=» 2 P IDENT ST8000 REL 10.0 80-06-09 870105041000 P : P ENTRY ST8000 B P* X * P EXTRN IHPFAR,IHLKM,IHRTC,ILLINT,IHTW b P EXTRN IHTC,IHSOP,CHLT1,IHFD ( P EXTRN IASCUZ,ISLCI,ISLCO,CHRT1,IHMD P* ST8000 EQU * P* P
0x3ae6fc…3ae890 Dummy {f00=0x012b, f01=0x0190, f02=» P DATA ILLINT 13 P DATA ILLINT 6 P DATA IHTW 7 < P DATA IASCUZ 8 V P DATA IHSOP 9 r P DATA ISLCI P DATA ISLCO P DATA CHRT1 12 P DATA IHMD 13 P DAT
0x3ae890…3aea24 Dummy {f00=0x012b, f01=0x0190, f02=»ATA ILLINT 19 P DATA ILLINT 20 P DATA ILLINT 21 6 P DATA ILLINT 22 R P DATA ILLINT 23 n P DATA ILLINT 24 P DATA ILLINT 25 P DATA ILLINT 26 P DATA ILLINT 27 P DATA ILLINT
0x3aea24…3aebb8 Dummy {f00=0x012b, f01=0x0190, f02=»NT 123 P DATA ILLINT 124 P DATA ILLINT 125 . P DATA ILLINT 126 J P DATA ILLINT 127 f P DATA ILLINT 128 P DATA ILLINT 129 P DATA ILLINT 130 P DATA ILLINT 131 P DATA ILLINT 132
0x3aebb8…3aed4c Dummy {f00=0x012b, f01=0x018e, f02=»37 ~ P DATA ILLINT 138 P DATA ILLINT 139 & P DATA ILLINT 50 B P DATA ILLINT 51 ^ P DATA ILLINT 52 z P DATA ILLINT 53 P DATA ILLINT 54 P DATA ILLINT 55 P DATA ILLINT 56 P D
0x3aed4c…3aeee0 Dummy {f00=0x012b, f01=0x4030, f02=» P DATA ILLINT 62 END @ ,NT 139 & P DATA ILLINT 50 B P DATA ILLINT 51 ^ P DATA ILLINT 52 z P DATA ILLINT 53 P DATA ILLINT 54 P DATA ILLINT 55 P DATA ILLINT 56 P D
0x3aeee0…3af074 (5, 647) Dummy {f00=0x012b, f01=0x2008, f02=» NT ST8000 79-09-10 JOS * ( * 2 * < * F * P * Z ENTRY ST8000 d ST8000 EQU * z END @
0x3af074…3af208 Dummy {f00=0x012b, 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
0x3af208…3af39c Dummy {f00=0x012b, 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 _(
0x3af39c…3af530 Dummy {f00=0x012b, 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
0x3af530…3af6c4 Dummy {f00=0x012b, 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
0x3af6c4…3af858 Dummy {f00=0x012b, 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
0x3af858…3af9ec Dummy {f00=0x012b, 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
0x3af9ec…3afb80 Dummy {f00=0x012b, 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