|
DataMuseum.dkPresents historical artifacts from the history of: Philips Data Systems |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Philips Data Systems Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metricsIndex: / A B C D E F G H K L M N O P R S T U V X p ½
Length: 3703872 (0x388440)
Description: Bits:30009673 Philips computer tape "600134"
Types: SimhTapContainer, ½" Magnetic Tape
| name | artifact |
|---|---|
| INT:PROD | «none» |
| INT:PROD//OBJCT.OB | ⟦1153ced49⟧ pts_type |
| PT3272 | «none» |
| PT3272//OBJCT.OB | ⟦38400d7e6⟧ pts_type |
| PT3272/AABCON.UF | ⟦b436f5109⟧ pts_type |
| PT3272/AARCON.UF | ⟦258b13704⟧ pts_type |
| PT3272/AMFCON.UF | ⟦4cc965fd5⟧ pts_type |
| PT3272/ANHCON.UF | ⟦f0d1b3d31⟧ pts_type |
| PT3272/APLNK1.UF | ⟦87403287a⟧ pts_type |
| PT3272/APLNK2.UF | ⟦26288b864⟧ pts_type |
| PT3272/APPGEN.LM | ⟦77f51dee6⟧ pts_type |
| PT3272/APPGEN.UF | ⟦0672d1a44⟧ pts_type |
| PT3272/ARHCON.UF | ⟦5f5e97abb⟧ pts_type |
| PT3272/CONVER.SC | ⟦489b02b16⟧ pts_type |
| PT3272/CTAB01.SC | ⟦c648624d7⟧ pts_type |
| PT3272/DATBSC.SC | ⟦7f24fab8f⟧ pts_type |
| PT3272/DCBSC.SC | ⟦635e0ce26⟧ pts_type |
| PT3272/DO.UF | ⟦7632646bf⟧ pts_type |
| PT3272/DSPBSC.SC | ⟦724be96e6⟧ pts_type |
| PT3272/FARCON.UF | ⟦93e7f2bd9⟧ pts_type |
| PT3272/HVDCON.UF | ⟦4f76672fa⟧ pts_type |
| PT3272/KEYB.SC | ⟦62bb9cb6b⟧ pts_type |
| PT3272/KEYB1.SC | ⟦9ff5b886b⟧ pts_type |
| PT3272/KEYB2.SC | ⟦465e4f8c3⟧ pts_type |
| PT3272/M:PROC.UF | ⟦31b0b96bf⟧ pts_type |
| PT3272/NN.UF | ⟦74a931731⟧ pts_type |
| PT3272/OBDIR.UF | ⟦df9b38f99⟧ pts_type |
| PT3272/PAD.SC | ⟦c0915507e⟧ pts_type |
| PT3272/PRINT.SC | ⟦49cafa9f5⟧ pts_type |
| PT3272/PRINT2.SC | ⟦0a6aeb907⟧ pts_type |
| PT3272/PROD1.UF | ⟦533baa9b0⟧ pts_type |
| PT3272/PROD2.UF | ⟦3cf972131⟧ pts_type |
| PT3272/PT3270.LM | ⟦21137165a⟧ pts_type |
| PT3272/PT3272.LM | ⟦fb3ab3c00⟧ pts_type |
| PT3272/RDVCON.UF | ⟦1ad362c41⟧ pts_type |
| PT3272/RODCON.UF | ⟦de441e86a⟧ pts_type |
| PT3272/TIECON.UF | ⟦7b1a1ef17⟧ pts_type |
| PT3272/TSTCON.UF | ⟦ea1cac864⟧ pts_type |
| PT3272/VDU.SC | ⟦b1bf1d59c⟧ pts_type |
| PT3272/XXXCON.UF | ⟦4097c02a3⟧ pts_type |
| PTMON | «none» |
| PTMON//OBJCT.OB | ⟦11e666346⟧ pts_type |
| PTMON/BUGGEN.UF | ⟦ad0edc405⟧ pts_type |
| PTMON/BUGMON.LM | ⟦136c730e0⟧ pts_type |
| PTMON/CTAB01.SC | ⟦409c55bd3⟧ pts_type |
| PTMON/DCADDR.SC | ⟦4f91c3907⟧ pts_type |
| PTMON/DCSTAT.SC | ⟦add471f6c⟧ pts_type |
| PTMON/DIALOG.UF | ⟦4a65242d4⟧ pts_type |
| PTMON/DRDC15.SC | ⟦ca4e44ff5⟧ pts_type |
| PTMON/DRDI01.SC | ⟦8677db159⟧ pts_type |
| PTMON/DRDY02.SC | ⟦419db9c37⟧ pts_type |
| PTMON/DRGP02.SC | ⟦3add86d57⟧ pts_type |
| PTMON/DRIC01.SC | ⟦567f548d4⟧ pts_type |
| PTMON/DRKB04.SC | ⟦ec81d98c9⟧ pts_type |
| PTMON/DRLP01.SC | ⟦c29b41c7b⟧ pts_type |
| PTMON/DRND01.SC | ⟦ad29c051c⟧ pts_type |
| PTMON/DRPL01.SC | ⟦87d8e9a09⟧ pts_type |
| PTMON/DSKSUB.SC | ⟦4b3d16e3b⟧ pts_type |
| PTMON/DVDI00.SC | ⟦d9d04b278⟧ pts_type |
| PTMON/DVDI01.SC | ⟦cc33de3a0⟧ pts_type |
| PTMON/DVDY00.SC | ⟦d552a38b2⟧ pts_type |
| PTMON/DVDY01.SC | ⟦d7c9d405c⟧ pts_type |
| PTMON/DVG100.SC | ⟦80649e70a⟧ pts_type |
| PTMON/DVG101.SC | ⟦65c6e8fcf⟧ pts_type |
| PTMON/DVKB00.SC | ⟦3770f7bad⟧ pts_type |
| PTMON/DVKB01.SC | ⟦ef0493696⟧ pts_type |
| PTMON/DVTDI.SC | ⟦5ef172779⟧ pts_type |
| PTMON/DVTDY.SC | ⟦c73e6c9c4⟧ pts_type |
| PTMON/DVTG1.SC | ⟦b3aaa9d75⟧ pts_type |
| PTMON/DVTKB.SC | ⟦19488c044⟧ pts_type |
| PTMON/DW1501.SC | ⟦0f6cfaa63⟧ pts_type |
| PTMON/DW2501.SC | ⟦c440ee429⟧ pts_type |
| PTMON/DWII01.SC | ⟦d4b6ad8b7⟧ pts_type |
| PTMON/DWIO01.SC | ⟦6a5278fd8⟧ pts_type |
| PTMON/EBCDIC.SC | ⟦bc0c00426⟧ pts_type |
| PTMON/FILLER.SC | ⟦3201e2422⟧ pts_type |
| PTMON/GNDC25.UF | ⟦c9e9bee89⟧ pts_type |
| PTMON/LDTASK.SC | ⟦34150bdd5⟧ pts_type |
| PTMON/LKMAL.SC | ⟦1b3c2a949⟧ pts_type |
| PTMON/LRPINT.SC | ⟦3fc103b0a⟧ pts_type |
| PTMON/MONTAB.SC | ⟦a1ecb739b⟧ pts_type |
| PTMON/MONTIM.SC | ⟦975874d10⟧ pts_type |
| PTMON/MSUBS.SC | ⟦42f93eef9⟧ pts_type |
| PTMON/P2TAB.SC | ⟦d5ab662e3⟧ pts_type |
| PTMON/PFTAB.SC | ⟦e55ffe4fd⟧ pts_type |
| PTMON/PROGEN.UF | ⟦5dd7a3adc⟧ pts_type |
| PTMON/PTMON.LM | ⟦9c574a4b1⟧ pts_type |
| PTMON/PTMON.UF | ⟦af9fb0d77⟧ pts_type |
| PTMON/S2CLAS.SC | ⟦d398b9ec9⟧ pts_type |
| PTMON/SCLASS.SC | ⟦f252a0b0e⟧ pts_type |
| PTMON/ST8000.SC | ⟦6718eb81d⟧ pts_type |
| PTMON/SYS2DC.SC | ⟦aca006c2b⟧ pts_type |
| PTMON/SYSINI.SC | ⟦7c6c56ade⟧ pts_type |
| PTMON/SYSLCR.SC | ⟦d1ab9168f⟧ pts_type |
| PTMON/SYSLDM.SC | ⟦06a84ef13⟧ pts_type |
| PTMON/SYSLOD.SC | ⟦53eefe75b⟧ pts_type |
| PTMON/SYSPRO.SC | ⟦303cad7be⟧ pts_type |
| PTMON/TABORT.SC | ⟦ff5fc273b⟧ pts_type |
| PTMON/TCLASS.SC | ⟦90eb3946b⟧ pts_type |
| PTMON/TDISP.SC | ⟦a64cd893b⟧ pts_type |
| PTMON/TIMER.SC | ⟦7d507afc2⟧ pts_type |
| PTMON/TLDSEG.SC | ⟦ba2673fbb⟧ pts_type |
| PTMON/TMMLKM.SC | ⟦ca2f5a8bb⟧ pts_type |
| PTMON/TMOVE.SC | ⟦6cb83a838⟧ pts_type |
| PTMON/TOSSIO.SC | ⟦45ff4ff06⟧ pts_type |
| PTMON/TPROC.SC | ⟦93f0f3473⟧ pts_type |
| PTMON/TTMJOB.SC | ⟦d99f95a49⟧ pts_type |
| PTMON/UPD.UF | ⟦74e3975de⟧ pts_type |
| PTMON/XCLASS.SC | ⟦2006c8db0⟧ pts_type |
| SAG | «none» |
| SAG//OBJCT.OB | ⟦ba0673ffe⟧ pts_type |
| SAG/ASM.LM | ⟦9b75a9601⟧ pts_type |
| SAG/ASS.LM | ⟦6be3e01a8⟧ pts_type |
| SAG/BEA.LM | ⟦9b75a9601⟧ pts_type |
| SAG/CASCOP.LM | ⟦32dfed1a0⟧ pts_type |
| SAG/CCI.LM | ⟦a3f506c79⟧ pts_type |
| SAG/CPLGEN.LM | ⟦803cfac15⟧ pts_type |
| SAG/CSEG1.LM | ⟦3ee5d13e8⟧ pts_type |
| SAG/CSEG2.LM | ⟦05b67c1a0⟧ pts_type |
| SAG/CSEG3.LM | ⟦f35aae4d3⟧ pts_type |
| SAG/CSEG4.LM | ⟦06be61e35⟧ pts_type |
| SAG/CSEG5.LM | ⟦a44d62c56⟧ 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 | ⟦f7c78dfdc⟧ pts_type |
| SAG/CSEGC.LM | ⟦0593961db⟧ pts_type |
| SAG/CSEGD.LM | ⟦0327e3157⟧ pts_type |
| SAG/CSEGE.LM | ⟦7d4b11085⟧ pts_type |
| SAG/DMPGEF.LM | ⟦9c6762752⟧ pts_type |
| SAG/DMPGEN.LM | ⟦b9833c58f⟧ pts_type |
| SAG/DUMPA.LM | ⟦fdc72622d⟧ pts_type |
| SAG/EDIT.LM | ⟦0bdc280ee⟧ pts_type |
| SAG/FLXCO1.LM | ⟦8e1b38ec0⟧ pts_type |
| SAG/FLXCO2.LM | ⟦efd3a2f70⟧ pts_type |
| SAG/FLXCON.UF | ⟦fcade2d10⟧ pts_type |
| SAG/FLXMO1.LM | ⟦905ba0c68⟧ pts_type |
| SAG/FLXMO2.LM | ⟦27df98bb6⟧ pts_type |
| SAG/LED.LM | ⟦6e968930f⟧ pts_type |
| SAG/LKE.LM | ⟦bad337d59⟧ pts_type |
| SAG/M:PROC.UF | ⟦4eb17d6c2⟧ pts_type |
| SAG/OBDIR.UF | ⟦572bddc28⟧ pts_type |
| SAG/OBX.LM | ⟦7dcabba8c⟧ pts_type |
| SAG/PCAS.LM | ⟦8cc8767fb⟧ pts_type |
| SAG/PDISC.LM | ⟦7fe65a18b⟧ pts_type |
| SAG/PMPTS.LM | ⟦543f9bb3d⟧ pts_type |
| SAG/PRDUMP.LM | ⟦101f7597e⟧ pts_type |
| SAG/RUM.LM | ⟦d166260c0⟧ pts_type |
| SAG/SUM.LM | ⟦c4fc249b5⟧ pts_type |
| SAG/SUP.LM | ⟦7d35adeda⟧ pts_type |
| SAG/SUP001.LM | ⟦4697c5a0b⟧ pts_type |
| SAG/SUP002.LM | ⟦a14fcfb9b⟧ pts_type |
| SAG/SUP003.LM | ⟦4d4d71b5d⟧ pts_type |
| SAG/SUP004.LM | ⟦d7b69a2c7⟧ pts_type |
| SAG/SUP005.LM | ⟦ba239bde2⟧ pts_type |
| SAG/SUP006.LM | ⟦3a813474e⟧ pts_type |
| SAG/SYSGEN.LM | ⟦8a14eaa5f⟧ pts_type |
| SAG/TLK.LM | ⟦43f81c044⟧ pts_type |
| SAG/TOSSUT.LM | ⟦e11ddcaf8⟧ pts_type |
| SAG/TRA.LM | ⟦f803befb8⟧ pts_type |
| SAG/XRF.LM | ⟦635827731⟧ pts_type |
0x000000…000ca0 (0, 0) DirGranule ((0, 0)) {
0x000000…000ca0 DirEnt {nam=»SAG «, typ=» «, f00=0x0000, f01=0x0000, f02=0x0000, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»SUP «, typ=»LM«, f00=0x019a, f01=0x0198, f02=0x0010, f03=0x0008}
0x000000…000ca0 DirEnt {nam=»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=0x00f8, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»CSEG8 «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0100, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»CSEG9 «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0110, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»CSEGA «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0118, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»CSEGB «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0120, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»CSEGC «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0130, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»CSEGD «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0138, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»CSEGE «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0140, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»PRDUMP«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0168, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»DMPGEF«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0180, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»XRF «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0188, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»DMPGEN«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0190, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»CPLGEN«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0198, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»LKE «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x01a0, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»ASM «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x01d0, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»M:PROC«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x01e0, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»SUM «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x01f0, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»RUM «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0200, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»DUMPA «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0218, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»PMPTS «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0240, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»OBX «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0280, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»SUP002«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x02e0, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»PCAS «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0330, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»SUP001«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0340, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»TRA «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0390, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»TLK «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0400, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»/OBJCT«, typ=»OB«, f00=0x0000, f01=0x0000, f02=0x0468, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»SYSGEN«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0570, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»EDIT «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0608, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»OBDIR «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x06f8, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»SUP003«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0720, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»FLXMO1«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0760, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»PDISC «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0780, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»SUP004«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x07c8, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»SUP005«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0818, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»SUP006«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0868, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»FLXCO1«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x08a8, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»FLXMO2«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x08b8, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»FLXCO2«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x08d8, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»FLXCON«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x0900, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»TOSSUT«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0908, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»BEA «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0968, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»CASCOP«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0990, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»ASS «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x1a18, f03=0x0000}
0x000000…000ca0 }
0x000ca0…000e34 (0, 1) Opaque[0x194]
0x000e34…000fc8 # DirEnt {nam=»SUP «, typ=»LM«, f00=0x019a, f01=0x0198, f02=0x0010, f03=0x0008}
0x000e34…000fc8 IdxSect {
0x000e34…000fc8 f00 = 0x0000 // 0xe34 @0x0
0x000e34…000fc8 f01 = 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=»in Lo< # # #$ A~ X - _ H*f* + + ,0-T
0x00115c…0012f0 Dummy {f00=0x0000, f01=0x0190, f02=»
0x0012f0…001484 Dummy {f00=0x0000, f01=0x0190, f02=» in( "D r !f9 : G p O $ $ %Z&>F F % 9 K DMC<MCGTHDB&WMC RYD(RDD(ASEBABF PSF RSG. & TY J- LP / TK Kt
0x001484…001618 Dummy {f00=0x0000, f01=0x0190, f02=» $ DK W~ DK 8 W~ P DK W~ DK ( W~ DK _~ ^ DK _~ 8DK ) _~
0x001618…0017ac Dummy {f00=0x0000, f01=0x0190, f02=» ? ? ? ? ? ? ? N & ? ? ? ? ? ? ? f ? ? ? ? ? ? ? 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=» ? ? ? b ? ? ? ? ? ? ? l b 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 F4 _ 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 ( < Jl @ 9a:a R0 "Z Q Q" ?A <P @"N %J & _ ( _ _ 0 % Jl T @ W @ R (P& P (_ =a:a =A:A Z P Z _" TR @
0x0038d0…003a64 Dummy {f00=0x0001, f01=0x0190, f02=» @% L F4 0 Jl @ 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 R - W . W / X I I R P8 X O P O T 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 Cn 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 (@ Cn 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 Cn 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 F4 = JlW ( 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 0 MESSAGE UNKNOWN B H Q L L L R 0 % _ M M L . P M . ? M 2 < L U 5 B J
0x005860…0059f4 (0, 7) Dummy {f00=0x0002, f01=0x0190, f02=» C D W8 C D X W* 8 AD T AD" D (@( 4 4 : 0 :R - Y 0 PU,DNXX,STAT,RY D 5 J ? B C 1P D Y _ @B RDP A P 8 FL B X X ! R V Y AD 8 TKP Y
0x0059f4…005b88 Dummy {f00=0x0002, f01=0x0190, f02=» Q 1 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, L . P E ? M 0AB CD ADDR @ 9a:a;a
0x005b88…005d1c Dummy {f00=0x0002, f01=0x0190, f02=» = Jl 0 9U AE E i6 E ( "^ F = Jl @ A @ !? $> A"T H _* 5 @H B @ A B, 0 Jl AG$ AG& G" ( "^ @ A ( C 5 @ 4 B P J _ 5 B, 5 J AG J R: P J R( G ( "^
0x005d1c…005eb0 Dummy {f00=0x0002, f01=0x0190, f02=» i6 9 , PP , X QD i6 H~ Y , i6 H~ Z H @H P : Hh ` : B I i6 _* AHT HP ( "^ : ; ;<A ' R `R Q QB _ QB <a : : : - A ~(@ A" AH A A A A AH AH AH a I
0x005eb0…006044 Dummy {f00=0x0002, f01=0x0190, f02=» Qh Q P( @ @ @ @ Y Y Y Y " A "; V W # @ A AH @ ? ? > Q @ ? ? ? ? ? ? ? I F4 @ P <a:a B :A : P6 $ R, Z R R Q $ :D P $ R ^& : B P R( AJZ AJ AJ^
0x006044…0061d8 Dummy {f00=0x0002, f01=0x0190, f02=»Jf Jh ? ? ? ? ? ? ? Jj ( < Jl B @ 9a:a R @ @K @"N %J '~ %J :EOS:EOV AHT HP "$&1368 AKL KN!? QKdP ^ 52 AL X AO X AO Q R x % =A Y X Y4 Z8 AKD $ $ T D i Kb !N X "!
0x0061d8…00636c Dummy {f00=0x0002, f01=0x0190, f02=» W !N " P P !N _ !N2 Mb M L 4 P Pj P P P @O Y M D P X &Q Y W Y 4 X $;H D :ET $;H D OSP OVT W W !L X ! P X 1P W @ X U W W W !L X ! . @Wp !L X ! Tb AW^ X
0x00636c…006500 Dummy {f00=0x0002, f01=0x0190, f02=»KD Y , $ T D q 84 !N !N< L KP Y Y AO AO LH !N !N< L W W ANV X 9c T DKH EKH 4 X B X :c HKH % M !N _N !N !N6_X !N _^ !N Y " !N<_p KT_ X # ;dC Y AKF AKB 7P AO _ _ _( _, _0 _4
0x006500…006694 (0, 8) Dummy {f00=0x0002, f01=0x0190, f02=» "! PX @ Q P VF_ P RN;AR P P4 0 P P C C C LPT P P C # ( C _: DL P H C _ P X( DD _Z :EOS :EOF 52 5J 5 @ !? ?R _ P 4 ' !? 0X A "! X6 @ Q P ^L_ P XP P R :AV L D
0x006694…006828 Dummy {f00=0x0002, f01=0x0190, f02=» M # C C @ _ "ZN(@(@ ^ :j >Z _ m (@ M M 8 DKT X X T X M W M W y Y Y Y # C B 58 B 58 $? R~ P R O P R R O P P| P Pv P $P &PN "P< /
0x006828…0069bc Dummy {f00=0x0002, f01=0x0190, f02=»DYPj X T Y $ WZ RZWX $ # T $ T Y B W0 %@ R b " Y Y Y Y Y $ X _0 8 TCX< TKXB MTXH DYXN ^ @ T <j =h QU P. ^ %x 8P F4 X % !X %`X P % X. R" X>W % P T %
0x0069bc…006b50 Dummy {f00=0x0002, f01=0x0190, f02=»U E E E E E E U > > aU @U E @U @U @U @U @U @U @U U Q (@ T W@ &_T@ H P P T ?f' W " H Wx " Wn & P >b& >AW >a& @T " X X T$W.
0x006b50…006ce4 Dummy {f00=0x0002, f01=0x0190, f02=» T" T" T" T" T" T" " " " " " " " T" >" HU AU T" T" T" T" T" T" " " " " " " " T" AU > ?f' _ 8 @ T <j =h 8P F4 X % !X %`X P % X. R X>W % P T %
0x006ce4…006e78 Dummy {f00=0x0002, f01=0x0190, f02=» E E E E E E > > a @ E @ @ @ @ @ @ @ Q (@ T W &_T H P P T ?f' W " H W " W & P >b& W X M M Y X Y Y B Y ! Y
0x006e78…00700c Dummy {f00=0x0002, f01=0x0190, f02=» !Yj L x P !Y M Q W ! P M L ZZ Y" B Y Xf AWz 8 4 B :e L Ph !Y M Q !Y6 B B $ !X !Yj L x P2 x X0 M L Q !Y@_@ !Y M Q Y" 4 ! 9A " ! M 4 P P L P P ! _ 4 B
0x00700c…0071a0 Dummy {f00=0x0002, f01=0x0190, f02=» M AU L 7P U M Y B AU U Y X P P P P P P8 Xf !^ AU B T B @U ) @U I @U I Xf 4 B AU ! T h AU M !Y6 L @U ! P AU !^ !YDW AWx !^ !YD" P !Y@ M L ZL M AU V !^ !^ Xf B P2
0x0071a0…007334 (0, 9) Dummy {f00=0x0002, f01=0x0190, f02=» AU ! P AU W& ! P AU R ! P W ! P AU P AU V ! P ! P _ P* AU AU R Ql ! P Wb ! P ! P WP ! P ! P W> B <e :e Q P AU AU ! P AU Z X Td @U ! P W @U P Q Y @U @U AU
0x007334…0074c8 Dummy {f00=0x0002, f01=0x0190, f02=»" T" L @U P<W !Yj" T L @WxP$ M L Q !Y@_Z M Q Xf T X $ P@ D R: P @U ! P !] T D $ !^( @U ! T L AWx !]xW !] T D R@ $ !^ @U ! T @U T " T AU W AU T P AU Y T U 4 !] @U ! P !YDW
0x0074c8…00765c Dummy {f00=0x0002, f01=0x0190, f02=» L " P $ M 4 @U U ( = Y 4 @U U < ) Y 4 X ! J $ <b! L !? P L ! _ @U L T !Y L 9AV$ !Y M Q A"R @ M Q 4 M Y" 4 !Y@ !Y M Q AU M !Yj 4 @V TOTD @V 1T: B AV( @
0x00765c…0077f0 Dummy {f00=0x0002, f01=0x0190, f02=» , ` X Y X a| B Y % a| L aN M B P 58 B V X P P P P 52 B P P 4 ^ :A H_bW W M B M B M _Z _bV 4 Y T T W _ 52 B < V < 58 L P :g: L :C ?
0x0077f0…007984 Dummy {f00=0x0002, f01=0x0190, f02=» WR A_> L " * Aa - Aa3 L " X ! Y M T(% T$ ! R L W L A T M A_< A_: X 7P B M aj h d M _* _R Y B A_H X P PD P@ P< P8 P4 b !dZ B T B @_T ) @_V I @_X I b B P,9 Q$ B < R :A R
0x007984…007b18 Dummy {f00=0x0002, f01=0x0190, f02=» P @ W M @_H M M !dH !b b L !? B M A_< A_: A_J X 7P A_@ ! T @_D A_@ @_F Y @_BU A_H b M X 4 X ! J Pj @_< @_: L $ L T L P: M I m M M W& L P M l A M M W A X
0x007b18…007cac Dummy {f00=0x0002, f01=0x0190, f02=» ? 4 an M A_> 8 4 M @_J 7P < $ <C ! 9 4 @_@9C @_D: 4 M _T M !b b 4 :EOS:EOV P P P Ad d !? Qg P ^ 52 V X 58 58 X Ad Adx Adz
0x007cac…007e40 Dummy {f00=0x0002, f01=0x0190, f02=» 9 R !f !f AdzXT_ d| Y Y _^ !e !f tW !e !e ] ! X W !e 9C^ W| !e _ !f Wn !f _ d Y Y _ X r s W4 X @ _ W$ AW @W $W %W W !W W X 9d)` Ad AdxA T 7P 9CV * 9AV 9AV X 1P * 9EV )@ X Q6{ X
0x007e40…007fd4 (0, 10) Dummy {f00=0x0002, f01=0x0190, f02=» X @d d 4e e e e e e eBeBeneRe e~e e e e e e &" 13468$$ @ _ X X X X $ Pg4g<gThDhb % 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$
0x007fd4…008168 Dummy {f00=0x0002, f01=0x0190, f02=» P Y $ W Y =D %_ X P V % P Y X XT Q _ g Q g 0DKER UNIT CYLD STAT h h 4 h h W2 h h X W$ h h W h ( X = 0 :R # Y ; ; ? 0 :R
0x008168…0082fc Dummy {f00=0x0002, f01=0x0190, f02=» T Y" P T _ X D D E E ] @ E @ j ? ? > ? ? ? ? ? ? ? m6 C ( "^ @m k^ U T " P " P @m W C "& # ( "^ A p @mV @mX @mZ @m <h @m % @m^ @m` mb md z [
0x0082fc…008490 Dummy {f00=0x0002, f01=0x0190, f02=» U > > > > > > >WZ A p ^ T " T0 ! P W SY SD AD _ ! P _, J _2 m6 # C ( "^ P mV mX mZ m CCT I T P Q _, Am@ _V LM mb A"X Am@ m6 L 9 !? A
0x008490…008624 Dummy {f00=0x0002, f01=0x0190, f02=» I H P _ A in A A A @ ~ m A ~ @m A ~ @ o0( "^ A~ A A H (@_0 $ ( , 0 4 8 < mB U T " P " P @ W C "& # ( "^ A p @ @ @ @ <h @ % @ @ z [
0x008624…0087b8 Dummy {f00=0x0002, f01=0x0190, f02=» U > > > > > > >W A p ^ T " T ! P W SY SD AD _ ! P _, J _2 # C ( "^ P DOS - PTS 6000 REL. 11.0 81-02-16 FOR 6879 (250 KB) FLEXIBLE DISK DRIVE
0x0087b8…00894c Dummy {f00=0x0002, f01=0x0190, f02=» A n bCPT * & g @ ~ A ~ @ A ~ @ I:ITCP J M:LDNX , ( ( "^ A A n , ( (@_0 $ $ ( , 0 4 8 < , ( o D
0x00894c…008ae0 Dummy {f00=0x0002, f01=0x412c, f02=»R CR MT UT cP gT " P P & W % H D ! ) - 1 7 = A E I P WZ T0 P W ;P Q kP B H D ! q u y } T T P Q 8 4 T, T P ' " )P 5R MP o w
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=» 0 ' d l 8 t B f r X $ > P 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 CBL p 8 < CLK p : > N P 9B 9A R D P < N P N 9 V O O . N 9CV < N 9 R N 9AV < N 9 V
0x00ac04…00ad98 Dummy {f00=0x0003, f01=0x0190, f02=» $ V "X _t R W W W W O & < z 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 @ "
0x00ad98…00af2c Dummy {f00=0x0003, f01=0x0190, f02=» V C R W _ _ _ T 4 & C @ R WL_ _ _ B , ,9c z[ Y W YD R W _ _ _ W V V W V N C R W _ _ _ V W W V V *
0x00af2c…00b0c0 Dummy {f00=0x0003, f01=0x0190, f02=» L b 8 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
0x00b0c0…00b254 (0, 14) Dummy {f00=0x0003, f01=0x0190, f02=»W W B < U T U U _& W W W V C B , X PD P QL QN T 9 R29 RJ T C R W W W W @ K V V V V P R W W ( R _$W W W _4 NW W W ( V R S: NWxWv_ T TY *
0x00b254…00b3e8 Dummy {f00=0x0003, f01=0x0190, f02=» C _ V B , P P P R W W A 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 _ H WHW V
0x00b3e8…00b57c Dummy {f00=0x0003, f01=0x0190, f02=» GV V | V P v | W | P ,P :P V | $:H $ F0Z F9U FAZ& FFY, A v | !AAZ !ZZY v | W | ! P !,,P @ Q 5 A _( @ X ! P _$W W : _ W V | W | : 8D R 0
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 ~ (XB > R *P
0x00b710…00b8a4 Dummy {f00=0x0003, f01=0x0190, f02=» 9 V O V ~ PH P8=A 1 * * 1 1 ZHW _4 N ! QPP: O V ~ P8 h H ^W*W W W W x W W W W W _ W W R W W W W V ~ : (
0x00b8a4…00ba38 Dummy {f00=0x0003, f01=0x0190, f02=» ABSENT FILE CODE 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
0x00ba38…00bbcc Dummy {f00=0x0003, f01=0x0190, f02=» $@P $ P N % P P P0 2 U N ! T W h O h H Wz N % T U O 0 W i _0 ]$ 4 Z & W & < U 4 Z 2 & W R W W W W X~ X Q
0x00bbcc…00bd60 Dummy {f00=0x0003, f01=0x0190, f02=» 00 P _ V : DATE HX /HX /HX TIME HXH-HXM-HXS- A p $ )T P _ @ p W = W | < , P V 8 W W V | W R W W W W W R *P b R *T < , T W | < V 8 W R WLW WH
0x00bd60…00bef4 (0, 15) Dummy {f00=0x0004, f01=0x0190, f02=» T P G F T V _( P # Q V W V : , T _. F Z _j W W W F W d ) F W P W F 4 V # T R W _ _ _ W G W 6 W V F T W V P v
0x00bef4…00c088 Dummy {f00=0x0004, f01=0x0190, f02=» W V 4 W V 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
0x00c088…00c21c Dummy {f00=0x0004, f01=0x0190, f02=» @ U F L ?L D 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 x R W:_ _ _ B R
0x00c21c…00c3b0 Dummy {f00=0x0004, f01=0x0190, f02=» < 6 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 _$
0x00c3b0…00c544 Dummy {f00=0x0004, f01=0x0190, f02=» @ x : ; W" ; W ; W Z " [ Z : ! @ Z 9c Z P L U _< :` % _H % _P XV _Z W j 2 V , , 0 5 V 9D9k D z " W( W W W W W W W W W 2 W V # T , 0V U V j
0x00c544…00c6d8 Dummy {f00=0x0004, f01=0x0190, f02=» L U ( ( @ U ( . 4 M - F G U W D V H F V # f = Z V R W W W W ' C R WdW W W V SCP" OBP LMP
0x00c6d8…00c86c Dummy {f00=0x0004, f01=0x0190, f02=» W T W V @ W @ _ V Q # T 8 : V V , T W W W V : 0 Q Q X*Q R U V_> B_D @ , H Q R W H T T BW H T I I Y2 X_ , P P , P P
0x00c86c…00ca00 Dummy {f00=0x0004, f01=0x0190, f02=» G _b F G F 4 T C R _ _ _ _ B , @ T * ,9cP z 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 LM
0x00ca00…00cb94 (0, 16) Dummy {f00=0x0004, f01=0x0190, f02=» ` T ** CORE OVERFLOW ** @ !J 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 # W z T P :
0x00cb94…00cd28 Dummy {f00=0x0004, f01=0x0190, f02=» $r ! R HW W W W j ! R JW W W W B PL ( XB " R _L YR U " V l8h Xf "8 R _p ;Yv < $ $ "f R HW W W W j "~ R JW W W W B P YD b P :h " R _`W @ X 8<h 8# LP 8P
0x00cd28…00cebc Dummy {f00=0x0004, f01=0x0190, f02=»_Z_ W2 V f 00 V #^ 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
0x00cebc…00d050 Dummy {f00=0x0004, f01=0x0190, f02=»IME: 00H-00M-00S-000MS- W @ 4 4 " Y%l %l 8 QR F%V _& Q$ & 4 " 9 Z _P &` 8 & 8 V :% % % % % & & & & & PROG ABORTED AT OVERFLOW IN SIMULATION ROUTINE SAVE AREA NOT WIRED INSTRUCT
0x00d050…00d1e4 Dummy {f00=0x0004, f01=0x0190, f02=»A2 =HEXA A3 =HEXA A4 =HEXA A5 =HEXA A6 =HEXA A7 =HEXA A8 =HEXA A9 =HEXA A10=HEXA A11=HEXA A12=HEXA A13=HEXA A14=HEXA BUFFER ALLOCATION OVERFLOW DISK OVERFLOW DISK QUEUE OVERFLOW MEMORY OVERFLOW DURING LOADING PHASE R W W W W W 1
0x00d1e4…00d378 Dummy {f00=0x0004, 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
0x00d378…00d50c Dummy {f00=0x0004, 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
0x00d50c…00d6a0 Dummy {f00=0x0004, f01=0x4160, f02=» LSF GOD P POD , ( OLE P " $ NOD MAC P & RT , , ( L P ( PRV LSV TRA , ( p * TLK p , . XRF P 0 2 BUG p , ( ) TLT p 4 . LKF p 6 CBL p 8 , ( I < CLK 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=» l d l f @ F $ 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=» 0 V P z 8 R @ : R W W W W W V R ' Q ' W B R WtWrWpW V W W V R^ ' QX V RR W r R WPWNWLWJWZ V | SC N N _ V | UF_ V U Q _ W W l W W W W 8 V , X X P Rb T W
0x00eb24…00ecb8 Dummy {f00=0x0004, f01=0x0190, f02=» p R _ W W W V V V W _6 V W F ; V F F );A F ( R ?U ) Y ) ( T Y W V K V QX @ P ! ! R W W W W W W V V V ' ] W _ V @_ WNWvWf V K b R W W W W C
0x00ecb8…00ee4c Dummy {f00=0x0004, f01=0x0190, f02=» C R W W W W O @ 6 % Y A J J Pv 8 RbQ !* T A TD ! T J PJ 8 ! X @ TV ! !' T I J P 8 !' ! T ! W I _| K K 4 P L P^ L P 4 J $ !* Pd ! P $ ! $ !
0x00ee4c…00efe0 Dummy {f00=0x0004, f01=0x0190, f02=» LINE NUMBER INPUT FILE CAN NOT BE ASSIGNED OUTPUT NOT ASSIGNED ) ) ( T Y W V K V Q @ P ! ! R W W W W W W V V V ' ] W _ V _ W W W V K R 0 P d
0x00efe0…00f174 (0, 19) Dummy {f00=0x0005, f01=0x0190, f02=» W 8 : 00 W + , T ] : X "8H 00T /8h W 8h / = = 8 RpQ T " T = " Z` T PD # 4 C C R W W W W B D K " V _ DL = ON = F ! "
0x00f174…00f308 Dummy {f00=0x0005, f01=0x0190, f02=» , P T 9CQ 9FV0 N " OB 0 V X4 | D5 T ! T~ N T # R W _ _ _ H ( T P@ W D V P L Q M V I R Wf_ _ _ V U j P 6 R W4W2W W. ( P
0x00f308…00f49c Dummy {f00=0x0005, f01=0x0190, f02=» 0 V P 2 4 # h P R W W W W W " d d d 8 $ A D A D A D W V V A j @ d d d d W W W W W $ OBJECT FILE DIRECTO
0x00f49c…00f630 Dummy {f00=0x0005, f01=0x0190, f02=» 4 V W # Z R W W W W W V P " V 6 V T @ =a V V 4 j @ d W (>a ( % P _ V % V % P _" ( % P _ P
0x00f630…00f7c4 Dummy {f00=0x0005, f01=0x0190, f02=»IT ACTL DATE W 4 V V V & A A ( W W @ @ & W W W W W W W W W P @ 8 : ( ' $ ' $! h P R W W W W W & V % P _ V & ( %
0x00f7c4…00f958 Dummy {f00=0x0005, f01=0x0190, f02=» W j b d V P _* TEXTRN A A CO MM N W A A EN TR Y @ @ ( W V W ($ < R < R W h 2 V % V % j @ TR R W A % @ VR S %
0x00f958…00faec Dummy {f00=0x0005, f01=0x0190, f02=»V A A A V % V % @ PB V % V % (P E E d A W R %_J d d T V P P _ * W 2 V R : 8 h R @ . R W W W W W & V % P _ V & ( %
0x00faec…00fc80 Dummy {f00=0x0005, f01=0x2a20, f02=» BUG - PTS DEBUGGER RDA 4 0 P LDK A2,/E1 DEFAULT OPTI* 5 $ P RF SC000 5 X P EJECT 5 x 6 P** BUGPRO EQU * DISK FILE CODE ERROR 5 PRDAR01 EQU * 5 P L MLK 2 A4,4 5 P
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=0x4028, f02=»W0 YW. u z ` j a @ a $ 8 _ ~ H D ! D T~ * D . ' p 1 D E I M _ o w | ` : H D ! WD P P P D W W W W W 8 ` H D ! 8 ! , + * 7 B A D ET0 g l mW oW qW sW uW
0x011298…01142c Dummy {f00=0x0005, f01=0x2008, f02=»
0x01142c…0115c0 Dummy {f00=0x0005, 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
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 810216)
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=» 4 # h h h ^ D ^ H " F r X z j P X . ( W( LKF O W LKE A N W W - Y ` O O R W W W W W V PVQ V CP P& P6 P8 Tv O W XD > W O W X^ p_ _0 _6 V
0x01271c…0128b0 Dummy {f00=0x0006, f01=0x0190, f02=» 8 : N 9AV~ N N 0 V P2 8 R @W W 2 W 2 Y : V P& z D N N 0 V P _Z N 9BVF D 0 V P _ V P z D 0 V P _ , T 8_ X
0x0128b0…012a44 Dummy {f00=0x0006, f01=0x0190, f02=» W L 2 8_8 N B N 9H _N COMMON VALUE REDUNDANT LIBRARY OPTION REDUNDANT DEBUG OPTION REDUNDANT MAP OPTION REDUNDANT XRF OPTION REDUNDANT SEGMENT SIZE REDUNDANT START ADDR. REDUNDANT USER LIB ASSIGN ERR : /OBJCTOB SYSTEM LIB
0x012a44…012bd8 Dummy {f00=0x0006, f01=0x0190, f02=»EDUNDANT OR NOT ALLOWED OBDIR UF USER OBDIR ASSIGN ERR : SYST OBDIR ASSIGN ERR : MESSAGE FILE ASSIGN ERROR OLE LM j 4 4 = Y < Y N & Q O 8 = Y F O ( W h R W W W W
0x012bd8…012d6c Dummy {f00=0x0006, f01=0x0190, f02=» 8W N P W 2W W 2W > 8 W 2W 8 : W > R W W W W W 8 : , P T 8 # R W R W W 8W N OB 0 R @W C:ERMSUF W D 0 R
0x012d6c…012f00 Dummy {f00=0x0006, f01=0x0190, f02=» W 2W 8 W 2W ( 8 : W W pW z W@ O _ _ R W W W f W O R W W W W W V | D N N SC 0 V P 8 L R @W : X R WrW WnWl
0x012f00…013094 (0, 24) Dummy {f00=0x0006, f01=0x0190, f02=» W Wd _ WZ WV WR _ V T L , P P T 9IV. N OB 0 V P : P 8 : , T ! T~ N T # ~ R _ _ _ _ H ( T P@ W D V X L Y M V I R _ _ _ _ V U
0x013094…013228 Dummy {f00=0x0006, f01=0x0190, f02=» W 2 2 W 2 N T N 9HR : W 2 : ( /S ASSIGN ERR : R OPTION ERR NL OPTION ERR D OPTION ERR /S EMPTY /O ASSIGN ERR : HSF ASSIGN ERR : R _ W _ _ _ LM 9 O
0x013228…0133bc Dummy {f00=0x0006, f01=0x0190, f02=» TCD LM HSF LMFX1 LMFX2 LMFX3 LMFX4 LMFX5 LMFX6 LMFX7 LMFX8 LMFX9 LMFXA LMFXB LMFXC LMFXD LMFXE LM L R W W W W , b X 4 ~ R WR R WH N OB 0 V P< 8 R @W : OUTPUT A
0x0133bc…013550 Dummy {f00=0x0006, f01=0x0190, f02=» 8 : MAC LM R ` 2 8 : RTL LM TLT W TLK A j z H 4 % Y GOD W j n W | W V j z H $ 5 Y j W | D W - Y ` O O O W*W W&WtW V T V MP8 P P P P< Wh
0x013550…0136e4 Dummy {f00=0x0006, f01=0x0190, f02=» 9AVt N N 0 V P. 8 R @W W 2 W Y : z D N N 0 V P _P N 9BV@ D 0 V P _x z D 0 V P _ , T 8_ X 4 R W W _6
0x0136e4…013878 Dummy {f00=0x0006, f01=0x0190, f02=» 8 4 R @W W 2_P N OB 0 V P$ > 8 t 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 2_N 2 8_* TLK LM OUTPUT
0x013878…013a0c Dummy {f00=0x0006, f01=0x0190, f02=» 9AV N N 0 V W W A , W W W W ~ JW: bW&W W V V 5 W _, A , V P W V | W | V P V /P 0R. :RrW& V . @ , P W ~ V @ , P W ~ V _6 V Qt V V 8H V
0x013a0c…013ba0 Dummy {f00=0x0006, f01=0x0190, f02=» V W ~ V 0R :R AR GV V | V P v | W | P ,P KP L T P6_ L .W$ @R 0 P 9D _( W L T P*_ 0R" 9Q 0 P 9C L
0x013ba0…013d34 (0, 25) Dummy {f00=0x0006, f01=0x0190, f02=» _0 IDENT V 8 V /O J W /LP /S V W : SC W R _ W>_~_ 4 # R _ W _ ( V X W V Z V W N N W^ W b : LM W t R W _RW W W ` l r W W V
0x013d34…013ec8 Dummy {f00=0x0006, f01=0x0190, f02=» # 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 # R _ V 4 # R W
0x013ec8…01405c Dummy {f00=0x0006, f01=0x0190, f02=» # R W* V T U V T W 2 : W V , P8 PB W T W T 9 VH9 V # R W& V V P W ! O 8 V _ W W ^ R W W W W W ` l V Y W W
0x01405c…0141f0 Dummy {f00=0x0006, f01=0x0190, f02=» W 4 V # V P W j W 6 R W W W W" @ W V < NOT V > D T C _: ( n W V T" W B U V T W V T C R _l W W U C V X B W W C U _4 V P V rT T 4 # W
0x0141f0…014384 Dummy {f00=0x0006, f01=0x0190, f02=» x 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 _( C 5 Z V j W (P. H U W V W W H W W W Y8 9c W 4 #
0x014384…014518 Dummy {f00=0x0006, f01=0x0190, f02=» 4<A $ % 4 % Y j W 4P6 T V W . W4 V 5 Z B W V W P V W _R @ C , U R _ V T@ V , T 9 V( OB W W : /OBJCT 6 : V W V j (P ( - )
0x014518…0146ac Dummy {f00=0x0006, f01=0x0190, f02=» 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 V : IDENT KPF /DD,OBDIR ^ R W W W W
0x0146ac…014840 Dummy {f00=0x0006, f01=0x0190, f02=» W W W W V D 9 W< '( 8 : ( 8 : 8 : $ 8 W 2 : W f R JWJWLWFW@ B W | B W R W W W W W R W W W W W !: " ". V V "r W
0x014840…0149d4 (0, 26) Dummy {f00=0x0006, f01=0x0190, f02=» "h "~ W W W _f !: " ". @ 8 "Z * 8 "Z R J_8WD_<_> " : P P P 4 0 W " ?A W ?a ! "~ "J V X^ ! R JW W W W W "r W V W T "R " "r W V W V W
0x0149d4…014b68 Dummy {f00=0x0006, f01=0x0190, f02=» 9 V V 9 V 9 C ! R W(W&W$W" H j j W | D W < "Z 8W, n_ H 8W _2 ! _: W 2 H @ : V D : W W V 9a:a R P W W " 9 V P T 4
0x014b68…014cfc Dummy {f00=0x0006, f01=0x0190, f02=»T W _ W _ W _ V $ Pl V PN C # # R W4W2W0W. B $ $ - $ X # R _ _ _ _ #_V " B $ $ - $_r ?a V X^ R JW W W W W W V W T W V W V W
0x014cfc…014e90 Dummy {f00=0x0006, f01=0x0190, f02=» A14,C:ASG,A12 ASSIGN THE FILE CODE TO OBDIR H , P LD A1,W:ASB7,A13 STATUS? I : $ P RF(0) LKE250 OK I j P LDK.L A3,USRDIR I 6 P RB LKE210 PRINT ERROR MESSAGE I P* I P* I , PLKE2
0x014e90…015024 Dummy {f00=0x0006, f01=0x0190, f02=» RF(6) LKE300 NO I : P ML 7,LKEOBJ LOAD FILE NAME AND TYPE J ( L P LDK.L A1,/44D7 FILE CODE = D7 , WRITE PROTELTED,ASG TYP=4 J f F P LDK A2,/CF SYSTEM DAD FILE CODE PC2205 J 0 P
0x015024…0151b8 Dummy {f00=0x0006, f01=0x0190, f02=» J d $ P CFI A14,C:ASG,A12 K 6 P* CHECK ASSIGN STATUS K 0 $ P LD A1,W:ASB7,A13 K j P RF(0) LKE260 K P* K 6 P* PRINT ERROR MESSAGE K P LDK.L
0x0151b8…01534c Dummy {f00=0x0006, f01=0x0190, f02=»13 K t 6 P RF(0) LKE300 LKE,DO NOT ASSIGN D9 L < P ML 7,OBDIR ASSIGN /D9 TO SYSTEM OBDIR L D P LDK.L A1,/44D9 L D P LDK A2,/CF SYSTEM DAD FILE CODE PC2205 L P LDK A3,8 L
0x01534c…0154e0 Dummy {f00=0x0006, f01=0x0190, f02=» RF(0) LKE300 OK L P LDK.L A3,SYSDIR M " P RB LKE210 M F P EJECT M f P* M | P* M P* M 8 PLKE300 EQU * CHECK IF /O IS PRESENT M P LDK A3,/D5 M $ P CFI
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 = 0x0006 // 0x15676 @0x2
0x015674…015808 gno = [ // 0x15678 @0x4
0x015674…015808 [0x00]: C0x0007.0x0.0
0x015674…015808 [0x01]: C0x0007.0x1.0
0x015674…015808 [0x02]: C0x0007.0x2.0
0x015674…015808 ]
0x015674…015808 }
0x015808…01599c Dummy {f00=0x0007, f01=0x0190, f02=» N W w W 2 R W W W W W V | D N N SC b R W W W W W$ V /SP W V R Q UF W 0 R @W R W W W W W W tW. V Uv Qr , Pl W t R WfW W W` !!W V TR V W v A V A V
0x01599c…015b30 Dummy {f00=0x0007, f01=0x0190, f02=» r W p W r W z W W A A r A W | V t L: A h W W _ _ A A A t v j $ V vP W: (P. R *P _, V n ! T n W | * . J N ; R _ _& X _ N T N 9HV V W 2 W 2 W 2 :
0x015b30…015cc4 Dummy {f00=0x0007, f01=0x0190, f02=» | V zQ + A A J l V | W ~ & R WZW0WVW W> V RL ' QF V | W ~ P R W0W W,W*W V T V LT A V | V ~ 0 0 6 R W~W|WzW Wv V Rp ' Qj V | W ~ W R WPW.WLW WL V RB ' Q< W R W(W W$W"W$ V T V
0x015cc4…015e58 Dummy {f00=0x0007, f01=0x0190, f02=» R W W W W W V | W ~ V | D N N W R WvWtWrW Wn V Rh ' Qb W W R WPW.WLW W V RB ' Q< W R W(W W$W"W$ V T V CT A W T A W 0 V V | V ~U @ P W ~ B 6 A L V | V W W | P W ~ p :W
0x015e58…015fec Dummy {f00=0x0007, f01=0x0190, f02=» | W R W W6W W W V R ' Q W V | W R WxW WtWrWp V W x V W | V V T V =a=A V V x V =a=A W | R W W W W W" V V CT A W A w W w V p r V % V E
0x015fec…016180 Dummy {f00=0x0007, f01=0x0190, f02=» W x V W | V V V =a=A V V V =a=A W V ~ V |P W ~ 6 W ~ V w V ) V p r % E E E E W p @ T & : V ~ W | A W p P R $ )_ A W B
0x016180…016314 (0, 28) Dummy {f00=0x0007, f01=0x0190, f02=» A J 0 A A A W V | W R W WDW W W V R ' Q W W * R W W W W W V R ' Q W Wd V W x V W | V V x A W | R WNW WJWHWJ V T> V FT A W T A R W W W W W V T V CT A W
0x016314…0164a8 Dummy {f00=0x0007, f01=0x0190, f02=» @ Q V | V R> V UB j F W V V @ P A tW W |_ _ W V | j @ j @ j @ tT W @ Q2_> V Q JW V A Z V | A b V J V ~ W | L ( C ( _ T n ~ ( . 0 2 T
0x0164a8…01663c Dummy {f00=0x0007, f01=0x0190, f02=»]],$$STRG1$$STRG2$$[,C/L] )!!RE LINE1,$$STRG1$$STRG2$$ )!!EN [D] )!!LS LINE1[,LINE2][,C] OR $$STRG1$$[,F/N][,C] )C= CONSOLE, L= LINE PRINTER, D= DIAGNOSTICS, F= FIND, N= NOT, $$= ARB. CHARACTERS )REL. 11.0 81-03-27 V | W W V | V P v | W | W V xP 9H_
0x01663c…0167d0 Dummy {f00=0x0007, f01=0x0190, f02=» | ^ _" W j W p V p W p V $V : , V |Q , V |R D _ W v W _> V |T A A V p M L W V $ V | P P , 9 9 Y V | 9a9A $ $ 9 W | X Y $ 9 V D W W
0x0167d0…016964 Dummy {f00=0x0007, f01=0x0190, f02=» A B @ R W W W W V ! T* V I J A @ j @ j @ W z j V pV2 L X M V | C J A > V j j @ W W | V | V ~ F , V l R FW F " ! T: V A J A V | A 4 J @
0x016964…016af8 Dummy {f00=0x0007, f01=0x0190, f02=» _ V t I: A h D WxW _ _ V j V v @ P V | W ~ n 6 V | I j @ j V j P R _|_~W W W z V |T A _ J N ; N _ X _ # , T TYT f C R HW W W W j W | P W P % Y P
0x016af8…016c8c Dummy {f00=0x0007, f01=0x0190, f02=» J A WH V t , P2 W 0 c C Z C @ t R R W W W , , V t , h ( 0 ) Z @ @ t R R W W W W ( & N < V O &V # 00 ) ~ R W W W W : V x A " t " R @
0x016c8c…016e20 Dummy {f00=0x0007, f01=0x0190, f02=» _ V t I: A W W _ _ V j V v @ P V | W ~ 6 V | I j @ DL IL EN AB JN :CH LS RE HL COMMAND UNKNOWN ,TRY AGAIN " I/O ERR ON LAST RECORD,TRY AGAIN $ SEQUENCE ERROR, CURRENT LINE:
0x016e20…016fb4 (0, 29) Dummy {f00=0x0007, f01=0x0190, f02=»SC,UPD TERMINATED * AUX. INPUT CAN NOT BE ASSIGNED,TRY AGAIN STRING NOT FOUND 0000 LINES = +0000 IN FILE IDENT STATEMENT UPDATED HIGHEST LINENO READ 0000 LINE PRINTER NOT ASSIGNED 0000 OF 0000 LINES IN FILE LINE NUMBER 1 > LINE NUMBER 2
0x016fb4…017148 Dummy {f00=0x0007, f01=0x0190, f02=»QU 0$$EDM EQU 1$$ !!CH $$CPU857 EQU 0$$CPU857 EQU 1$$ !!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ !!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ !!CH $$ASSOLY EQU 0$$ASSOLY EQU 1$$ !!CH $$DSKPAG EQU 0$$DSKPAG EQU 1$$ !!CH $$SWPBLK EQU 0$$SWPBLK EQU 1$$ ASM /S,NL @ PT FZ
0x017148…0172dc Dummy {f00=0x0007, f01=0x0190, f02=» SP ECP 1P AP :DC : F : ( SP MMT W ( Lj Ml :!!IL 48 @P !SS = S 5 <x @P G >4 @P 5 B T :h" P 0R U Q P <H9D_( : : Wf AP @l P Al @l P Al @l P Al @l P Al YF P
0x0172dc…017470 Dummy {f00=0x0007, f01=0x0190, f02=» _@ 7 @T T AT O(_^ @X8PV Ab @T P T AX< AX8 X: E AT 01 AT YB T O _ Ab 7 a CD Al Al| CG Al Alz : 4R P @X8! P X> XH 4 AXJ | Z"Pb 4 7 AJ (R> f AI.
0x017470…017604 Dummy {f00=0x0007, f01=0x0190, f02=» T 01 7 @X| , 7 4 W V T1P TNP G1P G2P T2P TPT, 1 0P 1T W AJ / AI @J W AI AT O( 4^ AX| @J : P @ $ !;;P6 ! P0 ! X !__T P Z0_. !^^T bv_B + _F Jb P P ~t
0x017604…017798 Dummy {f00=0x0007, f01=0x0190, f02=» P, LP !,,T2 U, LP LP 9H # Lj_4 # AX| : J @P 7 Lj : V DIT M ,0W8 @P P KB Xp V MTT 0P OH @ I 7 P& @P !,, J @P OH C C # : 7 : K @P T <h !NNP f J Dl ! J Q
0x017798…01792c Dummy {f00=0x0007, f01=0x0190, f02=» T :h" P 0R U Q P <H9D_( : J YZ @P V J V J J K, J @P Lj9H @P Lj A M8 J V KBT bqP brP b6T b6 bA K @$ 1 K 20 K V KBP DIP U P P _ U` (
0x01792c…017ac0 Dummy {f00=0x0007, f01=0x0190, f02=»P 0 0R Q ; W : # +0 !99U :d" *0 !99U :H : T TP Y T1 Y TN Y T2 Z G2 Y G1 Y D4 Y D5 Y MD Z CD Z TWP DUP FDT Y W Y W 7 V W 01 W W XP V AXj AXi V AXl AXk XZ
0x017ac0…017c54 (0, 30) Opaque[0x194]
0x017c54…017de8 # DirEnt {nam=»CSEG7 «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x00f8, f03=0x0000}
0x017c54…017de8 IdxSect {
0x017c54…017de8 f00 = 0x0007 // 0x17c54 @0x0
0x017c54…017de8 f01 = 0x0002 // 0x17c56 @0x2
0x017c54…017de8 gno = [ // 0x17c58 @0x4
0x017c54…017de8 [0x00]: C0x0007.0x3.0
0x017c54…017de8 ]
0x017c54…017de8 }
0x017de8…017f7c Dummy {f00=0x0007, f01=0x0190, f02=» 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( _
0x017f7c…018110 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 _>
0x018110…0182a4 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
0x0182a4…018438 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
0x018438…0185cc 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
0x0185cc…018760 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
0x018760…0188f4 (0, 31) Opaque[0x194]
0x0188f4…018a88 # DirEnt {nam=»CSEG8 «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0100, f03=0x0000}
0x0188f4…018a88 IdxSect {
0x0188f4…018a88 f00 = 0x0008 // 0x188f4 @0x0
0x0188f4…018a88 f01 = 0x0004 // 0x188f6 @0x2
0x0188f4…018a88 gno = [ // 0x188f8 @0x4
0x0188f4…018a88 [0x00]: C0x0008.0x0.0
0x0188f4…018a88 [0x01]: C0x0008.0x1.0
0x0188f4…018a88 ]
0x0188f4…018a88 }
0x018a88…018c1c Dummy {f00=0x0008, 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
0x018c1c…018db0 Dummy {f00=0x0008, 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 > &
0x018db0…018f44 Dummy {f00=0x0008, 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
0x018f44…0190d8 Dummy {f00=0x0008, 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
0x0190d8…01926c Dummy {f00=0x0008, 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
0x01926c…019400 Dummy {f00=0x0008, 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
0x019400…019594 (0, 32) 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
0x019594…019728 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
0x019728…0198bc 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
0x0198bc…019a50 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
0x019a50…019be4 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
0x019be4…019d78 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*
0x019d78…019f0c 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
0x019f0c…01a0a0 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
0x01a0a0…01a234 (0, 33) Opaque[0x194]
0x01a234…01a3c8 # DirEnt {nam=»CSEG9 «, 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=» 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
0x01a55c…01a6f0 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
0x01a6f0…01a884 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
0x01a884…01aa18 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
0x01aa18…01abac 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
0x01abac…01ad40 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
0x01ad40…01aed4 (0, 34) Opaque[0x194]
0x01aed4…01b068 # DirEnt {nam=»CSEGA «, 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=» 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
0x01b1fc…01b390 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
0x01b390…01b524 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
0x01b524…01b6b8 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
0x01b6b8…01b84c 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
0x01b84c…01b9e0 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
0x01b9e0…01bb74 (0, 35) Opaque[0x194]
0x01bb74…01bd08 # DirEnt {nam=»CSEGB «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0120, f03=0x0000}
0x01bb74…01bd08 IdxSect {
0x01bb74…01bd08 f00 = 0x0009 // 0x1bb74 @0x0
0x01bb74…01bd08 f01 = 0x0004 // 0x1bb76 @0x2
0x01bb74…01bd08 gno = [ // 0x1bb78 @0x4
0x01bb74…01bd08 [0x00]: C0x0009.0x0.0
0x01bb74…01bd08 [0x01]: C0x0009.0x1.0
0x01bb74…01bd08 ]
0x01bb74…01bd08 }
0x01bd08…01be9c Dummy {f00=0x0009, f01=0x0190, f02=» 6 < 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
0x01be9c…01c030 Dummy {f00=0x0009, 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
0x01c030…01c1c4 Dummy {f00=0x0009, 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 "
0x01c1c4…01c358 Dummy {f00=0x0009, f01=0x0190, f02=» V Z V X W 4 V - N ! V # R _ W W R 4_ V PJ OBDIR W UF W N " N V V P W W _ : W N " N /OBJCTOB W 0 V P4 v 8 r R
0x01c358…01c4ec Dummy {f00=0x0009, f01=0x0190, f02=» R *Pp C V P W _X R _D W C _ C _t W 6 . R _hW W V T C J R _ W _6 W _< : B V T C r R _* W C _ C R _DW W W C C _$ DEL /OB W j n W | W < : N N
0x01c4ec…01c680 Dummy {f00=0x0009, f01=0x0190, f02=» G SEGMENT NBR. ' J 8 : _2 _8 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, T R W$W"W W _
0x01c680…01c814 (0, 36) Dummy {f00=0x0009, f01=0x0190, f02=» " W ( N 9I^D N 9H^L O : R _D W C _ C _t W 6 R _hW W V T C R _ W _6 W _< : B V T C R _* W C _ C R _DW W W C C _$ DEL /OB W j n W | W < : N N
0x01c814…01c9a8 Dummy {f00=0x0009, f01=0x0190, f02=» V : t , ( , ( ! + W W D , ( A R W W W W W V /OT V t , ( a B T W R W W W W N " , ( N /O BJ CT OB , (
0x01c9a8…01cb3c 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 _
0x01cb3c…01ccd0 Dummy {f00=0x0009, f01=0x0190, f02=» V P W W _ : W , ( ! N " N /OBJCTOB W $ , ( A 0 V P T , ( a 8 R 0W : OBJECT LIBRARY , ( W 4 # , ( R W W W W W C _ W
0x01ccd0…01ce64 Dummy {f00=0x0009, f01=0x0190, f02=»_t W 6 t , ( ! R _hW W V T C R , ( A _ W _6 W _< : B V T C D , ( a R _* W C _ C t , ( R _DW W W C C _$ , ( DEL /OB W j n W | W , (
0x01ce64…01cff8 Dummy {f00=0x0009, f01=0x0190, f02=» , ( ! 4 W 4P = W , ( A Y : G SEGM 4 , ( a ENT NBR. ' J 8 : _2 d , ( _8 R W W W W , ( , P P N O T O , ( N V R V
0x01cff8…01d18c Dummy {f00=0x0009, f01=0x0190, f02=» ' O F , ( A P R W W W W _ O _ $ , ( a O _ W W W P 8 :" T , ( ! " N P : ( , ( EXIT CODE = , ( N " W ( N 9I^D
0x01d18c…01d320 Dummy {f00=0x0009, f01=0x0190, f02=» kW mW~ oW qW sW uW wW yW } | P P | H D !0 P P W W W W R P0 T Px Wv 8 H D ! 5TF AV EV2 I N OW@ QW` SW< UW: s w { H D ! W W W W W W W W WZ
0x01d320…01d4b4 (0, 37) Opaque[0x194]
0x01d4b4…01d648 # DirEnt {nam=»CSEGC «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0130, f03=0x0000}
0x01d4b4…01d648 IdxSect {
0x01d4b4…01d648 f00 = 0x0009 // 0x1d4b4 @0x0
0x01d4b4…01d648 f01 = 0x0002 // 0x1d4b6 @0x2
0x01d4b4…01d648 gno = [ // 0x1d4b8 @0x4
0x01d4b4…01d648 [0x00]: C0x0009.0x2.0
0x01d4b4…01d648 ]
0x01d4b4…01d648 }
0x01d648…01d7dc Dummy {f00=0x0009, f01=0x0190, f02=» 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
0x01d7dc…01d970 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
0x01d970…01db04 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
0x01db04…01dc98 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
0x01dc98…01de2c 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 _
0x01de2c…01dfc0 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 *
0x01dfc0…01e154 (0, 38) Opaque[0x194]
0x01e154…01e2e8 # DirEnt {nam=»CSEGD «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0138, f03=0x0000}
0x01e154…01e2e8 IdxSect {
0x01e154…01e2e8 f00 = 0x0009 // 0x1e154 @0x0
0x01e154…01e2e8 f01 = 0x0002 // 0x1e156 @0x2
0x01e154…01e2e8 gno = [ // 0x1e158 @0x4
0x01e154…01e2e8 [0x00]: C0x0009.0x3.0
0x01e154…01e2e8 ]
0x01e154…01e2e8 }
0x01e2e8…01e47c Dummy {f00=0x0009, f01=0x0190, f02=» " ~ 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
0x01e47c…01e610 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
0x01e610…01e7a4 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
0x01e7a4…01e938 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
0x01e938…01eacc 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
0x01eacc…01ec60 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
0x01ec60…01edf4 (0, 39) Opaque[0x194]
0x01edf4…01ef88 # DirEnt {nam=»CSEGE «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0140, f03=0x0000}
0x01edf4…01ef88 IdxSect {
0x01edf4…01ef88 f00 = 0x000a // 0x1edf4 @0x0
0x01edf4…01ef88 f01 = 0x000a // 0x1edf6 @0x2
0x01edf4…01ef88 gno = [ // 0x1edf8 @0x4
0x01edf4…01ef88 [0x00]: C0x000a.0x0.0
0x01edf4…01ef88 [0x01]: C0x000a.0x1.0
0x01edf4…01ef88 [0x02]: C0x000a.0x2.0
0x01edf4…01ef88 [0x03]: C0x000a.0x3.0
0x01edf4…01ef88 [0x04]: C0x000b.0x0.0
0x01edf4…01ef88 ]
0x01edf4…01ef88 }
0x01ef88…01f11c Dummy {f00=0x000a, 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 @
0x01f11c…01f2b0 Dummy {f00=0x000a, f01=0x0190, f02=» * A2 H . A2 H 2 A2 F ! P8 "# # C C ( B @ A3Z VW( @3 t Q W A & A * A 6_< A 6 A . A A ( B ( B @ P( A ( ( ( B A
0x01f2b0…01f444 Dummy {f00=0x000a, 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 @
0x01f444…01f5d8 Dummy {f00=0x000a, f01=0x0190, f02=» W A @ T @ C T W A W0 @ P< B L L ^ W @ T @ P ( B :_< A A A A ( @ @ ( Y ( ( ( f ( A p 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 :_< 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 :_< 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 :_< 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 @ T @ C T W A W @ P B L L ^ W @ T @ P ( B :_< A A A A ( @ @ ( Y ( ( ( ( A 6
0x020278…02040c 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 @
0x02040c…0205a0 Dummy {f00=0x000a, f01=0x0190, f02=» W A @ T @ C T W A W @ P B L L ^ W @ T @ P ( B :_< A A A A ( @ @ ( Y ( ( ( ( A 6
0x0205a0…020734 (0, 41) 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 @
0x020734…0208c8 Dummy {f00=0x000a, f01=0x0190, f02=» W A @ T @ C T W A W @ P B L L ^ W @ T @ P ( B :_< A A A A ( @ @ ( Y ( ( ( ( A 6
0x0208c8…020a5c 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 @
0x020a5c…020bf0 Dummy {f00=0x000a, f01=0x0190, f02=» W A @ T @ C T W A W @ P B L L ^ W @ T @ P ( B :_< A A A A ( @ @ ( Y ( ( ( ( A 6
0x020bf0…020d84 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 @
0x020d84…020f18 Dummy {f00=0x000a, f01=0x0190, f02=» W A @ T @ C T W A W @ P B L L ^ W @ T @ P ( B :_< A A A A ( @ @ ( Y ( ( ( ( A 6
0x020f18…0210ac 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 @
0x0210ac…021240 Dummy {f00=0x000a, f01=0x0190, f02=» W A @ T @ C T W A W @ P B L L ^ W @ T @ P ( B :_< A A A A ( @ @ ( Y ( ( ( ( A 6
0x021240…0213d4 (0, 42) 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 @
0x0213d4…021568 Dummy {f00=0x000a, f01=0x0190, f02=» W A @ T @ C T W A W @ P B L L ^ W @ T @ P ( B :_< A A A A ( @ @ ( Y ( ( ( ( A 6
0x021568…0216fc 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 @
0x0216fc…021890 Dummy {f00=0x000a, f01=0x0190, f02=» W A @ T @ C T W A W @ P B L L ^ W @ T @ P ( B :_< A A A A ( @ @ ( Y ( ( ( ( A 6
0x021890…021a24 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 @
0x021a24…021bb8 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
0x021bb8…021d4c 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
0x021d4c…021ee0 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 _
0x021ee0…022074 (0, 43) Dummy {f00=0x000b, 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
0x022074…022208 Dummy {f00=0x000b, 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
0x022208…02239c Dummy {f00=0x000b, 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: @
0x02239c…022530 Dummy {f00=0x000b, 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
0x022530…0226c4 Dummy {f00=0x000b, 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
0x0226c4…022858 Dummy {f00=0x000b, f01=0x0190, f02=» IN A6 ** x L P LD A2,4,A8 NUMBER OF THE FIRST SECTOR ** 8 L P SUK A2,6 IN FIRST GRANULE THERE ARE ** L P* ONLY 6 S
0x022858…0229ec Dummy {f00=0x000b, f01=0x0190, f02=» THE GRANULE COUNTER IS SET ** x L P LDK A5,2 INCREMENT THE GRANULE COUNTER ** 8 L P AD.S A5,GRANCT ** L P SUK A2,8 DECREMEN
0x0229ec…022b80 Dummy {f00=0x000b, f01=0x0190, f02=» ** x L P LDK A5,0 DIFFERENCE BETWEEN THE ** 8 L P SUR A5,A2 SECTOR NUMBER OF THE GRANULE ** L P* AND THE
0x022b80…022d14 (0, 44) Opaque[0x194]
0x022d14…022ea8 # DirEnt {nam=»PRDUMP«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0168, f03=0x0000}
0x022d14…022ea8 IdxSect {
0x022d14…022ea8 f00 = 0x000b // 0x22d14 @0x0
0x022d14…022ea8 f01 = 0x0006 // 0x22d16 @0x2
0x022d14…022ea8 gno = [ // 0x22d18 @0x4
0x022d14…022ea8 [0x00]: C0x000b.0x1.0
0x022d14…022ea8 [0x01]: C0x000b.0x2.0
0x022d14…022ea8 [0x02]: C0x000b.0x3.0
0x022d14…022ea8 ]
0x022d14…022ea8 }
0x022ea8…02303c Dummy {f00=0x000b, 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 @
0x02303c…0231d0 Dummy {f00=0x000b, f01=0x0190, f02=» @ _ @ @ T @ P ^ A @ z @ Pl @ x A x * @ @ @ T A @ |P @ ~T ^ @ A @ A @ T @ @ P ^ @ @ X
0x0231d0…023364 Dummy {f00=0x000b, 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 ( : $ - -
0x023364…0234f8 Dummy {f00=0x000b, f01=0x0190, f02=» @ 4 Y : " p 0 5 0 P R D U M P REL 11.0 5 ==================== K 0 PRINTOUT OF MEMORY DUMP FROM F L E X I B L E - DISC
0x0234f8…02368c Dummy {f00=0x000b, 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
0x02368c…023820 Dummy {f00=0x000b, 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( :
0x023820…0239b4 (0, 45) 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
0x0239b4…023b48 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
0x023b48…023cdc 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 ( @ $
0x023cdc…023e70 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,
0x023e70…024004 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
0x024004…024198 Dummy {f00=0x000b, f01=0x0190, f02=»F STARTADR NOT HEXADECIMAL ENDADR NOT HEXADECIMAL ENDADR LESS THEN STARTADR 6 0PRDUMP REL 11.0 DATE 81.02.16 12NC=8701 359 41100 # SELECTIO
0x024198…02432c 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 -
0x02432c…0244c0 Dummy {f00=0x000b, f01=0x0190, f02=» Z , : 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
0x0244c0…024654 (0, 46) 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 @
0x024654…0247e8 Dummy {f00=0x000b, f01=0x0190, f02=» ( : J 6 @ ? T n_< D @ T$ D - - - D - : D :_zE1TK F4FD F5FD F6FD F7FD FILECODE:
0x0247e8…02497c Dummy {f00=0x000b, f01=0x0190, f02=»
0x02497c…024b10 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
0x024b10…024ca4 Dummy {f00=0x000b, f01=0x0190, f02=»1 LINK1 BUFF2 BUF2 LINK2
0x024ca4…024e38 Dummy {f00=0x000b, f01=0x0190, f02=» LDK.L A6,ILP700 Z P AB.L COPYLL [ P [ > PILP040 EQU * * PTS [ F " P ABL SYNTAX SYNTAX ERROR * PTS [ b P EJECT [ 0 P******************************************** [ P* [ P* DELETE PROCESSOR [ P* [ 6 P* SYNTAX
0x024e38…024fcc Dummy {f00=0x000b, f01=0x0190, f02=» * DELETE LINE(S) [ P LDK.L A4,DLP000 $ 6 P ABI C:GETP,A12 GET 1:ST LINE NUMBER H PDLP000 EQU * & P RF DLP070 ILLEGAL PARAMETER * PTS & P RF DLP070 CHARACTER STRING * PTS * P RF DLP070 "/"+ CHARAC
0x024fcc…025160 Dummy {f00=0x000b, f01=0x0190, f02=» * $ P LD A1,W:PARV,A13 ] , P RF(N) DLP070 NEGATIVE LINE NUMBER * PTS ] 6 P CWK A1,9999 ] f , P RF(G) DLP070 ILLEGAL LINE NUMBER * PTS ] " P CW A1,S:NB,A13 ] $ P ABL(L) SEQ SEQUENCE ERROR * PTS ] " P
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=» ` J & & & J @ ? T ^_< D @ T D -W D $_d ( @ Pf $ > & > 2 & 2 @ P & 2 ( $ C C
0x02561c…0257b0 Dummy {f00=0x000c, f01=0x0190, f02=» $ & & : FLOPPY: F4 - F7 0FL ERROR 6 0DMPGEF REL 11.0 DATE 80.10.10 12NC=8701 376 41
0x0257b0…025944 Dummy {f00=0x000c, f01=0x0190, f02=» ~ | D.A I. A 9 Z A. " :D W x W x W z W zJ W t# T DW W | W ~ T| W t Q A @ A @ T@ @ W @ P0 A @ UU A @ T x ^r W W | W ~ P _ V t ^ V vP W v9B)
0x025944…025ad8 Dummy {f00=0x000c, f01=0x0190, f02=»CHECK IF MEMORY P* $ P LDKL A1,/5555 MEMORY CHECK MASK " P ES A1,/0002 J P EL A2,/0002 ^ P CWR A1,A2 r P RF(NE) DMP78 NO MORE MEMORY P $ P LDK A1,/0000 USER AREA ADDRESS & P LDKL A2,/F000 SYSTEM AREA ADDRESS P LDKL
0x025ad8…025c6c Dummy {f00=0x000c, f01=0x0190, f02=» v * P RB(NN) DUMP30 READY TO DUMP USER AREA P EJECT 6 * P LDK A4,/01 MEMORY OVERFLOW INDICATION D P RF DUMP35 r P 2 PDMP78 EQU * ILLEGAL INTERRUPT ENTRY (852 CPU) AQX @ ~ | D.A I. A 9 Z A. " :D
0x025c6c…025e00 Dummy {f00=0x000c, f01=0x018e, f02=» DATA (IOP) j P LDK A1,/06 B P ST A1,WRITE-DUMPFD,A13 WRITE DEL. DATA AND VERIFY (PROG. CH.) ( $ P CFR A14,A7 CALL I/O-SUBROUTINE n P LDR A2,A2 STATUS WORD P RF(Z) DUMP45 PDUMP40 EQU * P LDK A4,/02 ERROR INDICATION PDUMP45
0x025e00…025f94 (0, 48) Opaque[0x194]
0x025f94…026128 # DirEnt {nam=»XRF «, 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=» 7 P 4I w w Ob "> fp - $ ^ 5 : 9 -i $ V 6Nerw "4r P tV u ' qC (4F ])b zuqU@ $ O> P~, ZD c r O" U@h % Y 6P,> ,| ~ v $ ' 44` 1ON B -8 T ( tB k Tg t z ^ ^ j X H 2 Z i% z
0x0262bc…026450 Dummy {f00=0x000c, f01=0x0190, f02=» RLINES INPUT. 1XRF 11.1 CROSS REFERENCE LISTING OF MODULE: &&&&&& DATE: YYMMDD PAGE: 0 SYMBOL DEF REFERENCES NO MORE SPACE AVAILABLE 0RESTARTED AFTER MEMORY OVERFLOW P jW ( R ( @ R$ # "
0x026450…0265e4 Dummy {f00=0x000c, f01=0x0190, f02=» % "# P E PP< _ (' X )R X*_ (" X, E PP _ D # P @ P H # : @ ( ? (T , ) , ( T ( )T ) P 4 @ ( T ( T A @ ( :ENTR EXTR@ EXT @ ST
0x0265e4…026778 Dummy {f00=0x000c, f01=0x0190, f02=»0 V P < Pn V _ Z Y$ Y0 Pl P, ^< Q _( W @ 7 @ 7 @ @ W 7 : V * J R ` K W _. @ _N
0x026778…02690c Dummy {f00=0x000c, f01=0x0190, f02=» ( B ! Z_ ID $ EN . T 8 ! > Z_H ! P . A < A @ B ! P Z_ ! ( 4 ~ @ >Q ZW 4 ! X` 0 ! Xj_ !' T ! X| !, X" !+ X( !- X. 0_ F( C
0x02690c…026aa0 Dummy {f00=0x000c, f01=0x0190, f02=» Y$ : A A ( @ A ( W A . D @ V " @ A W 6 A A & R Q 6 T W@ *** + V ` P 9m D ' . R Q + G 6 Tn @ < 6 0 A @ z A $ F( @ P
0x026aa0…026c34 (0, 49) Opaque[0x194]
0x026c34…026dc8 # DirEnt {nam=»DMPGEN«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0190, f03=0x0000}
0x026c34…026dc8 IdxSect {
0x026c34…026dc8 f00 = 0x000c // 0x26c34 @0x0
0x026c34…026dc8 f01 = 0x0002 // 0x26c36 @0x2
0x026c34…026dc8 gno = [ // 0x26c38 @0x4
0x026c34…026dc8 [0x00]: C0x000c.0x2.0
0x026c34…026dc8 ]
0x026c34…026dc8 }
0x026dc8…026f5c Dummy {f00=0x000c, 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
0x026f5c…0270f0 Dummy {f00=0x000c, f01=0x0190, f02=» j 0TK ERROR 6 0DMPGEN REL 11.0 DATE 81.02.16 12NC=8701 361 41100 WRITE PROTECTED NOT OPERABLE STATUS WORD: A. A
0x0270f0…027284 Dummy {f00=0x000c, f01=0x0190, f02=» V @ W @ A @ @ UU A @ T P A x _ W _ K _ A K : UU
0x027284…027418 Dummy {f00=0x000c, f01=0x0190, f02=»: P* 0 P* A1 - POINTER TO A BLOCK CONSISTING . P* OF LENGTH OF- AND TEXT TO BE H . P* PRINTED (INC. CONTROL WORD). z P* : P* IT IS ASSUMED THAT A8 IS LOADED WITH ECB-ADDRESS, ( P* AND A7 WITH WRI
0x027418…0275ac Dummy {f00=0x000c, f01=0x0190, f02=»1 P ST A2,4,A8 P ADK A1,2 P ST A1,2,A8 0 P LKM D P DATA 1 P P* ` P RTN A14 j P EJECT z P* < P* * * * * * * * * * * * * * * * * * * * * * * * * * * * P* < P* XDISPL
0x0275ac…027740 Dummy {f00=0x000c, f01=0x0190, f02=» * < P* HEXADECIMAL EQUIVALENT * P* L P* PARAMETERS: V < P* A1 - THE WORD TO CONVERT. * n : P* A3 - POINTER TO LOCATION WHERE THE * < P* RESULT WILL B
0x027740…0278d4 (0, 50) Opaque[0x194]
0x0278d4…027a68 # DirEnt {nam=»CPLGEN«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0198, f03=0x0000}
0x0278d4…027a68 IdxSect {
0x0278d4…027a68 f00 = 0x000c // 0x278d4 @0x0
0x0278d4…027a68 f01 = 0x0002 // 0x278d6 @0x2
0x0278d4…027a68 gno = [ // 0x278d8 @0x4
0x0278d4…027a68 [0x00]: C0x000c.0x3.0
0x0278d4…027a68 ]
0x0278d4…027a68 }
0x027a68…027bfc 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
0x027bfc…027d90 Dummy {f00=0x000c, f01=0x0190, f02=» 0TK ERROR 4 0CPLGEN REL 11.0 DATE 81.02.16 12NC=8701 363 41100 STATUS WORD: A P UU x ' &P _ B A. ;d# A I T P^ 1 I T: P 0V W XB X"9A_
0x027d90…027f24 Dummy {f00=0x000c, f01=0x0190, f02=»1,A13 * PTS Y P SUK A3,1 * PTS Z 6 P CFI A14,C:BIDE,A12 GET LINE NUMBER IN ASCII * PTS Z , P LDR A3,A2 * PTS Z f P LDR A2,A1 * PTS Z P LDKL A1,'I ' * PTS Z P LDKL A4,' ' * PTS Z ( P MS 4,W:INBF-8,A13 "I 0000 " * PTS Z P ST A6,SAV
0x027f24…0280b8 Dummy {f00=0x000c, f01=0x0190, f02=»PSW * PTS Z $ P ABL(NZ) PRINT PRINT LINE * PTS [ PCOPY15 EQU * * PTS [ : P LD A6,SAVELS * PTS [ V P!!IL 1677 [ r PCOPY17 EQU * * PTS [ * P IM S:NBOT,A13 ADD NO RECORDS NEW PTS [ P LDKL A3,S:LTAB-6 * PTS [ , P ADR A3,A13 INITIATE LTAB
0x0280b8…02824c Dummy {f00=0x000c, f01=0x0190, f02=»PY04 END OF LTAB * PTS [ P LD A1,4,A3 * PTS ( P RB(Z) COPY03 STRING NOT FOUND * PTS 8 P CM 4,A3 * PTS d P | P LD A3,S:NB,A13 * PTS 6 P CFI A14,C:BIDE,A12 GET LINE NUMBER IN ASCII * PTS P LDR A3,A2 * PTS P LDR A2,A1 * PTS
0x02824c…0283e0 Dummy {f00=0x000c, f01=0x018e, f02=» | ( P LDKL A6,COPY20 RETURN ADDRESS * PTS ] P LD A1,S:PRFL,A13 * PTS ] 4 P ABL(P) LIST LIST LINE * PTS ] T " P ABL(N) PRINT PRINT LINE * PTS ] x PCOPY20 EQU * * PTS ] P LD A6,SAVELS * PTS ] 4 P CM S:PRFL,A13 RESET LIST/PRINT INDICATOR * PTS ]
0x0283e0…028574 (0, 51) Opaque[0x194]
0x028574…028708 # DirEnt {nam=»LKE «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x01a0, f03=0x0000}
0x028574…028708 IdxSect {
0x028574…028708 f00 = 0x000d // 0x28574 @0x0
0x028574…028708 f01 = 0x0008 // 0x28576 @0x2
0x028574…028708 gno = [ // 0x28578 @0x4
0x028574…028708 [0x00]: C0x000d.0x0.0
0x028574…028708 [0x01]: C0x000d.0x1.0
0x028574…028708 [0x02]: C0x000d.0x2.0
0x028574…028708 [0x03]: C0x000d.0x3.0
0x028574…028708 ]
0x028574…028708 }
0x028708…02889c Dummy {f00=0x000d, f01=0x0190, f02=» n !
0x02889c…028a30 Dummy {f00=0x000d, f01=0x0190, f02=»
[…0x2…]
0x028d58…028eec Dummy {f00=0x000d, f01=0x0190, f02=» R P
0x028eec…029080 Dummy {f00=0x000d, f01=0x0190, f02=» IDENT MXSTAB SCTMXS IO ERRORERR.MOD.BLK.DAT.ABS.ADD.DBL.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.TAB. ERRINV. EXTINV. SEG 9 R : ) Y : @ Pt %T _ b $ 5T`
0x029080…029214 (0, 52) Dummy {f00=0x000d, f01=0x0190, f02=» T : (= ^ J = R ) @ ) H A W ( $ A A @ XB A 4 $ A < A _" @ R0 @ @ P& T J _ (;CZ A A : @ P. @ $" % A x 5 @ P _* : @ Pb @ < < V @ A < < V
0x029214…0293a8 Dummy {f00=0x000d, f01=0x0190, f02=»_f A A A ^ A <_r @ PJ @ < < V @ A < V @ A < A A b @ b @ = @ B : @ P @ @ PR $" % (% P A (% P A $) ) ,! P @ 1 _X : @ Pn @ @ Pd $" * % (% T A H
0x0293a8…02953c Dummy {f00=0x000d, f01=0x0190, f02=» A @ $P @ $9a @ :a Z9A A @ A A ~ : _L R T @ ^ ( _ @ A T @ T ^ ( @ A @ A @ A : H % : A @ $ MXP AMP MSP ENP : R 1( A R A Z A b A
0x02953c…0296d0 Dummy {f00=0x000d, f01=0x0190, f02=»?A $=KR W6 T J 0 A <=A A A A z A ~ _X A : @ rRX @ @ PJ $ (;CR ;BV (# T _ A J @ 1 0 A _4 A r : W W W W W T W W A v Z Z WH Z B
0x0296d0…029864 Dummy {f00=0x000d, f01=0x0190, f02=» @ A xP A @ A A x @ & A | b n b A T A t 4 @ P A | _ @ tP @ @ a @ A t_b @ T" @ b @ x A A x @ $Z j T @ b @ x @ $P( j @ @ $ j @ @ b @ A x :
0x029864…0299f8 Dummy {f00=0x000d, f01=0x0190, f02=» A < A @ A < @ A A A @ A x : | @ > @ < @ : W A t A v @ @ :a Q. @ v ^ @ @ :b Q $ A v @ t_8 @ t P @ A : @ A : @ @ 9a @ ":a Q2 A A @ @ 9b Q @ ^ $ A @
0x0299f8…029b8c Dummy {f00=0x000d, f01=0x0190, f02=» A A R A R % 1 a PTSLKG (810126) A V A A I ^ 00 A : - Y : ` ! A A A A 9a?a A A A A A v A ~ A @ a @ @ T$ @ 1 = ( EXTENT @ x WhWf A $ @
0x029b8c…029d20 Dummy {f00=0x000d, f01=0x0190, f02=» j ` ! A A A A 9a?a A A A A A A A A v A ~ A p A $ $ ` @ A A S A | P n PVV A W b A t 4 @
0x029d20…029eb4 (0, 53) Dummy {f00=0x000d, f01=0x0190, f02=» b @ b @ j :A H $ n A _4 @ TL ` R NP8 @ H A F_0 @ | f ` " :A @ A A 9A $_X : 8 p d @ |T , ` @ @ R: A @ D T( @ F P@ A A t VT @ A S _" @ $ A SX: @ F a @
0x029eb4…02a048 Dummy {f00=0x000d, f01=0x0190, f02=» xT` @ @ D PV P M A lW` @ :B9C 9A 9A 9B Z A <a V :A A A j @ B a @ @ M <a L 9a Z<A A @ l $ @ xT@ @ @ NP6 $ P V ) _ ;E % 0 A @ P& @ A A @ @ 9a:a
0x02a048…02a1dc Dummy {f00=0x000d, f01=0x0190, f02=» ^ & A @ vP : @ A < A A * ( @ @ T W P A _ : ` @ @ BP. @ F $ ) Y @ @ T L : B @ 1 @ P = *** SYMBOL TABLE @ xP EXTENT @ x 0 =
0x02a1dc…02a370 Dummy {f00=0x000d, f01=0x0190, f02=» @ T !AAP @ P& @ :a9a ^ 6 @ _ @ 0 = ** = ] ] @ 0 = START = = @ P @ T LENGTH = @ @ T REGION = @ U _ : , 1 P , 1 : J
0x02a370…02a504 Dummy {f00=0x000d, f01=0x0190, f02=» r H A @ A < @ B A A @ A !| A A * @ A p . A @ @ ( M $ A xR > @ 0 M $P, b A xR > @ ( M $ Y$ @ A A : A p A . @ x : Z P @ $;e $ )
0x02a504…02a698 Dummy {f00=0x000d, f01=0x0190, f02=»( : F @ A P @ A H I ( @ A A A : W f( : @ P @ $ A > ` NO b n T D A b H $ @ n A A p @ ` > n T L $ @ n @ T8 b b A >_ @ T
0x02a698…02a82c Dummy {f00=0x000d, f01=0x0190, f02=» b n T A t 4 @ P A | _ @ tP @ A | @ a @ A t_X $ t V @ B a @ @ B ` @P ^ & A @ T A W @ A < @ A A A @ T D A V@ @ b ` NOP @ p n b @
0x02a82c…02a9c0 Dummy {f00=0x000d, f01=0x0190, f02=» : <A B 0 R ( ) : (_ @ <a @ =a @ 9b9A A , ) Z A : @ @ <a @ =a :b:A A , ) Y A : @ @ P >a @ 9a Vp9A A A ^< A A A
0x02a9c0…02ab54 (0, 54) Dummy {f00=0x000d, f01=0x0190, f02=» :9C D v @ 5 A A : @ @ ;a<a V $:CR E P : _& ( ^ : @ p @ T : P * @ A p . :( B 0 A 0 : @ !| @ P @ @ xP @ A A @ @ P RB _ @ A @ ~R< @ @ @ < % @ 9a! :d x @
0x02ab54…02ace8 Dummy {f00=0x000d, f01=0x018e, f02=»,CURBAS " P LD A1,OPTSAV RESTORE OPTIONS P ST* A1,OPTION 6 P* L P* INITIALIZE LISTING OUTPUT V P* FOR EXTENTS AND SEGMENTS z P* P LD A1,SEGFLG P RF(NZ) INIT10 . P LD A7,PRBFBG A7=POINTER IN PRINTER BUFFER P LDK
0x02ace8…02ae7c Dummy {f00=0x000d, f01=0x0190, f02=» P DATA 'EXTENT' P MSR 3,A7 P* , P ADK A7,12 6 P LDR A2,A7 INSERT EXTENT NO H 2 P LD A1,EXTFLG IN PRINTER BUFFER (HEXADECIMAL) l P CF A14,BINHEX P RF INIT20 P* P* P RF INIT20 P* PINIT10 EQU *
0x02ae7c…02b010 Dummy {f00=0x000d, f01=0x0190, f02=»A7 P ADK A7,40 P MLK 4 P DATA 'SEGMENT ' * P MSR 4,A7 B P ADK A7,9 T P LDR A2,A7 f $ P LD A1,SEGNUM INSERT SEGMENT NO x 2 P CF A14,BINHEX IN PRINTER BUFFER (HEXADECIMAL) P* P ADK A7,6 P MLK 2 P DATA 'T
0x02b010…02b1a4 Dummy {f00=0x000d, f01=0x4144, f02=»* P* P* INSERT 'SECTOR XXXX' IN P* PRINTER BUFFER 6 P* N P ADK A7,6 X P MLK 3 j P DATA 'SECTOR' x P MSR 3,A7 P ADK A7,9 P LDR A2,A7 P LD A1,SEGSEC P CF A14,BINHEX P* PINIT20 EQU *
0x02b1a4…02b338 Dummy {f00=0x000d, f01=0x2008, f02=»
0x02b338…02b4cc Dummy {f00=0x000d, f01=0x4016, f02=» PNOD AM @
0x02b4cc…02b660 Dummy {f00=0x000d, f01=0x4060, f02=» F IDENT SEGTAB CR $ 8 r J@ ES 1 SEGMENT TYPE: 'C', 'D' OR 'R' ^ RES 1 SEGMENT DISC ADDRESS " RES 1 SEGMENT LENGTH IN BYTES * SGBLK2 EQU * RES 3 *
0x02b660…02b7f4 (0, 55) Opaque[0x194]
0x02b7f4…02b988 # DirEnt {nam=»ASM «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x01d0, f03=0x0000}
0x02b7f4…02b988 IdxSect {
0x02b7f4…02b988 f00 = 0x000e // 0x2b7f4 @0x0
0x02b7f4…02b988 f01 = 0x000a // 0x2b7f6 @0x2
0x02b7f4…02b988 gno = [ // 0x2b7f8 @0x4
0x02b7f4…02b988 [0x00]: C0x000e.0x2.0
0x02b7f4…02b988 [0x01]: C0x00bd.0x0.0
0x02b7f4…02b988 [0x02]: C0x00bd.0x2.0
0x02b7f4…02b988 [0x03]: C0x00bf.0x1.0
0x02b7f4…02b988 [0x04]: C0x00bf.0x2.0
0x02b7f4…02b988 ]
0x02b7f4…02b988 }
0x02b988…02bb1c Dummy {f00=0x000e, f01=0x0190, f02=» l #2B x , , * 0 1 1 0 1 1 2B 2B 2B @ @ < P
0x02bb1c…02bcb0 Dummy {f00=0x000e, f01=0x0190, f02=» ( B R Q : B B ~ X ( 0
0x02bcb0…02be44 Dummy {f00=0x000e, f01=0x0190, f02=» _4 ( H T @ A 8 B B T = C : < T _" 8 *X( 8 T$ < P <P B _R 8W R Rt Wp X$ , < P <P < 9 _H 8 R W: X , < P 'T
0x02be44…02bfd8 Dummy {f00=0x000e, f01=0x0190, f02=» B :a;a : MW2 XW. CW* RW& EW" IW LW U A W FW SW OW P @ $ A * A @ P @ Q W$ @ A @ A @ P a @ a x @ vP 8 R ) A _ @ 0Q p I 0 ^ A 0W j I 6 ^ @ T W * I ^ a A @ P A @
0x02bfd8…02c16c Dummy {f00=0x000e, f01=0x0190, f02=» : : : Q ^ a A : A a ` : $:f:A $# Q $# P W WL $$ X $$ <A $# P _ ; $$ X, ; A 4 & X <a<A : : @ W 4 @
0x02c16c…02c300 Dummy {f00=0x000e, f01=0x0190, f02=» @ %W @ % : 4 &<E , P. * T P / T 0 W , W T , P" "$ T" 4 %T W @ R _v W W @ @ $<E % @ $$ Q ) A : A ^ W 09U ( 9 S = S 0 S _
0x02c300…02c494 (0, 56) Dummy {f00=0x00bd, f01=0x0190, f02=» A ++Q --U A 09Q ..Q EEQ> ''Q (& P 8 S S Q Q _< P _ ^N_ X< ++Q --U A 09]R (& @ 8 S S A 09Y ''Q _x A _ X @ :
0x02c494…02c628 Dummy {f00=0x00bd, f01=0x0190, f02=» 4 ` A ''Q Y @ @ $# Q (Q, a v A v @ A )W $# X ( H + R_0 : W W W W 4 3 + f A ++Q --Q W W V **Q ''Qr //Q0 XXU ''Q.W BBU ''QbW| AZ
0x02c628…02c7bc Dummy {f00=0x00bd, f01=0x0190, f02=» @ W Z A XT @ h @ hT $# T @ 0 * A U A R $ P P A # P&# ;c ( Wf T( Q t WZ P T V& @ hP * A X A A A V 5 5W V + 3 PB P W6 @
0x02c7bc…02c950 Dummy {f00=0x00bd, f01=0x0190, f02=»SYMBOL TABLE0 UND.ENT.0 UND.LAB.0 ASS.ERR.1 $ ) $ 0P P $ ) _ : d L R L _ 0 ) ^ : 9 R : ) Y :P ff33 A A A @ T : d D L T
0x02c950…02cae4 Dummy {f00=0x00bd, f01=0x0190, f02=»8! S _6 <P 8 : P~ @ Pr @ P*R A A A W @ " @ S@ SB @ S@ SB @ S@ T W6 F < -Q [ : : @ : _F _F _F _F ~ " [ : W P < A A : P P
0x02cae4…02cc78 Dummy {f00=0x00bd, f01=0x0190, f02=» 8! 8! _ 8 T Q V" 8 T . 8 P 8 4 @ @ P P0 $" P R ( $! 9# P _4 RT QP Q VF T< @ T @ @ A A
0x02cc78…02ce0c Dummy {f00=0x00bd, f01=0x0190, f02=» O @ !* P @ h * @ * * 4 @ h A , @ 4 LPT @ : TYT 6 @ R 1 A P @ 6 TYP DYP n nU n A B A @ T@ 4 z ^ T ^ j @ 0R ) ) A 0 A : 1 A @ 4 TYT J B
0x02ce0c…02cfa0 Dummy {f00=0x00bd, f01=0x0190, f02=» l ^ J l ^ : l ^ : ( : 1 PAGE DATE - - TIME H- M- S Z W W Pp a @ Q: @ hP4 P. B ` ' ?A A ^
0x02cfa0…02d134 (0, 57) Dummy {f00=0x00bd, f01=0x0190, f02=» D 02-PASS ASSEMBLER - NAT LAB - VERSION 7.2 16/11/78 x 8P _ @
0x02d134…02d2c8 Dummy {f00=0x00bd, f01=0x0190, f02=» R A ) H A A X F 4 I b>! A Z>!P H A ` I d A )T @ 0P A $P @ vT 0 @ R W @ vT : @ tP f 4 A A _, A R Q @ U D @ A $ U A : @ Pf @ @ XT
0x02d2c8…02d45c Dummy {f00=0x00bd, f01=0x0190, f02=»! A 2( @ 6 nT @ 4 TYT LP A 4 < A : @ A A W @ d 9 ! A @ A ` A A A A A A . @ hP A A A A A @ A @ A A r I 0 ^ , A . x A v **Q~ $$
0x02d45c…02d5f0 Dummy {f00=0x00bd, f01=0x0190, f02=» R |W _ R ( A @ P % P @ $ I @ T~ nUt A nUb A nUT A @ PJ A @ R $ T& - $ - A H M @ > % nV @ @ Q @ P 2 X @ hQ B "( B ( @
0x02d5f0…02d784 Dummy {f00=0x00bd, f01=0x0190, f02=» A T @ P A _ + * /*W( + * 0 W + * / W , * 0 A A A @ @ T W @ T @ TL Uz f XP8 @ hT0 U $# Q $# Q L9a @ U A W A A * A W @ hX ,,YV R
0x02d784…02d918 Dummy {f00=0x00bd, f01=0x0190, f02=» R @ ) I ((R ))R0 U,> S( S$ ,,YX R a @ h @ A XT % a A : @ hQ :a @ U A _0 $ : W @ HT LP @ hTj @ @ h @ f 0 A a PR ,,Rr L $"
0x02d918…02daac Dummy {f00=0x00bd, f01=0x0190, f02=» P ;A_ ;a Y ==Q$ ::QZ P P Q TWH P T W4 W. Pz T W Tn @ W T ] ] P 9A Y T2 < = T$ P &T F T W R ,,Y W ,,Y @ 2 P R ^ ` " a Qx T
0x02daac…02dc40 Dummy {f00=0x00bd, f01=0x0190, f02=» _ A A0 @ V @ T~ @ Tt P, @ [! T A ^ & ] b A Z @ X , _2 @ A A A A 0 @ A A A @ PLQ @ @ P8 $T % R _ X $ % ,,Y"
0x02dc40…02ddd4 (0, 58) Dummy {f00=0x00bf, f01=0x0190, f02=» P @ P @ P @ R ) $ * % ] @ P @ A W @ Q R, @ W @ T ! A ,, ''Qd DDU ''U QN f Y 4 W. FFU ''Qn A Y 4 Y T @ T P
0x02ddd4…02df68 Dummy {f00=0x00bf, f01=0x0190, f02=» A 2 ~ R $% P ( R P $" : A 0 @ 0PN 8 I 4 ;a P _ ! ]" ]! T ]"0 2
0x02df68…02e0fc Dummy {f00=0x00bf, f01=0x0190, f02=» @ P $| _> G 4 4 R t G T_ $ PX P %F $ @V "0P ,,Q R A W$ $ P $ <c! 9A $ $ $h_P ((RL 07Q 4 | R ( ))R W 4_ $ W **R " P 9A G 4 $h_ T| 4 @ @ PX
0x02e0fc…02e290 Dummy {f00=0x00bf, f01=0x0190, f02=» : ! P P : : : 2' ?A 2&p ! ! : @ P @ P P P " P 9 ! G T 4 G 4 ! P $| : X Q : $" | R 4 A 0 ~ W @ UL ==R@ R4 P P A A
0x02e290…02e424 Dummy {f00=0x00bf, f01=0x0190, f02=» B E ^ IDENT H* ! P I Z " D T E ^ @ A ( A I ^ , A * A 0 A @ A @ A A A @ @ P R $ )_ ASM 7.2 A v 4 A R6 ,,Q
0x02e424…02e5b8 Dummy {f00=0x00bf, f01=0x0190, f02=» @ @ A ^ PT R $ $# P $ ] b T A A Z @ XT A ^ 0_Z ] b A Z @ P W P @ R % 6 d @ hQ @ ) ) @ hQ @ T ) )
0x02e5b8…02e74c Dummy {f00=0x00bf, f01=0x0190, f02=» @) P ) ) @)&W, P R $Y $# Y $# P: P $# P $# Q A W R W ** A $# Q W ( W X ( ( P D d P N d A B &
0x02e74c…02e8e0 Dummy {f00=0x00bf, f01=0x0190, f02=»T PASS0 I X A I M A Q D @ "1 I T A I D @ i DS A I U @ i US A I N @ i NS A I R @ i RS A I R @ i RS A i FI ~ A I 1 t @ I W j @ I C ` @ I C V A Q M A a ! I 2 A i 1S A q BI @
0x02e8e0…02ea74 (0, 59) Dummy {f00=0x00bf, f01=0x0190, f02=» @ i ST V A I L L @ I S B A i AD 8 @ ADS . A i SU " @ SUS A i MU @ MUS A i DV @ DVS A h XR h MR !h GR H h ER p h ER x i XK ! P F W P B _ p DR "1 p TR ! 1 h DR DRS !h UR URS !h NR
0x02ea74…02ec08 Dummy {f00=0x00bf, f01=0x0190, f02=» ! 1RS !h TN p BR " H M 6 h NM . ` DK DKL 1 h DK DKL h UK UKL h NK NKL h RK ( RKL h RK 0 RKL I F ! i WK ~ i CK t P B q BL ` IO@ @ h NR H h TR
0x02ec08…02ed9c Dummy {f00=0x00bf, f01=0x0190, f02=»LC 8 h RC 8 p LN8 h RN 8 h CR !p LR h SR !p UR a ! h VR h AR h SR ` LK a UK i VK b AK j SK ` LA8 h RA 8 h LL 8@h RL 8`h LC 8 h RC 8 p LN8 h RN 8 h MD ( h VF p h VB zx h
0x02ed9c…02ef30 Dummy {f00=0x00bf, f01=0x0190, f02=»DVR DVRS ! VUS x VSU p h FL h FX ` ILH h CA H@h IM @ h MP @@h M2 @ DENT% NTRY XTRN 852 855 856 857 ATA ORG ORG IST P LIST T JECT Xx QU (x ES x ND' OMN x FF% x FT%~x IF% TAB ORM
0x02ef30…02f0c4 Dummy {f00=0x00bf, f01=0x0190, f02=»2 ZA3 ZA4 ZA5 ZA6 ZA7 ZA8 ZA9 zA10 zA11 zA12 zA13 zA14 zA15 h AR h SR ` LK a UK i VK b AK j SK ` LA8 h RA 8 h LL 8@h RL 8`h LC 8 h RC 8 p LN8 h RN 8 h MD ( h VF p h VB zx h
0x02f0c4…02f258 Dummy {f00=0x00bf, f01=0x0190, f02=» L @ L ` R r , ( T @ L @ P S , ( T @ @ L @ R S B `ESC S r * & P @ A S ADDSET S * & H @ A S * & H @ A @
0x02f258…02f3ec Dummy {f00=0x00bf, f01=0x0190, f02=» A @ A S z , ( @ c N ` @ T * & { V U @ V T H * & H @ T v , ( ` @ P P @ T * & H @ A @ A T , (
0x02f3ec…02f580 Dummy {f00=0x00bf, f01=0x0190, f02=» A * T r , ( ( @ P Q U DODASH U B , ( ; $ @ A * @ A , @ U T * & S H A . @ A 0 @ A U , ( g 2 ( @ V U * & H $ @
0x02f580…02f714 (0, 60) Opaque[0x194]
0x02f714…02f8a8 # DirEnt {nam=»M:PROC«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x01e0, f03=0x0000}
0x02f714…02f8a8 IdxSect {
0x02f714…02f8a8 f00 = 0x000f // 0x2f714 @0x0
0x02f714…02f8a8 f01 = 0x0004 // 0x2f716 @0x2
0x02f714…02f8a8 gno = [ // 0x2f718 @0x4
0x02f714…02f8a8 [0x00]: C0x000f.0x0.0
0x02f714…02f8a8 [0x01]: C0x000f.0x1.0
0x02f714…02f8a8 ]
0x02f714…02f8a8 }
0x02f8a8…02fa3c Dummy {f00=0x000f, f01=0x0190, f02=» P$PDISC PSCR /L @M= PMOV @M=,/L,@MU . PRUN PDISC,0 M=@M= D D POPT OUT=@MOUT=@M=,FC=@FC=F4,FT=M,SOP=@SOP=01,INP=@M=,DATE=@DATE ^ PSCR /L @A= PMOV @A=,/L,@AU PRUN PDISC,0 A=@A= D POPT OUT=@AOUT=@A=,FC=@
0x02fa3c…02fbd0 Dummy {f00=0x000f, f01=0x0190, f02=»OUT=@C=,FC=@FC=F4,FT=C,SOP=@SOP=01,INP=@C=,DATE=@DATE PSCR /A @D= > PMOV @D=,/A,@DU Z PRUN PDISC,0 D=@D= p D POPT OUT=@DOUT=@D=,FC=@FC=F4,FT=D,SOP=@SOP=01,INP=@D=,DATE=@DATE P$PDISCE P=@M= P$PDISCE P=@A= P$PDISCE P=
0x02fbd0…02fd64 Dummy {f00=0x000f, f01=0x0190, f02=»MU,M+MOUT,M+MU+MOUT FOR MONITOR FILE 8 PMES 2 A,A+AU,A+AOUT,A+AU+AOUT FOR APPLICATION FILE . : PMES 3 C,C+CU,C+COUT,C+CU+COUT FOR CONFIGURATION FILE j 2 PMES 4 D,D+DU,D+DOUT,D+DU+DOUT FOR DATA FILE 2 PMES 5 FC FILE CODE. DEFAULT VALUE IS
0x02fd64…02fef8 Dummy {f00=0x000f, f01=0x0190, f02=»NATIVE 1,2,3 AND 4 IS VALID, t 0 PMES AND AT LEAST ONE OF THEM MUST BE CHOOSEN $ 8 PMES ALTERNATIVES 5,6 AND 7 MAY BE INCLUDED IF NEEDED X PEND P$PDISCE PMES END OF $PDISC PEND P$PCAS PASG 3,@DA=TK0E PREW 3
0x02fef8…03008c Dummy {f00=0x000f, f01=0x018e, f02=» @A= PSCR /L @A= PMOV @A=,/L,@AU , PRUN PCAS,0 @A= B 2 P$PCASC M=@M=,A=@A=,C=@C=,CU=@CU=,D=@D=,DU=@DU= * P$PCASC M=@M=,A=@A=,C=@C=,CU=@CU=,D=@D= $ P$PCASC M=@M=,A=@A=,C=@C=,CU=@CU= * P$PCASC M=@M=,A=@A=,C=@C=,D=@D=,D
0x03008c…030220 Dummy {f00=0x000f, f01=0x018e, f02=» PEND P$PCASC PWEF 3 PASG @FC=43,@DK=DK,@C=,@CU , PPCH @FC=43 @C= N PMES @C= h PASG @FC=43,@DK=DK,@D=,@DU PPCH @FD=43 @D= PMES @D= P$PCASE PEND P$PCASF * PMES ILLE
0x030220…0303b4 (0, 61) Dummy {f00=0x000f, f01=0x0190, f02=» PEND P$PCASE PWEF 3,2 PULD 3 . PMES END OF $PCAS < PEND X P$EDIT d P$EDITUF NAME=@UF= r P$EDITSC NAME=@SC= P$EDITSC NAME=@S= < PMES PARAMETERS 'S', 'SC' OR 'UF' REQUIRED !!!!!!!!!!! PEND
0x0303b4…030548 Dummy {f00=0x000f, f01=0x40a8, f02=»S PREF /D4 @NAME= PASG 20,DK " PASG 21,DK 4 PASG 22,DK F PRDA 20,/D4 X PRUN EDIT,0 j PREF 21 | PRDS 21 PEND @ DITSC NAME=@S= < PMES PARAMETERS 'S', 'SC' OR 'UF' REQUIRED !!!!!!!!!!! PEND
0x030548…0306dc Dummy {f00=0x000f, f01=0x2008, f02=» PREF 21 PRDS 21 PEND &@ 2DITSC NAME=@S= 4 < PMES PARAMETERS 'S', 'SC' OR 'UF' REQUIRED !!!!!!!!!!! L PEND P$EDITUF PASG 20,DK,@NAME PASG 21,DK PASG 22,DK PRUN EDIT,0 PEND P$EDITS
0x0306dc…030870 Dummy {f00=0x000f, f01=0x0190, f02=» :01 d _ 2Z $"z y ?H T+ V y J t Dh i VR 1H W ] [ ? d % L X! "~ T &b Cn 1 d F < :R:R: ` ZPzh % h v 66 B r4i : 0 ` ^&W D/ H P = D# v>~ v `" f V>~ $#` d p 4d @z V
0x030870…030a04 Dummy {f00=0x000f, f01=0x0190, f02=» 8z 4 P OPT OUT=FC= FT= INP=DATE= P $ 9 H4` 1Lb p V -8 T < , tB ph Tg t z ^ r h V H 2 Z f9 z
0x030a04…030b98 Dummy {f00=0x000f, f01=0x0190, f02=» :01 d _ 2Z $"z y ?H T+ V y J t Dh i VR 1H W ] [ ? d % L X! "~ T &b Cn 1 d F < VOLUME 2 I L VOLUME 365 2 B X : Z l
0x030b98…030d2c Dummy {f00=0x000f, f01=0x0190, f02=»MPATIBILITY TOSS-DISC / PDISC VERSION END PDISC PDISC: DISC NOT OPERABLE OUTPUT DISC I/O ERROR NO TOSS DISC FORMAT BADSPOT ON TRACK ZERO MORE THAN 5 BADSPOTS FLEXIBLE DISC WRITE PROTECTED ONE OR MORE VOLUMES UNKNOWN DISC OVERF
0x030d2c…030ec0 Dummy {f00=0x000f, f01=0x0190, f02=» NO ENTRY AVAILABLE IN VTOC PARAMETER I/O ERROR 11PARAMETER ERROR $ FORMAT ERROR IN CONFIGURATION FILE INPUT DISC I/O ERROR TOO MANY SECTORS IN FILE OUTPUT FILE IS NOT A MONITOR : FILE NAME WITH ANOTHER FILE ORGANIZATION ALREADY EXISTS
0x030ec0…031054 (0, 62) Opaque[0x194]
0x031054…0311e8 # DirEnt {nam=»SUM «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x01f0, f03=0x0000}
0x031054…0311e8 IdxSect {
0x031054…0311e8 f00 = 0x000f // 0x31054 @0x0
0x031054…0311e8 f01 = 0x0004 // 0x31056 @0x2
0x031054…0311e8 gno = [ // 0x31058 @0x4
0x031054…0311e8 [0x00]: C0x000f.0x2.0
0x031054…0311e8 [0x01]: C0x000f.0x3.0
0x031054…0311e8 ]
0x031054…0311e8 }
0x0311e8…03137c Dummy {f00=0x000f, f01=0x0190, f02=»
0x03137c…031510 Dummy {f00=0x000f, f01=0x0190, f02=»R * Z ` D L R L A 5 L W W ` $ F @ bV& L | ** - Z ` d h X 8 8 D 8Y, W W : ( SUM 11.0 (810216) *** SAV
0x031510…0316a4 Dummy {f00=0x000f, f01=0x0190, f02=»1 357 41100 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 t USERID: @ bV
0x0316a4…031838 Dummy {f00=0x000f, f01=0x0190, f02=» A v : A B @ bV T t 9! A | bV D @ bV(W @ bV " T F Z2 @ bV @ V D F t _ A z :
0x031838…0319cc Dummy {f00=0x000f, f01=0x0190, f02=» @ bV 6 T Z
0x0319cc…031b60 Dummy {f00=0x000f, f01=0x0190, f02=» STATUS WORD: @ * P WRITE PROTECTED @ * P NOT OPERABLE @ * P END OF TAPE ( < $" = A A ( : A ^ A ` ( h A ^ A ` < ! X !XXT L( ( @ h! : A ^ A ` (
0x031b60…031cf4 (0, 63) Dummy {f00=0x000f, f01=0x0190, f02=»_ 0Z2 U ]@ YF< Y< ZT L A 5 ` F R P ~ bZ : # ( # @ d bZ, : ?? DISC FILE CODE ? OK ? LISTING OF FILENAMES ETC.? < $" = @ L A L A N A L : A NW @ n A N
0x031cf4…031e88 Dummy {f00=0x000f, f01=0x0190, f02=» j A p @ N A N : ; [ [ [ Z Z Z : : < , = = . $ - Y : . - : . " :d H - " H - :0123456789ABCDEF . A 9h _@ . - Y : @ nY : @ U > : @ A R _ : . j
0x031e88…03201c Dummy {f00=0x000f, f01=0x0190, f02=» 1 PAGE: f Z
0x03201c…0321b0 Dummy {f00=0x000f, f01=0x0190, f02=» W _" 4X X [ Z _ TV 4P P _ WJ U : R O T O O W O U W W F A BP @ : _ _ _ 1^ _ 1Y P J 0^& Q
0x0321b0…032344 Dummy {f00=0x000f, f01=0x0190, f02=» 0TOO MANY I/O ERRORS ON DISC ,P @ < * XXXXING SECTOR: XXXX, STATUS WORD: XXXX ( READWRIT , %Q R Y W W Z ' [ : ; [ [ [ [ [ R Q @ - WJ @ - A R( X R X
0x032344…0324d8 Dummy {f00=0x000f, f01=0x0190, f02=»IMITER PTS j z 6 P LD A1,S:CHR2,A13 STRING CONTROL CHARACTERS * PTS k 0 P ST A1,CHARMS+4 INITIATE ERROR MESSAGE * PTS k L $ P LDKL A7,CHARMS "$$ ERROR" * PTS k P ABL UPD185 * PTS k P k 2 PLINENO EQU * LINENUMBER 1 > LINENUMBER 2 PTS k : P LDKL A7
0x0324d8…03266c Dummy {f00=0x000f, f01=0x0190, f02=»ASB3,A13 FILE NAME * PTS k P MS 3,ASREF+4 * PTS l P LDKL A1,' ' * PTS l < & P LD A2,W:ASB6,A13 FILE TYPE * PTS l X P MS 2,ASREF+10 * PTS l 8 P LDKL A7,ASREF "<NAME><TYPE> CAN NOT BE ASG'D" * PTS l ( P ABL UPD185 GIVE ERROR MESSAGE * PTS l P
0x03266c…032800 Dummy {f00=0x000f, f01=0x0190, f02=» LED,978 l P!!JN LED,982,983 m P m ( P!!JN LED,987 m 0 0 P LD A3,S:NB,A13 SHOW CURRENT LINENUMBER PTS m D 4 P CFI A14,C:BIDE,A12 CONVERT LINENO TO ASCII PTS m x . P MS 2,SEQER+30 LINENO IN ERRORMESSAGE PTS m P!!JN LED,991,992 m P EJECT * PTS
0x032800…032994 (0, 64) Opaque[0x194]
0x032994…032b28 # DirEnt {nam=»RUM «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0200, f03=0x0000}
0x032994…032b28 IdxSect {
0x032994…032b28 f00 = 0x0010 // 0x32994 @0x0
0x032994…032b28 f01 = 0x0006 // 0x32996 @0x2
0x032994…032b28 gno = [ // 0x32998 @0x4
0x032994…032b28 [0x00]: C0x0010.0x0.0
0x032994…032b28 [0x01]: C0x0010.0x1.0
0x032994…032b28 [0x02]: C0x0010.0x2.0
0x032994…032b28 ]
0x032994…032b28 }
0x032b28…032cbc Dummy {f00=0x0010, f01=0x0190, f02=» 4
0x032cbc…032e50 Dummy {f00=0x0010, f01=0x0190, f02=» V b @ D 4D;a<a * A A A R$S D L R( L A L 2 W 0MT AT EOF! W r 2 A R Sr @ ^ _& @ V& z ** - &Z b v 8
0x032e50…032fe4 Dummy {f00=0x0010, f01=0x0190, f02=» (810216) *** RESTORED FILES WITH GRANULE ADDRESSES ************** DATE OF RUN: YYMMDD 0RUM REL 11.0 DATE 81. 02. 16 12NC=8701 356 41100 0RESTORE D I S C FROM MAGTAPE 0RESTORE U S E R FROM MAGTAPE 0MEMORY OVERFLOW STATISTICS TOTAL NUMBER OF RESTOR
0x032fe4…033178 Dummy {f00=0x0010, f01=0x0190, f02=» P W D * A @ Q @ T T A W 8 v A V A K @ z K K @ :T W D < v @ v @ @ V P @ ~T @
0x033178…03330c Dummy {f00=0x0010, f01=0x0190, f02=» OVERFLOW W 0CATALOG OVERFLOW @ , z WHEN CREATING USER UUUUUUUU NEW USERID: N:O OF FILES RESTORED:, N:O OF GRANULES ALLOCATED:
0x03330c…0334a0 Dummy {f00=0x0010, f01=0x0190, f02=» V T T RW A A A e V6 @ e @ v v J @ 9! A | V P0R* VP( 0DISK OVERFLOW WHEN RESTORINGW V8 9! W ! T T Z$
0x0334a0…033634 (0, 65) Dummy {f00=0x0010, f01=0x0190, f02=» A z : @ z @ ! z @ * z & FILE: FFFFFF TYPE: TT USER: UUUUUUUU A ~ @ ~ d J ] _ W S UNEXPECTED TAPE MARK A ~ RESTORED FILE NO GOOD _ < $" = ~ A A ( : A .
0x033634…0337c8 Dummy {f00=0x0010, f01=0x0190, f02=» j W n A . A 0 ( H ES O A : W ! T _ !//T ( _ 0Z2 U ]@ YF< Y< ZT A R ~ P N 2Z : , # ( # @ 4 T 2Z, : ?? DISC FILE CODE ? OK
0x0337c8…03395c Dummy {f00=0x0010, f01=0x0190, f02=» > *( @ @ A , A . z ( : U z W @ #U. A @ d A p @ ~ A : ; [ [ [ Z Z Z : : < , = = $ - Y : - : " :d H - " H - :0123456789ABCDEF
0x03395c…033af0 Dummy {f00=0x0010, f01=0x0190, f02=» 1 PAGE: 6
0x033af0…033c84 Dummy {f00=0x0010, f01=0x0190, f02=»P WX [ WD ; T : : W H _" 4X X [ Z _ TV 4P P _ XWJ U z : X R O T O O W O U W W H
0x033c84…033e18 Dummy {f00=0x0010, f01=0x0190, f02=» A A ( @ T2 : W A ^ A p l Y : A ]B 0TOO MANY I/O ERRORS ON DISC P z @ * XXXXING SECTOR: XXXX, STATUS WORD: XXXX ( READWRIT A "( @ *P P,QT @
0x033e18…033fac Dummy {f00=0x0010, f01=0x0190, f02=»ERROR ON MT STATUS WORD: @ * P NOT OPERABLET& @ ( d LENGTH ERROR _ $ "( : , %Q R Y W W Z ' [ : V T(= @ M A _ @ V I _ P W H @ R
0x033fac…034140 Dummy {f00=0x0010, f01=0x0190, f02=»
0x034140…0342d4 (0, 66) Dummy {f00=0x0010, f01=0x0190, f02=» - A R( X R X _ Q @ X A T - _. D - Z Z Z Z Z : :- 0123456789 d ' A B A F @ 4 R" 4X @ =C R 9 V W H b - 9W: b - 9W. ;c ` Q( $ ,` A { <` @ + @ : W
0x0342d4…034468 Dummy {f00=0x0010, f01=0x0044, f02=» H P ( 0 p 8 @ H P X ( 8 @ H h x
0x034468…0345fc Dummy {f00=0x0010, f01=0x018e, f02=» P IDENT LED GOKU/80-11-17 P* $ P* . P* 8 P* B P* L PSEG6 EQU * V P DATA UPDPRO r > P DATA UPDPST POST PROCESSING(IF ABORTED) P* P* P* P* P NLI
0x0345fc…034790 Dummy {f00=0x0010, f01=0x0190, f02=» P* P* P* 8 PCVEADR EQU /82 ADDR OF SUPERVISOR CVT & P* b . PCVEMSZ EQU 0 MEMORY SIZE l , PCVESTB EQU CVEMSZ+2 STACK BASE 6 PCVESBA EQU CVESTB+2 SMALLEST BUFFER ADDR 6 P
0x034790…034924 Dummy {f00=0x0010, f01=0x0190, f02=»+2 START ADDR OF DISPATCHER x 2 PCVEFCT EQU CVEDSP+6 FILE CODE TABLE & 4 PCVEDWT EQU CVEFCT+2 DEVICE WORK TABLE 4 PCVEDCT EQU CVEDWT+2 DISK CONTROL TABLE 6 PCVEJPT EQU CVEDCT+2 JOB PARAMETER TABLE . PCV
0x034924…034ab8 Dummy {f00=0x0010, f01=0x0190, f02=»ELFT+2 CURRENT YEAR, 2 ASCIL CHAR | < PCVEMON EQU CVEYAR+2 CURRENT MONTH,2 ASCIL*CHAR , < PCVEDAY EQU CVEMON+2 CURRENT DAY, 2 ASCIL CHAR l 4 PCVEHOR EQU CVEDAY+2 HOURS ^ @ PCVEMIN EQU CVEHOR+2 MINUTE
0x034ab8…034c4c Dummy {f00=0x0010, f01=0x0190, f02=» ` 2 PCVEBTB EQU CVEFIT+2 ALLOCATION TABLE P* > P* H P* R P* & P* FCT FILE CODE TABLE f P* , PFCTFC EQU 0 FILE CODE H PFCTDWT EQU 2 ADDR OF DWT ASSIGNED TO THE FILE
0x034c4c…034de0 Dummy {f00=0x0010, f01=0x0190, f02=»TROL TABLE v . PDCTLG EQU -14 ENTRY LENGTH F PDCTEB0 EQU DCTLG+2 EVENT BYTE / LOGICAL DISK FILE CODE D : PDCTEB1 EQU DCTEB0+2 BUFFER (205 WORDS) ADDR B PDCTEB2 EQU DCTEB1+2 REQUESTED LENGTH,410 CHARACTER
0x034de0…034f74 (0, 67) Opaque[0x194]
0x034f74…035108 # DirEnt {nam=»DUMPA «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0218, f03=0x0000}
0x034f74…035108 IdxSect {
0x034f74…035108 f00 = 0x0010 // 0x34f74 @0x0
0x034f74…035108 f01 = 0x000a // 0x34f76 @0x2
0x034f74…035108 gno = [ // 0x34f78 @0x4
0x034f74…035108 [0x00]: C0x0010.0x3.0
0x034f74…035108 [0x01]: C0x0011.0x0.0
0x034f74…035108 [0x02]: C0x0011.0x1.0
0x034f74…035108 [0x03]: C0x0011.0x2.0
0x034f74…035108 [0x04]: C0x0011.0x3.0
0x034f74…035108 ]
0x034f74…035108 }
0x035108…03529c Dummy {f00=0x0010, f01=0x0190, f02=» l #2 j @ @ h @ z @ FLT T W A l A rQ P A v_B z A tT A r :
0x03529c…035430 Dummy {f00=0x0010, 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
0x035430…0355c4 Dummy {f00=0x0010, 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
0x0355c4…035758 Dummy {f00=0x0010, 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 : : < , = = $ -
0x035758…0358ec Dummy {f00=0x0010, f01=0x0190, f02=» @ U : @ A R _ : 1 A : $ 1
0x0358ec…035a80 Dummy {f00=0x0010, f01=0x0190, f02=» ! R ?U : : $ - - Y : @ 4 Q $ 1 ^ ` 1 Y j d ~ d $ d T T d ^ @ @
0x035a80…035c14 (0, 68) Dummy {f00=0x0011, f01=0x0190, f02=»ME: : : FORMAT: 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
0x035c14…035da8 Dummy {f00=0x0011, f01=0x0190, f02=» A A A W ` A ^ " : 0 d : [ R 8 !--P # 0Z Y" W W 9H [ : d !SST@ vR<Q l vU0 vR P 9 _ rW t l / "( A z_ A ( A A
0x035da8…035f3c Dummy {f00=0x0011, 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
0x035f3c…0360d0 Dummy {f00=0x0011, 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
0x0360d0…036264 Dummy {f00=0x0011, f01=0x0190, f02=» "( B T : C C ( LP NOT OPERABLE . x C C ( $ : &CASETTE:E1
0x036264…0363f8 Dummy {f00=0x0011, f01=0x0190, f02=» - ! - - D - ( B R : @ ) D _ E1TK E4MT F4FD F5FD F6FD F7FD FILECODE: XX NOT OPERABLE !
0x0363f8…03658c Dummy {f00=0x0011, f01=0x0190, f02=»
[…0x9…]
0x0373c0…037554 (0, 70) Dummy {f00=0x0011, f01=0x0190, f02=» !
0x037554…0376e8 Dummy {f00=0x0011, f01=0x0190, f02=»
[…0x9…]
0x03851c…0386b0 Dummy {f00=0x0011, f01=0x0190, f02=» ; [ [ [ [ [ R Q @1 - WJ @1 - A1 R( X1 R X1 _ Q @1 X A1 T1
0x0386b0…038844 Dummy {f00=0x0011, f01=0x0190, f02=» !$*); ??? &%->? :#@'=" ABCDEFGHI JKLMNOPQR STUVWXYZ 0123456789 ( R * 2| Y _ : ~ & P$ U ?V W _ vW 2 dW $UN # v v :
0x038844…0389d8 Dummy {f00=0x0011, f01=0x0190, f02=» A ( A A ! X !XXT ( ( @ ! : A A ( : f NP W A A ( r ES O A fW ! T _ !//T ( _ 0Z2 U ]@ YF< Y< ZT A "
0x0389d8…038b6c Dummy {f00=0x0011, f01=0x0190, f02=»OK ? LISTING OF FILENAMES ETC.? < $" = @ A A B A : A W @ 8 n A A 8 J A <U ( @ @ A A ( : @ U nW @ < #U. A : @ : A < > p @ & A : ; [ [ [ Z
0x038b6c…038d00 Dummy {f00=0x0011, f01=0x0190, f02=» A e9h * _@ - Y : @ 8 nY : @ <U : @ 8 A 8R 2_ 8 : A 8 : W A A ( ES O A fW ! T _ !//T ( _ 0Z2 U ]@ 1 Y< ZT A
0x038d00…038e94 (0, 72) Opaque[0x194]
0x038e94…039028 # DirEnt {nam=»PMPTS «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0240, f03=0x0000}
0x038e94…039028 IdxSect {
0x038e94…039028 f00 = 0x0012 // 0x38e94 @0x0
0x038e94…039028 f01 = 0x0010 // 0x38e96 @0x2
0x038e94…039028 gno = [ // 0x38e98 @0x4
0x038e94…039028 [0x00]: C0x0012.0x0.0
0x038e94…039028 [0x01]: C0x0012.0x1.0
0x038e94…039028 [0x02]: C0x0012.0x2.0
0x038e94…039028 [0x03]: C0x0012.0x3.0
0x038e94…039028 [0x04]: C0x0013.0x0.0
0x038e94…039028 [0x05]: C0x0013.0x1.0
0x038e94…039028 [0x06]: C0x0013.0x2.0
0x038e94…039028 [0x07]: C0x0013.0x3.0
0x038e94…039028 ]
0x038e94…039028 }
0x039028…0391bc Dummy {f00=0x0012, f01=0x0190, f02=» <W v x ` % d C * C ( #( # C C ( C % C ( @ ? T &p_B @ F1ZL F9YR U d 00 @ S _x &$ P T.W8 @ % % $ % 2 % ( 4 $ % W
0x0391bc…039350 Dummy {f00=0x0012, f01=0x0190, f02=» B YE Z X ` U d &Z S * d C C ( C C ( @ j b ? T &p_> D b AB 88T B D 63 d A( 67T B D 91T LR 68 B D 75T U d 6875W 76T U d 6876 -H 79
0x039350…0394e4 Dummy {f00=0x0012, f01=0x0190, f02=»REMARK: DISC FILE CODE : XX NOT OPERABLE END OF PMPTS VOLUME LABEL MISSING OR UNREADABLE OK ? @ _B @ F1ZL F9YR 00 @ _x P T W @ % ( W
0x0394e4…039678 Dummy {f00=0x0012, f01=0x0190, f02=» B YE Z S * C C ( C C ( @ b ? T _> D b AB 88T B D 63 d 67T B D 91T 68 B D 75T 6875W 76T 6876 79
0x039678…03980c Dummy {f00=0x0012, f01=0x0190, f02=»REMARK: DISC FILE CODE : XX NOT OPERABLE END OF PMPTS VOLUME LABEL MISSING OR UNREADABLE OK ? @ _B @ F1ZL F9YR 00 @ _x P T W @ % ( W
0x03980c…0399a0 Dummy {f00=0x0012, f01=0x0190, f02=» B YE Z S * C C ( C C ( @ b ? T _> D b AB 88T B D 63 d 67T B D 91T 68 B D 75T 6875W 76T 6876 79
0x0399a0…039b34 (0, 73) Dummy {f00=0x0012, f01=0x0190, f02=»REMARK: DISC FILE CODE : XX NOT OPERABLE END OF PMPTS VOLUME LABEL MISSING OR UNREADABLE OK ? @ _B @ F1ZL F9YR 00 @ _x P T W @ % ( W
0x039b34…039cc8 Dummy {f00=0x0012, f01=0x0190, f02=» B YE Z S * C C ( C C ( @ b ? T _> D b AB 88T B D 63 d 67T B D 91T 68 B D 75T 6875W 76T 6876 79
0x039cc8…039e5c Dummy {f00=0x0012, f01=0x0190, f02=»REMARK: DISC FILE CODE : XX NOT OPERABLE END OF PMPTS VOLUME LABEL MISSING OR UNREADABLE OK ? @ _B @ F1ZL F9YR 00 @ _x P T W @ % ( W
0x039e5c…039ff0 Dummy {f00=0x0012, f01=0x0190, f02=» B YE Z S * C C ( C C ( @ b ? T _> D b AB 88T B D 63 d 67T B D 91T 68 B D 75T 6875W 76T 6876 79
0x039ff0…03a184 Dummy {f00=0x0012, f01=0x0190, f02=»REMARK: DISC FILE CODE : XX NOT OPERABLE END OF PMPTS VOLUME LABEL MISSING OR UNREADABLE OK ? @ _B @ F1ZL F9YR 00 @ _x P T W @ % ( W
0x03a184…03a318 Dummy {f00=0x0012, f01=0x0190, f02=» B YE Z S * C C ( C C ( @ b ? T _> D b AB 88T B D 63 d 67T B D 91T 68 B D 75T 6875W 76T 6876 79
0x03a318…03a4ac Dummy {f00=0x0012, f01=0x0190, f02=»REMARK: DISC FILE CODE : XX NOT OPERABLE END OF PMPTS VOLUME LABEL MISSING OR UNREADABLE OK ? @ _B @ F1ZL F9YR 00 @ _x P T W @ % ( W
0x03a4ac…03a640 Dummy {f00=0x0012, f01=0x0190, f02=» B YE Z S * C C ( C C ( @ b ? T _> D b AB 88T B D 63 d 67T B D 91T 68 B D 75T 6875W 76T 6876 79
0x03a640…03a7d4 (0, 74) Dummy {f00=0x0012, f01=0x0190, f02=»REMARK: DISC FILE CODE : XX NOT OPERABLE END OF PMPTS VOLUME LABEL MISSING OR UNREADABLE OK ? @ _B @ F1ZL F9YR 00 @ _x P T W @ % ( W
0x03a7d4…03a968 Dummy {f00=0x0012, f01=0x0190, f02=» B YE Z S * C C ( C C ( @ b ? T _> D b AB 88T B D 63 d 67T B D 91T 68 B D 75T 6875W 76T 6876 79
0x03a968…03aafc Dummy {f00=0x0012, f01=0x0190, f02=»REMARK: DISC FILE CODE : XX NOT OPERABLE END OF PMPTS VOLUME LABEL MISSING OR UNREADABLE OK ? @ _B @ F1ZL F9YR 00 @ _x P T W @ % ( W
0x03aafc…03ac90 Dummy {f00=0x0012, f01=0x0190, f02=» B YE Z S * C C ( C C ( @ b ? T _> D b AB 88T B D 63 d 67T B D 91T 68 B D 75T 6875W 76T 6876 79
0x03ac90…03ae24 Dummy {f00=0x0012, f01=0x0190, f02=»REMARK: DISC FILE CODE : XX NOT OPERABLE END OF PMPTS VOLUME LABEL MISSING OR UNREADABLE OK ? @ _B @ F1ZL F9YR 00 @ _x P T W @ % ( W
0x03ae24…03afb8 Dummy {f00=0x0012, f01=0x0190, f02=» B YE Z S * C C ( C C ( @ b ? T _> D b AB 88T B D 63 d 67T B D 91T 68 B D 75T 6875W 76T 6876 79
0x03afb8…03b14c Dummy {f00=0x0012, f01=0x0190, f02=»REMARK: DISC FILE CODE : XX NOT OPERABLE END OF PMPTS VOLUME LABEL MISSING OR UNREADABLE OK ? @ _B @ F1ZL F9YR 00 @ _x P T W @ % ( W
0x03b14c…03b2e0 Dummy {f00=0x0012, f01=0x0190, f02=» B YE Z S * C C ( C C ( @ b ? T _> D b AB 88T B D 63 d 67T B D 91T 68 B D 75T 6875W 76T 6876 79
0x03b2e0…03b474 (0, 75) Dummy {f00=0x0012, f01=0x0190, f02=»REMARK: DISC FILE CODE : XX NOT OPERABLE END OF PMPTS VOLUME LABEL MISSING OR UNREADABLE OK ? @ _B @ F1ZL F9YR 00 @ _x P T W @ % ( W
0x03b474…03b608 Dummy {f00=0x0012, f01=0x0190, f02=» B YE Z S * C C ( C C ( @ b ? T _> D b AB 88T B D 63 d 67T B D 91T 68 B D 75T 6875W 76T 6876 79
0x03b608…03b79c Dummy {f00=0x0012, f01=0x0190, f02=»REMARK: DISC FILE CODE : XX NOT OPERABLE END OF PMPTS VOLUME LABEL MISSING OR UNREADABLE OK ? @ _B @ F1ZL F9YR 00 @ _x P T W @ % INVALID PA
0x03b79c…03b930 Dummy {f00=0x0012, f01=0x0190, f02=» B YE Z S * C C ( C C ( @ b ? T _> D b AB 88T B D 63 d 67T B D 91T 68 B D 75T 6875W 76T 6876 79
0x03b930…03bac4 Dummy {f00=0x0012, f01=0x0190, f02=» C C C ( B : 0 &N "! #( B : & d C C ( & $ $ % & d C C ( : & & ' '$'> F1 - F9 N6875 - 2,5 MB; 6876 - 5,0 MB; 6879 - FLOPPY; 8863 - MFD; 6791 - 1 MB FLOPPY YY MM DD ANY NUMBER 0000 -
0x03bac4…03bc58 Dummy {f00=0x0012, f01=0x0190, f02=» =L=k ] n ] p 9BR :K T :A Y :a :i q r E x T 4 &: 4: V - P Y _( Y M : $ ] $ =IR E : $_ t , ) Y
0x03bc58…03bdec Dummy {f00=0x0012, f01=0x0190, f02=» x T T &: 4: V - P Y _( Yj Y =C ] J R ] NQ 5 Y ] L ] PY : R , ] F ] H =B ] J ] P T M T _> : TP ] T=B- ] J ] P :q q E A I I M
0x03bdec…03bf80 Dummy {f00=0x0012, f01=0x0190, f02=» & ] f ] h A Z : X ] X W 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 :
0x03bf80…03c114 (0, 76) Dummy {f00=0x0013, f01=0x0190, f02=» , ) Y %? ] % ] =A ] ] ] ^ R @ ] :A H x T T &: 4: V - P Y _( Yz ] ] =B ] ] : P ] =B- ]
0x03c114…03c2a8 Dummy {f00=0x0013, f01=0x0190, f02=» SUPERV Wp U (@ - # C C ( #( 5 U (@ - # C C ( #( (@ V8 4 < # X V / 8 C ( X 9DV` X C % P _ ( X 8 U X $ ? T X ! P 9b &p_p X
0x03c2a8…03c43c Dummy {f00=0x0013, f01=0x0190, f02=» 8 U _ R R S R R S 4n 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 5 R * $P 1 1 _ 5 " $P 1 1 _ 5 :A $P 1 1 _ R &N N 3z S
0x03c43c…03c5d0 Dummy {f00=0x0013, f01=0x0190, f02=» 3 W R R R T R T R P 0 W % R W R F P B5 f 1H R >A >D s S % S S R 4 3 1 3 W S R S S : 5, (@ - 56 _ 5X _ 5d _" R 1V R A5 A5 3 1l 3 R S R %
0x03c5d0…03c764 Dummy {f00=0x0013, f01=0x0190, f02=» R :a_ 9 _, ? S - Y < R R . % A2j 3 28 3 W ' R R 3 2T 3 W R % Z $CATALOG S R S R R 3N VTOC S B5 R R 9H R R R R 3N R S S S
0x03c764…03c8f8 Dummy {f00=0x0013, f01=0x0190, f02=» 3 3v 3 W : F N : >C F S . : :a :Av v >D >BF ::a :Av v >D >B _ N S4Y > R*> 5D 1&N S Y ?T > Z > R 1 1, 14 A4^ R R @4^ : R 8 YET [ W NOT - [ : : A4^ R 4X SR S S :
0x03c8f8…03ca8c Dummy {f00=0x0013, f01=0x0190, f02=» RUN AGAIN : LABEL: DATE: PACK NBR: SYST. USERID: END OF PMPTS SEEK ERRORUNKNOWN DEVICEDEVICE NOT OPERABLE THRUPUT ERR BAD TRACK IN FIRST CYL. NBR OF DEF. TRACKS: S/ / 3 3 3~ 3 3 3| 3 3 3 3
0x03ca8c…03cc20 Dummy {f00=0x0013, f01=0x0190, f02=» USER POSSIBLE RUN AGAIN ? : END OF PMPTS LABEL = DATE = 6879 PACK NBR =
0x03cc20…03cdb4 (0, 77) Dummy {f00=0x0013, f01=0x0190, f02=» CATALOG
0x03cdb4…03cf48 Dummy {f00=0x0013, f01=0x0190, f02=» ( 0 $ ,
0x03cf48…03d0dc Dummy {f00=0x0013, f01=0x0190, f02=» CATALOG
0x03d0dc…03d270 Dummy {f00=0x0013, f01=0x0190, f02=»< U < U 6 U < U 6 U 6 $ ? T &p_( A6 A6 R * A6 A@B A@ A=` A=f A=l A@f A@p A@t A@ A@ A@ A@J A@^ A@z A@ < U 6 U 6 $ ? T &p_( @5 A6 6 U 6 U @6 ? T &p_& NOT 6 T 6
0x03d270…03d404 Dummy {f00=0x0013, f01=0x0190, f02=» @: P 8A A; A: =t O6 : ; ; =t 6 A@X @; @: 9@ A= 9@ O6 @B 6 : ; N6 A; @6 @6 > @6 # TH @; 8A A; ! T: A: @: T : @; O6 ; N6 A; @6 A6 _P @z P @ A6 @6 ! v @: T @; O6 : ; > A
0x03d404…03d598 Dummy {f00=0x0013, f01=0x0190, f02=» P @ @8 A:. 6 ? 6 : " A8 6 A8 A6 A6 6 A@X @J P @ : 6 A6 8~ A@X @J P @ @:. A8 A8 6 A@X A@B A@f A@p A@t A@ A@ A@ A@J A@^ A@z A@ 6l U 6z U NO @6zP YE @6z ( <.A A@ 6z
0x03d598…03d72c Dummy {f00=0x0013, f01=0x0190, f02=»S6I Y : @6 P P 4 ^ :A H9 W W 9C : 6 $$ AV U @* A5 Z Sx A6D A6F @5 Sx A6J A6L 66 $$ AV U ( S S S S SUPERV AI AI AI AI W2 U (@ A # C C ( (@ ( I l
0x03d72c…03d8c0 Dummy {f00=0x0013, f01=0x0190, f02=» T 8 Y X ;EV B4 S _| W 00 BJ R _ X %_f F S S IR LABEL = S < DATE = S h S l S p PACK NBR = S v 8863 S r 0 f S . S S L R * $P 1 1 _ K " $P 1 1 _ L " :A $P 1 1 _
0x03d8c0…03da54 (0, 78) Dummy {f00=0x0013, f01=0x0190, f02=» BL@ " BL> < G C Hr AC G. R T R T R T R & BL@ 0 BL> F D CLW C <A PLD QLD QLD<a G S R BLBQ:>A R Q0 J (@ Aj J _ K _ K _ K* _& R Df R AKX AKZ KB _D K _L D SR AK D _ A
0x03da54…03dbe8 Dummy {f00=0x0013, f01=0x0190, f02=» R S R % R G R R R R V 9d9A S - ] " :A HL M ? S - Y < R R . % AE R P G Q *n BLP R G R % Z $CATALOG S R S R S R R G" QJ VTOC S
0x03dbe8…03dd7c Dummy {f00=0x0013, f01=0x0190, f02=» AI (@ A KD D2 & G F Hr R R G. F H6WX S R 9H R R R R S R O R G" N G E$ Hr DP G : H AH =h Gj GH H6W @H Gj Gf H6W : :a :Av v >L >B F :
0x03dd7c…03df10 Dummy {f00=0x0013, f01=0x0190, f02=»>B _| >A >K >B _ N STY ?T > Z<> RB> RB> R2> _ N S,Y ?T > Zd> R > > R > R > _ D, D8 D@ DHN [ Y ? > Z > Z > Z(_ AH R DH @H :0 $(,1 !%)-2 "&*.3 #'+/ AH R H SR S Q VTOC : R
0x03df10…03e0a4 Dummy {f00=0x0013, f01=0x0190, f02=»_(888863 R T SYSTEM S :J 8 H J L J 0 J H J* * JH JT Jn J Ix RUN AGAIN ?: LABEL: DATE: PACK NBR: DISK UNIT PHYSICAL ADDRESS: DAD NAME: NBR. OF CYL OF DDDDDD : NBR. OF
0x03e0a4…03e238 Dummy {f00=0x0013, f01=0x0190, f02=» ERRORUNKNOWN DEVICEDEVICE NOT OPERABLE THRUPUT ERR PROGRAM ERROR BAD TRACK IN FIRST CYL. TOO MANY DEF. TRACKS: D8 DAD TOO BIG,BITAB OFLOW NBR. OF INT NOT COMPATIBLE WITH NBR. OF SECT/TRNBR. OF INT NOT LESS THAN NBR. OF SECT/TRXPCTD: S READ:VTOC : R
0x03e238…03e3cc Dummy {f00=0x0013, f01=0x0190, f02=» # X V W 8 C ( X 9DV X C ( X X2 0_: L C ( * ! T 8 Y X ;EV L S _j W 00 L R _ X %_f N LABEL = S < DATE = S h S l S p PACK NBR = S v 0 f S .
0x03e3cc…03e560 Dummy {f00=0x0013, f01=0x0190, f02=» S _0 @R h @R S - @R M ? S @R D - Y < S $ S " OV O O @R P ( W , S $ OV O O % Z $CATALOG S R S S $ OV O O % Z R S S S OV
0x03e560…03e6f4 (0, 79) Dummy {f00=0x0013, f01=0x0190, f02=» AR : S T WT @R P( T W@ ^ 9A DQ DQ W$ ^ R @ S 9A DQ $ S : R P S O : R :B* W` R ":a R *! 9A r R $ R :B R * W0 R ":a R *! 9A r R $ R :B R R * B PN : R * N
0x03e6f4…03e888 Dummy {f00=0x0013, f01=0x0190, f02=»R Rv (@ U (@ P # C C ( (@ ( AQ4 R Q. SR S P ( W , : R 8 YEP( NOT$ # Qz C C ( V8 : END OF PMPTS R T SYSTEM S :Q 8 QDQ L Q 0 Q
0x03e888…03ea1c Dummy {f00=0x0013, f01=0x0190, f02=»RABLE THROUGHPUT ERRORWRITE PROTECTED SECTOR NOT FOUNDDATA FAULT: SECTOR NO. ^ AR R 0 1 Y S AS S 4 0R, ! Q& P 8 8 W Y( AS @S @S *! 9A r 8 ! P !00R* !::R !AAR !FFQ Y& 8 9 Y
0x03ea1c…03ebb0 Dummy {f00=0x0013, f01=0x0190, f02=»P P 9H _4 W; _< W; V; V; V; V; V; : W; W; W; W; W; ; L T PF_ L T& UdW4 @R 0 P 9D _( W; V; V; V; V; V; V; V; V; V; V; W; W; W; W; W; ; L T P*_ 0R" 9Q 0 P* 9C
0x03ebb0…03ed44 Dummy {f00=0x0013, f01=0x0190, f02=»< 9H: " @< :H 0 d R _ A< 9H: " @< :H : : 0R :R AR GV AU AU @V (@ $$T U ( AV : AU AU (@ U ( (@ W AU AU U ( : Vx C CV P $ CV Y , CV Y Vx( :
0x03ed44…03eed8 Dummy {f00=0x0013, f01=0x0190, f02=»P P 9H _4 W; _< W; V; V; V; V; V; : W; W; W; W; W; ; L T P _ L
0x03eed8…03f06c Dummy {f00=0x0013, f01=0x0190, f02=» K l , ( N ? 0` @G :B @G * W O @G L , ( AN ? 0` O G ? 0` L < , ( H(N @G :B @G W L :B @G @G * W L l , ( N ? 0 X M AG X L , ( O / X -( L P M !K P M L $ 'O1 L
0x03f06c…03f200 Dummy {f00=0x0013, f01=0x0190, f02=» !K P M L Z L" 4 L , ( O X ? 0, <b X ! M $ , ( O P2 X M M Y X M T , ( H O R R B Y ! R L M , ( P Qv X P P P P - B M , ( P) - @O P M L
0x03f200…03f394 (0, 80) Opaque[0x194]
0x03f394…03f528 # DirEnt {nam=»OBX «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0280, f03=0x0000}
0x03f394…03f528 IdxSect {
0x03f394…03f528 f00 = 0x0014 // 0x3f394 @0x0
0x03f394…03f528 f01 = 0x0018 // 0x3f396 @0x2
0x03f394…03f528 gno = [ // 0x3f398 @0x4
0x03f394…03f528 [0x00]: C0x0014.0x0.0
0x03f394…03f528 [0x01]: C0x0014.0x1.0
0x03f394…03f528 [0x02]: C0x0014.0x2.0
0x03f394…03f528 [0x03]: C0x0014.0x3.0
0x03f394…03f528 [0x04]: C0x0015.0x0.0
0x03f394…03f528 [0x05]: C0x0015.0x1.0
0x03f394…03f528 [0x06]: C0x0015.0x2.0
0x03f394…03f528 [0x07]: C0x0015.0x3.0
0x03f394…03f528 [0x08]: C0x0016.0x0.0
0x03f394…03f528 [0x09]: C0x0016.0x1.0
0x03f394…03f528 [0x0a]: C0x0016.0x2.0
0x03f394…03f528 [0x0b]: C0x0016.0x3.0
0x03f394…03f528 ]
0x03f394…03f528 }
0x03f528…03f6bc Dummy {f00=0x0014, f01=0x0190, f02=» [ X R p X T0 x <~< ^ ^:^T^x^ ^ _ _ T0 * _ 8 0 d 0 0 $ 0 D F 0
0x03f6bc…03f850 Dummy {f00=0x0014, f01=0x0190, f02=»
[…0x7…]
0x04035c…0404f0 Dummy {f00=0x0014, f01=0x0190, f02=» *UD* *MD*
0x0404f0…040684 Dummy {f00=0x0014, f01=0x0190, f02=»
[…0x7…]
0x041190…041324 Dummy {f00=0x0014, f01=0x0190, f02=» ! !
0x041324…0414b8 Dummy {f00=0x0014, f01=0x0190, f02=»
[…0xa…]
0x042480…042614 (0, 84) Dummy {f00=0x0015, f01=0x0190, f02=»
[…0xa…]
0x0435dc…043770 Dummy {f00=0x0015, f01=0x0190, f02=» ! !
0x043770…043904 Dummy {f00=0x0015, f01=0x0190, f02=»
[…0x13…]
0x045700…045894 (0, 88) Dummy {f00=0x0016, f01=0x0190, f02=»
[…0x1…]
0x045a28…045bbc Dummy {f00=0x0016, f01=0x0190, f02=» 0 0 0 0 0 0 0" $ & ( '00 0 ! # % ' $ 110 81-02-16MODULEIDENT=YYMMDDENTRY REFERRED FROM M
0x045bbc…045d50 Dummy {f00=0x0016, 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
0x045d50…045ee4 Dummy {f00=0x0016, 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 @`
0x045ee4…046078 Dummy {f00=0x0016, 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 @
0x046078…04620c Dummy {f00=0x0016, 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
0x04620c…0463a0 Dummy {f00=0x0016, 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
0x0463a0…046534 (0, 89) Dummy {f00=0x0016, 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
0x046534…0466c8 Dummy {f00=0x0016, 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 "
0x0466c8…04685c Dummy {f00=0x0016, 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 @
0x04685c…0469f0 Dummy {f00=0x0016, 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
0x0469f0…046b84 Dummy {f00=0x0016, 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
0x046b84…046d18 Dummy {f00=0x0016, 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
0x046d18…046eac Dummy {f00=0x0016, 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
0x046eac…047040 Dummy {f00=0x0016, 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
0x047040…0471d4 (0, 90) Dummy {f00=0x0016, 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
0x0471d4…047368 Dummy {f00=0x0016, 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
0x047368…0474fc Dummy {f00=0x0016, 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 [ [ [ [ $ [
0x0474fc…047690 Dummy {f00=0x0016, 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 % [
0x047690…047824 Dummy {f00=0x0016, 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
0x047824…0479b8 Dummy {f00=0x0016, 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
0x0479b8…047b4c Dummy {f00=0x0016, 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
0x047b4c…047ce0 Dummy {f00=0x0016, 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 : &
0x047ce0…047e74 (0, 91) Dummy {f00=0x0016, 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.
0x047e74…048008 Dummy {f00=0x0016, 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
0x048008…04819c Dummy {f00=0x0016, 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
0x04819c…048330 Dummy {f00=0x0016, 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 @
0x048330…0484c4 Dummy {f00=0x0016, 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 ] ]
0x0484c4…048658 Dummy {f00=0x0016, f01=0x018e, f02=»CLN,GETLCN,DWTGEN,NXTBLK h * EJECT * PB:DWTT EQU * 8 $ P CM STKEND+FWTFLG CLEAR FWT FLAG L $ P LD A1,SCTFWT START OF FWT AREA t $ P RF(NZ) BDWT15 FWT AREA RESERVED P LD A1,STKEND+LIMIT 8 P ST A1,STKEND+INTTAB START OF T.I.T. IF
0x048658…0487ec Dummy {f00=0x0016, f01=0x0190, f02=» l P* & P CALL FSTAPL GET FIRST APPLICATION * % LD A12,SCTSFA GET START OF FREE AREA < * j B >* INIT TC:TAB ENTRY POINTER TO POINT AT FIRST USER TASK ENTRY t * . P LD A5,APLMMC,A2 GET FIRST USER TASK ENTRY : P ST A5,STKEND+CUTE
0x0487ec…048980 Dummy {f00=0x0016, f01=0x0190, f02=»ALL GETTSK GET NUMBER OF TASKS PBDWT50 EQU * & * P ST A1,STKEND+NBRTSK SAVE BINARY VALUE : * h @ ;* GET NUMBER OF TERMINAL DEVICE CLASSES IN THIS TASK CLASS r * CALL GETTDC * $ * CHECK IF TASK WITHOUT DEVICES *
0x048980…048b14 (0, 92) Opaque[0x194]
0x048b14…048ca8 # DirEnt {nam=»SUP002«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x02e0, f03=0x0000}
0x048b14…048ca8 IdxSect {
0x048b14…048ca8 f00 = 0x0017 // 0x48b14 @0x0
0x048b14…048ca8 f01 = 0x0014 // 0x48b16 @0x2
0x048b14…048ca8 gno = [ // 0x48b18 @0x4
0x048b14…048ca8 [0x00]: C0x0017.0x0.0
0x048b14…048ca8 [0x01]: C0x0017.0x1.0
0x048b14…048ca8 [0x02]: C0x0017.0x2.0
0x048b14…048ca8 [0x03]: C0x0017.0x3.0
0x048b14…048ca8 [0x04]: C0x0018.0x0.0
0x048b14…048ca8 [0x05]: C0x0018.0x1.0
0x048b14…048ca8 [0x06]: C0x0018.0x2.0
0x048b14…048ca8 [0x07]: C0x0018.0x3.0
0x048b14…048ca8 [0x08]: C0x0019.0x0.0
0x048b14…048ca8 [0x09]: C0x0019.0x1.0
0x048b14…048ca8 ]
0x048b14…048ca8 }
0x048ca8…048e3c Dummy {f00=0x0017, f01=0x0190, f02=»h Ln # # #$ A~ X - _ H*f* + + ,0-T
0x048e3c…048fd0 Dummy {f00=0x0017, f01=0x0190, f02=»
0x048fd0…049164 Dummy {f00=0x0017, f01=0x0190, f02=» h ( "D r !f9 : G p O $ $ %Z&>F F % 9 K DMC>MCGVHDB(WMC RYD*RDD*ASEDABF PSF RSG0 & TY J- LP / TK Kv
0x049164…0492f8 Dummy {f00=0x0017, f01=0x0190, f02=» $ DK W DK 8 W P DK W DK ( W DK _d ^ DK _d 8DK ) _d
0x0492f8…04948c Dummy {f00=0x0017, f01=0x0190, f02=» ? ? ? ? ? ? ? N & ? ? ? ? ? ? ? f" ? ? ? ? ? ? ? L 2b
0x04948c…049620 Dummy {f00=0x0017, f01=0x0190, f02=» f l Z f Z f D Z
0x049620…0497b4 (0, 93) Dummy {f00=0x0017, f01=0x0190, f02=» Z V f R . Z | f ? ? ? ? ? ? ? ^@ ? ? ? ? ? ? ?
0x0497b4…049948 Dummy {f00=0x0017, f01=0x0190, f02=» ? ? ? c ? ? ? ? ? ? ? l c j & L r 0 V |
0x049948…049adc Dummy {f00=0x0017, f01=0x0190, f02=» 6 6 6 6 6
0x049adc…049c70 Dummy {f00=0x0017, f01=0x0190, f02=» 6 6
0x049c70…049e04 Dummy {f00=0x0017, f01=0x0190, f02=» :
0x049e04…049f98 Dummy {f00=0x0017, f01=0x0190, f02=»
[…0x4…]
0x04a5e8…04a77c Dummy {f00=0x0017, f01=0x0190, f02=» P
0x04a77c…04a910 Dummy {f00=0x0017, f01=0x0190, f02=»
[…0x1…]
0x04aaa4…04ac38 Dummy {f00=0x0017, f01=0x0190, f02=» *
0x04ac38…04adcc Dummy {f00=0x0017, f01=0x0190, f02=»
[…0x2…]
0x04b0f4…04b288 Dummy {f00=0x0017, f01=0x0190, f02=» @
0x04b288…04b41c Dummy {f00=0x0017, f01=0x0190, f02=» A A R$ A A R A A R A @#" > > > > > > > > ? ? ? ? ? ? ? U ^ ( H ( P F6 _ Q 4&? ?R _ 5 H _ ^ ;j >P @ * Q 9A D *P _ P A ( @ Q A ' A"T ( A A)F_ @ A
0x04b41c…04b5b0 Dummy {f00=0x0017, f01=0x0190, f02=» @ ? ? > "D P P Q P ! P @ $ H @ P W ( < Jn @ 9a:a R0 "Z Q Q" ?A <P @"N %J & _ ( _ _ 0 % Jn T @ W @ R (P& P (_ =a:a =A:A Z P Z _" TR @
0x04b5b0…04b744 Dummy {f00=0x0017, f01=0x0190, f02=» @% L F6 0 Jn @ 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, @
0x04b744…04b8d8 Dummy {f00=0x0017, 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
0x04b8d8…04ba6c Dummy {f00=0x0017, f01=0x0190, f02=» @ !@ *V @ P @ X0 , *V A _< U` A)F @ , L ? ? , L L L L L L ? ? ? ? ? ? ? @" Px @ > > > > > > > ; [ [ [ [ [ [ > > [ [ A @" H" " ? A" >
0x04ba6c…04bc00 Dummy {f00=0x0017, 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
0x04bc00…04bd94 (0, 96) Dummy {f00=0x0018, 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
0x04bd94…04bf28 Dummy {f00=0x0018, f01=0x0190, f02=» R Q ;H [ [ : " _J ? ? ? ? ? ? ? Q _ ^ ( H R - W . W / X I I R P8 X O P O T Y Y W x Y Y $ 0T W W 6 X ? ? ? ? ? ? ? .^ 7 X #? P ? ? ? ? ? ? ? . 7 6 (@ 7P %
0x04bf28…04c0bc Dummy {f00=0x0018, 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
0x04c0bc…04c250 Dummy {f00=0x0018, 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 Cp X X X R
0x04c250…04c3e4 Dummy {f00=0x0018, 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 (@ Cp X 4Q W 9AY T Q P
0x04c3e4…04c578 Dummy {f00=0x0018, 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
0x04c578…04c70c Dummy {f00=0x0018, 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
0x04c70c…04c8a0 Dummy {f00=0x0018, 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
0x04c8a0…04ca34 (0, 97) Dummy {f00=0x0018, 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 Cp X 4 L ! L % T< L P4 M ^ L X 4 _ ? ? ? ?
0x04ca34…04cbc8 Dummy {f00=0x0018, 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
0x04cbc8…04cd5c Dummy {f00=0x0018, 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,>
0x04cd5c…04cef0 Dummy {f00=0x0018, 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
0x04cef0…04d084 Dummy {f00=0x0018, 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
0x04d084…04d218 Dummy {f00=0x0018, 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
0x04d218…04d3ac Dummy {f00=0x0018, 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 F6 = JnW ( L 4 5 L L " C m M ^ U L ( L L ? ? ? ? ? ? ? M.A A H 4 R W 7
0x04d3ac…04d540 Dummy {f00=0x0018, f01=0x0190, f02=» H d _ AB2 B AH 5 T6 @H P H BF BJ BN BR BV @H AH AB2 ( 5 4 X _8 B W M: B ( "^ B. B L 0 MESSAGE UNKNOWN B H Q L L L R 0 % _ M M L . P M . ? M 2 < L U 5 B J"
0x04d540…04d6d4 (0, 98) Dummy {f00=0x0018, f01=0x0190, f02=» 1 C D W8 C D X W* 8 AD T AD$ D (@( 4 4 : 0 :R - Y 0 PU,DNXX,STAT,RY D 5 J" ? B C 1P D Y _ @B RDP A P 8 FL B X X ! R V Y AD 8 TKP
0x04d6d4…04d868 Dummy {f00=0x0018, f01=0x0190, f02=» Q 1 B0 4 X X ? ? ? ? ? ? ? EB 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. . P M E M 2 0AB CD ADDR @ 9a:a;a
0x04d868…04d9fc Dummy {f00=0x0018, f01=0x0190, f02=» = Jn 0 9U AE E h E ( "^ F = Jn @ A @ !? $> A"T H _* 5 @H B @ A B. 0 Jn AG& AG( G$ ( "^ @ A ( C 5 @ 4 B P J" _ 5 B. 5 J" AG J" R: P J" R( G ( "^
0x04d9fc…04db90 Dummy {f00=0x0018, f01=0x0190, f02=» h 9 , PP , X QD h H Y , h H Z H @H P : Hj ` : B I h _* AHV HR ( "^ : ; ;<A ' R `R Q QB _ QB <a : : : - A ~(@ A" AH A A A A AH AH AH a I
0x04db90…04dd24 Dummy {f00=0x0018, f01=0x0190, f02=» Qh Q P( @ @ @ @ Y Y Y Y " A "; V W # @ A AH @ ? ? > Q @ ? ? ? ? ? ? ? J F6 @ P <a:a B :A : P6 $ R, Z R R Q $ :D P $ R ^& : B P R( AJ AJ^ A
0x04dd24…04deb8 Dummy {f00=0x0018, f01=0x0190, f02=» @Jh Jj ? ? ? ? ? ? ? Jl ( < Jn B @ 9a:a R @ @K @"N %J '~ %J :EOS:EOV AHV HR "$&1368 AKN KP!? QKfP ^ 52 AL X AO X AO Q R x % =A Y X Y4 Z8 AKF $ $ T D i Kd !N X "
0x04deb8…04e04c Dummy {f00=0x0018, f01=0x0190, f02=» W !N " P P !N _ !N4 Md M L 4 P Pj P P P @O Y M D P X &Q Y W Y 4 X $;H D :ET $;H D OSP OVT W W !L X ! P X 1P W @ X U W W W !L X ! . @Wp !L X ! Tb AW^ X
0x04e04c…04e1e0 Dummy {f00=0x0018, f01=0x0190, f02=» AKF Y , $ T D q 84 !N !N> L KR Y Y AO AO LJ !N !N> L W W ANX X 9c T DKJ EKJ 4 X B X :c HKJ % M !N _N !N !N8_X !N _^ !N Y " !N>_p KV_ X # ;dC Y AKH AKD 7P AO _ _ _( _, _0
0x04e1e0…04e374 (0, 99) Dummy {f00=0x0018, f01=0x0190, f02=» C "! PX @ Q P VF_ P RN;AR P P4 0 P P C C C LPT P P C # ( C _: DL P H C _ P X( DD _Z :EOS :EOF 52 5J 5 @ !? ?R _ P 4 ' !? 0X A "! X6 @ Q P ^L_ P XP P R :AV L D
0x04e374…04e508 Dummy {f00=0x0018, f01=0x0190, f02=» M # C C @ _ "ZN(@(@ ^ :j >Z _ m (@ M M 8 DKT X X T X M W M W y Y Y Y # C B 58 B 58 $? R P R O P R R O P P| P Pv P $P &PN "P<
0x04e508…04e69c Dummy {f00=0x0018, f01=0x0190, f02=» DYPj X T Y $ WZ R WX $ # T $ T Y B W0 %@ R b " Y Y Y Y Y $ X _0 8 TCX< TKXB MTXH DYXN ^ @ T <j =h QU P. ^ %x 8P F6 X % !X %`X P % X. R" X>W % P T %
0x04e69c…04e830 Dummy {f00=0x0018, f01=0x0190, f02=» @U E E E E E E U > > aU @U E @U @U @U @U @U @U @U U Q (@ T W@ &_T@ H P P T ?f' W " H Wx " Wn & P >b& >AW >a& @T " X X T$W.
0x04e830…04e9c4 Dummy {f00=0x0018, f01=0x0190, f02=»V: T" T" T" T" T" T" " " " " " " " T" >" HU AU T" T" T" T" T" T" " " " " " " " T" AU > ?f' _ 8 @ T <j =h 8P F6 X % !X %`X P % X. R X>W % P T %
0x04e9c4…04eb58 Dummy {f00=0x0018, f01=0x0190, f02=» @ E E E E E E > > a @ E @ @ @ @ @ @ @ Q (@ T W &_T H P P T ?f' W " H W " W & P >b& W X M M Y X Y Y B Y ! Y
0x04eb58…04ecec Dummy {f00=0x0018, f01=0x0190, f02=»W !Yl L x P !Y M Q W ! P M L ZZ Y$ B Y Xh AW| 8 4 B :e L Ph !Y M Q !Y8 B B $ !X !Yl L x P2 x X0 M L Q !YB_@ !Y M Q Y$ 4 ! 9A " ! M 4 P P L P P ! _ 4
0x04ecec…04ee80 Dummy {f00=0x0018, f01=0x0190, f02=» M AU L 7P U M Y B AU U Y X P P P P P P8 Xh !^ AU B T B @U ) @U I @U I Xh 4 B AU ! T h AU M !Y8 L @U ! P AU !^ !YFW AWz !^ !YF" P !YB M L ZL M AU V !^ !^ Xh B P2
0x04ee80…04f014 (0, 100) Dummy {f00=0x0019, f01=0x0190, f02=»U AU ! R AU W& ! R AU R ! R W ! R AU P AU V ! R ! R _ P* AU AU R Ql ! R Wb ! R ! R WP ! R ! R W> B <e :e Q P AU AU ! R AU Z X Td @U ! P W @U P Q Y @U @U A
0x04f014…04f1a8 Dummy {f00=0x0019, f01=0x0190, f02=»Yl" T" L @U P<W !Yl" T L @WzP$ M L Q !YB_Z M Q Xh T X $ P@ D R: P @U ! P !] T D $ !^* @U ! T L AWz !]zW !] T D R@ $ !^ @U ! T @U T " T AU W AU T P AU Y T U 4 !] @U ! P !YF
0x04f1a8…04f33c Dummy {f00=0x0019, f01=0x0190, f02=» L " P $ M 4 @U U ( = Y 4 @U U < ) Y 4 X ! J $ <b! L !? P L ! _ @U L T !Y L 9AV$ !Y M Q A"R @ M Q 4 M Y$ 4 !YB !Y M Q AU M !Yl 4 @V TOTD @V" 1T: B AV*
0x04f33c…04f4d0 Dummy {f00=0x0019, f01=0x0190, f02=» P P B Y ! P L b X P P P P 52 B 58 @_<P M L 7P A_< _D !b !b !b L ! T L T Y X ! P !c W !c< ! P M L Z& b X T L !b Y Y M _R B Y b _D !b X P P P P P
0x04f4d0…04f664 Dummy {f00=0x0019, f01=0x0190, f02=» Y Y B Y !ax !b M !c " P M L Z W X Y Y B X > b B T Y !b M M !c< L " :K b b M L R L ! T" B : R <A ^ M 9GW( 4^ 4 R @ M M 9H MR b B X V Y
0x04f664…04f7f8 Dummy {f00=0x0019, f01=0x0190, f02=»T WT L $ T( T W@ ^ 9A D_H D_H W$ ^ R @ M 9A D_H$ M 4 L P M !c P M b 4 B c hR b L :B* WX X :a L ! 9A r X L :B L * W* X :a L ! 9A r X L :B L L !? B
0x04f7f8…04f98c Dummy {f00=0x0019, f01=0x0190, f02=» M b L 4 :EOS:EOV L Z W X Ad d !? Qf P ^ 52 V X 58 58 X Ad~ Ac Ac d @d T Ad !e Pf` !eT e Q Ac P !e _ f !edP Y !e !e Ac X _ (W x ! 9A Y _2 !epY@ 9 R !e !e
0x04f98c…04fb20 Dummy {f00=0x0019, f01=0x0190, f02=» X r s W4 X @ _ W$ AW @W $W %W W !W W X 9d)` Ad Ac A T 7P 9CV * 9AV 9AV X 1P * 9EV )@ X Q6{ X Y Q& X $ :ET D OSP OVT * W * W Y Ac Y 4 @c J P f4 4 O P @ T ; @d U X @d d 4
0x04fb20…04fcb4 (0, 101) Dummy {f00=0x0019, f01=0x0190, f02=» 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 Q4 8 TYP, R Y _$ P Q X Q % _" Y Y Y 4 % X P Y $
0x04fcb4…04fe48 Dummy {f00=0x0019, f01=0x0190, f02=»h, hZ 4 h: hdW2 h4 hr X W$ h@ h~ W hF( X = 0 :R # Y ; ; ? 0 :R 9 Y 9 9 : : : @ P R ! R P L M M Y$ #? @ P R P T T T Y"
0x04fe48…04ffdc Dummy {f00=0x0019, f01=0x0190, f02=»l C ( "^ @m j U T " P " P @m W C "& # ( "^ A p @l @l @l @l <h @l % @l @l l l z [ [ [ [ [ [ [ ^ r [ [ [ [ @ L ! P Y _ @ M ^ U
0x04ffdc…050170 Dummy {f00=0x0019, f01=0x0190, f02=»_2 l # C ( "^ P l l l l CCT I T P Q _, Al _V LM l A"X Al l L 9 !? Ak Ak Ak Ak J Ak T, B J (@" T L #( "^ B P @ !? M @m P M L R ! _x PP I H P
0x050170…050304 Dummy {f00=0x0019, f01=0x0190, f02=»0 4 8 < l U T " P " P @ W C "& # ( "^ A p @ @ @ @ <h @ % @ @ z [ [ [ [ [ [ [ ^ r [ [ [ [ @ L ! P Y _ @ M ^ U
0x050304…050498 Dummy {f00=0x0019, f01=0x0190, f02=»_2 # C ( "^ P DOS - PTS 6000 REL. 11.0 81-05-01 FOR 6791 (1 MB) FLEXIBLE DISK DRIVE n` P
0x050498…05062c Dummy {f00=0x0019, f01=0x0190, f02=» OF DATA 3 | P LDR A2,A7 SAVE END OF DATA 4 P ANK A2,1 4 4 P ORK A2,/F0 HEAD NUMBER 4 F & P SC A2,2,A1 HEAD NUMBER TO BUFFER 4 f P SRL A7,1 4 P CF A5,BINDEC EBCDIC CODE 4 & P STR A3,A1 TRACK NUMBER TO BUFFER 4 & P LD A7,DWTEOD,A4 GET SECTO
0x05062c…0507c0 Dummy {f00=0x0019, f01=0x0190, f02=» 4 l P ECR A3,A3 5 P SC A3,3,A1 5 $ P CF A5,WRIPRE PREPARE FOR WRITE 5 . P CF A5,CIOI00 5 V P RF(NZ) END:UL WRITE ERROR 5 l & P CM DWTEOD,A4 INDICATE NOT OPENED 5 P XIF 5 PEND:UL EQU * 5 & P ORS A1,DWTRC,A6 SAVE RETURN CODE 5 P IFT I
0x0507c0…050954 (0, 102) Opaque[0x194]
0x050954…050ae8 # DirEnt {nam=»PCAS «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0330, f03=0x0000}
0x050954…050ae8 IdxSect {
0x050954…050ae8 f00 = 0x0019 // 0x50954 @0x0
0x050954…050ae8 f01 = 0x0004 // 0x50956 @0x2
0x050954…050ae8 gno = [ // 0x50958 @0x4
0x050954…050ae8 [0x00]: C0x0019.0x2.0
0x050954…050ae8 [0x01]: C0x0019.0x3.0
0x050954…050ae8 ]
0x050954…050ae8 }
0x050ae8…050c7c Dummy {f00=0x0019, f01=0x0190, f02=» ^ ^ 0XX ERROR 2 0PCAS REL 11.0 DATE 81.02.16 12NC=8701 362 41100 0TO MANY SEGMENTS STATUS WORD: $ 9 H4` 1Lb p V -8 T < , tB ph Tg t z ^ r h V H 2 Z f9 z
0x050c7c…050e10 Dummy {f00=0x0019, f01=0x0190, f02=» 4c : @Y/ pJ @ d _ 2Z $"z y ?H T+ V y J t Dh i VR 1H W ] [ ? d % L X! "~ T &b Cn 1 d F < :R:R: ` ZPzh % h v 66 B r4i : 0 ` ^&W D/ H P = D# v>~ v `" f V>~ $#` d p 4d @z V
0x050e10…050fa4 Dummy {f00=0x0019, f01=0x0190, f02=» ^B 8z Z 0XX ERROR 2 0PCAS REL 11.0 DATE 81.02.16 12NC=8701 362 41100 0TO MANY SEGMENTS STATUS WORD: $ 9 H4` 1Lb p V -8 T < , tB ph Tg t z ^ r h V H 2 Z f9 z
0x050fa4…051138 Dummy {f00=0x0019, f01=0x0190, f02=» 4c : @Y/ pJ @ d _ 2Z $"z y ?H T+ V y J t Dh i VR 1H W ] [ ? d % L X! "~ T &b Cn 1 d F < :R:R: ` ZPzh % h v 66 B r4i : 0 ` ^&W D/ H P = D# v>~ v `" f V>~ $#` 4d @z V
0x051138…0512cc Dummy {f00=0x0019, 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
0x0512cc…051460 Dummy {f00=0x0019, 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
0x051460…0515f4 (0, 103) Dummy {f00=0x0019, 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
0x0515f4…051788 Dummy {f00=0x0019, f01=0x0190, f02=» P* > P* BIT 7 RESPECTIVE BIT 15 IN SW-STATUS IS THE STATUS BIT 4 : P* RESPECTIVE BIT 3 RETURNED BY THE CASSETTE HARDWARE, P P* B P* BIT 9 AND 10 IN SW-STATUS ARE DERIVED FROM THE STATUS BIT 5 ( P* RETURNED BY THE CASSETTE HARDWARE,
0x051788…05191c Dummy {f00=0x0019, f01=0x0190, f02=»Y WHEN READ-ORDER). X P* 6 PTKMASK EQU /8160 BIT 0 = 1 IN STATUS (=I/O-ERROR) & . P* BIT 7 IN SW-STATUS (ONLY IF BIT 0 = 0) ` P* BIT 9 IN SW-STATUS P* BIT 10 IN SW-STATUS P EJECT P* P* EQUATES P* PPRTR
0x05191c…051ab0 Dummy {f00=0x0019, f01=0x018e, f02=» P & PBA EQU 2 ECB DISPL BUFFER ADDRESS PRL EQU 4 - REQUESTED LENGTH 6 PST EQU 8 - STATUS Z PCW EQU 10 - CONTROL WORD t P* " P* SEGMENT TABLE DISPLACEMENT P* & PCOMLG EQU 18 LENGTH OF COMMON PART $ PNUMSEG EQU 22 NU
0x051ab0…051c44 Dummy {f00=0x0019, f01=0x0190, f02=» & PSEGMLG EQU 3 SEGMENT BLOCK LENGTH . PSBDISP EQU 6 START OF SEGMENT BLOCK TABLE . P* ` P* MASK FOR DISK ERRORS j P PDKMASK EQU /CFFF P* P* DATAFIELDS P* PSEGNR DATA 1 SEGMENT NUMBER $ PNBRSGM DATA 0 NUMBER
0x051c44…051dd8 Dummy {f00=0x0019, f01=0x0190, f02=»UNTER n 2 PLTPTR1 DATA LGTAB LENGTH TABLE POINTER (STORE) 2 PLTPTR2 DATA LGTAB LENGTH TABLE POINTER (LOAD) D P z P & PSECTRS DATA 0 NO OF SECTORS IN /L * PSEQCTR DATA 0 SEQUENCE COUNTER FOR CAS P 0 PECBCT DATA CASSFC,CTBUF,0,0,0,
0x051dd8…051f6c Dummy {f00=0x0019, f01=0x0190, f02=»CTWFC,0,0,0,0,0 P* $ PLPECB EQU * ECB FOR LINEPRINTER " P DATA PRTR,0,0,0,0,0 J P EJECT f P* t PTEXT1 EQU * ~ P DATA 10 MESSAGE LENGTH P DATA /30,'XX ERROR' MESSAGE P* PTEXT2 EQU * P DATA 50 MESSAGE LEN
0x051f6c…052100 Dummy {f00=0x0019, f01=0x0190, f02=»ESSAGE LENGTH P DATA /30,'TO MANY SEGMENTS' P* : PTEXT99 EQU * D P DATA 20 MESSAGE LENGTH X $ P DATA ' STATUS WORD: ' MESSAGE x PHEXFLD EQU * P RES 2 P* P " PCTBUF RES 128 CASSETTE BUFFER PCTREL RES 8 CA
0x052100…052294 (0, 104) Opaque[0x194]
0x052294…052428 # DirEnt {nam=»SUP001«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0340, f03=0x0000}
0x052294…052428 IdxSect {
0x052294…052428 f00 = 0x001a // 0x52294 @0x0
0x052294…052428 f01 = 0x0014 // 0x52296 @0x2
0x052294…052428 gno = [ // 0x52298 @0x4
0x052294…052428 [0x00]: C0x001a.0x0.0
0x052294…052428 [0x01]: C0x001a.0x1.0
0x052294…052428 [0x02]: C0x001a.0x2.0
0x052294…052428 [0x03]: C0x001a.0x3.0
0x052294…052428 [0x04]: C0x001b.0x0.0
0x052294…052428 [0x05]: C0x001b.0x1.0
0x052294…052428 [0x06]: C0x001b.0x2.0
0x052294…052428 [0x07]: C0x001b.0x3.0
0x052294…052428 [0x08]: C0x001c.0x0.0
0x052294…052428 [0x09]: C0x001c.0x1.0
0x052294…052428 ]
0x052294…052428 }
0x052428…0525bc Dummy {f00=0x001a, f01=0x0190, f02=»in Lo< # # #$ A~ X - _ H*f* + + ,0-T
0x0525bc…052750 Dummy {f00=0x001a, f01=0x0190, f02=»
0x052750…0528e4 Dummy {f00=0x001a, f01=0x0190, f02=» in( "D r !f9 : G p O $ $ %Z&>F F % 9 K DMC<MCGTHDB&WMC RYD(RDD(ASEBABF PSF RSG. & TY J- LP / TK Kt
0x0528e4…052a78 Dummy {f00=0x001a, f01=0x0190, f02=» $ DK W~ DK 8 W~ P DK W~ DK ( W~ DK _~ ^ DK _~ 8DK ) _~
0x052a78…052c0c Dummy {f00=0x001a, f01=0x0190, f02=» ? ? ? ? ? ? ? N & ? ? ? ? ? ? ? f ? ? ? ? ? ? ? L 2b
0x052c0c…052da0 Dummy {f00=0x001a, f01=0x0190, f02=» f l Z f Z f D Z
0x052da0…052f34 (0, 105) Dummy {f00=0x001a, f01=0x0190, f02=» Z V f R . Z | f ? ? ? ? ? ? ? ^> ? ? ? ? ? ? ?
0x052f34…0530c8 Dummy {f00=0x001a, f01=0x0190, f02=» ? ? ? b ? ? ? ? ? ? ? l b j & L r 0 V |
0x0530c8…05325c Dummy {f00=0x001a, f01=0x0190, f02=» 6 6 6 6 6
0x05325c…0533f0 Dummy {f00=0x001a, f01=0x0190, f02=» 6 6
0x0533f0…053584 Dummy {f00=0x001a, f01=0x0190, f02=» :
0x053584…053718 Dummy {f00=0x001a, f01=0x0190, f02=»
[…0x4…]
0x053d68…053efc Dummy {f00=0x001a, f01=0x0190, f02=» P
0x053efc…054090 Dummy {f00=0x001a, f01=0x0190, f02=»
[…0x1…]
0x054224…0543b8 Dummy {f00=0x001a, f01=0x0190, f02=» *
0x0543b8…05454c Dummy {f00=0x001a, f01=0x0190, f02=»
[…0x2…]
0x054874…054a08 Dummy {f00=0x001a, f01=0x0190, f02=» @
0x054a08…054b9c Dummy {f00=0x001a, f01=0x0190, f02=» A A R$ A A R A A R A @#" > > > > > > > > ? ? ? ? ? ? ? U ^ ( H ( P F4 _ Q 4&? ?R _ 5 H _ ^ ;j >P @ * Q 9A D *P _ P A ( @ Q A ' A"T ( A A)F_ @ A
0x054b9c…054d30 Dummy {f00=0x001a, f01=0x0190, f02=» @ ? ? > "D P P Q P ! P @ $ H @ P W ( < Jl @ 9a:a R0 "Z Q Q" ?A <P @"N %J & _ ( _ _ 0 % Jl T @ W @ R (P& P (_ =a:a =A:A Z P Z _" TR @
0x054d30…054ec4 Dummy {f00=0x001a, f01=0x0190, f02=» @% L F4 0 Jl @ 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, @
0x054ec4…055058 Dummy {f00=0x001a, 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
0x055058…0551ec Dummy {f00=0x001a, f01=0x0190, f02=» @ !@ *V @ P @ X0 , *V A _< U` A)F @ , L ? ? , L L L L L L ? ? ? ? ? ? ? @" Px @ > > > > > > > ; [ [ [ [ [ [ > > [ [ A @" H" " ? A" >
0x0551ec…055380 Dummy {f00=0x001a, 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
0x055380…055514 (0, 108) Dummy {f00=0x001b, 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
0x055514…0556a8 Dummy {f00=0x001b, f01=0x0190, f02=» R Q ;H [ [ : " _J ? ? ? ? ? ? ? Q _ ^ ( H R - W . W / X I I R P8 X O P O T Y Y W x Y Y $ 0T W W 6 X ? ? ? ? ? ? ? .^ 7 X #? P ? ? ? ? ? ? ? . 7 6 (@ 7P %
0x0556a8…05583c Dummy {f00=0x001b, 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
0x05583c…0559d0 Dummy {f00=0x001b, 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 Cn X X X R
0x0559d0…055b64 Dummy {f00=0x001b, 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 (@ Cn X 4Q W 9AY T Q P
0x055b64…055cf8 Dummy {f00=0x001b, 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
0x055cf8…055e8c Dummy {f00=0x001b, 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
0x055e8c…056020 Dummy {f00=0x001b, 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
0x056020…0561b4 (0, 109) Dummy {f00=0x001b, 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 Cn X 4 L ! L % T< L P4 M ^ L X 4 _ ? ? ? ?
0x0561b4…056348 Dummy {f00=0x001b, 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
0x056348…0564dc Dummy {f00=0x001b, 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,>
0x0564dc…056670 Dummy {f00=0x001b, 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
0x056670…056804 Dummy {f00=0x001b, 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
0x056804…056998 Dummy {f00=0x001b, 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
0x056998…056b2c Dummy {f00=0x001b, 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 F4 = JlW ( L 4 5 L L " C m M ^ U L ( L L ? ? ? ? ? ? ? A A H 4 R W 7
0x056b2c…056cc0 Dummy {f00=0x001b, 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 0 MESSAGE UNKNOWN B H Q L L L R 0 % _ M M L . P M . ? M 2 < L U 5 B J
0x056cc0…056e54 (0, 110) Dummy {f00=0x001b, f01=0x0190, f02=» C D W8 C D X W* 8 AD T AD" D (@( 4 4 : 0 :R - Y 0 PU,DNXX,STAT,RY D 5 J ? B C 1P D Y _ @B RDP A P 8 FL B X X ! R V Y AD 8 TKP Y
0x056e54…056fe8 Dummy {f00=0x001b, f01=0x0190, f02=» Q 1 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, L . P E ? M 0AB CD ADDR @ 9a:a;a
0x056fe8…05717c Dummy {f00=0x001b, f01=0x0190, f02=» = Jl 0 9U AE E i6 E ( "^ F = Jl @ A @ !? $> A"T H _* 5 @H B @ A B, 0 Jl AG$ AG& G" ( "^ @ A ( C 5 @ 4 B P J _ 5 B, 5 J AG J R: P J R( G ( "^
0x05717c…057310 Dummy {f00=0x001b, f01=0x0190, f02=» i6 9 , PP , X QD i6 H~ Y , i6 H~ Z H @H P : Hh ` : B I i6 _* AHT HP ( "^ : ; ;<A ' R `R Q QB _ QB <a : : : - A ~(@ A" AH A A A A AH AH AH a I
0x057310…0574a4 Dummy {f00=0x001b, f01=0x0190, f02=» Qh Q P( @ @ @ @ Y Y Y Y " A "; V W # @ A AH @ ? ? > Q @ ? ? ? ? ? ? ? I F4 @ P <a:a B :A : P6 $ R, Z R R Q $ :D P $ R ^& : B P R( AJZ AJ AJ^
0x0574a4…057638 Dummy {f00=0x001b, f01=0x0190, f02=»Jf Jh ? ? ? ? ? ? ? Jj ( < Jl B @ 9a:a R @ @K @"N %J '~ %J :EOS:EOV AHT HP "$&1368 AKL KN!? QKdP ^ 52 AL X AO X AO Q R x % =A Y X Y4 Z8 AKD $ $ T D i Kb !N X "!
0x057638…0577cc Dummy {f00=0x001b, f01=0x0190, f02=» W !N " P P !N _ !N2 Mb M L 4 P Pj P P P @O Y M D P X &Q Y W Y 4 X $;H D :ET $;H D OSP OVT W W !L X ! P X 1P W @ X U W W W !L X ! . @Wp !L X ! Tb AW^ X
0x0577cc…057960 Dummy {f00=0x001b, f01=0x0190, f02=»KD Y , $ T D q 84 !N !N< L KP Y Y AO AO LH !N !N< L W W ANV X 9c T DKH EKH 4 X B X :c HKH % M !N _N !N !N6_X !N _^ !N Y " !N<_p KT_ X # ;dC Y AKF AKB 7P AO _ _ _( _, _0 _4
0x057960…057af4 (0, 111) Dummy {f00=0x001b, f01=0x0190, f02=» "! PX @ Q P VF_ P RN;AR P P4 0 P P C C C LPT P P C # ( C _: DL P H C _ P X( DD _Z :EOS :EOF 52 5J 5 @ !? ?R _ P 4 ' !? 0X A "! X6 @ Q P ^L_ P XP P R :AV L D
0x057af4…057c88 Dummy {f00=0x001b, f01=0x0190, f02=» M # C C @ _ "ZN(@(@ ^ :j >Z _ m (@ M M 8 DKT X X T X M W M W y Y Y Y # C B 58 B 58 $? R~ P R O P R R O P P| P Pv P $P &PN "P< /
0x057c88…057e1c Dummy {f00=0x001b, f01=0x0190, f02=»DYPj X T Y $ WZ RZWX $ # T $ T Y B W0 %@ R b " Y Y Y Y Y $ X _0 8 TCX< TKXB MTXH DYXN ^ @ T <j =h QU P. ^ %x 8P F4 X % !X %`X P % X. R" X>W % P T %
0x057e1c…057fb0 Dummy {f00=0x001b, f01=0x0190, f02=»U E E E E E E U > > aU @U E @U @U @U @U @U @U @U U Q (@ T W@ &_T@ H P P T ?f' W " H Wx " Wn & P >b& >AW >a& @T " X X T$W.
0x057fb0…058144 Dummy {f00=0x001b, f01=0x0190, f02=» T" T" T" T" T" T" " " " " " " " T" >" HU AU T" T" T" T" T" T" " " " " " " " T" AU > ?f' _ 8 @ T <j =h 8P F4 X % !X %`X P % X. R X>W % P T %
0x058144…0582d8 Dummy {f00=0x001b, f01=0x0190, f02=» E E E E E E > > a @ E @ @ @ @ @ @ @ Q (@ T W &_T H P P T ?f' W " H W " W & P >b& W X M M Y X Y Y B Y ! Y
0x0582d8…05846c Dummy {f00=0x001b, f01=0x0190, f02=» !Yj L x P !Y M Q W ! P M L ZZ Y" B Y Xf AWz 8 4 B :e L Ph !Y M Q !Y6 B B $ !X !Yj L x P2 x X0 M L Q !Y@_@ !Y M Q Y" 4 ! 9A " ! M 4 P P L P P ! _ 4 B
0x05846c…058600 Dummy {f00=0x001b, f01=0x0190, f02=» M AU L 7P U M Y B AU U Y X P P P P P P8 Xf !^ AU B T B @U ) @U I @U I Xf 4 B AU ! T h AU M !Y6 L @U ! P AU !^ !YDW AWx !^ !YD" P !Y@ M L ZL M AU V !^ !^ Xf B P2
0x058600…058794 (0, 112) Dummy {f00=0x001c, f01=0x0190, f02=» AU ! P AU W& ! P AU R ! P W ! P AU P AU V ! P ! P _ P* AU AU R Ql ! P Wb ! P ! P WP ! P ! P W> B <e :e Q P AU AU ! P AU Z X Td @U ! P W @U P Q Y @U @U AU
0x058794…058928 Dummy {f00=0x001c, f01=0x0190, f02=»" T" L @U P<W !Yj" T L @WxP$ M L Q !Y@_Z M Q Xf T X $ P@ D R: P @U ! P !] T D $ !^( @U ! T L AWx !]xW !] T D R@ $ !^ @U ! T @U T " T AU W AU T P AU Y T U 4 !] @U ! P !YDW
0x058928…058abc Dummy {f00=0x001c, f01=0x0190, f02=» L " P $ M 4 @U U ( = Y 4 @U U < ) Y 4 X ! J $ <b! L !? P L ! _ @U L T !Y L 9AV$ !Y M Q A"R @ M Q 4 M Y" 4 !Y@ !Y M Q AU M !Yj 4 @V TOTD @V 1T: B AV( @
0x058abc…058c50 Dummy {f00=0x001c, f01=0x0190, f02=» , ` X Y X a| B Y % a| L aN M B P 58 B V X P P P P 52 B P P 4 ^ :A H_bW W M B M B M _Z _bV 4 Y T T W _ 52 B < V < 58 L P :g: L :C ?
0x058c50…058de4 Dummy {f00=0x001c, f01=0x0190, f02=» WR A_> L " * Aa - Aa3 L " X ! Y M T(% T$ ! R L W L A T M A_< A_: X 7P B M aj h d M _* _R Y B A_H X P PD P@ P< P8 P4 b !dZ B T B @_T ) @_V I @_X I b B P,9 Q$ B < R :A R
0x058de4…058f78 Dummy {f00=0x001c, f01=0x0190, f02=» P @ W M @_H M M !dH !b b L !? B M A_< A_: A_J X 7P A_@ ! T @_D A_@ @_F Y @_BU A_H b M X 4 X ! J Pj @_< @_: L $ L T L P: M I m M M W& L P M l A M M W A X
0x058f78…05910c Dummy {f00=0x001c, f01=0x0190, f02=» ? 4 an M A_> 8 4 M @_J 7P < $ <C ! 9 4 @_@9C @_D: 4 M _T M !b b 4 :EOS:EOV P P P Ad d !? Qg P ^ 52 V X 58 58 X Ad Adx Adz
0x05910c…0592a0 Dummy {f00=0x001c, f01=0x0190, f02=» 9 R !f !f AdzXT_ d| Y Y _^ !e !f tW !e !e ] ! X W !e 9C^ W| !e _ !f Wn !f _ d Y Y _ X r s W4 X @ _ W$ AW @W $W %W W !W W X 9d)` Ad AdxA T 7P 9CV * 9AV 9AV X 1P * 9EV )@ X Q6{ X
0x0592a0…059434 (0, 113) Dummy {f00=0x001c, f01=0x0190, f02=» X @d d 4e e e e e e eBeBeneRe e~e e e e e e &" 13468$$ @ _ X X X X $ Pg4g<gThDhb % 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$
0x059434…0595c8 Dummy {f00=0x001c, f01=0x0190, f02=» P Y $ W Y =D %_ X P V % P Y X XT Q _ g Q g 0DKER UNIT CYLD STAT h h 4 h h W2 h h X W$ h h W h ( X = 0 :R # Y ; ; ? 0 :R
0x0595c8…05975c Dummy {f00=0x001c, f01=0x0190, f02=» T Y" P T _ X D D E E ] @ E @ j ? ? > ? ? ? ? ? ? ? m6 C ( "^ @m k^ U T " P " P @m W C "& # ( "^ A p @mV @mX @mZ @m <h @m % @m^ @m` mb md z [
0x05975c…0598f0 Dummy {f00=0x001c, f01=0x0190, f02=» U > > > > > > >WZ A p ^ T " T0 ! P W SY SD AD _ ! P _, J _2 m6 # C ( "^ P mV mX mZ m CCT I T P Q _, Am@ _V LM mb A"X Am@ m6 L 9 !? A
0x0598f0…059a84 Dummy {f00=0x001c, f01=0x0190, f02=» I H P _ A in A A A @ ~ m A ~ @m A ~ @ o0( "^ A~ A A H (@_0 $ ( , 0 4 8 < mB U T " P " P @ W C "& # ( "^ A p @ @ @ @ <h @ % @ @ z [
0x059a84…059c18 Dummy {f00=0x001c, f01=0x0190, f02=» U > > > > > > >W A p ^ T " T ! P W SY SD AD _ ! P _, J _2 # C ( "^ P DOS - PTS 6000 REL. 11.0 81-02-16 FOR 6879 (250 KB) FLEXIBLE DISK DRIVE
0x059c18…059dac Dummy {f00=0x001c, f01=0x0190, f02=» A n bCPT * & g @ ~ A ~ @ A ~ @ I:ITCP J M:LDNX , ( ( "^ A A n , ( (@_0 $ $ ( , 0 4 8 < , ( o D
0x059dac…059f40 Dummy {f00=0x001c, f01=0x412c, f02=»R CR MT UT cP gT " P P & W % H D ! ) - 1 7 = A E I P WZ T0 P W ;P Q kP B H D ! q u y } T T P Q 8 4 T, T P ' " )P 5R MP o w
0x059f40…05a0d4 (0, 114) Opaque[0x194]
0x05a0d4…05a268 # DirEnt {nam=»TRA «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0390, f03=0x0000}
0x05a0d4…05a268 IdxSect {
0x05a0d4…05a268 f00 = 0x001c // 0x5a0d4 @0x0
0x05a0d4…05a268 f01 = 0x001c // 0x5a0d6 @0x2
0x05a0d4…05a268 gno = [ // 0x5a0d8 @0x4
0x05a0d4…05a268 [0x00]: C0x001c.0x2.0
0x05a0d4…05a268 [0x01]: C0x001c.0x3.0
0x05a0d4…05a268 [0x02]: C0x001d.0x0.0
0x05a0d4…05a268 [0x03]: C0x001d.0x1.0
0x05a0d4…05a268 [0x04]: C0x001d.0x2.0
0x05a0d4…05a268 [0x05]: C0x001d.0x3.0
0x05a0d4…05a268 [0x06]: C0x001e.0x0.0
0x05a0d4…05a268 [0x07]: C0x001e.0x1.0
0x05a0d4…05a268 [0x08]: C0x001e.0x2.0
0x05a0d4…05a268 [0x09]: C0x001e.0x3.0
0x05a0d4…05a268 [0x0a]: C0x001f.0x0.0
0x05a0d4…05a268 [0x0b]: C0x001f.0x1.0
0x05a0d4…05a268 [0x0c]: C0x001f.0x2.0
0x05a0d4…05a268 [0x0d]: C0x001f.0x3.0
0x05a0d4…05a268 ]
0x05a0d4…05a268 }
0x05a268…05a3fc Dummy {f00=0x001c, f01=0x0190, f02=» $Q Q 44 $ . 44 6 p 44 G D Jx W Jx Jx ` 44 e :C H A M D H R M D PB " P :C_ @ 9C E ^ D V V ( T # Y$ @ J ( B A T b 9o A
0x05a3fc…05a590 Dummy {f00=0x001c, f01=0x0190, f02=»U A ` Q b @ H @ Z A @ P A A A @ Q /^ ' @/ A : A A( )( @ P A A @ A/ W D 0 @ A Z A 0 A A ~ A A A A A : 0 @ @/ 0( A Z 04
0x05a590…05a724 Dummy {f00=0x001c, f01=0x0190, f02=»Q ( ' _N?b / @ U A A @ A @ ^ A Z_v @ @ P 0L @ R 0X @ / P P : T : _&0d0p @ P R V T @ ,R : @ P j V @ RP V P X V T @ T A
0x05a724…05a8b8 Dummy {f00=0x001c, f01=0x0190, f02=» F @ T ! Ph A 0| ! PZ 0 @ P ! PJ A @ T % P< 0 W2 @ |P A | ! P"% T 0L /^ W % T 0L : @ = V A 0 @ T @ P : * P P ( AZ 2 AZ 2 09 2 .. 2 P P 2 P P P '' z
0x05a8b8…05aa4c Dummy {f00=0x001c, f01=0x0190, f02=»Qp @ <aP MU M : $ P /^ A ,W* A , U /^ @ T @ V4 $ U /^ P A P @ V> @ P zW h $ IQb T P @ IV2
0x05aa4c…05abe0 Dummy {f00=0x001c, f01=0x0190, f02=» /^ A A @ A$ @ T A : : Q : Q Q R R R R,R8RDRPR RhRhRhRvRhRhRhRhRhRhRhRhRhRhRhRh
0x05abe0…05ad74 (0, 115) Dummy {f00=0x001c, f01=0x0190, f02=» IDENT MODNAM TRA XX.Y - - F1 O1111 = , ( , ) ) , , & , C
0x05ad74…05af08 Dummy {f00=0x001c, f01=0x0190, f02=» * 09 L AF L ' ` * , ! A+ - * ' | * ' | * , " B+ - * AZ AZ 09 .. AZ AZ 09 .. , EQV 0 TERM 0 TWB 0 UWB 0 CWB 0 SWB 0 DWB 0 DSET 0 START 0 REENTER 0 ST
0x05af08…05b09c Dummy {f00=0x001c, f01=0x0190, f02=» 0 ADD SUB MUL DIV DVR DIVR MOVE `MMOVE dCMP XSET A nCLEAR @ nTEST C nXCOPY j zCOPY b pEDIT ` EDSUB l INV B nIB 6 @B W TBZ P TBP Q TBN R TBOFL S TBNZ T TBNP U TBNN V
0x05b09c…05b230 Dummy {f00=0x001c, f01=0x0190, f02=»BBEOD S TBNOK T TBNEOF U TBNERR V TTBT I TBF H CBE CBG " CBL $ 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 UNUSE 0 ACTV
0x05b230…05b3c4 Dummy {f00=0x001c, f01=0x0190, f02=» 0 DELAY 0 8SETTIME0 <GETTIME0 <GETDATE0 <SETDATE0 <GETID 0 TFWD 0 TBWD 0 THOME 0 TLEFT 0 TRIGHT 0 TLDOWN 0 TDOWN 0 TUP 0 DUPL 0 <GETABX 0 8SETCUR 0 GETCTL 0 ^TSTCTL 0 dGETFLD 0 hDISPLAY0 pERASE 0 pPRINT 0 xDYKI 0 UPDFLD 0 EDFLD 0
0x05b3c4…05b558 Dummy {f00=0x001c, f01=0x0190, f02=»LLBCK0 8CONNECT0 DISCNCT0 SEND 0 :RECEIVE0 : ' W # S ' G O O ' W 0 U O O $ 0 1 2
0x05b558…05b6ec Dummy {f00=0x001c, f01=0x0190, f02=» O n Q o L X X 4 : > H T Q r 1
0x05b6ec…05b880 Dummy {f00=0x001c, f01=0x0190, f02=» 1 2 3 4 B T 1 1IDENT EJECT SPACE LIST XNLIST rDDIV DDUM OPTNS 1|CON 1 PERF 1 PERFI 1 PLIST 1 END 1 FTABLE 1 INCLUDE 1 KTAB 1 FRMT 1 FM
0x05b880…05ba14 (0, 116) Dummy {f00=0x001d, f01=0x0190, f02=» 2|FUL 2 FNUL 2 FEXIT 2 FBZ 2 FBP 2 FBN 2 FBNZ 2 FBNP 2 FBNN 2 FB 2 FBF 3 FBT 3 FSL 3 FNL 3(FKI 34FINP 3@FEOR 3LFRET 3XFMEND 3dENTRY 3pEXT 3|EXPROC 3 EQU 3 PROC 3 PFRMT 3 PKTAB
0x05ba14…05bba8 Dummy {f00=0x001d, f01=0x0190, f02=»LATOR REL 01.1 761007 * * IDENT AAAAAA * DATE XXXXXX * PAGE 0000 * DATA DIVISION PROCEDURE DIVISION PROCEDURE LABELS DATA ITEM NAME TABLE nLOC OC OPERANDS LINE LABEL OPCODE OP
0x05bba8…05bd3c Dummy {f00=0x001d, f01=0x0190, f02=»ERANDS COMMENT C lNAME REF TYPE NAME REF TYPE NAME REF TYPE NAME REF TYPE IX TYPE VALUE PROGRAM LENGTH = ERROR = REL 11.0 810514 * # @ Pn $ T < ! T` @
0x05bd3c…05bed0 Dummy {f00=0x001d, f01=0x0190, f02=» PP U A 6 !0 R, !9 Q&$ P 4S _ & @ W W : 9l:D 0 :R = : | Q2 T W. 6 !0 R" !: R !A R !F Q $ =D _2 | :END PDIV DDUM IDENT FRMT FMEND PEND **
0x05bed0…05c064 Dummy {f00=0x001d, f01=0x0190, f02=» /^ ( ' : @ ! V & P #z # : @ ! Q & P P #z # : W @ ! Q A < ! P @ Q A 1 @ Q /^ : @ ! Y A " ! T /^ : D ^ ] : @( ) A( A Z : @
0x05c064…05c1f8 Dummy {f00=0x001d, f01=0x0190, f02=» V <D, A( ( Y : /^ : A A @ 9a @ R:a R @ T:a V @ @ : A /^ ( ' ( T : ' _ A @ B Q x z * 4 TR zW x B @ x * 4 TY P z_P R
0x05c1f8…05c38c Dummy {f00=0x001d, f01=0x0190, f02=» T # A#F_. # *)@ + A#F_D * 4P Q P _ W @#H R #X # A#H # : #z | ^ U | | : n R _ $ : 0 4T Y ::a Y : @ ,U4 @
0x05c38c…05c520 Dummy {f00=0x001d, f01=0x0190, f02=» P 4(W PW 6 ! P /^ : : 6 ! P / : #z $ A R P P R* / W( @ zP" @ ! P W T / W / $0P A Wn P $ P / @TT $ A#R A T2 @ P A n
0x05c520…05c6b4 (0, 117) Dummy {f00=0x001d, f01=0x0190, f02=» A P @ R P @ P ! P P P V @ ! T P U U W" ! P P U !2 P ", @ A P F P ^ " P: 6 !+ P !- P P Q
0x05c6b4…05c848 Dummy {f00=0x001d, f01=0x0190, f02=» @ T W @ A Q W. 6 !- P !+ T P P @ Y =h 9 W @ T " @ # P P, 6 !0 R !9 U !A R !F Q % W W P 3 T <D_B 9 A _R @ @ ! T" *>H J V >d _ K >h +
0x05c848…05c9dc Dummy {f00=0x001d, f01=0x0190, f02=» : A#F #FW A#` #` E E E E E E $ : #FW #` D D D D D D $ : [ [ [ [ ; Z [ Z [ : [
0x05c9dc…05cb70 Dummy {f00=0x001d, f01=0x0190, f02=» ^ : R _ >D : @$ T : . $ P R P R,P. P _ >hX> : Z ] _$ _ _&MEMORY OVERFLOW SEQUENCE ERROR DIRECTIVE MISSING SYNTAX ERROR LENGTH TRUNCATION MULTIDEFINED UNDEFINED
0x05cb70…05cd04 Dummy {f00=0x001d, f01=0x0190, f02=»G ILLEGAL VALUE DEF ILLEGAL CONST LENGTHILLEGAL CONST TYPE TOO MANY 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 PARA
0x05cd04…05ce98 Dummy {f00=0x001d, f01=0x0190, f02=»X BUFFER REF @ >aPH @/ZP@ ( ** ' %4 D/F& P _ D/F& * ' ( _F A/Z : # @ =aPb @/ZT @ PJ @ ZPD< V @ & ( ^< V @ ( $ @ U - A( < V M ( )( n ( ^ $` : P W V W # C ( :
0x05ce98…05d02c Dummy {f00=0x001d, f01=0x0190, f02=» @( % - A( < Rf @( @ `V < < R0< V* n ( , n 2 . A( n ( ^ : @( =a% @ `R ZH 2 . A( _ 1 . < R W - n , ^ n + . A( @( b $ @( ?d' n , n 2 . - n , ^ n 2 . 0 .
0x05d02c…05d1c0 Dummy {f00=0x001d, f01=0x0190, f02=» * P + P +b +n +z +z P + P
0x05d1c0…05d354 (0, 118) Dummy {f00=0x001d, f01=0x0190, f02=» ,0 ,< ,H ,H , , - - - -
0x05d354…05d4e8 Dummy {f00=0x001d, f01=0x0190, f02=» . . ., ., .^
0x05d4e8…05d67c Dummy {f00=0x001d, f01=0x0190, f02=»_$ ,( @/ P ?a 9H + , (~ . / ,( A/ : @ =aP" P A/ @/Z V <H U/F A/Z :I/O ERROR FILE = STATUS = ":H / ^ " / ^ 2 . ^ & / . ( 0 . ( @ P
0x05d67c…05d810 Dummy {f00=0x001d, f01=0x0190, f02=» _p A J : _| A J _ A J _ A J _ A J _ A J _ A J h _ A J _ A J $ _ A J v _ A J _ Z A J _ A J _ A J _( A J B _4 A J J _@ A J * _L A J F _X A J N _d A J d _p A J ^ _| A J
0x05d810…05d9a4 Dummy {f00=0x001d, f01=0x0190, f02=» _ Z A J _ A J _ A J _( A J _4 A J x _@ A J _L A J _X A J _d A J _p A J _| A J _ A J _ A J _ A J _ A J _ A J _ A J _ A J _ A J _ A J , _ Z A J F _
0x05d9a4…05db38 Dummy {f00=0x001d, f01=0x0190, f02=» _ A J _ A J & _ A J " _ A J _ A J _ A J < _ A J H _ A J N _ A J _ Z A J _ A J $ _ A J * _( A J 0 _4 A J 6 _@ A J 4 _L A J _X
0x05db38…05dccc Dummy {f00=0x001d, f01=0x0190, f02=»4 TRUE 4 T 4 FALSE 4 F 4 @ . ? @ , :<Rr @5/ @ VP 9D 52 =H ( T@ 44 =P P =T . /^W @ . A54 @ .?A A . A52 ? / : T:A000T:D000 *0 :
0x05dccc…05de60 Dummy {f00=0x001d, f01=0x0190, f02=» F ! P F EQP A4 :B A4 :B & 5F $ >HQ >AR /^ W /^ P /^ J @ A4 A5 A5 A5 9h A5 A5 R 4 0 A 4 R @ > < : A5. @ VP ?D A5* A5, : 4 @5. :V @ !
0x05de60…05dff4 (0, 119) Dummy {f00=0x001d, f01=0x0190, f02=»7& @ > = a @ @ > Q A @ A R R( 5< T /^WJ 5/PD /^W< 5. P T A5: 5:W A58 58 5/ ! 5< @5$ P$ < E < 9 @5< 9 < > @ A5. : 5l $ A5$ 5&>HV / W* $ >HZ U /
0x05dff4…05e188 Dummy {f00=0x001d, f01=0x0190, f02=» A5 A5" D A5 5 0 ' 5 < @ > 78 A5(W A5( @ , :< 9 :N& :R :J & P @5(T /^W @5( 5/ 5< J F E @5(P A5( A z 4 @ ! P^ N 9 P R @ zQ> @5< 9 R J
0x05e188…05e31c Dummy {f00=0x001d, f01=0x0190, f02=» G P 0 ' : W W W W W W /^ : < FC= < BUFL= =6DEV= < BUFDS= < DSCB= @ , <d <t R $@ <p 5* <fW, @5* @ VP 9j <jW 9f <j 5* @ @5*:D @ VQ
0x05e31c…05e4b0 Dummy {f00=0x001d, f01=0x0190, f02=»:xT /^ @:zP: @:v @:t" P( @ 8 D T /^W U /^W @:d . @: P @:dP A:tP /^ @: T* 6 E :` 6 A5, @5, A:t A 8 @5* @ VP ;D 9B @ 8 E :t A5* A : A < A > A @ : W W W /^_ P W W W
0x05e4b0…05e644 Dummy {f00=0x001d, f01=0x0190, f02=» Z~$@X @5* ] @ VP :D 9B @ 8 D A ;T @:| A:| ;T (=X 09=X(,=j ) 09=j8) W W W ! @56? :B W $ W " A A=L 4 @ VP @50 ? @56 ? @ , :<R R /^ : A=F ! RV
0x05e644…05e7d8 Dummy {f00=0x001d, f01=0x0190, f02=»=L RF @=D =F T U4 @=D n $ T " P @=JP / @=J A=N @ _> P @=L ! Q / W / @5/ @ VP 9D 50 =H =L ( @=FP @ ! PV @ P @ =L @=J 9 @56 Y =L R @=FP @ 9?H @=D Y Y @=N A56 R A P @ P
0x05e7d8…05e96c Dummy {f00=0x001d, f01=0x0190, f02=»/ W / : @ ! P* @ zQ$ # @ P A@2 0 I $` : @ V4 @4 T@ @ ,P>R@ D T T" : P W /^_, W W W W /^ : AvINDS= A OUTDS=
0x05e96c…05eb00 Dummy {f00=0x001d, f01=0x0190, f02=» 6 : @A Tp AA @ @ W @A T AA @ @ W AA AA R8$@P4 @ 8 @ : @ VP 9D :B A @ 8 $"? A _ W W / _ /^ :BVADRMOD= B LITADR= @B P /^W( AB B $ P $ n& : @B T AB T ~ T R X(
0x05eb00…05ec94 (0, 120) Dummy {f00=0x001e, f01=0x0190, f02=» P , % P , A X 6 A W V A X V A Y V A Z_ W / _ @ QD @ Q J F E ( * @ R A r * RP _ @ V @ T A A A4 A n ( ^ : @C T. $ >HR( U / AC C : /^ :
0x05ec94…05ee28 Dummy {f00=0x001e, f01=0x0190, f02=» DVP< $ >HR$ U / D$ ADV A : / : /^ : AD @ AD AD $ $0P T W $ ! Pv< R&< R2 P Rr W2 P, QdW" ~ TTW TN V !''T V @D $@T AD $0T AD _t D R D : / W
0x05ee28…05efbc Dummy {f00=0x001e, f01=0x0190, f02=» I @ M @54 M M @ I @ P @ N S AFx J Fz A PP 2 I _ I @ A I @ N A P A R A z : J: J: Fx J: J: : :BTABT:ATAB : T:A000 @ ! P @F P : AF @58;B
0x05efbc…05f150 Dummy {f00=0x001e, f01=0x0190, f02=» % H E _D @ F_( 2 AF 9h AF F L A L A R G F J AFx Fz J LP J: _ J: A I P I _ I @ I @ B AF @ D AF U AF AF HF @ F AF @ H AF S AF AF HF @ B A R : F J
0x05f150…05f2e4 Dummy {f00=0x001e, f01=0x0190, f02=» I F F P. I " I @F _4 I @ I : ,( F @/ T @ - K K J =A?A R / T^ : R T, ' A Sd : R<W* T - W ' / =A>A?A ' A S8 A S2 R :AR K K A/ :=A?A>A^ A/ K K !
0x05f2e4…05f478 Dummy {f00=0x001e, f01=0x0190, f02=»/ T <GQ @/ TJ : @,( P <E, # ! T = V A/ :R / : @ ! L 6 < M : J @ : @ 6 AJ AFx Fz <P J: _ J: A @J P 6 " I _ @ 6 AJ J " I
0x05f478…05f60c Dummy {f00=0x001e, f01=0x0190, f02=» 8 @ : M : J AFx Fz @C P C J: D& D$P J: _ J: @ > J A > " I @J @ @9 Q * I @C T I I W I I @DV I P I I
0x05f60c…05f7a0 Dummy {f00=0x001e, f01=0x0190, f02=» G P - R C A/ : @/ P =A>A^ A/ C ! / :
0x05f7a0…05f934 (0, 121) Dummy {f00=0x001e, f01=0x0190, f02=» 4 LIST 46 ^ $ #z 46 46 ; # P / A : T 4< P . / W @ Z A44 @ Q @ P ( ' @ Z A ^ @44 A Z A
0x05f934…05fac8 Dummy {f00=0x001e, f01=0x0190, f02=»
[…0x2…]
0x05fdf0…05ff84 Dummy {f00=0x001e, f01=0x0190, f02=» ; ; I B&B*; ; ; ; ; ; ; ; ; ; ; ; ; ; ; ; ; Kx@>; > ; ; ; ; ; ; ; ; Aj; ; ; ; ; ; ; E G H K +R
0x05ff84…060118 Dummy {f00=0x001e, f01=0x0190, f02=» Z H :H ; ^ 2 . ^ ; . ( 0 . ( DOS SYSTEM ERROR ON ADDRESS = W j 2 V <, , <0 5 V 9D9k D< <z< = >" W( W W W W W W W W W 2 W V # T , 0V U V j : V NO <( @ X 8<h
0x060118…0602ac Dummy {f00=0x001e, f01=0x0190, f02=» @ U <( . <4 M - > F G U W D V <H F V # f = Z V = R W W W W ' C = R WdW W W V SCP" OBP LMP UFP <@ K V K K
0x0602ac…060440 Dummy {f00=0x001e, f01=0x0190, f02=»<@ W @ _ V Q # T <8 : V V , T W W W V : 0 Q Q X*Q R U > V_> ?B_D @ , H Q R W H T T ?BW H T I I Y2 X_ , P P , P P C U T P
0x060440…0605d4 (0, 122) Dummy {f00=0x001e, f01=0x0190, f02=» 4 T C @ R _ _ _ _ B , @ T * ,9cP L2 Y _ :` @ T T P T R ?A?i _ U U U W : W V C @ R W _ _ _ T 4 & C @ R WL_ _ _ B , ,9c
0x0605d4…060768 Dummy {f00=0x001e, f01=0x0190, f02=» V V * 4T _ R ; L:S6 T L:9C # 2 Q A R W _ _ _ V V : W _ W _ V P ;B LA 8 W < B # , P P| Q& P R 9AR Wl B V T C F # C P W
0x060768…0608fc Dummy {f00=0x001e, f01=0x0190, f02=»? R ? R ? R B W B < B , PX PN P RT T MTP TCP TKT2 ( B :ER ( B P ( Cf 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
0x0608fc…060a90 Dummy {f00=0x001e, f01=0x0190, f02=»Db D WxWv_ T TY * < DW ( < _L W W V W V W < D D W$W(W V <_x D D W W _, T TPX>_8 W C _ V B , P P P R W , P* 09AR R EZ P F F G W W W V : L
0x060a90…060c24 Dummy {f00=0x001e, f01=0x0190, f02=» 2 G G F G , P F6 F6 @ U F L ?L F P X EH L =CR =AR F =CRH FzWB F =CR: F W4 F =l P* F W$ ' ' ( J G G G G G G G G G E2 L
0x060c24…060db8 Dummy {f00=0x001e, f01=0x0190, f02=»_ _ W F6 B P8 R R H T H T H P < 6 F6 G G G G G G G G G G G E2 W Q Z P F G V : P G G "P P _ < # @ 2 P P _ :
0x060db8…060f4c Dummy {f00=0x001e, f01=0x0190, f02=»IX H R *P I^ H R *T < , T W | < V 8 W I R WLW WHWFWD 1P 1P 0 ) ] V :IDENT IDENT* W _ W G G G T P G F T V _( P # Q V W
0x060f4c…0610e0 Dummy {f00=0x001e, f01=0x0190, f02=» 4 V # JP 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
0x0610e0…061274 (0, 123) Dummy {f00=0x001e, f01=0x0190, f02=» 0R 9AR W W @K : L* AL B P @L B R _ : X _$ X _, 2 <_(L L L ; L W" ; L W ; L W Z " [ Z : ! @L Z 9c Z P L U _< :` % _H % _P XV _Z
0x061274…061408 Dummy {f00=0x001e, f01=0x0190, f02=» $ VF @ 5Z $ 5Z R $@P T $ P $ P W @ VQ @ XT W @ P $ TB $ T <HRv # P @ @ & Q ;hP / H 7 @ P <CVz Pt 44 T 44 5 R U< / W2 $ P> $ P Fr K @ VP KW F
0x061408…06159c Dummy {f00=0x001e, f01=0x0190, f02=» 8 8 ?V 8 80 46 A @ JT J` : < AR > Jl < 6H O 6PU 6Z@ 5 6j O D O A D # P #
0x06159c…061730 Dummy {f00=0x001e, f01=0x0190, f02=» @ ( W@ <A @ $ 5 @5 @ P @5~P @ XP W @ XP 4 5 0 1 $@P W@ $0T $ / _ &<BR &R <CV &<AV n_ & T / @ Q$ @5 P @ 0 @ 4 @ & % @ & A @ T W I @ P E 5 A5 A $ A5 A5| A & A5 A5~ :8LNW, 8VNE,
0x061730…0618c4 Dummy {f00=0x001e, f01=0x0190, f02=» R $@P @ VP 9D H 7r W / _$:FMTITEM A5 $ : V @ * : V $ ?V 8 T P _ W R> R4 "@Pb P: @ P A "!T( @ VQV TN @ XPHW R $ T W W / @ VP " P W " P " P
0x0618c4…061a58 Dummy {f00=0x001e, f01=0x0190, f02=» $ / @P @ U @ T 7 7r: NW, ; SEQ, ;*DIR, ;:CUR, ;JIXSEQ, ;ZIXDIR, ;jPROT, ;zDROP, ; PAS, ; ACT, ; ADDR, ; DC, T: $ PB$ <D F A< < !..T :> . /^ 7 F X A; ; ; : W
0x061a58…061bec Dummy {f00=0x001e, f01=0x0190, f02=» F P W0 F A W F A W F C W X A: A; ; ; : W $ P $ T* : @ Q V W E X H 7r $ 7r F $ P A: F $ : @ Q V W E 7r
0x061bec…061d80 Dummy {f00=0x001e, f01=0x0190, f02=» R > !0P @ V H T 7r @ > > $@T $ > _: @ P A $ T > @ VQ $ Tn @ X > Wd $ > @ PV @ T* @ TB Fr F @ VP< F $ P2 $ P, FW& @5 5 P E 5 A5 A A F @ VQ @ X$ H $ P` A< $ P $0P 7r $
0x061d80…061f14 (0, 124) Dummy {f00=0x001f, f01=0x0190, f02=» 7 W W W W / = @ U &:HR @@ 9B @ " @ @ & ,$ T, L R - W - R Q @ " @ $ Z. W Q L P M W F @ "<" E R @ " @ $ ZH U F W P F 7 @ P @ " @ $ A R @ *P R A
0x061f14…0620a8 Dummy {f00=0x001f, f01=0x0190, f02=»T @ VP* LW$ A P @ X$ H 7r L A @ T @ X H @ 7r 7 <U / < A#X # H @ R H Y @5|P A @ U8 @ A R @ $ 5 - @#X M . M A $ @5|P - 7r @5 5 P E 5 A5 A L @ X H 7r $ T> @
0x0620a8…06223c Dummy {f00=0x001f, f01=0x0190, f02=»AP @AP H @AQ<d H 7r W / AP_8 B8.NPROT, B@.PROT, BH.EXCL, BP.IN, BX.SOUT, B`.DOUT, Bh.INOUT, Bp.EXT, < !..Tt <HV A <DR <AV A . / $ C. C. C. C. C. C. C. C.
0x06223c…0623d0 Dummy {f00=0x001f, f01=0x0190, f02=» @ $ 5 @5 W8 $ P& @ V AA /^ @A 6 ! P T W T H 7r W / <H^ _ # @ ,U> @ P PW0 @5 ) # : >U / > @ P , @ ~R A ~ @ P F* : / _ AC @ AC AC $
0x0623d0…062564 Dummy {f00=0x001f, f01=0x0190, f02=» AC $0T AC _x C 9hP @5zP" C : / W W W &0T $ C :$$$TRA #z @ P> A @ U2 E D F F E E # : "P0 R P"? R ? R T F _6 F : ,( @/ T
0x062564…0626f8 Dummy {f00=0x001f, f01=0x0190, f02=» " @ P R2 & @ P( & @ T @5 P P P T $ @5 @5 G A # : <a$ @5 P * $ P * @ ~ W @ @ & L AF(=N=b G @F( : #z @ @ & @5 P * G # : @/ T <GQ @/ TJ : @,( P <E, # !
0x0626f8…06288c Dummy {f00=0x001f, f01=0x0190, f02=» @ T # P X = = W8 Gz @ T R _P 2_T @ ( A @ @ P @5 A & A, : # , . / #r # K K :H K ?a + P$ R @ P ! U 5 #r , (~ : P @ T A & A & @ Q : <C R @ VQ: HH R A R A $ @
0x06288c…062a20 Dummy {f00=0x001f, f01=0x0190, f02=» # U U : A5 A5 @ Q : AH @5 @ $ 5 @ P4 A 1 5 A5 A $ @H P * Q U A $ A5 : @H P @ VQ"W @ R A $ A5 : W " 5 1 A5 A $ A $ : A A, @ Tl @ A & " $P@ R F R V ! P ! ! T
0x062a20…062bb4 (0, 125) Dummy {f00=0x001f, f01=0x0190, f02=» ' A @5 A5 : Z A J & _ A J _ A J _(
0x062bb4…062d48 Dummy {f00=0x001f, f01=0x0190, f02=»L APPL= M DUPL= N NUM N,ALPHA NDMINL= NxMAXL= N REWRT N ME N NEOI N NCLR O CTAB O VERIF O2USATTR OJSCHK= AK< 8 K ^ AK" 6p 6 AK< K ^ AK AK
0x062d48…062edc Dummy {f00=0x001f, f01=0x0190, f02=» @K P Q @K: AK$ W @K: AK$ @K P 9dT @ VP 9A K4 K" @K0 IK" @K1 IK" @K2 IK" K"W$ K @K P Q @K: W W @K: W W AK> H @K>P _ A | 6p 7r @K K AK A5z C T2 A5z K: :hP AK 9H @K<T AK" K AK
0x062edc…063070 Dummy {f00=0x001f, f01=0x0190, f02=» $ K K & K $ <HZ X& @ R R "@TnW Rf$ Pb @ VP K6W K5 @K ! Xh& Xf $ <HZp @ R R "@T$W R P @ VP K8_ K6_ W / _ @K K AK K @K K AK @ AK0 K @K K AK C T @V K0 K
0x063070…063204 Dummy {f00=0x001f, f01=0x0190, f02=» AK0 K @K K AK @ AK2 K @K K AK AK2 K @K K AK AK2 K @K K AK AK2 K @K K AK C ^ K2 K 6 W 6 A5| W 6| A5| A A * < !==T CL Q, @5|P H Q, CL A 6t
0x063204…063398 Dummy {f00=0x001f, f01=0x0190, f02=»OtW 6 AOtW 6 AOtW 6 AOtW 6 AOtW 6 AOtWz 6 AOtWn 6 AOtWb 6 AOtWT 6 AOtWH 6 AOtW< 6 AOtW0 6 AOtW$ 6 AOtW 6 AOtW 6 AOtW A CL H Ot 6
0x063398…06352c Dummy {f00=0x001f, f01=0x0190, f02=»:FMTITEM CL A A 6l 6 C P P @C $ < V A * ?V 8 Jx ( 1T P _ @ VWr @ R2 R($ < $@XD $ T @ VQJ T< @ XP<WJ R<$ < $ P0 J T( J 5 R @ X H 7r W W W
0x06352c…0636c0 Dummy {f00=0x001f, f01=0x0190, f02=» : @ ,U P T A5 A5 A @ ~Rb A ~ @ Q( @ ~ ) : @ ~ G A 5 A5 : /^_ /^W O O A5 A5 A @ ~ZF A ~ @ Q O _ O @ ~ G A
0x0636c0…063854 (0, 126) Dummy {f00=0x001f, f01=0x0190, f02=» )W4 * @ ~ G W /^ : /^_p $ AM AM T / WD AM @ P: Rz $ P $ P / " @ X! P ** G @M @M n ! r @ P ( G : @ X" P @M AM M : @ P R $@P $ P $ P
0x063854…0639e8 Dummy {f00=0x001f, f01=0x0190, f02=» R AN C P P W / @ R A A A R R n> Z> @ R N R @ ~R8 A ~ @ Q @ ~ )W0 # >U /^ > < # F*W W /^ : ?D ?P #z @ < V& @O O ^ AO O O
0x0639e8…063b7c Dummy {f00=0x001f, f01=0x0190, f02=»:FMTITEM 6F 6 6N A5 @ T A R A 0 @ 4 @ 0 )WT @ 0 @ 4 $ 1 A6L A 0W: 6X A @ T A R A 0 @ 4 @ 0 %W @ 0 @ 4 $1 A6V A 0 6 @ P A 6h A5 _ /^ : A @5 T C P P @C $ < V A * ?V @ R, R"$ < $@P @ VQ
0x063b7c…063d10 Dummy {f00=0x001f, f01=0x0190, f02=»T $ TH $ TB @ P0 F E RW @ P Fr K @ VP K @ X H 7r W W W / _ @ T @ R M @ P ( ' @ P @ U L W AL @ P 0 L @ ! P /^ @L P $ >HRT U / @L T
0x063d10…063ea4 Dummy {f00=0x001f, f01=0x0190, f02=» C @MN T ) : /^_ P ) W / @MN_* @ V /^W6 A ( * @ R A r * RP _ : _@ ***WARNING***FOLLOWING FORMAL PARAMETERS ARE NOT TYPE DEFINED:
0x063ea4…064038 Dummy {f00=0x001f, f01=0x0190, f02=»N P& $ A <HR U / R T ! P #0 @N ! P # Td $W @N PV @N ) @N !@P6 @ VT0 @ XP* @ P: A H @ ( @ *P P V Q _ n& X : W W W W / $0 & P, $ _0 #z @ Pd P N@ ^ N@ @ ( @ *P H
0x064038…0641cc Dummy {f00=0x001f, f01=0x0190, f02=»P, ,,P` )PN P, @ R M A A @ ,R Q /^W @ P < ! P @ =cT P& $ A <HRp U / V VR VH V> $@P $ <HR&;D+ @ A n& X : W / $0 P, $ _$ / _&
0x0641cc…064360 Dummy {f00=0x001f, f01=0x0190, f02=» - # ( ^ . ( @( Q , A( )( < ( @ ( ^ @/ ( $ )( - # ( ^ )( @/ PD 2 . ^ D . . $ 4 . ( 0 . :TRA.ERR.BIN BCD STR BOL FTB FOR EQU EXT ADR KEY PRO FLB @ VP d $ & 5J D
0x064360…0644f4 (0, 127) Dummy {f00=0x001f, f01=0x0190, f02=» ! P 9 R _ ( W * 9AV MW 9AV U Q( nZ ( _ P ( :
0x0644f4…064688 Dummy {f00=0x001f, f01=0x0190, f02=» P 9 _ Z P 8 0 5 _ 0 5 SJ SJP _0 P 0 5 _ P 0 5 Z Z 6 _ _R _P V ^ 0 1 Y 6 P T R 6 $ P Y 6 U Y R
0x064688…06481c Dummy {f00=0x001f, f01=0x0190, f02=» [ Z 6= R Z [ _@ = _ z _2 [ Z Z Q Z Z V ) [ Z 6 (_ w T Z :AV :AR P: Z P> (P: Z Z M Z 9ER ( W [ Z P ( . IO ERROR XX XXXX Z 9H Z
0x06481c…0649b0 Dummy {f00=0x001f, f01=0x0190, f02=» P 9 @ 0 A F A H $ <P Q "P A H T A , A 4 P Q A F S @ J A < D @ DP ( A < @ D=!P A D & A 4 A ,_2 @ FP @ J A 4 ( @ @ HP A 4 ( T : Q B _ @ J_ C_ Y 6 U * 2
0x0649b0…064b44 Dummy {f00=0x001f, f01=0x0190, f02=»_P _8 W& 8_( * X V A 2 < T [, * > S S S S P V V @ > v V ,U $ : V Y _ [ T X _$ A * : T_
0x064b44…064cd8 Dummy {f00=0x001f, f01=0x0190, f02=» A V A T S S S S S S S S V ,Q S P A T P" : T R 5 4_ _ _ _ _ _ _ _
0x064cd8…064e6c Dummy {f00=0x001f, f01=0x0190, f02=» S : 2 X V 0 4 T : W P 8 T` V : R8 QFPN U A $ A $8 Q @ P S X8 : 2 _L ' F_ X @ : 0 4P 8 :8 W P 8 T P 8
0x064e6c…065000 Dummy {f00=0x001f, f01=0x0190, f02=»S2 : : W _. : X*8 T p _D FW W ! 8 T P<Q V" 8 T . 8 P 8 9 V R _ P 8! 8! _ _ _ _
0x065000…065194 (0, 128) Opaque[0x194]
0x065194…065328 # DirEnt {nam=»TLK «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0400, f03=0x0000}
0x065194…065328 IdxSect {
0x065194…065328 f00 = 0x0020 // 0x65194 @0x0
0x065194…065328 f01 = 0x001a // 0x65196 @0x2
0x065194…065328 gno = [ // 0x65198 @0x4
0x065194…065328 [0x00]: C0x0020.0x0.0
0x065194…065328 [0x01]: C0x0020.0x1.0
0x065194…065328 [0x02]: C0x0020.0x2.0
0x065194…065328 [0x03]: C0x0020.0x3.0
0x065194…065328 [0x04]: C0x0021.0x0.0
0x065194…065328 [0x05]: C0x0021.0x1.0
0x065194…065328 [0x06]: C0x0021.0x2.0
0x065194…065328 [0x07]: C0x0021.0x3.0
0x065194…065328 [0x08]: C0x0022.0x0.0
0x065194…065328 [0x09]: C0x0022.0x1.0
0x065194…065328 [0x0a]: C0x0022.0x2.0
0x065194…065328 [0x0b]: C0x0022.0x3.0
0x065194…065328 [0x0c]: C0x0023.0x0.0
0x065194…065328 ]
0x065194…065328 }
0x065328…0654bc Dummy {f00=0x0020, f01=0x0190, f02=» G H % P % . % A n 1 I n 1 Y ^ :C H A M 4 H R M 4 PB " P :C_ @ 9C E ^ 4 V V ( T # Y$ @ : ( 4 @ D A j A l D ( A ;FR A W H T A Z 2 Z
0x0654bc…065650 Dummy {f00=0x0020, f01=0x0190, f02=» H A b A h A p % @ 4 A 2 @ 8 A 6 @ < A : @ @ A > @ b @ h A V A d A P A @ l A j Z $P D " X E _ @ P @ 2 A 4 @ 6 A 8 @ : A < @ > A @ @ P Z H Z H % Z Z Z Z
0x065650…0657e4 Dummy {f00=0x0020, f01=0x0190, f02=» Z %2 @ T8 @ P !. !. Z Z Z Z ( _ MR:FC W MR:OPN : D D ! L Qz L , % X P$ P P 4 V G = G 0 G X <A @ BQ( P D G X G = X G X G 4 V
0x0657e4…065978 Dummy {f00=0x0020, f01=0x0190, f02=» X N M N M T - Y V X V ;AP 4 N 4 N MR:RS W MR:GER F % P 4 F P G G 0 1 G T G W F P~ N G G = U V H 4 8 U V L H V V V V V F P 0 G T G F F
0x065978…065b0c Dummy {f00=0x0020, f01=0x0190, f02=»U V H 4 4 4 W MR:PUR F % P 4 F P F G G F G T G W 9 F TX F PR F U V D x F P 0 G T G F F 4 4 4 W MR:ENR F ! P 4
0x065b0c…065ca0 Dummy {f00=0x0020, f01=0x0190, f02=» 1 G T G W F PH N G G = U V H F Pd 0 G T G F P 4 " F P. 0 G T G F P U V H l 4 " 4 " 4 " W MR:PUW F % P 4 F P F G G F G T G W 9 F T0 F P 0 G
0x065ca0…065e34 (0, 129) Dummy {f00=0x0020, f01=0x0190, f02=» G W % U V H F P. 0 G T G F P U V H 4 MR:AR W MR:ASB & P P 4 2 F P F D E T %W ) G G 4 2 W MR:REL & P P 4 D G G P 0 E T E 4 MR:L
0x065e34…065fc8 Dummy {f00=0x0020, f01=0x0190, f02=» 4 *W MR:WAI F R 4 R G < ( B F B ] B P W B P ; R _ D G G 4 R *W MR:INF < ( B 4 MR:RWR W MR:RBR F P $ T 4 F T F P@ 0 G T G F
0x065fc8…06615c Dummy {f00=0x0020, f01=0x0190, f02=» F U V H N G G = 4 4 MR:PC W MR:EXI D ( 4 W MR:DAT @ T I Y 4 6 W MR:TIM @ " T I I Y I < I I 2 I 4 p MR:ES
0x06615c…0662f0 Dummy {f00=0x0020, f01=0x0190, f02=»T( " U V H T X N 4 4 W MR:REW F $ P P 4 p 1 U V H N 4 p # " 'Q R # : A A A A A A A A A A A A A A A A A A A A
0x0662f0…066484 Dummy {f00=0x0020, f01=0x0190, f02=»P& L " 0 5 1 L #8 # :* CREDIT CODE LINKER REL 11.0 810513 * * DATE XXXXXX * PAGE 0000 *
0x066484…066618 Dummy {f00=0x0020, f01=0x0190, f02=» UUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUU
0x066618…0667ac Dummy {f00=0x0020, f01=0x0190, f02=»UUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUU IDENT O T:D TRA TOTALS: NOD P:PIL T:FMT P:S001T:KEY S:GT
0x0667ac…066940 Dummy {f00=0x0020, f01=0x0190, f02=» P B G G . P : < = G T . F P _ F =h P8 T* . F P _ F P _ : & A ' : @ ' : # HT W T W ( < ) = # : # H P n P ( ) =
0x066940…066ad4 (0, 130) Dummy {f00=0x0020, f01=0x0190, f02=» & V H H | V H H V H H
0x066ad4…066c68 Dummy {f00=0x0020, f01=0x0190, f02=» ~ V H H V H H |
0x066c68…066dfc Dummy {f00=0x0020, f01=0x0190, f02=» $
0x066dfc…066f90 Dummy {f00=0x0020, f01=0x0190, f02=»
[…0x2…]
0x0672b8…06744c Dummy {f00=0x0020, f01=0x0190, f02=» | n n | n n
0x06744c…0675e0 Dummy {f00=0x0020, f01=0x0190, f02=» D !
0x0675e0…067774 (0, 131) Dummy {f00=0x0020, f01=0x0190, f02=»# : #~ Z 4 [ ! :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 #~ A!D A!` A!f Z NO 3 D S S H
0x067774…067908 Dummy {f00=0x0020, f01=0x0190, f02=» ! ! H # @ l @ xW& # @ x @ l @ t @ U A =a>a R, @ V A =A>A A x A l " # : A A p J ; &P _ # : : T : _ # %
0x067908…067a9c Dummy {f00=0x0020, f01=0x0190, f02=» : " ' _ # %T # : )P _ [ [ [ [ ; Z [ : [ [ : Z # Z # Z Z Z Z Z Z Z : = $Z % D $j % $t ( ( I/
0x067a9c…067c30 Dummy {f00=0x0020, f01=0x0190, f02=» : : X " : : : G P W l : J A : _ A : _ A : _( A : _4 A : _@ A : d _L A : _X A : r _d A : _p A : _| A : _ A : _ A : _
0x067c30…067dc4 Dummy {f00=0x0020, f01=0x0190, f02=» B A t A x A ( C ( C ( C A(` (@ @(` ,l T (b @ X A @ T A dWF A @(`T R2 ]B @ X !CCT A R A ^ C _n Z A Z $P$ D D X D * E _( A P @(`P T&
0x067dc4…067f58 Dummy {f00=0x0020, f01=0x0190, f02=» % @(` A'< A'B Z Z _ @ 9CV @ RT DW D A Y A @ j A l @ t A x A A Z Z @ x $P( D X ) #8 - M M _, ) Z $P " #8 ) A _ ) @ d A A R R ^ C C @ 9D % R A ^
0x067f58…0680ec Dummy {f00=0x0020, f01=0x0190, f02=» : A ( : 2 R B : 5Dv@7 7 > - - 7 ( - 3 #~ @ Z N " T. T Tn B P, B $ PZ B P Y<PL P T T W4 P4 W0 N )P ;M C W # : #~ A,V h
0x0680ec…068280 Dummy {f00=0x0020, f01=0x0190, f02=» T| b ` b" :A B ;m ) " ) #8 ) ( T B ! T @) ! T A) Z`_ A) WB ! T. b T A) @) ! T _ A) W ! T A) ) # : @) @) @) " T P, @) U + Wv R V $Rp A) A) WB
0x068280…068414 (0, 132) Dummy {f00=0x0021, f01=0x0190, f02=»_ _ @) R V$ H b " @) (" :A + : + @) A) _8 R @) b R W ) T W #8 V8 A) ,@ R @) @) A) A) A) R S _P ) : # @) R P S Z R V A) _" # : #~ A- f R @ nR -~_ $:ARL:A
0x068414…0685a8 Dummy {f00=0x0021, f01=0x0190, f02=» A T S v S # : @ 9FV@ @ v C E T A YT6W& D E P E DDP R E P D A X -~ _^ _ S Z R Z f S A n : #~ @ 9CV 9IR 4 # : 2 R B_ #~ @ 9L . @ 9C 4 R d C / 0| 0 L r
0x0685a8…06873c Dummy {f00=0x0021, f01=0x0190, f02=» 1, 1, 2p 2 ' 2 2 A A A A A A A A r A ~ A A A @ t A x @ 0P A 0 # : R @ P & R P " / @0zP : ,P _ P 6 0| 0 @ :DV W 1, 2p =F =F R
0x06873c…0688d0 Dummy {f00=0x0021, f01=0x0190, f02=» $P 0Pj D L , 1 L P L 8 - 9 W6 @ =LR L V( 9 @ =LV X R Y _t X~ A0z_ : (PD (T Z W0 ,P L P ^ P X, X0_ I ( 9 5 ) 4 _D : $P D H R I _ 0 _ : #
0x0688d0…068a64 Dummy {f00=0x0021, f01=0x0190, f02=» : P : Pz 9` C T @ @ A @W D C C ( # U : D T A R D C C B U P : 10 10 10 4P _ 4 9 10 # :
0x068a64…068bf8 Dummy {f00=0x0021, f01=0x0190, f02=» Z : Z R : #~ | 5 z #8 @ 9C 4 @ T V = 4 dW V = d @ @ A A C | H " 5 . < X P & ;D _ R % ;D @ v 5 H " 5 < 0 5 A 5 t
0x068bf8…068d8c Dummy {f00=0x0021, f01=0x0190, f02=» 4 _@ @ T A A @ P R Z S #8 Z # : : A {P A _ @ TL z x T A R Z S #8 Z _V @ p p . A p A _ _ @ _ @ $ @ v _. > : 6 2 2 @ < 8 4 4 @ T R :h -Q 5x :
0x068d8c…068f20 Dummy {f00=0x0021, f01=0x0190, f02=» @ C @ # # : #~ R 9i @ :LRn 7 : P( 7 7 : P D7 D7 7 R ;a T C :OV C ;NV R Wp 7 : P4 @ <DR" 7 7 : P D7 W 9` 7 ! Z C 9
0x068f20…0690b4 (0, 133) Dummy {f00=0x0021, f01=0x0190, f02=» R P*?A S ?i R : S # : r ~ j v n z 9h9h9h9` 4 4 8 < #~ 2>iP & R W R @ 9C 4 # : z " 2?m z #8 X8,808 z z Pd z @
0x0690b4…069248 Dummy {f00=0x0021, f01=0x0190, f02=» @ T B T. B P P& Q @ d Q # : _ B_ # 9 9 F 0P ( 1 " P$ " ) # @9 I W P I # : @9 B_ #~ W #~ Q : U 9g D: $ $ T2 @ A Z P Z S S M Z
0x069248…0693dc Dummy {f00=0x0021, f01=0x0190, f02=» 4 U 8 5R6Q0 Q, ; _` Q < X T _t W #~ " P W ; V W ; R R T T R Q ; ; ; ; V R T(
0x0693dc…069570 Dummy {f00=0x0021, f01=0x0190, f02=» R W : #~ @ D P A @ D T D Z [ A # : A @ Z R P Z S E Z S _< # P, Q B ^ _ @ T C _0 # : #~ $P D D P V L PF =h & >A D R _ " P
0x069570…069704 Dummy {f00=0x0021, f01=0x0190, f02=»W C @ T C A p # : # (P:W (P4 H V W P&Q = P _ 5 ( 9 ) = 8 # : B_F <T 5 9 : #~ @ PF R ! @ R P > A @ S R Bd 4z # : #~ R ?* ?< ?* ?R X?n #~ W #~ R
0x069704…069898 Dummy {f00=0x0021, f01=0x0190, f02=»W R ! D? D? P # P Tr T Q !CCP @ P A P @ 9EV 9GR d V C @ P 9 # : 2 R B_ F_ R 0P Y P : P ! P P P Q P :> > ?6?6> ?6> ?6> ?*?6> B C P ^ f b #~ R #
0x069898…069a2c Dummy {f00=0x0021, f01=0x0190, f02=» r D U : W @ ! P& R ! r #8 A A * A ( # : [ A (_ #~ A A * A A r @ (P A ( # : #~ W #~ @ 9h r A ( A C C P6 ' ?A r : r : * r
0x069a2c…069bc0 Dummy {f00=0x0021, f01=0x0190, f02=»# : # ' ?A BX BV !CCT W2 T W, X ' P" X A T f " P Bb Bb f P4W C C W$ , P - C - A R P Y # : @ C _ b F ^ B f D #~ @ P @ Y A 8Pl X V W Q
0x069bc0…069d54 (0, 134) Dummy {f00=0x0021, f01=0x0190, f02=» ( Z @ A t A x A @ 9 R A A 9 R| 'f Z A ^ A B A b A F A n A z A A A A A A V 2 A R A @ j A l A @ .P A . Z $P D " X E _ ` d 'v D A T A d @ :DR$ D @ R A R @ R W R @ VP W ' A V @ VR @ 9DR
0x069d54…069ee8 Dummy {f00=0x0021, f01=0x0190, f02=» j % @ d @ P ( A P A A ` A ( A % @ d X ) A d ( @ T @ l A j : A _ D ? :n f S n S A n @ PP. A' @ PR A' Z A P:A H' A' Z : R ^ P D C j A : E $ R ^ " P C _ :
0x069ee8…06a07c Dummy {f00=0x0021, f01=0x0190, f02=» * / #~ R ( @ l ( # : #~ f S Z P R #8 S _ # : f S S U W S #8 Z S 4 S R Z : #~ A*d f R @ nR * _ $:ARL:ARB H v " v $ D @ n R
0x06a07c…06a210 Dummy {f00=0x0021, f01=0x0190, f02=» E T A YT6W& D E P E DDP R E P D A X * _^ _ S Z R Z f S A n : #~ @ 9CV 9IR 1 # : 2 R B_ #~ @ 9L + @ 9C 1 R d C , -Z - L r 4 9 4 r j . L ~ 4 9 4
0x06a210…06a3a4 Dummy {f00=0x0021, f01=0x0190, f02=»/ A A A A A A A A r A ~ A A A @ t A x @ 0P A 0 # : R @ P & R P " , @-XP : ,P _ P 6 -Z - @ :DV W . /N : : R Z S #8 Z Z / / '
0x06a3a4…06a538 Dummy {f00=0x0021, f01=0x0190, f02=» L 8 - 9 W6 @ =LR L V( 5 @ =LV X R Y _t X~ A-X_ : (PD (T Z W0 ,P L P ^ P X, X0_ I ( 9 5 ) 4 _D : $P D H R I _ - _ : # H T" I $P D H R I _ - _ # :
0x06a538…06a6cc Dummy {f00=0x0021, f01=0x0190, f02=» 6> C T @ @ A @W D C C ( # U 7| D T A R D C C B U P 7| . . . 4P _ 4 9 . # : $P D H ^ E _ $P D H ^ E _ :
0x06a6cc…06a860 Dummy {f00=0x0021, f01=0x0190, f02=»1 z #8 @ 9C 1| @ T V 9 1 dW V 9 d @ @ A A C | H " 1 . < X P & ;D _ R % ;D @ v 1 H " 1 < 0 1 A 1 t H " 1 < 1P T A @ P&
0x06a860…06a9f4 (0, 135) Dummy {f00=0x0021, f01=0x0190, f02=» #8 Z # : : A {P A _ @ TL z x T A R Z S #8 Z _V @ p p . A p A _ _ @ _ @ $ @ v _. > : 6 2 2 @ < 8 4 4 @ T R :h -Q 2V : @ T 1 2 R B :;.; ; ; 2 2J2J2J2 2 2 2 2 2
0x06a9f4…06ab88 Dummy {f00=0x0021, f01=0x0190, f02=» 4~ 6 P( 4v 4 6 P D4 D4 3 R ;a T C :OV C ;NV R Wp 4~ 6 P4 @ <DR" 4 4 6 P D4 W 6> 3 ! Z C 5 W "0 @ C C @ # # : #
0x06ab88…06ad1c Dummy {f00=0x0021, f01=0x0190, f02=» 7| S # : r ~ j v n z 6F6F6F6> 4 4 8 < #~ 2>iP & R W R @ 9C 1 # : z " 2?m z #8 X5 5 5x z z Pd z @ T :$ @ <CV C @ <CV : C P C $
0x06ad1c…06aeb0 Dummy {f00=0x0021, f01=0x0190, f02=» Q # : _ B_ # 5 5 F 0P ( 1 " P$ " ) # @5 I W P I # : @5 B_ #~ W #~ Q 6 U 9g D6 $ $ T2 @ A Z P Z S S M Z 8 :a # R R S Z _ S <H
0x06aeb0…06b044 Dummy {f00=0x0021, f01=0x0190, f02=» Q, 8b _` Q < X T _t W #~ " P W 8x V W 8x R R T T R Q 8 8 8 8 V R T(W #8 Q P R Zf _n R
0x06b044…06b1d8 Dummy {f00=0x0021, f01=0x0190, f02=» D Z [ A # : A @ Z R P Z S E Z S _< # P, Q B ^ _ @ T C _0 # : #~ $P D D P V L PF =h & >A D R _ " P W 7| " P W D
0x06b1d8…06b36c Dummy {f00=0x0021, f01=0x0190, f02=» N " T. T Tn B P, B $ PZ B P Y<PL P T T W4 P4 W0 N )P ;M C W # : # (P:W (P4 H V W P&Q ;" P _ 5 ( 9 ) ;" 8 # : B_F <T 5 9 : #~ @ PF R !
0x06b36c…06b500 Dummy {f00=0x0021, f01=0x0190, f02=» #~ R ! 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 d V C @ P 5 # : 2 R
0x06b500…06b694 (0, 136) Dummy {f00=0x0022, f01=0x0190, f02=» * & S PD " @ r D U 7|W A ( @ ! P ! @ r ) A @ ( R` @ r D U 7|W @ ! P& R ! r #8 A A * A ( # : [ A (_ #~ A A * A A r @ (P A ( # :
0x06b694…06b828 Dummy {f00=0x0022, f01=0x0190, f02=» * r C @ # R 3 #~ = RJ @ r D " :AT 9h P _ R " S P 9H R @ r 2 # : # ' ?A ? ? !CCT W2 T W, X ' P" X A T f " P ? ? f P4W C C W$ , P
0x06b828…06b9bc Dummy {f00=0x0022, f01=0x0190, f02=»W Q V W Y" X P X P* @ P 4# ! 5 X T A A W 5 ( 8 ) 9 + _r # :
0x06b9bc…06bb50 Dummy {f00=0x0022, f01=0x0190, f02=» F .R F 0P F *Q &Z 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
0x06bb50…06bce4 Dummy {f00=0x0022, f01=0x0190, f02=» * 2 ' F 0 U U F .?BV F X ,?d'> ( " #8 U 2 U G * F .?CV@ F X ,?A'> ( " #8 U 2 U G * G . G / : F - n " p U U G * : G . G / :
0x06bce4…06be78 Dummy {f00=0x0022, f01=0x0190, f02=»! ( _()0 :R ' :)V)`)j)v) ) ) ) ) ) ) * * *.*X*~* * * * + +X+j+ + + + + + + , , ,2,L,d,h,|, , , , , - - -B-&-2-L-f. - - - ..- - - . -B-2-L-f- - - - - - . . . - - .B.X.h.z. LOAD MAP LB TABLE CALL TABLE PERFORM TABLE LITERAL POOL CROSS REFERE
0x06be78…06c00c Dummy {f00=0x0022, f01=0x0190, f02=»P LINKER STATISTICS TOTAL (SEGMENT LOC MODULE COMMENT $LOC DATA IX SYMBOL DEFINED IX TYPE LOC DATA 0SYMBOL TYPE VALUE SEG-DEFINED REFERENCES ALL VALUES DECIMAL < S E G M E N T N U M B E R O
0x06c00c…06c1a0 Dummy {f00=0x0022, f01=0x0190, f02=»INPUT LOAD ADR INCORRECT UNREFERRED LITERALS UNDEFINED LITERALS NO START ADR DBL DEF MODULES UNSATISFIED EXTERNALS MODULE LENGTH ERROR TRANSLATION ERRORS WRONG TRANSLATOR RELEASE ADDRESS TABLE OVERFLOW TOO MANY LITERALS FORMAT LENGTH ERROR
0x06c1a0…06c334 (0, 137) Dummy {f00=0x0022, f01=0x0190, f02=» NOD SEQUENCE ERROR FLINK ERROR CALL TABLE PERFORM TABLE LB TABLE LITERAL DESCRIPTOR TABLE PICTURE DESCRIPTOR TABLE FORMAT DESCRIPTOR TABLE LITERAL POOL SIZE PICTURE POOL SIZE FORMAT POOL SIZE INTERPRETABLE CODE SIZE PROGRAM LENGTH = NUMBER O
0x06c334…06c4c8 Dummy {f00=0x0022, f01=0x0190, f02=» MAX WORKSPACE PER MODULE SEGMENT SIZE PERCENTUAL USAGEPROGRAM LENGTH =LINKAGE ERROR : : XXX.XXX BYTES, XX.XXX ENTRIES : XXX.XXX BYTES, XX.XXX % TLK.ERR. U6 r # T V u0 ' 1 9d A/$ 1 d 1 1 A/& @/"Px!
0x06c4c8…06c65c Dummy {f00=0x0022, f01=0x0190, f02=» A/$ A/ A/" /% /( (| /' R W ( /-P !00X R !00P P /+TZ $ Q* R - !..TH R + ! T< R , ! T2 S -W( R !..T R T R ! T S % ( /-P _ % # : /& R R ` R :l
0x06c65c…06c7f0 Dummy {f00=0x0022, f01=0x0190, f02=» j @ G A t A x A @ @ P /6 : A S A W Z ?H/ 4l Tr Q / 3 3 3 3 3 3 3 3 /@ 3 U`/ 3 4 8" R ^ " @ A T
0x06c7f0…06c984 Dummy {f00=0x0022, f01=0x0190, f02=» 7 A < W < T U`/ 3 3$ Z P ,P !. @ M A Q A @ M A Q A @ M A A A A : # A34 A3^ Z 3 S S @ S @ S S Z # : # > @ T U`
0x06c984…06cb18 Dummy {f00=0x0022, f01=0x0190, f02=»#8 > V ' @3 # A3 > R :R8W @3 P.> > & 3 @3 S :a S @3 A4^ Z A3 # : # # A4 Z " n #8 ?h #8 S A4 Z # : j n v z 2 4 6 8 > @ # @ @ P 4 4 ? > P L A
0x06cb18…06ccac Dummy {f00=0x0022, f01=0x0190, f02=» > P K a o W K @ : A 4 > P F q P > W F P > @ 4 # : j n # @ P @ A6 5 A> @ A6 @6 A H 5 A> @ A6 @6 A J T A> @ A6 T @6 A L 5 A> @
0x06ccac…06ce40 Dummy {f00=0x0022, f01=0x0190, f02=»5 < R ^ " @ C T 3f e 6 > 6 > > @ Q T 3f e 6 > 6 > > T* 3f e 6 > 6 > > @ Q T 3f e 6 > 6 > > # : # 9a :a ; S < S
0x06ce40…06cfd4 (0, 138) Dummy {f00=0x0022, f01=0x0190, f02=» Z DN # : 2 0 T PD R( "0 # 0 C P C P C _, @ P @H_ Z P " %W " # 0 C P C _ Z 2! P( ! P ! R A _& C| > _8 R ! R R 9
0x06cfd4…06d168 Dummy {f00=0x0022, f01=0x0190, f02=» 4# ! 5 X T A A W 5 ( 8 ) 9 + _r # : # @ V Z D: Z Z 8 ; U @ ;h Z (| X V * " Wr X 9AV" (| (|WH X L T X " G W" (|
0x06d168…06d2fc Dummy {f00=0x0022, f01=0x0190, f02=»C Z X X VL H 9a @ / 3 / > X R / $ $ > :L9AR H XZ H V % > % R > :L # : # 8P* X ^ X % > & % > A &_. # :<b<~< < < < ) ).)H # '
0x06d2fc…06d490 Dummy {f00=0x0022, f01=0x0190, f02=» # W # W # Z X< Z Z A<Z @<Z X<NV Z <H " #8 X<< 0 P" P P . W . #8 @ P % " ) X<B $ T P /* / /, /" $ T 9A P 9a T /6
0x06d490…06d624 Dummy {f00=0x0022, f01=0x0190, f02=» Z (| #8 (| | H " P T #8 Z DF # : ; % <P %_ : : # @ P > = R @> @> T$ H > @ * S S S = R = 9 R*% W(9 V ;a A> A
0x06d624…06d7b8 Dummy {f00=0x0022, f01=0x0190, f02=» S @? A? Z A> A> # : # "P _ P # : # P, Q B ^ _ @ T C _0 # : #~ $P D D P V L PF =h & >A D R _ " P W F " P W D
0x06d7b8…06d94c Dummy {f00=0x0022, f01=0x0190, f02=»#~ A@ @ V Z T@ Z Z 8 B X ^ @ VV Z " T (| X 9l9B @@ @ A: #8 (| T R Z _ Q W: X ' @ P W ! 9A G( Q W A6 A< AA8 ]
0x06d94c…06dae0 Dummy {f00=0x0022, f01=0x0190, f02=» _ Q @ V B Z Ah @A8 @ ^ B Z Z _ # : #~ @A: DCtPf A< A< N " ' " ! P< " !AAR ! 9D " !AAR ! R ^R . ' _D " ' # :PISTFM # (P:W (P4 H V W P&Q C P _ 5 ( 9 ) C
0x06dae0…06dc74 (0, 139) Dummy {f00=0x0022, f01=0x0190, f02=» E I E E E I E E E # W # ADD 8 Ex @DDT" P $ X P 8 Ex Dd Z @DDP P . #8W * " DB /6 D " !WWP A DB #8 4VP DB=l $ % P P" /6W$<bP W
0x06dc74…06de08 Dummy {f00=0x0022, f01=0x0190, f02=» 8 5R6Q0 Q, F _` Q < X T _t W #~ " P W F V W F R R T T R Q G( G( G G V R T(W #8 Q
0x06de08…06df9c Dummy {f00=0x0022, f01=0x0190, f02=» W : #~ @ D P A @ D T D Z [ A # : A @ Z R P Z S E Z S _<
0x06df9c…06e130 Dummy {f00=0x0022, f01=0x0190, f02=» 1$ 00 TLK.ERR. # Av A t A x A @ @ TD A A $ 3 Z 2L A A $ 6z Z 8 =n @ P * @ T 2 Z 7 @ T T @ P W :~ @ ?a @ A 7 A @ A 3 <D P 1& /6 1 ( A1 ( @ P& +X
0x06e130…06e2c4 Dummy {f00=0x0022, f01=0x0190, f02=» 3t 2 Z ! J Z A2H_Z 3t A2H_d 3P 3Pj_: 2$ <A ]H z " 4?m z #8 z 5 P $P _ "0 C _^ 4V W >AX R _ T , L X L L T 5_( G _0 @2HV Z Z T S #8
0x06e2c4…06e458 Dummy {f00=0x0022, f01=0x0190, f02=» eh @@ 3 $PNR dR ( > _ H 3 ";L @@ > ( $ $ > _T R $P. D ' X ( > > > _2 > ? # : # # A4 Z " n #8 ?h #8 S A5 Z # :
0x06e458…06e5ec Dummy {f00=0x0022, f01=0x0190, f02=» N )P ;M C W # : 2 : 6 > 6 6 6 6"6*626:6B6J6R6Z6b6j6r 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 #
0x06e5ec…06e780 Dummy {f00=0x0022, f01=0x0190, f02=» $ > _T > ? # : # 9a :a ; 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 E # W # A7~ 8 8 @7~T" P $ X P 8 8 7 Z @7~P P . #8W * "
0x06e780…06e914 (0, 140) Dummy {f00=0x0023, f01=0x0190, f02=»W (|W <bT ( " 7| #8 Z 7 # : # A8 A8 A Z P R Z _ # : T A8 W 3P @8 :" Z T S #8 2 Z ! T @8 Xl A ? _v ! | Z $P& H X ?a @/ @@_*
0x06e914…06eaa8 Dummy {f00=0x0023, f01=0x0190, f02=» z 5 B ! X $P _ "0 C A8 _d 3TN 2$ <A 4 $P0 ( V S W* R >A_ % H H U H L 5_ S A8 9 BPC # Z Z Z Z 8P X T Z Z $ X* Z ?m #8 P S S ! 9bT
0x06eaa8…06ec3c Dummy {f00=0x0023, f01=0x0190, f02=» #8 & @ 8 # :; ; ; ; < <&) ).)H # ' # # # ' # ' # # ' L ` h d l H J L N ` d p H J N # W # W # Z X; Z Z A; @
0x06ec3c…06edd0 Dummy {f00=0x0023, f01=0x0190, f02=» $ T P /* / /, /" $ T 9A P 9a T /6 P P ; W + /6 Z P Z A; _ # : # Z Z Z Z R 8P Z A=h X % (| X 9h S /6 X ! P X
0x06edd0…06ef64 Dummy {f00=0x0023, f01=0x0190, f02=» #8 =h /6 =j + /6 =l 3 /6 Z # : # @ P > = R @> @> T$ H > @ * S S S = R = 9 R*% W(9 V ;a A> A 9 = V S = V S ;a A> = V A = V U A> W^ @> PV @> 9a :A
0x06ef64…06f0f8 Dummy {f00=0x0023, f01=0x0190, f02=» ^ " T" ? $R ( > _ > # : # A@ A@4 Z 3 S S @ S @ S S Z # : # @> @@< T ! A@b Z @>> RN @< 9 ! A@< 9E T ) ' #8 > V ' @@<# A@<> R :R8W @@< P.> > & 3 @@< S
0x06f0f8…06f28c Dummy {f00=0x0023, f01=0x0190, f02=» #8 ( G /6 ) ' _` P P Z # :
0x06f28c…06f420 Dummy {f00=0x0023, f01=0x0190, f02=» V W QT V W Y" X P X P" 4# ! 5 X T A" A" W 5 ( 8 ) 9 + _j 6 :
0x06f420…06f5b4 (0, 141) Opaque[0x194]
0x06f5b4…06f748 # DirEnt {nam=»/OBJCT«, typ=»OB«, f00=0x0000, f01=0x0000, f02=0x0468, f03=0x0000}
0x06f5b4…06f748 IdxSect {
0x06f5b4…06f748 f00 = 0x0023 // 0x6f5b4 @0x0
0x06f5b4…06f748 f01 = 0x0050 // 0x6f5b6 @0x2
0x06f5b4…06f748 gno = [ // 0x6f5b8 @0x4
0x06f5b4…06f748 [0x00]: C0x0023.0x1.0
0x06f5b4…06f748 [0x01]: C0x0023.0x2.0
0x06f5b4…06f748 [0x02]: C0x0023.0x3.0
0x06f5b4…06f748 [0x03]: C0x0024.0x0.0
0x06f5b4…06f748 [0x04]: C0x0024.0x1.0
0x06f5b4…06f748 [0x05]: C0x0024.0x2.0
0x06f5b4…06f748 [0x06]: C0x0024.0x3.0
0x06f5b4…06f748 [0x07]: C0x0025.0x0.0
0x06f5b4…06f748 [0x08]: C0x0025.0x1.0
0x06f5b4…06f748 [0x09]: C0x0025.0x2.0
0x06f5b4…06f748 [0x0a]: C0x0025.0x3.0
0x06f5b4…06f748 [0x0b]: C0x0026.0x0.0
0x06f5b4…06f748 [0x0c]: C0x0026.0x1.0
0x06f5b4…06f748 [0x0d]: C0x0026.0x2.0
0x06f5b4…06f748 [0x0e]: C0x0026.0x3.0
0x06f5b4…06f748 [0x0f]: C0x0027.0x0.0
0x06f5b4…06f748 [0x10]: C0x0027.0x1.0
0x06f5b4…06f748 [0x11]: C0x0027.0x2.0
0x06f5b4…06f748 [0x12]: C0x0027.0x3.0
0x06f5b4…06f748 [0x13]: C0x0028.0x0.0
0x06f5b4…06f748 [0x14]: C0x0028.0x1.0
0x06f5b4…06f748 [0x15]: C0x0028.0x2.0
0x06f5b4…06f748 [0x16]: C0x0028.0x3.0
0x06f5b4…06f748 [0x17]: C0x0029.0x0.0
0x06f5b4…06f748 [0x18]: C0x0029.0x1.0
0x06f5b4…06f748 [0x19]: C0x0029.0x2.0
0x06f5b4…06f748 [0x1a]: C0x0029.0x3.0
0x06f5b4…06f748 [0x1b]: C0x002a.0x0.0
0x06f5b4…06f748 [0x1c]: C0x002a.0x1.0
0x06f5b4…06f748 [0x1d]: C0x002a.0x2.0
0x06f5b4…06f748 [0x1e]: C0x002a.0x3.0
0x06f5b4…06f748 [0x1f]: C0x002b.0x0.0
0x06f5b4…06f748 [0x20]: C0x002b.0x1.0
0x06f5b4…06f748 [0x21]: C0x0131.0x0.0
0x06f5b4…06f748 [0x22]: C0x00bd.0x3.0
0x06f5b4…06f748 [0x23]: C0x00be.0x0.0
0x06f5b4…06f748 [0x24]: C0x00be.0x1.0
0x06f5b4…06f748 [0x25]: C0x00be.0x2.0
0x06f5b4…06f748 [0x26]: C0x00be.0x3.0
0x06f5b4…06f748 [0x27]: C0x00bf.0x0.0
0x06f5b4…06f748 ]
0x06f5b4…06f748 }
0x06f748…06f8dc Dummy {f00=0x0023, f01=0x4144, f02=» > @ IDENT FMOVE T,REL=11.0,810128,870137141100 FMOVE F FMOVE V I:EVA0 h I:ERR2 z I:EVA5 , ( D #0 & + I:ER18 I:RT1 * & $ P _
0x06f8dc…06fa70 Dummy {f00=0x0023, f01=0x40f8, f02=» > @ IDENT TYPET T,REL=11.0,810128,870137141100 TYPET F TYPET V I:EVA0 h I:ERR2 z I:RT1 , ( B #03 ;d # + @ @
0x06fa70…06fc04 Dummy {f00=0x0023, f01=0x40fc, f02=» > @ IDENT ICLEAR T,REL=11.0,810128,870137141100 ICLEAR F ICLEAR X I:EVA0 l I:RT1 ~ , ( @ #0 0T ' ' _ T $ @
0x06fc04…06fd98 Dummy {f00=0x0023, f01=0x411c, f02=» > @ IDENT EMPTYT T,REL=11.0,810128,870137141100 EMPTYT F EMPTYT X I:EVA0 l , ( @ #0 0T & ! T ~ I:RT1 , ( P & ! X T C T T !P
0x06fd98…06ff2c Dummy {f00=0x0023, f01=0x0190, f02=» > @ IDENT T:STIN T,REL=11.0,810128,870137141100 STRIN1 F STRIN1 X T:STEV l , ( @ X x & Y " X R ~ T:RNOK , ( W R P _ Y $ T:LOFS I:E
0x06ff2c…0700c0 Dummy {f00=0x0023, f01=0x0190, f02=» X " X $ z , ( s ! P " P X $ [ z [ }T I:ERR2 J , ( 0W 3R V : %W " P , ( X $ X " R W V R , ( W V % _ [ I:MOV , ( " D
0x0700c0…070254 (0, 142) Dummy {f00=0x0023, f01=0x4082, f02=» H D ! R !W %R 1P m wP, {P, T W RD V@ W> P R W V R W V P P 0 l@ ~
0x070254…0703e8 Dummy {f00=0x0023, f01=0x018e, f02=» > @ IDENT T:STOU T,REL=11.0,810128,870137141100 STROU1 F STROU1 X T:STEV l T:LOFS ~ * & @ X x & Y " I:EVA0 T:LOPS I:ER17 , (
0x0703e8…07057c Dummy {f00=0x0023, 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
0x07057c…070710 Dummy {f00=0x0023, f01=0x414a, f02=» > @ IDENT T:STEV T,REL=11.0,810128,870137141100 T:STEV F T:STEV X T:GRFC l I:EVA0 ~ * & H #0T Y Y , ( ! T # P & #0T ( I:ERR2 7
0x070710…0708a4 Dummy {f00=0x0023, f01=0x0190, f02=» > @ IDENT T:EDFL T,REL=11.0,810128,870137141100 T:EDFL F T:EDFL X T:PRKB l T:PRDY ~ T:PM1 T:PM2 T:CASP , ( I$ Y , ( ( x P Y *
0x0708a4…070a38 Dummy {f00=0x0023, f01=0x0190, f02=» X 0 v , ( s P X T 5 ! Y * T:SCUW F T:CLRD X , ( y X V X X ( j , ( x C ( Y * , ( X Y , X X C & , ( C
0x070a38…070bcc Dummy {f00=0x0023, f01=0x018e, f02=» X l , ( I *YrP y X " x Y X " T T:BELL < , ( i Y _ _ B U C Q N T:CLR1 ~ T:CLR2 , ( P C D X , ( X * $" ~_> @ Y X * _R X , (
0x070bcc…070d60 Dummy {f00=0x0023, f01=0x0190, f02=» , ( ! @ " X # X * y _< X , ( ? # X * y X 1 1 4 , ( ] X !@T X $ " P y d T:CLIT T:EKEY , ( } @ _ x T X H , ( X X * , )$ P
0x070d60…070ef4 (0, 143) Dummy {f00=0x0023, f01=0x405c, f02=»T {U Q < V P eT uP T P F@ X
0x070ef4…071088 Dummy {f00=0x0023, f01=0x0190, f02=» > @ IDENT T:DYKI T,REL=11.0,810128,870137141100 J F " T:DYKI T:PM1 T:PM2 T:CLR1 T:CLIT T:CLR2 T:IOER T:EKEY T:BELL F T:DYKI T:PRKB T:PRDY I:EVA7 * & H ' Y
0x071088…07121c Dummy {f00=0x0023, f01=0x0190, f02=» X l T:CASP * & y ! T _ y C Q " T T:CLRD L , ( X ! X ^ , ( X ! x Y~ Y _ X "@P B , ( R y C B P 9 V _F9 , ( V X ! T X !@X
0x07121c…0713b0 Dummy {f00=0x0023, f01=0x0190, f02=» B y " y $ c C T:CLR1 X & T:CLR2 f : T:SCUW N , ( Q _$ _ y _6 ( x X@ X ` , ( qA X # C _. B , ( ]d P C Q X8_H x XD @ Y , ( c C y
0x0713b0…071544 Dummy {f00=0x0023, f01=0x0190, f02=» T:IOWR , ( # B P B C : T:CLIT : F , ( ' + X Z T:LOFS I:EVA0 T:LOPS T:CLMI , ( A ( ( T:P
0x071544…0716d8 Dummy {f00=0x0023, f01=0x0190, f02=» h I:ERR5 , ( Y Y . X ! T:PM2 J , ( D : , ( @ " $ : ! P # P : H D ! ! n # aTf i mR s J }T Q T
0x0716d8…07186c Dummy {f00=0x0023, f01=0x400e, f02=» @ RR5 , ( Y Y . X ! T:PM2 J , ( D : , ( @ " $ : ! P # P : H D ! ! n # aTf i mR s J }T Q T
0x07186c…071a00 Dummy {f00=0x0023, f01=0x0190, f02=» > @ IDENT T:UPDF T,REL=11.0,810128,870137141100 T:UPDF F T:UPDF X T:GRFC l I:ER14 ~ , ( @ 2! Y " T:LOFS I:EVA0 T:LOPS , (
0x071a00…071b94 (0, 144) Dummy {f00=0x0024, f01=0x406a, f02=»R T:RCTS $ O X MT D ` T@ f
0x071b94…071d28 Dummy {f00=0x0024, f01=0x0190, f02=» > @ IDENT T:DUPL T,REL=11.0,810128,870137141100 T:DUPL T:DUPX F T:DUPL ` T:GRFC t I:EVA0 I:ERR2 T:RNOK , ( HB !0 X T:ROK T:DUPX
0x071d28…071ebc Dummy {f00=0x0024, 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
0x071ebc…072050 Dummy {f00=0x0024, f01=0x4186, f02=» > @ IDENT T:GETC T,REL=11.0,810128,870137141100 T:GETC F T:GETC X T:GRFC l I:ER14 ~ I:EVA0 , ( @ 2' I:ERR2 I:RT1 , ( " P # P
0x072050…0721e4 Dummy {f00=0x0024, f01=0x415a, f02=» > @ IDENT T:GETA T,REL=11.0,810128,870137141100 T:GETA F T:GETA X T:GRFC l I:EVA0 ~ I:ERR2 , ( H ! P # P X T:RNOK T:ROK T:RCR ( $
0x0721e4…072378 Dummy {f00=0x0024, f01=0x413a, f02=» > @ IDENT T:TSTC T,REL=11.0,810128,870137141100 T:TSTC F T:TSTC X T:GRFC l , ( @ X " 9b! X :c 2" ~ I:ER14 T:RTES , ( H @ ;
0x072378…07250c Dummy {f00=0x0024, f01=0x0190, f02=» > @ IDENT T:TFWD T,REL=11.0,810128,870137141100 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
0x07250c…0726a0 Dummy {f00=0x0024, f01=0x4132, f02=» Y ( Y 09H Y * T:TABE * & = Y 4 Y 2 Y 69h Q X :h Y 0 2 T:SCR2 ` T:TABC r , ( [ W U X Q W Y 0 T:TABN w 8 4 W W W W W W !W MQ ]W
0x0726a0…072834 (0, 145) Dummy {f00=0x0024, f01=0x018e, f02=» > @ IDENT T:DISP T,REL=11.0,810827,870137141100 T:PRIN T:DISP T:ERAS F T:PRIN h T:GDSP | T:DS15 T:DSM T:EDWI T:GRFC , ( D T
0x072834…0729c8 Dummy {f00=0x0024, f01=0x0190, f02=» I:ER15 , ( 3H X 0T X 2Z X , ( M +" X *9h P R Y ?_ P R F I:ER14 v , ( m P R Y +W Y T:TABD , ( + W T R W * & Q
0x0729c8…072b5c Dummy {f00=0x0024, f01=0x0190, f02=» j T:RNOK I:RT1 , ( P V L ! X 0 Y , T:SPAC , ( 8 P Y 0 X 0 X 2] X 8 n , ( ; Y 0 : X 0 :H* : X 2 T:EDIO , ( Y T Y 2 : C 1 B ]
0x072b5c…072cf0 Dummy {f00=0x0024, f01=0x403e, f02=» Q P W W P ! H A H YT t ~ (@ : ! X 0 Y , T:SPAC , ( 8 P Y 0 X 0 X 2] X 8 n , ( ; Y 0 : X 0 :H* : X 2 T:EDIO , ( Y T Y 2 : C 1 B ]
0x072cf0…072e84 Dummy {f00=0x0024, f01=0x0190, f02=» > @ IDENT T:GETF T,REL=11.0,810128,870137141100 " T:GETF T:GTIT T:GTIP " F T:GETF " h T:PRDY " | I:ER14 " , ( @ X +! X +! " T:TABC " T:TABN " T:GTIT 4 "
0x072e84…073018 Dummy {f00=0x0024, f01=0x40f2, f02=» Y + " n I:EVA2 # , ( U 4 0 6 # I:ER15 # P I:ERR2 # b , ( q 2 X 0 : ! P # T : # t # 4 U Y k P T # # @ # T:GTIT 4 "
0x073018…0731ac Dummy {f00=0x0024, f01=0x8190, f02=» > @ IDENT T:REWR T,REL=11.0,810128,870137141100 $ . * T:REWR T:SCUW T:CLRD T:IOWR T:CASP $ F T:IOWR $ x T:SCUW $ , ( C ( C : $ T:CLRD * $ T:REWR 0 $ T:PRDY $ ,
0x0731ac…073340 Dummy {f00=0x0024, f01=0xc160, f02=» _ X D D : K $ I:EVA3 % 0 I:EPIC % B , ( } $ + Q 2 P P % T T:LOPS % , ( ( B X # V % I:EVA0 % I:ECPY % I:EVI % , ( :
0x073340…0734d4 (0, 146) Dummy {f00=0x0024, f01=0x0190, f02=» > @ IDENT T:DEDT T,REL=11.0,810827,870137141100 . * T:TABC T:TABD T:TABE T:TABN T:SCR2 F I:EVNO x I:ESKI I:EVA0 I:EBRI I:EBRB I:EBR , (
0x0734d4…073668 Dummy {f00=0x0024, f01=0x0190, f02=» z T:DSL I:RET * T:TABC , : T:TABD 0 N T:TABE 4 b , ( ! W W v , ( 5 X 0Q Y ( Y *P T:EDWI I:EVT I:EDSK ,
0x073668…0737fc Dummy {f00=0x0024, f01=0x0190, f02=»V _` " P T " | T:ENIN T:LOPS . , ( ! P & (W " P Y @ , ( 0] Y (_z P P T p T:EOR T:EDWF , ( " X _@ " P X *# T *W I:ER16 , (
0x0737fc…073990 Dummy {f00=0x0024, f01=0x4152, f02=» . P x T:SCUR , ( _$ 0 C W @ X (T W * T:TABN Z T:RCR n * & { X y 6 Y ( : X (;n 2 ~ H D ! /W 3W ;Q ? 8 C 6 OP Q P PR V PL T Pn Wv P P @ < P T6 P(
0x073990…073b24 Dummy {f00=0x0024, f01=0x0190, f02=» > @ IDENT T:ENLI T,REL=11.0,810827,870137141100 T:DNL T:DSL T:ECW T:EOR F I:EVNO h I:ECPY z I:EPIC I:ETXT I:ETAB I:EBRI I:EBRB I:EBR * &
0x073b24…073cb8 Dummy {f00=0x0024, f01=0x0190, f02=» T I:EXPY . I:RET @ I:ATTR P T:DSL , b T:GRFC t T:DNL : , ( % @ " $ Y . Y ,W , ( ;@ $ Y . X ( X ." P X 0R T , ( @ Y K
0x073cb8…073e4c Dummy {f00=0x0024, f01=0x018e, f02=»:ENL I:ESL , ( *_ ,W . X . X 2Q I:ECTR L , ( Y *T 0 : " P X 0U X * ^ I:ER16 , ( # P P T " T : " T:ENIN T:ECW , ( @ 2 Y
0x073e4c…073fe0 Dummy {f00=0x0024, f01=0x40b4, f02=» f ? ) 0 : H D ! " : # , 9W OPj UR WT eT6 mP( }Q W W QP T2 " , ( P$ U P P T T -T 5T ;W n F @ P T " T : " T:ENIN T:ECW , ( @ 2 Y
0x073fe0…074174 (0, 147) Dummy {f00=0x0024, f01=0x0190, f02=» > @ IDENT T:EINP T,REL=11.0,810827,870137141100 " T:PKI T:PINP T:TKI T:TINP F T:PKI l T:PINP ~ T:GRFC I:ETAB I:EVIN , ( I P & , ( Y *T
0x074174…074308 Dummy {f00=0x0024, f01=0x0190, f02=»Q X &P V D ! P | T:TINP T:TKI 0 * & u $ ! P %_ : B , ( V Y " X .9H $ p , ( P & X ( " Q Y +Q R I:ER16 , ( " P W " U Y , " Q
0x074308…07449c Dummy {f00=0x0024, f01=0x018e, f02=» r , ( G P W X ! X $" P Q X , ( g (# P X # :! R W B T:ENIN r T:ENI , ( "T @ Y (W Y , W I:EXIT , ( Y ( : X *:h X (! # P , (
0x07449c…074630 Dummy {f00=0x0024, f01=0x0190, f02=» f , ( ! ( P Y (_ P T:WRDY 8 * & A P Y 8 & X 8 X $ J , ( _ W _ " P X ( T X & V x , ( } H "@T P V Y X , ( (P X (P
0x074630…0747c4 Dummy {f00=0x0024, f01=0x0190, f02=» H 8 V Y 8 : " , ( P X & V ( P : : , , ( 5 "0P $ T W %T : , ( U : Y ( X $ Y X " Y X & Y , ( u X < Y > : Y : X : , ( X ( T X & V H
0x0747c4…074958 Dummy {f00=0x0024, f01=0x4142, f02=» H D ! P W U Q R P" P PD W )Pt /Pn 5P ;P G KP< H D ! O X QWZ aP< cQ kP2 yR$ {W X T$ W W P Tb W P@ P H D ! T, T X )P 9P* A 0 EP| aWh iP sT TF 0 P6 P @ < A P P V T P %P
0x074958…074aec Dummy {f00=0x0024, f01=0x0190, f02=» > @ IDENT T:ENIN T,REL=11.0,810128,870137141100 4 T:ENIN T:ENI T:EVOU 4 F T:ENIN 4 f T:ENI 4 z , ( X Y " X Y $ X Y & X >W X 4 T:LOFS 4 , ( ! < Y = " 4 I:EGTB
0x074aec…074c80 Dummy {f00=0x0024, f01=0x0190, f02=» X (P 4 n T:WRDY 5 , ( W X & V D ! P @ W X 5 , ( W Y ( : X , Y X $ Y 5 P , ( X &T Y Y Y W V $ 5 , ( :H D Y D :H Y ! P V 5 I:EVA0 5 I:EVA1 5 , (
0x074c80…074e14 (0, 148) Dummy {f00=0x0025, f01=0x411a, f02=» 5 , ( Q : 2' " P T 6 I:EVA3 6 8 I:EPIC 6 J , ( mD W : N : 6 H D ! W CT IW SP a mT" }T W4 W, P W" P W W T WD 6 ( $ P W )P /W A X aP gT qW 6
0x074e14…074fa8 Dummy {f00=0x0025, f01=0x415c, f02=» > @ IDENT T:SETC T,REL=11.0,810128,870137141100 7 T:SETC T:SCUR 7 F T:SETC 7 ` T:PRDY 7 t T:GRFC 7 T:EDWI 7 T:RCTS 7 , ( H C 7 T:SCUR 7 T:WRD
0x074fa8…07513c Dummy {f00=0x0025, f01=0x40e2, f02=» > @ IDENT T:CLMI T,REL=11.0,810128,870137141100 8 T:CLMI 8 F T:CLMI 8 X , ( "0P ' Q W ' 8 l ! Y : 8 P Q W 8 ( 8 @ 8 A2,0 PCLRM20 EQU * P SCR
0x07513c…0752d0 Dummy {f00=0x0025, f01=0x0190, f02=» > @ IDENT T:ATTF T,REL=11.0,810827,870137141100 J F " T:ATTF T:DETF T:ROK T:RNOK T:RCR T:RCTS T:RTES T:GRFC T:WRDY F . * T:PRKB T:PRDY T:ADDY T:SPAC T:CHBU T:DETF T:ATTF I:EVA6 I:FFS
0x0752d0…075464 Dummy {f00=0x0025, f01=0x0190, f02=»TES : , ( Y Y Y < V E B T:RNOK < > T:GRFC @ R T:WRDY H f T:EDIO z * & ; X _ v : C C T:SPAC T:CHBU n , ( Y : H C : +
0x075464…0755f8 Dummy {f00=0x0025, f01=0x40b0, f02=» W @ X B ; [ T:DS15 0 T:DSM B ( $ Z : : R ` W @ _ n W ~ @ T:SPAC T:CHBU n , ( Y : H C : +
0x0755f8…07578c Dummy {f00=0x0025, f01=0x0190, f02=» > @ IDENT T:LSEG T,REL=11.0,810128,870137141100 < & " T:LOFS T:LOPS T:LSEG T:CSEG < F T:LSEG < p T:CSEG < , ( ( R : V E V D ' < I:ER1C < , ( ! $ W P <
0x07578c…075920 Dummy {f00=0x0025, f01=0x402c, f02=»R ;P OW YP < d = @ = (10128,870137141100 < & " T:LOFS T:LOPS T:LSEG T:CSEG < F T:LSEG < p T:CSEG < , ( ( R : V E V D ' < I:ER1C < , ( ! $ W P <
0x075920…075ab4 (0, 149) Dummy {f00=0x0025, f01=0x4146, f02=» > @ IDENT T:DC00 T,REL=11.0,810128,870137141100 > DCREAD DCWRTE DCEXCH > F T:FDS0 > h DCREAD > z T:DCR1 > DCWRTE > T:DCW1 > DCEXCH > T:DCE1 > , ( I$
0x075ab4…075c48 Dummy {f00=0x0025, f01=0x40aa, f02=» > @ IDENT T:SWI0 T,REL=11.0,810128,870137141100 ? SWITCH ? F T:SWIT ? X SWITCH ? j @ ? ~ ? @ ? ~ . P* CREDIT ASSEMBLER SUBROUTINE ENTRIES * . P*
0x075c48…075ddc Dummy {f00=0x0025, f01=0x40da, f02=» > @ IDENT T:TEI0 T,REL=11.0,810128,870137141100 @ TESTIO ABORT @ F T:TEST @ ^ TESTIO @ p T:ABOR @ ABORT @ H @ @ @ @ . P*
0x075ddc…075f70 Dummy {f00=0x0025, f01=0x40de, f02=» > @ IDENT T:CLO0 T,REL=11.0,810128,870137141100 A SETTIM GETTIM A F T:SETT A ` SETTIM A r T:GETT A GETTIM A H A A @ A . P*
0x075f70…076104 Dummy {f00=0x0025, f01=0x40a6, f02=» > @ IDENT T:DEL0 T,REL=11.0,810128,870137141100 B DELAY B F T:DELA B V DELAY B h @ B z B @ B * ~ . P* CREDIT ASSEMBLER SUBROUTINE ENTRIES * . P*
0x076104…076298 Dummy {f00=0x0025, f01=0x40aa, f02=» > @ IDENT T:GTI0 T,REL=11.0,810128,870137141100 C GETTID C F T:GETI C X GETTID C j @ C ~ C @ C ~ . P* CREDIT ASSEMBLER SUBROUTINE ENTRIES * . P*
0x076298…07642c Dummy {f00=0x0025, f01=0x0190, f02=» > @ IDENT T:DC T,REL=11.0,810128,870137141100 D 6 2 T:DCRE T:DCR1 T:DCWR T:DCW1 T:DCEX T:DCE1 D F T:DCRE D T:GDSP D T:DCR1 D T:DCWR D T:DCW1 D T:EDIO D , ( @@ /
0x07642c…0765c0 Dummy {f00=0x0025, f01=0x416e, f02=» 6 D * & 5 / "!@P E I:EVA0 E 8 , ( O ' / #0T E J , ( i C #0T C E z , ( #0 T ' P &R &P C E * & #0 T & C : W E
0x0765c0…076754 (0, 150) Dummy {f00=0x0025, f01=0x40b6, f02=» > @ IDENT T:SWI T,REL=11.0,810128,870137141100 F T:SWIT F F T:SWIT F X I:RT1 F l ( F | F @ F E LEVEL P* PT:SWIT EQU * P LDK A7,0 " P SU PP,CSB,TCA GET
0x076754…0768e8 Dummy {f00=0x0025, f01=0x018c, f02=» > @ IDENT T:TEI T,REL=11.0,810128,870137141100 G T:TEST T:ABOR G F T:TEST G ` T:GDSP G t T:DSR G I:RT1 G , ( @ "Q V I G T:ABOR G , (
0x0768e8…076a7c Dummy {f00=0x0025, f01=0x4008, f02=»@ H IDENT T:TEI T,REL=11.0,810128,870137141100 G T:TEST T:ABOR G F T:TEST G ` T:GDSP G t T:DSR G I:RT1 G , ( @ "Q V I G T:ABOR G , (
0x076a7c…076c10 Dummy {f00=0x0025, f01=0x0190, f02=» > @ IDENT T:CLO T,REL=11.0,810128,870137141100 I & " T:SETT T:GETT T:SETD T:GETD I F T:SETT I p I:EVA0 I I:RT1 I T:GETT I , ( @ ( I T:SETD 6 I , ( @
0x076c10…076da4 Dummy {f00=0x0025, f01=0x4070, f02=»T : I I:ERR J e J " T # T ? T YR ]T J : j J Z@ J l T:SETT I p I:EVA0 I I:RT1 I T:GETT I , ( @ ( I T:SETD 6 I , ( @
0x076da4…076f38 Dummy {f00=0x0025, f01=0x410e, f02=» > @ IDENT T:DEL T,REL=11.0,810128,870137141100 K T:DELA K F T:DELA K X I:EVA0 K l I:ERR K ~ , ( @ #0 P ( K I:RT1 K K P K $ K @
0x076f38…0770cc Dummy {f00=0x0025, f01=0x4124, f02=» > @ IDENT T:MSK0 T,REL=11.0,810128,870137141100 L MASK L F MASK L V I:EVA0 L h , ( @ #0 T #0 T V L z I:RT1 L L I:ERR L # L T T L
0x0770cc…077260 Dummy {f00=0x0025, f01=0x0190, f02=» > @ IDENT T:SCD T,REL=11.0,810224,870137141100 T:ACTV T:PAUS T:RSTR F T:ACTV h , ( 2 ;BP P J | P:BAS I:ERR4 , ( ! T ( I:NTPB
0x077260…0773f4 (0, 151) Dummy {f00=0x0025, f01=0x40ac, f02=» W & F : ( I:RT1 * ( $ w W V V I : , ( P P4 %T 1 ^ EW6 O ^ ]W {W V f @ P:BAS I:ERR4 , ( ! T ( I:NTPB
0x0773f4…077588 Dummy {f00=0x0025, f01=0x0190, f02=» > @ IDENT T:USE T,REL=11.0,810224,870137141100 T:USE T:UERR T:UER F T:USE d I:ERR4 v , ( 2 & >A >A 2 I:EVA0 , ( $ & V D 9a 9 P:MTAB
0x077588…07771c Dummy {f00=0x0025, f01=0x0190, f02=»( l , ( _ X @ 9 X ( , ( R 9 8 ? < , ( X Q , V ( l , ( R - 4T V 5 , ( ( R W V P W U T:UERR X
0x07771c…0778b0 Dummy {f00=0x0025, f01=0x4070, f02=»W MT S X [R _V gP }R R< V R Q" Rf T 'R< )W, /P& 3W$ MT B j Z@ l X Q , V ( l , ( R - 4T V 5 , ( ( R W V P W U T:UERR X
0x0778b0…077a44 Dummy {f00=0x0025, f01=0x0190, f02=» > @ IDENT T:UNUS T,REL=11.0,810224,870137141100 T:UNUS F T:UNUS X I:ERR4 l , ( 2 ' >A >A 2 ~ P:MTAB * & $ V L ;a ; R @ , ( = ( 8 ?
0x077a44…077bd8 Dummy {f00=0x0025, f01=0x4042, f02=» 9RF SQ0 ,@ > T:UNUS F T:UNUS X I:ERR4 l , ( 2 ' >A >A 2 ~ P:MTAB * & $ V L ;a ; R @ , ( = ( 8 ?
0x077bd8…077d6c Dummy {f00=0x0025, f01=0x4096, f02=» > @ IDENT T:EXIT T,REL=11.0,810128,870137141100 T T:EXIT T F T:EXIT T X ( T l T @ T KM P DATA 3 P* P END @ LDKL A6,-1 P ABL T:UERR END @ P ADR
0x077d6c…077f00 Dummy {f00=0x0025, f01=0x413a, f02=» > @ IDENT T:GTCW T,REL=11.0,810128,870137141100 U GETCW U F T:GDSP U V GETCW U h I:EVA0 U z T:BINB U * & H V 0V B B U T:GTCW U I:RT1 U W
0x077f00…078094 (0, 152) Dummy {f00=0x0026, f01=0x4128, f02=» > @ IDENT T:GTID T,REL=11.0,810128,870137141100 V T:GETI V F T:GETI V X I:EVA0 V l , ( @ #0T R W T V G 9h V ~ I:RT1 V I:ERR V ' W V T R W T '
0x078094…078228 Dummy {f00=0x0026, f01=0x0190, f02=» > @ IDENT T:DMR T,REL=11.0,810128,870137141100 & " T:DREA T:IREA T:XREA T:IXID F T:DREA p T:REAX T:OPCH T:SCW2 T:IO2 T:IREA * & $
0x078228…0783bc Dummy {f00=0x0026, f01=0x4034, f02=»:K : ( 4 @ 0
0x0783bc…078550 Dummy {f00=0x0026, f01=0x0190, f02=» > @ IDENT T:DMW T,REL=11.0,810128,870137141100 > : T:SWRI T:DWRI T:IWRI T:XWRI T:DREW T:CREW T:IREW F T:SWRI T:WRIX T:STCH T:IO1 T:XWRI T:DWRI , (
0x078550…0786e4 Dummy {f00=0x0026, f01=0x4106, f02=» p T:IWRI < T:IXCH $ , ( 1 $ / _ / 6 T:CREW N f T:IREW z * & KB / c W( p @
0x0786e4…078878 Dummy {f00=0x0026, f01=0x0190, f02=» > @ IDENT T:DCC T,REL=11.0,810128,870137141100 _ F B T:COPE T:COP1 T:CCLO T:CCL1 T:CCL2 T:ACON T:ACO1 T:ACO2 _ F F B T:ACO3 T:PCON T:PCO1 T:PCO2 T:DISC T:DIS1 T:DIS2 T:DIS3 _ T:DIS4 T:OPT _ T:COPE _
0x078878…078a0c Dummy {f00=0x0026, f01=0x018e, f02=» T:CCLO " _ T:CCL1 & ` T:CCL2 * ` & , ( W W /" C ` : T:ACON P ` j T:ACO1 T ` ~ , ( 7 C C P P _2 W ` T:ACO2 X ` T:ACO3 ` T:PCON f ` T:PCO1
0x078a0c…078ba0 Dummy {f00=0x0026, f01=0x0190, f02=» T:DIS3 a T:DIS4 a , ( s /'W W W W W a , T:STCW a , ( // C C C P P a n * & C P P a T:OPT a I:EVA0 a &<H
0x078ba0…078d34 (0, 153) Dummy {f00=0x0026, f01=0x400c, f02=» a @ b 3 a T:DIS4 a , ( s /'W W W W W a , T:STCW a , ( // C C C P P a n * & C P P a T:OPT a I:EVA0 a &<H
0x078d34…078ec8 Dummy {f00=0x0026, f01=0x0190, f02=» > @ IDENT T:DCR T,REL=11.0,810128,870137141100 c & " T:RECE T:REC1 T:AREC T:ARE1 c F T:RECE c p T:REC1 c T:REAX c T:OPT c T:IO2 c , ( W C C P c T:AREC c
0x078ec8…07905c Dummy {f00=0x0026, f01=0x403a, f02=» c v W P #W 3P d D d $@ d 61100 c & " T:RECE T:REC1 T:AREC T:ARE1 c F T:RECE c p T:REC1 c T:REAX c T:OPT c T:IO2 c , ( W C C P c T:AREC c
0x07905c…0791f0 Dummy {f00=0x0026, f01=0x0190, f02=» > @ IDENT T:DCS T,REL=11.0,810128,870137141100 e & " T:SEND T:SEN1 T:ASEN T:ASE1 e F T:SEND e p T:SEN1 e T:WRIX e T:OPT e * & W / C C P e T:IO1 e T:ASEN " e
0x0791f0…079384 Dummy {f00=0x0026, f01=0x403e, f02=» _* e t W P %W 7P f H f (@ f :
0x079384…079518 Dummy {f00=0x0026, f01=0x40f8, f02=» > @ IDENT T:LEN T,REL=11.0,810128,870137141100 t GETLEN t F GETLEN t X I:EVA0 t l I:ERR2 t ~ I:RT1 t * & B #03 1 t t t @ t TO RETURNITEM
0x079518…0796ac Dummy {f00=0x0026, f01=0x0190, f02=» > @ IDENT T:ADIT T,REL=11.0,810128,870137141100 u & " T:RREA T:RRE1 T:RWRI T:RWR1 u F T:RREA u p T:DSB u T:RRE1 u I:EVA0 u , ( A #0 T &R u T:STCW u T:IO2 u
0x0796ac…079840 Dummy {f00=0x0026, f01=0x407e, f02=»#0T C u t I:ERR v Q : W v $ @ T@ R@ 5 @ GT WW v D ^ v h@ v z
0x079840…0799d4 (0, 154) Dummy {f00=0x0026, f01=0x0190, f02=» > @ IDENT T:KIA T,REL=11.0,810128,870137141100 w T:KIA T:NKIA w F T:KIA w ^ T:NKIA w p T:ABUF w , ( W P 6 V :a L w T:KIPR w , ( Q ' ( ( w
0x0799d4…079b68 Dummy {f00=0x0026, f01=0x0190, f02=» 6 K w , ( u V K V V K V K x , ( V 6V ( - _ : J 7 x P , ( J V W J :A x * & V 6V $ - _ * + : x , ( D T E D :A D ;A x
0x079b68…079cfc Dummy {f00=0x0026, f01=0x410a, f02=» I @P _ W *) + : x , ( g $: R P $ : D V D y 0 ( $ V ( < C C _, y ` H D !L W PZ !QJ % p 7 < ST WP c V V T> Q U 3 d AP y IP QW mR oP y y @ y
0x079cfc…079e90 Dummy {f00=0x0026, f01=0x4098, f02=» > @ IDENT T:ABUF T,REL=11.0,810128,870137141100 z T:ABUF z F M z X T:ABUF z n z @ z IN T:ABUF f & !T:ABUF RES SIZE KIA/NKIA SAVEAREA P EJECT T:ABUF END @
0x079e90…07a024 Dummy {f00=0x0026, f01=0x0190, f02=» > @ IDENT WRITEL T,REL=11.0,810128,870137141100 { WRITEL { F WRITEL { X T:FDS0 { l T:DS25 { ~ T:DSM { I:EVA0 { , ( I / #0T { , ( C #0 T &R
0x07a024…07a1b8 Dummy {f00=0x0026, f01=0x4026, f02=» ET SW { | Z | @ | "11.0,810128,870137141100 { WRITEL { F WRITEL { X T:FDS0 { l T:DS25 { ~ T:DSM { I:EVA0 { , ( I / #0T { , ( C #0 T &R
0x07a1b8…07a34c Dummy {f00=0x0026, f01=0x0190, f02=» > @ IDENT I:EVA T,REL=11.0,810910,870137141100 J F " I:EVA0 I:EVA1 I:EVA2 I:EVA3 I:EVA5 I:EVA6 I:EVA7 I:EVB I:EVI F I:FML I:FML2 I:EVTO P:MTAB , ( :l:d:h I:EVA2
0x07a34c…07a4e0 Dummy {f00=0x0026, f01=0x018e, f02=» 6 2 n , ( 9 # W @ $ E " T ; [ , ( W # :H 2 T Z L > , ( @ w L D V W # n , ( L D V $ W D V I:EVA0 , ( @ L , W 6 2 W "
0x07a4e0…07a674 (0, 155) Dummy {f00=0x0026, f01=0x0190, f02=» , ( Z Z , ( 3 : R ; 8 I:ERR9 h , ( S 6 : F _v z , ( s :B , (V ; H [ [ , ( [ Z (;A
0x07a674…07a808 Dummy {f00=0x0026, f01=0x0190, f02=» Z L # & | , ( @ & Z 4 , ( ' : Z 4 " 2@ L , ( G P : [ [ | I:ER22 * & g & @ $ ! P Z , ( [ 6 [ Z
0x07a808…07a99c Dummy {f00=0x0026, f01=0x0190, f02=» # :A r I:EVTO , ( ( @ & " P ! P [ :;H & , ( 2 ;h R # # XR : ; V V I:EVI & I:EVB 8 , ( Y : 2! : 6 2 , ( @ = W " # ;b "
0x07a99c…07ab30 Dummy {f00=0x0026, f01=0x404e, f02=» Wv V R WH # GP P P R AW& | r 8@ J & , ( 2 ;h R # # XR : ; V V I:EVI & I:EVB 8 , ( Y : 2! : 6 2 , ( @ = W " # ;b "
0x07ab30…07acc4 Dummy {f00=0x0026, f01=0x018e, f02=» > @ IDENT I:ADS T,REL=11.0,810128,870137141100 I:ADD I:SUB F I:ADD I:SUB n I:ERR2 I:ERR1 * & @ W # , ( " T & T + : * I:C
0x07acc4…07ae58 Dummy {f00=0x0026, f01=0x0190, f02=» , ( ! X # P 4 V W , ( Q P [ " X $ P T 4 , ( R R ` ; <( d , ( Q P # W " <! =# T W = Z , ( P _ V ^< `_@ , ( ) R Q <# =_
0x07ae58…07afec Dummy {f00=0x0026, f01=0x4056, f02=» W T6 W P )R +Q 7P h AP GU KP QT $ l @@ R T 4 , ( R R ` ; <( d , ( Q P # W " <! =# T W = Z , ( P _ V ^< `_@ , ( ) R Q <# =_
0x07afec…07b180 Dummy {f00=0x0026, f01=0x4184, f02=» > @ IDENT I:CMP T,REL=11.0,810128,870137141100 I:CMP F I:CMP V I:ERR1 h , ( #0 P " T * & z , ( : * & !`P :J +_ +Q I:CPA , ( ? _0
0x07b180…07b314 (0, 156) Dummy {f00=0x0027, f01=0x4172, f02=» > @ IDENT I:CPA T,REL=11.0,810128,870137141100 I:CPA F I:CPA V * & R W h , ( ( V W Q P W ! W V , ( ? P , V W Q P W $ W V * & _ P
0x07b314…07b4a8 Dummy {f00=0x0027, f01=0x0190, f02=» > @ IDENT I:MOV T,REL=11.0,810910,870137141100 " I:MOV I:MVC I:MBTD I:MDTB F I:MOV l I:MVC ~ , ( $0#0;b P P P , ( ! 0 - P _ 4 , ( A V W Q P )
0x07b4a8…07b63c Dummy {f00=0x0027, f01=0x0190, f02=» , ( # ; [ I:MDTB 4 , ( _ ' d V W V H , ( 4! P < S S S X x , ( 4 9d * & ! R + : , ( ! V W R 4 0R Y , (
0x07b63c…07b7d0 Dummy {f00=0x0027, f01=0x4174, f02=» P & T 9d z , ( ! T 7 V Y " W , ( Q V V 7 Y J , ( P _& & Q 9d! )0 + P 7 Y z Z $ _ : H D ! ~ P Pd P /PN IQ KP SP YP _P qP wT
0x07b7d0…07b964 Dummy {f00=0x0027, f01=0x4140, f02=» > @ IDENT I:MMOV T,REL=11.0,810128,870137141100 I:MMOV F I:MMOV X I:EVA2 l , ( 2' ~ I:EVA0 , ( [ [ Z I:MOV & " =
0x07b964…07baf8 Dummy {f00=0x0027, f01=0x018e, f02=» > @ IDENT I:MUL T,REL=11.0,810128,870137141100 I:MUL I:SH1L F I:MUL ^ I:ERR2 p I:ERR1 , ( V ) 0 !0 , ( " T *V &V : V , ( = S W P
0x07baf8…07bc8c Dummy {f00=0x0027, 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
0x07bc8c…07be20 Dummy {f00=0x0027, 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
0x07be20…07bfb4 (0, 157) Dummy {f00=0x0027, f01=0x018e, f02=» > @ IDENT I:DIV T,REL=11.0,810128,870137141100 I:DIV I:SH1R F I:DIV ^ I:ERR2 p I:ERR1 , ( 0 !0 " T , ( *V &V P = , ( ; ;@
0x07bfb4…07c148 Dummy {f00=0x0027, f01=0x0190, f02=» , ( V & 6 , ( [ [ [ [ $ 8 I:MOV I:NTFA h , ( [ [ &! P I:SUB , ( , ( z " ! !
0x07c148…07c2dc Dummy {f00=0x0027, f01=0x018e, f02=» r e P _ , ( i T { [ [ Q [ & I:ADD V , ( P { R [ _ f , ( Z ! Z $ * & P Z %_N [ Q * & R
0x07c2dc…07c470 Dummy {f00=0x0027, 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
0x07c470…07c604 Dummy {f00=0x0027, f01=0x40da, f02=» > @ IDENT I:NTF T,REL=11.0,810128,870137141100 I:NTFA F I:NTFA X , ( Z H D & H l $ ! D % [ ( 8 @ P ABR* WK2 P P END ,PS
0x07c604…07c798 Dummy {f00=0x0027, f01=0x0190, f02=» > @ IDENT I:EDT T,REL=11.0,810827,870137141100 F B I:EDT I:EDW I:ED1 I:EDSK I:EVT I:ETAB I:EXIT I:ETXT I:ECPY F F B I:ECTR I:ESL I:ENL I:ENL1 I:EOR I:ECW I:ECWC I:EFIL I:EFLA * & I:SCB I:FFSN I:EXPY I:RET I:ATTR , (
0x07c798…07c92c Dummy {f00=0x0027, f01=0x0190, f02=»:EVA2 I:EVA5 I:EVB I:EGTB 0 I:EVI B I:EVA3 R I:EVA0 d * & AUT v I:EVNO I:EPIC I:ESKI I:EBRI I:EBRB I:EBR
0x07c92c…07cac0 Dummy {f00=0x0027, f01=0x0190, f02=» I:EDSK ~ , ( { 6 K K I:EDT D I:ED1 V I:EDW h , ( K K V K : z I:EVA6 , ( R B " V , ( V Z P
0x07cac0…07cc54 (0, 158) Dummy {f00=0x0027, f01=0x0190, f02=» T:LSEG , ( 7 _Z Z [ Z P I:ERR9 B , ( W@ $ [ V T I:RET ~ I:EXIT P:MTAB , ( u@ & 7_ W Z , ( B @ " (! P $ Z
0x07cc54…07cde8 Dummy {f00=0x0027, f01=0x018e, f02=» * p I:ETAB , ( @ * : R J P v I < : $ I:ECPY T , ( J Q : h I:ETXT 4 I:EXPY 4 I:ATTR F I:ECTR H , ( ) P 4 ! T _ P
0x07cde8…07cf7c Dummy {f00=0x0027, f01=0x0190, f02=» T:EDWF I:ECW | T:EDWE ( * & i W _& X ,W X & : I:ECWC h I:EFIL | I:SCB I:ERRD , ( . J K : V : J T @ 0 1 H D ! U
0x07cf7c…07d110 Dummy {f00=0x0027, f01=0x4066, f02=» L D @ ` Qz )Pp 1Tj ?PZ EWV O QWJ U X WW _ r c n mW. {W V T P@ b
0x07d110…07d2a4 Dummy {f00=0x0027, f01=0x0190, f02=» > @ IDENT I:EDTE T,REL=11.0,810128,870137141100 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 , ( @
0x07d2a4…07d438 Dummy {f00=0x0027, 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 &
0x07d438…07d5cc Dummy {f00=0x0027, f01=0x4008, f02=»@ P @ @ X
0x07d5cc…07d760 Dummy {f00=0x0027, f01=0x40ea, f02=» > @ IDENT I:EDS T,REL=11.0,810128,870137141100 I:EDS F I:EDS V I:EVS2 h I:ED1 z , ( : { : & @ P2E,OP1E END OF MAIN STRING
0x07d760…07d8f4 (0, 159) Dummy {f00=0x0027, f01=0x0190, f02=» > @ IDENT I:STR T,REL=11.0,810128,870137141100 $ I:INS I:DLT I:MCH I:CPY I:XCP F I:DLT n I:EVS1 , ( @ $0T P 9 I:MCH " * & _ $0T [ , ( ;
0x07d8f4…07da88 Dummy {f00=0x0027, 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 ,
0x07da88…07dc1c Dummy {f00=0x0027, 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 ,
0x07dc1c…07ddb0 Dummy {f00=0x0027, f01=0x0190, f02=» > @ IDENT I:EVS T,REL=11.0,810128,870137141100 I:EVS1 I:EVS2 F I:EVA0 ` , ( @ #03 T jP r , ( kT T : & 9! " : $ , ( = : T W V 9! , ( ]
0x07ddb0…07df44 Dummy {f00=0x0027, f01=0x408a, f02=»2 I:ERR _^ W !W 0 , T )T GT KW eQ< qQ4 }Q$ T W W @ t@ #03 T jP r , ( kT T : & 9! " : $ , ( = : T W V 9! , ( ]
0x07df44…07e0d8 Dummy {f00=0x0027, f01=0x0190, f02=» > @ IDENT STRIX T,REL=11.0,810128,870137141100 STRIX STROUX USRFMT F I:EVNO f I:ESKI x I:EVA0 I:EBRI I:EBRB I:EBR , ( I:ECW
0x07e0d8…07e26c Dummy {f00=0x0027, f01=0x0190, f02=» STRIN2 USRFLD STROUX . , STRIX 2 @ USRFMT 6 R , ( # W W f T:GRFC T:STEV , ( 7! Y * & Y + , ( Q 8 & Y 0 4 y 4
0x07e26c…07e400 Dummy {f00=0x0027, f01=0x0190, f02=»VT I:EDSK * & " $ X <' X X I:RT1 J I:EVIN Z , ( & x 4 X 2P y 6 ( l T:EVOU , ( HH * , , , , ( X +! Q P P P y 4 x 4 X
0x07e400…07e594 (0, 160) Dummy {f00=0x0028, f01=0x4022, f02=» R$ ` B @ " $ X <' X X I:RT1 J I:EVIN Z , ( & x 4 X 2P y 6 ( l T:EVOU , ( HH * , , , , ( X +! Q P P P y 4 x 4 X
0x07e594…07e728 Dummy {f00=0x0028, f01=0x0190, f02=» > @ IDENT STRIN2 T,REL=11.0,810128,870137141100 STRIN2 F STRIN2 X , ( X x & Y " X R W l I:EXIT , ( ! V P _ y 6 : Y I:EVA0 I:ER17 T:C
0x07e728…07e8bc Dummy {f00=0x0028, f01=0x0190, f02=» [ }T 0W 3R V : %W " P , ( @ X $ X " R W V & , ( R W V % _ [ V I:MOV , ( " D $ D Z P T:GRFC , ( Z % z " * { X $ X
0x07e8bc…07ea50 Dummy {f00=0x0028, f01=0x4012, f02=» @ V : %W " P , ( @ X $ X " R W V & , ( R W V % _ [ V I:MOV , ( " D $ D Z P T:GRFC , ( Z % z " * { X $ X
0x07ea50…07ebe4 Dummy {f00=0x0028, f01=0x018e, f02=» > @ IDENT STROU2 T,REL=11.0,810128,870137141100 STROU2 F STROU2 X I:EVA0 l I:ER17 ~ , ( X x & Y " I:ERR2 , ( @!0P ! P ! T <! T , ( ;
0x07ebe4…07ed78 Dummy {f00=0x0028, f01=0x40e4, f02=» I:MOV T:GRFC , ( " P X x 8 y $ & I:EXIT V : y 6 : h @ < PF %P +T 9T$ ?T CW SP ]W eW oP R W V* P @ ! T <! T , ( ;
0x07ed78…07ef0c Dummy {f00=0x0028, f01=0x4094, f02=» > @ IDENT USRFLD T,REL=11.0,810128,870137141100 USRFLD F USRFLD X : l ~@ E P=IDIOT4 * HMES ILLEGAL PARAMETER COMBINATION !!! * HMES FOLLOWING COMBINATIONS ARE VALID: " HMES 1
0x07ef0c…07f0a0 Dummy {f00=0x0028, f01=0x0190, f02=» > @ IDENT I:TRA T,REL=11.0,810128,870137141100 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
0x07f0a0…07f234 (0, 161) Dummy {f00=0x0028, 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
0x07f234…07f3c8 Dummy {f00=0x0028, 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
0x07f3c8…07f55c Dummy {f00=0x0028, 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
0x07f55c…07f6f0 Dummy {f00=0x0028, f01=0x018e, f02=» > @ IDENT I:ERR T,REL=11.0,810128,870137141100 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
0x07f6f0…07f884 Dummy {f00=0x0028, f01=0x0190, f02=» l I:ERR0 I:ERR1 I:ERR2 0 I:ERR3 D I:ERR4 X I:ERR5 l I:ERR6 I:ERR7 , ( W W W W W W W W I:ERR8 I:ERR9 $ I:ERR
0x07f884…07fa18 Dummy {f00=0x0028, f01=0x0190, f02=» W W W W x I:ER10 @ I:ER11 D , I:ER12 H @ I:ER13 L T I:ER14 P h I:ER15 T | I:ER16 X I:ER17 , ( A W W W W W W W W I:ER18 ` I:ER19 d
0x07fa18…07fbac Dummy {f00=0x0028, f01=0x0190, f02=» W W W W W W W W I:ER20 ( I:ER21 < I:ER22 P W !W "W d I:ERR T:DSR , ( V H P H Y I:NTR I:BUF * & ! ** A
0x07fbac…07fd40 Dummy {f00=0x0028, f01=0x0190, f02=» & r , ( U 4 1 _ P:MTAB B , ( "T @ $ % W T @ & % T , ( 3 1 X & I:PRT TC:ERR , ( Q H A @
0x07fd40…07fed4 (0, 162) Dummy {f00=0x0028, f01=0x0190, f02=» OPENED MISSIN x , ( G ENTRY ILLEGAL REQUESTED LENG , ( TH FILE OPENED AS INDEX FILE H , ( FILE OPENED AS STANDARD FILE AR x , ( % ITHM OVERFLOW STACK OVERFLOW E IX OVFL,ARRAY: , ( i ILL INDE
0x07fed4…080068 Dummy {f00=0x0028, f01=0x0190, f02=»LIZATION ILLEGAL INSTRUCTION , ( ADDRESS ILLEGAL FORMAT CODE & , ( NO FIX BUFFER ALLOCATED FIX BU V , ( ) FFER NOT ALLOWED ILLEGAL CONTRO , ( I L CODE ILLEGAL INDEX VALUE FO , ( i RMAT CONDITIONS CHANGED
0x080068…0801fc Dummy {f00=0x0028, f01=0x0190, f02=»/NKIA STACK LE v , ( VELS DISC ERROR; NO REENTER POI , ( NT DSCB NOT AVAILABLE FIXBUFFE F , ( ) R NOT AVAILABLE FILE ORGANIZAT v , ( I ION UNDEFINED SUBSTRINGLENGTH , ( i < 0 SUBSTRING NOT WITHIN MAINS $
0x0801fc…080390 Dummy {f00=0x0028, f01=0x413a, f02=» CWH GWD KW@ OW< SW8 WW4 [W0 _W, cW( gW$ kW oW sW wW {W W H D ! W W W P n R U T %W +T, o H H D ! ! 3 C & i y " ! 9 @ < O e
0x080390…080524 Dummy {f00=0x0028, f01=0x4108, f02=» > @ IDENT I:HEX T,REL=11.0,810128,870137141100 I:HEXB I:HEXW I:HEX F I:HEXB f I:HEXW z I:HEX , ( W 9 " R 0 1 Y ! : W " @
0x080524…0806b8 Dummy {f00=0x0028, f01=0x413c, f02=» > @ IDENT I:CHK T,REL=11.0,810128,870137141100 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 :
0x0806b8…08084c Dummy {f00=0x0028, f01=0x0190, f02=» > @ IDENT TRACHK T,REL=11.0,810128,870137141100 & " TC:CHK TC:ABT TC:ERR TC:RDC F TC:CHK p , ( @ P ( TT:HLT TT:TRP , ( !" _ @ P @ P P V
0x08084c…0809e0 Dummy {f00=0x0028, 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 P:MTAB
0x0809e0…080b74 (0, 163) Dummy {f00=0x0028, f01=0x0190, f02=» TB:ABT TC:RDC TB:RDC $ , ( D @ , ( : @ , ( 6 TC:ERR f TT:MSG z , ( D : A A E A , ( / V A @ " # P ( R , ( I @ , (
0x080b74…080d08 Dummy {f00=0x0028, f01=0x405e, f02=» qP$ u P T P ` ( $ W W P R ?P GR4 oP wR H@ Z 6 TC:ERR f TT:MSG z , ( D : A A E A , ( / V A @ " # P ( R , ( I @ , (
0x080d08…080e9c Dummy {f00=0x0028, f01=0x0190, f02=» > @ IDENT TRATAB T,REL=11.0,810128,870137141100 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 , (
0x080e9c…081030 Dummy {f00=0x0028, f01=0x418a, f02=» j , ( a TT:VON : TT:VER N , ( b , ( TT:VMM @ TT:HLT
0x081030…0811c4 Dummy {f00=0x0028, f01=0x0190, f02=» > @ IDENT TRABUG T,REL=11.0,810409,870137141100 TB:ENT TB:ABT TB:RDC F h P:BAS z , ( , ( , (
0x0811c4…081358 Dummy {f00=0x0028, f01=0x0190, f02=»( ( ( TT:PRC $ TT:SNO 6 , ( i D "! A * @ @ H , ( @ *P ( V x , ( R V W Z T , ( _" = T , (
0x081358…0814ec Dummy {f00=0x0028, 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 , (
0x0814ec…081680 Dummy {f00=0x0028, 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
0x081680…081814 (0, 164) Dummy {f00=0x0029, 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
0x081814…0819a8 Dummy {f00=0x0029, f01=0x0190, f02=» p , ( ; 0 P P P @ , ( [ R _ @ , ( { _T p , ( 8 4 T P W , ( T @R W , ( U
0x0819a8…081b3c Dummy {f00=0x0029, 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
0x081b3c…081cd0 Dummy {f00=0x0029, 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 _
0x081cd0…081e64 Dummy {f00=0x0029, f01=0x0190, f02=» 0 p , ( $ W ! T @ P @ " 1 , ( P w 8 P @ @ @ @ T @ , ( @ @ R A *9l! P p , ( &9d! ) W P &9d , ( & _ & , ( P
0x081e64…081ff8 Dummy {f00=0x0029, f01=0x018e, f02=» S P R % < < ! , ( H s T @ P @ ! 0 , ( D 5 = 8 8P @ ` TT:TRP TT:TRS , ( W $ TT:TON * & @
0x081ff8…08218c Dummy {f00=0x0029, 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 @
0x08218c…082320 Dummy {f00=0x0029, 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 (
0x082320…0824b4 (0, 165) Dummy {f00=0x0029, f01=0x0190, f02=» A l , ( :B A (P _ @ , ( @ @ P @ < , ( V @ Q 1 @ Q Q l , ( +D A " ( R ( @ , ( G$ V @ H ) I " , ( a $
0x0824b4…082648 Dummy {f00=0x0029, 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
0x082648…0827dc Dummy {f00=0x0029, f01=0x0190, f02=»Q L % Q | , ( W , ( C L , ( " _* Q P Q V | , ( ? _ W " A < V , ( _ " F <P
0x0827dc…082970 Dummy {f00=0x0029, 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
0x082970…082b04 Dummy {f00=0x0029, 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 , (
0x082b04…082c98 Dummy {f00=0x0029, 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 "
0x082c98…082e2c Dummy {f00=0x0029, 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 {
0x082e2c…082fc0 Dummy {f00=0x0029, 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
0x082fc0…083154 (0, 166) Dummy {f00=0x0029, 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
0x083154…0832e8 Dummy {f00=0x0029, 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 ] _
0x0832e8…08347c Dummy {f00=0x0029, 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 :
0x08347c…083610 Dummy {f00=0x0029, 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
0x083610…0837a4 Dummy {f00=0x0029, 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
0x0837a4…083938 Dummy {f00=0x0029, f01=0x0190, f02=» > @ IDENT T:DM T,REL=11.0,810827,870137141100 F B T:OPEN T:CLOS T:DCLO T:COMM T:PCOM T:ROLL T:RSTA T:OPCH F T:IXCH T:STCH T:OPEN T:DSB , ( @ 2 2 ! <e T:WRIO
0x083938…083acc Dummy {f00=0x0029, f01=0x0190, f02=» T:DCLO Z T:COMM f I:EVA0 , , ( Y <H _ ( > I:RT1 n T:PCOM ~ T:GTBY * & u@ R ' I:ERR9 , ( & 6
0x083acc…083c60 Dummy {f00=0x0029, f01=0x4168, f02=» T:RSTA T:SCW2 T:IO3 0 , ( _ C / @ T:OPCH p I:ERR3 T:STCH I:ERR6 * & V ,! : V ,!@ T:IXCH I:ERR7
0x083c60…083df4 (0, 167) Dummy {f00=0x0029, f01=0x0190, f02=» > @ IDENT T:DMDI T,REL=11.0,810128,870137141100 T:DDIS T:CDIS T:IDIS F T:DDIS h T:DSB | T:OPCH T:STCH T:SCW2 , ( $ C <H T:IO2 T:C
0x083df4…083f88 Dummy {f00=0x0029, f01=0x4032, f02=» 3$ < @ .870137141100 T:DDIS T:CDIS T:IDIS F T:DDIS h T:DSB | T:OPCH T:STCH T:SCW2 , ( $ C <H T:IO2 T:C
0x083f88…08411c Dummy {f00=0x0029, f01=0x0190, f02=» > @ IDENT T:DMPO T,REL=11.0,810128,870137141100 T:DPOS T:IPOS F T:DPOS ` T:DSB t T:OPCH T:STCH T:SCW2 T:GTBY * & I C T:IO2
0x08411c…0842b0 Dummy {f00=0x0029, f01=0x402a, f02=» _" : @ &,810128,870137141100 T:DPOS T:IPOS F T:DPOS ` T:DSB t T:OPCH T:STCH T:SCW2 T:GTBY * & I C T:IO2
0x0842b0…084444 Dummy {f00=0x0029, f01=0x018e, f02=» > @ IDENT T:IO T,REL=11.0,810803,870137141100 J F " T:WRIT T:READ T:SREA T:KI T:NKI T:EDWR T:DSC0 T:DSC1 T:DSC2 F H D ! T:EDWE T:EDWF T:EDWI T:EDIO T:XSTA T:WAIT T:IO1 T:IO2 T:IO3 D @ T:IO5 T:FDS0 T:FDSP T:GDSP T:KIPR
0x084444…0845d8 Dummy {f00=0x0029, f01=0x0190, f02=» p T:KI T:NKI T:WRIT , T:WRIL @ T:LWRI T , ( W / h T:WRIX " T:WRIO & I:EVA0 , ( ! _ C P <H T:S
0x0845d8…08476c Dummy {f00=0x0029, f01=0x0190, f02=» V C / <H : C T:DSC1 " , ( } C W C 9HR 6 T:DSC2 f , ( ' W 781"&$ 39#$;< '()*+,-! z T:XSTA , ( P _J T:WAIT T:M
0x08476c…084900 Dummy {f00=0x0029, f01=0x0190, f02=» 1 , ( 5 ( ( T:IO1 f X T:IO2 j j T:IO3 n | I:ER19 * & U 0 W : 1W C C " T:IO5 T:IORE , ( s (
0x084900…084a94 (0, 168) Dummy {f00=0x002a, f01=0x018e, f02=»N , ( I B T:EDWR < I:EDW P , ( P B P B 5 : ` T:EDWE T:EDWF , ( @ C C C B T:EDWI I:ERR
0x084a94…084c28 Dummy {f00=0x002a, f01=0x018e, f02=» , ( E ( ' P I : I:EVA7 4 , ( e % Y C F I:ERR5 v * & & C , ( : B T T:FDS0 T:GDSP
0x084c28…084dbc Dummy {f00=0x002a, f01=0x0190, f02=» I:FML I:ER1A , ( #? ;B V D & , ( W ,"? :D;B D V V T:DS15 @ T:DS25 D I:ER1D , ( 1 : _B W "!@ I:ER12 I:E
0x084dbc…084f50 Dummy {f00=0x002a, f01=0x0190, f02=» , ( L C B C : D T:FDSP 8 T:GTBY L , ( : : C : ` T:SCW2 T:DSCX I:EVA2 , ( @ : ,V $ : I:ERR2 ,
0x084f50…0850e4 Dummy {f00=0x002a, f01=0x4180, f02=» ! < V <A Q I : H D !~ W n " f % - 1P G L K j O S _P eV u y H D !V W R W P W W eW P6 j H D ! } P& V W P P P @ P @ H D !8 !
0x0850e4…085278 Dummy {f00=0x002a, f01=0x0190, f02=» > @ IDENT T:CW T,REL=11.0,810615,870137141100 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
0x085278…08540c Dummy {f00=0x002a, f01=0x0190, f02=» X R _ S W T:GTCW I:ERR2 4 * & 4 _T :#0 T B 'W F T:BINB t , ( B B " : , ( P P L , ( R R _ R
0x08540c…0855a0 Dummy {f00=0x002a, f01=0x0190, f02=» R T U x , ( [ :J a B@ ' d w5 1 T:KIAA H T:KIAC T:GCW2 p * & { , ( #0 T B ' : B T:SCW2 , ( B :
0x0855a0…085734 (0, 169) Dummy {f00=0x002a, f01=0x4088, f02=»P YP, aV mR wS yW T W r r @ < PR ^ R R Q %P -P =P MR T P T . r@ { , ( #0 T B ' : B T:SCW2 , ( B :
0x085734…0858c8 Dummy {f00=0x002a, f01=0x0190, f02=» > @ IDENT I:EPIC T,REL=11.0,810625,870137141100 I:EPIC F I:EPIC X I:EVA0 l : + ~ [ [ < , ( ! !AAP !TTT W !**T * [ !FF A
0x0858c8…085a5c Dummy {f00=0x002a, 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
0x085a5c…085bf0 Dummy {f00=0x002a, f01=0x4156, f02=» , ( k ,_ 8 _ :P K _ p 8 8 , ( !++P !-- z ;$# + ^$ _* 4 $ |`. PT*AXYZ9 d H D ! ` %P +T /W 5T AP GT KW OR S P Wv W@ Wn H D ! T& W4 P T W F WH P" U T P
0x085bf0…085d84 Dummy {f00=0x002a, f01=0x0190, f02=» > @ IDENT I:NTP T,REL=11.0,810803,870137141100 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
0x085d84…085f18 Dummy {f00=0x002a, f01=0x0190, f02=»:DLT I:MCH I:XCP I:EDS , , ( / < A l I:TRC N I:RST P T:CSEG I:NTPA T I:NTPB T , ( O V T P T
0x085f18…0860ac Dummy {f00=0x002a, f01=0x0190, f02=» P " P W @ NR I:NTPR . I:CHK B , ( B $ & R I:EVA0 , ( pV 9c D 9a1 P ( I:EVA2 I:RT2 , ( * Q W
0x0860ac…086240 Dummy {f00=0x002a, f01=0x0190, f02=»:TRA0 I:ERR , ( " ]p 0 2 2 P , ( 7 V W _ 2 # ;B V N T:BAT ~ , ( W T 4W V P L , V , ( u 2P " 2 P V D ! R , ( T V P V
0x086240…0863d4 (0, 170) Dummy {f00=0x002a, f01=0x0190, f02=» V 6 V % V E W 2 % , ( ^ 6 E 7_ 2 . T:CAT ^ , ( 1 # P L 8P ( 2# n , ( M &X 3Y $! 2P , ( m R P _ 9BP T _ W , (
0x0863d4…086568 Dummy {f00=0x002a, f01=0x416a, f02=» @ H N n 'W 'W '_8 H D ! & , ! , # @ % ' ) + @ - @ = , H D ! ? A C E G I K M ]P oP P P VV P x H D ! Q W W* P 3P ?W< S YT _W {P P R T P P V|
0x086568…0866fc Dummy {f00=0x002a, f01=0x0190, f02=» > @ IDENT T:REWR T,REL=11.0,810827,870137141100 4 0 T:REWR T:SCUW T:CLRD T:IOWR T:CASP T:SCW F T:IOWR ~ T:SCW T:CHBU , ( C ( C : T:SCUW $ T:CLRD 6
0x0866fc…086890 Dummy {f00=0x002a, f01=0x018e, f02=» T:CASP ^ T:LOFS , ( ] @_^ ( X D * I:EVA3 Z , ( { D : K + Q 2 P P l I:EPIC T:LOPS , ( H ( B I:EVA0 I:E
0x086890…086a24 Dummy {f00=0x002a, f01=0x401a, f02=» @ T:LOFS , ( ] @_^ ( X D * I:EVA3 Z , ( { D : K + Q 2 P P l I:EPIC T:LOPS , ( H ( B I:EVA0 I:E
0x086a24…086bb8 Dummy {f00=0x002a, f01=0x4146, f02=» > @ IDENT T:DCOM T,REL=11.0,810910,870137141100 DCREAD DCWRTE DCEXCH F T:FDS0 h DCREAD z T:DCR1 DCWRTE T:DCW1 DCEXCH T:DCE1 , ( I$
0x086bb8…086d4c Dummy {f00=0x002a, f01=0x8190, f02=» B @ IDENT PRINT REL 11.1 82-07-07 DK 870150541110 PRINT COPP J PRINT ` , ( TT LL GG CC # # # # (@P r OPEN CONCT , ( ! R ( O SETTYM , (
0x086d4c…086ee0 Dummy {f00=0x002a, f01=0x8190, f02=» v , ( N T O N T , ( O : T O W T F , ( O O W T O O : v GETBUF READW , ( P N P RELBUF ,
0x086ee0…087074 (0, 171) Dummy {f00=0x002a, f01=0x8190, f02=» ICSET ICREAD , ( K : ICWRT P , ( g N D P ` COPP ATMASB , ( : O ( : C , ( O N !8 ! =d T
0x087074…087208 Dummy {f00=0x002a, f01=0x8190, f02=»W T t , ( ! R 9AR ! 1 P W # , ( A ! P N _r P D , ( a @ P P N 8 t , ( P @ O : , ( , (
0x087208…08739c Dummy {f00=0x002a, f01=0x818e, f02=» , ( ! O : ! 1 P N !0T 0 RFMDUP 4 , ( A : @ : T : F , ( _ N !010T N !@P P T v , ( W P : , ( T N !010T "@T B P , (
0x08739c…087530 Dummy {f00=0x002a, f01=0x8190, f02=» f , ( P c C O _R 2 , ( ? ( "R ( W ( B 8 , ( _ T C W N " h COMINI , ( 0:B V M : N X _ ECBINI , ( $:H D O
0x087530…0876c4 Dummy {f00=0x002a, f01=0x8190, f02=»" 0:B V M | , ( $ P d( _: : @ %P ( $ P ; @ @ P _ N $ : L H D ! ( ! % +R& U Y x g P( T T T J T < W" T W x H D !h T P < P T !W ? G d uP T Vl R
0x0876c4…087858 Dummy {f00=0x002a, f01=0xc0fa, f02=» ( ( ( H D ! ( B B B B J ^ T6 R P T ^ T H D ! @ /P 7T ST gT oP sP {T W P T T T PX Qn W& d 0 , !P KR WW eT wW P P P 9P GP V @ T Vl R
0x087858…0879ec Dummy {f00=0x002a, f01=0x8190, f02=» > @ IDENT VDU REL 11.0 82-07-07 870150541100 F B INSMOD GETVDU STOVDU SCRINF STOINF POSUNP ATMASB ATMASF F D @ DISCHA WCHAR DISMOD DISID ERASUA ERASE SOUND ERASUP WRAP , ( NLROUT LINWRP LINE LINATT DISSTA
0x0879ec…087b80 Dummy {f00=0x002a, f01=0x8190, f02=» W PR _* | , ( a , ! V X" X( , ( X. X4 Y _> O ! P " P L , ( W W 9 _f PR | , ( _ , ! ^< _ : , ( P R C B (
0x087b80…087d14 (0, 172) Dummy {f00=0x002b, f01=0x8190, f02=» l , ( a : B P 9 Y Y B , ( : T " T P P C < , ( C W T " U N l SAVE1 , ( P O REST1 , ( N !
0x087d14…087ea8 Dummy {f00=0x002b, f01=0x8190, f02=» = ! P W P . O , ( ] O P 0 , ( } P P ` , ( N P _6 , ( P , ( _: P
0x087ea8…08803c Dummy {f00=0x002b, f01=0x8190, f02=» <' : x SCRINF @ STOINF N , SOUND @ , ( = # : N N N : O O O : R , ( ] B + E E C ( WRAP LINWRP LINE , ( } B : R :
0x08803c…0881d0 Dummy {f00=0x002b, f01=0x8190, f02=» : Q X ) Y , ( Q PW P P . NLROUT ( ^ CRDOWN r , ( , ]: : PR P , ( 7 _ P - X Y ERASE Z , ( W _ :
0x0881d0…088364 Dummy {f00=0x002b, f01=0x8190, f02=» j , ( T ZW , ! V _ P , ( B W , ! Z P ! : , ( " - X ) Y , ! ^( - j RDHOME ERASUA , , ( @ X ) Y _ : , ( 5 P T
0x088364…0884f8 Dummy {f00=0x002b, f01=0x8190, f02=» , ( W - _. : U , ( O & ! R ' P O 4 bTAB d , ( U N W r DISID , ( B ! QT : b V , ( . $ P R 4 9 _
0x0884f8…08868c Dummy {f00=0x002b, f01=0x818e, f02=» ! l ATMASB ~ , ( @ s Z N : O & ! V V , ( N P _ N : U P WCHAR , ( P & ! W : , ( ' P ' T W B ] ] , ( O
0x08868c…088820 Dummy {f00=0x002b, f01=0x8190, f02=» f S P_ C ( : H D ! l @ b /T 9T = ERt GT SW YR ] e kV& o P P * H D ! W W R @ ( P P W. P$ WT _ b T v H D !8# W^ P$ @ ~ N P T W W P & #T 'W /P 7 V I
0x088820…0889b4 (0, 173) Dummy {f00=0x002b, f01=0xc0f8, f02=»P iV T T Z H D ! Wj V W P6 ;P2 AT IP` QP YPP {W P" R W U R* P H D !H U ( W T ( P #R aU iP V V P U P W P b 0 , 0 T W ( P T W #T 1T0 MR d @ W /P 7 V I
0x0889b4…088b48 Dummy {f00=0x002b, f01=0x0190, f02=» > @ IDENT DRPL01 REL 11.1 82-08-19 870105041110 F B PLCHRI PLSTBL PLCHRO PLENBL PLDISP PRCHRI PRSTBL PRCHRO F F B PRENBL PRDISP PLTEST CWTPLC GETDWT PLCLOG TIMACT POLRTL F B POLRTR IHPL01 IHPL02 IHPL03 IHPL04 IHP
0x088b48…088cdc Dummy {f00=0x002b, f01=0x0190, f02=» , ( ! , * & A INTPL1 , ( a C K * & SO LO
0x088cdc…088e70 Dummy {f00=0x002b, f01=0x0190, f02=» LO $GR 0 , ( @ A " PLCHRI R PRCHRI f , ( z DWTLD1 DWTST NDSAV8 , ( ? X P R >W > Y
0x088e70…089004 Dummy {f00=0x002b, f01=0x0190, f02=» 4(@ X x NDREPO DWTCHP * , ( @ T X # P < , ( 9@ X T P X ! T l , ( U" R Y Y X Y , ( m T Q T T W Q ^ DWTOTQ
0x089004…089198 Dummy {f00=0x002b, f01=0x0190, f02=» (@ ? X v , ( P T P > T X NDRET F PLENBL V PRENBL j , ( B" T (@ 4 Y > ~ DWTWAT , ( H X P Y X " 2 , ( (@ X
0x089198…08932c Dummy {f00=0x002b, f01=0x0190, f02=» Q U ; U 5 U < P * & U > T T T X , ( $ P W P # P Y N , ( B X " U X ~ DWTLD2 PLTEST IHPL01 IHPL02 IHPL03
0x08932c…0894c0 Dummy {f00=0x002b, f01=0x0190, f02=» IHPR04 INTSAV , ( @ W A T 2 @P P & TDISP V , ( P U " T U f , ( 3 T H U T D&? U " z P , ( Q " T H U , ( o T L
0x0894c0…089654 (0, 174) Dummy {f00=0x0131, f01=0x0190, f02=» h , ( "? T K' T R U " U " FREBLK 8 * & Y J * & " " Y x NDREDW , ( # $ T T R T D , ( ? &? P '? L U "
0x089654…0897e8 Dummy {f00=0x0131, f01=0x0190, f02=» T N Q Q U x , ( " X| U " Y X GETBLK H , ( " Y (@ & Z , ( U B U @ @ U 5 Q U , ( ; U < U > X " P T , ( 1 @T X " P Y
0x0897e8…08997c Dummy {f00=0x0131, f01=0x0190, f02=» l MEXIT , ( R D X _ * ?(@ U U , ( U U <P "_ L , ( <P "_ T | , ( D ^ h h ! R NDGEDN , ( : r ) ) t
0x08997c…089b10 Dummy {f00=0x0131, f01=0x0190, f02=» W d U U U U U 4 , ( u U @ $ T U T 0 , ( U T U 6:A U T T ( ` , ( U B U 4 U @ U > U T , ( T T U U T V U U , ( ! R t
0x089b10…089ca4 Dummy {f00=0x0131, f01=0x0190, f02=» PLDISP N PRDISP N , ( M (@ T P P ( DWTADR X INTADR j , ( i H R X # X 2 D 4 X | PFPOST , ( T Y U (@ , ( B @ 6 @ T
0x089ca4…089e38 Dummy {f00=0x0131, f01=0x0190, f02=» T T h | , ( ; r t , , * & 3 @R X Y X Y L , ( M " P # d X z , ( i _R U , ( X ; r - , - ! T t ,
0x089e38…089fcc Dummy {f00=0x0131, f01=0x0190, f02=» j , ( " X U @ U B X U , ( # > U 4 X T T T T : , ( C U > > > & P - j , ( a X " , ( > > @ 6 @ T , ( T U
0x089fcc…08a160 Dummy {f00=0x0131, f01=0x0190, f02=» > X % =A 8 P , ( T > X :i9eW X :a , ( @9 " > ? P ! X " >W P P , ( 1 @ ! ! Y > X :d" ! , ( M W X :d" ! ! Y > , ( i W Q X "? U 4 X "? Q
0x08a160…08a2f4 (0, 175) Dummy {f00=0x00bd, f01=0x0190, f02=» r > p , ( ! > > > _ Q Q , ( " Q > ? P > > P P @ , ( ! R Q (" W P P V p , ( A Q % W > T NQ T , ( a R L $ T L $ T " P W , (
0x08a2f4…08a488 Dummy {f00=0x00bd, f01=0x0190, f02=» P < % > P ? 0 ] > , ( > ? 1 ] > > ? 0 , ( W ? ;a<a Q ` PLCLOG V $ ? ;A<A ) _ ;A<A ) > > H D ! ^ , 8 D P
0x08a488…08a61c Dummy {f00=0x00bd, f01=0x0190, f02=» E IP& QTd UR c X oTH d H D !E wQ } T( W Q, T X T P, 4 T T T2 H D !h P - /T 9 4 AT ]T cP g h kW o l s N T@ T> l H D ! X T" P W P P X W W P PV P + j MP H D !
0x08a61c…08a7b0 Dummy {f00=0x00bd, f01=0x0190, f02=» { P H D ! X . X X 2 l %P4 ) +T. / 1T, =P H D ! ^ O Y X c k X qT y R P P R> X H D !L R % EP MW U ` T T 2 Tz X Tr U RL 2 H D ! < / 1T 5 X 9T I X
0x08a7b0…08a944 Dummy {f00=0x00bd, f01=0x412a, f02=» y T 2 l P W > P 2 - ;T H D !2 AT [P e s T S T P W -W MW kW P& T T D H D !$ T W Q 'R$ 3W ?V KW ]Q< kT( uT {P W T 4 0 W P W P T P P !W
0x08a944…08aad8 Dummy {f00=0x00bd, f01=0x2008, f02=» L = KMD25 DATE = 81 09 23 1216PACK NBR = 0025
0x08aad8…08ac6c Dummy {f00=0x00bd, f01=0x018e, f02=» X l , ( I *YrP y X " x Y X " T T:BELL < , ( i Y _ _ B U C Q N T:CLR1 ~ T:CLR2 , ( P C D X , ( X * $" ~_> @ Y X * _R X , (
0x08ac6c…08ae00 Dummy {f00=0x00bd, f01=0x0190, f02=» , ( ! @ " X # X * y _< X , ( ? # X * y X 1 1 4 , ( ] X !@T X $ " P y d T:CLIT T:EKEY , ( } @ _ x T X H , ( X X * , )$ P
0x08ae00…08af94 (0, 176) Dummy {f00=0x00be, f01=0x405c, f02=»T {U Q < V P eT uP T P F@ X
0x08af94…08b128 Dummy {f00=0x00be, f01=0x0190, f02=» > @ IDENT T:DYKI P,REL=11.0,810128,870136941100 J F " T:DYKI T:PM1 T:PM2 T:CLR1 T:CLIT T:CLR2 T:IOER T:EKEY T:BELL F T:DYKI T:PRKB T:PRDY I:EVA7 * & H ' Y
0x08b128…08b2bc Dummy {f00=0x00be, f01=0x0190, f02=» X l T:CASP * & y ! T _ y C Q " T T:CLRD L , ( X ! X ^ , ( X ! x Y~ Y _ X "@P B , ( R y C B P 9 V _F9 , ( V X ! T X !@X
0x08b2bc…08b450 Dummy {f00=0x00be, f01=0x0190, f02=» B y " y $ c C T:CLR1 X & T:CLR2 f : T:SCUW N , ( Q _$ _ y _6 ( x X@ X ` , ( qA X # C _. B , ( ]d P C Q X8_H x XD @ Y , ( c C y
0x08b450…08b5e4 Dummy {f00=0x00be, f01=0x0190, f02=» T:IOWR , ( # B P B C : T:CLIT : F , ( ' + X Z T:LOFS I:EVA0 T:LOPS T:CLMI , ( A ( ( T:P
0x08b5e4…08b778 Dummy {f00=0x00be, f01=0x4104, f02=» , ( B Y Y . : & " " $ : 8 H D ! ! n # aTf i mR s J }T Q T Z P R P V b < 8 ` VV T 'P +Q( [ * P Q8 Z P & a j {V P @ T:P
0x08b778…08b90c Dummy {f00=0x00be, f01=0x0190, f02=» > @ IDENT T:UPDF P,REL=11.0,810128,870136941100 T:UPDF F T:UPDF X T:GRFC l T:LOFS ~ I:EVA0 , ( @ 2! Y " T:LOPS I:MOV , ( A
0x08b90c…08baa0 Dummy {f00=0x00be, f01=0x4032, f02=» =T P @ .870136941100 T:UPDF F T:UPDF X T:GRFC l T:LOFS ~ I:EVA0 , ( @ 2! Y " T:LOPS I:MOV , ( A
0x08baa0…08bc34 (0, 177) Dummy {f00=0x00be, f01=0x018e, f02=» > @ IDENT T:DUPL P,REL=11.0,810128,870136941100 T:DUPL T:DUPX F T:DUPL ` T:GRFC t I:EVA0 T:RNOK T:ROK T:DUPX , ( HB X T:LOFS
0x08bc34…08bdc8 Dummy {f00=0x00be, 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
0x08bdc8…08bf5c Dummy {f00=0x00be, f01=0x4140, f02=» > @ IDENT T:GETC P,REL=11.0,810128,870136941100 T:GETC F T:GETC X T:GRFC l I:EVA0 ~ , ( @ 2' R P P X I:RT1 , ( ' ' X _ X ' _ X '? ;
0x08bf5c…08c0f0 Dummy {f00=0x00be, f01=0x4124, f02=» > @ IDENT T:GETA P,REL=11.0,810128,870136941100 T:GETA F T:GETA X T:GRFC l I:EVA0 ~ T:RNOK T:ROK , ( H X ' X ! T:RCR H
0x08c0f0…08c284 Dummy {f00=0x00be, f01=0x410e, f02=» > @ IDENT T:TSTC P,REL=11.0,810128,870136941100 T:TSTC F T:TSTC X T:GRFC l , ( @ X " 9b! X :c 2" ~ T:RTES $ H @ % , 4 @
0x08c284…08c418 Dummy {f00=0x00be, f01=0x0190, f02=» > @ IDENT T:TFWD P,REL=11.0,810128,870136941100 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
0x08c418…08c5ac Dummy {f00=0x00be, f01=0x4132, f02=» Y ( Y 09H Y * T:TABE * & = Y 4 Y 2 Y 69h Q X :h Y 0 2 T:SCR2 ` T:TABC r , ( [ W U X Q W Y 0 T:TABN w 8 4 W W W W W W !W MQ ]W
0x08c5ac…08c740 Dummy {f00=0x00be, f01=0x0190, f02=» > @ IDENT T:DISP P,REL=11.0,810827,870136941100 T:PRIN T:DISP T:ERAS F T:PRIN h T:GDSP | T:DSM T:EDWI T:GRFC , ( D 9H Y T:GTIP T
0x08c740…08c8d4 (0, 178) Dummy {f00=0x00be, f01=0x0190, f02=»" ! ": Z b x { k } N 0 0 ( ( )")H,6.l)n.(. .B) ) .B.B( .B.B( *J.R.B.B( .l.~) .B.B( . . ( )H)X* .l1 ( )H)X, .l( )H,6, -t* * * * ) / / )X.l( )H*J*`*~-.0 /X* * * + + +@+V+l+ + +l*`-.*~( )H)X-R.l/@/X( )H, ( )H, * * ( )H*J*`
0x08c8d4…08ca68 Dummy {f00=0x00be, f01=0x0190, f02=»->*J*`-. * .l- 0 .B0 )H+ + ) )H. * . )X.l. )H. . * / )X) .l)X.l.B)H, .l/j/@)H/ /~) / /X/ / .R/ . .l0 0L0p/X0 0 .B0 - 0 - - - - - . . ( PRINT DEVICE:;SOURCE RESP. DESTINATION DISC:;VOLUME NAME:; VOLUME NAMES:;OLD
0x08ca68…08cbfc Dummy {f00=0x00be, f01=0x0190, f02=»; MAXIMUM NUMBER OF RECORDS:; SECTOR NUMBER:; POSITION:;HEX.VALUE:; FILE ORG:;VOLUME NAME DEST. DISC:;***INPUT DEFINITION***; ***OUTPUT DEFINITION***;PACK:;OUTPUT DEVICE:; LABELLED TAPE:; SEQ. NUMBER INPUT TAPE:;SEQ. NUMBER OUTPUT TAPE:; BLOCK FACTOR INPUT TAPE:;
0x08cbfc…08cd90 Dummy {f00=0x00be, f01=0x0190, f02=»PROGRAM LENGTH:;MONITOR NUMBER:;START SWITCH ON SOP:; MORE THAN ONE APPLICATION :;DATA SET NAME:; BOE-SECTOR:;EOE-SECTOR:;EXPIRATION DATE:; VOLUME INITIALIZATION:; DATASET NUMBER:;NUMBER OF INDEX FILES:; KEY ADDRESS WITHIN DATA RECORD:;KEY LENGTH IN DATA RECORD:;
0x08cd90…08cf24 Dummy {f00=0x00be, f01=0x0190, f02=»MAX NO OF RECORDS ON OUTPUT INDEX FILE:;SUB-KEY ADDRESSES IN RECORD:; SUB-KEY LENGTHS IN RECORD:; ***WORK FILE DEFINITION***; WORK FILE NAME:;SORTING IN ASCENDING ORDER:;REORGANIZE DISC:; DISC VERSION:;INDEX VOLUME NAME:; DUPL. ALLOWED: ; COND. INDEX: ; EXP. T
0x08cf24…08d0b8 Dummy {f00=0x00be, f01=0x0190, f02=»DESCRIPTION ***;*** KEY DESCRIPTION ***;TESTING METHOD (I/A/Q):;CALCULATIONS OF NO. OF USED RECORDS AND FILLING DEGREE:;NEW FILE NAME:; DISC DEVICE : ;TAPE DEVICE :; EXTENSION SIZE :; FUNCTION :; USAGE :;USAGE :;VOLUME NAME OF WORKFILE:; ALL INDICES:; LOG FILE
0x08d0b8…08d24c Dummy {f00=0x00be, f01=0x0190, f02=»; MORE THAN 18 BADSPOTS.DISC NOT USABLE;DISC I/O ERROR.;PRINTER NOT OPERABLE; TOO MANY SECTORS IN FILE; DISC OVERFLOW;TOO MANY EXTENTS NEEDED;ILLEGAL BLOCK LENGTH; VTOC OVERFLOW;NO FREE SPACE ENTRY AVAILABLE;FILE NAME ALREADY USED; NO TOSS DISC FORMAT;TAPE UNIT NO
0x08d24c…08d3e0 Dummy {f00=0x00be, 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
0x08d3e0…08d574 (0, 179) Dummy {f00=0x00be, f01=0x0190, f02=» 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. ERROR; LOAD FACTOR TOO SMALL;KEY SEQUENCE ERROR; DATA SET DEF. ERROR;ILLEGAL SECTOR NUMBER;CARD
0x08d574…08d708 Dummy {f00=0x00be, f01=0x0190, f02=»BER;NOT ALLOWED TO MIX DISCSIZES; NOT ENOUGH CORE;OVERFLOW; WRONG FD PARAMETER; ILLEGAL FILE-CODE;ILLEGAL ECB PARAMETER;UNKNOWN FILE; ILLEGAL VOLUME/FILE NAME; TOTAL KEY LENGTH TOO LONG;FM I/O-ERROR: ; DESCRIPTOR BLOCK TOO LONG;OPERATOR ABORTED; FILE ATTACHED;ONLY
0x08d708…08d89c Dummy {f00=0x00be, f01=0x0190, f02=» BY CDT;COPY NOT SUCCESSFULL; DUPLICATE KEYS IN PRIMARY INDEX.;POSITION OUT OF RECORD; FATAL EDM ERROR: ;NO PRIMARY KEY LEFT;BOUNDERY VIOLATION; KEY SPECIFICATION ERROR;KEY ALREADY EXISTS; NOT EXISTING KEY; NO INDEX LEFT;SOURCE DISC DATA ERROR:;DEST. DISC DATA ER
0x08d89c…08da30 Dummy {f00=0x00be, f01=0x0190, f02=» FUNKTION LOG FILE ;BUFFER FILE NOT BIG ENOUGH ;NO FREE BLOCKS AVAILABLE ;CLOSE BUFFER FILE NOT SUCCESSFUL ;OPEN FILE NOT SUCCESSFUL ;INDEX NOT FOUND ; INCORRECT MMU-BUFFER LENGTH ; DU2 DU1 DU4 DU3 MD1 MD2 MD3 MD4 FD1 FD2 FD3 FD4 CD1 CD2 CD3 CD4
0x08da30…08dbc4 Dummy {f00=0x00be, f01=0x0190, f02=»
[…0x3…]
0x08e080…08e214 (0, 180) Dummy {f00=0x00bf, f01=0x0190, f02=»
[…0x7…]
0x08ed20…08eeb4 (0, 181) Opaque[0x194]
0x08eeb4…08f048 # DirEnt {nam=»SYSGEN«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0570, f03=0x0000}
0x08eeb4…08f048 IdxSect {
0x08eeb4…08f048 f00 = 0x002b // 0x8eeb4 @0x0
0x08eeb4…08f048 f01 = 0x0026 // 0x8eeb6 @0x2
0x08eeb4…08f048 gno = [ // 0x8eeb8 @0x4
0x08eeb4…08f048 [0x00]: C0x002b.0x2.0
0x08eeb4…08f048 [0x01]: C0x002b.0x3.0
0x08eeb4…08f048 [0x02]: C0x002c.0x0.0
0x08eeb4…08f048 [0x03]: C0x002c.0x1.0
0x08eeb4…08f048 [0x04]: C0x002c.0x2.0
0x08eeb4…08f048 [0x05]: C0x002c.0x3.0
0x08eeb4…08f048 [0x06]: C0x002d.0x0.0
0x08eeb4…08f048 [0x07]: C0x002d.0x1.0
0x08eeb4…08f048 [0x08]: C0x002d.0x2.0
0x08eeb4…08f048 [0x09]: C0x002d.0x3.0
0x08eeb4…08f048 [0x0a]: C0x002e.0x0.0
0x08eeb4…08f048 [0x0b]: C0x002e.0x1.0
0x08eeb4…08f048 [0x0c]: C0x002e.0x2.0
0x08eeb4…08f048 [0x0d]: C0x002e.0x3.0
0x08eeb4…08f048 [0x0e]: C0x002f.0x0.0
0x08eeb4…08f048 [0x0f]: C0x002f.0x1.0
0x08eeb4…08f048 [0x10]: C0x002f.0x2.0
0x08eeb4…08f048 [0x11]: C0x002f.0x3.0
0x08eeb4…08f048 [0x12]: C0x0030.0x0.0
0x08eeb4…08f048 ]
0x08eeb4…08f048 }
0x08f048…08f1dc Dummy {f00=0x002b, f01=0x0190, f02=»y _ ~ _ ~ f ~ n 4 ~ o ~ v , ~ z v ~ } l ~ J ~ ~ f ~ :C H A M d H R M d PB " P :C_ @ 9C E ^ d V V ( T # Y$ @ h ( W A (
0x08f1dc…08f370 Dummy {f00=0x002b, f01=0x0190, f02=» A , A * @ . ) @ 0 I L l % (Z W 2 A @ ~ A A ~(@ ( @ A A @ A A @ A A @ A V A : 2 (
0x08f370…08f504 Dummy {f00=0x002b, f01=0x0190, f02=» 2 _ :C H A M H R M " P :C_" @ 9C E ^ V
0x08f504…08f698 Dummy {f00=0x002b, f01=0x0190, f02=» T ^ c T A V >c U T U U UT& U T V =A T P N U =a ^: ^V @ , @ N pDISC ERROR & ( $ ( " $ ( $ x ( * S N A _ 6 @ P T p:a R
0x08f698…08f82c Dummy {f00=0x002b, f01=0x0190, f02=» @ b 4 = / M ~ Q T R N S T x Y R G P . H L V I U Z X Z $ (_~ R A A ,_ NO! A ^ A ` A f A h A b A d A X A V A Z > *T A V_ P A Z A ` . , + - ; . : D f X " H PW&
0x08f82c…08f9c0 Dummy {f00=0x002b, f01=0x0190, f02=» 4 > " 4" @ > @ h >P A jP A j @ j >W A j A h A h_D @ V @ ZT 4 " ( ^ @ XP A d A b " 4 @ hP @ j ^ > @ d T @ J @ LW @ d @ j @ hT @ ^ > A J A L 8W $W 0 ,_8 PW pW
0x08f9c0…08fb54 (0, 182) Dummy {f00=0x002b, f01=0x0190, f02=»P @ X 0 4 P @ * 4 @ 4 h @ $ ` " 0V U _( LOADED SEGMENTS NO: T @ L @ J W" @ ^T @ dW @ ` @ d @ j @ hT @ ^ > >a @ f A
0x08fb54…08fce8 Dummy {f00=0x002b, f01=0x0190, f02=» l P 3P 4 C @ bP8 @ d @ P* @ j @ hT @ ^T Q @P @ f Q A @ A f " T @ PW @ d @ hP @ j ^T A , A > A ,P * A ( (@ A , @ ( * B A A A P @ P A A h * A @ P A
0x08fce8…08fe7c Dummy {f00=0x002b, f01=0x0190, f02=» U P ^ @ W$ T p:a R U T p9a Z _ = 6:A , 6 9a @ P 4 A @] _ A B D EMPTY TABLE T 0 0 P * P _ @ d A * A 4 @ d @ ` @ ^P R( <a @ hP @ jW @
0x08fe7c…090010 Dummy {f00=0x002b, f01=0x0190, f02=» <a A t @ P" @ hP @ jW @ Q UP 4_8 P TR P 4 A ) " A > | H : A > @ P 4 @ <a Q UP 4_ @ d @ bT A A ~ TPB @ ^PD > > F 4 @ ` ! T $ P A @ d A # A
0x090010…0901a4 Dummy {f00=0x002b, f01=0x0190, f02=» A > W R: ( T D V $ W ( W P T $ ; V ; Wp&~ P &`P 6 P @ t$ P $ TH P@#~ > V . >A P Y P X PW ^ ? ? @ t ' P Y Y @ t" P A A A A W ^ P 6_ " ^
0x0901a4…090338 Dummy {f00=0x002b, f01=0x0190, f02=» ? ? ? ? ? A @ ^ @ t ? ? t P > > > > > > > > n l ? ? ? ? ? ? ? n > A t > A P A P n ^ " , , A A :B W " , A :b A A A Q (P _ # # H A " > A 0R$
0x090338…0904cc Dummy {f00=0x002b, f01=0x0190, f02=» A A " R _U . 6 " A W A :H: A " , " 0 " 1 " ! R :W& 6 W 6 W W ?W /W :W A W ! A A h A hA Pf _ ? @ hT A I > > > @ _ I T A h " T
0x0904cc…090660 Dummy {f00=0x002b, f01=0x0190, f02=» > | 2 I R^ A J <a P TV RD_ M A P6 T @ ~T. @ P A W ` @ @ P @ T A zP A x< V A x TT <a P T;A;a A A : (@ ( : 4R P ( Z T 5 _$ : 4P^R` 7 < % ) ! P #
0x090660…0907f4 (0, 183) Dummy {f00=0x002c, f01=0x0190, f02=»_ : 4R T k $X R _$ : A 0 ) A W W W W W L C C ( " # C C ( B Rp : . _: N A @ N " T ; A N ( A N @ N$ A N !YYP$ !NNP !$$T !## ~ W :
0x0907f4…090988 Dummy {f00=0x002c, f01=0x0190, f02=» :ASM /S * ********************* P lR D r ! P ) _ _ : | A L_, DTOSS TOSSWORK A A A A A A A A A t : A t
0x090988…090b1c Dummy {f00=0x002c, f01=0x0190, f02=»
0x090b1c…090cb0 Dummy {f00=0x002c, f01=0x0190, f02=»MOV ,/S,TOSSWORKINC ,TOSSWORK KPF /S,0 ASG /E0,TY10!!EN DATA 00!!DL LED KPF /O I/O ERROR SCR 9 r 8R T 5 _ T A r^_" @{^ 00 A; A" A# A;p A$ A.f A-N A/
0x090cb0…090e44 Dummy {f00=0x002c, f01=0x0190, f02=» A& A( A) A* A8 A9 A: A:r A: A.h A-P A/ A0h A14 A1 A2 A3 A<J A3 A5j A4$ A7 A6 A56 A8r A; A$ A:. @s P < A!( 02 A < @s P 02 A H @ P DR A @ @ A A A A A @r P DR A @r P DR A !P = L D> @rj A
0x090e44…090fd8 Dummy {f00=0x002c, f01=0x0190, f02=» WB @$h AS8 @$j AS: Q W" P ! T R G Y : I $ I I2 @ P @' SP NUT 1 A' @ P @(` SP NUT 1 A(` 0 A( @$ SP 1P ATJ AI& 1 @+ SP NUT A+ @( @$ SP 1P AT4 I @=X ST 00 A=XW NU
0x090fd8…09116c Dummy {f00=0x002c, f01=0x0190, f02=» A A AF ~ A WP ~01 01 01 01 01 01 01 01 01 00 0000 00 00 LED DRND01 J X . ~ !P = : @ @ @ @ @ @ @r P 01W 00 A @s P 01W 00 A @ P 01W 00 A
0x09116c…091300 Dummy {f00=0x002c, f01=0x0190, f02=» LOADING FROM MINIFIX DISC : LOADING FROM 80 MB CDC DISC : LOADING FROM 16 MB CDC DISC : CONFIGURATION FILE CHECK : SYSLOD ADAPTION LED SYSLODLED SYSLDMSYSLOD DRKB04DRTP02DRGP01DRDN01DRDI01DRDY02DRLT01DRSU01DRCG01DRCD01DRMS02DROD01DRTP03DRGP02DR
0x091300…091494 (0, 184) Dummy {f00=0x002c, f01=0x0190, f02=»DRCR01DRIC01000000DRDC07DRDC15DRDC17DRDC81DRDC82DRDCXXDRDCYYDRDC22DRDC13DRDC23DRDC25X25:L3DRCC01 ******************** D R I V E R S ********************* $ " %Z& & ) & (8 : 9 : ; < =~=65J6,7 8.4 ' +n 4 )d+ 8 9 <^< :H; -l+ . / 0 1P1 2*3:3 5~= = = = =
0x091494…091628 Dummy {f00=0x002c, f01=0x0190, f02=»: 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 : ROOMLESS POINT CODES : MMU BUFFER SIZE (BYTES) : WR
0x091628…0917bc Dummy {f00=0x002c, f01=0x0190, f02=»ON 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) : KEYBOARD TIMEOUT : ECHO FUNCTION : COMPLETION O
0x0917bc…091950 Dummy {f00=0x002c, f01=0x0190, f02=»KEYBOARD LOCK IF NO KEYLOCK ON : MMU BUFFER SIZE (BYTES) : MMU KEY TABLE SIZE : KB 6236/71/72 IN SYSTEM : OTHER THAN KB 6236/71/72 IN SYSTEM : 00 ROOMLESS POINT CODES : SPECIAL CHARACTER /13 : SPECIAL CHARACTER /14 : ECHO FUNCTION : ECHOIN
0x091950…091ae4 Dummy {f00=0x002c, f01=0x0190, f02=»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 CHRS : NUMBER OF LOCAL CHANNEL UNITS
0x091ae4…091c78 Dummy {f00=0x002c, f01=0x0190, f02=»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 : ACKUMULATORS FOR NAK,RETRANSMISSION FAULT AND
0x091c78…091e0c Dummy {f00=0x002c, f01=0x0190, f02=»CAL PRINTER : KEYBOARD LAMPS CONNECTED DIRECTLY TO VDU : 01 KEYBOARD TIMEOUT : COMPLETION OF READ REQUEST AT POWER ON : MMU BUFFER SIZE (WORDS) : FAST OUTPUT USED FOR CONSECUTIVE EQUAL CHARACTERS : OTHER DISPLAYS THAN 6344/46/47/85/86 IN SYSTEM
0x091e0c…091fa0 Dummy {f00=0x002c, f01=0x0190, f02=» (ELSE TWINKLING) : COUNTRY CODE ON 6385 (0-9) : MMU BUFFER SIZE (BYTES) : DY 6385/86 IN SYSTEM : READ AFTER WRITE : NUMBER OF DISC UNITS : UNPACKED DISC FORMAT : PACKED DISC FORMAT : 00 EXTRA SOP INPUT DWT : FLASH FUNCTION : RECEIV
0x091fa0…092134 (0, 185) Dummy {f00=0x002c, f01=0x0190, f02=»ING : TRANSMIT BLOCK LENGTH : EBCDIC CODE ( ELSE ASCII ) : SPECIFIC POLL HANDLING : LINE SPEED HIGH : SIEMENS MSV1 PROCEDURE : NUMBER OF RECEIVE BUFFERS : 00 PHYSICAL LINE NUMBER : IBM CHARACTER HANDLING : MESSAGE PASSING : IBM-3270 PACKA
0x092134…0922c8 Dummy {f00=0x002c, f01=0x0190, f02=»-14) : RECEIVE BUFFER LENGTH : IO-PROCESSOR (ELSE PC) : WIRE 2/4 : SUBTERMINAL ADRESSING : REJ FRAME SUPPORT : MESSAGE PASSING : STATISTIC COUNTERS : INTERRUPT LOGGING : 00 PHYSICAL LINE NUMBER : MMU BUFFER SIZE (WORDS) : NUMBER OF LI
0x0922c8…09245c Dummy {f00=0x002c, f01=0x0190, f02=»SSION/DECOMPRESSION : IDLE LINE ACTIVITY TIME-OUT : STATISTIC COUNTERS : LOGG AREA LENGTH PER LINE : 00 PHYSICAL LINE NUMBER : 34 04 05 MMU BUFFER SIZE (WORDS) : NUMBER OF LINES : POLL LIST LENGTH : MAX BLOCK LENGTH : LOGAREA LENGTH :
0x09245c…0925f0 Dummy {f00=0x002c, f01=0x0190, f02=»ORDS) : TRANSPARENT MODE : NUMBER OF LINES : POLL LIST LENGTH : INTERRUPT LOGGING : RETRY LIMIT : PHYSICAL LINE NUMBER : 34 04 05 06 07 32 33 35 36 37 38 MMU BUFFER SIZE (WORDS) : RECEIVE BUFFER LENGTH : DC-TASK DATCOM FILE CO
0x0925f0…092784 Dummy {f00=0x002c, f01=0x0190, f02=»DE : PHYSICAL LINE NUMBER : MMU DEVICE BUFFER : RECEIVE BUFFER LENGTH : NUMBER OF RECEIVE BUFFER (3-14) : INTERRUPT LOGGING : POLL TIMEOUT VALUE : SUPPRESS NULL CHARS. : 00 PHYSICAL LINE NUMBER : AUXILIARY DEVICE HANDLING : UNISCOPE EMU
0x092784…092918 Dummy {f00=0x002c, f01=0x0190, f02=»CODE : INTERRUPT LOGGING : NUMBER OF RECEIVE BUFFERS (2-4) : POLL TIME-OUT VALUE : PHYSICAL LINE NUMBER : MMU BUFFER SIZE : NUMBER OF LINES : RECEIVE BUFFER LENGTH : MMU BUFFER SIZE : LOGG FACILITY : RETRY LIMIT : TIMERS T1,T2 : MAX OU
0x092918…092aac Dummy {f00=0x002c, f01=0x0190, f02=»01 ORDER DISPENSE AND DELIVER SPLIT INTO ORDERS DISPENSE,DELIVER,DUMP (Y/N) : MMU BUFFER SIZE : ORDER TEST OUTPUT BUFFER : MMU BUFFER SIZE : NUMBER OF LINES : 01 PHYSICAL LINE NUMBER : 34 04 05 LINE ACCESS PROCEDURE ABM (ELSE ARM) : IO
0x092aac…092c40 Dummy {f00=0x002c, f01=0x0190, f02=» ON IOP (ELSE PROGRAMMED CHANNEL) : SCREEN CHARACTER GENERATOR - TYPE : SCREEN CHARACTER SET : ECHO OF EOR KEY : SUPRESSION OF TRAILING BLANKS : MMU BUFFER SIZE : NATIONAL CHARACTER VARIATION (1-15) : FRICTION FEED : FRONT FEED : PAGE LEN
0x092c40…092dd4 (0, 186) Dummy {f00=0x002c, f01=0x0190, f02=»(PITCH) : 00 END OF REQUEST WHEN PRINTER IS INACTIVE : ORDER SET FORM PARAMETER : NATIONAL CHARACTER VARIATION : RECEIPT STATION IN PRINTER : MMU BUFFER SIZE : END OF REQUEST WHEN SELECTOR UNIT OR PRINTER IS INACTIVE : LP ON PROGRAMMED CHA
0x092dd4…092f68 Dummy {f00=0x002c, f01=0x0190, f02=»T (DM & PAGING) : IBM LABELLED DISC HANDLING : ORDERS FOR MOTOR START/STOP (6805 ONLY) : 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 PR
0x092f68…0930fc Dummy {f00=0x002c, f01=0x0190, f02=»ER VARIATION (1-11) : CHARACTER FONT (0-3) : CHARACTER PITCH DOCUMENT (2-0) : JOURNAL STATION IN PRINTER : CHARACTER PITCH JOURNAL (2-0) : PARAMETER ORDERS : MMU BUFFER SIZE (BYTES) : END OF REQUEST WHEN PRINTER IS INACTIVE : MMU BUFFER SIZ
0x0930fc…093290 Dummy {f00=0x002c, f01=0x0190, f02=»MENT LENGTH : MMU BUFFER SIZE : READ AFTER WRITE : READ AFTER WRITE : NUMBER OF DISC UNITS : READ AFTER WRITE : TOSS HANDLING : IBM HANDLING : LOGG FUNCTION FOR INPUT/OUTPUT CHRS : NUMBER OF LOCAL CHANNEL UNITS : 01 NUMBER OF
0x093290…093424 Dummy {f00=0x002c, f01=0x0190, f02=»LOCAL CHANNEL UNITS : 01 AB JW &P . = & >h A> 8R P &P~ G MH @S8 P 0 X DCX: !SSP B X 5:T Wh > D( & * A AF AF AF A W @y P D(W @y T C W( C W" @{^ @{f @ @ @{h
0x093424…0935b8 Dummy {f00=0x002c, f01=0x0190, f02=» Z6T 5W _B : @b @ R P @S8 5 P @S: U P @S; U @?8 D P P P P P @ T D > > P D > :h H? P :? ? @8 @L@ @ @* 4 0P 0 A) : 4 0T 15 A( : 4 0P 1 A< : 4 0Q 0 A% A% 4 0P 0 A) : 15 A( : 4 0T
0x0935b8…09374c Dummy {f00=0x002c, f01=0x0190, f02=» J T # R dR W ! C< C> C<P( R S8 S8_ 00 S8 ^ C< @S8:HV. !YYT 1;BV 8W !NNT 0;BV : AE _ PS8 !00Z !99Y @S8 QD @?8 T6 R dR W Q A,$ @?8 Yr @S8 @?8 D
0x09374c…0938e0 Dummy {f00=0x002c, f01=0x0190, f02=» # R dR W ! P P AG T AG F W AF F W AF F AF AF AF _ P AB G E : ! P@ A, @S8 !SSP& A, !NN A, @?8 I H @ Y AS8_ HS8 !,,T A, W. !00 A, !FF A, !99U !AA A,
0x0938e0…093a74 (0, 187) Dummy {f00=0x002d, f01=0x0190, f02=»A A, @{jP HN # @{^P Hr # @ P H # @ P H # @{fP H # @{hP I # @|@P H0 P : I( : A t : F @r P @9 0T^ F @s P0 @+ 0T F @,2 0T& A AF F W
0x093a74…093c08 Dummy {f00=0x002d, f01=0x0190, f02=»A, AE @E P @E AE A, X 23P 17P 81P 82T @E A,W @E _ @E _ <C F" X Q 0 aE @?8 AE X 17T @E AE W 9B AE @E T AE _ ?4 @F" 5_ 9 P 0R Q < 9h " : _ @$* 0T 00 A
0x093c08…093d9c Dummy {f00=0x002d, f01=0x0190, f02=» 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$$/ ,/ ,/ ,/ ,/ $$ DATA 0,0,0,0,0,0,0,0 !!DL 45 G|
0x093d9c…093f30 Dummy {f00=0x002d, f01=0x0190, f02=» !!CH $$EDM EQU 0$$EDM EQU 1$$ !!CH $$CPU857 EQU 0$$CPU857 EQU 1$$ !!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ !!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ !!CH $$ASSOLY EQU 0$$ASSOLY EQU 1$$ !!CH $$DSKPAG EQU 0$$DSKPAG EQU 1$
0x093f30…0940c4 Dummy {f00=0x002d, f01=0x0190, f02=» P I :. I :LED DVTOD @r T I :DRIC0X @$* SP ECP 1P AT$ :DC : J : ( SP MMT W ( O P :!!IL 48 @S8 !SS @ S 5 ?4 @S8 JF A, @S8 5 E T :h" P 0R U Q P <H9D_(
0x0940c4…094258 Dummy {f00=0x002d, f01=0x0190, f02=» T~ Y Y| Z PF 01 7 MF r^ S AMB K T _@ 7 @Y Y AY R _^ @] PV Ag @Y P Y A] A] ] E AY} 01 AY~ ^ T S _ Ag 7 a & CD Arp Ar CG Arn Ar : 4R P @] ! P ]
0x094258…0943ec Dummy {f00=0x002d, f01=0x0190, f02=» _D W W X Q^ R R _ ]T 4P 1 AL @Y 7 Y 01 7 @]T , 7 4 W V T1P TNP G1P G2P T2P TPT, 1 0P 1T W AMD / AL @MD W AL AY R 4^ A]T @MB : S8 ( @ N$ !;;P6 ! P0 ! X
0x0943ec…094580 Dummy {f00=0x002d, f01=0x0190, f02=»S8 MFR *Pr_ 7 O P^ "T @+n 1T V SIT TF P, LS: !,,T2 U, LS8 LS99H # O _4 # A]T : M @S8 7 O : V DIT Q ,0W8 @S8 P KB ]H V MTT 0P R| @ & I 7 P& @S9 !,, M @S: R| C
0x094580…094714 (0, 188) Dummy {f00=0x002d, f01=0x0190, f02=» @Y P EOh @S8 _D T :h" P 0R U Q P <H9D_( : M ^2 @S8 V M V M M N` M @S8 O 9H @S: O A Pl M V KBT bqP brP b6T b6 bA
0x094714…0948a8 Dummy {f00=0x002d, f01=0x0190, f02=» W : ^2 M V W M Q M Q< W : S8 0 0R Q ; W : # +0 !99U :d" *0 !99U :H : T TP ^b T1 ^ TN ^ T2 ^ G2 ^ G1 ^ D4 ^ D5 ^ MD ^ CD ^ TWP DUP FDT ] W ] W
0x0948a8…094a3c Dummy {f00=0x002d, f01=0x0190, f02=» : AQ A : @Y~ ag !99R ?0W AY~ : 1R Q : M ]H "P. @ & (P , 7 B W A]H : T SIT* @+n 1T" 7 @]TP @]V W 02 W A]T : DEFINE TERMINAL DEVICE CLASSES DEFINE ECHO DEVICE CLASSES
0x094a3c…094bd0 Dummy {f00=0x002d, f01=0x0190, f02=»Z Z Z Z [ [ Z Z [ [ Z Z [ > FILE CODE : DEVICE ADDRESS : PTS NUMBER : ECHO DEVICE : KEYBOARD TIME-OUT : CODE CONVERSION : M NlO O O O O N P P VP P T1
0x094bd0…094d64 Dummy {f00=0x002d, f01=0x0190, f02=»
[…0x2…]
0x09508c…095220 Dummy {f00=0x002d, f01=0x0190, f02=» b2c1e1b3b1cBb4b6bqbr q r tba bAbBb2c1b3b4b6bqbr q r t cBcQcRcDc c cF A 20203000003010909090909090 00000040004040404040404000 8080800010100000 FILE CODE : DEVICE ADDRESS :
0x095220…0953b4 (0, 189) Dummy {f00=0x002d, f01=0x0190, f02=» DEVICE ADDRESS : PTS NUMBER : NUMBER OF LINES : NUMBER OF CHARACTERS/LINE : KEYBOARD FILE CODE : PIN CHARACTER : DISPLAY FILE CODE : FILE CODE JOURNAL : DEVICE ADRESS : FILE
0x0953b4…095548 Dummy {f00=0x002d, f01=0x0190, f02=»ODE TALLY ROLL : FILE CODE LEFT TELLER : DEVICE ADRESS : FILE CODE RIGHT TELLER : LEVEL: ********* : LED DRTW01!!CH $$ X:F$$ / $$
0x095548…0956dc Dummy {f00=0x002d, f01=0x0190, f02=» W W 1_ 1 W W : : Lr^R T _ : P& P P W @S8 AS9 0 AS8 @S8 : : 7 W V W 0 W V W 2 W V W V W 1 W RZ 7 V W 0 W V W 1 W RZ 7 V W V ! 9A 00 W W : V W : 7 W V
0x0956dc…095870 Dummy {f00=0x002d, f01=0x0190, f02=»`V R O X *0 T1PR TNPL T2PF G2P@ G1P: MDP4 CDP. D4P( D5P" DUP FDP TPP D3T X W X X / O @`"Q `j a _ / Af _ / P Q$ A`" d _ r& A`^ A`" t d _ @ AC : 8R Fq P _ : AbP Ab Ab Y 9a
0x095870…095a04 Dummy {f00=0x002d, f01=0x0190, f02=»T fV f^ : ET Ab b 0 Ab Ab X 00 FbT X 40T fz W X Af X Af f X X W 1 Ab W 1 Ab 40 a : 1 Ab a : @f Af P Ab 1 Ab a a ` T !99U Ab :h Ab @ P g : @ & 0TX P P " 9U
0x095a04…095b98 Dummy {f00=0x002d, f01=0x0190, f02=»apaxapa a afa a a !!CH $$COD$$CTAB $$!!CH $$ DATA COD$$ DATA 0$$ !!CH $$DVT $$DV $$!!CH $$ECH$$DW $$!!CH $$/1111$$/ 000$$ !!CH $$BCA$$ $$ !!CH $$ED0$$ $$!!CH $$/2222$$/0000$$ !!CH $$/3333$$/0000$$
0x095b98…095d2c Dummy {f00=0x002d, f01=0x0190, f02=»
0x095d2c…095ec0 Dummy {f00=0x002d, f01=0x0190, f02=» !!DL 07 !!
0x095ec0…096054 (0, 190) Dummy {f00=0x002d, f01=0x0190, f02=»TABXX$$ !!CH $$/ABC$$/ $$ : 8 KBT @b ! P @b " :A*0 !99U AcLW @b ! ! U 0 Ac6 c$ @b ! 9M9l X P 90T )0 !99U AcI c: 0 AcL : 32 @ P" @(`P hj Ag 16 @( P h Ag W @ P @' P hj Ag :
0x096054…0961e8 Dummy {f00=0x002d, f01=0x0190, f02=» 4T : 3T 24 : 2T 16 : 1T 08 : 00 : 4T : 3T 12 : 2T 08 : 1T 04 : 00 : q t2 Z P ln l4 0R _ q W Ai Ai MH X, S8 ( H <H%
0x0961e8…09637c Dummy {f00=0x002d, f01=0x0190, f02=»_ t r^ $ r P: @rlT4 @ P @r| @r T$ AS ArzW @r~ @rz @r| @r T SU Arl @ @ @{f @{h @ @ @ P2 @r @r @r @r T @ @ @t P FD Ar W DU Ar 1 Aq jd @s P @r P j @ At0 @r P$ 2 Aq j @ A Ay Ay Ay Ay @t0Ph A Ay A
0x09637c…096510 Dummy {f00=0x002d, f01=0x0190, f02=» @r T As @ As s }" @r P s Z As @r P s Z As s r^ r $R T ) _ @r T Ar @r T Ar @r T Ar @r T Ar @r T Ar @r T Ar @r T Ar @r T Ar @rvT Ar r @ J As A J r @s A J r }" A t @ P 01 A+h : 09HR
0x096510…0966a4 Dummy {f00=0x002d, f01=0x0190, f02=»TER DN NUMERIC DISPLAY DI INDICATOR DISPLAY/KEYBOARD LAMPS DY VIDEO/PLASMA DISPLAY SU LOCAL AND REMOTE TERMINALS MS MAGNETIC STRIPE UNIT OD OPTICAL DOCUMENT READER T1 TELLER TERMINAL PRINTER (TP71) G1 GENERAL PRINTER (LP100)
0x0966a4…096838 Dummy {f00=0x002d, f01=0x0190, f02=»ONTROL G3 GENERAL PRINTER (HP75) VU VIDEO G2 GENERAL PRINTER (GP74) T2 TELLER TERMINAL PRINTER (FT80) TN TELLER NOTE DISPENSER TC TAPE CASSETTE SI SOP INPUT SO SOP OUTPUT MT MAGNETIC TAPE UNIT TW TYPEWRITER
0x096838…0969cc Dummy {f00=0x002d, f01=0x0190, f02=»R 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 COM DRIVE
0x0969cc…096b60 Dummy {f00=0x002d, f01=0x0190, f02=»DC22 D9 DATA COM DRIVER DRDC13 DA DATA COM DRIVER DRDC23 DB DATA COM DRIVER DRDC25 L3 X25 LEVEL 3 DRIVER X25:L3 DEVICE ABBREVIATIONS DEFINE DEVICES : DC-DRIVER1 NAME,USERID : KBTPGPDNDIDY SU MSODT1G1ASSLPLG3VUG2
0x096b60…096cf4 (0, 191) Dummy {f00=0x002e, f01=0x0190, f02=» DWII01DWIO01DW0701DW1501DW2201DW1301DW2301DWL301DTTP03 DVTKB DVTTP DVTGP DVTDN DVTDI DVTDY DVTMS DVTOD DVTT1 DVTG1 DVTG3 DVTVU DVTG2 DVTT2 DVTTN
0x096cf4…096e88 Dummy {f00=0x002e, f01=0x0190, f02=»2 A4 : r $ r P DC As : DEVICE LIST (Y/N) : 01010001
0x096e88…09701c Dummy {f00=0x002e, f01=0x0190, f02=»
[…0x2…]
0x097344…0974d8 Dummy {f00=0x002e, f01=0x0190, f02=» d A Z T v MH X Y HS8 I 3 I 3 A N A A P A J MH X @S8 UKT 99 AS8 Q H Z8 P _ H At A W< A W A W0 A A A{jW A _ A _ Z P A{^ M
0x0974d8…09766c Dummy {f00=0x002e, f01=0x0190, f02=» " > MH X S8 (;H H P{ Z. P _ P| A|& SY A|" A W2 A|, SY A|( A W A| SY A| Ay ! A 02 A PV ( !,, _tCOBACRAS { { { { SYSLODSYSLDM SL SL SL SYSINI NOD AM b Z P6 Z A A
0x09766c…097800 Dummy {f00=0x002e, f01=0x0190, f02=» @ P @ @ @ P B A C }" W @{^ @ @{f @ @y @{h @|@P0 }v 4R(P 9 T Y T Y }r C _0 :LED A D P @ _ A @ ( @r P j @r P v J
0x097800…097994 (0, 192) Dummy {f00=0x002e, f01=0x0190, f02=» 9h! A , l4 @y A L( ( X( ( Z P g A MH P S8 ( 1 PV !,, A S8 @ X& T$ DW @S8T A DC @S:T A @S< A / 1 S Q Q
0x097994…097b28 Dummy {f00=0x002e, f01=0x0190, f02=» !YYP NP :SYSTAB IMON IMOD TDISPLRPINT TPROC MSUBSTTMJOB OINT TASKTOSSIOLDTASKST8000DRND01DCADDR TMOVEDCSTAT PFTAB LKMAL TCLASSSCLASSMONTAB DC:TABIN:L
0x097b28…097cbc Dummy {f00=0x002e, f01=0x0190, f02=» SUPPORTING TOSS RELEASE #11.0 ASSEMBLY LIST : ASG /02,NOSYSGEN ENDEDEXTRA MONITOR MODULES : MOV LED DWDC00 DEBUGGER : INC DEBUG,TOSSWORK INC DEBUGM,TOSSWORK KPF /O L( X( t( ( f(
0x097cbc…097e50 Dummy {f00=0x002e, f01=0x0190, f02=» L( X( : ASG /E0,TY10 INC SYSTABINC DEBUG LKE M ASG /02,LP0FSCR PROGRAM LANGUAGE (AS=ASSEMBLER,BA=BASIC,CO=COBOL,CR=CREDIT) : DATA MANAGEMENT : FILE MANAGEMENT : EXTENDED DATA MANAGEMENT : ABRIDGED DATA MANAGEME
0x097e50…097fe4 Dummy {f00=0x002e, f01=0x0190, f02=»/L, LED MONTAB081082083084085086087088089090091092093094095096097098099100101102103104105016107108109110111112MEMORY MANAGEMENT UNIT : !!DL 20 !!DL 51 : : Tf # P P b A h A g _* : Z
0x097fe4…098178 Dummy {f00=0x002e, f01=0x0190, f02=»KSUB ASG /E0,DK,LINKVX ****!!IL 25 :TIODMX & z z z z z z z z z z z z COMPUTER TYPE : SWAPPABLE WORK BLOCK HANDLING : DISK PAGING : L h :0102030405060708091011121314151617181920 @{^ @ @{f @ @y @{h A J :
0x098178…09830c Dummy {f00=0x002e, f01=0x0190, f02=» A 9h A A W2 @Y~ @ & I W @ W Z T @ & I A " H P A & : @Y~ A 9 A 9 @ & I @ : @ & I :LED CTABX 8-BIT SETTING : !!CH $$CTABXX$$CTABNN$$ CTABXX C0C1C2C3C4 (
0x09830c…0984a0 Dummy {f00=0x002e, f01=0x0190, f02=» : @ P :PARTITION LENGTH IN BYTES ( HEXA ) : NUMBER OF PARTITIONS : !!CH $$ X:A$$ / $$ !!CH $$ X:B$$ $$ S8 0 !00R !FFQ !99U !AAR - $ : S8 0 !00R !99Q - : S:W S; S8 $ ) ^ 0 P ) _
0x0984a0…098634 (0, 193) Dummy {f00=0x002e, f01=0x0190, f02=»_p A h _| A h _ A h _ A h _ A h _ A h _ A h _ A h _ A h _
0x098634…0987c8 Dummy {f00=0x002e, f01=0x0190, f02=» @ A @ A @ T DW A @s P @ 4 b F 8R X A KBT @ 6T A 6 CGT @ 8T| A 8 G2T @ Tl A T2T @ T A G1T @ TL A TNT @ T< A TPT @ 2T, A 2 T1T @ 4T A 4 d T T _ X P* A 6 A
0x0987c8…09895c Dummy {f00=0x002e, f01=0x0190, f02=»W l X @ 00 A l A p A n @ @ L / A 0 T T1P< TNP6 G2P0 T2P* G1P$ MDP CDP DUP FDP TPP MTT T CGT @ :TH A : 0 A A T DV A T A @ A @ d T 4^ A : T
0x09895c…098af0 Dummy {f00=0x002e, f01=0x0190, f02=»d P E A J d A 00 A l A p A A d P A A S A J W A A d A @ @{f @{h @ @ Xl $ p F P 00 A l A p A A X n X d _ :
0x098af0…098c84 Dummy {f00=0x002e, f01=0x0190, f02=» 0715178182 2213 2325 ASM DC:TABLED TCLASS!!IL 11 DATA TC00TC00 DATA TC00E-* TC00E EQU * DATA +1cV00 EXTRN DV 00!!IL 6!!IL 12 $ !99R %
0x098c84…098e18 Dummy {f00=0x002e, f01=0x0190, f02=»0 W 01 A A r& AlR Al lN RJ R _ MDP& CDP FDP MTP DUT W X ! P H ^T I ^ W : A A : 00 A @r P 0 @r P 6 @r P B @ P * : 07W 15W @ W @ W 22W 13W A : @r P @r P @
0x098e18…098fac Dummy {f00=0x002e, f01=0x0190, f02=»: 15W @1j @ W @1 @ W A /0 A A DW A @ A 00 A : @ @{f @{h @ P@ @r A P @r A P @r A P @+ 0P @r A P : A : 01_ @ @{f @{h @ @r P> 01 MD A A 0 F4 1 F5 2 F6
0x098fac…099140 Dummy {f00=0x002e, f01=0x0190, f02=» 0P4 P 2 F2 3 F3 01 0 F0 1 F1 @r 01 FD A A 0 F8 1 F9 2 FA 3 FB : A /0 A : : DATA DWDU01 A A : EXTRN DWREMU DATA /015 DATA DWREMU
0x099140…0992d4 (0, 194) Dummy {f00=0x002e, f01=0x0190, f02=» JWB @ @ @ W( H A X H A j H A v H A : 2 @ 2 . ~ > H J I @ AS8 A A n @ AS8 @ AS: ;h;G B A n < C X
0x0992d4…099468 Dummy {f00=0x002e, f01=0x0190, f02=» : > @ P @ P W @ X A A n C A NWL @ @ " 3 @ V9A A A W : j : @ n! A A n @ ! B A n C @ n! A A n @ ! B A n C A > d @ @ @ P
0x099468…0995fc Dummy {f00=0x002e, f01=0x0190, f02=»|B! F A n C : L R _ L ,0 ) $ ) I : :d P 9C :' d !!CH $$ X:A$$ $$ MAX BLOCK SIZE IN BYTES : MAX NUMBER OF DISC BLOCK BUFFERS : MAX NUMBER OF CURRENCY BUFFERS : MAX NUMBER OF PROTECTED RECORDS : INDEXED
0x0995fc…099790 Dummy {f00=0x002e, f01=0x0190, f02=» CLOSE DISCARD : LED SDMBUFLED DFTAB !!CH $$F0F1,/F2F3$$F0F1$$ !!DL 22 DATA MANAGEMENT PARAMETERS LED SDMFDBLED SDMTSK!!DL 20 @ n! T A @ & AS8 @ ( AS: C A n @ AS8 @ AS: D A n : D A @ V9A n A A : : @ n!
0x099790…099924 Dummy {f00=0x002e, f01=0x0190, f02=» A A H R P _ D " B A n @{` C A n C A 2 :LED TIOSDM 4 0T 00 A A A A : : A A @ n 1R @ @ " 9a A V @ @ : S8 0 0R Q ; W : TIODMSDMTSKSDMOCRSDMBUF DFTABARITMSTIOSDMSDMSUB @
0x099924…099ab8 Dummy {f00=0x002e, f01=0x0190, f02=» > @ AS8 @ AS: A{d @ . AS8 @ 0 AS: A{b @ V9A A A @ X! A A n @ P ! B A n @ P ! C A n @ ! D A n @ v! E A n @ ! F A n C }" @ v! A A n C @ j! A A n
0x099ab8…099c4c Dummy {f00=0x002e, f01=0x0190, f02=» TASK : CREATE/DELETE : EXTEND : ATTACH/DETACH : MULTIPLE EXTENT I/O : 1 1 1 1 1 1 1AT 1 1 1 1 LED SDMOCRLED FMTASKFMTASK DFTABFMCDEFARITMS TIOFM LED SDMSUBLED ARITMSLED TIODM LED FMCDEFLED TIOFM J d @r P @+ 1P
0x099c4c…099de0 Dummy {f00=0x002e, f01=0x0190, f02=» : P U P U Q U R U S P * U U U U :0000000002020202040404040606060601010101030303030505050507070707 DATA /0000,/0000,/0000,/0000,/0000,/0000,/0000,/0000,/0000 /0000 DATA /0000,/0000,/0000,/0000,/0000,/0000,/0000,/0000,/0000,/0000
0x099de0…099f74 (0, 195) Dummy {f00=0x002f, f01=0x0190, f02=» P A 6 G| : x A h _
0x099f74…09a108 Dummy {f00=0x002f, f01=0x0190, f02=» @ A v @ A x @ @{f @{h @ @ @ P" @tP Ar @tR Ar @tN Ar @tL Ar W @ T Z . h x H R 01 I _ A d F @ T @ P : @r P = @r P = @r
0x09a108…09a29c Dummy {f00=0x002f, f01=0x0190, f02=» @r P = @ P @( ! R = @ P @( ! R = @ P @( ! R = @ P @=X! R = @ P @( ! R = @ P @=X! R = @ P @=X! R = @r P @ P @=X! R = @r P
0x09a29c…09a430 Dummy {f00=0x002f, f01=0x0190, f02=» 2 @ P @' ! R $ = @ P = 8 > @r P = D J @r P * = @r P 0 = P V b @r P 6 = h n @r P B = t z @r P H =
0x09a430…09a5c4 Dummy {f00=0x002f, f01=0x0190, f02=» :!!DL 115,177 8 P&P $ A T D A V D A X N _. : DATA F T RJT _ L lP _ L ] L M ] L M ] ] IH = ] _H :IHPFAR IHLKM IHRTCILLINT IHTW IHTC IHSOP IHFD CHRT1
0x09a5c4…09a758 Dummy {f00=0x002f, f01=0x0190, f02=»U1IHPVU1IHSVU2IHPVU2IHSVU3IHPVU3IHSVU4IHPVU4IHSVU5IHPVU5IHSVU6IHPVU6 ISLCI ISLCOIHPL01IHPL02IHPL03IHPL04IHPR01IHPR02IHPR03IHPR04IASCUZ
0x09a758…09a8ec Dummy {f00=0x002f, f01=0x0190, f02=» Y . : : !99T :!!IL 55 010101010101010101010101010101010101010101 EXTRN IH0000 F T R X L lP _ F_ : 0715178182 2213 2325 @ P @0 @{hP @ P @{fP @{^P @ P @y P :
0x09a8ec…09aa80 Dummy {f00=0x002f, f01=0x0190, f02=»P @r P D B A W C A @{` : E A @{b_ D A @{d_ @s @ P G A _2 : F A @ _@ L R _ L ,0 ) $ ) I :' d !!CH $$ X:A$$ $$ ? ?
0x09aa80…09ac14 (0, 196) Dummy {f00=0x002f, f01=0x0190, f02=» 9 5W @ ~ A?2 A?V @ A?4 > Z P2 @ P B A @ A?2 A?V @ A?4 @y P" TA A . @{^ @{fP TM A X A ^ A " MO A : T A @ P TL A ( @{^ @ @{f @{hP TL A (
0x09ac14…09ada8 Dummy {f00=0x002f, f01=0x0190, f02=» @ @ P T A L MO A 4 A " A @ A AF 0 @ :P 1 AF F B AF 0 @ 4P 1 AF F @ P A AF 1 AF F A t : L K M
0x09ada8…09af3c Dummy {f00=0x002f, f01=0x0190, f02=»LK MOVETINEDM DPGM AGAL 057058059060061062063064065066067068069070071072073074075076077078079080081082083084LED TMOVE LED LKMAL DELAY/DELAY AND ACTIVATION : ABORT FUNCTION : GET/SET DATE : GET/SET TIME :
0x09af3c…09b0d0 Dummy {f00=0x002f, f01=0x0190, f02=»SSIO!!CH $$ X:A$$ 1$$ @ A ^ @ A d @ " A j @ ( A p @ . A v @ : A | @ L A @ d A @ A @ A @ v A @ p A : IMER PROC MLKM DSEG BORT NTIM IOFM DPGM AGAL OEDM MOVE WBLK
0x09b0d0…09b264 Dummy {f00=0x002f, f01=0x0190, f02=» J A . ~ > @ ! A @ AS8 @ AS: ^ A @ AS8 @ AS: ^ A 4 MH T MH A l MH A ( MH A @ ! 9C L L P _ A
0x09b264…09b3f8 Dummy {f00=0x002f, f01=0x0190, f02=» S8 b @ E A Y2X* : 4 : L R _ L ,0 ) $ ) I : S8 0 0R Q ; W :' d !!CH $$ X:A$$ $$ X NUMBER OF LINES : REQUEST TI
0x09b3f8…09b58c Dummy {f00=0x002f, f01=0x0190, f02=»ER DATA LENGTH : NUMBER OF PERMANENT VIRTUAL CIRCUITS : LOCAL DTE-ADRESS IN CALL PACKET : STATISTIC COUNTER : LED X25:L3
0x09b58c…09b720 Dummy {f00=0x002f, f01=0x0190, f02=» * J @ l }" * . ~ * > & MH n @S8 A @S: A @S< A % MH n @S8 A @S: A @S< A & ( MH P@ A JS7 K P 9 MH n
0x09b720…09b8b4 (0, 197) Dummy {f00=0x002f, f01=0x0190, f02=» + A A A A 0 A A @ + A # @ MX A ST A AB A E0 A 03 A VX A @ + A $ h @r P @r P @r P @r P <A A r @ r D A C @ + A } t @ B A
0x09b8b4…09ba48 Dummy {f00=0x002f, f01=0x0190, f02=»Q D A @ AS8 @ AS: Q ;A A ~ @ AS8 Q @ ~ E A @ ` AS8 @ b AS: Q @ AS8 @ AS: Q Z @ B AS8 Q @ b AS: @ ` AS8 Q @ AS8 @ AS: Q > @ AS8 Q
0x09ba48…09bbdc Dummy {f00=0x002f, f01=0x0190, f02=» @ G A @ H A C @ + A @ X H A @ I A @ M A @ P2 N A @ O A @ P A @ P0 AS8 @ AS: @ AS< @ AS> Q Q A @ P( AS8 @ AS: @ AS<
0x09bbdc…09bd70 Dummy {f00=0x002f, f01=0x0190, f02=» C A C : S8 IS7 R Y W 0 Y : : L R _ L ,0 ) $ ) I : T W P _ :' d !!CH $$ X:A$$ $$ : A &:h A % :!!CH $$ X:G$$ 'XX'$$EDM VERSION NUMBER : MAX NUMBER OF USER TASKS : MAX NU
0x09bd70…09bf04 Dummy {f00=0x002f, f01=0x0190, f02=»SIZE OF RECORD BUFFER AREA IN BYTES : SIZE OF BLOCK BUFFER AREA IN BYTES : VOLUME NAME FOR TRANSACTION LOG FILE : SIZE OF TRANSACTION LOGG FILE IN SECTORS PER USER TASK : VOLUME NAME FOR FUNCTION LOG FILE : SIZE OF FUNCTIONLOGG FILE IN SECTORS : E
0x09bf04…09c098 Dummy {f00=0x002f, f01=0x0190, f02=»SK!!CH $$XXXXXX$$ $$ LED MXSTAB LED E003V LED E315V TIOEDM
0x09c098…09c22c Dummy {f00=0x002f, f01=0x0190, f02=» ln LlnR Mln _ @r Aln @r Alt @r @r Alz @ @ Al @r Al Al Al @r Al @r Al @r Al @r Al @r Al @r Al @ Al @ Al @ Al @r Al @ Al @r Al @r Al Al N A V D A AT A A A $
0x09c22c…09c3c0 Dummy {f00=0x002f, f01=0x0190, f02=»ln lr 0R 5 _ 5 F" T P R$ F"<c Q P > ln 1 Q _, : " . F R ^ p !!IL 12 !!IL 41 !!IL 55 010101010101010101010101010101010101010101 EXTRN IH0000!!CH $$ILLINT XX$$IHAABB XX$$ DC A ON A L T M A :
0x09c3c0…09c554 (0, 198) Dummy {f00=0x002f, f01=0x0190, f02=» 2325042043044045046047048049050051052053054055056057058059060061062063064065LED PFTAB
0x09c554…09c6e8 Dummy {f00=0x002f, f01=0x0190, f02=» @ A @ A @ @{f @{h @ P @tP Ar @tR Ar @tN Ar @tL Ar T @ T : $R P =W _ $R P =W _ @r T = @ T = @r @r T = @ T = @ T = @ T = @r T = @ T = @r
0x09c6e8…09c87c Dummy {f00=0x002f, f01=0x0190, f02=» = @ P @(`! T =W p @r T @ P = @ P =W p @r T @ P =W @ P =W p @r T @ P =W p @r T @ P =W p @ T @r P x =W @ P =W p @ T @r P l =W @ P =W p @ T, @ P @' !
0x09c87c…09ca10 Dummy {f00=0x002f, f01=0x0190, f02=» =W p @r T p @r P @6,! R W p @r P @6,! R W p @r P p @r P p @r P p @r P p @r T p : 8 P&P $ A N D A P D A R H _. : DATA F T RJT _ L P
0x09ca10…09cba4 Dummy {f00=0x002f, f01=0x0190, f02=»T1 CHRT2 CHRT3 CHRT4 IHCC1 IHCC2 IHCC3 CHLT1 CHLT2 CHLT3 CHLT4 IHLP IHCR IHDU1 IHDU2 IHMT IHCD IHMD IHPLIHSVU1IHPVU1IHSVU2IHPVU2IHSVU3IHPVU3IHSVU4IHPVU4IHSVU5IHPVU5IHSVU6IHPVU6 ISLCI ISLCOIHPL01IHPL02IHPL03IHPL04IHPR01IHPR02IHPR03IHPR04IASCUZ
0x09cba4…09cd38 Dummy {f00=0x002f, f01=0x0190, f02=» H ~ r f Z 0 < $ B !!DL 115,1770715178182 2213 2325010101010101010101010101010101010101010101 !99
0x09cd38…09cecc Dummy {f00=0x002f, f01=0x0190, f02=» j J @ P~ % j . ~ j > @ j! A|B A A ^ C @ j! A A ^ C : b T : L JR _ L J,0 ) $ ) I :' d !!CH $$ X:A$$ $$ SUPPORT OF OUTPUT/EXTEND AND
0x09cecc…09d060 Dummy {f00=0x002f, f01=0x0190, f02=» A] AY S AY} 01 AY~ r AK AK t AKD AL : AKP f P t t W2 01 A J t t J 7 : , j @ x x DEFINE SPECIAL DEVICE-CLASSES FILE CODE FIXED DISC : UN
0x09d060…09d1f4 (0, 199) Dummy {f00=0x0030, f01=0x0190, f02=» FILE CODE : INPUT FILE CODE : OUTPUT FILE CODE : BACKSPACE KEY : CANCEL KEY : END OF RECORD KEY : INPUT FILE CODE : OUTPUT FILE CODE : FILE CODE LEFT DISC : DISC
0x09d1f4…09d388 Dummy {f00=0x0030, f01=0x0190, f02=» INPUT FILE CODE : LINE NUMBER : OUTPUT FILE CODE : FILE CODE : UNIT NUMBER : @ @{f @{h @ PR @r P AtN Ar @r P AtL Ar @r AtP Ar @r AtR Ar @ @ @ P DM Ar : Lr P
0x09d388…09d51c Dummy {f00=0x0030, f01=0x0190, f02=» / KPF /O 0 KPF /S 0 SCR 0 $ LED MONTAB 0 0 !!IL 25 0 B **** 0 R !!IL 50 0 ^ **** 0 n !!DL 081 0 z !!DL 082 0 !!DL 083 0 !!DL 084 0 !!DL 085 0 !!DL 086 0 !!DL 087 0 !!DL 089 0 !!DL 090 0
0x09d51c…09d6b0 Dummy {f00=0x0030, f01=0x0190, f02=»00 0 !!DL 101 1 !!DL 102 1 !!EN 1 * ASM /S 1 6 KPF /O 1 D KPF /S 1 R SCR 1 ` LED SYSLDM 1 l !!CH $$ X:A$$ 01$$ 1 ~ !!CH $$ X:B$$ 01$$ 1 !!CH $$ X:C$$ 00$$ 1 !!CH $$ X:D$$ 00$$ 1 !!CH $$ X:E$$ 00$$ 1 !!CH $$
0x09d6b0…09d844 Dummy {f00=0x0030, f01=0x0190, f02=»008$$ 1 !!CH $$ X:L$$ 01$$ 2 !!CH $$ X:M$$ 00$$ 2 ( ( #!!CH $$CPU857 EQU 0$$CPU857 EQU 1$$ 2 B ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ 2 n ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ 2 ( #!!CH $$DSKPAG EQU 0$$DSKPAG EQU 1$$ 2 !!EN 2 ASM /S 2
0x09d844…09d9d8 Dummy {f00=0x0030, f01=0x005a, f02=» 2 INC SYSLCO 3 INC SYSINI 3 LKE M 3 , KPF /L,Y 3 : ASG /E0,TY10 3 J857 EQU 1$$ 2 B ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ 2 n ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ 2 ( #!!CH $$DSKPAG EQU 0$$DSKPAG EQU 1$$ 2 !!EN 2 ASM /S 2
0x09d9d8…09db6c Dummy {f00=0x0030, f01=0x2008, f02=» 4 INC SYSLCO 3 INC SYSINI 3 LKE M 3 , KPF /L,Y 3 : ASG /E0,TY10 3 J857 EQU 1$$ 2 B ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ 2 n ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ 2 ( #!!CH $$DSKPAG EQU 0$$DSKPAG EQU 1$$ 2 !!EN 2 ASM /S 2
0x09db6c…09dd00 Dummy {f00=0x0030, f01=0x0000, f02=»
0x09dd00…09de94 (0, 200) Opaque[0x194]
0x09de94…09e028 # DirEnt {nam=»EDIT «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0608, f03=0x0000}
0x09de94…09e028 IdxSect {
0x09de94…09e028 f00 = 0x0030 // 0x9de94 @0x0
0x09de94…09e028 f01 = 0x003c // 0x9de96 @0x2
0x09de94…09e028 gno = [ // 0x9de98 @0x4
0x09de94…09e028 [0x00]: C0x0030.0x1.0
0x09de94…09e028 [0x01]: C0x0030.0x2.0
0x09de94…09e028 [0x02]: C0x0030.0x3.0
0x09de94…09e028 [0x03]: C0x0031.0x0.0
0x09de94…09e028 [0x04]: C0x0031.0x1.0
0x09de94…09e028 [0x05]: C0x0031.0x2.0
0x09de94…09e028 [0x06]: C0x0031.0x3.0
0x09de94…09e028 [0x07]: C0x0032.0x0.0
0x09de94…09e028 [0x08]: C0x0032.0x1.0
0x09de94…09e028 [0x09]: C0x0032.0x2.0
0x09de94…09e028 [0x0a]: C0x0032.0x3.0
0x09de94…09e028 [0x0b]: C0x0033.0x0.0
0x09de94…09e028 [0x0c]: C0x0033.0x1.0
0x09de94…09e028 [0x0d]: C0x0033.0x2.0
0x09de94…09e028 [0x0e]: C0x0033.0x3.0
0x09de94…09e028 [0x0f]: C0x0034.0x0.0
0x09de94…09e028 [0x10]: C0x0034.0x1.0
0x09de94…09e028 [0x11]: C0x0034.0x2.0
0x09de94…09e028 [0x12]: C0x0034.0x3.0
0x09de94…09e028 [0x13]: C0x0035.0x0.0
0x09de94…09e028 [0x14]: C0x0035.0x1.0
0x09de94…09e028 [0x15]: C0x0035.0x2.0
0x09de94…09e028 [0x16]: C0x0035.0x3.0
0x09de94…09e028 [0x17]: C0x0036.0x0.0
0x09de94…09e028 [0x18]: C0x0036.0x1.0
0x09de94…09e028 [0x19]: C0x0036.0x2.0
0x09de94…09e028 [0x1a]: C0x0036.0x3.0
0x09de94…09e028 [0x1b]: C0x0037.0x0.0
0x09de94…09e028 [0x1c]: C0x0037.0x1.0
0x09de94…09e028 [0x1d]: C0x0037.0x2.0
0x09de94…09e028 ]
0x09de94…09e028 }
0x09e028…09e1bc Dummy {f00=0x0030, 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
0x09e1bc…09e350 Dummy {f00=0x0030, f01=0x0190, f02=» ? : ? : a b @ P , 4 6 @ T h " b
0x09e350…09e4e4 Dummy {f00=0x0030, f01=0x0190, f02=» @ T $ . @ P L ` " @ P 6 4 v
0x09e4e4…09e678 Dummy {f00=0x0030, 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> > @ @
0x09e678…09e80c Dummy {f00=0x0030, 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 @
0x09e80c…09e9a0 Dummy {f00=0x0030, f01=0x0190, f02=» P j @ > A $ @ * @ @ P & > @ @ ( P @" @ P " ( > @ @ , P , : @ & @ Z @ 8 B ` B @ ( P
0x09e9a0…09eb34 (0, 201) Dummy {f00=0x0030, f01=0x0190, f02=» @ & P @ @ > > , : * @ *" " " " "
0x09eb34…09ecc8 Dummy {f00=0x0030, f01=0x0190, f02=» H A @ : p @ P0 @ A @ P ( A A ( A P J A
0x09ecc8…09ee5c Dummy {f00=0x0030, f01=0x0190, f02=» A : A A A : 0 I @" @ P 0 " " @" @" Q @" U @ r :
0x09ee5c…09eff0 Dummy {f00=0x0030, f01=0x0190, f02=» ` @ P Z > @ Z " " " @ A @ A @ A b @ P : @ A @ A @ A . @ P 2 : Z
0x09eff0…09f184 Dummy {f00=0x0030, f01=0x0190, f02=» 0 I ` @ R " 6 @ ` U f | @ _2 v v _8 "
0x09f184…09f318 Dummy {f00=0x0030, 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
0x09f318…09f4ac Dummy {f00=0x0030, f01=0x0190, f02=» 0 I " " @ @ @" Q : TYDY R J 0 I V N . @ $ P x @ * $ @ $ @ & T Z @ $ @ (
0x09f4ac…09f640 Dummy {f00=0x0030, 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
0x09f640…09f7d4 (0, 202) Dummy {f00=0x0030, 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 :
0x09f7d4…09f968 Dummy {f00=0x0030, f01=0x0190, f02=»
0x09f968…09fafc Dummy {f00=0x0030, f01=0x0190, f02=» NO @ ! @ P A 0 ( @ A @ D . @ , @ LPP DYP< TYP6 A PV 1 _ A ( @ P A , Q : A ) P$ $ T _ T _ P ) _( .
0x09fafc…09fc90 Dummy {f00=0x0030, f01=0x0190, f02=» + . ) P 8 T I _ ) _ . A ( T 1 A . A ( . < 2 b 0 I n f n @ @
0x09fc90…09fe24 Dummy {f00=0x0030, 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 _ :
0x09fe24…09ffb8 Dummy {f00=0x0030, 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 @ |
0x09ffb8…0a014c Dummy {f00=0x0030, 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
0x0a014c…0a02e0 Dummy {f00=0x0030, 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 : :
0x0a02e0…0a0474 (0, 203) Dummy {f00=0x0031, f01=0x0190, f02=»
[…0x1f…]
0x0a3560…0a36f4 (0, 207) Dummy {f00=0x0032, f01=0x0190, f02=»
[…0xb…]
0x0a4850…0a49e4 Dummy {f00=0x0032, f01=0x0190, f02=» A
0x0a49e4…0a4b78 Dummy {f00=0x0032, f01=0x0190, f02=» _| A z _ A z * _ A z _
0x0a4b78…0a4d0c Dummy {f00=0x0032, 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
0x0a4d0c…0a4ea0 Dummy {f00=0x0032, f01=0x0190, f02=» e 0 Ie e e " d c d d @e Ae e e d @e T e e&
0x0a4ea0…0a5034 (0, 209) Dummy {f00=0x0032, 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
0x0a5034…0a51c8 Dummy {f00=0x0032, 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
0x0a51c8…0a535c Dummy {f00=0x0032, 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 :
0x0a535c…0a54f0 Dummy {f00=0x0032, 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
0x0a54f0…0a5684 Dummy {f00=0x0032, 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
0x0a5684…0a5818 Dummy {f00=0x0032, 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
0x0a5818…0a59ac Dummy {f00=0x0032, 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
0x0a59ac…0a5b40 Dummy {f00=0x0032, 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
0x0a5b40…0a5cd4 (0, 210) Dummy {f00=0x0032, 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
0x0a5cd4…0a5e68 Dummy {f00=0x0032, 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 :
0x0a5e68…0a5ffc Dummy {f00=0x0032, 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@
0x0a5ffc…0a6190 Dummy {f00=0x0032, 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
0x0a6190…0a6324 Dummy {f00=0x0032, 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
0x0a6324…0a64b8 Dummy {f00=0x0032, 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
0x0a64b8…0a664c Dummy {f00=0x0032, 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
0x0a664c…0a67e0 Dummy {f00=0x0032, 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 "
0x0a67e0…0a6974 (0, 211) Dummy {f00=0x0033, 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
0x0a6974…0a6b08 Dummy {f00=0x0033, 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
0x0a6b08…0a6c9c Dummy {f00=0x0033, 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
0x0a6c9c…0a6e30 Dummy {f00=0x0033, 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"
0x0a6e30…0a6fc4 Dummy {f00=0x0033, 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
0x0a6fc4…0a7158 Dummy {f00=0x0033, 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 | | }
0x0a7158…0a72ec Dummy {f00=0x0033, 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
0x0a72ec…0a7480 Dummy {f00=0x0033, f01=0x0190, f02=» @} @} P @ @} @} P @ ~ ~ } } d @} @} P @} @} P @ ~ 2 @} r Z @ @} } d @} @} P P ~ } d v } z : } } ~ }
0x0a7480…0a7614 (0, 212) Dummy {f00=0x0033, f01=0x0190, f02=» @ A 4 @ A k& @ P > X : ` @" P t_ : aN * 0 I @ @ ` V
0x0a7614…0a77a8 Dummy {f00=0x0033, f01=0x0190, f02=» @ A @ A . @ A @ A . @ " A @ A @ A . @ A @ A . : 0 I ` ` Q f r ( &
0x0a77a8…0a793c Dummy {f00=0x0033, 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
0x0a793c…0a7ad0 Dummy {f00=0x0033, f01=0x0190, f02=» @ N T 0 I @ A Z @ z @ z @ | T z x @ ~ Z @ ` @ P . : | x @ ~ @ A Z @
0x0a7ad0…0a7c64 Dummy {f00=0x0033, 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
0x0a7c64…0a7df8 Dummy {f00=0x0033, 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
0x0a7df8…0a7f8c Dummy {f00=0x0033, 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
0x0a7f8c…0a8120 Dummy {f00=0x0033, 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
0x0a8120…0a82b4 (0, 213) Dummy {f00=0x0033, 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 .
0x0a82b4…0a8448 Dummy {f00=0x0033, 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
0x0a8448…0a85dc Dummy {f00=0x0033, f01=0x0190, f02=»
0x0a85dc…0a8770 Dummy {f00=0x0033, 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 "
0x0a8770…0a8904 Dummy {f00=0x0033, 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
0x0a8904…0a8a98 Dummy {f00=0x0033, 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
0x0a8a98…0a8c2c Dummy {f00=0x0033, 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
0x0a8c2c…0a8dc0 Dummy {f00=0x0033, 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
0x0a8dc0…0a8f54 (0, 214) Dummy {f00=0x0033, 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
0x0a8f54…0a90e8 Dummy {f00=0x0033, 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
0x0a90e8…0a927c Dummy {f00=0x0033, 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
0x0a927c…0a9410 Dummy {f00=0x0033, 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
0x0a9410…0a95a4 Dummy {f00=0x0033, 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
0x0a95a4…0a9738 Dummy {f00=0x0033, 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
0x0a9738…0a98cc Dummy {f00=0x0033, 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
0x0a98cc…0a9a60 Dummy {f00=0x0033, 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
0x0a9a60…0a9bf4 (0, 215) Dummy {f00=0x0034, f01=0x0190, f02=» mX 0 Imd m @" @l P m m* l l mJ " l mT Z " mf mf " l mX :" l
0x0a9bf4…0a9d88 Dummy {f00=0x0034, 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
0x0a9d88…0a9f1c Dummy {f00=0x0034, f01=0x0190, f02=»d dp Z @d d `d @c P d: dN c d d^ c d d c c dt :c c
0x0a9f1c…0aa0b0 Dummy {f00=0x0034, 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
0x0aa0b0…0aa244 Dummy {f00=0x0034, 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"
0x0aa244…0aa3d8 Dummy {f00=0x0034, 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
0x0aa3d8…0aa56c Dummy {f00=0x0034, 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
0x0aa56c…0aa700 Dummy {f00=0x0034, f01=0x0190, f02=»
[…0x1…]
0x0aa894…0aaa28 Dummy {f00=0x0034, 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
0x0aaa28…0aabbc Dummy {f00=0x0034, 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
0x0aabbc…0aad50 Dummy {f00=0x0034, f01=0x0190, f02=»_ A z _ A z > _(
0x0aad50…0aaee4 Dummy {f00=0x0034, f01=0x0190, f02=»
[…0x1…]
0x0ab078…0ab20c Dummy {f00=0x0034, 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
0x0ab20c…0ab3a0 Dummy {f00=0x0034, 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
0x0ab3a0…0ab534 (0, 217) Dummy {f00=0x0034, 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
0x0ab534…0ab6c8 Dummy {f00=0x0034, 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
0x0ab6c8…0ab85c Dummy {f00=0x0034, 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
0x0ab85c…0ab9f0 Dummy {f00=0x0034, 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 @
0x0ab9f0…0abb84 Dummy {f00=0x0034, 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
0x0abb84…0abd18 Dummy {f00=0x0034, 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
0x0abd18…0abeac Dummy {f00=0x0034, 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
0x0abeac…0ac040 Dummy {f00=0x0034, 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
0x0ac040…0ac1d4 (0, 218) Dummy {f00=0x0034, 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
0x0ac1d4…0ac368 Dummy {f00=0x0034, 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
0x0ac368…0ac4fc Dummy {f00=0x0034, 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 @
0x0ac4fc…0ac690 Dummy {f00=0x0034, f01=0x0190, f02=» ~ Z @ @}| }Z ~ @} @} P ~ ~ } }Z ~ }Z : }| }|} }^ 0 I @ @ R p x " :
0x0ac690…0ac824 Dummy {f00=0x0034, f01=0x0190, f02=» 0 I ( " ( ` P " : @ * Z " ` @ , V @ * Z " & &
0x0ac824…0ac9b8 Dummy {f00=0x0034, f01=0x0190, f02=» @ A w " : @ * Z " & @ ( Z " , " : $ * & 0 I @ A | @ A ~ | ` ` P n v :
0x0ac9b8…0acb4c Dummy {f00=0x0034, f01=0x0190, f02=» " " " :" 0 I @ A Z @ ` & @ & ` Q & @ ( &_2 Z @ ` ` P ( $ $ :_T * $ $ : , & ,
0x0acb4c…0acce0 Dummy {f00=0x0034, 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
0x0acce0…0ace74 (0, 219) Dummy {f00=0x0035, 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
0x0ace74…0ad008 Dummy {f00=0x0035, 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
0x0ad008…0ad19c Dummy {f00=0x0035, 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
0x0ad19c…0ad330 Dummy {f00=0x0035, 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
0x0ad330…0ad4c4 Dummy {f00=0x0035, 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
0x0ad4c4…0ad658 Dummy {f00=0x0035, 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
0x0ad658…0ad7ec Dummy {f00=0x0035, 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
0x0ad7ec…0ad980 Dummy {f00=0x0035, 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
0x0ad980…0adb14 (0, 220) Dummy {f00=0x0035, 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
0x0adb14…0adca8 Dummy {f00=0x0035, 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
0x0adca8…0ade3c Dummy {f00=0x0035, 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
0x0ade3c…0adfd0 Dummy {f00=0x0035, 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{ @
0x0adfd0…0ae164 Dummy {f00=0x0035, f01=0x0190, f02=»x { : x | x | x x | x xZ xp | 0 I| | | | | Z @| | `| @| T |` |v | | @| | _B | Z @| | `| `| P | | | |
0x0ae164…0ae2f8 Dummy {f00=0x0035, f01=0x0190, f02=» @~ A} @~ A} } u ~$ @~ A} } | | @~ A} } Z @~ ~$ @~ A} @~$ A} } | | @| @| U } } } | @| | _2 ~ Z @~ ~$ @~$ A~ @~ A~ @~ A~ @~" A~ ~ th | _P ~ : ~$ | | |
0x0ae2f8…0ae48c Dummy {f00=0x0035, 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
0x0ae48c…0ae620 Dummy {f00=0x0035, 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
0x0ae620…0ae7b4 (0, 221) Dummy {f00=0x0035, 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
0x0ae7b4…0ae948 Dummy {f00=0x0035, 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
0x0ae948…0aeadc Dummy {f00=0x0035, 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
0x0aeadc…0aec70 Dummy {f00=0x0035, 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
0x0aec70…0aee04 Dummy {f00=0x0035, f01=0x0190, f02=»" j
0x0aee04…0aef98 Dummy {f00=0x0035, 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
0x0aef98…0af12c Dummy {f00=0x0035, 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
0x0af12c…0af2c0 Dummy {f00=0x0035, 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
0x0af2c0…0af454 (0, 222) Dummy {f00=0x0035, 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
0x0af454…0af5e8 Dummy {f00=0x0035, 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
0x0af5e8…0af77c Dummy {f00=0x0035, 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 :
0x0af77c…0af910 Dummy {f00=0x0035, 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
0x0af910…0afaa4 Dummy {f00=0x0035, 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,
0x0afaa4…0afc38 Dummy {f00=0x0035, 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
0x0afc38…0afdcc Dummy {f00=0x0035, 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
0x0afdcc…0aff60 Dummy {f00=0x0035, 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
0x0aff60…0b00f4 (0, 223) Dummy {f00=0x0036, 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
0x0b00f4…0b0288 Dummy {f00=0x0036, 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
0x0b0288…0b041c Dummy {f00=0x0036, 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
0x0b041c…0b05b0 Dummy {f00=0x0036, 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
0x0b05b0…0b0744 Dummy {f00=0x0036, 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
0x0b0744…0b08d8 Dummy {f00=0x0036, 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
0x0b08d8…0b0a6c Dummy {f00=0x0036, f01=0x0190, f02=»| Q { { {d {b { @| A{ { Z @| | | | | @{f | {f {b {b { : {h * 0 I | | | | | v Z @ ` @| T |~ | d @ A z z
0x0b0a6c…0b0c00 Dummy {f00=0x0036, f01=0x0190, f02=» @| T } } }Z_2 @ A @ A @ @| P }T }X }Z_< | @| Z @ | @| | @| Z @ | | | ` @ A @ A @ @| P } ` @| @| Q ~
0x0b0c00…0b0d94 (0, 224) Dummy {f00=0x0036, f01=0x0190, f02=» ~ _n @| @| U ~ ~ | | | : | @| Z @ | @| Z @ @| | @| | | @| Z @ | @| Z @ ` | | | | | :| | | | |
0x0b0d94…0b0f28 Dummy {f00=0x0036, f01=0x0190, f02=» @ $ $ @ @ T , " @ $ Z @ & ` & @ P j v " @ " @ " A Z @ $ $ @ @ P @ @ P
0x0b0f28…0b10bc Dummy {f00=0x0036, f01=0x0190, f02=» @ A Z @ ` @ 0 P @ A @ A {j * @ . @ A @ A {j * , @ A @ A {j * @ A @ A @ A @ A Z @ @ , @ . @ A Z @
0x0b10bc…0b1250 Dummy {f00=0x0036, 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
0x0b1250…0b13e4 Dummy {f00=0x0036, f01=0x0190, f02=» ` ` n @ , P ~ * @ @ 2 P @ @ 4 T , @ @ 6 P @ @ 4 P * @ @ 8 P 8 r @ , t @ p A R P j @ ,
0x0b13e4…0b1578 Dummy {f00=0x0036, 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 @
0x0b1578…0b170c Dummy {f00=0x0036, 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
0x0b170c…0b18a0 Dummy {f00=0x0036, 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
0x0b18a0…0b1a34 (0, 225) Dummy {f00=0x0036, 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
0x0b1a34…0b1bc8 Dummy {f00=0x0036, 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
0x0b1bc8…0b1d5c Dummy {f00=0x0036, 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 @
0x0b1d5c…0b1ef0 Dummy {f00=0x0036, 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
0x0b1ef0…0b2084 Dummy {f00=0x0036, f01=0x0190, f02=» v d8 cF cL c@ c@ dB : cDaNcBcHdTcHcJ
0x0b2084…0b2218 Dummy {f00=0x0036, 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
0x0b2218…0b23ac Dummy {f00=0x0036, 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
0x0b23ac…0b2540 Dummy {f00=0x0036, 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
0x0b2540…0b26d4 (0, 226) Dummy {f00=0x0036, 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
0x0b26d4…0b2868 Dummy {f00=0x0036, 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
0x0b2868…0b29fc Dummy {f00=0x0036, 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
0x0b29fc…0b2b90 Dummy {f00=0x0036, 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
0x0b2b90…0b2d24 Dummy {f00=0x0036, 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
0x0b2d24…0b2eb8 Dummy {f00=0x0036, 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
0x0b2eb8…0b304c Dummy {f00=0x0036, 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 @
0x0b304c…0b31e0 Dummy {f00=0x0036, 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
0x0b31e0…0b3374 (0, 227) Dummy {f00=0x0037, 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|
0x0b3374…0b3508 Dummy {f00=0x0037, 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
0x0b3508…0b369c Dummy {f00=0x0037, 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
0x0b369c…0b3830 Dummy {f00=0x0037, 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~
0x0b3830…0b39c4 Dummy {f00=0x0037, 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 @|
0x0b39c4…0b3b58 Dummy {f00=0x0037, 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
0x0b3b58…0b3cec Dummy {f00=0x0037, 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
0x0b3cec…0b3e80 Dummy {f00=0x0037, f01=0x0190, f02=» T } }* }r | @| | _B @} A} @} A} } V @| Q }^ }p | | | } :_Z | | | } :| | | ~ 0 I~ ~ ~ @} } } @} R } } " } } ~ :
0x0b3e80…0b4014 (0, 228) Dummy {f00=0x0037, 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 ~ ~ :~ ~( ~ ~"~$ ~"~& ~" ~"
0x0b4014…0b41a8 Dummy {f00=0x0037, f01=0x0190, f02=» Z @ 8 > 6 > : @ : * : * 0 I J B D L F Z @ ` @ J T @ A @ F F_N Z @ ` @ N P
0x0b41a8…0b433c Dummy {f00=0x0037, 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
0x0b433c…0b44d0 Dummy {f00=0x0037, 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
0x0b44d0…0b4664 Dummy {f00=0x0037, 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
0x0b4664…0b47f8 Dummy {f00=0x0037, 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
0x0b47f8…0b498c Dummy {f00=0x0037, f01=0x0190, f02=»IN OMATCH CAN'T HAPPEN A % ? $ [ N 0 I ` < @ A ~ ~ Z @ > @ A ~ ~ Z @ @ @ > @ ` P < : b B @ @ @ d P . x @ b Z @ @ >
0x0b498c…0b4b20 Dummy {f00=0x0037, 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
0x0b4b20…0b4cb4 (0, 229) Dummy {f00=0x0037, 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
0x0b4cb4…0b4e48 Dummy {f00=0x0037, 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
0x0b4e48…0b4fdc Dummy {f00=0x0037, 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
0x0b4fdc…0b5170 Dummy {f00=0x0037, 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 @
0x0b5170…0b5304 Dummy {f00=0x0037, f01=0x0190, f02=» Z @ 2 z x : > 2 > : > p 0 I | t @ A h h Z @ ~ ` @ ` Q V @ _2 l Z @ ~
0x0b5304…0b5498 Dummy {f00=0x0037, f01=0x0190, f02=» 0 I @ @ @ A @ A @ A r @ A Z @ @ A @ A r @ @ U H ^ @ _2 Z @ @ A @ A @ A @ A
0x0b5498…0b562c Dummy {f00=0x0037, 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
0x0b562c…0b57c0 Dummy {f00=0x0037, 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 !
0x0b57c0…0b5954 (0, 230) Opaque[0x194]
0x0b5954…0b5ae8 # DirEnt {nam=»OBDIR «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x06f8, f03=0x0000}
0x0b5954…0b5ae8 IdxSect {
0x0b5954…0b5ae8 f00 = 0x0037 // 0xb5954 @0x0
0x0b5954…0b5ae8 f01 = 0x000a // 0xb5956 @0x2
0x0b5954…0b5ae8 gno = [ // 0xb5958 @0x4
0x0b5954…0b5ae8 [0x00]: C0x0037.0x3.0
0x0b5954…0b5ae8 [0x01]: C0x0038.0x0.0
0x0b5954…0b5ae8 [0x02]: C0x0038.0x1.0
0x0b5954…0b5ae8 [0x03]: C0x0038.0x2.0
0x0b5954…0b5ae8 [0x04]: C0x0038.0x3.0
0x0b5954…0b5ae8 ]
0x0b5954…0b5ae8 }
0x0b5ae8…0b5c7c Dummy {f00=0x0037, f01=0x000c, f02=» ! Y T:IO2 T:IPOS $ T:WRIX T:IXCH T:IXID : L T:RSTA T:SCW2 T:IO3 T:OPCH I:ERR3 T:STCH I:ERR6 T:IXCH I:ERR7 T:DMDI T:DDIS T:DSB T:OPCH T:STCH T:SCW2 T
0x0b5c7c…0b5e10 Dummy {f00=0x0037, f01=0x0190, f02=» ZFMOVE FMOVE I:EVA0 I:ERR2 I:EVA5 I:ER18 I:RT1 4 FTYPET TYPET I:EVA0 I:ERR2 I:RT1 >ICLEAR ICLEAR I:EVA0 I:RT1 $ >EMPTYT EMPTYT
0x0b5e10…0b5fa4 Dummy {f00=0x0037, f01=0x0190, f02=» I:ERR2 I:MOV T:GRFC T:ROK 0 T:STOU STROU1 T:STEV T:LOFS I:EVA0 T:LOPS I:ER17 I:ERR2 T:DUPX T:GRFC T:ROK T:RNOK JT:STEV T:STEV T:GRFC I:EVA0 I:ERR2 <
0x0b5fa4…0b6138 Dummy {f00=0x0037, f01=0x0190, f02=»:BELL T:CLR1 T:CLR2 T:CLIT T:EKEY T:DYKI T:DYKI T:PRKB T:PRDY I:EVA7 T:CASP T:CLRD T:EKEY T:RCR T:IOER J T:CLR1 X T:CLR2 f T:SCUW T:BELL T:IOWR T:CLIT : T:LOFS I:EVA0
0x0b6138…0b62cc Dummy {f00=0x0037, f01=0x0190, f02=» T:LOFS I:EVA0 T:LOPS I:ERR2 I:MOV T:RCR T:REWR T:RCTS ` T:DUPL T:DUPL T:GRFC I:EVA0 I:ERR2 T:RNOK T:ROK T:DUPX T:LOFS T:LOPS I:MOV h T:GETC T:GETC T:GRFC
0x0b62cc…0b6460 Dummy {f00=0x0037, f01=0x0190, f02=»:RCR 0 JT:TSTC T:TSTC T:GRFC I:ER14 T:RTES < T:TFWD T:TLEF T:TRIG T:TLDO T:TDOW T:TUP T:TFWD T:TBWD T:THOM " T:PRDY T:GRFC T:TABE T:SCR2 T:TABC T:T
0x0b6460…0b65f4 (0, 231) Dummy {f00=0x0038, f01=0x0190, f02=»:GTIT T:PRDY I:ER15 I:ER14 T:TABD T:TABC T:RNOK I:RT1 T:CLDY T:WRDY T:EDIO ~ T:GETF " T:GETF T:PRDY I:ER14 T:TABC T:TABN T:GTIT 4 T:GRFC T:GTIP D I:EVA0 I:EVA2 I:ER15 I:ERR2
0x0b65f4…0b6788 Dummy {f00=0x0038, f01=0x0190, f02=» T:LOPS I:EVA0 I:ECPY I:EVI >T:DEDT & I:EVNO I:ESKI I:EVA0 I:EBRI I:EBRB I:EBR I:ECWC I:EXIT I:EFLA T:DNL T:TINP T:TKI T:DSL I:RET T:TABC * T:TABD . T:TABE 2 T:EDWI I:EVT I:EDSK
0x0b6788…0b691c Dummy {f00=0x0038, f01=0x0190, f02=» I:ECPY I:EPIC I:ETXT I:ETAB I:EBRI I:EBRB I:EBR I:EOR I:EXIT I:ECW I:EFLA T:PINP T:PKI I:EFIL I:ESKI I:EXPY I:RET T:DSL * T:GRFC T:DNL 8 T:WRDY I:ENL I:ESL I:ECTR I:ER16 T:ENIN T:EINP
0x0b691c…0b6ab0 Dummy {f00=0x0038, f01=0x0190, f02=»NI I:EXIT T:WRDY T:CLMI I:EVA0 T:CLDY T:ENIN 4 T:ENIN T:ENI T:LOFS I:EGTB T:WRDY I:EVA0 I:EVA1 I:ECPY T:EVOU X I:EVI I:EVA3 I:EPIC jT:SETC 7 T:SETC T:PRDY
0x0b6ab0…0b6c44 Dummy {f00=0x0038, f01=0x0190, f02=»:DETF T:ATTF I:EVA6 I:FFSN T:ROK ( T:RCR * I:RT1 T:RCTS 6 T:RTES : T:RNOK < T:GRFC @ T:WRDY H T:EDIO T:CLDY T:PRKB l T:DS25 T:PRDY T:DS15 T:DSM bT:LSEG < T:LSEG T:CSEG I
0x0b6c44…0b6dd8 Dummy {f00=0x0038, f01=0x0190, f02=» T:DCE1 6T:SWI0 ? T:SWIT SWITCH JT:TEI0 @ T:TEST TESTIO T:ABOR ABORT LT:CLO0 A T:SETT SETTIM T:GETT GETTIM 4T:DEL0 B T:DEL
0x0b6dd8…0b6f6c Dummy {f00=0x0038, f01=0x0190, f02=» T:DCWR T:DCW1 T:EDIO I:ERR T:IO2 T:DCEX 2 T:DCE1 6 I:EVA0 4T:SWI F T:SWIT I:RT1 fT:TEI G T:TEST T:GDSP T:DSR I:RT1 T:ABOR T:KIAA T:KIAC N tT:CLO I
0x0b6f6c…0b7100 Dummy {f00=0x0038, f01=0x0190, f02=»ELA I:EVA0 I:ERR I:RT1 $ DT:MSK0 L MASK I:EVA0 I:RT1 I:ERR ( zT:SCD M T:ACTV P:BAS I:ERR4 I:NTPB T:BAT T:RSTR L I:EVA0 T:PAUS l I:RT1 ~ T:USE O T
0x0b7100…0b7294 (0, 232) Dummy {f00=0x0038, f01=0x0190, f02=»ERR ,T:EXIT T T:EXIT ZT:GTCW U T:GDSP GETCW I:EVA0 T:BINB T:GTCW I:RT1 & FT:GTID V T:GETI I:EVA0 I:RT1 I:ERR . T:DMR W T:DREA T
0x0b7294…0b7428 Dummy {f00=0x0038, f01=0x0190, f02=» T:WRIX T:STCH T:IO1 T:XWRI T:DWRI T:OPCH T:SCW2 T:IO2 T:DREW 0 T:IWRI < T:IXCH T:CREW N T:IREW p .T:DCC [ T:COPE T:COP1 T:DSB T:SCW2 T:WRIO T:IO1 T:CCLO " T:CCL1 & T:CCL
0x0b7428…0b75bc Dummy {f00=0x0038, f01=0x0190, f02=» T:DIS4 T:STCW T:OPT I:EVA0 ~T:DCR _ T:RECE T:REC1 T:REAX T:OPT T:IO2 T:AREC T:ARE1 $ T:STCW T:SCW2 D ~T:DCS a T:SEND T:SEN1 T:WRIX T:OPT T:IO1 T:ASEN
0x0b75bc…0b7750 Dummy {f00=0x0038, f01=0x0190, f02=» T:WRIO & I:EVA0 T:SREA B T:READ B T:REAX J T:DSC0 p T:DSC1 T:DSC2 T:XSTA T:WAIT T:MWAI T:IO1 , T:IO2 0 T:IO3 4 I:ER19 T:IO5 F T:IORE J T:GCW2 T:GTCW I:RT1 T:IOEN T:EDWR I:EDW T:EDWE
0x0b7750…0b78e4 Dummy {f00=0x0038, f01=0x0190, f02=»A T:DS15 T:DS25 I:ER1D I:ER12 I:ER1E T:DSM F T:DSB ` T:FDSP n T:GTBY T:SCW2 T:DSCX I:EVA2 I:ERR2 T:SCW0 T:DSR T:CW l T:STCW I:EVA2 T:SCW0 T:BCDB $ T:GTCW I:ERR2
0x0b78e4…0b7a78 Dummy {f00=0x0038, f01=0x0190, f02=» T:ADIT q T:RREA T:DSB T:RRE1 I:EVA0 T:STCW T:IO2 T:RWRI . T:RWR1 2 T:IO1 I:ERR ^ T:KIA s T:KIA T:NKIA T:ABUF T:KIPR T:LSEG T:IORE I:ERR9 I:ER1B T:KIAA T:K
0x0b7a78…0b7c0c Dummy {f00=0x0038, f01=0x0190, f02=» T:IO2 I:ERR Z vI:NTP y I:MOV I:ADD I:SUB I:CMP I:MUL I:DIV I:MMOV I:EDT I:CPY I:INS I:DLT I:MCH I:XCP I:EDS I:TRC N I:RST P T:CSEG I:NTPA T I:NTPB T P:MTAB T:LSEG I:NTP I:PRT I:NTPR
0x0b7c0c…0b7da0 Dummy {f00=0x0038, f01=0x0190, f02=» I:EVA 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:ER22 I:FML I:EVTO I:EVI & I:EVB 8 r PI:ADS I:ADD I:SUB
0x0b7da0…0b7f34 (0, 233) Dummy {f00=0x0038, f01=0x0190, f02=» | >I:MOV I:MOV I:MVC I:ERR8 HI:MMOV I:MMOV I:EVA2 I:EVA0 I:MOV T tI:MUL I:MUL I:ERR2 I:ERR1 I:ERR9 I:MOV I:NTFA I:SUB I:ADD I:SH1L z
0x0b7f34…0b80c8 Dummy {f00=0x0038, f01=0x0190, f02=» ,I:NTF I:NTFA 8 I:EDT 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 | I:EDT I:ED1
0x0b80c8…0b825c Dummy {f00=0x0038, f01=0x0190, f02=»TXT 2 I:EXPY 2 I:ECTR D I:ESL N I:ENL X I:EOR n T:EDWF I:ECW x T:EDWE I:ECWC I:EFIL I:SCB I:ERRD RI:EPIC I:EPIC I:EVA0 I:ERRD I:SCB I:ERRE I:EDTE I:EKIH
0x0b825c…0b83f0 Dummy {f00=0x0038, f01=0x0190, f02=»:EGTD I:EGTB <I:EDS I:EDS I:EVS2 I:ED1 & vI:STR I:DLT I:EVS1 I:MCH " I:INS ~ I:EVS2 I:ERR I:CPY I:XCP I:MVC P TI:EVS I:EVA0 I:EVS1 I:E
0x0b83f0…0b8584 Dummy {f00=0x0038, f01=0x0190, f02=» I:EFLA T:DNL T:DSL STROU2 STRIN2 USRFLD STROUX . STRIX 2 USRFMT 6 T:GRFC T:STEV T:EDWI I:EVT I:EDSK I:RT1 I:EVIN T:EVOU B pSTRIN2 STRIN2 I:EXIT I:EVA0 I:ER17 T:CLMI I:ERR2
0x0b8584…0b8718 Dummy {f00=0x0038, f01=0x0190, f02=»LD USRFLD I:TRA I:ECB I:BUF I:NTR I:HEX I:HEXB I:TRA0 8 I:TRA > P:MTAB I:EVA0 I:HEXW I:TRB I:NTPR I:PRT I:ERR I:ERR0 I:ERR1 I:ERR2
0x0b8718…0b88ac Dummy {f00=0x0038, f01=0x0190, f02=»:ERRE 8 I:ERRF < I:ER10 @ I:ER11 D I:ER12 H I:ER13 L I:ER14 P I:ER15 T I:ER16 X I:ER17 I:ER18 ` I:ER19 d I:ER1A h I:ER1B l I:ER1C p I:ER1D t I:ER1E x I:ER1F | I:ER20 I:ER21 I:ER22 I:ERR T:D
0x0b88ac…0b8a40 Dummy {f00=0x0038, f01=0x0190, f02=»:HEX " LI:CHK I:CHK P:BAS P:END TC:CHK I:ERR 8 TRACHK TC:CHK TT:HLT TT:TRP TT:TRS TT:LOP TT:VON TT:VER TT:VMM TT:TID TT:PRC TT:SNO P:MTAB TB:ENT TC:ABT
0x0b8a40…0b8bd4 (0, 234) Dummy {f00=0x0038, f01=0x0190, f02=» TT:VON TT:VER TT:VMM @ TT:HLT TT:PRC TT:TID TT:SNO TT:MSG TRABUG P:BAS TB:ABT H TB:ENT T P:MTAB TT:PRC TT:SNO TT:TID TT:MSG TB:RDC 8 TT:TRP TT:TRS TT:TON TT:LOP
0x0b8bd4…0b8d68 Dummy {f00=0x0038, f01=0x0190, f02=»CLO Z T:COMM f I:EVA0 I:RT1 T:PCOM T:GTBY T:GDSP T:ROLL T:RSTA T:SCW2 T:IO3 T:OPCH I:ERR3 T:STCH I:ERR6 T:IXCH I:ERR7 T:DMDI T:DDIS T:DSB T:OPCH T:STCH T:SCW2 T
0x0b8d68…0b8efc Dummy {f00=0x0038, f01=0x404c, f02=»CW2 T:GTBY T:IO2 T:IPOS $ T:WRIX T:IXCH T:IXID : L T:RSTA T:SCW2 T:IO3 T:OPCH I:ERR3 T:STCH I:ERR6 T:IXCH I:ERR7 T:DMDI T:DDIS T:DSB T:OPCH T:STCH T:SCW2 T
0x0b8efc…0b9090 Dummy {f00=0x0038, f01=0x0190, f02=» P* BUFFERS * P*********** P* 0 P* : " PBUF1 DATA /020D,/1D00 CR1,APH D P IFT CUTPER=0 j PBUF2 DATA /0209 CR2 P XIF P IFT CUTPER=1 PBUF2 DATA /0309 P XIF P DATA /1D20 APH,SPACE " PBUF3 DAT
0x0b9090…0b9224 Dummy {f00=0x0038, f01=0x0190, f02=»********** P* P* P DATA DVBLEN MMU BUFFER SIZE & P DATA 2 DEVICE INDEX J PTPAD EQU * ADDRESS BLOCK f P DATA ACTP ACTIVATIONDRIVER " P DATA 1 ABORT ROUTINE ADDRESS P DATA IHTP INTERRUPTHANDLER P DATA RCTP RECOVERY
0x0b9224…0b93b8 Dummy {f00=0x0038, f01=0x018e, f02=» P* ( P* TABLE TO GET ACTUAL LF-CHARACTER P* : P* D PLFTAB EQU * N , P DATA /1819 LINE FEED JOURNAL/TALLY ROLL b P IFT CUTPER=1 : PCPTAB DATA /1F0F CODES FOR PERFORATE/CUT JOURNAL TAPE P XIF PTPTAB EQU * ORDER TABL
0x0b93b8…0b954c Dummy {f00=0x0038, f01=0x018e, f02=» | P EJECT P* P* P* A C T P * P* > 2 P* THIS IS THE ACTIVATION PART OF THE DRIVER H > P* CHECKS VALIDITY OF ORDERS AND JUMPS TO ORDER PROCESSOR ~ P* P* P* PACTP EQU * ACTIVATION ENTRY P*
0x0b954c…0b96e0 Dummy {f00=0x0038, f01=0x0190, f02=» & P ADR A7,A1 ADD DWT INDEX TO ORDER , P SC A7,DWTOR+1,A6 SAVE NEW ORDER IN DWT . P LDK A4,0 ACTIVATION ^ PACT005 LDK A3,TPLEN-1 z 2 PACT010 CC A7,TPTAB,A3 FIND OUT IF LEGAL ORDER P RF(E) ACT020 VALID ORDER P SUK A3,1 P RB(NN
0x0b96e0…0b9874 (0, 235) Opaque[0x194]
0x0b9874…0b9a08 # DirEnt {nam=»SUP003«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0720, f03=0x0000}
0x0b9874…0b9a08 IdxSect {
0x0b9874…0b9a08 f00 = 0x0039 // 0xb9874 @0x0
0x0b9874…0b9a08 f01 = 0x0010 // 0xb9876 @0x2
0x0b9874…0b9a08 gno = [ // 0xb9878 @0x4
0x0b9874…0b9a08 [0x00]: C0x0039.0x0.0
0x0b9874…0b9a08 [0x01]: C0x0039.0x1.0
0x0b9874…0b9a08 [0x02]: C0x0039.0x2.0
0x0b9874…0b9a08 [0x03]: C0x0039.0x3.0
0x0b9874…0b9a08 [0x04]: C0x003a.0x0.0
0x0b9874…0b9a08 [0x05]: C0x003a.0x1.0
0x0b9874…0b9a08 [0x06]: C0x003a.0x2.0
0x0b9874…0b9a08 [0x07]: C0x003a.0x3.0
0x0b9874…0b9a08 ]
0x0b9874…0b9a08 }
0x0b9a08…0b9b9c Dummy {f00=0x0039, f01=0x0190, f02=»T >Z R : Z | D )v _ H&2& ' ' ' )
0x0b9b9c…0b9d30 Dummy {f00=0x0039, f01=0x0190, f02=»
0x0b9d30…0b9ec4 Dummy {f00=0x0039, f01=0x0190, f02=» T $ r > 22V4" CH !&" ? > 2V BfRY= AS>:AB? & TY J) V jLP + r DK J DK 8 J
0x0b9ec4…0ba058 Dummy {f00=0x0039, f01=0x0190, f02=» r * ? ? ? ? ? ? ? , Z f Z f D Z f
0x0ba058…0ba1ec Dummy {f00=0x0039, f01=0x0190, f02=» ? ? ? ? ? ? ? Q ? ? ? ? ? ? ? Q ? ? ? ? ? ? ? ^ Q ? ? ? ? ? ? ? Q V t r r r r 0
0x0ba1ec…0ba380 Dummy {f00=0x0039, f01=0x0190, f02=» 6 6 6 6 6
0x0ba380…0ba514 (0, 236) Dummy {f00=0x0039, f01=0x0190, f02=» 6 6 6 h
0x0ba514…0ba6a8 Dummy {f00=0x0039, f01=0x0190, f02=»
[…0x4…]
0x0bacf8…0bae8c Dummy {f00=0x0039, f01=0x0190, f02=» ~
0x0bae8c…0bb020 Dummy {f00=0x0039, f01=0x0190, f02=»
[…0x1…]
0x0bb1b4…0bb348 Dummy {f00=0x0039, f01=0x0190, f02=» X
0x0bb348…0bb4dc Dummy {f00=0x0039, f01=0x0190, f02=»
[…0x3…]
0x0bb998…0bbb2c Dummy {f00=0x0039, f01=0x0190, f02=» @
0x0bbb2c…0bbcc0 Dummy {f00=0x0039, 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
0x0bbcc0…0bbe54 (0, 238) Dummy {f00=0x0039, f01=0x0190, f02=» E > > a @ E @ ? ? > P P Q P ! P @ @2 @ P W $ < A @ 9a:a R0 & Q Q" ?A <P @ ! " _ $ _ _ 0 ! A T @ W @ R (P& P
0x0bbe54…0bbfe8 Dummy {f00=0x0039, 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
0x0bbfe8…0bc17c Dummy {f00=0x0039, 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" @
0x0bc17c…0bc310 Dummy {f00=0x0039, f01=0x0190, f02=» A A ^ 9j =Q > > > > > > > > P @ !@ &" @ P @ X0 , &" A _< U` A% @ , L ? ? , L L L L L L ? ? ? ? ? ? ? @ Px @ > > > > > > > ; [ [ [ [ [ [
0x0bc310…0bc4a4 Dummy {f00=0x0039, 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 [ [
0x0bc4a4…0bc638 Dummy {f00=0x0039, 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
0x0bc638…0bc7cc Dummy {f00=0x0039, 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 C0P C6T Y Y W x Y Y $ 0T W W /X X ? ? ? ? ? ? ? **
0x0bc7cc…0bc960 Dummy {f00=0x0039, 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
0x0bc960…0bcaf4 (0, 239) Dummy {f00=0x003a, f01=0x0190, f02=» 0 X C0P C6T" 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 ? ? ? ? ? ?
0x0bcaf4…0bcc88 Dummy {f00=0x003a, 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 _
0x0bcc88…0bce1c Dummy {f00=0x003a, 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 _
0x0bce1c…0bcfb0 Dummy {f00=0x003a, f01=0x0190, f02=» Y Z(P A0 ZrP Y _8 _< _@ ! - X M A0 T R - 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 > > > > >
0x0bcfb0…0bd144 Dummy {f00=0x003a, 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
0x0bd144…0bd2d8 Dummy {f00=0x003a, 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
0x0bd2d8…0bd46c Dummy {f00=0x003a, 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
0x0bd46c…0bd600 Dummy {f00=0x003a, 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
0x0bd600…0bd794 (0, 240) Dummy {f00=0x003a, 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
0x0bd794…0bd928 Dummy {f00=0x003a, 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
0x0bd928…0bdabc Dummy {f00=0x003a, 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
0x0bdabc…0bdc50 Dummy {f00=0x003a, f01=0x0190, f02=»_ M M L . P M . 9 M 2 5 L U T < 0P < Y _ 1 X 1 < = W8 < = X W* 8 A= T A= = (@( - - : 0 :R - Y 0 PU,DNXX,STAT,RY = L ( E 5 Ax ? ; < 1P < Y
0x0bdc50…0bdde4 Dummy {f00=0x003a, f01=0x0190, f02=» Y U U 0!? ?T W 1 Q TKP MTT Y P ; Y (@ ; P Q 1 ; . X X ? ? ? ? ? ? ? >8 14_ 5 Ax ; @ Q P P T Z ; W P ; $>H $ NOT W0 Ax @ p ! $ rT tP Y ;
0x0bdde4…0bdf78 Dummy {f00=0x003a, f01=0x0190, f02=» P A @@*P$ @?( = ^ ] ] @?* _ A@* $ ? > A _ = A 0 9U A> > T > ( "^ ? = A @ A @ !? A @,_* 5 @@& ; @ A ; 0 A A@ A@ @ ( "^ @ A $ <
0x0bdf78…0be10c Dummy {f00=0x003a, f01=0x0190, f02=» @ @ @ Y Y Y Y P ABd ( Qh Q P( @ @ @ @ Y Y Y Y " A "; V W # @ A A@& @ ? ? > Q @ ? ? ? ? ? ? ? Aj ?, P6 $ R, Z R R Q $ :D P $ R
0x0be10c…0be2a0 Dummy {f00=0x003a, f01=0x0190, f02=» M A @A @A @A @A @A @A @A A ? ? ? ? ? ? ? A $ < A B @ 9a:a R @ @Bd @ ! #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 _
0x0be2a0…0be434 (0, 241) Dummy {f00=0x003a, f01=0x0190, f02=» XP P R :AV L 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
0x0be434…0be5c8 Dummy {f00=0x003a, f01=0x0190, f02=» $P &PN "P< /P :P ;P <P =P >P ?P 1 C< 8 C<Wv E W C6W EhW C0 W W E~W 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
0x0be5c8…0be75c Dummy {f00=0x003a, f01=0x0190, f02=»X>W % P T % 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@
0x0be75c…0be8f0 Dummy {f00=0x003a, f01=0x0190, f02=» X X T$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 A
0x0be8f0…0bea84 Dummy {f00=0x003a, f01=0x0190, f02=»X>W % P T % 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
0x0bea84…0bec18 Dummy {f00=0x003a, f01=0x0190, f02=» L B Y ! L L Lp X P P P P . B . @J P M L 0 AJ IB !K B !L6 X X ! P L y !L W !L L x P !LN M Q W ! P M L ZZ Lp B Y K AJ 1 - B :e L Ph !LN M Q !L B B $ !
0x0bec18…0bedac Dummy {f00=0x003a, f01=0x0190, f02=» P P ! _ 4 B L TD K L :C* WL WH:a L ! 9A r X L :B* W":a L ! 9A r X L :B L !? B M AID L 0 IB M Y B AI6 IF Y X P P P P P P8 K !R AI, B T B @IF ) @IH I @IJ I K
0x0bedac…0bef40 Dummy {f00=0x003a, f01=0x0190, f02=» V !R !R8 K B P2 AI4 B T$ B S @I,T !R @Iv AI, ! P W K B <b :b ^ AI. AI2 AI0R>P AI. AI0 !O AI4W& !O AI4R !O W !O AI4P AI4V !O !O _ P* AI4 AI4R Ql !O Wb !O !O WP !O
0x0bef40…0bf0d4 (0, 242) Dummy {f00=0x003a, f01=0x0190, f02=» Y @I0 @I. AI4 AI. !O @I, ! P W Y AI4 & B Y K @I.:e L Pv !LN M Q !L !QN @I, ! P L PP !L " T" L @IFP<W !L " T L @J P$ M L Q !L _Z M Q K T X $ P@ D R: P @I, ! P !P T D $ !Qv @I,
0x0bf0d4…0bf268 Dummy {f00=0x003a, f01=0x0190, f02=»QD @I, ! P !L W !L " P M L Z2 K 4 !QD @I, ! P !L " T W( !L " P M L 6 K @J L 4 @I. L " P $ M 4 @I6 IF ( = Y 4 @I6 IF < ) Y 4 X ! J $ <b! L !? P L ! _ @ID L T !LN L
0x0bf268…0bf3fc Dummy {f00=0x003a, f01=0x0190, f02=»TD @In 1T: B AIv @I, ! P !L W !L " 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$
0x0bf3fc…0bf590 Dummy {f00=0x003a, f01=0x0190, f02=»% X P Y $ W Y =D %_ X P V % P Y X XT Q _ R Q R 0DKER UNIT CYLD STAT T TL - T, TVW2 T& Td X W$ T2 Tp W T8( X = 0 :R # Y ; ; ? 0 :
0x0bf590…0bf724 Dummy {f00=0x003a, f01=0x0190, f02=» T T Y" P T _ X D D E E ] @ E @ U ? ? > ? ? ? ? ? ? ? X C ( "^ @Y V U T " P " P @Y W C "& # ( "^ | A @X @X @X @X <h @X % @X @X X X f
0x0bf724…0bf8b8 Dummy {f00=0x003a, f01=0x0190, f02=» U > > > > > > >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 !?
0x0bf8b8…0bfa4c Dummy {f00=0x003a, f01=0x0190, f02=»PP I H P _ A T A A A @ ~ X A ~ @X A ~ @ Z ( "^ : A A @2 (@_0 $ ( , 0 4 8 < X U T " P " P @ W C "& # ( "^ | A @ @ @ @ <h @ % @ @ f
0x0bfa4c…0bfbe0 Dummy {f00=0x003a, f01=0x0190, f02=» U > > > > > > >W | A ^ T " T ! P W SY SD AD _ ! P _, J _2 # C ( "^ P DOS - PTS 6000 REL. 11.0 81-02-16 MINI VERSION ZR : 9 !?
0x0bfbe0…0bfd74 (0, 243) Opaque[0x194]
0x0bfd74…0bff08 # DirEnt {nam=»FLXMO1«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0760, f03=0x0000}
0x0bfd74…0bff08 IdxSect {
0x0bfd74…0bff08 f00 = 0x003b // 0xbfd74 @0x0
0x0bfd74…0bff08 f01 = 0x0008 // 0xbfd76 @0x2
0x0bfd74…0bff08 gno = [ // 0xbfd78 @0x4
0x0bfd74…0bff08 [0x00]: C0x003b.0x0.0
0x0bfd74…0bff08 [0x01]: C0x003b.0x1.0
0x0bfd74…0bff08 [0x02]: C0x003b.0x2.0
0x0bfd74…0bff08 [0x03]: C0x003b.0x3.0
0x0bfd74…0bff08 ]
0x0bfd74…0bff08 }
0x0bff08…0c009c Dummy {f00=0x003b, f01=0x0190, f02=» )N 0 0 0 0 0 0 0 0 0 0 0 T 0 0 0 0 0 0 0 0 0 0 0 0 0 0 T 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 6 @
0x0c009c…0c0230 Dummy {f00=0x003b, f01=0x0190, f02=» _ A , $ & ? ? ? ? ? ? ? @ > > U H ( ( P c P W. A V ( U P @ V L 6 U
0x0c0230…0c03c4 Dummy {f00=0x003b, f01=0x0190, f02=» A _v A , A jQ > n A j _ l 8 Q Z P 0 9 ` `_ R _, n _ P H H ? ? ? ? ? ^ A _ _ ^ ? ? ? $P T I R $ 5 % n ZW n W n T T U U U U T U W
0x0c03c4…0c0558 Dummy {f00=0x003b, f01=0x0190, f02=» 1 A f P P Wp " ? * X R Y P _ ? @ 8 R Y P _ W6 8 X W. ? ` @ @ P $ H W W > > > > > > > > @ V ? > _ > ? _ > > ? ^ ! Y ^ _ 6 n .A. p #M 1
0x0c0558…0c06ec Dummy {f00=0x003b, f01=0x0190, f02=» n A ,I.9 * X R C C nA @ |A. * X V 9_< @ T ^ v < ~ _ ` n ^ 4 _ < < @ l 1 A l _ P 9 R
0x0c06ec…0c0880 Dummy {f00=0x003b, f01=0x0190, f02=» 9 X L Y ! X X| R 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 ! ! T P @ 9W ! ! X x P P 4 ! X# T X Y ( ! X# X Y (_ W Y . Y
0x0c0880…0c0a14 (0, 244) Dummy {f00=0x003b, f01=0x0190, f02=» y &_0 & _@ Y & Y X ( P Y : ! ! X X # P Y (:A , Y Y $ X Y C '? R X h _, A , n ,(@ X * X , K P0 @ T X .T $C Y B K & % Y B K X " :AZj X $P Y $ ! P + 7P6 $ P +
0x0c0a14…0c0ba8 Dummy {f00=0x003b, f01=0x0190, f02=» > > > > > > > > @ A W W ^ ! Z@ (XH @ P T M ]X , ) A Pj P Y U ( ) 5 & > > > > > > > $ "
0x0c0ba8…0c0d3c Dummy {f00=0x003b, f01=0x0190, f02=» " $ & > x P~ "R~ Y Pj T P` <UR "R4 x PB X R< X T6 X T0. T G Y6 G _` P ,P - _ v ~ C C ~ T 8P Y ^ 5 ) P U x * XH XF Y @ P R T X
0x0c0d3c…0c0ed0 Dummy {f00=0x003b, f01=0x0190, f02=» X L U0 L QL L # T R < 5 ^ R < 5 Y X L P ( L ) 1 _( n(@ X P 4 Y X 1 1 X P2 - M X P" P # P 0 1 Y ` _ D % Y W| B Tt D C B $ )
0x0c0ed0…0c1064 Dummy {f00=0x003b, f01=0x0190, f02=» Y X$; [(;! P "Z0?AZ4 @ Q " X " _F X $ _R A A A A A A | - M @ " A. %X UU @ $ % $P _ % A >b>J A A @ A A l @ @ j A P A @ |
0x0c1064…0c11f8 Dummy {f00=0x003b, f01=0x0190, f02=»P @ T % A ASP F @ U A ASP F P :B A D AST R U :l?j R> P R0?J A A E E A A ?B &nQ % AST @ A A D : @ D AS @
0x0c11f8…0c138c Dummy {f00=0x003b, f01=0x0190, f02=» Y* @ @ A @ L _ @ A A A A E @ < V: @ R2 @ jU @ j 8 !RRT A ( @ PZ A A @ > V T P ;a=a?j V Y R W ?J E =A
0x0c138c…0c1520 Dummy {f00=0x003b, f01=0x0190, f02=» R % % @ P A @ j A A r d @ 0 D;P< A;TB ; 1 @ A @ r U & RT d WL @ @ r A 0 !;;P P @ X _ P !;;T X$ A & P X _ @ ! P S A u A @
0x0c1520…0c16b4 (0, 245) Dummy {f00=0x003b, f01=0x0190, f02=» @ P A @ r $ ) A I. : A j A p " Q :d @ # R$P R.W % * A 6W % % @ : % A p " Z0X X._D! A A A A ! T W A A 6 A A A f H F 0 A : 6 A
0x0c16b4…0c1848 Dummy {f00=0x003b, f01=0x0190, f02=»@ @ lr s @ jA I T - A _ I N T V S : % H d 9PN S Y TD $ 1T> C !CCTp : 1P P(_ P =H P '( @ T X A : Y h C !CCTr B. X B.9 H t A _ !SSTF 0 U ~ J X X A
0x0c1848…0c19dc Dummy {f00=0x003b, f01=0x0190, f02=» @ T A F R U @ A & T : A D _ 0V , - P X 9A_ : @ ! P (W ( : R @ | d 0 A;T n P T d _* @ @ | ` | P A : T d
0x0c19dc…0c1b70 Dummy {f00=0x003b, f01=0x0190, f02=»Y _0 L Q P Y P Y A V : , %T 8 P , ! P : d : f : 7 ( $SWAP %X @ )6 )8P A )8 A WL , P@ , - 4 ] 4 &nY 5 X * _6
0x0c1b70…0c1d04 Dummy {f00=0x003b, f01=0x0190, f02=» : f ` @ A P _ @ @ 3 S S @ ~ V A ~ : P( T % S S _* : $ A A A ! A N =H N A @ T CRT N =H N "P A N =H N '( A , @ %!5!T
0x0c1d04…0c1e98 Dummy {f00=0x003b, f01=0x0190, f02=»P0 ", " U % _2 @ P &nV % S ( @ S =J @ " S @ S A @ S T CRT @ S A A _ 'B !TTT @ $ P @ @ a : $ A A H
0x0c1e98…0c202c Dummy {f00=0x003b, f01=0x0190, f02=» @ # P H I K T + Y@ @ _f @ Y 'B !TTX $ Y : $ 'B !TTX !CCTr ! P, ", @ 4 U % $ $ _. " P, ", @ 4 U % $ $ _. $ Y $ 'B !TTX @ @ @ !
0x0c202c…0c21c0 Dummy {f00=0x003b, f01=0x0190, f02=» ", A "< @ @ < @ _2 ! " ]X ", @ 8 8 8 4 D P$ % @ # P H I K T K YB _b @ @ @ % P @ 4 4 4 _r : A @ F !SST ! WB !AAT ! W6 !VVT ! W* !
0x0c21c0…0c2354 (0, 246) Dummy {f00=0x003b, f01=0x0190, f02=» * H D > !h @ " D % @ @ ) I $ D #@PV D L Tp D ,P @ ` T @ 1 Q a : I 6 I 8 D *# P6 " W( W" D V ` T @ 1 Q a : @ % PD H I H T P( H U
0x0c2354…0c24e8 Dummy {f00=0x003b, f01=0x0190, f02=» : % % % % % % : N =H N '( : N =H N '( : &=H F '( : F =H F '( : ? ? ' > > : P N =H N T ! 'B_ : @ ! P (W ( : @ 0 P 0 _ @ Q @ P P _ @ P A P _
0x0c24e8…0c267c Dummy {f00=0x003b, f01=0x0190, f02=» _4 @ 2T P _ / : .P W P A .X $` @ T :D * J TT J & P T *& >aW T $& P T &@P @ 9 A J ] W @ 9 A P _d @ 8P 0P _ 1 _ @ 8P 9 _ (T
0x0c267c…0c2810 Dummy {f00=0x003b, f01=0x0190, f02=» A r : @ A P $ @ A @ @ : . ! T % ! . : &nR % &nY & : z ' @ WN B W @ > " B ; Z [ : : [ [
0x0c2810…0c29a4 Dummy {f00=0x003b, f01=0x0190, f02=» &nV &nV % &nZ A % @ _X V W @ : A ; @ : : " L @ V @ % 0 H A : : @ | ` |U WB L P _ @ P _" r P . ! A . @ : ;h 0 :C
0x0c29a4…0c2b38 Dummy {f00=0x003b, f01=0x0190, f02=» ? n R 0 R P P _ : @ | < | @ W AST" ? ? > | ] ] YF | A. @ @ W & J A n : A N $ ) _ > @ P
0x0c2b38…0c2ccc Dummy {f00=0x003b, f01=0x0190, f02=» )< * : , ,
0x0c2ccc…0c2e60 Dummy {f00=0x003b, f01=0x0190, f02=»FFER ADDRESS , l ( P RF(Z) FD:100 BUFFER IN SYSTEM AREA - $ P LD A7,DWTRL,A6 REQUESTED LENGTH - @ ( P LDKL A1,BUF GET DWT BUFFER ADDRESS - h & P TS -30,A15 SAVE RUNNING TASK MMU - ( P TL DWT:PA,A6 LOAD PSEUDO MMU TABLE - 2 P MVSU A7 MOVE BUFFER FROM SYST
0x0c2e60…0c2ff4 (0, 247) Opaque[0x194]
0x0c2ff4…0c3188 # DirEnt {nam=»PDISC «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0780, f03=0x0000}
0x0c2ff4…0c3188 IdxSect {
0x0c2ff4…0c3188 f00 = 0x003c // 0xc2ff4 @0x0
0x0c2ff4…0c3188 f01 = 0x0012 // 0xc2ff6 @0x2
0x0c2ff4…0c3188 gno = [ // 0xc2ff8 @0x4
0x0c2ff4…0c3188 [0x00]: C0x003c.0x0.0
0x0c2ff4…0c3188 [0x01]: C0x003c.0x1.0
0x0c2ff4…0c3188 [0x02]: C0x003c.0x2.0
0x0c2ff4…0c3188 [0x03]: C0x003c.0x3.0
0x0c2ff4…0c3188 [0x04]: C0x003d.0x0.0
0x0c2ff4…0c3188 [0x05]: C0x003d.0x1.0
0x0c2ff4…0c3188 [0x06]: C0x003d.0x2.0
0x0c2ff4…0c3188 [0x07]: C0x003d.0x3.0
0x0c2ff4…0c3188 [0x08]: C0x003e.0x0.0
0x0c2ff4…0c3188 ]
0x0c2ff4…0c3188 }
0x0c3188…0c331c Dummy {f00=0x003c, f01=0x0190, f02=» Dbx 1 4 < fY%w t cb R c A $ ^ I : 9 Ai $ j 3bb w 64r d tV u 3 qC <1Z q&v zuqRT $ c> P{@ ZD ) c r L6 -RTe % V$ JM@> ) $ 9 H4` 1Lb p V -8 T < , tB ph Tg t z ^ r h V H 2 Z f9 z
0x0c331c…0c34b0 Dummy {f00=0x003c, f01=0x0190, f02=» 4c : @Y/ pJ @ d _ 2Z $"z y ?H T+ V y J t Dh i VR 1H W ] [ ? d % L X! "~ T &b Cn 1 d F < :R:R: ` ZPzh % h v 66 B r4i : 0 ` ^&W D/ H P = D# v>~ v `" f V>~ $#` d p 4d @z V
0x0c34b0…0c3644 Dummy {f00=0x003c, f01=0x0190, f02=» ^B 8z Z1 4 < fY%w t cb R c A $ ^ I : 9 Ai $ j 3bb w 64r d tV u 3 qC <1Z q&v zuqRT $ c> P{@ ZD ) c r L6 -RTe % V$ JM@> ) $ 9 H4` 1Lb p V -8 T < , tB ph Tg t z ^ r h V H 2 Z f9 z
0x0c3644…0c37d8 Dummy {f00=0x003c, f01=0x0190, f02=» 4c : @Y/ pJ @ d _ 2Z $"z y ?H T+ V y J t Dh i VR 1H W ] [ ? d % L X! "~ T &b Cn 1 d F < :R:R: ` ZPzh % h v 66 B r4i : 0 ` ^&W D/ H P = D# v>~ v `" f V>~ $#` d p 4d @z V
0x0c37d8…0c396c Dummy {f00=0x003c, f01=0x0190, f02=» ^B 8z Z1 4 < fY%w t cb R c A $ ^ I : 9 Ai $ j 3bb w 64r d tV u 3 qC <1Z q&v zuqRT $ c> P{@ ZD ) c r L6 -RTe % V$ JM@> ) $ 9 H4` 1Lb p V -8 T < , tB ph Tg t z ^ r h V H 2 Z f9 z
0x0c396c…0c3b00 Dummy {f00=0x003c, f01=0x0190, f02=» 4c : @Y/ pJ @ d _ 2Z $"z y ?H T+ V y J t Dh i VR 1H W ] [ ? d % L X! "~ T &b Cn 1 d F < :R:R: ` ZPzh % h v 66 B r4i : 0 ` ^&W D/ H P = D# v>~ v `" f V>~ $#` d p 4d @z V
0x0c3b00…0c3c94 (0, 248) Dummy {f00=0x003c, f01=0x0190, f02=» ^B 8z Z1 4 < fY%w t cb R c A $ ^ I : 9 Ai $ j 3bb w 64r d tV u 3 qC <1Z q&v zuqRT $ c> P{@ ZD ) c r L6 -RTe % V$ JM@> ) $ 9 H4` 1Lb p V -8 T < , tB ph Tg t z ^ r h V H 2 Z f9 z
0x0c3c94…0c3e28 Dummy {f00=0x003c, f01=0x0190, f02=» 4c : @Y/ pJ @ d _ 2Z $"z y ?H T+ V y J t Dh i VR 1H W ] [ ? d % L X! "~ T &b Cn 1 d F < :R:R: ` ZPzh % h v 66 B r4i : 0 ` ^&W D/ H P = D# v>~ v `" f V>~ $#` d p 4d @z V
0x0c3e28…0c3fbc Dummy {f00=0x003c, f01=0x0190, f02=» ^B 8z Z1 4 < fY%w t cb R c A $ ^ I : 9 Ai $ j 3bb w 64r d tV u 3 qC <1Z q&v zuqRT $ c> P{@ ZD ) c r L6 -RTe % V$ JM@> ) $ 9 H4` 1Lb p V -8 T < , tB ph Tg t z ^ r h V H 2 Z f9 z
0x0c3fbc…0c4150 Dummy {f00=0x003c, f01=0x0190, f02=» 4c : @Y/ pJ @ d _ 2Z $"z y ?H T+ V y J t Dh i VR 1H W ] [ ? d % L X! "~ T &b Cn 1 d F < :R:R: ` ZPzh % h v 66 B r4i : 0 ` ^&W D/ H P = D# v>~ v `" f V>~ $#` d p 4d @z V
0x0c4150…0c42e4 Dummy {f00=0x003c, f01=0x0190, f02=» ^B 8z Z1 4 < fY%w t cb R c A $ ^ I : 9 Ai $ j 3bb w 64r d tV u 3 qC <1Z q&v zuqRT $ c> P{@ ZD ) c r L6 -RTe % V$ JM@> ) $ 9 H4` 1Lb p V -8 T < , tB ph Tg t z ^ r h V H 2 Z f9 z
0x0c42e4…0c4478 Dummy {f00=0x003c, f01=0x0190, f02=» J @ d _ 2Z $"z y ?H T+ V y J t Dh i VR 1H W ] [ ? d % L X! "~ T &b Cn 1 d F < :R:R: ` ZPzh % h v 66 B r4i : 0 ` ^&W D/ H P = D# v>~ v `" f V>~ $#` d p 4d @z V
0x0c4478…0c460c Dummy {f00=0x003c, f01=0x0190, f02=» ^B 8z Z1 4 < fY%w t cb R c A $ ^ I : 9 Ai $ j 3bb w 64r d tV u 3 qC <1Z q&v zuqRT $ c> P{@ ZD ) c r L6 -RTe % V$ JM@> ) $ 9 H4` 1Lb p V -8 T < , tB ph Tg t z ^ r h V H 2 Z f9 z
0x0c460c…0c47a0 Dummy {f00=0x003c, f01=0x0190, f02=» J @ d _ 2Z $"z y ?H T+ V y J t Dh i VR 1H W ] [ ? d % L X! "~ T &b Cn 1 d F < :R:R: ` ZPzh % h v 66 B r4i : 0 ` ^&W D/ H P = D# v>~ v `" f V>~ $#` d p 4d @z V
0x0c47a0…0c4934 (0, 249) Dummy {f00=0x003c, f01=0x0190, f02=» ^ Z P OPT OUT=FC= FT= SOP=INP=DATE= R P ^ ^ 4` 1Lb p V -8 T < , tB ph Tg t z ^ r h V H 2 Z f9 z
0x0c4934…0c4ac8 Dummy {f00=0x003c, f01=0x0190, f02=» J @ d _ 2Z $"z y ?H T+ V y J t Dh i VR 1H W ] [ ? d % L X! "~ T &b Cn 1 d F < :R:R: ` ZPzh % h v 66 B r4i : 0 ` ^&W D/ H P = D# v>~ v `" f V>~ $#` d p 4d @z V
0x0c4ac8…0c4c5c Dummy {f00=0x003c, f01=0x0190, f02=» ^ Z P OPT OUT=FC= FT= SOP=INP=DATE= P 4` 1Lb p V -8 T < , tB ph Tg t z ^ r h V H 2 Z f9 z
0x0c4c5c…0c4df0 Dummy {f00=0x003c, f01=0x0190, f02=» J @ d _ 2Z $"z y ?H T+ V y J t Dh i VR 1H W ] [ ? d % L X! "~ T &b Cn 1 d F < :R:R: ` ZPzh % h v 66 B r4i : 0 ` ^&W D/ H P = D# v>~ v `" f V>~ $#` d p 4d @z V
0x0c4df0…0c4f84 Dummy {f00=0x003c, f01=0x0190, f02=» ^ Z P OPT OUT=FC= FT= SOP=INP=DATE= P 4` 1Lb p V -8 T < , tB ph Tg t z ^ r h V H 2 Z f9 z
0x0c4f84…0c5118 Dummy {f00=0x003c, f01=0x0190, f02=» J @ d _ 2Z $"z y ?H T+ V y J t Dh i VR 1H W ] [ ? d % L X! "~ T &b Cn 1 d F < :R:R: VOLUME 2 I L VOLUME 365 2 N d $ F f
0x0c5118…0c52ac Dummy {f00=0x003c, f01=0x0190, f02=»XXX , INCOMPATIBILITY TOSS-DISC / PDISC VERSION END PDISC PDISC: DISC NOT OPERABLE OUTPUT DISC I/O ERROR NO TOSS DISC FORMAT BADSPOT ON TRACK ZERO MORE THAN 5 BADSPOTS FLEXIBLE DISC WRITE PROTECTED ONE OR MORE VOLUMES UNKNOWN
0x0c52ac…0c5440 Dummy {f00=0x003c, f01=0x0190, f02=»NAME UNKNOWN NO ENTRY AVAILABLE IN VTOC PARAMETER I/O ERROR 11PARAMETER ERROR $ FORMAT ERROR IN CONFIGURATION FILE INPUT DISC I/O ERROR TOO MANY SECTORS IN FILE OUTPUT FILE IS NOT A MONITOR : FILE NAME WITH ANOTHER FILE ORGANIZATION ALREADY
0x0c5440…0c55d4 (0, 250) Dummy {f00=0x003c, f01=0x0190, f02=»11OLD FILE NAME: XXXXXXXX IS DELETED t ~ ) * *v @ "R A 6 A @ ) ^ %L @ 0 ! P b 0 .D ' ) ) @ " " A A @ ) @ " R2 @ l COP T2 @ tP, A 8 A . : 1R A .W @ h A P /$ A @
0x0c55d4…0c5768 Dummy {f00=0x003c, f01=0x0190, f02=» @ A N 0J " @ @ :P A < / A @ 8P& A @ " R A . : / A A . @ N @ A @ " R @ 8PR A : A 0 @ " P< @ P6 1 @ A N )R @ U ^ R 1 @ U ^ )n %L @ G % Y A @ R - -x A 0 A , A @ A
0x0c5768…0c58fc Dummy {f00=0x003c, f01=0x0190, f02=»P ^ .D 5 ) D @ P @ P @ R A P_p )n_v PH @ P @ P @ RF @ A ( @ R - -x 6( ^ A F A 0 @ Z: @ P @ YDW )n %L @ G @ % @ R @ @ . . @ ) ' Tt ^ @ < @ Q .D @
0x0c58fc…0c5a90 Dummy {f00=0x003c, f01=0x0190, f02=» P )n # ) ' X @ @ A ( @ R2 ) ) - P A A A A @ ( Y A # G G ) )P .D )n @ P ) ) ( %RW$ A N A P )R @ E! : A N N . A P )R @ P T & _ ,
0x0c5a90…0c5c24 Dummy {f00=0x003c, f01=0x0190, f02=» 0 .D : A P )R @ 0 ! P>1$T: F 1ST2 01 T P$_ U P 1:T P A T P A Xl R j : *, @ "RH S G *$ P$ F A F A Y *(W. F 4 *4 F 4 *4W L G *$ P F $ * 0 P 1 Q
0x0c5c24…0c5db8 Dummy {f00=0x003c, f01=0x0190, f02=» (! 0R U R V W ) [ : .D 0 .D - .D A A & : @ b @ ~ A ~ x V W U A ~ .D A : @ % @ R: 8 :p P <` D E ;@ % _> @ " A T A : ^ @ .
0x0c5db8…0c5f4c Dummy {f00=0x003c, f01=0x0190, f02=» .D .D @ " A P P A : D( @ L P @ , T : D ( B ! @ , * N ) : @ "V @ @ 6( @ > @ , T~ A @ : M R W - M : W *W W p C P C ( : _ *P ) ) W, W( W$ W
0x0c5f4c…0c60e0 Dummy {f00=0x003c, f01=0x0190, f02=» - P @3o A *< ^ .D : @ F1R Q .V @ A -| . : *D @ .D T D ! T A ) A ( @ @ , *@ P^ R - , T R , _2 P P ^ < ! P !,,P 5 ^ , P Z2 , @
0x0c60e0…0c6274 (0, 251) Dummy {f00=0x003d, f01=0x0190, f02=» Q ( ! P R ! Q % _ P : % @ E @ E W8 )P .D @ ! AP P P Tt A " T -$ ' R^ A A # A D b QH * A @ P, 81R0 90Q* @ 01R 12Q @ 01R 31Q : +d *0 V 8 5
0x0c6274…0c6408 Dummy {f00=0x003d, f01=0x0190, f02=» A $ .D @ &TF @ "R4P @ @ W A A S A A A @ ( A A W P 9H A .V A & @ $P N: W B( . P T P W @ "T @ Y A : P $ %D Q ( % _ : ; [ [ [ [ :
0x0c6408…0c659c Dummy {f00=0x003d, f01=0x0190, f02=» V Q Z W : A 8 A 1 A @ ) L ^ A : A |R 1 L ^P A |R 1 L ^ A 8 @ :P < A 1R A @ 8P : 1R : A A A A A ( A @ ) ) H A ~ A 1 P A A @ @ P* A f I
0x0c659c…0c6730 Dummy {f00=0x003d, f01=0x0190, f02=» ( )n A @ | $ A P ) _L @ P 1 ( @ . P ( )n A @ P : @ P 1 @ A N )R < @ :P4 A 8 U ^ R 1 X U ^ R 1 @ Y4 @ 8P& : A R 1 8 U ^ @ Y )n : @ |R 1 L ^ 9 P |R 1 L ^ Y
0x0c6730…0c68c4 Dummy {f00=0x003d, f01=0x0190, f02=» V Q Z W : A 8 A A @ ) L ^ A : A28 |R L ^P A |R L ^ A 8 @ :P < A A @ 8P : : A A A A A ( A @ ) ) H A ~ A A f I
0x0c68c4…0c6a58 Dummy {f00=0x003d, f01=0x0190, f02=»SS REL 11.0 BADSPOTS NOT CHECKED Z $ A3 D A3 D A3 D A3 D A3 [ : Z $ A3 D A3 D A3 D A3 D A3 [ : Z $ A3 D A3 D A3 D A3 [ : 2 C C (
0x0c6a58…0c6bec Dummy {f00=0x003d, f01=0x0190, f02=» 2 2 C C ( B & =& B .P " T =2 : 0 A34 A3 UU A3 A3 A3 @ A2 A2 4 R ' P 6 P P0 PV P| P 42[ Y Z 3 M 7( 42 ] ^ 3 [g [h 4 4 [4 4 7( 42bxbxbx
0x0c6bec…0c6d80 Dummy {f00=0x003d, f01=0x0190, f02=»P P W< 3 &? &@ 42bxbxbx 7( 42U V W 3 7( 42W X Y 3 &? &@ 7( R P P W< 42bxbxbx 3 L L 7( 42U V W 3 1g 1h 7( 42W X Y 3 L L 7( 2 A2 A2 $ A2 $ A2 A2 R ! R 2 ( B
0x0c6d80…0c6f14 (0, 252) Dummy {f00=0x003d, f01=0x0190, f02=» =& =2 2 C C C B % E E A3 ( B ! : =& C S A2 A2 =. 2 R R C ' V* P T R IT C W C ( C ( B R % R E R E B N3f % Z R R E ( ( (
0x0c6f14…0c70a8 Dummy {f00=0x003d, f01=0x0190, f02=»2 3 A34 3 4 2 @3 P W A2 2 4r 4 4r @3 T 4 4r( A3 B & =& B =& P2 T = 3 3 B >( ^ = 3 3 4 @3 @3 U Y A2 Y A2 _ 3L
0x0c70a8…0c723c Dummy {f00=0x003d, f01=0x0190, f02=» B & =& B P Wt @2 Y 2 3 3 3 @3 A3 @3 $T 3 @3 A3 @3 $P 3 3 W( @3 $ Y P 4 _R 3 3 W. T = 3 3 @2 >( ^ = 3 3 @3 P 4 4 4 A3 A2 W 4 4 @3 T* @3 = Q A3 A2
0x0c723c…0c73d0 Dummy {f00=0x003d, f01=0x0190, f02=»T 3 @3 A3 @3 $P 3 3 Wn @3 $ Y P 4 _R 3 3 4 4 @3 Tl @3 Q @3 P 2 ( : QL A2 Q> A2 W4 T RF 3 3 @2 >( ^ = 3 3 4 4 2 ( : 3 T( 2 ( ; W W W W W W : @3 =V A
0x0c73d0…0c7564 Dummy {f00=0x003d, f01=0x0190, f02=» 4 T Rd 1 Q 4 PB 4 T Rd 1 Q T T 4 T R 4 P _8 @1 W @3 @3 RdQ 1 Q A1 A2 1 22 2 P T 0PV 0 % % ( P< A3 A3 A3 A3 ( H H H R @3 @3 @3 @3
0x0c7564…0c76f8 Dummy {f00=0x003d, f01=0x0190, f02=» 5 2 4 @3 2 % P 4 _ A2 2 A2 ? A2 @3 Q U( _ 2 % 2 * % Y : 2: ? 2 * , P Pv * BA % DS % PO % T % 5 Y 5 Y % L % L % ,
0x0c76f8…0c788c Dummy {f00=0x003d, f01=0x0190, f02=» @3 R V 2 U A3 4 ]D 2 2 @2 % % 2 ) % % Z @3 % @3 % @3 % 3f ( % Y 2 % @3 O . R O 1 R O 0 B W E d E ~ E f O E l E E n E W E p E 4 2 (
0x0c788c…0c7a20 Dummy {f00=0x003d, f01=0x0190, f02=» AA AA AA AA AA AA AB" AB$ R % Bl P AA @A P Nd @A : R !LLPB !XXPh R 1 R 2 Y AB AB AB Y AB AB @B W S 1 AB S 2 AB AA C Ex : S 1 AB S 2 AB _. B B R ?h # AA
0x0c7a20…0c7bb4 (0, 253) Dummy {f00=0x003d, f01=0x0190, f02=» AB @A D R 0 $' R T W $ T AB R !LLP @A T AA AA R 1 R 6 AA R 4! AA PJ AA AA @A @A R AA AA S$ @A @A RdY4 @A AA @A AA W : AA AA @A @A @B R AA AA @A @A Rd AA AA Y4W R 69B :d AA AA @
0x0c7bb4…0c7d48 Dummy {f00=0x003d, f01=0x0190, f02=»B AB AA AA AA @A P AA AA B AB" ( B G @A C C C ( C B / G : @B :c AB AA AA AA AA @A AA @A AA AA @A @A R AA AA @A AB" C C C R AB ( B / G @A R G R
0x0c7d48…0c7edc Dummy {f00=0x003d, f01=0x0190, f02=»A @A AA @A @A Z Q @A @A Z @A @A RBQ @A @A U6 @A @A Y R @A @A Y AA @B" AB$ @A AA @A AA _ @A AA @A AA @A AA @A AA @B" AB$ H K Tr Q 1 Q Q K AN4 AA B R AB @B$ AB AB C ( C @B /T @B T J AB @N4 @A
0x0c7edc…0c8070 Dummy {f00=0x003d, f01=0x0190, f02=» @A T @A @B V @B" AB$ I G P AA P AA @A @A @A @A Rd AA AA Rv G W8 @A @A @A @A Rd AA AA J< @A G P AA P AA @A @A P P R Q Q @A Q @A 1 K G G2 P AA 0 AA AA AA @B Rd AA AA @A @A @B
0x0c8070…0c8204 Dummy {f00=0x003d, f01=0x0190, f02=» @A Q @A 1 @A @A @A @A Rd AA AA AA AA @B P @A @A @A @A Rd AA AA K G G2 G AA AA @A ? Ex : AB G2 ( P6 . P. @B P @A AA @A AA @B AB K C Ex : : AA @A @B AA 2 C AA @A @A G AB AB ( @
0x0c8204…0c8398 Dummy {f00=0x003d, f01=0x0190, f02=»J@ @A QT @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 ( QT . " QT R !LLP R : K % R 8 K & K ( K ) ( @B / G : J@ @A AA @A K ( ( @B /P
0x0c8398…0c852c Dummy {f00=0x003d, f01=0x0190, f02=»Y @A AA @A AA @A @A AA AB R AA AA B @B C @A AB @B AB ( C @A @B @B @B P @B R AA AB @A @A YXR @A @B Yd @A AA @A AB @B C @A AB @B AB ( C @B / G @A @B @B @B P @B R AA AB @A @A Y`R @A
0x0c852c…0c86c0 Dummy {f00=0x003d, f01=0x0190, f02=» AQ @A @A Q T @A @A R T A R @A T R QT Q A AQ ( B @A : AA AB" AB$ R % N` T @A T : AA AA C AA T@W AB G2 J@ @A P& T ( P . P C _@ : A QT @A - ( @B / G
0x0c86c0…0c8854 (0, 254) Dummy {f00=0x003d, f01=0x0190, f02=» R R4 B C AB" AN4 C ( B / G R @N4 0 AN6 0 AN8 @N6T @N8 Q P @A T @B" AB$ P @A Nv AA AA AN4 @N6 @N8 P P R AN6 AN8 @A @A @N4 @A @N6T @A @N8T P AA P AA AA AA AN4 P 0 @A @A R Q 1 P AA 0 AA @
0x0c8854…0c89e8 Dummy {f00=0x003d, f01=0x0190, f02=»A Rd AN6 AN8 @A @A @N4 @A @N6 OH @A @N8 OH @A Q @A Q AB G2_ @B" AB$ OH Nv I G @A I @A ) @A I @A I Nv ( - : Qn FILE Q 9 VOLUME NAME FILE EXT.NO EXTENT BASE EXTENT LENGTH Q A
0x0c89e8…0c8b7c Dummy {f00=0x003d, f01=0x0190, f02=» S _ R Q _ ;A [ : [ Q S W S Q R S P W S _ R _ ;A [ : R AA A @N6 @N8 P P OK? 0OUTPUT VOLUME NAME: R C C ( : : B R $ ) Y R R R R AR
0x0c8b7c…0c8d10 Dummy {f00=0x003d, f01=0x0190, f02=»Sl Sx Z : : ; S S : V *W R - _ 1 T R PS - _ : RdR _ P 0 / R : ; [ [ [ [ B@ T T ' T T d T T T. Z Z Z Z
0x0c8d10…0c8ea4 Dummy {f00=0x003d, f01=0x0190, f02=» S : S f S 6 S b% =A S ^ S ` x UU 3 2P _ | , ) p ?e =e Q P ?e R P S ?C/ G O % R ' P % =B S t w E M % n : T G.G K. A ;A; G. x ] S
0x0c8ea4…0c9038 Dummy {f00=0x003d, f01=0x0190, f02=» V P #P & B. T P ' " P : P S | P S ~ P " ^_" R _ P 0 / R : ; [ [ [ [ B@ T T ' T T d T %? v S @ S l S <
0x0c9038…0c91cc Dummy {f00=0x003d, f01=0x0190, f02=» 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 R N S 4 W
0x0c91cc…0c9360 Dummy {f00=0x003d, f01=0x0190, f02=» P : P S P S P " ^_"W W W W W + # @ # P s v UU 3 2P _ N 4 , ) T G.G K. A ;A; G. S r r # P W S S (W ` S D S t S p S S M % T S ( p
0x0c9360…0c94f4 (0, 255) Dummy {f00=0x003e, f01=0x0190, f02=» P X _ T R t S M R R R " R ( P * W p P #P ( B. T P ' " P : P S P S P " `_"; XW W W W @ R T V ?AW =E R _ <e R P =A $ < ?B =A- R P S S M
0x0c94f4…0c9688 Dummy {f00=0x003e, f01=0x0190, f02=»"? 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 X _ R R "? R R
0x0c9688…0c981c Dummy {f00=0x003e, f01=0x0190, f02=»^ P #P ( B. T P ' " P : P S P S P % `_" ^z ^| A^~ A^ 2: A^x @^vT `R `* ` ^ ^z `< _ ^z ^ ` _l ` ` @^x ^ ` `* @^x 0 4 @^x @
0x0c981c…0c99b0 Dummy {f00=0x003e, f01=0x0190, f02=» `. @^x A^x `^x ^ `R `* @^x ^z `< `* @^z @^| @^~ @^ R A^ A^ @^x ^ `<T @^z @^x ) @^| ) ` `* @28 28 `. @28 @28 @^x $ ) Y `R W ^v : $ ) : Y : @^z @^x ) @^| ) @^~ ) @^ ) A^v @28 A
0x0c99b0…0c9b44 Dummy {f00=0x003e, f01=0x0190, f02=» : 2 C C C 2 C ( B a 2 $ A^f 2 . ( A^h 2 , A^j 2 , A^l @^f @^h A^n @^j @^f A^t 2 A^n @^n @^t a C C R C ( B a ^p ^l ^l]L *% P0 @^p 8 BT ^r @^p 0 0 ^ ^r ^p_J W
0x0c9b44…0c9cd8 Dummy {f00=0x003e, f01=0x0190, f02=»# [ : Z : `^x ^ @^x ^z @^z @^| @^~ @^ R A^ A^ @^x ^ T @^z @^x ) @^| ) @28 28 @28 @28 @^x $ ) Y W ^v : $ ) : Y : @^z @^x ) @^| ) @^~ ) @^ ) A^v @28 A
0x0c9cd8…0c9e6c Dummy {f00=0x003e, f01=0x0190, f02=»LENGTH r P RTN A14 P EJECT P* , P* 6 2 P********************************************* @ P* v P* P* DOSCNV P* ( P* DOSCNV CONVERTS A RELATIVE ADDRESS $ P* TO SECTOR NO AND OFFSET WITHIN P* THAT SECTOR IN
0x0c9e6c…0ca000 Dummy {f00=0x003e, f01=0x018e, f02=» WITHIN SECTOR z P* $ P* SECTOR LENGTH USED: 376 BYTES P* H 2 P********************************************* R P* P* PDOSCNV EQU * 8 P LDK A1,0 PREPARE CONVERSION TO TWO WORD PROCESSING ( P ADK A2,0 TEST MOST SIGNIFIC
0x0ca000…0ca194 (0, 256) Opaque[0x194]
0x0ca194…0ca328 # DirEnt {nam=»SUP004«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x07c8, f03=0x0000}
0x0ca194…0ca328 IdxSect {
0x0ca194…0ca328 f00 = 0x003e // 0xca194 @0x0
0x0ca194…0ca328 f01 = 0x0014 // 0xca196 @0x2
0x0ca194…0ca328 gno = [ // 0xca198 @0x4
0x0ca194…0ca328 [0x00]: C0x003e.0x1.0
0x0ca194…0ca328 [0x01]: C0x003e.0x2.0
0x0ca194…0ca328 [0x02]: C0x003e.0x3.0
0x0ca194…0ca328 [0x03]: C0x003f.0x0.0
0x0ca194…0ca328 [0x04]: C0x003f.0x1.0
0x0ca194…0ca328 [0x05]: C0x003f.0x2.0
0x0ca194…0ca328 [0x06]: C0x003f.0x3.0
0x0ca194…0ca328 [0x07]: C0x0040.0x0.0
0x0ca194…0ca328 [0x08]: C0x0040.0x1.0
0x0ca194…0ca328 [0x09]: C0x0040.0x2.0
0x0ca194…0ca328 ]
0x0ca194…0ca328 }
0x0ca328…0ca4bc Dummy {f00=0x003e, f01=0x0190, f02=»c Hh !`! !h: 4 r V ( _ >
0x0ca4bc…0ca650 Dummy {f00=0x003e, f01=0x0190, f02=»
0x0ca650…0ca7e4 Dummy {f00=0x003e, f01=0x0190, f02=» c ' v 1 3V@V Dz#>"^# $ ? > #R1 C DM; MC? HD: WM; RY< RD< AS= AB? PS?jRS? & TY J( 0 DLP * L fMT W @
0x0ca7e4…0ca978 Dummy {f00=0x003e, f01=0x0190, f02=» T DK ( O DK G DK G b DK [ DK [ ? ? ? ? ? ? ? * ? ? ? ? ? ? ? ,
0x0ca978…0cab0c Dummy {f00=0x003e, f01=0x0190, f02=» Z & f : Z L f p Z r f
0x0cab0c…0caca0 Dummy {f00=0x003e, f01=0x0190, f02=» ~ Z f Z f V 2 ? ? ?
0x0caca0…0cae34 (0, 257) Dummy {f00=0x003e, f01=0x0190, f02=»L ? ? ? ? ? ? ? b L ? ? ? ? ? ? ? _* ? ? ? ? ? ? ? _* 2 P r L &
0x0cae34…0cafc8 Dummy {f00=0x003e, f01=0x0190, f02=» 6 6 6 6
0x0cafc8…0cb15c Dummy {f00=0x003e, f01=0x0190, f02=»6 6 6 :
0x0cb15c…0cb2f0 Dummy {f00=0x003e, f01=0x0190, f02=»
[…0x4…]
0x0cb940…0cbad4 (0, 258) Dummy {f00=0x003e, f01=0x0190, f02=» P
0x0cbad4…0cbc68 Dummy {f00=0x003e, f01=0x0190, f02=»
[…0x1…]
0x0cbdfc…0cbf90 Dummy {f00=0x003e, f01=0x0190, f02=» *
0x0cbf90…0cc124 Dummy {f00=0x003e, f01=0x0190, f02=»
0x0cc124…0cc2b8 Dummy {f00=0x003e, f01=0x0190, f02=» f
0x0cc2b8…0cc44c Dummy {f00=0x003e, f01=0x0190, f02=»
[…0x1…]
0x0cc5e0…0cc774 (0, 259) Dummy {f00=0x003f, f01=0x0190, f02=» @ @
0x0cc774…0cc908 Dummy {f00=0x003f, f01=0x0190, f02=» > ? ? ? ? ? ? ? U ^ ( H ( P > _ Q 4&? ?R _ 5 H _ ^ ;j >P @ * Q 9A D *P _ P A ' @ Q A ' A ' A A' _ @ A" ^ 9j ?R > > > > > > > A @" E E E E E E
0x0cc908…0cca9c Dummy {f00=0x003f, f01=0x0190, f02=» P W ' < B @ 9a:a R0 Q Q" ?A <P @ # % _ ' _ _ 0 $> B T @ W @ R (P& P (_ =a:a =A:A Z P Z _" TR @ ;a=a R W* @ =a Z ;a RP ) i $> E '
0x0cca9c…0ccc30 Dummy {f00=0x003f, f01=0x0190, f02=» 0 ( P>P< , T T 1W 1W T )W )W ( , _ C ' _ 5 H A% A% A% A% A% A% A&6 A% %F &R D >a @ =a & D U@ x %pW U, @% x % W @% A% ,P$ _: @% @% @% @% @% @%
0x0ccc30…0ccdc4 Dummy {f00=0x003f, f01=0x0190, f02=» _ < @ A&B A&D A&F A&H A&J A&L A&N &P =a @ >a V _ @ >a Y A&@ A&8 4 T &6( "^ 5 U P" @&B @&D @&F @&H @&J @&L @&N &P @&B x @% 8R P =A_ %_ XJ _ P0 @ !@T @! @! R > E! ! A
0x0ccdc4…0ccf58 Dummy {f00=0x003f, f01=0x0190, f02=» , L L L L L L ? ? ? ? ? ? ? @! Px @ > > > > > > > ; [ [ [ [ [ [ > > [ [ A @! H! ! ? A! > @ P ,V$ A 'L @ 9 'L T A " @ ( ? ? >_ ? ? ?
0x0ccf58…0cd0ec Dummy {f00=0x003f, f01=0x0190, f02=» Y Y $ 0T W W . X ? ? ? ? ? ? ? )^ 0 X #? P ? ? ? ? ? ? ? ) 0( . (@ / % ? ? ? ? ? ? ? ) 0 (@_$ - ? ? ? ? ? ? ? ) 0 ? ? ? ? ? ? ? ) 0( ? ? ? ? ? ? ? * 0"(@_~ - X R Y _ X D $!
0x0cd0ec…0cd280 Dummy {f00=0x003f, f01=0x0190, f02=»P X / / * - 8 TRT X - -0 ? ? - Pl - X X X M M Y ? ? ? ? ? ? ? +* 0h ? ? ? ? ? ? ? +B 0 (@ / X DbP DhT" Y 0 Y Y X Q Y _ X X X U 5 X E
0x0cd280…0cd414 (0, 260) Dummy {f00=0x003f, f01=0x0190, f02=» ? , 04Qv ,& - " PF X Q< X P P ? ? ? ? ? ? ? ,X 0h(@ Y ; X X X R 5 X X - -0 X Q Y Y X Y x ? ? ? ? ? ? ? , 0( Y Y X X T ? ? ? ? ? ? ? , 0" > > > > > > > > ? @ ? > X
0x0cd414…0cd5a8 Dummy {f00=0x003f, f01=0x0190, f02=»! X L P L @ _ C C # ' _R _ _ _ _ _ X T - - X ! TH X X X T" $ :ET D OFT W OST X P % Y X R X -> ! X Y T T Y Y Y Y Y U U X @ _
0x0cd5a8…0cd73c Dummy {f00=0x003f, f01=0x0190, f02=»_8 X X: X R X ( _$ _* $ XtRX P Y _ A/T 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 A/T ZrP Y _8 _< _@ ! -( #> X M A/ T ` -( X X
0x0cd73c…0cd8d0 Dummy {f00=0x003f, f01=0x0190, f02=» V <a W X ' ?A q A0 > > > > > > > 0 , 0W 0T _ l P$ X X ] X * A0 J " * - X ( / = V X X ; X -0 L ! L % T< L P4 M ^ L X 4 _ ? ? ? ? ? ? ? L W L R % _R ^
0x0cd8d0…0cda64 Dummy {f00=0x003f, f01=0x0190, f02=» W* 6& W" 4 W 7 L :AR| M W M M 4 L T M M L PH=GV L L 4 2` M 2 3 M L 9G L 4 L M L M M L 4 2 W M " 9 L P L 9JR@ P P T 9 5 U P T Q P P W Q P T@(@ L D "
0x0cda64…0cdbf8 Dummy {f00=0x003f, f01=0x0190, f02=» P $ M 2 P ( M P Q P P P W P T Q (@ L " 9 (@ H H T 9 E $ I 4P _ 5 % E (@ L 2 ( P _ 4 ) % ] M (@ L 2 9 T R Q @ ] 9 > 9C 9C > ^ U (@ L
0x0cdbf8…0cdd8c Dummy {f00=0x003f, f01=0x0190, f02=»& 9 4 M 4 4* M L M L " P M 5 2 M L M 9 L ! PT L M L M L & P L E E M 5l 2 M M L L % T D V L ! P L ! XfWn L M L M M 5 2 L :c:A L D V D M L ! T*_ L <
0x0cdd8c…0cdf20 Dummy {f00=0x003f, f01=0x0190, f02=» L $:BV W $:AV M " M 9 L L $ M 0 D L U M " V L R L M ( M * M , L X L U M W 6 M 2 5* L D L L 0U L 0 L (U L ( L L R $ 9 _ R $ 9 M , L M M M M M ( M ( M 0 M 0 L
0x0cdf20…0ce0b4 (0, 261) Dummy {f00=0x003f, f01=0x0190, f02=» U 7 M 2 5* L M $ L M & L L I P0% P L X =h P W P L X T M . L 9 M L 9 L L . Q L L L R 0 % _ M M L . P M . 8F M 2 5* L U 8 M 2 5* L L L & ) L $ I L M L
0x0ce0b4…0ce248 Dummy {f00=0x003f, f01=0x0190, f02=» U 9Z M 2 5* L L ( E L % E L E L E M 9 M 2 5* L P$ 9 M 2 3 M "W > = B W ' L 4 5 L L " C m M ^ U L ( L L ? ? ? ? ? ? ? M.A A AF 4 R W 7 B Q : : : : : AJ
0x0ce248…0ce3dc Dummy {f00=0x003f, f01=0x0190, f02=»AF P AJ : : : : : @AF AAF A: ' 5 4 X _8 ; W M: ;" ( "^ : ;. L 0 MESSAGE UNKNOWN ;L H Q L L L R 0 % _ M M L . P M . 8F M 2 5* L U 5 ; B B ; P B - _ : 5
0x0ce3dc…0ce570 Dummy {f00=0x003f, f01=0x0190, f02=» T A< < (@( -( -0 : 0 :R - Y 0 PU,DNXX,STAT,RY < 5 B ? ; <y 1P < Y _ @;L RDP A P 8 FL ; X X ! R V Y A=X 8 TKP Y LPP MTP Y Y T T
0x0ce570…0ce704 Dummy {f00=0x003f, f01=0x0190, f02=» ? ? ? ? ? ? ? = 0h_ 5 B ; @ v Q wP P vT Z ; W P v ; $>H $ NOT W0 B @ ! $ T P Y ; C v C x R ] : . P M >z M 2 0AB CD ADDR @ 9a:a;a R R A> > AAH _ '
0x0ce704…0ce898 Dummy {f00=0x003f, f01=0x0190, f02=»> b >p ( "^ ?> = B @ A @ !? " A AJ_* 5 @AD ; @ A : 0 B A? A? ? ( "^ @ A ' <y 5 @ 4 ; P B _ 5 : 5 B A@I B R: P B R( @H( "^ @P^ @ T @2 ( "^ :
0x0ce898…0cea2c Dummy {f00=0x003f, f01=0x0190, f02=»QD b A Y , b A Z H @ALP : @ ` : ;J I b _* A@ @ ( "^ : ; ;<A ' R `R Q Q; _ Q; <a : : : ( A ~(@ A! AAD A A A A AAF AAN AAH a A @ ? ? > P :b" Q P
0x0cea2c…0cebc0 Dummy {f00=0x003f, f01=0x0190, f02=» @ Y Y Y Y " A "; V W # @ A AAD @ ? ? > Q @ ? ? ? ? ? ? ? B > @ P <a:a ; :A : P6 $ R, Z R R Q $ :D P $ R ^& : ; P R( AB AB AB AB AB AB AB B ,:j
0x0cebc0…0ced54 (0, 262) Dummy {f00=0x003f, f01=0x0190, f02=» ' < B B @ 9a:a R @ @C @ # % # C "! PX @ v Q wP VF_ P vRN;AR P xP4 0 P P C C C LPT P P C # ' C _: DL P x H C _ P xX( DD _Z :EOS :EOF - - - @ !? ?R _ D - '
0x0ced54…0ceee8 Dummy {f00=0x003f, f01=0x0190, f02=» 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 B - B - $? F P R Dn P R
0x0ceee8…0cf07c Dummy {f00=0x003f, f01=0x0190, f02=» 8 DnWv F W DhW F W Db W W F W Wx 8 MTPp DYPj X T Y $ WZ F WX $ # T $ T Y B W0 %@ R b " Y Y Y Y Y $ X _0 8 TCX< TKXB MTXH DYXN 0 $(,1 !%)-2 "&*.3
0x0cf07c…0cf210 Dummy {f00=0x003f, f01=0x0190, f02=» Sf M 9A DG L P :a P VN P :A M M GP GX - 4 Y T T W _ X $ P W M ! B < V < - B Y B Y L ?a M " : L ? M L " T L L P( L M :B Y M M M @GNP M W AGN X T 9A Y M X L
0x0cf210…0cf3a4 Dummy {f00=0x003f, f01=0x0190, f02=» W L L q r B M X / $(,0 !%)-1 "&*.2 #'+/3 G M Y B AG X P P P P P~ P4 L* !L B T B @G ) @G I @G I L* AG M AG !K " T @ AG !K " T M L ]*W M L ZB
0x0cf3a4…0cf538 Dummy {f00=0x003f, f01=0x0190, f02=» Y AG AG P L AG @G hZT AG _ X L* A Y B AG B AG @G AG @G !L2 !L` !K P M L Z W AG Y AG P L AG @G hZD AG _L L :B* Wl @G K ? 0h @G :B @G * WH O @G K ? 0h O G K ? 0h @G :B @
0x0cf538…0cf6cc Dummy {f00=0x003f, f01=0x0190, f02=» AG @G 4R 4 @ AG DI L : V V 4 AG 4 M !K " T AG AG !K P M L Z L* 4 X ? L 04 <b X ! ? P L -(! _ L @ P L <AR A <B M -( X N N X % N L -( L -( M M
0x0cf6cc…0cf860 Dummy {f00=0x003f, f01=0x0190, f02=» P M B M bd L X( M H M 9 V 9c ! L* @G 4 ! P M L Z W AG Y AG P L AG @G hZD AG _L L :B* W @G ? 0h @G :B @G * W O @G ? 0h O G ? 0h @G :B @
0x0cf860…0cf9f4 (0, 263) Dummy {f00=0x0040, f01=0x0190, f02=» AG @G 4R 4 @ AG DI L : V V 4 AG 4 M !K " T AG AG !K P M L Z L* 4 X ? 04 <b X ! P: X M M Y X R R B Y ! R L Q~ X P P P P - B - @O P M L / AO NP !
0x0cf9f4…0cfb88 Dummy {f00=0x0040, f01=0x0190, f02=»1 -0 B :e L Ph !Q M Q !Q B B $ !QD !Q L x P2 x X0 M L Q !Q _@ !Q M Q Q~ 4 ! 9A " ! M 4 P P L P P ! _ 4 B Q bd P L :C* WL WH:a L ! 9A r X L :B* W":a L
0x0cfb88…0cfd1c Dummy {f00=0x0040, f01=0x0190, f02=» P !W" AN: B T B @NT ) @NV I @NX I P 4 B AN:! T h ANB M !Q L @N: ! P ANT !V !Q W AO !V !Q " P !Q M L ZL M ANB V !W" !WF P B P2 ANB B T$ B S @N:T !W" @N AN: ! P W P B <b :b
0x0cfd1c…0cfeb0 Dummy {f00=0x0040, f01=0x0190, f02=» _ P* ANB ANBR Ql !T Wb !T !T WP !T !T W> B <e :e Q P AN< AN> !T ANBZ X Td @N: ! P W @N@P Q Y @N> @N< ANB AN< !T @N: ! P W Y ANB & B Y P @N<:e L Pv !Q M
0x0cfeb0…0d0044 Dummy {f00=0x0040, f01=0x0190, f02=» X $ P@ D R: P @N: ! P !V T D $ !V @N: ! T L AO !U W !V T D R@ $ !Vn @N: ! T @N< T " T AN<W AN< T P AND Y T U 4 !VR @N: ! P !Q W !Q " P M L Z2 P 4 !VR @N: ! P !Q " T W( !Q " P M
0x0d0044…0d01d8 Dummy {f00=0x0040, f01=0x0190, f02=»$ <b! L !? P L ! _ @NR L T !Q L 9AV$ !Q M Q A @ M Q -( M Q~ 4 !Q !Q M Q AN< M !Q 4 @Nt TOTD @N| 1T: B AN @N: ! P !Q W !Q " P M L ZJ P 4 Y $? Q UJ
0x0d01d8…0d036c Dummy {f00=0x0040, f01=0x0190, f02=» Y W` [^_ y X Y Y Y dW DW @W TW ` ? ? ? ? ? ? ? Xx 0 (@ -0 W, X X - V Y X X X. X X ? ? ? ? ? ? ? X 0h (@(@ ? ? ? ? ? ? ? X 0 Y dP y (@ / P X 1P
0x0d036c…0d0500 Dummy {f00=0x0040, f01=0x0190, f02=» ? ? ? ? ? ? ? Y 04P ;e# L =AV X 1 -( X -( X % Y Y - D PH X 1T: X Y Y C C #=H Y X y X ' W Y =CV ) W P X % =A } Pz X Y W _ X Tf X P % P )@ Y
0x0d0500…0d0694 (0, 264) Dummy {f00=0x0040, f01=0x0190, f02=» Y (@ X X ;A L[D X ! X Y Y D D Y :EOS :EOV -0 W X X - V ( 0 $ , ] X Y X ] B Y % ] L ]~ M B P - B V X P P P P
0x0d0694…0d0828 Dummy {f00=0x0040, f01=0x0190, f02=»V < - L P :g: L :C ? L L M L M [ R> [ Q8 [ R M M M M W M M M M y W _ @[nP M WR A[n L " * A]K- A]c L " X ! Y M T(% T$ ! R L W L A T M A[l A[j X / B M
0x0d0828…0d09bc Dummy {f00=0x0040, f01=0x0190, f02=» I _ B P,9 Q$ B < R :A R V Q A[r A[pW _ V A[v A[t A[r X P< P P4 P M @[x M M !`x !^ P @ W M @[x M M !`x !^ ^ L !? B M A[l A[j A[z X / A[p ! T @[t A[p @[v Y
0x0d09bc…0d0b50 Dummy {f00=0x0040, f01=0x0190, f02=» M l A M M W A X / =b%0 X $ L <B<j P L -($ _ L =AV L <AR A <B M -( X `B X % `B L % -( L ? -( ] M A[n 1 -0 M @[z 7P < $ <C ! 9 4 @[p9C @
0x0d0b50…0d0ce4 Dummy {f00=0x0040, f01=0x0190, f02=» Y _" P" P& R| ^T Y _D _T X _ X _ X" X& T: X P4 0' P. 1R P _ 0$ XT % X` Z _f % _n Q4 8 TYP, R Y _$ P Q X Q % _" Y Y Y - % X P Y $ W Y =D %_ X
0x0d0ce4…0d0e78 Dummy {f00=0x0040, f01=0x0190, f02=» - bL bvW2 bF b X W$ bR b W bX( X = 0 :R # Y ; ; ? 0 :R 9 Y 9 9 : : : @ v P vR ! R P x L M M Y$ #? @ v P vR P x T T T Y" P T _ X
0x0d0e78…0d100c Dummy {f00=0x0040, f01=0x0190, f02=»^ @g: d U T " P " P @g>W C "& # ( "^ : A @g @g @g @g <h @g % @g @g g g $ [ [ [ [ [ [ [ ^ [ [ [ [ @ v L v! P Y _ @ M v x ^ U > > >
0x0d100c…0d11a0 Dummy {f00=0x0040, f01=0x0190, f02=» C ( "^ P g g g g CCT I T P Q _, Af _V LM g A Af f L 9 !? Ae Af Af Ae Af Af J Ae T8 B ! P B J (@" T L #( "^ B P @ !? M @g:P M L R ! _ PP I H
0x0d11a0…0d1334 (0, 265) Dummy {f00=0x0040, f01=0x0190, f02=»$ ( , 0 4 8 < f " P @ W C "& # ( "^ : A @ @ @ @ <h @ % @ @ $ [ [ [ [ [ [ [ ^ [ [ [ [ @ v L v! P Y _ @ M v x ^ U > > >
0x0d1334…0d14c8 Dummy {f00=0x0040, f01=0x0190, f02=» C ( "^ P CCT I T P DOS - PTS 8000 REL. 11.0 81-02-16 FOR 6879 (250 KB) FLEXIBLE DISK DRIVE h R B ! P B J (@" T L #( "^ B P @ !? M @ P M L R ! _ PP I H
0x0d14c8…0d165c Dummy {f00=0x0040, f01=0x0190, f02=» P AH : : : : : @AD AAD A: ' 5 4 X _8 ; P W M: ; ( "^ : ;, L MESSAGE UNKNOWN ;J H Q L L L R 0 % _ M M L . P M . 8F M 2 5* L U 5 ; B B ; P B - _ : 5
0x0d165c…0d17f0 Dummy {f00=0x0040, f01=0x0190, f02=» T A< < (@( -( -0 : 0 :R - Y PU,DNXX,STAT,RY < 5 B ? ; <w 1P < Y _ @;J RDP A P 8 FL ; X X ! R V Y A=V 8 TKP Y LPP MTP Y Y T T Y
0x0d17f0…0d1984 Dummy {f00=0x0040, f01=0x0190, f02=» ? ? ? ? ? ? ? = 0h_ 5 B ; @ v Q wP P vT Z ; W P v ; $>H $ NOT W0 B @ ! $ T P Y ; C v C x R ] : L . P >x 8F M 0AB CD ADDR @ 9a:a;a R R A> > AAF _ ' _
0x0d1984…0d1b18 Dummy {f00=0x0040, f01=0x0190, f02=» b >n ( "^ ?< = B @ A @ !? " A AH_* 5 @AB ; @ A : 0 B A? A? ? ( "^ @ A ' <w 5 @ 4 ; P B _ 5 : 5 B A@G B R: P B R( @F( "^ @N^ @ T @0 ( "^ : ;
0x0d1b18…0d1cac Dummy {f00=0x0040, f01=0x0190, f02=» b A Y , b A Z H @AJP : @ ` : ;H I b _* A@ @ ( "^ : ; ;<A ' R `R Q Q; _ Q; <a : : : ( A ~(@ A! AAB A A A A AAD AAL AAF a A @ ? ? > P :b" Q P
0x0d1cac…0d1e40 Dummy {f00=0x0040, f01=0x0190, f02=» Y Y Y Y " A "; V W # @ A AAB @ ? ? > Q @ ? ? ? ? ? ? ? B > @ P <a:a ; :A : P6 $ R, Z R R Q $ :D P $ R ^& : ; P R( AB AB AB AB AB AB AB B ,:j
0x0d1e40…0d1fd4 (0, 266) Opaque[0x194]
0x0d1fd4…0d2168 # DirEnt {nam=»SUP005«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0818, f03=0x0000}
0x0d1fd4…0d2168 IdxSect {
0x0d1fd4…0d2168 f00 = 0x0040 // 0xd1fd4 @0x0
0x0d1fd4…0d2168 f01 = 0x0014 // 0xd1fd6 @0x2
0x0d1fd4…0d2168 gno = [ // 0xd1fd8 @0x4
0x0d1fd4…0d2168 [0x00]: C0x0040.0x3.0
0x0d1fd4…0d2168 [0x01]: C0x0041.0x0.0
0x0d1fd4…0d2168 [0x02]: C0x0041.0x1.0
0x0d1fd4…0d2168 [0x03]: C0x0041.0x2.0
0x0d1fd4…0d2168 [0x04]: C0x0041.0x3.0
0x0d1fd4…0d2168 [0x05]: C0x0042.0x0.0
0x0d1fd4…0d2168 [0x06]: C0x0042.0x1.0
0x0d1fd4…0d2168 [0x07]: C0x0042.0x2.0
0x0d1fd4…0d2168 [0x08]: C0x0042.0x3.0
0x0d1fd4…0d2168 [0x09]: C0x0043.0x0.0
0x0d1fd4…0d2168 ]
0x0d1fd4…0d2168 }
0x0d2168…0d22fc Dummy {f00=0x0040, f01=0x0190, f02=»b Hhd !`! !h: 4 r V ( _ >
0x0d22fc…0d2490 Dummy {f00=0x0040, f01=0x0190, f02=»
0x0d2490…0d2624 Dummy {f00=0x0040, f01=0x0190, f02=» b ' v 1 3V@V Dz#>"^# $ ? > #R1 C DM; MC? HD: WM; RY< RD< AS= AB? PS?jRS? & TY J( 0 DLP * L fMT T @
0x0d2624…0d27b8 Dummy {f00=0x0040, f01=0x0190, f02=» T DK ( O DK G DK G b DK W DK W ? ? ? ? ? ? ? * ? ? ? ? ? ? ? ,
0x0d27b8…0d294c Dummy {f00=0x0040, f01=0x0190, f02=» Z & f : Z L f p Z r f
0x0d294c…0d2ae0 Dummy {f00=0x0040, f01=0x0190, f02=» ~ Z f Z f V 2 ? ? ?
0x0d2ae0…0d2c74 (0, 267) Dummy {f00=0x0041, f01=0x0190, f02=»L ? ? ? ? ? ? ? b L ? ? ? ? ? ? ? [ ? ? ? ? ? ? ? [ 2 P r L &
0x0d2c74…0d2e08 Dummy {f00=0x0041, f01=0x0190, f02=» 6 6 6 6
0x0d2e08…0d2f9c Dummy {f00=0x0041, f01=0x0190, f02=»6 6 6 :
0x0d2f9c…0d3130 Dummy {f00=0x0041, f01=0x0190, f02=»
[…0x4…]
0x0d3780…0d3914 (0, 268) Dummy {f00=0x0041, f01=0x0190, f02=» P
0x0d3914…0d3aa8 Dummy {f00=0x0041, f01=0x0190, f02=»
[…0x1…]
0x0d3c3c…0d3dd0 Dummy {f00=0x0041, f01=0x0190, f02=» *
0x0d3dd0…0d3f64 Dummy {f00=0x0041, f01=0x0190, f02=»
0x0d3f64…0d40f8 Dummy {f00=0x0041, f01=0x0190, f02=» f
0x0d40f8…0d428c Dummy {f00=0x0041, f01=0x0190, f02=»
[…0x1…]
0x0d4420…0d45b4 (0, 269) Dummy {f00=0x0041, f01=0x0190, f02=» @ @
0x0d45b4…0d4748 Dummy {f00=0x0041, f01=0x0190, f02=» > ? ? ? ? ? ? ? U ^ ( H ( P > _ Q 4&? ?R _ 5 H _ ^ ;j >P @ * Q 9A D *P _ P A ' @ Q A ' A ' A A' _ @ A" ^ 9j ?R > > > > > > > A @" E E E E E E
0x0d4748…0d48dc Dummy {f00=0x0041, f01=0x0190, f02=» P W ' < B @ 9a:a R0 Q Q" ?A <P @ # % _ ' _ _ 0 $> B T @ W @ R (P& P (_ =a:a =A:A Z P Z _" TR @ ;a=a R W* @ =a Z ;a RP ) i $> E '
0x0d48dc…0d4a70 Dummy {f00=0x0041, f01=0x0190, f02=» 0 ( P>P< , T T 1W 1W T )W )W ( , _ C ' _ 5 H A% A% A% A% A% A% A&6 A% %F &R D >a @ =a & D U@ x %pW U, @% x % W @% A% ,P$ _: @% @% @% @% @% @%
0x0d4a70…0d4c04 Dummy {f00=0x0041, f01=0x0190, f02=» _ < @ A&B A&D A&F A&H A&J A&L A&N &P =a @ >a V _ @ >a Y A&@ A&8 4 T &6( "^ 5 U P" @&B @&D @&F @&H @&J @&L @&N &P @&B x @% 8R P =A_ %_ XJ _ P0 @ !@T @! @! R > E! ! A
0x0d4c04…0d4d98 Dummy {f00=0x0041, f01=0x0190, f02=» , L L L L L L ? ? ? ? ? ? ? @! Px @ > > > > > > > ; [ [ [ [ [ [ > > [ [ A @! H! ! ? A! > @ P ,V$ A 'L @ 9 'L T A " @ ( ? ? >_ ? ? ?
0x0d4d98…0d4f2c Dummy {f00=0x0041, f01=0x0190, f02=» Y Y $ 0T W W . X ? ? ? ? ? ? ? )^ 0 X #? P ? ? ? ? ? ? ? ) 0( . (@ / % ? ? ? ? ? ? ? ) 0 (@_$ - ? ? ? ? ? ? ? ) 0 ? ? ? ? ? ? ? ) 0( ? ? ? ? ? ? ? * 0"(@_~ - X R Y _ X D $!
0x0d4f2c…0d50c0 Dummy {f00=0x0041, f01=0x0190, f02=»P X / / * - 8 TRT X - -0 ? ? - Pl - X X X M M Y ? ? ? ? ? ? ? +* 0h ? ? ? ? ? ? ? +B 0 (@ / X DbP DhT" Y 0 Y Y X Q Y _ X X X U 5 X E
0x0d50c0…0d5254 (0, 270) Dummy {f00=0x0041, f01=0x0190, f02=» ? , 04Qv ,& - " PF X Q< X P P ? ? ? ? ? ? ? ,X 0h(@ Y ; X X X R 5 X X - -0 X Q Y Y X Y x ? ? ? ? ? ? ? , 0( Y Y X X T ? ? ? ? ? ? ? , 0" > > > > > > > > ? @ ? > X
0x0d5254…0d53e8 Dummy {f00=0x0041, f01=0x0190, f02=»! X L P L @ _ C C # ' _R _ _ _ _ _ X T - - X ! TH X X X T" $ :ET D OFT W OST X P % Y X R X -> ! X Y T T Y Y Y Y Y U U X @ _
0x0d53e8…0d557c Dummy {f00=0x0041, f01=0x0190, f02=»_8 X X: X R X ( _$ _* $ XtRX P Y _ A/T 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 A/T ZrP Y _8 _< _@ ! -( #> X M A/ T `( -( X X
0x0d557c…0d5710 Dummy {f00=0x0041, f01=0x0190, f02=» V <a W X ' ?A q A0 > > > > > > > 0 , 0W 0T _ l P$ X X ] X * A0 J " * - X ( / = V X X ; X -0 L ! L % T< L P4 M ^ L X 4 _ ? ? ? ? ? ? ? L W L R % _R ^
0x0d5710…0d58a4 Dummy {f00=0x0041, f01=0x0190, f02=» W* 6& W" 4 W 7 L :AR| M W M M 4 L T M M L PH=GV L L 4 2` M 2 3 M L 9G L 4 L M L M M L 4 2 W M " 9 L P L 9JR@ P P T 9 5 U P T Q P P W Q P T@(@ L D "
0x0d58a4…0d5a38 Dummy {f00=0x0041, f01=0x0190, f02=» P $ M 2 P ( M P Q P P P W P T Q (@ L " 9 (@ H H T 9 E $ I 4P _ 5 % E (@ L 2 ( P _ 4 ) % ] M (@ L 2 9 T R Q @ ] 9 > 9C 9C > ^ U (@ L
0x0d5a38…0d5bcc Dummy {f00=0x0041, f01=0x0190, f02=»& 9 4 M 4 4* M L M L " P M 5 2 M L M 9 L ! PT L M L M L & P L E E M 5l 2 M M L L % T D V L ! P L ! XfWn L M L M M 5 2 L :c:A L D V D M L ! T*_ L <
0x0d5bcc…0d5d60 Dummy {f00=0x0041, f01=0x0190, f02=» L $:BV W $:AV M " M 9 L L $ M 0 D L U M " V L R L M ( M * M , L X L U M W 6 M 2 5* L D L L 0U L 0 L (U L ( L L R $ 9 _ R $ 9 M , L M M M M M ( M ( M 0 M 0 L
0x0d5d60…0d5ef4 (0, 271) Dummy {f00=0x0042, f01=0x0190, f02=» U 7 M 2 5* L M $ L M & L L I P0% P L X =h P W P L X T M . L 9 M L 9 L L . Q L L L R 0 % _ M M L . P M . 8F M 2 5* L U 8 M 2 5* L L L & ) L $ I L M L
0x0d5ef4…0d6088 Dummy {f00=0x0042, f01=0x0190, f02=» U 9Z M 2 5* L L ( E L % E L E L E M 9 M 2 5* L P$ 9 M 2 3 M "W > = B W ' L 4 5 L L " C m M ^ U L ( L L ? ? ? ? ? ? ? M.A A AF 4 R W 7 B Q : : : : : AJ
0x0d6088…0d621c Dummy {f00=0x0042, f01=0x0190, f02=»AF P AJ : : : : : @AF AAF A: ' 5 4 X _8 ; W M: ;" ( "^ : ;. L 0 MESSAGE UNKNOWN ;L H Q L L L R 0 % _ M M L . P M . 8F M 2 5* L U 5 ; B B ; P B - _ : 5
0x0d621c…0d63b0 Dummy {f00=0x0042, f01=0x0190, f02=» T A< < (@( -( -0 : 0 :R - Y 0 PU,DNXX,STAT,RY < 5 B ? ; <y 1P < Y _ @;L RDP A P 8 FL ; X X ! R V Y A=X 8 TKP Y LPP MTP Y Y T T
0x0d63b0…0d6544 Dummy {f00=0x0042, f01=0x0190, f02=» ? ? ? ? ? ? ? = 0h_ 5 B ; @ v Q wP P vT Z ; W P v ; $>H $ NOT W0 B @ ! $ T P Y ; C v C x R ] : . P M >z M 2 0AB CD ADDR @ 9a:a;a R R A> > AAH _ '
0x0d6544…0d66d8 Dummy {f00=0x0042, f01=0x0190, f02=»> bJ >p ( "^ ?> = B @ A @ !? " A AJ_* 5 @AD ; @ A : 0 B A? A? ? ( "^ @ A ' <y 5 @ 4 ; P B _ 5 : 5 B A@I B R: P B R( @H( "^ @P^ @ T @2 ( "^ :
0x0d66d8…0d686c Dummy {f00=0x0042, f01=0x0190, f02=»QD bJ A Y , bJ A Z H @ALP : @ ` : ;J I bJ _* A@ @ ( "^ : ; ;<A ' R `R Q Q; _ Q; <a : : : ( A ~(@ A! AAD A A A A AAF AAN AAH a A @ ? ? > P :b" Q P
0x0d686c…0d6a00 Dummy {f00=0x0042, f01=0x0190, f02=» @ Y Y Y Y " A "; V W # @ A AAD @ ? ? > Q @ ? ? ? ? ? ? ? B > @ P <a:a ; :A : P6 $ R, Z R R Q $ :D P $ R ^& : ; P R( AB AB AB AB AB AB AB B ,:j
0x0d6a00…0d6b94 (0, 272) Dummy {f00=0x0042, f01=0x0190, f02=» ' < B B @ 9a:a R @ @C @ # % # C "! PX @ v Q wP VF_ P vRN;AR P xP4 0 P P C C C LPT P P C # ' C _: DL P x H C _ P xX( DD _Z :EOS :EOF - - - @ !? ?R _ D - '
0x0d6b94…0d6d28 Dummy {f00=0x0042, f01=0x0190, f02=» 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 B - B - $? F P R Dn P R
0x0d6d28…0d6ebc Dummy {f00=0x0042, f01=0x0190, f02=» 8 DnWv F W DhW F W Db W W F W Wx 8 MTPp DYPj X T Y $ WZ F WX $ # T $ T Y B W0 %@ R b " Y Y Y Y Y $ X _0 8 TCX< TKXB MTXH DYXN 0 $(,1 !%)-2 "&*.3
0x0d6ebc…0d7050 Dummy {f00=0x0042, f01=0x0190, f02=» Sf M 9A DG L P :a P VN P :A M M GP GX - 4 Y T T W _ X $ P W M ! B < V < - B Y B Y L ?a M " : L ? M L " T L L P( L M :B Y M M M @GNP M W AGN X T 9A Y M X L
0x0d7050…0d71e4 Dummy {f00=0x0042, f01=0x0190, f02=» W L L q r B M X / $(,0 !%)-1 "&*.2 #'+/3 G M Y B AG X P P P P P~ P4 L* !L B T B @G ) @G I @G I L* AG M AG !K " T @ AG !K " T M L ]*W M L ZB
0x0d71e4…0d7378 Dummy {f00=0x0042, f01=0x0190, f02=» Y AG AG P L AG @G hZT AG _ X L* A Y B AG B AG @G AG @G !L2 !L` !K P M L Z W AG Y AG P L AG @G hZD AG _L L :B* Wl @G K ? 0h @G :B @G * WH O @G K ? 0h O G K ? 0h @G :B @
0x0d7378…0d750c Dummy {f00=0x0042, f01=0x0190, f02=» AG @G 4R 4 @ AG DI L : V V 4 AG 4 M !K " T AG AG !K P M L Z L* 4 X ? L 04 <b X ! ? P L -(! _ L @ P L <AR A <B M -( X N N X % N L -( L -( M M
0x0d750c…0d76a0 Dummy {f00=0x0042, f01=0x0190, f02=» P M B M a L X( M H M 9 V 9c ! L* @G 4 ! P M L Z W AG Y AG P L AG @G hZD AG _L L :B* W @G ? 0h @G :B @G * W O @G ? 0h O G ? 0h @G :B @
0x0d76a0…0d7834 (0, 273) Dummy {f00=0x0042, f01=0x0190, f02=» AG @G 4R 4 @ AG DI L : V V 4 AG 4 M !K " T AG AG !K P M L Z L* 4 X ? 04 <b X ! P: X M M Y X R R B Y ! R L Q~ X P P P P - B - @O P M L / AO NP !
0x0d7834…0d79c8 Dummy {f00=0x0042, f01=0x0190, f02=»1 -0 B :e L Ph !Q M Q !Q B B $ !QD !Q L x P2 x X0 M L Q !Q _@ !Q M Q Q~ 4 ! 9A " ! M 4 P P L P P ! _ 4 B Q a P L :C* WL WH:a L ! 9A r X L :B* W":a L
0x0d79c8…0d7b5c Dummy {f00=0x0042, f01=0x0190, f02=» P !W" AN: B T B @NT ) @NV I @NX I P 4 B AN:! T h ANB M !Q L @N: ! P ANT !V !Q W AO !V !Q " P !Q M L ZL M ANB V !W" !WF P B P2 ANB B T$ B S @N:T !W" @N AN: ! P W P B <b :b
0x0d7b5c…0d7cf0 Dummy {f00=0x0042, f01=0x0190, f02=» _ P* ANB ANBR Ql !T Wb !T !T WP !T !T W> B <e :e Q P AN< AN> !T ANBZ X Td @N: ! P W @N@P Q Y @N> @N< ANB AN< !T @N: ! P W Y ANB & B Y P @N<:e L Pv !Q M
0x0d7cf0…0d7e84 Dummy {f00=0x0042, f01=0x0190, f02=» X $ P@ D R: P @N: ! P !V T D $ !V @N: ! T L AO !U W !V T D R@ $ !Vn @N: ! T @N< T " T AN<W AN< T P AND Y T U 4 !VR @N: ! P !Q W !Q " P M L Z2 P 4 !VR @N: ! P !Q " T W( !Q " P M
0x0d7e84…0d8018 Dummy {f00=0x0042, f01=0x0190, f02=»$ <b! L !? P L ! _ @NR L T !Q L 9AV$ !Q M Q A @ M Q -( M Q~ 4 !Q !Q M Q AN< M !Q 4 @Nt TOTD @N| 1T: B AN @N: ! P !Q W !Q " P M L ZJ P 4 P @N<:e
0x0d8018…0d81ac Dummy {f00=0x0042, f01=0x0190, f02=» M L / AW W !Zf !Z ![& L ! T L T Y X ! P ![hW ![ ! P M L Z& [J X T L ![& Y Y M _R B Y ZZ W !Zf X P P P P P Y P ZZ B M !Y ![& X !$P ! P M ![hW ![ " P M L Z0
0x0d81ac…0d8340 Dummy {f00=0x0042, f01=0x0190, f02=» > ZZ B T Y ![& M M ![ L " :K ZZ ZZ M L R L ! T" B : R <A ^ M 9GW( 4^ 4 R @ M M 9H MR ZZ B X V Y M 4 AW 1 -0 L RH M ![^ Y W Y @ M ![ B Y B Y "
0x0d8340…0d84d4 (0, 274) Dummy {f00=0x0042, f01=0x0190, f02=» @ M 9A DW $ M 4 L P M ![^ P M [J 4 B [Z a ZZ L :B* WX X :a L ! 9A r X L :B L * W* X :a L ! 9A r X L :B L L !? B M M L / X ! J $ <b! L !? P L ! _ L 9AV
0x0d84d4…0d8668 Dummy {f00=0x0042, f01=0x0190, f02=» &PH 1PZ $PN 3Pp 4Pn 6Pl 8Pj - W W x % =A Y _ PW QW ` Y Y W` ` _ y X Y Y Y dW DW @W TW ` ? ? ? ? ? ? ? ]6 0 (@ -0 W, X X - V Y ] X X. X X ? ? ? ? ? ? ?
0x0d8668…0d87fc Dummy {f00=0x0042, f01=0x0190, f02=» % T X 1 _XW % X P P _$ Y X _ Y D_ Y _ X ? ? ? ? ? ? ? ^p 04P ;e# L =AV X 1 -( X -( X % Y ^ - D PH X 1T: X Y Y C C #=H Y X y X ' W ]
0x0d87fc…0d8990 Dummy {f00=0x0042, f01=0x0190, f02=»:ET ,=H , OST W OVT ) _F" XJ)@_N _t X =A^ ,` A_ =` Y (@ X X ;A L` ] ! ] Y ] D D Y :EOS :EOV @ _ X X X X $ P`H`P`haXav % P Y Y Y >% X P Y _"
0x0d8990…0d8b24 Dummy {f00=0x0042, f01=0x0190, f02=» % 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 _ ` Q ` 0DKER UNIT CYLD STAT a a - a a W2
0x0d8b24…0d8cb8 Dummy {f00=0x0042, f01=0x0190, f02=» Y 9 9 : : : @ v P vR ! R P x L M M Y$ #? @ v P vR P x T T T Y" P T _ X x D x D E E v ] v @ E @ c4 ? ? > ? ? ? ? ? ? ? f^ C ( "^ @f dr
0x0d8cb8…0d8e4c Dummy {f00=0x0042, f01=0x0190, f02=» [ [ [ [ [ ^ [ [ [ [ @ v L v! P Y _ @ M v x ^ U > > > > > > >WZ : A ^ T " T0 ! P W SY SD AD _ ! P _, J _2 f^ # C ( "^
0x0d8e4c…0d8fe0 Dummy {f00=0x0042, f01=0x0190, f02=»e Ae Aez Ae Ae J Aer T8 B ! P B J (@" T L #( "^ B P @ !? M @f P M L R ! _ PP I H P _ A b A A A @ ~ f6 A ~ @f> A ~ @ hX( : A A "^ AP (@_0 $ ( , 0 4 8 <
0x0d8fe0…0d9174 (0, 275) Dummy {f00=0x0043, f01=0x0190, f02=» [ [ [ [ [ ^ [ [ [ [ @ v L v! P Y _ @ M v x ^ U > > > > > > >W : A ^ T " T ! P W SY SD AD _ ! P _, J _2 # C ( "^
0x0d9174…0d9308 Dummy {f00=0x0043, f01=0x0190, f02=»XIBLE DISK DRIVE h P
0x0d9308…0d949c Dummy {f00=0x0043, f01=0x0000, f02=»
[…0x5…]
0x0d9c80…0d9e14 (0, 276) Opaque[0x194]
0x0d9e14…0d9fa8 # DirEnt {nam=»SUP006«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0868, f03=0x0000}
0x0d9e14…0d9fa8 IdxSect {
0x0d9e14…0d9fa8 f00 = 0x0043 // 0xd9e14 @0x0
0x0d9e14…0d9fa8 f01 = 0x0010 // 0xd9e16 @0x2
0x0d9e14…0d9fa8 gno = [ // 0xd9e18 @0x4
0x0d9e14…0d9fa8 [0x00]: C0x0043.0x1.0
0x0d9e14…0d9fa8 [0x01]: C0x0043.0x2.0
0x0d9e14…0d9fa8 [0x02]: C0x0043.0x3.0
0x0d9e14…0d9fa8 [0x03]: C0x0044.0x0.0
0x0d9e14…0d9fa8 [0x04]: C0x0044.0x1.0
0x0d9e14…0d9fa8 [0x05]: C0x0044.0x2.0
0x0d9e14…0d9fa8 [0x06]: C0x0044.0x3.0
0x0d9e14…0d9fa8 [0x07]: C0x0045.0x0.0
0x0d9e14…0d9fa8 ]
0x0d9e14…0d9fa8 }
0x0d9fa8…0da13c Dummy {f00=0x0043, f01=0x0190, f02=»N6 :T 74 Z D | % _ ;
0x0da13c…0da2d0 Dummy {f00=0x0043, f01=0x0190, f02=»
0x0da2d0…0da464 Dummy {f00=0x0043, f01=0x0190, f02=» N6$: r > 2. 0 ? l ! <R; . > RY9 AS: AB<. & TY J& V jLP ( r DK D DK 8 D
0x0da464…0da5f8 Dummy {f00=0x0043, f01=0x0190, f02=» r 'J ? ? ? ? ? ? ? )2 Z f Z f D Z f
0x0da5f8…0da78c Dummy {f00=0x0043, f01=0x0190, f02=» ? ? ? ? ? ? ? J ? ? ? ? ? ? ? J ? ? ? ? ? ? ? ^ J ? ? ? ? ? ? ? J V t r r r r 0
0x0da78c…0da920 Dummy {f00=0x0043, f01=0x0190, f02=» 6 6 6 6 6
0x0da920…0daab4 (0, 277) Dummy {f00=0x0043, f01=0x0190, f02=» 6 6 6 h
0x0daab4…0dac48 Dummy {f00=0x0043, f01=0x0190, f02=»
[…0x4…]
0x0db298…0db42c Dummy {f00=0x0043, f01=0x0190, f02=» ~
0x0db42c…0db5c0 Dummy {f00=0x0043, f01=0x0190, f02=»
[…0x1…]
0x0db754…0db8e8 Dummy {f00=0x0043, f01=0x0190, f02=» X
0x0db8e8…0dba7c Dummy {f00=0x0043, f01=0x0190, f02=»
[…0x3…]
0x0dbf38…0dc0cc Dummy {f00=0x0043, f01=0x0190, f02=» @ @
0x0dc0cc…0dc260 Dummy {f00=0x0043, f01=0x0190, f02=» A @ > > > > > > > > ? ? ? ? ? ? ? U ^ ( H ( P ; _ Q 4&? ?R _ 5 H _ ^ ;j >P @ * Q 9A D *P _ P A $: @ Q A ' A $: A A$ _ @ A ^ 9j ?R > > > > > > > A @
0x0dc260…0dc3f4 (0, 279) Dummy {f00=0x0044, f01=0x0190, f02=» @ j < @ P W $: < >( @ 9a:a R0 & Q Q" ?A <P @ "F _ $: _ _ 0 !l >( T @ W @ R (P& P (_ =a:a =A:A Z P Z _" TR @ ;a=a R W* @ =a Z ;a RP ) i
0x0dc3f4…0dc588 Dummy {f00=0x0044, f01=0x0190, f02=» 0=a @ ?a RX @ ?a VN=A 0 ( P>P< , T T 1W 1W T )W )W ( , _ C $: _ 5 H A"4 A"6 A"8 A": A"< A"> A#d A"D "t # D >a @ =a # D U@ x " W U, @"6 x " W @"D A"D ,P$
0x0dc588…0dc71c Dummy {f00=0x0044, f01=0x0190, f02=» @"6 #LW4 @"D A"D ,Xp _ < @ A#p A#r A#t A#v A#x A#z A#| #~ =a @ >a V _ @ >a Y A#n A#f 4 T #d( "^ 5 U P" @#p @#r @#t @#v @#x @#z @#| #~ @#p x @"4 8R P =A_ %_ XJ _ P0 @ !@T
0x0dc71c…0dc8b0 Dummy {f00=0x0044, f01=0x0190, f02=» U` A$ @ , L ? ? , L L L L L L ? ? ? ? ? ? ? @ JPx @ > > > > > > > ; [ [ [ [ [ [ > > [ [ A @ J H H J ? A J > @ P ,V$ A $z @ 9 $z T
0x0dc8b0…0dca44 Dummy {f00=0x0044, f01=0x0190, f02=»? P ? T Y Y W x Y Y $ 0T W W + X ? ? ? ? ? ? ? & -J X #? P ? ? ? ? ? ? ? & -V + (@ - % ? ? ? ? ? ? ? & -J(@_$ * ? ? ? ? ? ? ? & -J ? ? ? ? ? ? ? ' -V ? ? ? ? ? ? ? '0 -P(@_~
0x0dca44…0dcbd8 Dummy {f00=0x0044, f01=0x0190, f02=» > > > ? ? ? ? ? ? ? ' -bP X - -, ' *6 8 TRT X + *^ ? ? * Pl * X X X M M Y ? ? ? ? ? ? ? (X - ? ? ? ? ? ? ? (p -J(@ - X ? P ? T" Y 0 Y Y X Q Y _ X X
0x0dcbd8…0dcd6c Dummy {f00=0x0044, f01=0x0190, f02=» P Q 5 Y ( ? ? ? ? ? ? ? )J -bQv )T *6" PF X Q< X P P ? ? ? ? ? ? ? ) - (@ Y 8 X X X R 5 X X - *^ X Q Y Y X Y x ? ? ? ? ? ? ? ) -V Y Y X X T ? ? ? ? ? ? ? *$ -P >
0x0dcd6c…0dcf00 Dummy {f00=0x0044, f01=0x0190, f02=» A , DKP L X X L ! X L P L @ _ C C # $:_R _ _ _ _ _ X T + *6 X ! TH X X X T" $ :ET D OFT W OST X P % Y X R X *l ! X Y T T Y Y Y
0x0dcf00…0dd094 (0, 280) Dummy {f00=0x0044, f01=0x0190, f02=» R 8 TYX WH H,N Y _8 X X: X R X ( _$ _* $ XtRX P Y _ A, 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 A, ZrP Y _8 _< _@ ! *V l X
0x0dd094…0dd228 Dummy {f00=0x0044, f01=0x0190, f02=» > > > > - V <a W X ' ?A q A- > > > > > > > - , 0W 0T _ l P$ X X ] X * A. J " * - X ( - = V X X 8 X *^ L ! L % T< L P4 M ^ L X 4 _ ? ? ? ? ?
0x0dd228…0dd3bc Dummy {f00=0x0044, f01=0x0190, f02=»/ /"/"/ / /4/4/4/4/ / /* 1 W* 3T W" 1 W 4 L :AR| M W M M 4 L T M M L PH=GV L L 4 / M 2 0 M L 9G L 4 L M L M M L 4 / W M " 6 L P L 9JR@ P P T 6 5 U P T Q P P
0x0dd3bc…0dd550 Dummy {f00=0x0044, f01=0x0190, f02=» ' - P p Y "(@ P P $ M / P ( M P Q P P P W P T Q (@ L " 6 (@ H H T 6 E $ I 4P _ 5 % E (@ L 2 ( P _ 4 ) % ] M (@ L 2 6 T 2R Q @ 2] 6 >
0x0dd550…0dd6e4 Dummy {f00=0x0044, f01=0x0190, f02=» V P T"W L >F 6 L & 6 1 M 4 1X M L M L " P M 2F / M L M 6 L ! PT L M L M L & P L E E M 2 / M M L L % T D V L ! P L ! XfWn L M L M M 2 / L :c:A L D
0x0dd6e4…0dd878 Dummy {f00=0x0044, f01=0x0190, f02=» D Q 3 M 2 2X L L $:BV W $:AV M " M 6 L L $ M 0 D L U M " V L R L M ( M * M , L X L U M W 4 M 2 2X L D L L 0U L 0 L (U L ( L L R $ 9 _ R $ 9 M , L M M
0x0dd878…0dda0c Dummy {f00=0x0044, f01=0x0190, f02=» L L , U 6 L 6 L U 5 M 2 2X L M $ L M & L L I P0% P L X =h P W P L X T M . L 9 M L 6 L L . Q L L L R 0 % _ M M L . P M . 5t M 2 2X L U 5 M 2 2X L L
0x0dda0c…0ddba0 Dummy {f00=0x0044, f01=0x0190, f02=»W" M L 6 @ M ( L U 6 M 2 2X L L ( E L % E L E L E M 6 M 2 2X L P$ 6 M 2 1( M "W ; = >(W $: L 4 5 L L " C m M ^ U L ( L L ? ? ? ? ? ? ? M.A A < 4 R W 7
0x0ddba0…0ddd34 (0, 281) Dummy {f00=0x0044, f01=0x0190, f02=» d _ A7 8> A< 5 T6 @< P < 7 8 8 8 8 @< A< A7 $: 5 4 X _8 8: W M: 8P ( "^ 7 8 L 0 MESSAGE UNKNOWN 8z H Q L L L R 0 % _ M M L . P M . 5t M 2 2X L U T 9L 0P
0x0ddd34…0ddec8 Dummy {f00=0x0044, f01=0x0190, f02=» 0 PU,DNXX,STAT,RY 9h ( E 5 = ? 8> 9K 1P 9bY _ @8z RDP A P 8 FL 8> X X ! R V Y A:* 8 TKP Y LPP MTP Y Y T T Y Y U U 0!? ?T W 1 Q TKP MTT Y
0x0ddec8…0de05c Dummy {f00=0x0044, f01=0x0190, f02=»T Z 8> W P 8> $>H $ NOT W0 = @ p ! $ rT tP Y 8> C r C R ] 7 ^ 7 ;L 0AB CD ADDR @ 9a:a;a R R A; ; A< _ $: _ P A @< P$ @; = ^ ] ] @; _ A< $:
0x0de05c…0de1f0 Dummy {f00=0x0044, f01=0x0190, f02=»< _* 5 @< 8> @ A 7 0 >( A< A< <~ ( "^ @ A $: 9K % A ~(@ A J A< A A A A A< A< A< a < @ ? ? > P :b" Q P T4 P Q Q @ @ @ @ Y Y Y Y P A> (
0x0de1f0…0de384 Dummy {f00=0x0044, f01=0x0190, f02=» @ ? ? ? ? ? ? ? = ; P6 $ R, Z R R Q $ :D P $ R ^& : 8> R ] A> A> A> A> A> A> A>" >$ ,:j Z ( I ^ - ^ *@9J M >& @> @> @> @> @> @> @>" >$ ? ? ? ? ? ? ?
0x0de384…0de518 Dummy {f00=0x0044, f01=0x0190, f02=» P P4 0 P P C C C LPT P P C # $: C _: DL P H C _ P X( DD _Z :EOS :EOF * + * @ !? ?R _ ? *6 ' !? 0X A "! X6 @ Q P ^L_ P XP P R :AV L D I I "R (@(@ ^ :j >Z
0x0de518…0de6ac Dummy {f00=0x0044, f01=0x0190, f02=»(@(@ ^ :j >Z _ m (@ M M 8 DKT X X T X M W M W y Y Y Y # C B * B * $? B0 P R ? P R B` ? P P| P Pv P $P &PN "P< /P :P ;P <P =P >P ?P
0x0de6ac…0de840 Dummy {f00=0x0044, f01=0x0190, f02=»T $ T Y B W0 %@ R b " Y Y Y Y Y $ X _0 8 TCX< TKXB MTXH DYXN :EOS :EOF * + * @ !? ?R _ ? *6 ' !? 0X A "! X6 @ Q P ^L_ P XP P R :AV L D I I "R (@(@ ^ :j >Z
0x0de840…0de9d4 (0, 282) Dummy {f00=0x0044, f01=0x0190, f02=»(@(@ ^ :j >Z _ m (@ M M 8 DKT X X T X M W M W y Y Y Y # C B * B * $? D X M M Y X FN FN B Y ! FN L E X P P P P * B * @D P M L - AD
0x0de9d4…0deb68 Dummy {f00=0x0044, f01=0x0190, f02=» AD .L *^ B :e L Ph !E M Q !E B B $ !E !F L x P2 x X0 M L Q !E _@ !E M Q E 4 ! 9A " ! M 4 P P L P P ! _ 4 B E M E L :C* WL WH:a L ! 9A r X L :B* W":a
0x0deb68…0decfc Dummy {f00=0x0044, f01=0x0190, f02=» P8 E !Kh AB B T B @B ) @B I @B I E 4 B AB ! T h AB M !E L @B ! P AB !J !E W AD !J !E " P !E M L ZL M AB V !Kh !K E B P2 AB B T$ B S @B T !Kh @B AB ! P W E B <b
0x0decfc…0dee90 Dummy {f00=0x0044, f01=0x0190, f02=» !H _ P* AB AB R Ql !H Wb !H !H WP !H !H W> B <e :e Q P AB AB !H AB Z X Td @B ! P W @B P Q Y @B @B AB AB !H @B ! P W Y AB & B Y E @B :e L Pv !
0x0dee90…0df024 Dummy {f00=0x0044, f01=0x0190, f02=» E T X $ P@ D R: P @B ! P !JR T D $ !J @B ! T L AD !J W !JR T D R@ $ !J @B ! T @B T " T AB W AB T P AB Y T U 4 !J @B ! P !E W !E " P M L Z2 E 4 !J @B ! P !F " T W( !F "
0x0df024…0df1b8 Dummy {f00=0x0044, f01=0x0190, f02=»J $ <b! L !? P L ! _ @B L T !E L 9AV$ !E M Q A @ M Q *V M E 4 !E !E M Q AB M !F 4 @B TOTD @B 1T: B AB @B ! P !E W !E " P M L ZJ E 4 @ _ X X X X
0x0df1b8…0df34c Dummy {f00=0x0044, f01=0x0190, f02=»_ X _ X" X& T: X P4 0' P. 1R P _ 0$ XT % X` Z _f % _n Q4 8 TYP, R Y _$ P Q X Q % _" Y Y Y *B% X P Y $ W Y =D %_ X P V % P Y X XT Q _ LP
0x0df34c…0df4e0 Dummy {f00=0x0044, f01=0x0190, f02=» = 0 :R # Y ; ; ? 0 :R 9 Y 9 9 : : : @ P R ! R P L M M Y$ #? @ P R P T T T Y" P T _ X D D E E ] @ E @
0x0df4e0…0df674 (0, 283) Dummy {f00=0x0045, f01=0x0190, f02=» | A @R4 @R6 @R8 @R:<h @R:% @R< @R> R@ RB f [ [ [ [ [ [ [ ^ ^ [ [ [ [ @ L ! P Y _ @ M ^ U > > > > > > >WZ | A ^ T " T0 ! P W SY SD
0x0df674…0df808 Dummy {f00=0x0045, f01=0x0190, f02=» Q _, AR _V LM R@ A $ AR R L 9 !? AQ. AQ8 AQ< AQ. AQ8 AQ< J AQ& T8 B ! P B J (@" T L #( "^ B P @ !? M @RnP M L R ! _ PP I H P _ A N6 A A A @ ~ Q A ~ @Q A ~ @
0x0df808…0df99c Dummy {f00=0x0045, f01=0x0190, f02=» | A @ @ @ @ <h @ % @ @ f [ [ [ [ [ [ [ ^ ^ [ [ [ [ @ L ! P Y _ @ M ^ U > > > > > > >W | A ^ T " T ! P W SY SD
0x0df99c…0dfb30 Dummy {f00=0x0045, f01=0x0190, f02=» DOS - PTS 8000 REL. 11.0 81-02-16 MINI VERSION S : A A A J A T B ! P B J (@" T L #( "^ B P @ !? M @ P M L R ! _ PP I H P _ A N6 A A A @ ~ A ~ @ A ~ @
0x0dfb30…0dfcc4 Dummy {f00=0x0045, f01=0x0190, f02=» A1,ECBRL,A8 IF REQUEST LENGTH IS NOT < P CWK A1,CNFOSL CORRECT LENGTH FOR FOS 4 * P RF(E) LL0010 THEN t 8 P ABL E:SO12 PRINT ERROR MESSAGE ( PLL0010 EQU * END (
0x0dfcc4…0dfe58 Dummy {f00=0x0045, f01=0x0190, f02=» A1,DWTORD,A6 IF COMMAND IS LEGAL 2 P ECR A1,A1 FOR FOS DISK: 0 * P CWK A1,COMWRT WRITE f P RF(E) LL0020 . P CWK A1,COMFMW DFM WRITE P RF(E) LL0020 * P
0x0dfe58…0dffec Dummy {f00=0x0045, f01=0x0190, f02=»F(E) LL0020 ELSE P $ PLL0015 EQU * * PTS , 8 P ABL E:SO11 PRINT ERROR MESSAGE H ( PLL0020 EQU * END P* , P* INTERLACE SECTOR FOR X1215 FORMAT DISK P* > P* THIS SEQUEN
0x0dffec…0e0180 Dummy {f00=0x0045, f01=0x0190, f02=»BER h P* 0 P LD A8,DWTECB,A6 ECB ADDRESS 4 P LD A7,ECBSC,A8 SECTOR ADDRESS J P $ P LDR A2,A7 LOGICAL SECTOR NUMBER P SUK A7,1 " P RF(Z) LL0060 LOGICAL SECTOR 1 P SUK A7,2 " P RF(Z) LL007
0x0e0180…0e0314 (0, 284) Opaque[0x194]
0x0e0314…0e04a8 # DirEnt {nam=»FLXCO1«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x08a8, f03=0x0000}
0x0e0314…0e04a8 IdxSect {
0x0e0314…0e04a8 f00 = 0x0045 // 0xe0314 @0x0
0x0e0314…0e04a8 f01 = 0x0004 // 0xe0316 @0x2
0x0e0314…0e04a8 gno = [ // 0xe0318 @0x4
0x0e0314…0e04a8 [0x00]: C0x0045.0x1.0
0x0e0314…0e04a8 [0x01]: C0x0045.0x2.0
0x0e0314…0e04a8 ]
0x0e0314…0e04a8 }
0x0e04a8…0e063c Dummy {f00=0x0045, f01=0x0190, f02=» t z
0x0e063c…0e07d0 Dummy {f00=0x0045, f01=0x0190, f02=»
[…0x6…]
0x0e1148…0e12dc Dummy {f00=0x0045, f01=0x0190, f02=» r @ @ Z < * " * * 8 0
0x0e12dc…0e1470 Dummy {f00=0x0045, f01=0x0190, f02=» ( "( _ < 8_(( @ T @ A : X: A ( @ T A A @ A _< Xp 5_& T( ( @ * $ @ . A . . : A & 4T ( @ * A $ A . " & @ . A ._B( B : W
0x0e1470…0e1604 Dummy {f00=0x0045, f01=0x0190, f02=»RC TM A2,A3 RF(NZ) READ50 READ40 EQU * 2 * F 8 4* UPDATE SECTOR,BUFFER,LOOP-COUNTER AND FLAG-AREA . P * ADS A1,FDECB1+2 BUFFER IM FDECB1+12 SECTOR ADK A5,2 FLAG-AREA SUK A6,1 RB(NZ)
0x0e1604…0e1798 Dummy {f00=0x0045, f01=0x0190, f02=» RB READ40 * * READ OVER * 0 READ90 EQU * : & ! ST A9,FDECB1+4 NORMAL REQ.LENGTH N * % LD A6,FDECB1+2 BUFFER BACK TO NORMAL x SUR A6,A9 ST A6,FDECB1+2 LD A1,SAVSEC SECT NO ST A1,FDECB1+12 RE
0x0e1798…0e192c Dummy {f00=0x0045, f01=0x0190, f02=»*********************** v 6 1* * 6 1* W R I T E : WRITE A CYLINDER (TRACK) * Z 6 1* * 6 1* IF NECESSARY, WRITE DELETED DATA IF IT IS * 6 1
0x0e192c…0e1ac0 Dummy {f00=0x0045, f01=0x018e, f02=»***************************** | * & WRITE EQU * 0 LDK A7,/95 D LDKL A8,FDECB2 X * p $ * CHECK IF THERE ARE ANY FLAGS z * LDR A1,A5 LDK A2,52 WRIT05 EQU * LDR* A11,A1 RF(NZ) WRIT20 F
0x0e1ac0…0e1c54 (0, 286) Opaque[0x194]
0x0e1c54…0e1de8 # DirEnt {nam=»FLXMO2«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x08b8, f03=0x0000}
0x0e1c54…0e1de8 IdxSect {
0x0e1c54…0e1de8 f00 = 0x0045 // 0xe1c54 @0x0
0x0e1c54…0e1de8 f01 = 0x0008 // 0xe1c56 @0x2
0x0e1c54…0e1de8 gno = [ // 0xe1c58 @0x4
0x0e1c54…0e1de8 [0x00]: C0x0045.0x3.0
0x0e1c54…0e1de8 [0x01]: C0x0046.0x0.0
0x0e1c54…0e1de8 [0x02]: C0x0046.0x1.0
0x0e1c54…0e1de8 [0x03]: C0x0046.0x2.0
0x0e1c54…0e1de8 ]
0x0e1c54…0e1de8 }
0x0e1de8…0e1f7c Dummy {f00=0x0045, f01=0x0190, f02=» +8 0 0 0 0 0 0 0 0 0 0 0 6 0 0 0 0 0 0 0 0 0 0 0 0 0 0 6 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 6 @
0x0e1f7c…0e2110 Dummy {f00=0x0045, f01=0x0190, f02=» _ A , $ & ? ? ? ? ? ? ? @ > > U H ( ( P c P W. A V ( U P @ V L 6 U
0x0e2110…0e22a4 Dummy {f00=0x0045, f01=0x0190, f02=» A _v A , A jQ > n A j _ l 8 Q Z P 0 9 ` `_ R _, n _ P H H ? ? ? ? ? ^ A _ _ ^ ? ? ? $P T I R $ 5 % n ZW n W n T T U U U U T U W
0x0e22a4…0e2438 Dummy {f00=0x0045, f01=0x0190, f02=» 1 A P P P Wp " ? * X R Y P _ ? @ 8 R Y P _ W6 8 X W. ? ` @ @ P $ H W W > > > > > > > > @ V ? > _ > ? _ > > ? ^ ! Y ^ _ 6 n .A. p #M 1
0x0e2438…0e25cc Dummy {f00=0x0045, f01=0x0190, f02=» n A ,I.9 * X R C C nA @ fA. * X V 9_< @ D Y Y Z ! ! ^ ! & ! ^ Y Y L ! Y ! T B Y ! B Y ` X Y X` P> P4 P6 P, P Z h
0x0e25cc…0e2760 Dummy {f00=0x0045, f01=0x0190, f02=»W ; ^ R :A Y Z Y Z X Z # " P X V< V ;A;F X ^<a R Y Y ! T X T ! T ! X Z Y Z X :D:c C Y ` Y ^ p W D TT ! & $ I ^ TO SS Y V B P Y Z ! ^ Y V 1 Q Y Z ! ^ ! X Y _ ! 6
0x0e2760…0e28f4 (0, 287) Dummy {f00=0x0046, f01=0x0190, f02=» Y L Y ! 6T ! ! ! ! P W X V$ T ! < X ^8 Y B X Y C '? nI b :AZ ! :CV : V @:CV Y :b" P Y X X 4 P N Y W Y Y 4 X X X W Q N 4 Y V ! NT6 ! T. Y V9 Y X L
0x0e28f4…0e2a88 Dummy {f00=0x0046, f01=0x0190, f02=» X XP Y X;B+ Wj W ! B! Tz ! 9a X X bT, X `W& W0 W ! B! TD X X ` X b X Z$ <B X Z$ < q r @ T Q D R Y N 4
0x0e2a88…0e2c1c Dummy {f00=0x0046, f01=0x0190, f02=» T v < ~ _ ` n ^ 4 _ < < @ l 1 A l _ P 9 > > > > > > > > @ A
0x0e2c1c…0e2db0 Dummy {f00=0x0046, f01=0x0190, f02=» " [ [ [ [ [ [ [ > > [ [ Z Z ? ? Z Z Z Z Z Z Z " $ & > x P~ "R~ Y Pj T P` <UR "R4 x PB X R< X T6 X T0. T G Y6 G _` P ,P -
0x0e2db0…0e2f44 Dummy {f00=0x0046, f01=0x0190, f02=» X ,P Xh I Y # C C # P Y '? Y Y T # P W < Y (@ 2 @ _ > n(@ X L U0 L QL L # T R < 5 ^ R < 5 Y X L P ( L ) 1 _( n(@ X P 4 Y X 1 1 X
0x0e2f44…0e30d8 Dummy {f00=0x0046, f01=0x0190, f02=» Y WZ X $ $ ^ WD X Y :g H " I " ? P& X P ,P 9A _ H "P I " . P Y X$; [(;! P "Z0?AZ4 @ Q " X " _F X $ _R A A A A A A | - M @ " A. 'B
0x0e30d8…0e326c Dummy {f00=0x0046, f01=0x0190, f02=» @ | $ A A @ @ @ E E E E E & E @ F CRP <A COP <A BAP AS<A E ASP @ T ' A ASP F @ U A ASP F P :B A D AST R U :l?j R> P R0?J A A E E
0x0e326c…0e3400 Dummy {f00=0x0046, f01=0x0190, f02=» A @ L @ P _ @ ! P0 9h !RRP @ @ A _H ' S W Y* @ @ A @ L _ @ A A A A E @ < V: @ R2 @ TU
0x0e3400…0e3594 (0, 288) Dummy {f00=0x0046, f01=0x0190, f02=»=A;A E : ' ' : @ < 9B A : " A @ A @ | E A @ V < ' ' @ P A @ T A A r N @ 0 D;P< A;TB ; 1 @ A @ r U ( RT N WL
0x0e3594…0e3728 Dummy {f00=0x0046, f01=0x0190, f02=» < @ P " T t @ R V @ ! T @ tA @ T @ @ I A p ( A r @ p A p @ P A @ r p $ ) A I. : A T A Z " Q :d @ # R$P R.W ' * A W ' ' @ : ' A Z
0x0e3728…0e38bc Dummy {f00=0x0046, f01=0x0190, f02=» A : @ @ ! P V :AW 9E R _ <e @ $ T 9A $ < :B 9A) @ ZP A Z A I TL W 9D @ @ Vr s @ TA I T - A _ I N T V S : ' 2 N 9PN S Y TD $ 1T> C !CCTp : 1P P(_ P =H P ) @
0x0e38bc…0e3a50 Dummy {f00=0x0046, f01=0x0190, f02=» A t A v X X S W A x A z A : V V W, Q( T W& @ T R P @ T A F R U @ A ( T : A . _ 0V , - P X 9A_ : @ ! P (W ( : < @
0x0e3a50…0e3be4 Dummy {f00=0x0046, f01=0x0190, f02=» N 0 !;;P 0 !;; - a | =! 0 - Y : 2 N 8 0 ! P P Y _0 L Q P Y P Y A V : , %T 8 P , ! P : N : P : 7 ( $SWAP 'B @
0x0e3be4…0e3d78 Dummy {f00=0x0046, f01=0x0190, f02=»_6 : @ % '" @ @ R6 r . !TTP ' # Y ), !TTX _: : P ` @ A P _ @ @ 3 S S @ ~ V A ~ : P( T ' S S _* :
0x0e3d78…0e3f0c Dummy {f00=0x0046, f01=0x0190, f02=» W @ = V W = V # P0 $ " U ' _2 $ P0 $ " U ' _2 @ P (XV ' S ( @ S =J @ " S @ S A
0x0e3f0c…0e40a0 Dummy {f00=0x0046, f01=0x0190, f02=» # A * # P $ _ $ Pd A $ @ 8 8 4 D P$ & @ # P H I K T + Y@ @ _f @ Y ), !TTX & Y : & ), !TTX !CCTr # P, $ @ 4 U
0x0e40a0…0e4234 (0, 289) Dummy {f00=0x0046, f01=0x0190, f02=»! P @ 8 8 8 3 (XU ' . !TTT ),_ !CCP R & Y W # P0 A $ A $& @ @ < ! @ _2 #t $ ]X $ @ 8 8 8 4 D P$ & @ # P H I K T K YB
0x0e4234…0e43c8 Dummy {f00=0x0046, f01=0x0190, f02=» !PPT # W !LLT # W !RRP ' # A A A @ 0 PV @ P P _ P H $&? @ #? H & D # * H D > " #R @ $v D & @ @ ) I $ D #@PV D L Tp D ,P @ ` T @ 1 Q a : I 6 I 8 D *# P6
0x0e43c8…0e455c Dummy {f00=0x0046, f01=0x0190, f02=» @ ~U A ~ < + + P ! @ : ` P: @ @ @ D (P W H $ I , % E , a : ' ' ' ' ' ' : N =H N ) : N =H N ) : &=H F ) : F =H F ) : ? ? )j > > : P
0x0e455c…0e46f0 Dummy {f00=0x0046, f01=0x0190, f02=» ' Q @ Q 1 a : @ &J * P@ J # P _ :d Y @ Z A T _4 @ 2T P _ / : .P W P A .X &J @ T :D * J TT J & P T *& >aW T $&
0x0e46f0…0e4884 Dummy {f00=0x0046, f01=0x0190, f02=» P _ 3 _ : @ @ T ' : dR d R _ 00)0= % : @ A A r : @ A P & @ A @ @ : . ! T ' ! . : (XR ' (XY ( : d
0x0e4884…0e4a18 Dummy {f00=0x0046, f01=0x0190, f02=» : A Z A. c ? ? ? ? ? ? ? : > > > > > > > : R $ )_ : ' @ (XV (XV ' (XZ A ' @ _X V W @ : A ; @ : : " L @ V @ ' 0 H A
0x0e4a18…0e4bac Dummy {f00=0x0046, f01=0x0190, f02=»:C # : .=H N ) (h .=H N ) (h N : d 8" R _ ZY QY : ? ? n R 0 R P P _ : @ | < | @ W AST" ? ? > | ] ] YF | A. @
0x0e4bac…0e4d40 Dummy {f00=0x0046, f01=0x0190, f02=» jPz " " " l P6 8 P X Z = _ " Q Q 6 X Q 4_H NW$ +& * : b b
0x0e4d40…0e4ed4 (0, 290) Opaque[0x194]
0x0e4ed4…0e5068 # DirEnt {nam=»FLXCO2«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x08d8, f03=0x0000}
0x0e4ed4…0e5068 IdxSect {
0x0e4ed4…0e5068 f00 = 0x0046 // 0xe4ed4 @0x0
0x0e4ed4…0e5068 f01 = 0x000a // 0xe4ed6 @0x2
0x0e4ed4…0e5068 gno = [ // 0xe4ed8 @0x4
0x0e4ed4…0e5068 [0x00]: C0x0046.0x3.0
0x0e4ed4…0e5068 [0x01]: C0x0047.0x0.0
0x0e4ed4…0e5068 [0x02]: C0x0047.0x1.0
0x0e4ed4…0e5068 [0x03]: C0x0047.0x2.0
0x0e4ed4…0e5068 [0x04]: C0x0047.0x3.0
0x0e4ed4…0e5068 ]
0x0e4ed4…0e5068 }
0x0e5068…0e51fc Dummy {f00=0x0046, f01=0x0190, f02=»4 &7V
0x0e51fc…0e5390 Dummy {f00=0x0046, f01=0x0190, f02=»
[…0x4…]
0x0e59e0…0e5b74 (0, 291) Dummy {f00=0x0047, f01=0x0190, f02=»
[…0x1d…]
0x0e8938…0e8acc Dummy {f00=0x0047, f01=0x0190, f02=» $ 7. 7. B ; P $ 7. B P T 5 B 5 7> 2 A4 A4 A A " A . A 0 A A & P ' A4 W ( @4 P( 5 6p 4 ( ' A " A 0 7 W 7 5 6p @4 M 7B 7> ( $( 4
0x0e8acc…0e8c60 Dummy {f00=0x0047, f01=0x0190, f02=» @ A @4 A " 42 : $ 4 T ( @ , 5 Wh @ 0 A4 @4 T ( A ( >'W ( A ( >( 4T ( @ , 5 A & A 0 $ ( @ & A & @4 A 0 42 A4 : @4 T W 4 A " A 0 42 4 5 42 :( B 5 : W # A ( :
0x0e8c60…0e8df4 (0, 295) Opaque[0x194]
0x0e8df4…0e8f88 # DirEnt {nam=»FLXCON«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x0900, f03=0x0000}
0x0e8df4…0e8f88 IdxSect {
0x0e8df4…0e8f88 f00 = 0x0048 // 0xe8df4 @0x0
0x0e8df4…0e8f88 f01 = 0x0002 // 0xe8df6 @0x2
0x0e8df4…0e8f88 gno = [ // 0xe8df8 @0x4
0x0e8df4…0e8f88 [0x00]: C0x0048.0x0.0
0x0e8df4…0e8f88 ]
0x0e8df4…0e8f88 }
0x0e8f88…0e911c Dummy {f00=0x0048, f01=0x006e, f02=» T; 01; TID=FC; TCL=FC; * LEV=60; : 00; J 01; V SDC=S01; b
0x0e911c…0e92b0 Dummy {f00=0x0048, f01=0x2008, f02=» 01; TID=FC; TCL=FC; * LEV=60; : 00; J 01; V SDC=S01; b
0x0e92b0…0e9444 Dummy {f00=0x0048, f01=0x0190, f02=» SWB:EL SWB:NS ACBIOEV 0 ACBSWB4 D ACBSEG X ACBNPE> l ACBMMP2 ACBMMC ACBLAP ACBLACN ACBSTA ACBREL: ACBADA
0x0e9444…0e95d8 Dummy {f00=0x0048, f01=0x0190, f02=» IHFDN , ( , ( ! @ , ( 1 p , ( A , ( Q , ( a
0x0e95d8…0e976c Dummy {f00=0x0048, f01=0x0190, f02=»ZK SCTSFA SCTEFA SCTIPL 4 SCTANO H SCTTCT SCTCDTL p , ( @ SCTPAG SCTNOP SCTPSZ SCTSTB S
0x0e976c…0e9900 Dummy {f00=0x0048, f01=0x4160, f02=» SCTFWL SCTBLK SCTDCT ( SCTNOS~ < SCTMXS P , ( d SCTMOX STKENDS STKMOV Z STKCOM0 h [ $ )
0x0e9900…0e9a94 (0, 296) Opaque[0x194]
0x0e9a94…0e9c28 # DirEnt {nam=»TOSSUT«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0908, f03=0x0000}
0x0e9a94…0e9c28 IdxSect {
0x0e9a94…0e9c28 f00 = 0x0048 // 0xe9a94 @0x0
0x0e9a94…0e9c28 f01 = 0x0018 // 0xe9a96 @0x2
0x0e9a94…0e9c28 gno = [ // 0xe9a98 @0x4
0x0e9a94…0e9c28 [0x00]: C0x0048.0x1.0
0x0e9a94…0e9c28 [0x01]: C0x0048.0x2.0
0x0e9a94…0e9c28 [0x02]: C0x0048.0x3.0
0x0e9a94…0e9c28 [0x03]: C0x0049.0x0.0
0x0e9a94…0e9c28 [0x04]: C0x0049.0x1.0
0x0e9a94…0e9c28 [0x05]: C0x0049.0x2.0
0x0e9a94…0e9c28 [0x06]: C0x0049.0x3.0
0x0e9a94…0e9c28 [0x07]: C0x004a.0x0.0
0x0e9a94…0e9c28 [0x08]: C0x004a.0x1.0
0x0e9a94…0e9c28 [0x09]: C0x004a.0x2.0
0x0e9a94…0e9c28 [0x0a]: C0x004a.0x3.0
0x0e9a94…0e9c28 [0x0b]: C0x004b.0x0.0
0x0e9a94…0e9c28 ]
0x0e9a94…0e9c28 }
0x0e9c28…0e9dbc Dummy {f00=0x0048, f01=0x0190, f02=» . ] : j 0 ,* # +, + RC:
0x0e9dbc…0e9f50 Dummy {f00=0x0048, f01=0x0190, f02=» "END OF ; PROGRAM ABORTED BY
0x0e9f50…0ea0e4 Dummy {f00=0x0048, f01=0x0190, f02=» B B $ A T C A T C B ZVT @ lT J B R [ B : B ; [ H * % A J B A B L ( B Tj @ B! F A F a FP4 @ J T @ H A H R _F P a H A H_T W a H B
0x0ea0e4…0ea278 Dummy {f00=0x0048, f01=0x0190, f02=»P I , =Z I , * _: 8 ,>A P 8 Z : ; L , [ A " j , 9 : Z : [ * J / L Z : R < !LLP !XXP : T D @ L 4T 4 6T A j : T @ h A j : @ L 6T T W T @ j A hW
0x0ea278…0ea40c Dummy {f00=0x0048, f01=0x0190, f02=»Sd S _4 SN _ SD _: A R Z T T @ RT W" >P T Z Z Z Z : [ _* [ [ Q. , 0R" 9U AR FQ 0 P =D _, [ Z Z : = ! U 9 - Y : [ [ [ [ [ [ [
0x0ea40c…0ea5a0 Dummy {f00=0x0048, f01=0x0190, f02=» J T7v ^ Xv V _T W6 [ Z Z Z Z Z Z Z : T1$>EV U2(ZN T T T W T. C @ L 4T 3 6T @ d ) A d TD @ j @ f:B @ f E A f 7v D & @ L 6T
0x0ea5a0…0ea734 (0, 297) Dummy {f00=0x0048, f01=0x0190, f02=» @ P r>AV& 54W W | r T A fW T A d @ P @ L 4T T T @ T >BV -Wt>AV -Wl>AVh B j R _ TJ B V@ R6 _ @ T M @ R - B RL M M WB T69 A T B f R& T1$> R > @ L T
0x0ea734…0ea8c8 Dummy {f00=0x0048, f01=0x0190, f02=» A ' A * J / L A f A d P _ @/ @ j EXT ( H/ P X$_ @ l I/ :a A L A N ;a L1 # A A P A TH #( W0 @ P #( : > M ^ / R 0 ;a;A _ @ L
0x0ea8c8…0eaa5c Dummy {f00=0x0048, f01=0x0190, f02=» R A _. @ L <R A L T @ T S 7< P^Q0 T$ W2FUNCTION NOT IN THIS PACKAGE ; nW ;A @ L H8z , & P J @ L:A H/ A ` H/ A b X & ( J LLPOP SLX TK1 TK2 MT1 MT2 pqCSH FLOGFI
0x0eaa5c…0eabf0 Dummy {f00=0x0048, f01=0x0190, f02=» P II S R : t @ j AP IP QP : : @ j !NNP !YYP t A P : R l @ @ S : @ L .P 0P T S : S : S : S ( ! T ) : R !IIP !EEP : @ j! P P t A P : @6H" ( " R @ P
0x0eabf0…0ead84 Dummy {f00=0x0048, f01=0x0190, f02=» t A P : NW t @ j CDP" FDP MDP DUT : S : W A : @ j $P WZ 9a D A P : @ j I P ^ : : R I j W$ : @ j! YT A P @ L &T : X : @ j NEX$ EQX,_ @ P @Y$ : A W* A A A A W$ A A
0x0ead84…0eaf18 Dummy {f00=0x0048, f01=0x0190, f02=» P P _ @ T A A W @ P A _ A _ ( ] ' ( = ( ' ( = P P P P _* _0 ( ] @ @ A ( B A A ( @ L 2Pv @( !LLPD !XXP> A A !DDT A
0x0eaf18…0eb0ac Dummy {f00=0x0048, f01=0x0190, f02=» TYPE; P P j 8 D: 8 @ @ P ]( ^ @ ( ] ' ( = ( ' ( = P P P P P _, _2 @ L *T @ L *T ( B C W @ P @ T ( B C @
0x0eb0ac…0eb240 Dummy {f00=0x0048, f01=0x0190, f02=» P W ( @ b Q 9A D: T T 8FATAL DM OPEN ERROR ; FATAL FM OPEN ERROR ; DISC I/O ERROR; ' T @ T *] : @ j DKTj A : @ j DKP WX A : @ j DKX. W6 S DK A H H P
0x0eb240…0eb3d4 (0, 298) Dummy {f00=0x0048, f01=0x0190, f02=» P : @ j @ l "P ^ W C ;b : @ j! YT A P : P Wb _ 0 W 0 W WH : @ j R< I : @ L P$ @ P W @ j! P !P T A P : [ : VW A 2W _ A W< @ P # ( B # TlW IBM LABEL;TOSS LABEL;
0x0eb3d4…0eb568 Dummy {f00=0x0048, f01=0x0190, f02=» & _ j N Z rQ@ , 0P @ X N : %U : : ,! 9D ," : , 0 & N 0_. A R l @ P A ` V m j^ i 00 jR _ a V j ] @ Y : : : R_ _ S : W @ A P
0x0eb568…0eb6fc Dummy {f00=0x0048, f01=0x0190, f02=» C C ( B P A j :
0x0eb6fc…0eb890 Dummy {f00=0x0048, f01=0x0190, f02=»
[…0x4…]
0x0ebee0…0ec074 (0, 299) Dummy {f00=0x0049, f01=0x0190, f02=»
[…0x9…]
0x0ecea8…0ed03c Dummy {f00=0x0049, f01=0x0190, f02=» CC: TRY AGAIN!! CRV CRF DLF PVC XEYf ,eh ik g g g 8
0x0ed03c…0ed1d0 Dummy {f00=0x0049, f01=0x0190, f02=» j#g kqpc[ ]^_d`ah tuvscr[ ]^_d`ah w{xh )*+h h 9:h Zc[ ]^_d`abh Z c[ ]^_d`abh NP B AI k wx yz | A A V! VAW!T T"V"$, B A A A A A A AVAVA T A A A A V!VAVA A A
0x0ed1d0…0ed364 Dummy {f00=0x0049, f01=0x0190, f02=» T QT A A A A " A
0x0ed364…0ed4f8 Dummy {f00=0x0049, f01=0x0190, f02=» c N @ d
0x0ed4f8…0ed68c Dummy {f00=0x0049, f01=0x0190, f02=» | N B B B ( , N B R 2 8 R R R V B R z B R B B r B B R R
0x0ed68c…0ed820 Dummy {f00=0x0049, f01=0x0190, f02=» 6 4 5 " ( . 5 : 8 * H < 8 ( ( . 2 e K WF]l B
0x0ed820…0ed9b4 (0, 301) Dummy {f00=0x0049, f01=0x0190, f02=»; =d=t= ;N= = = ; =d<0 = = >l= = > <6>4>B>T>l>r>z> ; > > ; > ? >l? ? ? <n; ?4; ?F?T?h?z? ? ? ? ? ? ? @ @* @B?T;&@z@ @ @ @ @ @ @ @ ; ;*?T;*A ; A A,< 8 9 9 9.9:9D9N9`9p9p9 9 9 9 9 9 9 9 9 9 : : :B:P:^:n:x:.: Z8 8 b8 x8 {8 8 k8 8 8
0x0ed9b4…0edb48 Dummy {f00=0x0049, f01=0x0190, f02=»D EXE C,C BbBbA H8HPA F A@A B B B E HhG C C,C@CbCtC C C C C C B E B A@A A E F G G A@A D`A@A DzB BvA@A B B B D D A@A B B B D D.D A@A D D D EDA@A A D C,C B D E E B B B C,C B GxE E B B B E0E C,C EnB B B A@C,C B D E E B B E C F F I>F IX A D DJ BJ
0x0edb48…0edcdc Dummy {f00=0x0049, f01=0x0190, f02=» Fh A@PRINT DEVICE:;SOURCE RESP. DESTINATION DISC:;VOLUME NAME:; VOLUME NAMES:;OLD FILE NAME:; NUMBER OF VTOC ENTRIES:;CREATION DATE:; RETENTION PERIOD:;BLOCKING FACTOR:; EFFECTIVE RECORD LENGTH:; MAXIMUM NUMBER OF RECORDS:; SECTOR NUMBER:;
0x0edcdc…0ede70 Dummy {f00=0x0049, f01=0x0190, f02=»TPUT DEVICE:; LABELLED 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 KEYS IN LISTING:;CHARACTER CODE:;PROGRAM LENGTH:;MONITOR NUMBER:;START SWITCH O
0x0ede70…0ee004 Dummy {f00=0x0049, f01=0x0190, f02=»ION:; DATASET NUMBER:;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-KE
0x0ee004…0ee198 Dummy {f00=0x0049, f01=0x0190, f02=»DING ORDER:;REORGANIZE DISC:; DISC VERSION:;INDEX VOLUME NAME:; DUPL. ALLOWED: ; COND. INDEX: ; EXP. TYPE:; COND ITEM DISPL.:; COND ITEM VALUE:; ITEM DISPL.:; ITEM LENGTH:; INDEX FILE LENGTH:; *** INDEX DESCRIPTION ***;*** KEY DESCRIPTION ***;TESTIN
0x0ee198…0ee32c Dummy {f00=0x0049, f01=0x0190, f02=»EVICE :; EXTENSION SIZE :; FUNCTION :; USAGE :;USAGE :;VOLUME NAME OF WORKFILE:; ALL INDICES:; LOG FILE VOLUME NAME:;LOWER RECORD LIMIT:;UPPER RECORD LIMIT:;DISC NOT OPERABLE;BADSPOT ON SYSTEM AREA. DISC NOT USEABLE; MORE THAN 18 BADSPOTS.DISC NOT USABLE;DISC I
0x0ee32c…0ee4c0 Dummy {f00=0x0049, f01=0x0190, f02=»NGTH; VTOC OVERFLOW;NO FREE SPACE ENTRY AVAILABLE;FILE NAME ALREADY USED; NO TOSS DISC FORMAT;TAPE UNIT NOT OPERABLE; OUTPUT DISC NOT EMPTY;FAULTY RECORD LENGTH; OUTPUT FILE NOT LARGE ENOUGH; OUTPUT FILE NOT EMPTY;TAPE UNIT NOT LOCKED/LOADED;INCORRECT TNR;OUTPUT I
0x0ee4c0…0ee654 (0, 302) Dummy {f00=0x0049, f01=0x0190, f02=»L 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; OLD FILE NAME UNKNOWN;FLEX. DISC ALREADY LOCKED;FLEX. DISC NOT LOCKED;FLEX. DI
0x0ee654…0ee7e8 Dummy {f00=0x0049, f01=0x0190, f02=»; 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 POSITION NUMBER;NOT ALLOWED TO MIX DISCSIZES; NOT ENOUGH C
0x0ee7e8…0ee97c Dummy {f00=0x0049, f01=0x0190, f02=»; TOTAL KEY LENGTH TOO LONG;FM I/O-ERROR: ; DESCRIPTOR BLOCK TOO LONG;OPERATOR ABORTED; FILE ATTACHED;ONLY D-PART DELETED;DATA ERROR ON ONE OR MORE DISC SECTORS;TAPE WRITE PROTECTED; FATAL TAPE ERROR; TAPE NOT CREATED BY CDT;COPY NOT SUCCESSFULL; DUPLICATE KEYS I
0x0ee97c…0eeb10 Dummy {f00=0x0049, f01=0x0190, f02=»ATION ERROR;KEY ALREADY EXISTS; NOT EXISTING KEY; NO INDEX LEFT;SOURCE DISC DATA ERROR:;DEST. DISC DATA ERROR:; NO INDICES; USER INFORMATION CONFLICTS WITH LOG INFORMATIOM ;CREATE BUFFER FILE NOT SUCCESSFUL ;ERROR ON FUNKTION LOG FILE ;BUFFER FILE NOT BIG ENOUGH
0x0eeb10…0eeca4 Dummy {f00=0x0049, f01=0x0190, f02=»ECT MMU-BUFFER LENGTH ; ( 8 ) 9 DUFDMD [ ; @I HI -P Z : : HI M :B L # ;A HI @ P 0!? T P $ _@ P ZH P ! _ DU2 DU1 DU4 DU3 MD1 MD2 MD3 MD4 FD1 FD2 FD3 FD4 CD1 CD2 CD3 CD4 TOSS UTILITIES
0x0eeca4…0eee38 Dummy {f00=0x0049, f01=0x0190, f02=» AJ AJ AJ AJ AJ AJ AK AK R % KZ P AJ @J P Wp @J : R !LLPB !XXPh R 1 R 2 Y AK AK AK Y AK AK @K W S 1 AK S 2 AK AJ K N : S 1 AK S 2 AK _.
0x0eee38…0eefcc Dummy {f00=0x0049, f01=0x0190, f02=» Q* ( , X "' P [& I _ "' AJ @J M R 0 $' R T W $ T AJ R !LLP @J T AJ AJ R 1 R 6 AJ R 4! AJ PJ AJ AJ @J @J w AJ AJ S$ @J @J w Y4 @J AJ @J AJ W : AJ AJ @J @J @K w
0x0eefcc…0ef160 Dummy {f00=0x0049, f01=0x0190, f02=» @J @J w AJ AJ AJ R AJ AJ AJ . AK 9H AK AK AJ AJ AJ @J P AJ AJ B AK ( B P @J C C C ( C B / P : @K :c AK AJ AJ AJ AJ @J AJ @J AJ AJ @J @J w AJ AJ @J AK C C
0x0ef160…0ef2f4 (0, 303) Dummy {f00=0x004a, f01=0x0190, f02=»J 0 AJ @J T @J X @J @J R&Q @J @J R @K AK @J AJ @J AJ @J @J Z Q @J @J Z @J @J RBQ @J @J U6 @J @J Y R @J @J Y AJ @K AK @J AJ @J AJ _ @J AJ @J AJ @J AJ @J AJ @K AK Q* U Tr Q 1 Q Q T AW@ AJ J R AJ @K A
0x0ef2f4…0ef488 Dummy {f00=0x004a, f01=0x0190, f02=»( B / P @W@ : @W@ P R @J AJ @J AJ !LLPZ @J T @J @K V @K AK R P P AJ P AJ @J @J @J @J w AJ AJ Rv P$W8 @J @J @J @J w AJ AJ SH @J P P AJ P AJ @J @J P P w Q Q @J Q @J 1 U P P> P
0x0ef488…0ef61c Dummy {f00=0x004a, f01=0x0190, f02=» w Q Q P AJ 0 AJ @J @J @J w AJ AJ T Q Q @J Q @J 1 @J @J @J @J w AJ AJ AJ AJ @J P @J @J @J @J w AJ AJ U P P> P AJ AJ @J ? N : AK P> ( P6 . P. @J P @J AJ @J AJ @J AK T K N :
0x0ef61c…0ef7b0 Dummy {f00=0x004a, f01=0x0190, f02=» _ J X`_2 AJ : @J T SL @J P Q : J SL @J Z` @J K @J K @J K @J K @J K @J K K K R 2 K R 1:H R K R !LLT R 4:H R 5 K K $ K & AJ ( Z` . " Z` R !LLP R : K % R 8 K & K ( K ) (
0x0ef7b0…0ef944 Dummy {f00=0x004a, f01=0x0190, f02=»J SJ AJ V 2 AJ @K % @J R 2 R 1 % Y @J AJ @J AJ @J @J AJ AJ w AJ AJ J @K C @J AJ @J AK ( C @J @J @K @J P @J w AJ AJ @J @J YXR @J @J Yd @J AJ @J AJ @K C @J AJ @J AK ( C @J
0x0ef944…0efad8 Dummy {f00=0x004a, f01=0x0190, f02=» Z Z` AZr ( Z 9 AZ ( Z Z` @J 0 AZ @J @J Z wn @J @J [ wn J [ @J T [ Z` Z A AZ ( J @J : AJ AK AK R % Wl T @J T : AJ AJ K AJ T@W AK P> SL @J P& T ( P .
0x0efad8…0efc6c Dummy {f00=0x004a, f01=0x0190, f02=»K 9c AK @K R C @J C AK AK R AJ P Z. R R4 B C AK AW@ C ( B / P R @W@ 0 AWB 0 AWD @WBT @WD Z P @J T @K AK P @J W AJ AJ AW@ @WB @WD P P w AWB AWD @J @J @W@ @J @WBT @J @WDT P AJ
0x0efc6c…0efe00 Dummy {f00=0x004a, f01=0x0190, f02=» P> K K P ] = ] ] W AJ AJ AW@ P P @J @J w AWB AWD @J @J @W@ @J @WB XT @J @WD XT @J Q @J Q AK P>_ @K AK XT W R P @J I @J ) @J I @J I W ( - : Zz FILE Z 9 VOLUME N
0x0efe00…0eff94 (0, 304) Dummy {f00=0x004a, f01=0x0190, f02=» DELETEDDU1 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
0x0eff94…0f0128 Dummy {f00=0x004a, f01=0x0190, f02=» 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 ( B bD b8 : ]4 2 A] A[ A] R A]) R A]
0x0f0128…0f02bc Dummy {f00=0x004a, f01=0x0190, f02=» C ( B & B & b< B b2 2 R A]6 ]6 [b , 9 TO 4 bH 4 I[z Y [J ]F [R $ ]F [x ]F , A[ , A[ , A[ " , A[ @[ >c A[ A] ] C ( B . b2 B & b< A] [N ]F [ ]F [
0x0f02bc…0f0450 Dummy {f00=0x004a, f01=0x0190, f02=»[ wn [ ]F Y W Y @[ [ vh @[ [ vh [ ]F [N ]F [ ]F n ]F n ]F [ [ [ [ [ b ] ( B . b2 B & b< [ [ ]B *% a R p [ R ]8 J U !
0x0f0450…0f05e4 Dummy {f00=0x004a, f01=0x0190, f02=» - U T U Z J 8 vh J ? vh J J wn J J wn - J J wn J " ( vh E ]8 " N ]8 J !LLP6 J " vh J !SST J % T vh J & X vh [ R p $ ! R !__Q Y . % Y p ]F W A
0x0f05e4…0f0778 Dummy {f00=0x004a, f01=0x0190, f02=» b 0NUMBER O
0x0f0778…0f090c Dummy {f00=0x004a, f01=0x0190, f02=»SS REL 11.0 NUMBER OF CATALOGED BADSPOTS = Z $ Ad D Ad D Ad D Ad D Ad" [ : Z $ Ad D Ad D Ad D Ad D Ad [ : Z $ Ad$ D Ad& D Ad( D Ad, [ : cR C
0x0f090c…0f0aa0 Dummy {f00=0x004a, f01=0x0190, f02=»e8 e8 e8 : cD 2 C C ( B & m B .P " T m : 0 Ac Ad. UU Ad6 Ad8 Ad< @ AcH Ac: d R ' P gB P P0 PV P| P d } ~ dT M g d h h h dT [g [h 4 d [4 4 g
0x0f0aa0…0f0c34 (0, 305) Dummy {f00=0x004a, f01=0x0190, f02=» g R P P W< dT &? &@ d g d y z { dT g d z { | dT &? &@ g R P P W< d dT L L g d y z { dT 1g 1h g d z { | dT L L g 2 AcF Ac8 $ AcS $ Ac7 AcE R ! R
0x0f0c34…0f0dc8 Dummy {f00=0x004a, f01=0x0190, f02=»9 R ! T : m m cD C C C B % E E AdR ( B ! : m C x AcF AcF m cD R R C ' V8 c d cD P T R IT C W C ( C ( B R % R E R E B Nc % Z R
0x0f0dc8…0f0f5c Dummy {f00=0x004a, f01=0x0190, f02=» IP @dRP t m AdB 2 AcF d6 Ac c d cD @dBP W AcH 2 d e( d @dBT e( d ( AdB B & m B m P2 T m dN dP B >( r m dN dP e( @d @d U Y
0x0f0f5c…0f10f0 Dummy {f00=0x004a, f01=0x0190, f02=»( dBP e8 e8W eV c6 B & m B P Wt @c: Y 2 d2 d4 d: @d< Ad: @d: $T d: @d< Ad: @d: $P d2 d4W( @d6 $ Y P e(_R d2 d4W. T m dN dP @c:>( r m dN dP @dBP eH e( e( AdB Ac:W eH eH @d T* @d
0x0f10f0…0f1284 Dummy {f00=0x004a, f01=0x0190, f02=» , d2 d4 d: @d< Ad: @d: $T d: @d< Ad: @d: $P d2 d4Wn @d6 $ Y P e(_R d2 d4 eH eH @d Tl @d Q @dDP c6( k< QL AcH Q> AcHW4 T RF dN dP @cH>( r m dN dP eH eH c6( k( dDT( cD( l W W
0x0f1284…0f1418 Dummy {f00=0x004a, f01=0x0190, f02=» c $ d W cf $ d c4 b 4 Pr @bR 4 T T T w 4 T w 1 Q 4 PB 4 T w 1 Q T T 4 T w 4 P _8 @bR W @d @d w Q 1 Q AbR AcH bP b 2 P T 0PV 0 % % (
0x0f1418…0f15ac Dummy {f00=0x004a, f01=0x0190, f02=»d@ Y @d@ Ad* 2 T T 4 R _ T 4 w U 5 cb ed @d* 2 % P ed _ AcH 2 AcF pD Acd @d* Q U( _ 2 % 2 * % Y : b pD 2 * , P Pv * BA % DS % PO %
0x0f15ac…0f1740 Dummy {f00=0x004a, f01=0x0190, f02=»ed Y Ad2 R " T `d$ Ad2 9A Dd$ 2 @d2R V 2 U Ad2 ed ]D 2 2 @cd % % cb ) % % Z @d % @d % @d" % c ( % Y 2 % @d* O . R O 1 R O 0 B W E d E ~
0x0f1740…0f18d4 (0, 306) Dummy {f00=0x004a, f01=0x0190, f02=»r~ r Ar Ar b Ar| @rzT tV t. t r r~ t@ s r~ r t sp t t @r| r t t. @r| 0 4 @r| @r| 8 < w 1 5 @r| @r| @b <! $ ) Y @b % % % % @b Ab @rz Arz t. @b b t2 @r| Ar| `r| r
0x0f18d4…0f1a68 Dummy {f00=0x004a, f01=0x0190, f02=»t2 @b @b @r| $ ) Y tV W rz : $ ) : Y : @r~ @r| ) @r ) @r ) @r ) Arz @b Ab : ( ( $ ( w T T W : @r| 0 4 @r @r w 1 5 : @r| , , , , w w Ar Ar : cD C C C 2 C
0x0f1a68…0f1bfc Dummy {f00=0x004a, f01=0x0190, f02=» C R C ( B u rt rp rp]L *% P0 @rt 8 BT rv @rt 0 0 r rv rt_J W : R _ P 0 - : ; [ V - - ' v v d v v v Z : : ; vb v : V *W
0x0f1bfc…0f1d90 Dummy {f00=0x004a, f01=0x0190, f02=» B@ v v ' v v d v v v Z Z Z Z : : ; wf v : V *W R - _ 1 T R Pwf - _ : [ S Q"R S P W S _ R Q _ ;A [ : [
0x0f1d90…0f1f24 Dummy {f00=0x004a, f01=0x0190, f02=»? 0OUTPUT VOLUME NAME: x C C ( : : B x $ ) Y xr x xl x AxZ xP( xl x `xR! YP 4 : %? v S : S f S 6 S b% =A S ^ S ` x UU 3 2P _ | , ) p
0x0f1f24…0f20b8 Dummy {f00=0x004a, 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 ~ | z P #P & B. T P ' " P : P S | P S ~ P "
0x0f20b8…0f224c Dummy {f00=0x004a, f01=0x0190, f02=» %? 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 % =B S t w E M % t R.Q&
0x0f224c…0f23e0 Dummy {f00=0x004a, f01=0x0190, f02=» . N 0 R N S 4 W P X _ R R <"? R }> P #P & B. T P ' " P : P S P S P " ^_"W W W W W + # @ # P s v UU 3 2P _
0x0f23e0…0f2574 (0, 307) Dummy {f00=0x004b, f01=0x0190, f02=» S t S p S S M % T S ( p NW 6 p . N 0 S # T S r p N S W p P X _ T R t S M R R R " R ( P * W p P #P
0x0f2574…0f2708 Dummy {f00=0x004b, f01=0x0190, f02=»R _ <e R P =A $ < ?B =A- R P S S M W W =D @ t w E M T 1 E _ M = R = @ T P W S W S , R p : J 6 "? UU t 3 2P _ 4 , 5 T G.G K. A ;A; G. ( ]
0x0f2708…0f289c Dummy {f00=0x004b, f01=0x0190, f02=» P X _ R R "? R R z h:B* S R P S B J 4R 4 :B 4 R : V V 49B R 4R @ t w A I ! j : P #P ( B. T P ' " P : P S P S P %
0x0f289c…0f2a30 Dummy {f00=0x004b, f01=0x0190, f02=» $ S ] S S ] z ] x S . N 0 S W . S S S ? S S R ^ 9B % s S ; V 9E S ; R P S S B J
0x0f2a30…0f2bc4 Dummy {f00=0x004b, f01=0x0190, f02=»@ N S W ` P X"_ R R "? R R S ` P #P Y* B. T P ! " P S P S : P S P S P % t_. R S W S S : 8 "? UU 3 2P
0x0f2bc4…0f2d58 Dummy {f00=0x004b, f01=0x0190, f02=» $ S f ] z ] x ~ W S t S z S ? S p S r R ^ P P t % R $ S p ; V 9E S p; R P S S n nB J pA I T :Wd R p! T S p_0!
0x0f2d58…0f2eec Dummy {f00=0x004b, f01=0x0190, f02=» T s S f N S W f P X"_ R R "? R $9B R R S f P #P Y* B. T P ! " P S P S : P S P S P % t_. R S W S S :
0x0f2eec…0f3080 Dummy {f00=0x004b, f01=0x018e, f02=» | 8 P LDKL A2,LIBRLE SET RECORD LENGTH FOR LIB. FILES =1 P ST A2,RECLEN,A12 D P LDK A2,1 =20 ^ P ST A2,BLKSLE =20 t P* PCRF020 CM HEAD < P CALL GETVOL GET RIGHT VOLUME AND READ FREE BLOCK SECTOR P ADK A1,0 4 P ABL(Z)
0x0f3080…0f3214 (0, 308) Opaque[0x194]
0x0f3214…0f33a8 # DirEnt {nam=»BEA «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0968, f03=0x0000}
0x0f3214…0f33a8 IdxSect {
0x0f3214…0f33a8 f00 = 0x004b // 0xf3214 @0x0
0x0f3214…0f33a8 f01 = 0x000a // 0xf3216 @0x2
0x0f3214…0f33a8 gno = [ // 0xf3218 @0x4
0x0f3214…0f33a8 [0x00]: C0x004b.0x1.0
0x0f3214…0f33a8 [0x01]: C0x004b.0x2.0
0x0f3214…0f33a8 [0x02]: C0x004b.0x3.0
0x0f3214…0f33a8 [0x03]: C0x004c.0x0.0
0x0f3214…0f33a8 [0x04]: C0x004c.0x1.0
0x0f3214…0f33a8 ]
0x0f3214…0f33a8 }
0x0f33a8…0f353c Dummy {f00=0x004b, f01=0x0190, f02=» l #2B x , , * 0 1 1 0 1 1 2B 2B 2B @ @ < P
0x0f353c…0f36d0 Dummy {f00=0x004b, f01=0x0190, f02=» ( B R Q : B B ~ X ( 0
0x0f36d0…0f3864 Dummy {f00=0x004b, f01=0x0190, f02=» _4 ( H T @ A 8 B B T = C : < T _" 8 *X( 8 T$ < P <P B _R 8W R Rt Wp X$ , < P <P < 9 _H 8 R W: X , < P 'T
0x0f3864…0f39f8 Dummy {f00=0x004b, f01=0x0190, f02=» B :a;a : MW2 XW. CW* RW& EW" IW LW U A W FW SW OW P @ $ A * A @ P @ Q W$ @ A @ A @ P a @ a x @ vP 8 R ) A _ @ 0Q p I 0 ^ A 0W j I 6 ^ @ T W * I ^ a A @ P A @
0x0f39f8…0f3b8c Dummy {f00=0x004b, f01=0x0190, f02=» : : : Q ^ a A : A a ` : $:f:A $# Q $# P W WL $$ X $$ <A $# P _ ; $$ X, ; A 4 & X <a<A : : @ W 4 @
0x0f3b8c…0f3d20 Dummy {f00=0x004b, f01=0x0190, f02=» @ %W @ % : 4 &<E , P. * T P / T 0 W , W T , P" "$ T" 4 %T W @ R _v W W @ @ $<E % @ $$ Q ) A : A ^ W 09U ( 9 S = S 0 S _
0x0f3d20…0f3eb4 (0, 309) Dummy {f00=0x004b, f01=0x0190, f02=» A ++Q --U A 09Q ..Q EEQ> ''Q (& P 8 S S Q Q _< P _ ^N_ X< ++Q --U A 09]R (& @ 8 S S A 09Y ''Q _x A _ X @ :
0x0f3eb4…0f4048 Dummy {f00=0x004b, f01=0x0190, f02=» 4 ` A ''Q Y @ @ $# Q (Q, a v A v @ A )W $# X ( H + R_0 : W W W W 4 3 + f A ++Q --Q W W V **Q ''Qr //Q0 XXU ''Q.W BBU ''QbW| AZ
0x0f4048…0f41dc Dummy {f00=0x004b, f01=0x0190, f02=» @ W Z A XT @ h @ hT $# T @ 0 * A U A R $ P P A # P&# ;c ( Wf T( Q t WZ P T V& @ hP * A X A A A V 5 5W V + 3 PB P W6 @
0x0f41dc…0f4370 Dummy {f00=0x004b, f01=0x0190, f02=»SYMBOL TABLE0 UND.ENT.0 UND.LAB.0 ASS.ERR.1 $ ) $ 0P P $ ) _ : d L R L _ 0 ) ^ : 9 R : ) Y :P ff33 A A A @ T : d D L T
0x0f4370…0f4504 Dummy {f00=0x004b, f01=0x0190, f02=»8! S _6 <P 8 : P~ @ Pr @ P*R A A A W @ " @ S@ SB @ S@ SB @ S@ T W6 F < -Q [ : : @ : _F _F _F _F ~ " [ : W P < A A : P P
0x0f4504…0f4698 Dummy {f00=0x004b, f01=0x0190, f02=» 8! 8! _ 8 T Q V" 8 T . 8 P 8 4 @ @ P P0 $" P R ( $! 9# P _4 RT QP Q VF T< @ T @ @ A A
0x0f4698…0f482c Dummy {f00=0x004b, f01=0x0190, f02=» O @ !* P @ h * @ * * 4 @ h A , @ 4 LPT @ : TYT 6 @ R 1 A P @ 6 TYP DYP n nU n A B A @ T@ 4 z ^ T ^ j @ 0R ) ) A 0 A : 1 A @ 4 TYT J B
0x0f482c…0f49c0 Dummy {f00=0x004b, f01=0x0190, f02=» l ^ J l ^ : l ^ : ( : 1 PAGE DATE - - TIME H- M- S Z W W Pp a @ Q: @ hP4 P. B ` ' ?A A ^
0x0f49c0…0f4b54 (0, 310) Dummy {f00=0x004b, f01=0x0190, f02=» D 02-PASS ASSEMBLER - NAT LAB - VERSION 7.2 16/11/78 x 8P _ @
0x0f4b54…0f4ce8 Dummy {f00=0x004b, f01=0x0190, f02=» R A ) H A A X F 4 I b>! A Z>!P H A ` I d A )T @ 0P A $P @ vT 0 @ R W @ vT : @ tP f 4 A A _, A R Q @ U D @ A $ U A : @ Pf @ @ XT
0x0f4ce8…0f4e7c Dummy {f00=0x004b, f01=0x0190, f02=»! A 2( @ 6 nT @ 4 TYT LP A 4 < A : @ A A W @ d 9 ! A @ A ` A A A A A A . @ hP A A A A A @ A @ A A r I 0 ^ , A . x A v **Q~ $$
0x0f4e7c…0f5010 Dummy {f00=0x004b, f01=0x0190, f02=» R |W _ R ( A @ P % P @ $ I @ T~ nUt A nUb A nUT A @ PJ A @ R $ T& - $ - A H M @ > % nV @ @ Q @ P 2 X @ hQ B "( B ( @
0x0f5010…0f51a4 Dummy {f00=0x004b, f01=0x0190, f02=» A T @ P A _ + * /*W( + * 0 W + * / W , * 0 A A A @ @ T W @ T @ TL Uz f XP8 @ hT0 U $# Q $# Q L9a @ U A W A A * A W @ hX ,,YV R
0x0f51a4…0f5338 Dummy {f00=0x004b, f01=0x0190, f02=» R @ ) I ((R ))R0 U,> S( S$ ,,YX R a @ h @ A XT % a A : @ hQ :a @ U A _0 $ : W @ HT LP @ hTj @ @ h @ f 0 A a PR ,,Rr L $"
0x0f5338…0f54cc Dummy {f00=0x004b, f01=0x0190, f02=» P ;A_ ;a Y ==Q$ ::QZ P P Q TWH P T W4 W. Pz T W Tn @ W T ] ] P 9A Y T2 < = T$ P &T F T W R ,,Y W ,,Y @ 2 P R ^ ` " a Qx T
0x0f54cc…0f5660 Dummy {f00=0x004b, f01=0x0190, f02=» _ A A0 @ V @ T~ @ Tt P, @ [! T A ^ & ] b A Z @ X , _2 @ A A A A 0 @ A A A @ PLQ @ @ P8 $T % R _ X $ % ,,Y"
0x0f5660…0f57f4 (0, 311) Dummy {f00=0x004c, f01=0x0190, f02=» P @ P @ P @ R ) $ * % ] @ P @ A W @ Q R, @ W @ T ! A ,, ''Qd DDU ''U QN f Y 4 W. FFU ''Qn A Y 4 Y T @ T P
0x0f57f4…0f5988 Dummy {f00=0x004c, f01=0x0190, f02=» A 2 ~ R $% P ( R P $" : A 0 @ 0PN 8 I 4 ;a P _ ! ]" ]! T ]"0 2
0x0f5988…0f5b1c Dummy {f00=0x004c, f01=0x0190, f02=» @ P $| _> G 4 4 R t G T_ $ PX P %F $ @V "0P ,,Q R A W$ $ P $ <c! 9A $ $ $h_P ((RL 07Q 4 | R ( ))R W 4_ $ W **R " P 9A G 4 $h_ T| 4 @ @ PX
0x0f5b1c…0f5cb0 Dummy {f00=0x004c, f01=0x0190, f02=» : ! P P : : : 2' ?A 2&p ! ! : @ P @ P P P " P 9 ! G T 4 G 4 ! P $| : X Q : $" | R 4 A 0 ~ W @ UL ==R@ R4 P P A A
0x0f5cb0…0f5e44 Dummy {f00=0x004c, f01=0x0190, f02=» B E ^ IDENT H* ! P I Z " D T E ^ @ A ( A I ^ , A * A 0 A @ A @ A A A @ @ P R $ )_ ASM 7.2 A v 4 A R6 ,,Q
0x0f5e44…0f5fd8 Dummy {f00=0x004c, f01=0x0190, f02=» @ @ A ^ PT R $ $# P $ ] b T A A Z @ XT A ^ 0_Z ] b A Z @ P W P @ R % 6 d @ hQ @ ) ) @ hQ @ T ) )
0x0f5fd8…0f616c Dummy {f00=0x004c, f01=0x0190, f02=» @) P ) ) @)&W, P R $Y $# Y $# P: P $# P $# Q A W R W ** A $# Q W ( W X ( ( P D d P N d A B &
0x0f616c…0f6300 Dummy {f00=0x004c, f01=0x0190, f02=»T PASS0 I X A I M A Q D @ "1 I T A I D @ i DS A I U @ i US A I N @ i NS A I R @ i RS A I R @ i RS A i FI ~ A I 1 t @ I W j @ I C ` @ I C V A Q M A a ! I 2 A i 1S A q BI @
0x0f6300…0f6494 (0, 312) Dummy {f00=0x004c, f01=0x0190, f02=» @ i ST V A I L L @ I S B A i AD 8 @ ADS . A i SU " @ SUS A i MU @ MUS A i DV @ DVS A h XR h MR !h GR H h ER p h ER x i XK ! P F W P B _ p DR "1 p TR ! 1 h DR DRS !h UR URS !h NR
0x0f6494…0f6628 Dummy {f00=0x004c, f01=0x0190, f02=» ! 1RS !h TN p BR " H M 6 h NM . ` DK DKL 1 h DK DKL h UK UKL h NK NKL h RK ( RKL h RK 0 RKL I F ! i WK ~ i CK t P B q BL ` IO@ @ h NR H h TR
0x0f6628…0f67bc Dummy {f00=0x004c, f01=0x0190, f02=»LC 8 h RC 8 p LN8 h RN 8 h CR !p LR h SR !p UR a ! h VR h AR h SR ` LK a UK i VK b AK j SK ` LA8 h RA 8 h LL 8@h RL 8`h LC 8 h RC 8 p LN8 h RN 8 h MD ( h VF p h VB zx h
0x0f67bc…0f6950 Dummy {f00=0x004c, f01=0x0190, f02=»DVR DVRS ! VUS x VSU p h FL h FX ` ILH h CA H@h IM @ h MP @@h M2 @ DENT% NTRY XTRN 852 855 856 857 ATA ORG ORG IST P LIST T JECT Xx QU (x ES x ND' OMN x FF% x FT%~x IF% TAB ORM
0x0f6950…0f6ae4 Dummy {f00=0x004c, f01=0x0190, f02=»2 ZA3 ZA4 ZA5 ZA6 ZA7 ZA8 ZA9 zA10 zA11 zA12 zA13 zA14 zA15 h AR h SR ` LK a UK i VK b AK j SK ` LA8 h RA 8 h LL 8@h RL 8`h LC 8 h RC 8 p LN8 h RN 8 h MD ( h VF p h VB zx h
0x0f6ae4…0f6c78 Dummy {f00=0x004c, f01=0x0190, f02=» L @ L ` R r , ( T @ L @ P S , ( T @ @ L @ R S B `ESC S r * & P @ A S ADDSET S * & H @ A S * & H @ A @
0x0f6c78…0f6e0c Dummy {f00=0x004c, f01=0x0190, f02=» A @ A S z , ( @ c N ` @ T * & { V U @ V T H * & H @ T v , ( ` @ P P @ T * & H @ A @ A T , (
0x0f6e0c…0f6fa0 Dummy {f00=0x004c, f01=0x0190, f02=» A * T r , ( ( @ P Q U DODASH U B , ( ; $ @ A * @ A , @ U T * & S H A . @ A 0 @ A U , ( g 2 ( @ V U * & H $ @
0x0f6fa0…0f7134 (0, 313) Opaque[0x194]
0x0f7134…0f72c8 # DirEnt {nam=»CASCOP«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0990, f03=0x0000}
0x0f7134…0f72c8 IdxSect {
0x0f7134…0f72c8 f00 = 0x004c // 0xf7134 @0x0
0x0f7134…0f72c8 f01 = 0x0002 // 0xf7136 @0x2
0x0f7134…0f72c8 gno = [ // 0xf7138 @0x4
0x0f7134…0f72c8 [0x00]: C0x004c.0x2.0
0x0f7134…0f72c8 ]
0x0f7134…0f72c8 }
0x0f72c8…0f745c Dummy {f00=0x004c, 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
0x0f745c…0f75f0 Dummy {f00=0x004c, 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 (
0x0f75f0…0f7784 Dummy {f00=0x004c, f01=0x0000, f02=»
[…0x3…]
0x0f7c40…0f7dd4 (0, 314) Opaque[0x194]
0x0f7dd4…0f7f68 # DirEnt {nam=»ASS «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x1a18, f03=0x0000}
0x0f7dd4…0f7f68 IdxSect {
0x0f7dd4…0f7f68 f00 = 0x00d0 // 0xf7dd4 @0x0
0x0f7dd4…0f7f68 f01 = 0x0008 // 0xf7dd6 @0x2
0x0f7dd4…0f7f68 gno = [ // 0xf7dd8 @0x4
0x0f7dd4…0f7f68 [0x00]: C0x00d0.0x3.0
0x0f7dd4…0f7f68 [0x01]: C0x00d1.0x0.0
0x0f7dd4…0f7f68 [0x02]: C0x00d1.0x1.0
0x0f7dd4…0f7f68 [0x03]: C0x00d1.0x2.0
0x0f7dd4…0f7f68 ]
0x0f7dd4…0f7f68 }
0x0f7f68…0f80fc Dummy {f00=0x00d0, 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~
0x0f80fc…0f8290 Dummy {f00=0x00d0, 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
0x0f8290…0f8424 Dummy {f00=0x00d0, 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
0x0f8424…0f85b8 Dummy {f00=0x00d0, 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
0x0f85b8…0f874c Dummy {f00=0x00d0, 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
0x0f874c…0f88e0 Dummy {f00=0x00d0, 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"#
0x0f88e0…0f8a74 (0, 315) Dummy {f00=0x00d1, 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 : @
0x0f8a74…0f8c08 Dummy {f00=0x00d1, 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.
0x0f8c08…0f8d9c Dummy {f00=0x00d1, 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
0x0f8d9c…0f8f30 Dummy {f00=0x00d1, 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
0x0f8f30…0f90c4 Dummy {f00=0x00d1, 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
0x0f90c4…0f9258 Dummy {f00=0x00d1, 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 ,
0x0f9258…0f93ec Dummy {f00=0x00d1, 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 = ] ]
0x0f93ec…0f9580 Dummy {f00=0x00d1, 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
0x0f9580…0f9714 (0, 316) Dummy {f00=0x00d1, 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
0x0f9714…0f98a8 Dummy {f00=0x00d1, 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
0x0f98a8…0f9a3c Dummy {f00=0x00d1, 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
0x0f9a3c…0f9bd0 Dummy {f00=0x00d1, 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
0x0f9bd0…0f9d64 Dummy {f00=0x00d1, 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
0x0f9d64…0f9ef8 Dummy {f00=0x00d1, 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 @
0x0f9ef8…0fa08c Dummy {f00=0x00d1, 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
0x0fa08c…0fa220 Dummy {f00=0x00d1, 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
0x0fa220…0fa3b4 (0, 317) Dummy {f00=0x00d1, 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
0x0fa3b4…0fa548 Dummy {f00=0x00d1, 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
0x0fa548…0fa6dc Dummy {f00=0x00d1, 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
0x0fa6dc…0fa870 Dummy {f00=0x00d1, 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
0x0fa870…0faa04 Dummy {f00=0x00d1, f01=0x0190, f02=» LABEL = FIXS3 DATE = 790404 PACK NBR = 001 f 4: V - P Y _( Y M : ] =IR E
[…0x3…]
0x0faec0…0fbb60 (1, 0) DirGranule ((1, 0)) {
0x0faec0…0fbb60 DirEnt {nam=»PTMON «, typ=» «, f00=0x0000, f01=0x0000, f02=0x01c0, f03=0x0000}
0x0faec0…0fbb60 DirEnt {nam=»PTMON «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x01c8, f03=0x0000}
0x0faec0…0fbb60 DirEnt {nam=»DIALOG«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x09d0, f03=0x0000}
0x0faec0…0fbb60 DirEnt {nam=»TCLASS«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x09f0, f03=0x0000}
0x0faec0…0fbb60 DirEnt {nam=»/OBJCT«, typ=»OB«, f00=0x0000, f01=0x0000, f02=0x09f8, f03=0x0000}
0x0faec0…0fbb60 DirEnt {nam=»SCLASS«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0e20, f03=0x0000}
0x0faec0…0fbb60 DirEnt {nam=»MONTAB«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0b70, f03=0x0000}
0x0faec0…0fbb60 DirEnt {nam=»TDISP «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0b78, f03=0x0000}
0x0faec0…0fbb60 DirEnt {nam=»LRPINT«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0b98, f03=0x0000}
0x0faec0…0fbb60 DirEnt {nam=»TPROC «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0bc8, f03=0x0000}
0x0faec0…0fbb60 DirEnt {nam=»MSUBS «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0be0, f03=0x0000}
0x0faec0…0fbb60 DirEnt {nam=»TTMJOB«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0c18, f03=0x0000}
0x0faec0…0fbb60 DirEnt {nam=»TOSSIO«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0c28, f03=0x0000}
0x0faec0…0fbb60 DirEnt {nam=»LDTASK«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0cb8, f03=0x0000}
0x0faec0…0fbb60 DirEnt {nam=»ST8000«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0d00, f03=0x0000}
0x0faec0…0fbb60 DirEnt {nam=»DRND01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0d10, f03=0x0000}
0x0faec0…0fbb60 DirEnt {nam=»DCADDR«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0d88, f03=0x0000}
0x0faec0…0fbb60 DirEnt {nam=»TMOVE «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0db0, f03=0x0000}
0x0faec0…0fbb60 DirEnt {nam=»DCSTAT«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0de8, f03=0x0000}
0x0faec0…0fbb60 DirEnt {nam=»PFTAB «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x14d0, f03=0x0000}
0x0faec0…0fbb60 DirEnt {nam=»LKMAL «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0e28, f03=0x0000}
0x0faec0…0fbb60 DirEnt {nam=»SYSLOD«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0e38, f03=0x0000}
0x0faec0…0fbb60 DirEnt {nam=»SYSLDM«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0f98, f03=0x0000}
0x0faec0…0fbb60 DirEnt {nam=»SYSLCR«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1158, f03=0x0000}
0x0faec0…0fbb60 DirEnt {nam=»SYSINI«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1268, f03=0x0000}
0x0faec0…0fbb60 DirEnt {nam=»DSKSUB«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1308, f03=0x0000}
0x0faec0…0fbb60 DirEnt {nam=»DVTKB «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1330, f03=0x0000}
0x0faec0…0fbb60 DirEnt {nam=»DVTDI «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1338, f03=0x0000}
0x0faec0…0fbb60 DirEnt {nam=»DVTDY «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1340, f03=0x0000}
0x0faec0…0fbb60 DirEnt {nam=»DVTG1 «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1348, f03=0x0000}
0x0faec0…0fbb60 DirEnt {nam=»DWII01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1358, f03=0x0000}
0x0faec0…0fbb60 DirEnt {nam=»DWIO01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1360, f03=0x0000}
0x0faec0…0fbb60 DirEnt {nam=»DW1501«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1368, f03=0x0000}
0x0faec0…0fbb60 DirEnt {nam=»DRKB04«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1370, f03=0x0000}
0x0faec0…0fbb60 DirEnt {nam=»DRDI01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x13c8, f03=0x0000}
0x0faec0…0fbb60 DirEnt {nam=»DRDY02«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x13e8, f03=0x0000}
0x0faec0…0fbb60 DirEnt {nam=»DRGP02«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1b08, f03=0x0000}
0x0faec0…0fbb60 DirEnt {nam=»DRPL01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1470, f03=0x0000}
0x0faec0…0fbb60 DirEnt {nam=»DRIC01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1658, f03=0x0000}
0x0faec0…0fbb60 DirEnt {nam=»DRDC15«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1608, f03=0x0000}
0x0faec0…0fbb60 DirEnt {nam=»EBCDIC«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1778, f03=0x0000}
0x0faec0…0fbb60 DirEnt {nam=»TIMER «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1788, f03=0x0000}
0x0faec0…0fbb60 DirEnt {nam=»TMMLKM«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x17f8, f03=0x0000}
0x0faec0…0fbb60 DirEnt {nam=»TLDSEG«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1810, f03=0x0000}
0x0faec0…0fbb60 DirEnt {nam=»TABORT«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1830, f03=0x0000}
0x0faec0…0fbb60 DirEnt {nam=»MONTIM«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1840, f03=0x0000}
0x0faec0…0fbb60 DirEnt {nam=»CTAB01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1858, f03=0x0000}
0x0faec0…0fbb60 DirEnt {nam=»DVKB00«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1868, f03=0x0000}
0x0faec0…0fbb60 DirEnt {nam=»DVDI00«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1870, f03=0x0000}
0x0faec0…0fbb60 DirEnt {nam=»DVDY00«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1878, f03=0x0000}
0x0faec0…0fbb60 DirEnt {nam=»DVG100«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1880, f03=0x0000}
0x0faec0…0fbb60 DirEnt {nam=»DVKB01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1890, f03=0x0000}
0x0faec0…0fbb60 DirEnt {nam=»DVDI01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1898, f03=0x0000}
0x0faec0…0fbb60 DirEnt {nam=»SYSPRO«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x18a0, f03=0x0000}
0x0faec0…0fbb60 DirEnt {nam=»PROGEN«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x18b8, f03=0x0000}
0x0faec0…0fbb60 DirEnt {nam=»SYS2DC«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2420, f03=0x0000}
0x0faec0…0fbb60 DirEnt {nam=»S2CLAS«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x19d0, f03=0x0000}
0x0faec0…0fbb60 DirEnt {nam=»P2TAB «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x19d8, f03=0x0000}
0x0faec0…0fbb60 DirEnt {nam=»DW2501«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x19e0, f03=0x0000}
0x0faec0…0fbb60 DirEnt {nam=»FILLER«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x14f0, f03=0x0000}
0x0faec0…0fbb60 DirEnt {nam=»PTMON «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x1910, f03=0x0000}
0x0faec0…0fbb60 DirEnt {nam=»GNDC25«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x16e0, f03=0x0000}
0x0faec0…0fbb60 DirEnt {nam=»DRLP01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1630, f03=0x0000}
0x0faec0…0fbb60 DirEnt {nam=»DVDY01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1c38, f03=0x0000}
0x0faec0…0fbb60 DirEnt {nam=»DVG101«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1c40, f03=0x0000}
0x0faec0…0fbb60 DirEnt {nam=»BUGGEN«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1c50, f03=0x0000}
0x0faec0…0fbb60 DirEnt {nam=»BUGMON«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x2210, f03=0x0000}
0x0faec0…0fbb60 DirEnt {nam=»XCLASS«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x19c0, f03=0x0000}
0x0faec0…0fbb60 DirEnt {nam=»UPD «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x21d0, f03=0x0000}
0x0faec0…0fbb60 }
0x0fbb60…0fbcf4 (1, 1) Opaque[0x194]
0x0fbcf4…0fbe88 # DirEnt {nam=»PTMON «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x01c8, f03=0x0000}
0x0fbcf4…0fbe88 IdxSect {
0x0fbcf4…0fbe88 f00 = 0x000e // 0xfbcf4 @0x0
0x0fbcf4…0fbe88 f01 = 0x0010 // 0xfbcf6 @0x2
0x0fbcf4…0fbe88 gno = [ // 0xfbcf8 @0x4
0x0fbcf4…0fbe88 [0x00]: C0x000e.0x1.0
0x0fbcf4…0fbe88 [0x01]: C0x004c.0x3.0
0x0fbcf4…0fbe88 [0x02]: C0x004d.0x0.0
0x0fbcf4…0fbe88 [0x03]: C0x004d.0x1.0
0x0fbcf4…0fbe88 [0x04]: C0x004d.0x2.0
0x0fbcf4…0fbe88 [0x05]: C0x004d.0x3.0
0x0fbcf4…0fbe88 [0x06]: C0x004e.0x0.0
0x0fbcf4…0fbe88 [0x07]: C0x004e.0x1.0
0x0fbcf4…0fbe88 ]
0x0fbcf4…0fbe88 }
0x0fbe88…0fc01c Dummy {f00=0x000e, f01=0x0190, f02=» ASG /02,NO MOV TCLASS,/S,TOSSWORK KPF /S,TCLASS 4 SCR J INC TCLASS,TOSSWORK V KPF /O r MOV SCLASS,/S,TOSSWORK KPF /S,SCLASS SCR INC SCLASS,TOSSWORK KPF /O MOV MONTAB,/S,TOSSWORK
0x0fc01c…0fc1b0 Dummy {f00=0x000e, f01=0x0190, f02=»WORK ~ KPF /S,SYSTAB SCR " MOV TDISP,/S,TOSSWORK . KPF /S,TDISP L SCR ` MOV LRPINT,/S,TOSSWORK l KPF /S,LRPINT SCR MOV TPROC,/S,TOSSWORK KPF /S,TPROC SCR MOV MSUBS,/S,TOSSWORK
0x0fc1b0…0fc344 Dummy {f00=0x000e, f01=0x018e, f02=»SIO SCR MOV LDTASK,/S,TOSSWORK KPF /S,LDTASK 6 SCR L MOV ST8000,/S,TOSSWORK X KPF /S,ST8000 v SCR MOV DRND01,/S,TOSSWORK KPF /S,DRND01 SCR MOV DCADDR,/S,TOSSWORK KPF /S,DCADDR
0x0fc344…0fc4d8 Dummy {f00=0x000e, f01=0x018e, f02=» MOV PFTAB,/S,TOSSWORK KPF /S,PFTAB & SCR : MOV LKMAL,/S,TOSSWORK F KPF /S,LKMAL d SCR x MOV SYSLOD,/S,TOSSWORK KPF /S,SYSLOD SCR MOV SYSLDM,/S,TOSSWORK KPF /S,SYSLDM SCR MOV
0x0fc4d8…0fc66c Dummy {f00=0x000e, f01=0x0190, f02=» ( #!!CH $$CPU857 EQU 0$$CPU857 EQU 1$$ ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ 4 ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ ` !!EN ASM /S KPF /O KPF /S SCR LED SYSLDM ( #!!CH $$CPU857 EQU 0$$CPU857 EQU 1$$
0x0fc66c…0fc800 Dummy {f00=0x000e, f01=0x0190, f02=»/S SCR LED SYSLCR ( #!!CH $$CPU857 EQU 0$$CPU857 EQU 1$$ ( ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ T ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ !!EN ASM /S KPF /O KPF /S SCR LED SYSINI ( #!!CH $$C
0x0fc800…0fc994 (1, 2) Dummy {f00=0x004c, f01=0x0190, f02=»ASM /S KPF /O KPF /S SCR * MOV DSKSUB,/S,TOSSWORK 6 KPF /S,DSKSUB T SCR j LED DSKSUB v ( #!!CH $$CPU857 EQU 0$$CPU857 EQU 1$$ ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$
0x0fc994…0fcb28 Dummy {f00=0x004c, f01=0x0190, f02=» $$MMUPAG EQU 0$$MMUPAG EQU 1$$ ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ ( !!EN T ASM /S ` KPF /O n KPF /S | SCR LED TDISP ( #!!CH $$CPU857 EQU 0$$CPU857 EQU 1$$ ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ ( #!!CH $$C
0x0fcb28…0fccbc Dummy {f00=0x004c, f01=0x0190, f02=»U 0$$CPU857 EQU 1$$ ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ H !!EN t ASM /S KPF /O KPF /S SCR LED TPROC ( #!!CH $$CPU857 EQU 0$$CPU857 EQU 1$$ ( #!!CH $$MMUPAG EQU 0$
0x0fccbc…0fce50 Dummy {f00=0x004c, f01=0x0190, f02=»D MSUBS ( #!!CH $$CPU857 EQU 0$$CPU857 EQU 1$$ ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ < ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ h !!EN ASM /S KPF /O KPF /S SCR LED TTMJOB ( #!!CH $$CPU857 EQU 0$$CPU857 EQU
0x0fce50…0fcfe4 Dummy {f00=0x004c, f01=0x0190, f02=» KPF /S SCR LED TOSSIO ( #!!CH $$CPU857 EQU 0$$CPU857 EQU 1$$ 0 ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ !!EN ASM /S KPF /O KPF /S SCR LED LDTASK ( #
0x0fcfe4…0fd178 Dummy {f00=0x004c, f01=0x0190, f02=» ASM /S KPF /O KPF /S $ SCR 2 LED ST8000 > ( #!!CH $$CPU857 EQU 0$$CPU857 EQU 1$$ P ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ | ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ !!EN ASM /S KPF /O KPF /S
0x0fd178…0fd30c Dummy {f00=0x004c, f01=0x0190, f02=»U 1$$CPU852 EQU 0$$ !!EN ASM /S ( KPF /O 6 KPF /S D SCR R LED DCADDR ^ ( #!!CH $$CPU857 EQU 0$$CPU857 EQU 1$$ p ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ !!EN ASM /S
0x0fd30c…0fd4a0 Dummy {f00=0x004c, f01=0x0190, f02=»EQU 1$$ t ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ !!EN < ASM /S H KPF /O V KPF /S d SCR r LED DCSTAT ~ ( #!!CH $$CPU857 EQU 0$$CPU857 EQU 1$$ ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ ( #!!CH $$CPU852 EQU 1$$CPU852 EQU
0x0fd4a0…0fd634 (1, 3) Dummy {f00=0x004d, f01=0x018e, f02=» MOV DVTDI,/S,TOSSWORK KPF /S,DVTDI " SCR 6 MOV DVTDY,/S,TOSSWORK B KPF /S,DVTDY ` SCR t MOV DVTG1,/S,TOSSWORK KPF /S,DVTG1 SCR MOV DWII01,/S,TOSSWORK KPF /S,DWII01 SCR INC DWII01
0x0fd634…0fd7c8 Dummy {f00=0x004d, f01=0x0190, f02=» MOV DW1501,/S,TOSSWORK KPF /S,DW1501 " SCR 8 INC DW1501,TOSSWORK D KPF /O ` LED DWII01 n ( #!!CH $$CPU857 EQU 0$$CPU857 EQU 1$$ ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ !!EN
0x0fd7c8…0fd95c Dummy {f00=0x004d, f01=0x0190, f02=»G EQU 0$$MMUPAG EQU 1$$ ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ !!EN L ASM /S X KPF /O f KPF /S t SCR LED DW1501 ( #!!CH $$CPU857 EQU 0$$CPU857 EQU 1$$ ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ ( #!!CH $$CPU852 EQ
0x0fd95c…0fdaf0 Dummy {f00=0x004d, f01=0x018e, f02=»4 SCR MOV DRDI01,/S,TOSSWORK KPF /S,DRDI01 4 SCR J MOV DRDY02,/S,TOSSWORK V KPF /S,DRDY02 t SCR MOV DRGP02,/S,TOSSWORK KPF /S,DRGP02 SCR MOV DRPL01,/S,TOSSWORK KPF /S,DRPL01
0x0fdaf0…0fdc84 Dummy {f00=0x004d, f01=0x0190, f02=» LED DRKB04 !!CH $$ X:A$$ 0$$ !!CH $$ X:B$$ 0$$ 4 !!CH $$ X:C$$ 0$$ N !!CH $$ X:D$$ 020$$ h !!CH $$ X:E$$ 1$$ !!CH $$ X:F$$ 1$$ !!CH $$ X:G$$ 0$$ !!CH $$ X:H$$ 020$$ !!CH $$ X:I$$ 20$$
0x0fdc84…0fde18 Dummy {f00=0x004d, f01=0x0190, f02=»EQU 0$$MMUPAG EQU 1$$ ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ !!EN J ASM /S V KPF /O d KPF /S r SCR LED DRDI01 !!CH $$ X:A$$ 0$$ !!CH $$ X:B$$ 1$$ ( #!!CH $$CPU857 EQU 0$$CPU857 EQU 1$$ ( #!!CH $$MMU
0x0fde18…0fdfac Dummy {f00=0x004d, f01=0x018e, f02=» LED DRDY02 !!CH $$ X:A$$ 1$$ !!CH $$ X:B$$ 0$$ 4 !!CH $$ X:C$$ 1$$ N !!CH $$ X:D$$ 0$$ h !!CH $$ X:E$$ 1$$ !!CH $$ X:F$$ 1$$ !!CH $$ X:G$$ 6$$ !!CH $$ X:H$$ 162$$ !!CH $$ X:I$$ 0$$ ( #!!
0x0fdfac…0fe140 Dummy {f00=0x004d, f01=0x0190, f02=» ASM /S KPF /O KPF /S $ SCR 2 LED DRGP02 > !!CH $$ X:A$$ 07$$ P !!CH $$ X:B$$ 0$$ j !!CH $$ X:C$$ 48$$ !!CH $$ X:D$$ 48$$ !!CH $$ X:E$$ 134$$ ( #!!CH $$CPU857 EQU 0$$CPU857 EQU 1$$ ( #!!CH $$M
0x0fe140…0fe2d4 (1, 4) Dummy {f00=0x004d, f01=0x0190, f02=»R LED DRPL01 !!CH $$ X:A$$ 1$$ !!CH $$ X:B$$ 1$$ 6 ( #!!CH $$CPU857 EQU 0$$CPU857 EQU 1$$ P ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ | ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ !!EN ASM /S KPF /O KPF /S
0x0fe2d4…0fe468 Dummy {f00=0x004d, f01=0x018e, f02=»1$$ p ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ !!EN 8 ASM /S D KPF /O R KPF /S ` SCR n LED DRDC15 z !!CH $$ X:A$$ 115$$ !!CH $$ X:B$$ 0$$ !!CH $$ X:C$$ 600$$ !!CH $$ X:D$$ 1$$ !!CH $$ X:E$$ 1$
0x0fe468…0fe5fc Dummy {f00=0x004d, f01=0x018e, f02=» | !!CH $$ X:K$$ 3$$ !!CH $$ X:L$$ 00$$ " !!CH $$ X:M$$ 02$$ < !!CH $$ X:N$$ 0$$ V !!CH $$ X:O$$ 0$$ p !!CH $$ X:P$$ 1$$ !!CH $$ X:Q$$ 0$$ !!CH $$ X:R$$ 0$$ !!CH $$ X:S$$ 999$$ ( #!!CH $$CPU857 EQU 0$
0x0fe5fc…0fe790 Dummy {f00=0x004d, f01=0x0190, f02=» KPF /O KPF /S SCR MOV EBCDIC,/S,TOSSWORK , KPF /S,EBCDIC J SCR ` LED EBCDIC l !!EN ~ ASM /S KPF /O KPF /S SCR LED DVTKB !!DL 45 DATA 0,0,0,0,0,0,0,0 DATA 0,
0x0fe790…0fe924 Dummy {f00=0x004d, f01=0x0190, f02=» LED DRND01 !!CH $$ X:A$$ 00$$ !!CH $$ X:B$$ 00$$ 0 !!CH $$ X:C$$ 00$$ J !!CH $$ X:D$$ 00$$ d !!CH $$ X:E$$ 00$$ ~ !!CH $$ X:F$$ 01$$ !!CH $$ X:G$$ 01$$ !!CH $$ X:H$$ 00$$ !!CH $$ X:I$$ 00$$ !!EN
0x0fe924…0feab8 Dummy {f00=0x004d, f01=0x0190, f02=»X:C$$ 1$$ !!CH $$ X:D$$ 0$$ !!CH $$ X:E$$ 0$$ , !!CH $$ X:F$$ 0$$ F !!CH $$ X:G$$ 1$$ ` ( #!!CH $$CPU857 EQU 0$$CPU857 EQU 1$$ z ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ !!EN
0x0feab8…0fec4c Dummy {f00=0x004d, f01=0x018e, f02=»WORK ~ KPF /S,TPROC SCR MOV TMMLKM,/S,TOSSWORK , KPF /S,TMMLKM J SCR ` MOV TLDSEG,/S,TOSSWORK l KPF /S,TLDSEG SCR MOV TABORT,/S,TOSSWORK KPF /S,TABORT SCR MOV MONTIM,/S,TOSSWORK
0x0fec4c…0fede0 Dummy {f00=0x004d, f01=0x0190, f02=» j ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ !!EN 4 ASM /S @ KPF /O N KPF /S SCR j LED TPROC v ( #!!CH $$CPU857 EQU 0$$CPU857 EQU 1$$ ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$
0x0fede0…0fef74 (1, 5) Dummy {f00=0x004d, f01=0x0190, f02=» $$MMUPAG EQU 0$$MMUPAG EQU 1$$ ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ ( !!EN T ASM /S ` KPF /O n KPF /S | SCR LED TLDSEG ( #!!CH $$CPU857 EQU 0$$CPU857 EQU 1$$ ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ ( #!!CH $$C
0x0fef74…0ff108 Dummy {f00=0x004d, f01=0x0190, f02=»U 0$$CPU857 EQU 1$$ ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ H !!EN t ASM /S KPF /O KPF /S SCR LED MONTIM ( #!!CH $$CPU857 EQU 0$$CPU857 EQU 1$$ ( #!!CH $$MMUPAG EQU 0$
0x0ff108…0ff29c Dummy {f00=0x004d, f01=0x0190, f02=»D LKMAL !!DL 062 DATA 00 !!DL 065 < DATA 00 L !!DL 066 h DATA 00 x !!DL 067 DATA 00 !!DL 070 !!DL 071 !!DL 072 !!DL 073 !!DL 074
0x0ff29c…0ff430 Dummy {f00=0x004d, f01=0x0190, f02=» !!CH $$ X:A$$ 1$$ ! !!CH $$ X:B$$ 0$$ ! !!EN ! 8 ASM /S ! D KPF /O ! R KPF /S ! ` SCR ! n LED TMOVE ! z !!EN ! ASM /S ! KPF /O ! KPF /S ! SCR ! LED SYSTAB ! !!CH $$IHINPT$$TRAP$$ ! !!CH $$ X:
0x0ff430…0ff5c4 Dummy {f00=0x004d, f01=0x0190, f02=» !!CH $$ X:G$$ 00001$$ " !!IL 55 " " EXTRN IH1501 " 2 EXTRN IH1502 " R !!DL 85 " r !!DL 115,177 " DATA IHPFAR " DATA IHLKM " DATA IHRTC " DATA ILLINT " DATA ILLINT " DATA ILLINT "
0x0ff5c4…0ff758 Dummy {f00=0x004d, f01=0x0190, f02=»01 " DATA IH1502 # DATA ILLINT # DATA ILLINT # 2 DATA ILLINT # F DATA ILLINT # Z DATA IHPR01 # n DATA ILLINT # DATA ILLINT # DATA ILLINT # DATA ILLINT # DATA ILLINT # DATA ILLINT # DATA ILLINT #
0x0ff758…0ff8ec Dummy {f00=0x004d, f01=0x0190, f02=»NT # DATA ILLINT $ DATA ILLINT $ DATA ILLINT $ 2 DATA ILLINT $ F DATA ILLINT $ Z DATA ILLINT $ n DATA ILLINT $ DATA ILLINT $ DATA ILLINT $ DATA ILLINT $ DATA ILLINT $ DATA ILLINT $ DATA ILLINT $
0x0ff8ec…0ffa80 Dummy {f00=0x004d, f01=0x018e, f02=»NT $ DATA ILLINT % DATA ILLINT % DATA ILLINT % 2 DATA ILLINT % F DATA ILLINT % Z DATA ILLINT % n DATA ILLINT % DATA ILLINT % DATA ILLINT % DATA ILLINT % !!EN % ASM /S % KPF /O % KPF /S %
0x0ffa80…0ffc14 (1, 6) Dummy {f00=0x004d, f01=0x0190, f02=» % !!DL 043 & !!DL 044 & !!DL 045 & ( !!DL 046 & 8 !!DL 047 & H !!DL 048 & X !!DL 049 & h !!DL 050 & x !!DL 051 & !!DL 052 & !!DL 053 & !!DL 054 & !!DL 055 & !!DL 056 & !!DL 057 & !!DL 058 &
0x0ffc14…0ffda8 Dummy {f00=0x004d, f01=0x0190, f02=» KPF /O ' KPF /S ' SCR ' LED DVTKB ' , ( #!!CH $$CPU857 EQU 0$$CPU857 EQU 1$$ ' > ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ ' j ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ ' !!CH $$DVTKB$$DVKB00$$ ' !!CH $$/2222$$/0001$$ ' !!CH $$/33
0x0ffda8…0fff3c Dummy {f00=0x004d, f01=0x0190, f02=»F /O ' KPF /S ( SCR ( LED DVTDI ( & ( #!!CH $$CPU857 EQU 0$$CPU857 EQU 1$$ ( 8 ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ ( d ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ ( !!CH $$DVTDI$$DVDI00$$ ( !!CH $$2010$$0000$$ ( !!CH $$/2222$$/000
0x0fff3c…1000d0 Dummy {f00=0x004d, f01=0x0190, f02=»857 EQU 0$$CPU857 EQU 1$$ ( ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ ) " ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ ) N !!CH $$DVTDY$$DVDY00$$ ) z !!CH $$/ABC$$/1850$$ ) !!CH $$/2222$$/0004$$ ) !!CH $$/3333$$/0000$$ ) !!EN ) ASM /S )
0x1000d0…100264 Dummy {f00=0x004d, f01=0x0190, f02=»1$$ ) p ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ * !!CH $$DVTG1$$DVG100$$ * 8 !!CH $$/2222$$/0003$$ * V !!CH $$/3333$$/0000$$ * t !!EN * ASM /S * KPF /O * KPF /S * SCR * LED DVTG1 * ( #!!CH $$CPU857 EQU 0$$CPU857 EQU 1$
0x100264…1003f8 Dummy {f00=0x004d, f01=0x018e, f02=»2222$$/0003$$ * !!CH $$/3333$$/0000$$ + !!EN + 4 ASM /S + @ KPF /O + N KPF /S + SCR + j LED DVTKB + v ( #!!CH $$CPU857 EQU 0$$CPU857 EQU 1$$ + ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ + ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ +
0x1003f8…10058c Dummy {f00=0x004d, f01=0x0190, f02=» !!DL 37 , DATA 00 , !!EN , 0 ASM /S , < KPF /O , J KPF /S , X SCR , f LED DVTDI , r ( #!!CH $$CPU857 EQU 0$$CPU857 EQU 1$$ , ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ , ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ ,
0x10058c…100720 Dummy {f00=0x004d, f01=0x0190, f02=» , KPF /O - KPF /S - SCR - $ LED TCLASS - 0 !!IL 6 - B EXTRN DVKB00 - P EXTRN DVDI00 - p EXTRN DVDY00 - EXTRN DVG100 - EXTRN DVKB01 - EXTRN DVDI01
0x100720…1008b4 (1, 7) Dummy {f00=0x004e, f01=0x0190, f02=» DATA /0020 - DATA DVKB00 . DATA /00400 . > DATA DVDI00 . ^ DATA /00420 . ~ DATA DVDY00 . DATA /00300 . DATA DVG100 . D
0x1008b4…100a48 Dummy {f00=0x004e, f01=0x018e, f02=»0210 . | DATA DVKB01 / DATA /00411 / , DATA DVDI01 / L TC01E EQU * / l !!EN / ASM /S / KPF /O / KPF /S / SCR / LED SCLASS / !!IL 6 / EXTRN DWII01 /
0x100a48…100bdc Dummy {f00=0x004e, f01=0x018e, f02=» / x !!IL 12 0 TC00 DATA TC00E-* 0 DATA /00501 0 : DATA DWII01 0 Z DATA /00511 0 z DATA DWIO01 0 DATA /00611 0 DATA DW1501 0 TC00E EQU
0x100bdc…100d70 Dummy {f00=0x004e, f01=0x018e, f02=» 0 LED MONTAB 1 !!IL 25 1 **** 1 * EXTRN CTAB01 1 6 EXTRN CTAB02 1 L EXTRN ITAD 1 b !!IL 50 1 v **** 1 DATA CTAB01 1 DATA CTAB02 1 DATA ITAD 1 !!DL 082 1 !!DL 083 1 !!DL 084 1 !!DL 0
0x100d70…100f04 Dummy {f00=0x004e, f01=0x018e, f02=» !!DL 098 2 !!DL 099 2 !!DL 100 2 $ !!DL 101 2 4 !!DL 102 2 D !!EN 2 T ASM /S 2 ` KPF /O 2 n KPF /S 2 | SCR 2 LED SYSLDM 2 !!CH $$ X:A$$ 00$$ 2 !!CH $$ X:B$$ 00$$ 2 !!CH $$ X:C$$ 00$$ 2 !!CH $$ X:D$$ 00$$
0x100f04…101098 Dummy {f00=0x004e, f01=0x0190, f02=» !!CH $$ X:J$$ 01$$ 3 !!CH $$ X:R$$ 000$$ 3 !!CH $$ X:L$$ 00$$ 3 : !!CH $$ X:M$$ 01$$ 3 T ( #!!CH $$CPU857 EQU 0$$CPU857 EQU 1$$ 3 n ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ 3 ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ 3 !!EN 3 ASM /S 3
0x101098…10122c Dummy {f00=0x004e, f01=0x005e, f02=» 3 INC SYSLCR 4 INC SYSINI 4 LKE M 4 , KPF /L,PTMON 4 : ASG /E0,TY10 4 NM$$ 01$$ 3 T ( #!!CH $$CPU857 EQU 0$$CPU857 EQU 1$$ 3 n ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ 3 ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ 3 !!EN 3 ASM /S 3
0x10122c…1013c0 Dummy {f00=0x004e, f01=0x2008, f02=» 5 INC SYSLCR 4 INC SYSINI 4 LKE M 4 , KPF /L,PTMON 4 : ASG /E0,TY10 4 NM$$ 01$$ 3 T ( #!!CH $$CPU857 EQU 0$$CPU857 EQU 1$$ 3 n ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ 3 ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ 3 !!EN 3 ASM /S 3
0x1013c0…101554 (1, 8) Dummy {f00=0x004e, f01=0x0190, f02=»ST,A6 DWT STATUS u 0 P ANK A1,DWFSAC ALWAYS WAIT FOR LEVEL 3 ACK? v 2 P RF(NZ) SBERR YES, NO FRAMES MAY BE OUT. ERROR v L P SUK A2,WINDOW WINDOW FULL? v P RF(N) SB090 NO, CONTINUE v 0 P* DWT WILL HAVE TO WAIT UNTIL WINDOW IS OPEN v 2 P ST A3,DWTLD
0x101554…1016e8 Dummy {f00=0x004e, f01=0x0190, f02=» v h " P IFF UTTEST=0 QUEUE STATISTICS w P LD A1,CWTPNR,A5 PLC NUMBER w . P SLA A1,1 MAKE INDEX w R 4 P IM WIQSTA,A1 INCREMENT QUEUE STATISTICS COUNTER w n P XIF w P ABL PLDSP2 LOCAL DISPATCHER w P* w P* w 6 P* ENTRY IS MADE HERE WHEN W
0x1016e8…10187c Dummy {f00=0x004e, f01=0x0190, f02=»A5 = CWT ADDRESS w P* A6 = DWT ADDRESS x P* x 6 PWINRST EQU * x @ 4 P LD A3,DWTLD1,A6 RESTORE REQUESTED BUFFER LENGTH x T P CM DWTLD1,A6 x P LDR A1,A1 RETURN CODE x 2 P RF(NZ) SBERR2 ERROR, RETURN TO DEVICE DRIVER x P* x P* x
0x10187c…101a10 Dummy {f00=0x004e, f01=0x018e, f02=»* ALLOCATE SHORT OUTPUT BUFFER x . P ADK A7,CWTPBS POOLBLOCK FOR SHORT BUFFERS y * " P CF A15,PLGTBU ALLOCATE BUFFER y , P RF(NZ) SB120 COMMON PART FOR SHORT/LONG y 2 P LDK A7,CWTSBQ NO BUFFER LEFT. SET QUEUE HEAD y " P IFF UTTEST=0 QUEUE STATISTICS y
0x101a10…101ba4 Dummy {f00=0x004e, f01=0x0190, f02=» ( P RF SB110 COMMON PART FOR NO BUFFER z P* z 0 PSB100 EQU * z : & P CWK A3,LOBUFL LONG BUFFER ENOUGH? z N P RF(G) SBERR NO, ERROR z x $ P* ALLOCATE LONG OUTPUT BUFFER z . P ADK A7,CWTPBL POOLBLOCK FOR LONG BUFFERS z " P CF A15,PLGTBU ALLOCATE
0x101ba4…101d38 Dummy {f00=0x004e, f01=0x0190, f02=»STATISTICS z | P LD A1,CWTPNR,A5 PLC NUMBER { P SLA A1,1 MAKE INDEX { 6 4 P IM LBQSTA,A1 INCREMENT QUEUE STATISTICS COUNTER { R P XIF { P* { PSB110 EQU * { 8 P* NO BUFFER WAS AVAILABLE. PUT REQUEST IN QUEUE. { ( P ADR A7,A5 A7 := QUEUE H
0x101d38…101ecc Dummy {f00=0x004e, f01=0x0190, f02=» PLDSP2 LOCAL DISPATCHER { P* | P* | * 2 P* ENTRY IS MADE HERE WHEN A BUFFER IS FREE | 4 P* REGISTERS ON ENTRY: | j P* A1 = RETURN CODE | $ P* A4 = BUFFER ADDRESS (IF A1=0) | P* A5 = CWT ADDRESS | P* A6 = DWT ADDRESS | P*
0x101ecc…102060 Dummy {f00=0x004e, f01=0x018e, f02=»H OF X25 HEADER | | 0 P ST A2,BUFBIX,A4 BYTE INDEX := START OF DATA } 0 P ST A4,DWTLD1,A6 SAVE BUFFER ADDRESS IN DWT } L P* } ( P ABL NDREPO RETURN TO DEVICE DRIVER } P* RETURN CODE := OK } P* } P* } PSBERR EQU * } ( P LDK A1,PLSE
0x102060…1021f4 (1, 9) Opaque[0x194]
0x1021f4…102388 # DirEnt {nam=»DIALOG«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x09d0, f03=0x0000}
0x1021f4…102388 IdxSect {
0x1021f4…102388 f00 = 0x004e // 0x1021f4 @0x0
0x1021f4…102388 f01 = 0x0008 // 0x1021f6 @0x2
0x1021f4…102388 gno = [ // 0x1021f8 @0x4
0x1021f4…102388 [0x00]: C0x004e.0x2.0
0x1021f4…102388 [0x01]: C0x004e.0x3.0
0x1021f4…102388 [0x02]: C0x004f.0x0.0
0x1021f4…102388 [0x03]: C0x004f.0x1.0
0x1021f4…102388 ]
0x1021f4…102388 }
0x102388…10251c Dummy {f00=0x004e, f01=0x0190, f02=» 6 2SYSGEN REL 11.1 81.07.27 12 NC = 8701 365 401110 R f bS Y S G E N SYSTEM GENERATION PROGRAM PTS RELEASE #11.1 SUPPORTING TOSS RELEASE #11.0 f ******************** ********************
0x10251c…1026b0 Dummy {f00=0x004e, f01=0x0190, f02=»13 MEMORY MANAGEMENT UNIT : Y8 6 @ DISK PAGING : J N8 ` j $ SWAPPABLE WORK BLOCK HANDLING : t N8 DEBUGGER : Y8 B >PROGRAM LANGUAGE (AS=ASSEMBLER,BA=BASIC,CO=COBOL,C
0x1026b0…102844 Dummy {f00=0x004e, f01=0x0190, f02=» ******************** DEVICE ABBREVIATIONS * ******************** H d n DEVICE LIST (Y/N) : x NR DEFINE DEVICES : KB,DY,DI,G1,II,IO,PL,D2
0x102844…1029d8 Dummy {f00=0x004e, f01=0x0190, f02=»** ~ DRKB04 : " * 4 KEYBOARD TIMEOUT : > NB X b ECHO FUNCTION : l NB . *COMPLETION OF READ REQUEST AT POWER ON : NB CIRCULAR INPUT BUFFER SIZE : 20
0x1029d8…102b6c Dummy {f00=0x004e, f01=0x0190, f02=»OCK ON : x N2 MMU BUFFER SIZE (BYTES) : $ 20 F P MMU KEY TABLE SIZE : Z 20 v KB 6236/71/72 IN SYSTEM : Y0 ( &OTHER THAN KB 6236/71/72 IN SYSTEM : N0
0x102b6c…102d00 Dummy {f00=0x004e, f01=0x0190, f02=» FLASH FUNCTION : Y0 & 0 ******************** : DRDY02 V : d n v 8 4FAST OUTPUT USED FOR CONSECUTIVE EQUAL CHARACTERS : Y0 4 2OTHER DISPLAYS THAN 6344/46/47/85/86 IN SYSTEM
0x102d00…102e94 (1, 10) Dummy {f00=0x004e, f01=0x0190, f02=»ON OF TRAILING BLANKS : Y0 * 2 .CURSOR STEADY ON 6386/6385 (ELSE TWINKLING) : 4 Y0 j t COUNTRY CODE ON 6385 (0-9) : ~ 60 MMU BUFFER SIZE (BYTES) : 162D DY 6385/86 IN SYSTEM :
0x102e94…103028 Dummy {f00=0x004e, f01=0x0190, f02=»RIATION (1-15) : z 76 " " FRONT FEED DEVICE IN PRINTER : , N7 R PAGELENGTH : f 48 z DOCUMENT LENGTH : 48 MMU BUFFER SIZE : 134D ******************
0x103028…1031bc Dummy {f00=0x004e, f01=0x0190, f02=»TE CHANNEL UNITS : 13 $ . ******************** 8 DRIC01 T : b l t ~ MMU BUFFER SIZE (WORDS) : 1150 MMU BUFFER SIZE (WORDS) : 9990 ******
0x1031bc…103350 Dummy {f00=0x004e, f01=0x0190, f02=»T LOGGING : N1 POLL TIMEOUT VALUE : ( 6000 D P STATUS AND RVI HANDLING : Z Y0 | READ COMMAND HANDLING : Y0 TRANSMIT BLOCK LENGTH : 2540 EBCDIC CODE (
0x103350…1034e4 Dummy {f00=0x004e, f01=0x0190, f02=» SIEMENS MSV1 PROCEDURE : N5 $ . NUMBER OF RECEIVE BUFFERS : 8 35 f PHYSICAL LINE NUMBER : p 15 IBM CHARACTER HANDLING : N5 MESSAGE PASSING : N5 IBM-
0x1034e4…103678 Dummy {f00=0x004e, f01=0x0190, f02=»MMU BUFFER SIZE (WORDS) : 1150 " . MMU BUFFER SIZE (WORDS) : 8 9990 Z f p z ******************** SYSLOD ADAPTION ******************** ************
0x103678…10380c Dummy {f00=0x004e, f01=0x0190, f02=»C : N2 LOADING FROM FLEXIBLE DISC : Y2 D N LOADING FROM MINIFIX DISC : X N2 | " LOADING FROM 80 MB CDC DISC : N2 " LOADING FROM 16 MB CDC DISC : N2 CONF
0x10380c…1039a0 Dummy {f00=0x004e, f01=0x0190, f02=»S t ******************** & 0 DELAY/DELAY AND ACTIVATION : : Y2 ^ h ABORT FUNCTION : r Y2 GET/SET DATE : N2 GET/SET TIME : N2 ATTACH/DETACH :
0x1039a0…103b34 (1, 11) Dummy {f00=0x004f, f01=0x0190, f02=» $ DEFINE TERMINAL DEVICE CLASSES ******************** , H R ******************** T01 : x Y2 ********* KB : Y2 FILE CODE : 20 DEVICE A
0x103b34…103cc8 Dummy {f00=0x004f, f01=0x0190, f02=»******* DI : Y2 ( 2 FILE CODE : < 40 P Z DEVICE ADDRESS : d 10 | PTS NUMBER : 6272 ********* D : Y2 FILE CODE :
0x103cc8…103e5c Dummy {f00=0x004f, f01=0x018e, f02=»24 NUMBER OF CHARACTERS/LINE : 80 8 B ********* L G1 : ^ Y0 l v FILE CODE JOURNAL : 30 DEVICE ADRESS : 30 FILE CODE DOCUMENT : 31
0x103e5c…103ff0 Dummy {f00=0x004f, f01=0x018e, f02=» FILE CODE : 21 " DEVICE ADDRESS : , 51 D N PTS NUMBER : X 6271 l x CODE CONVERSION : Y2 ********* DI : Y2 FILE CODE :
0x103ff0…104184 Dummy {f00=0x004f, f01=0x0190, f02=» N2 ********* G1 : . N2 < F ******************** P T03 : l N2 z ******************** " DEFINE SPECIAL DEVICE-CLASSES ********************
0x104184…104318 Dummy {f00=0x004f, f01=0x0190, f02=» FILE CODE : 50 ( ********* 2 IO : D Y0 R f FILE CODE : p 51 ********* D2 : Y1 FILE CODE : 61 **********
0x104318…1044ac Dummy {f00=0x004f, f01=0x00e0, f02=»A MONITOR MODULES : Y1 & * 0 CTAB01,UPDATEI : P * Z d l v SYSGEN ENDED : 61 **********
0x1044ac…104640 Dummy {f00=0x004f, f01=0x2008, f02=» R MODULES : Y1 & * 0 CTAB01,UPDATEI : P * Z d l v SYSGEN ENDED : 61 **********
0x104640…1047d4 (1, 12) Dummy {f00=0x004f, f01=0x0190, f02=» } P EJECT ~ P* ~ @ P************************************************************ ~ P* ~ d P* ROUTINE NAME: ~ n P* PLCHRO ~ P* ~ P* FUNCTION: ~ : P* THIS ROUTINE WRITES ONE CHARACTER TO OUTPUT BUFFER. ~ P* ~ P* CALL: ~
0x1047d4…104968 Dummy {f00=0x004f, f01=0x0190, f02=» ~ x P* A6 = DWT ADDRESS P* $ P* OUTPUT: . P* AT RETURN TO DEVICE DRIVER @ P* A1 = RETURN CODE d P* 0 IF OK P* NOT 0 IF ERROR 0 P* A2 = DEVICE STATUS (IF RELEVANT, IE A1=0) P* CR = CONTENTS OF A1 P* INTERR.
0x104968…104afc Dummy {f00=0x004f, f01=0x0190, f02=» P ENB P* P EJECT P* , P STR A4,A15 PUSH A4 6 $ P LD A4,DWTLD1,A6 BUFFER ADDRESS R $ P RF(Z) COERR2 ERROR IF NO BUFFER z * P CF A15,PLPUCH PUT CHARACTER IN BUFFER P LDR A1,A1 CHECK RETURN CODE ( P RF(NZ) COERR1 ERROR
0x104afc…104c90 Dummy {f00=0x004f, f01=0x018e, f02=»ING. P ENB P ADK A5,4 ADJUST STACK . P LDR A2,A1 DEVICE STATUS & RET CODE := OK 6 $ P ABR* A5 RETURN TO DEVICE DRIVER h P* P* PCOERR1 EQU * " P CF A15,PLRLBU RELEASE BUFFER $ P CM DWTLD1,A6 INDICATE NO BUFFER PCO
0x104c90…104e24 Dummy {f00=0x004f, f01=0x018e, f02=» P EJECT P* @ P************************************************************ P* d P* ROUTINE NAME: n P* PLENBL P* P* FUNCTION: 0 P* THIS ROUTINE DEFINES END OF OUTPUT BLOCK. . P* IT SENDS THE BLOCK TO PLC AND
0x104e24…104fb8 Dummy {f00=0x004f, f01=0x0190, f02=» P* A6 = DWT ADDRESS P* P* OUTPUT: * P* AT RETURN TO DEVICE DRIVER < P* A1 = RETURN CODE ` P* 0 IF OK | P* NOT 0 IF ERROR 0 P* A2 = DEVICE STATUS (IF RELEVANT, IE A1=0) P* CR = CONTENTS OF A1 P* INTERR. ENAB
0x104fb8…10514c Dummy {f00=0x004f, f01=0x0190, f02=» P ENB , P CF A15,NDSAV8 SAVE A3-A5, A7-A8 IN DWT $ P CF A15,GETCWT A5 := CWT ADDRESS @ P* h P EJECT r P* , P LDK A1,PLSERR SET RET CODE JUST IN CASE $ P LD A2,DWTLD1,A6 BUFFER ADDRESS , P ABL(Z) NDREP ERROR IF NO BUFFER. RETU
0x10514c…1052e0 Dummy {f00=0x004f, f01=0x0190, f02=»A3,DWTOTQ QUEUE POINTER P CF A15,PLCCCS RESERVE CCA . P CM DWTOTQ,A6 RESET QUEUE ELEMENT POINTER B P LDR A1,A1 RETURN CODE t " P RF(NZ) EBERR1 RETURN IF ERROR P* 0 P* WRITE PARAMETERS IN CCA AND X25 HEADER P ENB $ P LD A4
0x1052e0…105474 (1, 13) Opaque[0x194]
0x105474…105608 # DirEnt {nam=»TCLASS«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x09f0, f03=0x0000}
0x105474…105608 IdxSect {
0x105474…105608 f00 = 0x004f // 0x105474 @0x0
0x105474…105608 f01 = 0x0002 // 0x105476 @0x2
0x105474…105608 gno = [ // 0x105478 @0x4
0x105474…105608 [0x00]: C0x004f.0x2.0
0x105474…105608 ]
0x105474…105608 }
0x105608…10579c Dummy {f00=0x004f, f01=0x018e, f02=» 2 P IDENT TCLASS REL 11.0 81-01-26 870105041100 P : P* B P* L P ENTRY TCLASS V P* l P* v P EXTRN DVKB00 P EXTRN DVDI00 P EXTRN DVDY00 P EXTRN DVG100 P
0x10579c…105930 Dummy {f00=0x004f, f01=0x0190, f02=» PTCLASS DATA TCLASE-* P DATA TC00 $ P DATA TC01 B P DATA TC02 ` P DATA TC03 t PTCLASE EQU * PTC00 DATA TC00E-* P DATA /0020 P DATA DVKB00 P D
0x105930…105ac4 Dummy {f00=0x004f, f01=0x0190, f02=»/0030 ~ P DATA DVG100 P DATA /0131 . P DATA DVG100 N PTC00E EQU * n PTC01 DATA TC01E-* P DATA /0021 P DATA DVKB01 P DATA /0041
0x105ac4…105c58 Dummy {f00=0x004f, f01=0x411e, f02=» DATA DVKB00 P DATA /0040 P DATA DVDI00 : P DATA /0042 Z P DATA DVDY01 z PTC02E EQU * PTC03 DATA TC03E-* P DATA /0021 P DATA DVKB01 PTC03E EQU *
0x105c58…105dec Dummy {f00=0x004f, f01=0x2008, f02=» NT TCLASS * * $ * . ENTRY TCLASS 8 * N * X * b * l * v * * TCLASS DATALTCLASE-* TCLASE EQU * END @ 1 INTLT2 INTRT1
0x105dec…105f80 Dummy {f00=0x004f, f01=0x2008, f02=» C3; C4; C9; ( C5; 4 4A; @ LC=001Q; J 01; Z SDC=S01; f T; v 01; TID=L8; TCL=P2; LEV=60; 01; TDC=T01; 01; SDC=S01; 00; D;
0x105f80…106114 (1, 14) Opaque[0x194]
0x106114…1062a8 # DirEnt {nam=»/OBJCT«, typ=»OB«, f00=0x0000, f01=0x0000, f02=0x09f8, f03=0x0000}
0x106114…1062a8 IdxSect {
0x106114…1062a8 f00 = 0x004f // 0x106114 @0x0
0x106114…1062a8 f01 = 0x007a // 0x106116 @0x2
0x106114…1062a8 gno = [ // 0x106118 @0x4
0x106114…1062a8 [0x00]: C0x004f.0x3.0
0x106114…1062a8 [0x01]: C0x0050.0x0.0
0x106114…1062a8 [0x02]: C0x0050.0x1.0
0x106114…1062a8 [0x03]: C0x0050.0x2.0
0x106114…1062a8 [0x04]: C0x0050.0x3.0
0x106114…1062a8 [0x05]: C0x0051.0x0.0
0x106114…1062a8 [0x06]: C0x0051.0x1.0
0x106114…1062a8 [0x07]: C0x0051.0x2.0
0x106114…1062a8 [0x08]: C0x0051.0x3.0
0x106114…1062a8 [0x09]: C0x0052.0x0.0
0x106114…1062a8 [0x0a]: C0x0052.0x1.0
0x106114…1062a8 [0x0b]: C0x0052.0x2.0
0x106114…1062a8 [0x0c]: C0x0052.0x3.0
0x106114…1062a8 [0x0d]: C0x0053.0x0.0
0x106114…1062a8 [0x0e]: C0x0053.0x1.0
0x106114…1062a8 [0x0f]: C0x0053.0x2.0
0x106114…1062a8 [0x10]: C0x0053.0x3.0
0x106114…1062a8 [0x11]: C0x0054.0x0.0
0x106114…1062a8 [0x12]: C0x0054.0x1.0
0x106114…1062a8 [0x13]: C0x0054.0x2.0
0x106114…1062a8 [0x14]: C0x0054.0x3.0
0x106114…1062a8 [0x15]: C0x0055.0x0.0
0x106114…1062a8 [0x16]: C0x0055.0x1.0
0x106114…1062a8 [0x17]: C0x0055.0x2.0
0x106114…1062a8 [0x18]: C0x0055.0x3.0
0x106114…1062a8 [0x19]: C0x0056.0x0.0
0x106114…1062a8 [0x1a]: C0x0056.0x1.0
0x106114…1062a8 [0x1b]: C0x0056.0x2.0
0x106114…1062a8 [0x1c]: C0x0056.0x3.0
0x106114…1062a8 [0x1d]: C0x0057.0x0.0
0x106114…1062a8 [0x1e]: C0x0057.0x1.0
0x106114…1062a8 [0x1f]: C0x0057.0x2.0
0x106114…1062a8 [0x20]: C0x0057.0x3.0
0x106114…1062a8 [0x21]: C0x0058.0x0.0
0x106114…1062a8 [0x22]: C0x0058.0x1.0
0x106114…1062a8 [0x23]: C0x0058.0x2.0
0x106114…1062a8 [0x24]: C0x0058.0x3.0
0x106114…1062a8 [0x25]: C0x0059.0x0.0
0x106114…1062a8 [0x26]: C0x0059.0x1.0
0x106114…1062a8 [0x27]: C0x0059.0x2.0
0x106114…1062a8 [0x28]: C0x0059.0x3.0
0x106114…1062a8 [0x29]: C0x005a.0x0.0
0x106114…1062a8 [0x2a]: C0x005a.0x1.0
0x106114…1062a8 [0x2b]: C0x005a.0x2.0
0x106114…1062a8 [0x2c]: C0x005a.0x3.0
0x106114…1062a8 [0x2d]: C0x005b.0x0.0
0x106114…1062a8 [0x2e]: C0x012e.0x2.0
0x106114…1062a8 [0x2f]: C0x012e.0x3.0
0x106114…1062a8 [0x30]: C0x012f.0x0.0
0x106114…1062a8 [0x31]: C0x010f.0x1.0
0x106114…1062a8 [0x32]: C0x010f.0x2.0
0x106114…1062a8 [0x33]: C0x00ae.0x2.0
0x106114…1062a8 [0x34]: C0x00ae.0x3.0
0x106114…1062a8 [0x35]: C0x00af.0x0.0
0x106114…1062a8 [0x36]: C0x00af.0x1.0
0x106114…1062a8 [0x37]: C0x00b7.0x1.0
0x106114…1062a8 [0x38]: C0x0132.0x1.0
0x106114…1062a8 [0x39]: C0x0132.0x2.0
0x106114…1062a8 [0x3a]: C0x0132.0x3.0
0x106114…1062a8 [0x3b]: C0x0133.0x0.0
0x106114…1062a8 [0x3c]: C0x00a9.0x2.0
0x106114…1062a8 ]
0x106114…1062a8 }
0x1062a8…10643c Dummy {f00=0x004f, f01=0x018e, f02=» J F IDENT MONTAB REL 11.0 81-05-27 870105041100 & " MONTABK SPDLCI FREQUE PAGQUE R CTAB01 | CTAB02 ITADN MONTABK FREQUE PAGQUE SPDLCI KBAD4
0x10643c…1065d0 Dummy {f00=0x004f, f01=0x400c, f02=» @ IDENT MONTAB REL 11.0 81-05-27 870105041100 & " MONTABK SPDLCI FREQUE PAGQUE R CTAB01 | CTAB02 ITADN MONTABK FREQUE PAGQUE SPDLCI KBAD4
0x1065d0…106764 Dummy {f00=0x004f, f01=0x0190, f02=» J F IDENT DEBUGM REL 11.0 81-07-26 870105041100 dBUG R |BUG ` , ( A :U A A p , ( ! @ ~ A A ~ @ A A , ( A @ A A @ A A " a
0x106764…1068f8 Dummy {f00=0x004f, f01=0x0190, f02=» h , ( , ( $ ( , 0 4 8 , ( 8 < h , ( 9 , ( Y , ( y
0x1068f8…106a8c Dummy {f00=0x004f, f01=0x0190, f02=» T :a R T <a Z _ = , ( :A , >a @ ( , ( " A P UW B X , ( 9 @ = / M Q , ( Y R S T Y G P H L , ( y V I U _v
0x106a8c…106c20 Dummy {f00=0x004f, f01=0x0190, f02=» P A A x , ( . , + - ; # , ( $ : X " H W X " H TTB:AP x ACBRELA , ( * 9 H H A W W L , ( W@ H A A _p @ P A 1+ , ( !T u X A
0x106c20…106db4 (1, 15) Dummy {f00=0x0050, f01=0x0190, f02=»NDTID , ( ! ? > " @ , ( D @ T " ( ^ @ P > , ( R A A " @ T @ n , ( 3 W @ A W W 0 , ( $ S _, W W , ( s
0x106db4…106f48 Dummy {f00=0x0050, f01=0x0190, f02=» _` A , ( @ T @ W @ T @ W @ @ . , ( >a @ A ^ , ( 3 A , ( S ;a ]@ 1 _L W @ , ( s $ 0
0x106f48…1070dc Dummy {f00=0x0050, f01=0x0190, f02=» @ Q A @ ~ , ( BT A " T @ W @ A , ( ! A P @ _2 N , ( 3 T 0 P P ~ , ( S _ @ @ , ( P s @ @ P
0x1070dc…107270 Dummy {f00=0x0050, f01=0x0190, f02=» ) " A n , ( U H A @ , ( * @ @ T A A > , ( 3 P @ P n , ( @ S @ ! T A @ A # , ( E s A ~ RE XRN Y , ( P ME
0x107270…107404 Dummy {f00=0x0050, f01=0x0190, f02=» T P #~ > V . >A , ( P Y X W ^ ? ? . , ( @ 3 @ ' P Y Y W Y Y @ ^ PRUNN ACBLACA , ( S @" P @ = ] , ( m ] ] W A A A W
0x107404…107598 Dummy {f00=0x0050, f01=0x0190, f02=» A p , ( A > > > > , ( > > > > ^ _ ^ _ ? ? ? ? @ , ( @ - ? A ^ @ ? ? p , ( @ M > > > > > > > , ( D m @ > , ( (
0x107598…10772c Dummy {f00=0x0050, f01=0x0190, f02=» # H A " A 0 , ( R 9U AR FQ 0:D A 0 , ( - _* A " A A ` , ( M T A A " , ( m R _U . " , ( A : A
0x10772c…1078c0 Dummy {f00=0x0050, f01=0x0190, f02=» " A A P R :UT , ( @ @ W 9D) 9 I 9 ^ @ W TTB:MT P $ - ? H > " b , ( ! R :W W , ( W W ?W /W : A W ! A A , ( P _ @ _
0x1078c0…107a54 (1, 16) Dummy {f00=0x0050, f01=0x0190, f02=» A A @ z , ( B A A @ > @ _ , ( " a z | I R M A P T @ T J , ( D @ P A W ` @ @ P @ z , ( T A P A < V A @ H D ! )
0x107a54…107be8 Dummy {f00=0x0050, f01=0x0190, f02=» ? F C I M Q , U Y j ] d a l e . i : m q u H D ! y } 4 p p j T P B H D ! 0 d d | H N # /W* 3 GW K MW Q g H D !j| mP P W P W
0x107be8…107d7c Dummy {f00=0x0050, f01=0x0190, f02=»V W r H D ! > T j W T W # ' + 3 7 > ; . H D ! ? I j M h ] g oW W P z H D !6n P P P T W < P # b + 5 b ;
0x107d7c…107f10 Dummy {f00=0x0050, f01=0x018e, f02=»W T V W~ P ^ H D ! P P P W TR PJ V P %W ;P EW UP$ yW } H D ! W P T T V 3 : K r f H D ! Q P < R$ U R Q + < / 9 < E f I h H D ! M Q
0x107f10…1080a4 Dummy {f00=0x0050, f01=0x40c6, f02=» J H D ! R T W( @ ) @ +W R W" W W W W W H D !P W PL T T P T$ 5 < oR> wP6 T. P W T P T V @ < R$ U R Q + < / 9 < E f I h H D ! M Q
0x1080a4…108238 Dummy {f00=0x0050, f01=0x0190, f02=» > @ IDENT SYSLOD REL 11.0 83-08-24 870105041100 F B SYSLOD SYSBAS NUMSEG PRGLG1 APLADA APLLAC APLLAP APLLDA F F B APLMMC APLMMP APLNPE APLREL APLSTA APLTYP APLIOE APLSEG APLSWB APLADA APLRE
0x108238…1083cc Dummy {f00=0x0050, f01=0x0190, f02=»PLSEG APLNPE APLSWB $ APLSTA 8 APLTYP L NUMSEG ` PRGLG1 t SYSLOD STKEND SCTIPL SCTANO , ( I$ A 0 A A " A A STK
0x1083cc…108560 Dummy {f00=0x0050, f01=0x0190, f02=» A. z bREL TABBE ( , ( O UU @>B @ A 8 , ( k @ D E D E P h MMDDIV , ( $_( W V W V P ERROR SCTMSZ SCTEFA
0x108560…1086f4 (1, 17) Dummy {f00=0x0050, f01=0x018e, f02=» @ @ A , ( ! P A @ , ( ! @ $ A A @ P , ( H @ @ E E E E E , ( 9A A & E @ F CRP , ( U <A COP <A BAP AS<A E ASP
0x1086f4…108888 Dummy {f00=0x0050, f01=0x0190, f02=» , ( F ;j , ( Y P F P 4 , ( @ P - P _ d , ( :L E A W , ( F D AST =l R , ( ? W R Q
0x108888…108a1c Dummy {f00=0x0050, f01=0x0190, f02=» :L AST , ( A A E E A A " , ( 8 P W 89B @ V R , ( $ W Zb A @ @ , ( A A @ D , ( # B AS @ A
0x108a1c…108bb0 Dummy {f00=0x0050, f01=0x0190, f02=» _H r , ( S W , ( Y* B , ( H @ @ A @ r , ( L P , ( :l 9b ) , (
0x108bb0…108d44 Dummy {f00=0x0050, f01=0x0190, f02=» m U 8 !RRT A SCTNOP 0 , ( $ " @ P A A " @ > B , ( V T P T r , ( ;a=a?j V Y R W , ( ?J E =A;A E PUS
0x108d44…108ed8 Dummy {f00=0x0050, f01=0x0190, f02=»" A @ A @ * & M E A @ V @ * & e @ P , . A N , ( } @ @ A A | , ( , (
0x108ed8…10906c Dummy {f00=0x0050, f01=0x0190, f02=» l , ( 3 _ 0 !TTX A 8 !CCT CC A , ( S _ 0 !;; !AAP !DDT < , ( sI @ @ A 6 0_ ; # l , ( H @ @ @ I A , ( P T , ( TT
0x10906c…109200 Dummy {f00=0x0050, f01=0x0190, f02=» T @ " A @ @ @ MOVE , , ( / I A ( A < SCTMXS l , ( IA @ A @ ~ SYSLDM , ( c $ *P @ A * @ , , ( y $ ) @
0x109200…109394 (1, 18) Dummy {f00=0x0050, f01=0x0190, f02=» T : , ( : 0 !TT 0 !;; , ( : 0 !LLP !RRP !AA P , ( + P !SSP !PPP !VVP !QQP W W , ( K P W A 0 !;;T , ( i : 0 !00R !ZZU !AAR !ZZQ
0x109394…109528 Dummy {f00=0x0050, f01=0x0190, f02=» A : p , ( 0 !99Q !00R P P =H_ : , ( TID=TCL=LEV=TDC=T0LC=0SDC=S0 @ , ( '@ A I. : A A p , ( E " Q :d @ 1 # R P R W , ( cD * A $ W , ( }"
0x109528…1096bc Dummy {f00=0x0050, f01=0x0190, f02=» A A A F 0 A , ( 2 : A A : 0 , ( @ @ 2 ! P V :AW 9E R ` , ( 3 _ <e @ 2 $ T 9A $ < :B , ( Q 9A) @ P A A I T , ( q W 9D @ @
0x1096bc…109850 Dummy {f00=0x0050, f01=0x0190, f02=» 9P , ( S Y T $ 1T C !CCT : 1P CONVRT P , ( H P _ P =H P . @ T X b , ( + A : Y h C , ( I !CCT B. * X B.9 H , ( i A ! _
0x109850…1099e4 Dummy {f00=0x0050, f01=0x0190, f02=» V W Q , ( T W @ T " , ( R P @ T A R , ( F R U @ , ( 5@ A p T : A _ , ( S 0V , - P X 9A_ :
0x1099e4…109b78 Dummy {f00=0x0050, f01=0x0190, f02=»P r , ( B T _* @ " 2 @ , ( ` P A : @ , ( " T 0 p , ( !;;P 0 !;; " " , ( 7 - a =! 0 - Y : , ( U
0x109b78…109d0c Dummy {f00=0x0050, f01=0x0190, f02=» 8 P , ! P : SYSBAS 0 , ( . : : D * & 7 ( W $SWAP t H D ! 5 P P 2 P J SP [P cP sP yT P H D !X U P L
0x109d0c…109ea0 Dummy {f00=0x0050, f01=0x0190, f02=»P _P0 c p qP ( p S W p @ ( P 3 ( E J _V4 H D ! gR, wU { T Pf V T P T V R W J aV gP B H D ! k J j j H D ! V V P& J
0x109ea0…10a034 (1, 19) Dummy {f00=0x0051, f01=0x0190, f02=» 2 P T R T eP r H D ! P P P@ T T " " " P& %P +P 1P 7P . H D ! =P CP EW IW O SP UW [ gT sR yU R Q T z H D ! 0 TV T Q0 R* P P 9 A GQ UR$ WP [
0x10a034…10a1c8 Dummy {f00=0x0051, f01=0x415c, f02=» mTd qW ^ H D ! T T( P W W J V S PN TD T> Tp P P( H D !) 'T MTr i yTF S W V W, Q( T W& T R P f H D ! ) N T #R )U =T K J YV eP wP {W T P T D @ V P
0x10a1c8…10a35c Dummy {f00=0x0051, f01=0x0190, f02=» J F IDENT SYSLCR REL 11.0 81-10-06 870105041100 SYSLCRK R SYSLCRK d STKEND x STKMOV SCTSFAR , ( H ) @ A x STKCOMW GETAPP , (
0x10a35c…10a4f0 Dummy {f00=0x0051, f01=0x0190, f02=» A ^ d H t , ( c d H K 2 CMPADR D ERROR V , ( ;A @ x | R f , ( - @ x - J N ! , ( TTP N :H N TBT K , ( W 2
0x10a4f0…10a684 Dummy {f00=0x0051, f01=0x0190, f02=» @ !TTXX !CCT !UU , ( ) T @ x K (9A A x , GETNUML , ( E $ @ 2 n , ( a .:H N R P V * & _ N R :h$ * &
0x10a684…10a818 Dummy {f00=0x0051, f01=0x0190, f02=» l INILEN , ( A x A j , ( H A l @ A L A N SCTOPTP ~ , ( @ CR @ D MULTN , ( 9 G " F * E H , ( W
0x10a818…10a9ac Dummy {f00=0x0051, f01=0x0190, f02=» T _ k k :A K , ( J 4 P T T 0 * & @ _ K K @ @ ` , ( x @ ` @ j @ @ * & @ l @ d A @ , ( 3 @ A
0x10a9ac…10ab40 Dummy {f00=0x0051, f01=0x0190, f02=» @ L >k | * & 8 A A , ( H Q R ^ V H MMTAB x , ( ;k " , , ( @ @ T A R @ ^ P * & U U
0x10ab40…10acd4 (1, 20) Dummy {f00=0x0051, f01=0x0190, f02=» 9k! " P , ( e $ % _ @ $ @ & A & A $ $ MMENT T * & }$H A " & A d * & J ` & ) K @ , ( b G ` & ) , ( - J ` $ 4
0x10acd4…10ae68 Dummy {f00=0x0051, f01=0x0190, f02=» R X4 _ J GETTTB@ TTB:PP 2 MOVMMT D TTB:ID V , ( ; $ P ( I * , h TTB:CB TTB:SB TTB:SA * & UI H . 0 I 2 4 @ MMBEG
0x10ae68…10affc Dummy {f00=0x0051, f01=0x0190, f02=» 8 , @ ~ A ~ , ( ~ % R , , ( " E R N , ( @ A t R R P R Xv ~ , ( _|W T : A p * & / _ A r N P
0x10affc…10b190 Dummy {f00=0x0051, f01=0x0190, f02=» D l , ( B E @ b H ` & H ` $ , ( H E #_ A P @ L < , ( 9k $ A A J l , ( " ` & ( ` $ A N J $ , ( K $ J J | , ( # @ |
0x10b190…10b324 Dummy {f00=0x0051, f01=0x0190, f02=» _ " = D 4 Q _l , ( ( 1 , = G 4 * , ( 0 @ & A $ $ @ Z LSTPAG SCTTCT , ( E : " L M _V < * & < <P & &X '
0x10b324…10b4b8 Dummy {f00=0x0051, f01=0x0190, f02=» A ^ @ | SCTEFAR * & ? @ :B A @ @ 9n A . , ( W @ @ L @ @ R P J V , ( qI$ @ ^ A @ A A R K MOVING , ( " B : @ H <B A z P , ( ! P
0x10b4b8…10b64c Dummy {f00=0x0051, f01=0x0190, f02=» b @ v M : Z A , ( V @ H R R , , ( # > R W > , ( C <B @ p @ P P ` & 1 , ( ]I ` $ A v @ r ` Z _j , ( uH @ V Z : A T
0x10b64c…10b7e0 Dummy {f00=0x0051, f01=0x0190, f02=»X D P | , ( H E _( b E _6 " D T , ( E b E D E % : L , ( % Z " R ;B Z b | , ( A " R P P P ` , ( _ & @
0x10b7e0…10b974 (1, 21) Dummy {f00=0x0051, f01=0x0190, f02=»_ D : A H z , ( @ W A H ?AP ^ D : 4P * & @ " D ( 6 , H H J , ( 4 M j - I * x * & $ # Y0 : f : R , ( ? X A h @ N T : N @ , (
0x10b974…10bb08 Dummy {f00=0x0051, f01=0x0190, f02=» , ( T T _v , ( J , V P _ N 4 , ( L % J J ` & G G d * & @ ` $ U ` & G ` , ( H $ : P V : , ( 1 @ t P
0x10bb08…10bc9c Dummy {f00=0x0051, f01=0x0190, f02=» L H D ! ! P6 P * UT i ` Q R V T P( U U cP b b H D ! b P0 & P 2 + 1 2 5 =PJ C b Pn & b T H D ! P W T ! % - 1 EP i ~ T " H D ! -P mP Q " ~
0x10bc9c…10be30 Dummy {f00=0x0051, f01=0x4042, f02=» P J V P U P %V ;P ` ,@ >P b b H D ! b P0 & P 2 + 1 2 5 =PJ C b Pn & b T H D ! P W T ! % - 1 EP i ~ T " H D ! -P mP Q " ~
0x10be30…10bfc4 Dummy {f00=0x0051, f01=0x0190, f02=» J F IDENT SYSINI REL 11.0 81-01-26 870105041100 F B SYSINIK INILEN INIEND dREL MOVEY ERROR CMPADRL NXTBLK NXTCOM R H D ! CONVRT GETNUM MULTY XMOVE MOVING MOVMMT MMRST GETTAB GETTTB H D ! MMENT PUSHYdPOB GETAPP8 SETTA
0x10bfc4…10c158 Dummy {f00=0x0051, f01=0x0190, f02=» W z " tPSW @ . , ( K @ ; Z [ : : 2 [ [ > MMDDIV0 l n i" 2 : MMTAB TABBE MMEND , (
0x10c158…10c2ec Dummy {f00=0x0051, f01=0x0190, f02=» MOVEY XMOVE , ( : R $ )_ : A ( ( , ( H A * A , Q X , ( I @ ( @ ` $ x A ( @ * & #D @ * ` & p R A * @ , ( ; , A , ^B _F
0x10c2ec…10c480 Dummy {f00=0x0051, f01=0x0190, f02=» V U _ * & @V Z K A A ( , ( & :K A ( V , ( @ Q R ( V * & @ P @ SETTABN , ( ` $
0x10c480…10c614 (1, 22) Dummy {f00=0x0051, f01=0x0190, f02=» Q ( ; @ ( : : GETTAB ~ 0 GETTTB D * & m , X G : " L X SCTTCT( , ( 2 @ V @ 0 H INBIMA , ( A 2 : @
0x10c614…10c7a8 Dummy {f00=0x0051, f01=0x0190, f02=» @ @ 1 R U W 9a MMRST 0 , ( P _" : P _ B GETAPP8 8 r , ( 7 @ : @ ` U W L , ( S P _ @ P _" l 0 , ( o W P .
0x10c7a8…10c93c Dummy {f00=0x0051, f01=0x0190, f02=» :C # : .=H N , ( D N .=H N " GETNUM R , ( N N : d 8" f QUEJOBR SAVE8 , ( R _ ZY QY : ? ? , ( + R 0
0x10c93c…10cad0 Dummy {f00=0x0051, f01=0x0190, f02=» SCTOPT , ( @ e " b ` $ : @ . @ SCTSFA F SCTPAG X SCTNOPW j , ( ! @ P | , ( P P P _ _ @ SCTPSZ , ( @@ @ :b @
0x10cad0…10cc64 Dummy {f00=0x0051, f01=0x0190, f02=»W Y P @ Q @ ~ , ( - . P A. @ . @ . P SCTEFA L * & G _l A 9n A :B A ^ TTB:SPW SEG:NS , ( _ D @ < | P N P , ( w 9b .V 3 S S
0x10cc64…10cdf8 Dummy {f00=0x0051, f01=0x0190, f02=» ] 9A n , ( @ ] 9k! ] PAGQUE > , ( Y P P P , ( ) S @ P 3 _ SCTBUG8 , ( G 3 A. @ SCTSTB , (
0x10cdf8…10cf8c Dummy {f00=0x0051, f01=0x0190, f02=» , ( A * $ TDISP 8 INILEN H INIEND & " ) *_ > , p H D ! , n WN B @ > K B R > QF 1R0 I > P > V U H D ! @ V > Q R >
0x10cf8c…10d120 Dummy {f00=0x0051, f01=0x40ac, f02=»P P V W U4 T W P P( V W #P )Q ~ H D ! /P AP oP: uP4 V T" T W P: P4 9P Y Z y } : @ @ > K B R > QF 1R0 I > P > V U H D ! @ V > Q R >
0x10d120…10d2b4 (1, 23) Dummy {f00=0x0052, f01=0x0190, f02=» J F IDENT DSKSUB REL 11.0 81-01-26 870105041100 F B VOLCLRK VOLNAM VOLADR NVLCHK VOLGET NEWVOL INXDWTL NVLTAB R NVLEND NVLBIT VOLCLRK VOLNAM ECBRL ECBEL , ( @
0x10d2b4…10d448 Dummy {f00=0x0052, f01=0x0190, f02=» X H t VOLADR < DWTOR ( DWTVOL 8 , ( 5 p ^ > X $ ^ J NVLCHK R z DWTORDC DWTNVL * & Q$ W X Y :g H I , ( i ? P X P ,P
0x10d448…10d5dc Dummy {f00=0x0052, f01=0x4102, f02=» INXDWTL , ( Z.?AZ2 @ Q X " _D NVLTAB L NVLEND ` NVLBIT t @ X $ _P @ < < W T~ < QWD oP& y } P P P P @ P ,P
0x10d5dc…10d770 Dummy {f00=0x0052, f01=0x0190, f02=» J F IDENT TDISP REL 11.0 81-01-26 870105041100 H D ! TDISP TPAUSE TEXIT MEXIT QMEXITA ACTDISA DISIOE DISEND` DISQUE R PRUNY RETUR8 DISQUE PRUNY RETUR8 QTJOB QMEXI
0x10d770…10d904 Dummy {f00=0x0052, f01=0x0190, f02=»SA DISIOE " TENDIO DISEND` & 2 TPAUSE * F TDISP * Z , ( A W ^ ! Z2 l TTB:STL , ( 9 (X: @ P T M ]J , ) A TTB:SA * & U P P Y
0x10d904…10da98 Dummy {f00=0x0052, f01=0x4048, f02=» > r W !W CP YP* ]P cU 2@ D TPAUSE * F TDISP * Z , ( A W ^ ! Z2 l TTB:STL , ( 9 (X: @ P T M ]J , ) A TTB:SA * & U P P Y
0x10da98…10dc2c Dummy {f00=0x0052, f01=0x0190, f02=» J F IDENT LRPINT REL 11.0 81-01-26 870105041100 J F " IHLKM LKM030 LKMRQE LKMERR LKMQDI LKMSRC IHRTC TIMQUE MONCLOC R IHPFAR INIFLGN PFPOST IHLKM INTSAVR PRUNN TTB:SA , (
0x10dc2c…10ddc0 Dummy {f00=0x0052, f01=0x0190, f02=»LDSEG LKM030 J SWL48 " , ( 5 $P c P W A 2 LKMAL b , ( Q B V ( U P @ r LKMERR t HALTN LKMRQE z LKMSRC ~ LKMQDI QTJ
0x10ddc0…10df54 (1, 24) Dummy {f00=0x0052, f01=0x0190, f02=» #P DISQUE . , ( H @ A A Q ? > ? @ @ , ( XB ) A A _N A A p PFINIT IHRTC , ( $@ A _` A A Q > QMJOB S
0x10df54…10e0e8 Dummy {f00=0x0052, f01=0x416a, f02=» , ( 1 Y _ A _0 8 FREBLK 8 , ( Q@" Q Z P 0 9 " " J , ( k _ _, ? _ P H z TIMQUE H H D ! %T 5P ;P ?W6 WV eP kV Q
0x10e0e8…10e27c Dummy {f00=0x0052, f01=0x018e, f02=» J F IDENT TPROC REL 11.0 81-03-05 870105041100 TWAIT TMWAIT TACTOT R FNDDWT r TWAIT DWTWATL TDISP TACTOT FNDTIDN , ( @ P "R Y
0x10e27c…10e410 Dummy {f00=0x0052, f01=0x414c, f02=» * & 3 <U "R P X DWTTAB 6 , ( M R X T X T . T H , ( gA G Y6 G _f P x LKMRQE` LKMQDIA & " ,P - _ < 8 P R Pp -
0x10e410…10e5a4 Dummy {f00=0x0052, f01=0x0190, f02=» J F IDENT MSUBS REL 11.0 81-01-26 870105041100 D @ SAVE8 QTJOB QMJOB ACTOT ACTOTP EXITY GETBLK FREBLKL FNDDWT R H D ! FNDDWD FNDTID PFINIT SWL48 SWLXY ILLINT@ INTSAV HALTY RELPAG , ( RELPA2 IHRET8 IHRET2 IHRET1
0x10e5a4…10e738 Dummy {f00=0x0052, f01=0x018e, f02=» ! $P T I QMJOB J . TTMJOB@ @ ACTOTP T R , ( ; R $ 5 % > ? W ? f ACTOT TTB:SA TTB:ID , ( Y $ W ? T T U T U TTB:SB^
0x10e738…10e8cc Dummy {f00=0x0052, f01=0x0190, f02=» GETBLK , ( P 0 U _h FREQUE H , ( ? @ T 0 A 1 Q Q Z FREBLKL , ( > > 0 @ 1 A P P FNDDWT TTB:TD FNDDWD , (
0x10e8cc…10ea60 Dummy {f00=0x0052, f01=0x0190, f02=» SCTTCT , ( ; X W ? ` @ @ P $ IHRET8 ` @ IHRET2 d T IHRET1 h h IHRTN j | PFINIT l PFTAB * & U@ H W W > > > > > > @ SWL48 , ( q V ?
0x10ea60…10ebf4 (1, 25) Dummy {f00=0x0052, f01=0x4100, f02=»ALTY RELPAG RELPA2 " LKMERR 6 " @ ? A. H H D ! 4 $ 1P ;R SW [W gT T P T R P n , ( )R /P 7W0 ?W( QP [W _W sV @ ?
0x10ebf4…10ed88 Dummy {f00=0x0052, f01=0x018e, f02=» J F IDENT TTMJOB REL 11.0 81-01-26 870105041100 F B TTB:AMK TTB:MT TTB:CB TTB:SP TTB:SB TTB:AP TTMJOBL TTB:QL R 6 2 TTB:ID TTB:ST TTB:PP TTB:PW TTB:SA TTB:TDL TTB:AMK TTB:MT TTB:CB
0x10ed88…10ef1c Dummy {f00=0x0052, f01=0x40f6, f02=» TTB:QL TTB:ID TTB:ST , TTB:PP @ TTB:PW T TTB:SA h , ( ! #M 1 | TTB:TDL ( A P @ TTB:CB
0x10ef1c…10f0b0 Dummy {f00=0x0052, f01=0x0190, f02=» J F IDENT TOSSIO REL 11.0 DK 81-10-10 870105041 J F "dTIO TIO:FM TIOERR TENDIO QUEDEV QUEFIL DC:MIN@ DC:MOT TIOMXIC R H D ! MONMMU ECBFC ECBFN ECBBA ECBRL ECBEL ECBRC ECBCW ECBCW1 ECBCW2 F B DC:DIX DM:DIX PC:DIX M
0x10f0b0…10f244 Dummy {f00=0x0052, f01=0x018e, f02=»WTECBW DWTOPT DWTOR DWTOCH DWTADR DWTTAB8 DWTWAT2 D @ DWTTQ DWTOTQ: DWTUEC DWTMEC DWTA2 DWTA3 DWTA4 DWTA5 DWTSB1 < F B DWTSB2 DWTTP DWTECH DWTSQ DWTORD DWTNVLN DWTVOL DWTA7 DWTA8 > : DWTCP2C DWTLD1V DWTLD2 DWTDEV DWTTBU: DWTTLNr DWTTCWV
0x10f244…10f3d8 Dummy {f00=0x0052, f01=0x0190, f02=» DWTADR DWTTAB8 DWTWAT2 0 DWTTQ D DWTUEC V DWTMEC j DWTOTQ: ~ DWTA2 DWTA3 DWTA4 DWTA5 DWTSB1 DWTSB2 " DWT
0x10f3d8…10f56c Dummy {f00=0x0052, f01=0x0190, f02=»2 , DWTDEV . DWTTBU: . DWTVOL . 4 DWTECH 0 H DWTTLNr 0 DWTTCWV 2 p DWTSQ > BUFLEN ACTADR0 ABTADRx INTADR POLADR HDRLEN@
0x10f56c…10f700 Dummy {f00=0x0052, f01=0x0190, f02=» IT:DIX DK:DIXF ECBFC 2 ECBFN D ECBBA V ECBRL h ECBEL z ECBRC ECBCW ECBCW1 ECBCW2 , (
0x10f700…10f894 (1, 26) Dummy {f00=0x0052, f01=0x0190, f02=» ^ TTB:ST , ( A ( , 0 4 8 < C C , ( _A T 8P Y ^ 5 ) P L TTB:SAT | TDISP FNDDWTJ |TIO TIO:FM , ( {$ U , (
0x10f894…10fa28 Dummy {f00=0x0052, f01=0x0190, f02=» C W O " v , ( # X Y ) C C , ( x # P Y '? Y F GETBLK v QTJOB , ( 3 H Y T # P W Y , ( O P R R P T P (@ , ( @ o (@ "
0x10fa28…10fbbc Dummy {f00=0x0052, f01=0x0190, f02=» F C F C > TIOMXIC ( , ( B R Q F ! P C > C > < TTB:MT l , ( F 8D D ! 9b8d9D # C ~ , ( - > B R Q P B P , ( M 0$ T # R Q
0x10fbbc…10fd50 Dummy {f00=0x0052, f01=0x018e, f02=» X 0 n DISEND , ( X D C > X , ( H U H B P P $ # P , ( Q > P , ( + _0 # T p > P p , ( K (_H _2 B
0x10fd50…10fee4 Dummy {f00=0x0052, f01=0x0190, f02=» f , ( _ X T (@ X L U L , ( Q M X 8 TENDIO h , ( L P ( L ) 1_f _& ? | , ( (@ X P 4 Y X , ( # 1 1 X P - M T $ P
0x10fee4…110078 Dummy {f00=0x0052, f01=0x0190, f02=»P l , ( T P 0 1 FREBLK < ACTOT N & " Y > > _ ^ H D ! . t t H D ! ! # % ' ) d + gP yP | P T P
0x110078…11020c Dummy {f00=0x0052, f01=0x4082, f02=» P PL Q P 7T ?P mU U l @ < @ Q4 P P 1P ?PJ kR mP sP yP P, P$ P( P ( l@ ~ ^ H D ! . t t H D ! ! # % ' ) d + gP yP | P T P
0x11020c…1103a0 Dummy {f00=0x0052, f01=0x0190, f02=» J F IDENT LDTASK REL 11.0 81-06-10 870105041100 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
0x1103a0…110534 (1, 27) Dummy {f00=0x0053, f01=0x0190, f02=» h LT:SWB l LT:DSKK l TLSEG1 0 * & [ $V B QMEXITL p PAGQUE , ( y A ( @ PAG:QBV PAG:SBN , ( X H A ( 1 ) H
0x110534…1106c8 Dummy {f00=0x0053, f01=0x0190, f02=» TTB:AP , ( I$ M T M T M TLSEG2 B PAG:PA8 T SCTPSZ f SEG:ELR x * & $H U (@ H @ D TTB:SP8 SEG:FC , ( &! <a >a
0x1106c8…11085c Dummy {f00=0x0053, f01=0x0190, f02=» &9b!0 # C ( ~ ECBRL , ( = V P * . ECBRC ^ , ( [ U ' ( B , n RELPA2 , ( w DT :" U F . t , ( U _8 # C
0x11085c…1109f0 Dummy {f00=0x0053, f01=0x4092, f02=»LTASK ACTOT ( $ D C 0_ 2 l B 4 , ( qV P CV OP W j [U _ wT S L |@ n RELPA2 , ( w DT :" U F . t , ( U _8 # C
0x1109f0…110b84 Dummy {f00=0x0053, f01=0x0190, f02=» J F IDENT ST8000 REL 11.0 81-01-26 870105041100 ST8000K R ST8000K d IHPFAR x IHLKM IHRTC ILLINT IHTWA IASCUZ , (
0x110b84…110d18 Dummy {f00=0x0053, f01=0x4150, f02=» ~ , ( ! , ( 1 N , ( A ~ , ( Q , ( a
0x110d18…110eac Dummy {f00=0x0053, f01=0x018e, f02=» J F IDENT DCADDR REL 11.0 81-01-26 870105041100 F B FNDDNAK FNDDNT GETDNA GETDNT GETDSA GETDST GETSNAL GETSNT R GETSSA GETSST GETDSA GETDST SCTDCT , ( ? W ?
0x110eac…111040 Dummy {f00=0x0053, f01=0x0190, f02=» FNDDNT | , ( _ P B _V B P _ _ FNDDNAK H GETDNT GETDNA p , ( } ? W ? W ?W ? _ B , ( B ? ' V T _ _P GETSST GETSSA
0x111040…1111d4 (1, 28) Dummy {f00=0x0053, f01=0x4098, f02=» _*" /] Z 8_ H D ! W P P %Tn AR& QT UR _P oP W W W V& T W T & W r @ ?W ? _ B , ( B ? ' V T _ _P GETSST GETSSA
0x1111d4…111368 Dummy {f00=0x0053, f01=0x0190, f02=» J F IDENT TMOVE REL 11.0 81-05-21 870105041100 * & TMOVE MOVSS MOVSU MOVUS MOVUU MOVFW R TMOVE FNDTIDC , ( (@ B B " #MP , ( P B #MP P W , (
0x111368…1114fc Dummy {f00=0x0053, f01=0x0190, f02=» ; j MOVSS , ( w [ [ W Z Z : : U , ( ? ? ? P P $ ) U L , ( P x T $ ) W X $ ) | MOVUS TTB:MT , ( Y W U ? ? _ T , (
0x1114fc…111690 Dummy {f00=0x0053, f01=0x0190, f02=» Y _2 r , ( U ]( ? ? _ P P P ( , ( s $ ) ]^ P p r B , ( $ ($ ) _ (W X2 $ r MOVUU $ ]$ $ ) Y _ > H D ! P" !PH +P* 3P6 9 ;W( EP MP S R UW
0x111690…111824 Dummy {f00=0x0053, f01=0x4012, f02=» @ U ]( ? ? _ P P P ( , ( s $ ) ]^ P p r B , ( $ ($ ) _ (W X2 $ r MOVUU $ ]$ $ ) Y _ > H D ! P" !PH +P* 3P6 9 ;W( EP MP S R UW
0x111824…1119b8 Dummy {f00=0x0053, f01=0x0190, f02=» J F IDENT DCSTAT REL 11.0 81-01-26 870105041100 F B DCSRSTK DCSRLL DCSUPR DCSUPS DCSUPD DCSRED CSMAXLL DWTCHD R DWTCHN DWTCHD DWTCHN CSMAXLL DCSRSTK DCSRLL
0x1119b8…111b4c Dummy {f00=0x0053, f01=0x0190, f02=» ? ? ?W ? ? ? ? W ? ~ , ( A ? ? ? ~ _ X P ^ DCSRED n N , ( a _ > > > >W ? ? ? ? ? ? P B b DWTTAB , ( P B P X X P X W X , ( P X P D P ;A %W M
0x111b4c…111ce0 Dummy {f00=0x0053, f01=0x4166, f02=» W ? ? t , ( X P %? R L V 9HR , ( = ,R S -W - X M W D ] W > >W > t H D ! W T 'W 1W =W U [P mW }P PV PP P W P H D ! P P W R P W W
0x111ce0…111e74 (1, 29) Dummy {f00=0x0053, f01=0x4114, f02=» J F IDENT DWII01 REL 11.0 81-01-26 870105041100 DWII01K R DWII01K d ITADN x , ( IT:BUF @ , ,
0x111e74…112008 Dummy {f00=0x0053, f01=0x4114, f02=» J F IDENT DWIO01 REL 11.0 81-01-26 870105041100 DWIO01K R DWIO01K d ITADN x , ( IT:BUF @ , ,
0x112008…11219c Dummy {f00=0x0053, f01=0x411c, f02=» > @ IDENT DW1501 REL 11.0 81-01-26 870105041100 DW1501 F DW1501 X DC15AD l , ( DC ~ , ( ? @ B 4
0x11219c…112330 Dummy {f00=0x0053, f01=0x0190, f02=» J F IDENT DRDI01 REL 11.0 81-01-26 870105041100 DIADY R DIADY b ECBCW t DWTDEV` , ( B X R $ # LENDER , ( $;D !99P 7P P Y X
0x112330…1124c4 Dummy {f00=0x0053, f01=0x0190, f02=»SB2N , ( i HW X V Y X P , ( B y _B Y W y < LDISP l , ( " Y Y W Y | STABLKA , ( "" Y ! T X Y DWTECB * & D@
0x1124c4…112658 Dummy {f00=0x0053, f01=0x4128, f02=» T X R $ P _B ! LENDIS , ( T 9 R 9 W 9 _ 0 & " /" Y ! X _~ ` H D !` , R %P )P -Pt ;T C j [P aWV iWN qV$ P W W 8 4 T V. P V V V T R P T R '
0x112658…1127ec Dummy {f00=0x0053, f01=0x0190, f02=» > @ IDENT DRDY02 REL 11.1 82-12-13 870105041110 DYAD F DYAD V DWTDEV h STABLK z , ( B Y ! ENDBLK LENDER , ( T P P P & !
0x1127ec…112980 Dummy {f00=0x0053, f01=0x0190, f02=» Y t , ( mD X Y U ! T , ( D ! T Y _@ Y Y D ECBRL t ECBBA , ( D Y W B P B H , ( " +P Y T P ! * & @ T R X
0x112980…112b14 (1, 30) Dummy {f00=0x0053, f01=0x0190, f02=» Y V B V _ X , ( = X ! R Y ; * & W @ ! ;h X $ X ! _p ! P , ( q @ ] B H " _ ~ , ( _ P P P P P ECBRC , ( $ P P C _
0x112b14…112ca8 Dummy {f00=0x0053, f01=0x0190, f02=» X ! | , ( T ! T ! ECBEL J * & 3 H T C X C ! Z LENDIS , ( I T B Y ! , ( a ! T Y U X ! , ( { " T
0x112ca8…112e3c Dummy {f00=0x0053, f01=0x0190, f02=» W l , ( @ X BT V X P R Y , ( ! T ! T P P < , ( H Y ! T P ! T Y l ECHRTN , ( X # X ! T ! , ( 3 $ T Y X Y R
0x112e3c…112fd0 Dummy {f00=0x0053, f01=0x0190, f02=» l , ( ! R X ! T " ! T DWTST < , ( ! ! T 4 X ? 9 L DWTOR | , ( 9 X ' P P +P 9 R 9 9 V DWTSB2 , ( 9 P C " , ( F
0x112fd0…113164 Dummy {f00=0x0053, f01=0x0190, f02=» Y @ n , ( Q B > Y ! Y B X * & k P ! ! *0 ! > , ( ! ! Y Y l LDISP * & X @ Y $ X : & H D !xi
0x113164…1132f8 Dummy {f00=0x0053, f01=0x4172, f02=» ! @ 'T -V 3V KR" Y k b u , y , PJ P P8 P8 P4 P0 P, H D !BP U WJ TF P T , -TN 5TF 9 KT0 [ b iT qU }T U L H D ! V T P WT TN VF P R T T Pf P Tf H D ! a , P TX -TB 5T: IR ST [T
0x1132f8…11348c Dummy {f00=0x0053, f01=0x8190, f02=» > @ IDENT DRGP02 REL 11.0 83-10-20 870105041100 GPAD8 F , ( [000b [000e [00t [00q 8 V GPAD8 < , ( ! [00w [00v c [5n DWTOR DWTDEV * & A $$ X " X
0x11348c…113620 Dummy {f00=0x0053, f01=0x8190, f02=» l STABLK GETCHR OUTPUT 0 , ( ! P ! B ENDBLK r , ( P _ ! _, ! , ( _D ! P P , ( B ! ! !
0x113620…1137b4 (1, 31) Dummy {f00=0x0054, f01=0x8190, f02=» Y ! t , ( S X P ! , ( m@ ! W ! ! B * & W ! W ! +XR X r , ( @ $ T _ Y $ Q P , ( B ! ! ! W Z* , (
0x1137b4…113948 Dummy {f00=0x0054, f01=0x8190, f02=» + P Y ! & , ( E ! ! B $ P YN P 0 DWTST ` DWTSB2 p , ( c H Y Y W * & } ! . ! X " P Y , ( " ! Y Y 0 !
0x113948…113adc Dummy {f00=0x0054, f01=0x8190, f02=» Y ! , ( ! [ ! 5 ! * & @ n ! ! P SETIMP ~ INPUT , ( / ! " ! * & I P 0 : P Y _$ X , ( e
0x113adc…113c70 Dummy {f00=0x0054, f01=0x818e, f02=»@ l Y _ Y Y , ( X ," :HR 0 P :h ! , , ( @ Y _" X , ! , ( @ Y _ 4 :h 0 :C ! 4 , ( # 12151824253033353648505160667072 , ( C 01020304050607080910
0x113c70…113e04 Dummy {f00=0x0054, f01=0xc17a, f02=» H D !u P P P T P ) 3PB 7PT H D !6 9WF ?P E v W ]PN g s uW6 W W T Q P H D !q^ P W6 R P T !P. - ; G O WP H D ! c @ {WX P8 v v
0x113e04…113f98 Dummy {f00=0x0054, f01=0x0190, f02=» J F IDENT DRIC01 REL 11.0 81-04-02 870105041100 ITADY IT:BUF R ITADY j IT:BUF | ECBCW DISIOE , ( B P P 3T Y W FNDTIDA
0x113f98…11412c Dummy {f00=0x0054, f01=0x0190, f02=» R H t DWTECB` * & 1 P ' P T ' P & ECBRL T , ( M B ]` F U F ]n d BUFLEN ECBEL DWTTABN * & e H P U W C G H TTB:ID * &
0x11412c…1142c0 Dummy {f00=0x0054, f01=0x0190, f02=» 9 j SETIMPA , ( @_ Xt X X R A TTB:ST` L , ( Y X T " P ^ TDISP , ( (P H U "^ 9 1 $ X , ( " T @ P ( A _ ( Y _ , (
0x1142c0…114454 (1, 32) Dummy {f00=0x0054, f01=0x40f4, f02=» { $ $ - )W ) $P e % > H D ! X P P T W P )R 1P 5Pt ;Tt ? b CP YU kU . H D !0 qW. R J P P T P #T )P 3 S f ] b e oP z uP W P @ , (
0x114454…1145e8 Dummy {f00=0x0054, f01=0x0190, f02=» > @ IDENT EBCDIC 9.2DK 1 79-11-16 870105040920 TASCII TEBCDI F TASCII ` , ( t , ( ! , ( A ABCDEFGHI#.<(+!&JKLMNOPQR$]*);^ , (
0x1145e8…11477c Dummy {f00=0x0054, f01=0x4162, f02=» , ( ABCDEFGHI[.<(+!&JKLMNOPQR]$*);^ TEBCDI 4 , ( /STUVWXYZ|,%_>?0123456789:#@'= H , ( 7- <=2&p ?' x , ( ! @O JZlP}M] Nk`Ka z^L~no , ( A j {|[_m , (
0x11477c…114910 Dummy {f00=0x0054, f01=0x414a, f02=» J F IDENT DVTKB REL 11.0 81-01-26 870105041100 DVTKB R DVTKB b KBAD4 t & " @ KB bECH bCOD , ( ! "" 33 =
0x114910…114aa4 Dummy {f00=0x0054, f01=0x0190, f02=» J F IDENT DRND01 REL 11.0 81-05-27 870105041100 H D ! INPUT STABLK OUTPUT ENDBLK ECHRTN ECHOY ECHEND@ GETCHR ABORT R H D ! LENDERN LENDIS LDISP NDREPO NDRETOL NDREP NDRET NDSAV8 NDGET8 F B NDREWS NDREDWV NDGEDN8 NDG
0x114aa4…114c38 Dummy {f00=0x0054, f01=0x0190, f02=» INTSL7W INTSL8 INTAS1 INTAS2 INTAS3 INTAS4 ~ F B INTAS5 INTAS6 INTAS7 INTAS8 INTPL1 INTPL2 INTPL3 INTPL4 8 F B INTPR1 INTPR2 INTPR3 INTPR4W INTVU1 INTVU2 INTVU3 INTVU4V & " INTVU5N INTVU6C INTVU7V INTVU8 PLCHRI
0x114c38…114dcc Dummy {f00=0x0054, f01=0x018e, f02=» ( PLENBL 0 PRENBL B TDISP T * & 3 T d PLDISP PRDISPI INTLT1 P INTLT2R P INTLT3R P INTLT4 P
0x114dcc…114f60 Dummy {f00=0x0054, f01=0x0190, f02=» INTSL4 P INTSL5 P INTSL6 P , INTSL7W P @ INTSL8 P T INTAS1 P h INTAS2 P | INTAS3 P INTAS4 P INTAS5 P INTAS6 P INTAS7 P INTAS8 P
0x114f60…1150f4 (1, 33) Dummy {f00=0x0054, f01=0x0190, f02=» INTPR3 INTPR4W ^ 4 INTVU1 ` H INTVU2 ` INTVU3 ` p INTVU4V ` INTVU5N ` INTVU6C ` INTVU7V ` INTVU8 ` INPUT ` DWTCHP
0x1150f4…115288 Dummy {f00=0x0054, f01=0x0190, f02=» ! 9 D W x ECHEND@ ECHOY , ECHRTN > GETCHR R ECBRL f ECBBA v , ( @ X ! 9 D 0W B U B ECBEL ABORT DWTST , ( (" W C
0x115288…11541c Dummy {f00=0x0054, f01=0x0190, f02=» NDREPO NDRETOL NDREP , NDRET > , ( @ D @ W W (@ P NDSAV8 DWTA3 DWTA4 DWTA5 DWTA7 DWTA8 * & H 4 Y $ Y & Y ( Y *
0x11541c…1155b0 Dummy {f00=0x0054, f01=0x0190, f02=» j , ( Q X X P X( NDREDWV t : DWTSB2 N DWTOR ` DWTECB p * & o _. ?(@ . X 0'? DWTADRV RECADR2 DISENDR , ( 2 X 4 D 6 X
0x1155b0…115744 Dummy {f00=0x0054, f01=0x4140, f02=» D V n $ 8P X V 8W ?a > H D ! ! # % ' 6 H D ! ) / 1 3 5 7 9 ? qW~ Wl WZ WH U W W H D !j W ? ER* M cP m t T P V P W P
0x115744…1158d8 Dummy {f00=0x0054, f01=0x0190, f02=» J F IDENT TIMER REL 11.0 81-01-26 870105041100 TIMER SETIME SETIMP R TIMER r TDISP FNDTIDC LKMRQE , ( $ T GETBLK@ LKMQDI
0x1158d8…115a6c Dummy {f00=0x0054, f01=0x40ec, f02=» _ ? * & S ^ 4 _ ( TIMQUEA V , ( o @ 1 A _ P 9 > h > ( $ ~ T J : - 4 1 J 3 > P @ ETBLK@ LKMQDI
0x115a6c…115c00 Dummy {f00=0x0054, f01=0x0190, f02=» J F IDENT TMMLKM REL 11.0 81-01-26 870105041100 TCHPAGK TCHMMU TLUSEG R TCHPAGK t TTB:MT LKMQDI TCHMMU FNDTID , ( $' "?:B ] TLU
0x115c00…115d94 (1, 34) Dummy {f00=0x0054, f01=0x407a, f02=» ,$ T -_> | RELPAG Q - _H . P -U 3U IT H X d@ vPAGK t TTB:MT LKMQDI TCHMMU FNDTID , ( $' "?:B ] TLU
0x115d94…115f28 Dummy {f00=0x0054, f01=0x0190, f02=» J F IDENT TLDSEG REL 11.0 81-01-26 870105041100 TLDSEGK TLSEG1 TLSEG2 R TLDSEGK t TTB:SP SEG:NS LKM030@ , ( B T R L U 9C TTB:SB SEG:D
0x115f28…1160bc Dummy {f00=0x0054, f01=0x412c, f02=» TTB:AP ACBMMP ACBNPE " , ( 5BH D " T X X - 4 ACBLAP d TTB:MT v TTB:CB , ( M U _ 9B X T u TTB:SA g X > R U %T /
0x1160bc…116250 Dummy {f00=0x0054, f01=0x0190, f02=» J F IDENT TABORT REL 11.0 81-01-26 870105041100 TABORTK R TABORTK d FNDDWT x DWTTAB DWTADR ABTADR * & "R P X T X DWTST DWTECH
0x116250…1163e4 Dummy {f00=0x0054, f01=0x4106, f02=»P X P t DWTECB ECBRC & DWTSB2C 6 * & IH Y 9 C H DISEND v LKMRQE " _ @ , ( Rf P^ TX PJ %RD )V 7T ?P* GP n @ H
0x1163e4…116578 Dummy {f00=0x0054, f01=0x0190, f02=» J F IDENT MONTIM REL 11.0 81-01-26 870105041100 GETTIMK SETTIM TDATE R GETTIMK r MONCLO , ( @ < ? < ? <(@ $ , ( P B $ 9H C ">h # TTB:SA
0x116578…11670c Dummy {f00=0x0054, f01=0x40d6, f02=» TDATE , ( w P ?_" = > = > = _D , ( @ X _F R _ 00 @ > & <h$ P > p ( $ P ?P eP s wP R P @ $ 9H C ">h # TTB:SA
0x11670c…1168a0 Dummy {f00=0x0054, f01=0x0190, f02=» J F IDENT LKMAL REL 11.0 81-01-26 870105041100 LKMAL R LKMAL b bTIO t TWAIT TEXIT TACTOT TPAUSE TIMER TMWAIT TLUSEGC * & UT
0x1168a0…116a34 (1, 35) Dummy {f00=0x0055, f01=0x406e, f02=» , ( B % 4 & H & X@ j b bTIO t TWAIT TEXIT TACTOT TPAUSE TIMER TMWAIT TLUSEGC * & UT
0x116a34…116bc8 Dummy {f00=0x0055, f01=0x0190, f02=» 2 @ IDENT CTAB01 REL. 11.0 81/10/28 CTAB01 CTAB02 CTAB03 : CTAB01 CTAB02 p CTAB03 , ( , ( ! 012345 , ( A 6789 -
0x116bc8…116d5c Dummy {f00=0x0055, f01=0x4118, f02=» 0123456789 - , ( * > ?;_: =!"#$%&/() @ABCDE ( , ( FGHIJKLMNOPQRSTUVWXYZ []^ X H D ! * : J Z j z ! # % '
0x116d5c…116ef0 Dummy {f00=0x0055, f01=0x416e, f02=» > @ IDENT DVKB00 REL 11.0 81-01-26 870105041100 DVKB00 F DVKB00 X KBAD4 l * & @ KB | CTAB01 , ( % @ 0 , ( C
0x116ef0…117084 Dummy {f00=0x0055, f01=0x4122, f02=» J F IDENT DVDI00 REL 11.0 81-01-26 870105041100 DVDI00K R DVDI00K d DIADN x * & DI , ( % ?O_o E @ F :
0x117084…117218 Dummy {f00=0x0055, f01=0x411e, f02=» > @ IDENT DVDY00 REL 11.0 83-05-05 870105041100 DVDY00 F DVDY00 X DYAD l * & Y | , ( % P E @ N B
0x117218…1173ac Dummy {f00=0x0055, f01=0x4154, f02=» J F IDENT DVG100 REL 11.0 81-01-26 870105041100 DVG100K R DVG100K d GPAD8 x , ( GP , ( , ( ?
0x1173ac…117540 Dummy {f00=0x0055, f01=0x417a, f02=» J F IDENT DVKB01 REL 11.0 81-01-26 870105041100 DVKB01K R DVKB01K d KBAD4 x * & @ KB CTAB02 , ( % @ 0 , ( C
0x117540…1176d4 (1, 36) Dummy {f00=0x0055, f01=0x4122, f02=» J F IDENT DVDI01 REL 11.0 81-01-26 870105041100 DVDI01K R DVDI01K d DIADN x * & DI , ( % ?O_o E @ F :
0x1176d4…117868 Dummy {f00=0x0055, f01=0x0190, f02=» > @ IDENT SYSLDM REL 11.0 81-08-19 870105041100 SYSLDM F SYSLDM X bREL l STKCOM z SYSLOD TCLASS SCLASS * & $H @ STKEND , (
0x117868…1179fc Dummy {f00=0x0055, f01=0x0190, f02=» , ( OA Y 5 X SCTSFA 8 , ( i * _6 : @ J SCTTCT z , ( $ % @ * & $ @ R ERROR , (
0x1179fc…117b90 Dummy {f00=0x0055, f01=0x0190, f02=» : ` SCTNOF . , ( H @ A P _ @ @ , ( @ @ 3 S S @ V p , ( 9! A : , ( S @P T , ( o
0x117b90…117d24 Dummy {f00=0x0055, f01=0x0190, f02=» CRT N =H N A N =H N CONVRT . TTB:TD @ TTB:AM R , ( $ " A $ @ %!5!T d TTB:MT , ( H & &W @ = V ( TTB:CB , ( @ (W = V * *
0x117d24…117eb8 Dummy {f00=0x0055, f01=0x0190, f02=» " U x * & } _2 @ , ( " P . 0 F , ( I V v TTB:ST , ( H . 0 S $ @ S ,=J TTB:PW TTB:ID
0x117eb8…11804c Dummy {f00=0x0055, f01=0x0190, f02=» $BT @ S 4 A A , ( % _ !TTT @ , . PUSH ^ , ( ? $ P @ * @ a : n , ( WA 6 T ` @ , ( q W H A J AS SCTNOS
0x11804c…1181e0 Dummy {f00=0x0055, f01=0x0190, f02=» ;C , ( @ U BAT @ , ( * @ 8 : A . @ N , ( ) @ P S ~ SCTIPL , ( - _ S A . @ < 3 , ( I 3 J
0x1181e0…118374 (1, 37) Dummy {f00=0x0055, f01=0x0190, f02=» U 3 S TTB:SP , ( B S S _p P " I > 2 bPOB b , ( D _ @ : P @ : p , ( $ A A < H A * & $ P , ( 1
0x118374…118508 Dummy {f00=0x0055, f01=0x0190, f02=» A H I K T + , ( Y@ @ 6 _f @ Y . * & @ !TTX Y % @ ^ SCTFWT * & : A @ BT @ A , ( A H A * & H A
0x118508…11869c Dummy {f00=0x0055, f01=0x0190, f02=»B , ( W T B D YP G , ( u 9h G G @ 8 P A 8 : , ( H _l @ A @ Y j , ( @" !TTX Y : , ( !TTX !CCT , ( P
0x11869c…118830 Dummy {f00=0x0055, f01=0x0190, f02=» $ $ _. Y SCTDCT ( SCTDMT : , ( Y D !TTX @ F @ H @ ! L SCTCDT | * & q P @ 8 8 8 3 , ( J * U , ( I * J .
0x118830…1189c4 Dummy {f00=0x0055, f01=0x0190, f02=» @ _2 | , ( ]X @ 8 8 8 , ( 1 4 D P @ # P L , ( O H I K T K | , ( k YB _b @ H @ F , ( @ % P @ 4 4 4
0x1189c4…118b58 Dummy {f00=0x0055, f01=0x0190, f02=» j , ( W !RRT W !QQP , ( H A A . A 0 @ 0 : DWTCP2 j , ( 1 P @ P P 0 _ P H L | DWTST , ( M &? @ . #? H N& D N# , ( g! * H D D D
0x118b58…118cec Dummy {f00=0x0055, f01=0x018e, f02=» D R n DWTECH , ( $ L T D TP @ ` < T DWTSQ P , ( " @ < 1 Q a < V ` DWTDEV , ( I I V I V D X# P , ( W W D DV ` < T @ , ( !
0x118cec…118e80 Dummy {f00=0x0055, f01=0x0190, f02=» , ( q$ U A < + + * & P @ : ` < P @ 4 , ( < @ < @ < D (P b * & W H $ I T % E , a , ( < : @ Q A % @ , ( B A 0
0x118e80…119014 (1, 38) Dummy {f00=0x0055, f01=0x0190, f02=» = * Q _8 B A 0 * & Y$ A * A , A . @ . INTPR1 , ( q $ , @ . P A . @ 2 E n , ( B A , * Q _8 : , ( ! , ( Q
0x119014…1191a8 Dummy {f00=0x0055, f01=0x0190, f02=» B : , ( 1D 6 P F A , , ( G R A @ @ @ , ( c _ S : 0 N N , ( !TTP 9H N A B A , ( L N 9H N A
0x1191a8…11933c Dummy {f00=0x0055, f01=0x018e, f02=» U P | * & @ N 9A @ L P @ , ( - B # _R @ 0=H A B J , ( I P N !DDP !SSP F z , ( g A H P N !SST , ( A J P Y N 9A ,
0x11933c…1194d0 Dummy {f00=0x0055, f01=0x0190, f02=» h , ( B 9 @ D 9 9@ @ H , ( :HP @ F U W 9 8 , ( % @ 9@ @ J P @ N ;A h , ( A 9@T 9 9@ 9 : P , ( a P 9@T 9 9@ , ( _* :!
0x1194d0…119664 Dummy {f00=0x0055, f01=0x0190, f02=» - _> _H , ( : P AAT : N =H N ( , ( @ " : N =H N " : &=H F X , ( 9 " : F =H F " : ? ? GETNUM , ( U ^ > > : 4 , ( @ q P N
0x119664…1197f8 Dummy {f00=0x0055, f01=0x0190, f02=» P _ @ A P A , ( P _ Q @ Q 1 * , ( D a : @ 0 Z , ( 2 * P J # P , ( 3 B _ :d Y @ * Z A . , ( O P T
0x1197f8…11998c Dummy {f00=0x0055, f01=0x0190, f02=» * P T x , ( :D * J T J , ( & P T X& >aW T L& H , ( P T N&@P @ 9 A x , ( J ] W @ 9 A , ( 5 P _d @ 8P 0P _ 1 _ , (
0x11998c…119b20 Dummy {f00=0x0055, f01=0x018e, f02=» h , ( R d R _ 00)0= , ( % : @ H ;l H :lT 8 , ( ;A ( ( P 5 h , ( _ ` R - _ : @ A , ( D : A : @ : bPSW , (
0x119b20…119cb4 (1, 39) Dummy {f00=0x0056, f01=0x0190, f02=» f MOVE , ( "D Y b , ( U : ~ V H P 0 x H D !d P 0 ) 0 /WL 9P@ R6 P P P # P 7V SP( [T H D ! T d T W V W V # " 'P0
0x119cb4…119e48 Dummy {f00=0x0056, f01=0x0190, f02=» s P T W* S W U P t H D !v P # " 'P + @ I 2 QPd Y @ sP$ { t P . T 0 H D ! " P~ + @ A P MT YT gP o P . Tr P, | H D ! @ U 2 P, # @ 1U O . U sP U T P W . W
0x119e48…119fdc Dummy {f00=0x0056, f01=0x0190, f02=» ( W P 3PV ` H D !x( =P | t PV Tp P T P6 W( W" V T H D ! 7PD SP( qU P P: P W Q #P GQ i m wP Q h H D ! f QZ RT Q* R$ 5P< I QR ] t P P T P H D !L T
0x119fdc…11a170 Dummy {f00=0x0056, f01=0x412e, f02=» L H D ! R P Q PD P8 P( P2 P, U P T qP T P W P H D ! Q P P$ P P %PF 1P SP YT wT {P P W P T H D ! P T TT P W P P %W 7P AP IP YP iT mP T R ( $ R T P R 9P = V
0x11a170…11a304 Dummy {f00=0x0056, f01=0x818e, f02=» B @ IDENT DRDC15 REL 11.0 DK 83-11-15 870105041100 . * DC15AD IH1501 IH1502 DC15ON DW1500 J DC15AD | BHBB DWTOR , ( 1 X $P % Y $ X " T @ , ( O T A A
0x11a304…11a498 Dummy {f00=0x0056, f01=0x8190, f02=» GETDNA , ( P ] ] V TASCII F , ( ] ] < " P H :H ! X , ( @ D = X B , ( P ] , ( # "P R X ] "
0x11a498…11a62c Dummy {f00=0x0056, f01=0x818e, f02=» ! B = ] @ | TDISP , ( { P a A ] ] , , ( B X 2 ECBBA DC:MOT , ( C B P Y GETSNA , ( B B Y
0x11a62c…11a7c0 Dummy {f00=0x0056, f01=0x818e, f02=» ECBCW1 , ( 'D X P B Y @ T , ( A X 2 "P T X F , ( a Y 2 ] "_( T P X U v , ( Y 2_F B T X 2:D :D , ( :D C X , (
0x11a7c0…11a954 (1, 40) Dummy {f00=0x0056, f01=0x8190, f02=» f DWTOPT , ( X " P ECBRL J , ( / B Z , ( M@ X 2 X *T ECBEL GETSSA , ( k @ W P C X P
0x11a954…11aae8 Dummy {f00=0x0056, f01=0x818e, f02=» W W & > > , L Q , SETIME 0 , ( L X "R P A ( B , ( Y $ W Y $W X "Z X r , ( A ( Y $_. Y $ @ , ( ; T A A X $P y $ Y $ , ( [
0x11aae8…11ac7c Dummy {f00=0x0056, f01=0x8190, f02=» , ( P _ 0 )_Z &_2 &_$ * , ( (P _ ) 1 4 A A A A 4 , ( A W d , ( > . ] , ( 9 ] a 4 ( " X A , ( W _< (
0x11ac7c…11ae10 Dummy {f00=0x0056, f01=0x8190, f02=» ] . ! ! ] " , ( P ] H . A A $ , ( ! ! T T , ( A . ! ! @ , ( / T " ! _Z ! ] , ( O P = $ ! x ! > !
0x11ae10…11afa4 Dummy {f00=0x0056, f01=0x8190, f02=» ! X ! t , ( 8 @ P & ! ! X A @ T , ( @ ! _ ( T _ A D , ( $ C B B A A t , ( A A A ! ! X A _ ! , ( ? T @ X ! P ! , (
0x11afa4…11b138 Dummy {f00=0x0056, f01=0x8190, f02=» , ( T A ! @ P @ P @ , ( ( 8 ! ! A _: ! X8_` 4 , ( A @ @ T 1 T P 2P d TEBCDI , ( P P @ P X 2P A ^ 8 , ( =@D H * @ P E X R X P , (
0x11b138…11b2cc Dummy {f00=0x0056, f01=0x8190, f02=» , ( T X *P $W ! , ( "@ X T X ! P ! W 4 , ( ! A @ X 0 A A d , ( A ! @ T @ P ! , ( P ! @ T @ X W @ @ , ( ; @ @ A
0x11b2cc…11b460 Dummy {f00=0x0056, f01=0x8190, f02=» $ @ B A @ T _2 , ( _6 @ A A X ! XD $ , ( @ Y _N "P -P L _ T , ( 4 A A H * E A A 4 , ( @ P X R X " T X *P , ( 1 L A
0x11b460…11b5f4 (1, 41) Dummy {f00=0x0056, f01=0x8190, f02=» A @ t , ( ]: _> P _F @ @ E ! P , ( ! 4 _" ! 0_p / A D , ( T W ,W @ A A W W W t , ( A A ! @ ! @ ! , ( - ! ! ! 4 ! ! @ , (
0x11b5f4…11b788 Dummy {f00=0x0056, f01=0x818e, f02=» , ( T W ! P " ! " :A *@ , ( @ H T 0 ! W R ! 4 , ( A @ @ U Zx Q P Q d , ( T 0 ! A 0 ! A ! , ( + " ! " ! , A _" A , ( K A !
0x11b788…11b91c Dummy {f00=0x0056, f01=0x818e, f02=» , ( ! ! ! 4 @ ,T , ( ! A 2B 4B A J P 4 @ 8 IH1501 h INTSAV | , ( @ ,T B 4B J 4 A . ? J T , ( A T 2P @ P ! H IH1502 8 , (
0x11b91c…11bab0 Dummy {f00=0x0056, f01=0x8190, f02=» , ( @ } ( " P 1 , ( P A 4 A P T ! W " 4 , ( P H *B P ! B X d DC15ON , ( _ _8 ! ! 1 4 ? "P , ( @ Y X _ A , (
0x11bab0…11bc44 Dummy {f00=0x0056, f01=0x8190, f02=» h " ` q @ N:H T 4 . , ( ) :f"? H ! "? H ! 4 ABC @ , ( ) DEFGHI[.<(+!&JKLMNOPQR]$*);^-/ST p DW1500 ) , ( ) UVWXYZ|,%_>?0123456789:#@'=" , ( )
0x11bc44…11bdd8 Dummy {f00=0x0056, f01=0x8190, f02=» M*b QT U*b Y*d ] e) k m o s P v H D ! w { F P> 2 H D !] V P P )P( -R^ 9 CP YP g ~ H D ! k y* {P * * ) V T W +
0x11bdd8…11bf6c Dummy {f00=0x0056, f01=0x8190, f02=» -P 3 7 C G b H D ! K Y a gT o s uW, P W W W W W W W Q H D !9 R P W> W6 & % . 7 ;*b ?T C*d G*b QP ] j H D ! o a gP o s yP * P * P *~ *~ P H D !
0x11bf6c…11c100 Dummy {f00=0x0056, f01=0x8190, f02=»T. N H D ! > 8 ~ L *j ' + /* 1T ; C OP H D ! Y a i q w*n }P P, *d T( PV T4 RD PB W8 *d V H D !n P *~ P H *d * T T *t *b *v *x #*z H D ! W '*h +*j / > 7*d = A
0x11c100…11c294 (1, 42) Dummy {f00=0x0056, f01=0x8190, f02=»P P *b *n *j *| T P P !P H D ! %*` )P /P 3*z C EP OR. UP [T" P V W* T P W T B H D !_ P W *f *` *l *b *n *d T *f P %*d 'T H D ! U +*f /W` 3*b 7*j ?*| C*v G*z S*d UT [ a
0x11c294…11c428 Dummy {f00=0x0056, f01=0x8190, f02=»R$ )T /P G*d K*b Q Y*j [T _*| e*z r H D ! 7 i*z m*| q*j w yT8 P: PN PP P P4 *z *z P *z Z . H D !q P Z *n T W W * * W W W * * * z H D ! # '* + 1 7 ; A G M*v Q*z U*| [*z ]T* c g*b m
0x11c428…11c5bc Dummy {f00=0x0056, f01=0xc18c, f02=»*z ) 3 ; C*h ^ H D ! K*j O*b S Y a g m s w*b } P T H D ! K T * * P T T0 *p T P *f P #* f H D ! '* 3 D KT O* QP6 SR" [W, _P c* eP" gW qP {P P P H D ! *
0x11c5bc…11c750 Dummy {f00=0x0056, f01=0x0190, f02=» > @ IDENT DRKB04 REL 11.0 81-06-26 870105041100 KBAD4 F KBAD4 V FILLER h DWTDEV z LENDIS , ( T Y LDISP ABORT DWTA3 ECBCW
0x11c750…11c8e4 Dummy {f00=0x0056, f01=0x0190, f02=» P $$ P V ~ , ( k! X % Y (@ p ) , ( _* X P Y N ECBRL ~ ECBBA , ( v B B % , ( X $ 4 T %(@ X , ( DP
0x11c8e4…11ca78 Dummy {f00=0x0056, f01=0x0190, f02=» _ X n * & / @ v Y W X X Y , ( G R p< R <A<a C < , ( e W X X P P P l , ( BP _ Y W Y X , ( @ X P X $P <c $P , ( $
0x11ca78…11cc0c Dummy {f00=0x0056, f01=0x0190, f02=» W 9 R "? 9 0 R Q > ! B , ( - W > ! B T ! * , ( I X^ Z ECBEL , ( i C " X $4 P , ( X T 1 pR p Y * & A X
0x11cc0c…11cda0 Dummy {f00=0x0056, f01=0x0190, f02=» $ ! P % " _L Y 1 * & 4 B % > & , ( % " T > T T , ( = > P _ W * & @ ] X 0 X P Y , ( w 0 %_ % Y (@ n
0x11cda0…11cf34 (1, 43) Dummy {f00=0x0057, f01=0x018e, f02=»R DWTSB2 * & I X P L "X $ J H D ! 8 v T 7 AU ERL IP YP cP gV k } P b H D ! n T n P" P W VP Rz !P %P 9W K QRv YR gW H D ! D sP wP }
0x11cf34…11d0c8 Dummy {f00=0x0057, f01=0x407e, f02=» H D !" Tt Rr P WL P 0 P< T W W, 0 P 'T 7T EP [W sP P h@ z
0x11d0c8…11d25c Dummy {f00=0x0057, f01=0x4120, f02=» B @ IDENT DW2501 REL 11.0 DK 82-04-14 870105041100 DW2501 J DW2501 DC25AD p , ( DC , ( ? @ B 4
0x11d25c…11d3f0 Dummy {f00=0x0057, f01=0x818e, f02=» B @ IDENT DRDC25 REL 11.0 DK 82-04-02 870105041100 . * DC25AD IH2501 IH2502 DC25ON DW2500 J DC25AD | BHBB DWTOR , ( 1 X $P % Y $ X " T @ , ( O T A A
0x11d3f0…11d584 Dummy {f00=0x0057, f01=0x8190, f02=» GETDNA , ( P ] ] V TASCII F , ( ] ] < " P H :H ! X , ( @ D = X B , ( P ] , ( # "P R X ] "
0x11d584…11d718 Dummy {f00=0x0057, f01=0x818e, f02=» ! B = ] @ | TDISP , ( { P a A ] ] , , ( B X 2 ECBBA DC:MOT , ( C B P Y GETSNA , ( B B Y
0x11d718…11d8ac Dummy {f00=0x0057, f01=0x818e, f02=» , ( 'B X P Y @ T , ( C X 2 "P T X Y 2 4 , ( c ] "_( T P X U Y d ECBCW1 , ( 2_F B T X 2:D :D , ( :D C X 2 * &
0x11d8ac…11da40 Dummy {f00=0x0057, f01=0x8190, f02=» DWTOPT ECBRL , ( X " P B & , ( - @ X 2 V ECBEL , ( K X *T W P GETSSA , ( k@ C X P " C 0P
0x11da40…11dbd4 (1, 44) Dummy {f00=0x0057, f01=0x8190, f02=» > , L Q , L X "R SETIME , , ( P A ( Y $ W > , ( Y $W X "Z X A ( Y n , ( $_. Y $ @ T A A , ( ; X $P y $ Y $ (P 0 , ( [ )
0x11dbd4…11dd68 Dummy {f00=0x0057, f01=0x8190, f02=» &_2 &_$ * (P _ ) 1 4 , ( A A A A A W . , ( > . ^ , ( ] ] a 4 , ( 9 ( X A _< ( A , ( U 4 A .
0x11dd68…11defc Dummy {f00=0x0057, f01=0x8190, f02=» ] " P ] ~ , ( 8 . A A ! ! T , ( A N , ( . ! ! @ T " ! _Z ~ , ( / ! ] P = $ ! x , ( O ! > ! F ! A P
0x11defc…11e090 Dummy {f00=0x0057, f01=0x8190, f02=» ! ! n , ( H A @ T ! _ ( T , ( @ $ _ A C B > , ( B A A A A A ! n , ( ! H A _ ! T @ X , ( ? ! P ! # T @ T ! , ( ] _
0x11e090…11e224 Dummy {f00=0x0057, f01=0x8190, f02=» P @ P @ 8 ! ! A , ( _: ! X8_` A @ @ T . , ( 1 T P 2P P P @ P X ^ TEBCDI , ( @ 2P A N 8 H * @ P E , ( ;D X R X P T P , ( U@
0x11e224…11e3b8 Dummy {f00=0x0057, f01=0x8190, f02=» D $W ! X T X , ( ! P ! W ! A @ X 0 , ( 0 A A A ! | @ ` , ( T @ P ! ! | @ T @ , ( X W @ @ @ @ A , ( @ = ! | @ T _> !
0x11e3b8…11e54c Dummy {f00=0x0057, f01=0x8190, f02=» _2 _6 @ A A , ( @ X ! XD Y _N "P , ( -P L _ 4 A A H * P * & E A A 4 @ P X R X , ( " T X *P < , ( / A A 4 @ @ T
0x11e54c…11e6e0 Dummy {f00=0x0057, f01=0x8190, f02=»P _F @ n , ( @ E ! P ! 4 _" , ( ! 0_p / A T W ,W @ A > , ( A W W W A A ! n , ( @ ! @ ! ! ! ! , ( - 4 ! ! @ @ A @ , ( M T
0x11e6e0…11e874 (1, 45) Dummy {f00=0x0057, f01=0x8190, f02=» @ " ! " :A *@ H T 0 ! , ( W R ! A @ @ U . , ( Zx Q P Q T 0 ! A ^ , ( 0 ! A ! " ! " ! , ( + A _" A A ! ! , ( K % ! R ! !
0x11e874…11ea08 Dummy {f00=0x0057, f01=0x8190, f02=» 4 @ ,T ! A 2B 4 IH2501 0 INTSAV D , ( B A J P 4 @ ,T B 4B J 4 V , ( @ A . ? J"T A T 2P @ , ( P ! H A A ] IH2502 ( , ( 4 !
0x11ea08…11eb9c Dummy {f00=0x0057, f01=0x8190, f02=» " P 1 P A 4 A P , ( T ! W " P H *B2P ! * , ( B2X _ _8 ! ! 1 Z DC25ON , ( @ 4 ? "P Y X _ , ( A @ T 8 A , (
0x11eb9c…11ed30 Dummy {f00=0x0057, f01=0x8190, f02=»` q 4 t x y , ( ) :f"? H ! "? H ! 4 ABC & , ( ) DEFGHI[.<(+!&JKLMNOPQR]$*);^-/ST V DW2500 ) , ( ) UVWXYZ|,%_>?0123456789:#@'=" , ( ) *
0x11ed30…11eec4 Dummy {f00=0x0057, f01=0x8190, f02=» k m o s @ H D ! w { D P> H D !] V P P )P( -R^ 9 t CP YP g d H D ! k y*x {P *x *x )z V T W +P 5 H D ! 9*x ;T
0x11eec4…11f058 Dummy {f00=0x0057, f01=0x8190, f02=» H D !` WT _ c eW, P W W W W W W W Q R P H D ! m W> W6 ' +*R /T 3*T 7*R AP M Q r WP _ P H D ! ~ c r iP *r P *r P *n *n P W H D ! ) # 8 5*x E*x O X U*p [*p
0x11f058…11f1ec Dummy {f00=0x0057, f01=0x8190, f02=» < *Z *v !T + 3 ?P I Q Y H D ! a g*^ mP sP, w {*T }T( PV T4 RD PB W8 *T P *n < H D !u P 8 *T *r T T *d *R | *f *h *j *X *Z . H D ! '*T - 1T 5) 9*T EP I QT U r WT [ a
0x11f1ec…11f380 Dummy {f00=0x0057, f01=0x8190, f02=» *l T P P P *P P P l H D ! #*j 3 r 5P ?R. EP KT" {P V W* T P W T P W ( H D ! *V *P * *R *^ *T T *V P *T T *V W` #*R t H D ! '*Z /*l 3*f 7*j C*T ET K QT U*^ WP [ gT, k*^ q*X sP y*Z
0x11f380…11f514 (1, 46) Dummy {f00=0x0057, f01=0x8190, f02=» Y*j ]*l a*Z X H D ! g iT8 oP: uPN {PP P P4 *j *j P r *j J P J H D ! *^ T W W *t *u W W W *t *u *t *u ` H D ! ! ' + 1 7 =*f A*j E*l K*j MT* S W*R ] a* cP i H D ! S q) uW *
0x11f514…11f6a8 Dummy {f00=0x0057, f01=0xc166, f02=» ! > I Q W ] c g*R m } P T T H D ! ^ *z *z P T T0 *` T P *V P *z *v # 4 ;T L H D ! & ?*z AP6 CR" KW, OP S*z UP" WW aP kP u | P P *v *b P H D !F T W P P ) P
0x11f6a8…11f83c Dummy {f00=0x0057, f01=0x0190, f02=» B @ IDENT SYS2DC REL 11.0 DK 83-09-08 870105041100 F B SCTMSZ SCTSFA SCTEFA SCTIPL SCTANO SCTTCT SCTCDT SCTPAG J F B SCTNOP SCTPSZ SCTSTB SCTOPT SCTBUG SCTDMT SCTDMI SCTFWT F B SCTNOF SCTNFT SCTFWL SCTBLK SCTDCT
0x11f83c…11f9d0 Dummy {f00=0x0057, f01=0x0190, f02=»:DS SWB:EL SWB:NS STKEND STKCOM r F B STKMOV ACBIOE ACBSWB ACBSEG ACBNPE ACBMMP ACBMMC ACBLAP , & " ACBLAC ACBSTA ACBREL ACBADA v SEG:FC SEG:NS SEG:ST SEG:DS SEG:EL S
0x11f9d0…11fb64 Dummy {f00=0x0057, f01=0x0190, f02=» SWB:EL SWB:NS ACBIOE ( ACBSWB < ACBSEG P ACBNPE d ACBMMP x ACBMMC ACBLAP ACBLAC ACBSTA ACBREL ACBADA I
0x11fb64…11fcf8 Dummy {f00=0x0057, f01=0x018e, f02=»502 IH2501 IH2502 , ( 0 IHPR01 ` , ( ! r IHPL01 IHPL02 , ( 1 IHLP , (
0x11fcf8…11fe8c Dummy {f00=0x0057, f01=0x0190, f02=» f , ( q HALT 8 H SCTMSZ ` SCTSFA t SCTEFA SCTIPL SCTANO SCTTCT SCTCDT , ( @
0x11fe8c…120020 Dummy {f00=0x0057, f01=0x0190, f02=» SCTBUG SCTDMT SCTDMI & SCTFWT : SCTNOF N SCTNFT b SCTFWL v SCTBLK SCTDCT SCTNOS , ( SCTMXS
0x120020…1201b4 (1, 47) Dummy {f00=0x0058, f01=0x4048, f02=» _ 2@ D
0x1201b4…120348 Dummy {f00=0x0058, f01=0x40ce, f02=» B @ IDENT P2TAB REL 11.0 DK 82-04-14 870105041100 PFTAB J PFTAB Z DC15ON l PLON ~ P @ $ PPFTAB DATA PFTABE-* TABLE LENGTH P DATA
0x120348…1204dc Dummy {f00=0x0058, f01=0x4148, f02=» B @ IDENT SCLASS REL 11.0 DK 82-04-14 870105041100 SCLASS J SCLASS DWII01 p DWIO01 DW1501 DW2501 , ( P Q a b DWLP01 @
0x1204dc…120670 Dummy {f00=0x0058, f01=0x0190, f02=» B @ IDENT SYSPRO REL 11.0 DK 83-09-08 870105041100 F B SCTMSZ SCTSFA SCTEFA SCTIPL SCTANO SCTTCT SCTCDT SCTPAG J F B SCTNOP SCTPSZ SCTSTB SCTOPT SCTBUG SCTDMT SCTDMI SCTFWT F B SCTNOF SCTNFT SCTFWL SCTBLK SCTDCT
0x120670…120804 Dummy {f00=0x0058, f01=0x0190, f02=»:DS SWB:EL SWB:NS STKEND STKCOM r F B STKMOV ACBIOE ACBSWB ACBSEG ACBNPE ACBMMP ACBMMC ACBLAP , & " ACBLAC ACBSTA ACBREL ACBADA v SEG:FC SEG:NS SEG:ST SEG:DS SEG:EL S
0x120804…120998 Dummy {f00=0x0058, f01=0x0190, f02=» SWB:EL SWB:NS ACBIOE ( ACBSWB < ACBSEG P ACBNPE d ACBMMP x ACBMMC ACBLAP ACBLAC ACBSTA ACBREL ACBADA I
0x120998…120b2c Dummy {f00=0x0058, f01=0x018e, f02=»502 IH2501 IH2502 , ( 0 IHPR01 ` , ( ! r IHPL01 IHPL02 , ( 1 IHLP , (
0x120b2c…120cc0 Dummy {f00=0x0058, f01=0x0190, f02=» f , ( q HALT 8 H SCTMSZ ` SCTSFA t SCTEFA SCTIPL SCTANO SCTTCT SCTCDT , ( @
0x120cc0…120e54 (1, 48) Dummy {f00=0x0058, f01=0x018e, f02=» SCTDMT SCTDMI SCTFWT , SCTNOF @ SCTNFT T SCTFWL h SCTBLK | SCTDCT SCTNOS SCTMXS , ( SCTMOX
0x120e54…120fe8 Dummy {f00=0x0058, f01=0x403a, f02=» $@ 6
0x120fe8…12117c Dummy {f00=0x0058, f01=0x8190, f02=» > @ IDENT DRPL01 REL 11.1 82-08-19 870105041110 F B PLCHRI PLSTBL PLCHRO PLENBL PLDISP PRCHRI PRSTBL PRCHRO F F B PRENBL PRDISP PLTEST CWTPLC GETDWT PLCLOG TIMACT POLRTL F B POLRTR IHPL01 IHPL02 IHPL03 IHPL04 IHP
0x12117c…121310 Dummy {f00=0x0058, f01=0x8190, f02=» , ( ! , * & A INTPL1 , ( a C K * & SO LO
0x121310…1214a4 Dummy {f00=0x0058, f01=0x8190, f02=» LO $GR 0 , ( @ A " PLCHRI R PRCHRI f , ( z DWTLD1 DWTST NDSAV8 , ( ? X P R >W > Y
0x1214a4…121638 Dummy {f00=0x0058, f01=0x8190, f02=» 4(@ X x NDREPO DWTCHP * , ( @ T X # P < , ( 9@ X T P X ! T l , ( U" R Y Y X Y , ( m T Q T T W Q ^ DWTOTQ
0x121638…1217cc Dummy {f00=0x0058, f01=0x8190, f02=» (@ ? X v , ( P T P > T X NDRET F PLENBL V PRENBL j , ( B" T (@ 4 Y > ~ DWTWAT , ( H X P Y X " 2 , ( (@ X
0x1217cc…121960 Dummy {f00=0x0058, f01=0x8190, f02=» Q U ; U 5 U < P * & U > T T T X , ( $ P W P # P Y N , ( B X " U X ~ DWTLD2 PLTEST IHPL01 IHPL02 IHPL03
0x121960…121af4 (1, 49) Dummy {f00=0x0058, f01=0x8190, f02=» IHPR04 INTSAV , ( @ W A T 2 @P P & TDISP V , ( P U " T U f , ( 3 T H U T D&? U " z P , ( Q " T H U , ( o T L
0x121af4…121c88 Dummy {f00=0x0058, f01=0x8190, f02=» h , ( "? T K' T R U " U " FREBLK 8 * & Y J * & " " Y x NDREDW , ( # $ T T R T D , ( ? &? P '? L U "
0x121c88…121e1c Dummy {f00=0x0058, f01=0x8190, f02=» T N Q Q U x , ( " X| U " Y X GETBLK H , ( " Y (@ & Z , ( U B U @ @ U 5 Q U , ( ; U < U > X " P T , ( 1 @T X " P Y
0x121e1c…121fb0 Dummy {f00=0x0058, f01=0x8190, f02=» l MEXIT , ( R D X _ * ?(@ U U , ( U U <P "_ L , ( <P "_ T | , ( D ^ h h ! R NDGEDN , ( : r ) ) t
0x121fb0…122144 Dummy {f00=0x0058, f01=0x8190, f02=» W d U U U U U 4 , ( u U @ $ T U T 0 , ( U T U 6:A U T T ( ` , ( U B U 4 U @ U > U T , ( T T U U T V U U , ( ! R t
0x122144…1222d8 Dummy {f00=0x0058, f01=0x8190, f02=» PLDISP N PRDISP N , ( M (@ T P P ( DWTADR X INTADR j , ( i H R X # X 2 D 4 X | PFPOST , ( T Y U (@ , ( B @ 6 @ T
0x1222d8…12246c Dummy {f00=0x0058, f01=0x8190, f02=» T T h | , ( ; r t , , * & 3 @R X Y X Y L , ( M " P # d X z , ( i _R U , ( X ; r - , - ! T t ,
0x12246c…122600 Dummy {f00=0x0058, f01=0x8190, f02=» j , ( " X U @ U B X U , ( # > U 4 X T T T T : , ( C U > > > & P - j , ( a X " , ( > > @ 6 @ T , ( T U
0x122600…122794 (1, 50) Dummy {f00=0x0058, f01=0x8190, f02=» > X % =A 8 P , ( T > X :i9eW X :a , ( @9 " > ? P ! X " >W P P , ( 1 @ ! ! Y > X :d" ! , ( M W X :d" ! ! Y > , ( i W Q X "? U 4 X "? Q
0x122794…122928 Dummy {f00=0x0058, f01=0x8190, f02=» r > p , ( ! > > > _ Q Q , ( " Q > ? P > > P P @ , ( ! R Q (" W P P V p , ( A Q % W > T NQ T , ( a R L $ T L $ T " P W , (
0x122928…122abc Dummy {f00=0x0058, f01=0x8190, f02=» P < % > P ? 0 ] > , ( > ? 1 ] > > ? 0 , ( W ? ;a<a Q ` PLCLOG V $ ? ;A<A ) _ ;A<A ) > > H D ! ^ , 8 D P
0x122abc…122c50 Dummy {f00=0x0058, f01=0x8190, f02=» E IP& QTd UR c X oTH d H D !E wQ } T( W Q, T X T P, 4 T T T2 H D !h P - /T 9 4 AT ]T cP g h kW o l s N T@ T> l H D ! X T" P W P P X W W P PV P + j MP H D !
0x122c50…122de4 Dummy {f00=0x0058, f01=0x8190, f02=» { P H D ! X . X X 2 l %P4 ) +T. / 1T, =P H D ! ^ O Y X c k X qT y R P P R> X H D !L R % EP MW U ` T T 2 Tz X Tr U RL 2 H D ! < / 1T 5 X 9T I X
0x122de4…122f78 Dummy {f00=0x0058, f01=0xc12a, f02=» y T 2 l P W > P 2 - ;T H D !2 AT [P e s T S T P W -W MW kW P& T T D H D !$ T W Q 'R$ 3W ?V KW ]Q< kT( uT {P W T 4 0 W P W P T P P !W
0x122f78…12310c Dummy {f00=0x0058, f01=0x8190, f02=» > @ IDENT DRLP01 REL 11.0 83-08-03 870105041100 & " LPADR ACLP IHLP LPON DWLP01 F LPADR p ACLP DWTBC , ( T 1 W B DISIOE , ( B P P V
0x12310c…1232a0 Dummy {f00=0x0058, f01=0x8190, f02=» DWTA5 , ( } Q 1 Y DWTA3 H DWTA4 X PFPOST h , ( $ Y Y @ r t @ B z LPON DWTST IHLP INTSAV , ( X$ _, ? X
0x1232a0…123434 (1, 51) Dummy {f00=0x0059, f01=0xc114, f02=» ' r DWLP01 , ( B C X 4 & ! V 5 r H D ! T WP %PD )P 3V I OT UW _P eP m qT uV W2 T R # 4 7 @ B
0x123434…1235c8 Dummy {f00=0x0059, f01=0x40f4, f02=» > @ IDENT PFTAB REL 11.0 81-01-26 870105041100 PFTAB F PFTAB V DC15ON h DC25ON z PLON LPON U @ 15ON P DATA PL
0x1235c8…12375c Dummy {f00=0x0059, f01=0x0190, f02=» > @ IDENT TCLASS REL 11.0 81-01-26 870105041100 TCLASS F TCLASS X DVKB00 l DVDI00 ~ DVDY00 DVG100 , ( $ @ B 0 DVKB01 DVDI01 , (
0x12375c…1238f0 Dummy {f00=0x0059, f01=0x4024, f02=» 9 n > @ 11.0 81-01-26 870105041100 TCLASS F TCLASS X DVKB00 l DVDI00 ~ DVDY00 DVG100 , ( $ @ B 0 DVKB01 DVDI01 , (
0x1238f0…123a84 Dummy {f00=0x0059, f01=0x411e, f02=» > @ IDENT DVDY01 REL 11.0 83-05-05 870105041100 DVDY01 F DVDY01 X DYAD l * & Y | , ( % P E @ N B
0x123a84…123c18 Dummy {f00=0x0059, f01=0xc060, f02=» @ IDENT FILLER FILLER $ FILLER 6 J@ @ d
0x123c18…123dac Dummy {f00=0x0059, f01=0x4148, f02=» > @ IDENT DVG101 REL 11.0 81-01-26 870105041100 DVG101 F DVG101 X GPAD8 l , ( GP | , ( , ( ?
0x123dac…123f40 Dummy {f00=0x0059, f01=0x0190, f02=» > @ IDENT DRPL01 REL 11.1 83-10-20 870105041110 F B PLCHRI PLSTBL PLCHRO PLENBL PLDISP PRCHRI PRSTBL PRCHRO F F B PRENBL PRDISP PLTEST CWTPLC GETDWT PLCLOG TIMACT POLRTL F B POLRTR IHPL01 IHPL02 IHPL03 IHPL04 IHP
0x123f40…1240d4 (1, 52) Dummy {f00=0x0059, f01=0x0190, f02=» , ( ! , * & A INTPL1 , ( a C K * & SO LO
0x1240d4…124268 Dummy {f00=0x0059, f01=0x0190, f02=» LO $GR 0 , ( @ A " PLCHRI R PRCHRI f , ( z DWTLD1 DWTST NDSAV8 , ( ? X P R >W > Y
0x124268…1243fc Dummy {f00=0x0059, f01=0x018e, f02=» 4(@ X x NDREPO DWTCHP * , ( ! P ! T X T X < , ( 9 # P X T l , ( U DP X ! T R Y Y , ( o$ X Y T Q T DWTOTQ
0x1243fc…124590 Dummy {f00=0x0059, f01=0x0190, f02=» PRCHRO , ( ! (@ ? X P T P , ( > T X " T (@ 4 Y H NDRET x PLENBL PRENBL DWTWAT , ( @ > X P Y * & @ X " 2
0x124590…124724 Dummy {f00=0x0059, f01=0x0190, f02=»" P W Q ~ , ( U ; U 5 U < P U > T , ( T T X $ P W N , ( P # P Y X " ( ~ DWTLD2 , ( B U X Y Y PLTEST I
0x124724…1248b8 Dummy {f00=0x0059, f01=0x0190, f02=» IHPR04 INTSAV , ( @ @ ? ^W ? W A T & TDISP V , ( 2 @P P P U f , ( / " T U T H U T D , ( M &? U " z P " , ( k
0x1248b8…124a4c Dummy {f00=0x0059, f01=0x0190, f02=» , ( T X "? T K' , ( T R U " U " Y 8 FREBLK h , ( " z NDREDW , ( %B " Y $ T , ( ? T R T D&? P '?
0x124a4c…124be0 Dummy {f00=0x0059, f01=0x0190, f02=» XT U Q T N | , ( Q Q U " X| U " GETBLK L , ( H Y X " Y (@ ^ , ( @ & U B U @ @ U , ( 5 Q U ; U < U > X " * & 1 @P T T X
0x124be0…124d74 (1, 53) Dummy {f00=0x0059, f01=0x0190, f02=» n MEXIT * & @ ( > A R D X _ , ( * ?(@ U U U U <P L , ( "_ <P "_ | , ( T D ^ , ( h h ! R : r ) ) t
0x124d74…124f08 Dummy {f00=0x0059, f01=0x018e, f02=» U 1W . d U U , ( q U U U 6 U 4 U @ $ 0 , ( T U T U T ` , ( U 6:A U T T ( U B U 4 U , ( @ U > U T T T , ( U U T V U
0x124f08…12509c Dummy {f00=0x0059, f01=0x0190, f02=» PLDISP ^ PRDISP ^ * & M @ 0_P , , ( g (@ T P P R X # Z DWTADR INTADR , ( @ " X 2 D 4 X T Y PFPOST , ( U
0x12509c…125230 Dummy {f00=0x0059, f01=0x0190, f02=» T , ( @ T h ; r * & 3 t , , R X Y P , ( O @ X Y " P # ~ , ( @ i p X , ( @ _R U h ; r
0x125230…1253c4 Dummy {f00=0x0059, f01=0x0190, f02=» W n , ( * Q P " h , ( ! U @ U B X U > U 4 > , ( A h T T T T U > n , ( a > > & P - h , ( " > > @ , (
0x1253c4…125558 Dummy {f00=0x0059, f01=0x0190, f02=» ? t 8 > > X * & % =A 8 P T > X " , ( :i9eW X :a9 " > ? P , ( - P ! X " >W P ! ! Y , ( K > X :d" ! W X , ( e :d" ! ! Y > W Q
0x125558…1256ec Dummy {f00=0x0059, f01=0x0190, f02=»T W ? p , ( @ X #?; L r > ! > > > , ( _ Q Q " Q > ? @ , ( P > > P P R Q p , ( ; (" W P P V Q % , ( [ W > T NQ T R L $ , ( {
0x1256ec…125880 Dummy {f00=0x0059, f01=0x0190, f02=» 1 = > < % 1 > <P < % , ( > P ? 0 ] > > 0 , ( ? 1 ] > > ? W ? ` , ( 9 ;a<a Q ;A<A ) PLCLOG f Y _ ;A<A ) > > H D ! ^ , 8
0x125880…125a14 (1, 54) Dummy {f00=0x0059, f01=0x0190, f02=»R W ^ P W #P 'T 3 5T =P MT. Q UP& ]Td aR H D ! d o h {TH Q T( W Q, T h T P, D T T F H D !Z. T2 P + 9 ;T E D MT iT oP s x wW { | ^ T@ H D ! T> h T" P W P P h
0x125a14…125ba8 Dummy {f00=0x0059, f01=0x0190, f02=» h # 9 h =T A f Y a h e k > sW w v H D ! } * h > h h B | 1P4 5 7T. ; 2 H D !=W =T, IP [ e h o w h }T R P P , , ~ H D ! 4 , R> +R 1 QP YW a l T T B Tz h
0x125ba8…125d3c Dummy {f00=0x0059, f01=0x4158, f02=» T # CRN I b H D !w aP { T B | P W N P # B H D ! = KT QT kP u T S T P W =W ]W {W P& j H D ! T T T W Q # 7R$ CW OV [W mQ< {T( T P < 8
0x125d3c…125ed0 Dummy {f00=0x0059, f01=0xc162, f02=» P j . T ) 7 V = [ H ]P cW g q sP y j H D ! T T P ^ j T p #S - 8 ?T OU P W W D H D ! W W P& 'T 9T UT WW { | Q R$ W V W Q< H D ! P T( T P W T W P #W )P ? j
0x125ed0…126064 Dummy {f00=0x0059, f01=0x0190, f02=» > @ IDENT DRGP02 REL 11.0 83-12-28 870105041100 GPAD8 F , ( [000b [000e [00t [00q 8 V GPAD8 < , ( ! [00w [00v c [5n DWTOR DWTDEV * & A $$ X " X
0x126064…1261f8 Dummy {f00=0x0059, f01=0x0190, f02=» l STABLK GETCHR OUTPUT 0 , ( ! P ! B ENDBLK r , ( P _ ! _, ! , ( ! ! P , ( P !
0x1261f8…12638c Dummy {f00=0x0059, f01=0x018e, f02=» Y Y t , ( S B ! X P ! , ( k ! W ! B , ( @ ! W ! W ! r , ( +XR X $ T _ Y $ Q , ( @ P ! ! ! W , (
0x12638c…126520 Dummy {f00=0x0059, f01=0x0190, f02=» , ( + Y P Y ! & , ( GB ! ! B $ P 4 DWTST d DWTSB2 t * & c YN P Y Y * & } W ! . ! X , ( " P Y " ! Y Y
0x126520…1266b4 (1, 55) Dummy {f00=0x005a, f01=0x018e, f02=» X h Y ! , ( ! [ ! " , ( 5 ! n ! ! R SETIMP * & / X " T A INPUT , ( I A L ! " ! , ( e
0x1266b4…126848 Dummy {f00=0x005a, f01=0x0190, f02=» , ( " 4 X P Y 4! r , ( "$ Y _ Y Y X 4 , ( ," :HR 0 P :h ! Y d , ( B _" X , ! Y , ( # _ 4 :h 0 :C ! 4121518 , ( C 242530333536
0x126848…1269dc Dummy {f00=0x005a, f01=0x0190, f02=» P x H D !z P P P T P / 9PB 4 H D ! j =PT ?WF EP K ] cPN m y {W6 W W T H D !8 Q P W6 R P T 'P. 3 : A
0x1269dc…126b70 Dummy {f00=0x005a, f01=0x4026, f02=» R, P d @ "P x H D !z P P P T P / 9PB 4 H D ! j =PT ?WF EP K ] cPN m y {W6 W W T H D !8 Q P W6 R P T 'P. 3 : A
0x126b70…126d04 Dummy {f00=0x005a, f01=0x018e, f02=» B @ IDENT DRDC15 REL 11.0 DK 83-11-21 870105041100 . * DC15AD IH1501 IH1502 DC15ON DW1500 J DC15AD | DHBB DWTOR , ( 1 X $P % Y $ X " T @ , ( O T A A
0x126d04…126e98 Dummy {f00=0x005a, f01=0x0190, f02=» GETDNA , ( P ] ] V TASCII F , ( ] ] < " P H :H ! X , ( @ D = X B , ( P ] , ( # "P R X ] "
0x126e98…12702c Dummy {f00=0x005a, f01=0x018e, f02=» ! B = ] @ | TDISP , ( { P a A ] ] , , ( B X 2 ECBBA DC:MOT , ( C B P Y GETSNA , ( B B Y
0x12702c…1271c0 Dummy {f00=0x005a, f01=0x018e, f02=» ECBCW1 , ( 'D X P B T Y @ , ( A T X 2 "P T F , ( a X Y 2 ] "_( T P X v , ( @ U Y 2_F B T X 2:D , ( :D :D C , (
0x1271c0…127354 (1, 56) Dummy {f00=0x005a, f01=0x0190, f02=» f DWTOPT , ( X 2 X ECBRL J , ( / " P B Z , ( M X 2 X * ECBEL , ( k T W P C X P GETSSA
0x127354…1274e8 Dummy {f00=0x005a, f01=0x018e, f02=» W W W & > > , L SETIME 0 , ( Q , L X "R P A ( B , ( Y $ W Y $W X " r , ( Z X A ( Y $_. Y $ , ( ; @ T A A X $P y $ , ( [
0x1274e8…12767c Dummy {f00=0x005a, f01=0x0190, f02=» , ( XL P _ 0 )_Z @ Y & , ( _: @ Y &_6 * (P 4 , ( _ ) 1 4 A A A A A d , ( W , ( 7 > . ] ] , ( @ U a 4
0x12767c…127810 Dummy {f00=0x005a, f01=0x0190, f02=» ( . ! ! , ( ] . ! ! ] " P ] $ , ( @ ^ . A A ! T , ( ! T , ( + A . ! ! @ T " , ( K ! _Z ! ] P
0x127810…1279a4 Dummy {f00=0x005a, f01=0x018e, f02=» X ! P t , ( T W @ P ! ! ! n ! N @ , ( @ P & ! ! n A @ T ! _ D * & ( T _ A C t , ( ! @ B B A A A , ( 9 A A ! ! n A _ ! T , ( Y
0x1279a4…127b38 Dummy {f00=0x005a, f01=0x018e, f02=» , ( ( P ! A A ! @ P , ( @ > ! T A ! @ 4 , ( P @ P @ > 8 ! ! A d , ( _: ! X8_` A @ @ T , ( 5 1 T P 2P P P @ P X 2 TEBCDI , (
0x127b38…127ccc Dummy {f00=0x005a, f01=0x0190, f02=» f * & " H *" P X * Y X , ( V ! W X T X *P 6 , ( D $W ! X T X f , ( ! P ! W ! A @ X , ( 0 A A A . ! @ , ( 3 T @ P
0x127ccc…127e60 Dummy {f00=0x005a, f01=0x0190, f02=» n_X /T @ X @ P @ T , ( ! ! A _ A : B A & , ( @ T _2 _6 @ A A V , ( @ X ! XD Y _N "P , ( -P L _ 4 A A H * * & - E A A 4 @ P X
0x127e60…127ff4 (1, 57) Dummy {f00=0x005a, f01=0x0190, f02=» ! T t , ( P P P P P ( , ( 1 A @ ]: _> P _F @ D , ( @ E ! P ! 4 _" t , ( ! 0_p / A T W ,W A , ( # A W W W A A ! , (
0x127ff4…128188 Dummy {f00=0x005a, f01=0x0190, f02=» , ( . ! W 0 " @ P R , ( ~T }T T W ! P 4 , ( @ " ! " :A *@ H T 0 ! d , ( W R ! A @ @ U , ( ! Zx Q P Q T 0 ! A , ( A 0 ! A
0x128188…12831c Dummy {f00=0x005a, f01=0x0190, f02=» P ! 9a D ! P ! , ( P ! T & ! _d ! ! ! ! $ PFPOST T , ( 4 @ ,T ! A 2B 4 f IH1501 INTSAV , ( B A J P 4 @ ,T B 4B J 4 , ( @ A . ? J T A
0x12831c…1284b0 Dummy {f00=0x005a, f01=0x0190, f02=» s @ P R 2B W " P @ P W ] , ( @ " P 2 " P ( 0 , ( " P 1 P A 4 A P ` , ( T ! W " P H *B P ! , ( B X _ _8 ! ! 1 DC15ON , (
0x1284b0…128644 Dummy {f00=0x005a, f01=0x0190, f02=» , ( g 4 A , ( * ! @ t ! A @ t:H T 4 ` 4 d z , ( ) :f"? H ! "? H ! 4 ABC , ( ) DEFGHI[.<(+!&JKLMNOPQR]$*);^-/ST DW1500 * , ( )
0x128644…1287d8 Dummy {f00=0x005a, f01=0x0190, f02=» * H D ! ^ 0 5P ET I M* QT U* Y* ] e* k m o s T 2 H D ! w { J P> ~ H D !] V P P )P( -R^ 9 CP Y
0x1287d8…12896c Dummy {f00=0x005a, f01=0x0190, f02=» T b H D !G P W T P ! ) 1P 7 ; G H D ! K O ] e kT s w yW, P W W W W W W W j H D ! Q R P 2 W> W6 # * ) 2 ; ?* CT G* K* UP H D ! a
0x12896c…128b00 Dummy {f00=0x005a, f01=0x0190, f02=» 2 N H D ! * P * * P * * H D ! T. . T N ! % ) , - r 1 D 5* = A E* GT Q Y V H D !| eP o w * P P, * T( PV T4 RD PB W8 H D ! _ * P 2 * P
0x128b00…128c94 (1, 58) Dummy {f00=0x005a, f01=0x0190, f02=» * * * P * P : * * * P t H D !u T> * * * P P * : * %* ) /* 1T B H D ! ?P CP GP K* OP UP Y* i kP uR. {P T" P V W* T H D ! P W T P W * * * !
0x128c94…128e28 Dummy {f00=0x005a, f01=0x0190, f02=»T0 : . * * * * T * * r H D ! * P P #* '* 3* 7* =* ?P* ER$ OT UP m* q* w * . H D !~ T * * * * * T8 P: PN PP P P4 * * P z H D ! 1 * P * T W W #* '* )W -W 1W 7
0x128e28…128fbc Dummy {f00=0x005a, f01=0x018e, f02=»T T T0 W, ^ H D !O T W R * * * UH -P 3T ; ?* E I* O H D ! Y a i* q* u* y * P T f H D ! T * * P T %T0 )* +T 1P 5* H D !z 7P ;
0x128fbc…129150 Dummy {f00=0x005a, f01=0x4056, f02=» J 4 0 { ;T G p K t O x S | cP * * ) ) ) ) *' . * @@ R I* O H D ! Y a i* q* u* y * P T f H D ! T * * P T %T0 )* +T 1P 5* H D !z 7P ;
0x129150…1292e4 Dummy {f00=0x005a, f01=0x0190, f02=» > @ IDENT DRLP01 REL 11.0 83-11-17 870105041100 & " LPADR ACLP IHLP LPON DWLP01 F LPADR p ACLP DWTBC , ( T 1 W B DISIOE DWTOR , ( D B P
0x1292e4…129478 Dummy {f00=0x005a, f01=0x0190, f02=» 1 ! T V C B Q TENDIO & TDISP 8 DWTA5 H DWTA3 X DWTA4 h , ( D 1 Y Y Y x PFPOST LPON , ( @ r t @ B X$ _, ? DWTST
0x129478…12960c Dummy {f00=0x005a, f01=0x0190, f02=» A B > > > ![[R P ! T &W , ( # !]]T "W % A A B T _8 . , ( ( C A @ B T _J A _r_t ^ DWTECB , ( ( c A > > ?I X ' DWLP01 , ( B C X 4
0x12960c…1297a0 Dummy {f00=0x005a, f01=0x409a, f02=» P H D !- T V W Tr R RJ P T !W 'T8 +W 1 b ( $ 5 B ?T$ E T M b QT w X @ , ( ( c A > > ?I X ' DWLP01 , ( B C X 4
0x1297a0…129934 (1, 59) Dummy {f00=0x005b, f01=0x018e, f02=» B @ IDENT DRDC25 REL 11.0 DK 83-11-21 870105041100 . * DC25AD IH2501 IH2502 DC25ON DW2500 J DC25AD | DHBB DWTOR , ( 1 X $P % Y $ X " T @ , ( O T A A
0x129934…129ac8 Dummy {f00=0x005b, f01=0x0190, f02=» GETDNA , ( P ] ] V TASCII F , ( ] ] < " P H :H ! X , ( @ D = X B , ( P ] , ( # "P R X ] "
0x129ac8…129c5c Dummy {f00=0x005b, f01=0x018e, f02=» ! B = ] @ | TDISP , ( { P a A ] ] , , ( B X 2 ECBBA DC:MOT , ( C B P Y GETSNA , ( B B Y
0x129c5c…129df0 Dummy {f00=0x005b, f01=0x018e, f02=» ECBCW1 , ( 'D X P B T Y @ , ( A T X 2 "P T F , ( a X Y 2 ] "_( T P X v , ( @ U Y 2_F B T X 2:D , ( :D :D C , (
0x129df0…129f84 Dummy {f00=0x005b, f01=0x0190, f02=» f DWTOPT , ( X 2 X ECBRL J , ( / " P B Z , ( M X 2 X * ECBEL , ( k T W P C X P GETSSA
0x129f84…12a118 Dummy {f00=0x005b, f01=0x018e, f02=» W W W & > > , L SETIME 0 , ( Q , L X "R P A ( B , ( Y $ W Y $W X " r , ( Z X A ( Y $_. Y $ , ( ; @ T A A X $P y $ , ( [
0x12a118…12a2ac Dummy {f00=0x005b, f01=0x0190, f02=» , ( XL P _ 0 )_Z @ Y & , ( _: @ Y &_6 * (P 4 , ( _ ) 1 4 A A A A A d , ( W , ( 7 > . ] ] , ( @ U a 4
0x12a2ac…12a440 Dummy {f00=0x005b, f01=0x0190, f02=» ( . ! ! , ( ] . ! ! ] " P ] $ , ( @ ^ . A A ! T , ( ! T , ( + A . ! ! @ T " , ( K ! _Z ! ] P
0x12a440…12a5d4 (1, 60) Dummy {f00=0x012e, f01=0x018e, f02=» X ! P t , ( T W @ P ! ! ! n ! N @ , ( @ P & ! ! n A @ T ! _ D * & ( T _ A C t , ( ! @ B B A A A , ( 9 A A ! ! n A _ ! T , ( Y
0x12a5d4…12a768 Dummy {f00=0x012e, f01=0x018e, f02=» , ( ( P ! A A ! @ P , ( @ > ! T A ! @ 4 , ( P @ P @ > 8 ! ! A d , ( _: ! X8_` A @ @ T , ( 5 1 T P 2P P P @ P X 2 TEBCDI , (
0x12a768…12a8fc Dummy {f00=0x012e, f01=0x0190, f02=» f * & " H *" P X * Y X , ( V ! W X T X *P 6 , ( D $W ! X T X f , ( ! P ! W ! A @ X , ( 0 A A A . ! @ , ( 3 T @ P
0x12a8fc…12aa90 Dummy {f00=0x012e, f01=0x0190, f02=» n_X /T @ X @ P @ T , ( ! ! A _ A : B A & , ( @ T _2 _6 @ A A V , ( @ X ! XD Y _N "P , ( -P L _ 4 A A H * * & - E A A 4 @ P X
0x12aa90…12ac24 Dummy {f00=0x012e, f01=0x0190, f02=» ! T t , ( P P P P P ( , ( 1 A @ ]: _> P _F @ D , ( @ E ! P ! 4 _" t , ( ! 0_p / A T W ,W A , ( # A W W W A A ! , (
0x12ac24…12adb8 Dummy {f00=0x012e, f01=0x0190, f02=» , ( . ! W 0 " @ P R , ( ~T }T T W ! P 4 , ( @ " ! " :A *@ H T 0 ! d , ( W R ! A @ @ U , ( ! Zx Q P Q T 0 ! A , ( A 0 ! A
0x12adb8…12af4c Dummy {f00=0x012e, f01=0x0190, f02=» P ! 9a D ! P ! , ( P ! T & ! _d ! ! ! ! $ PFPOST T , ( 4 @ ,T ! A 2B 4 f IH2501 INTSAV , ( B A J P 4 @ ,T B 4B J 4 , ( @ A . ? J"T A
0x12af4c…12b0e0 Dummy {f00=0x012e, f01=0x0190, f02=» s @ P R 2B W " P @ P W ] , ( @ " P 2 " P ( 0 , ( " P 1 P A 4 A P ` , ( T ! W " P H *B2P ! , ( B2X _ _8 ! ! 1 DC25ON , (
0x12b0e0…12b274 (1, 61) Dummy {f00=0x012e, f01=0x0190, f02=» , ( g 4 A , ( * ! @ t ! A @ t:H T 4 ` 4 d z , ( ) :f"? H ! "? H ! 4 ABC , ( ) DEFGHI[.<(+!&JKLMNOPQR]$*);^-/ST DW2500 * , ( )
0x12b274…12b408 Dummy {f00=0x012e, f01=0x0190, f02=» * H D ! ^ 0 5P ET I M* QT U* Y* ] e* k m o s T 2 H D ! w { J P> ~ H D !] V P P )P( -R^ 9 CP Y
0x12b408…12b59c Dummy {f00=0x012e, f01=0x0190, f02=» T b H D !G P W T P ! ) 1P 7 ; G H D ! K O ] e kT s w yW, P W W W W W W W j H D ! Q R P 2 W> W6 # * ) 2 ; ?* CT G* K* UP H D ! a
0x12b59c…12b730 Dummy {f00=0x012e, f01=0x0190, f02=» 2 N H D ! * P * * P * * H D ! T. . T N ! % ) , - r 1 D 5* = A E* GT Q Y V H D !| eP o w * P P, * T( PV T4 RD PB W8 H D ! _ * P 2 * P
0x12b730…12b8c4 Dummy {f00=0x012e, f01=0x0190, f02=» * * * P * P : * * * P t H D !u T> * * * P P * : * %* ) /* 1T B H D ! ?P CP GP K* OP UP Y* i kP uR. {P T" P V W* T H D ! P W T P W * * * !
0x12b8c4…12ba58 Dummy {f00=0x012e, f01=0x0190, f02=»T0 : . * * * * T * * r H D ! * P P #* '* 3* 7* =* ?P* ER$ OT UP m* q* w * . H D !~ T * * * * * T8 P: PN PP P P4 * * P z H D ! 1 * P * T W W #* '* )W -W 1W 7
0x12ba58…12bbec Dummy {f00=0x012e, f01=0x018e, f02=»T T T0 W, ^ H D !O T W R * * * UH -P 3T ; ?* E I* O H D ! Y a i* q* u* y * P T f H D ! T * * P T %T0 )* +T 1P 5* H D !z 7P ;
0x12bbec…12bd80 Dummy {f00=0x012e, f01=0x4056, f02=» J 4 0 { ;T G p K t O x S | cP * * ) ) ) ) *' . * @@ R I* O H D ! Y a i* q* u* y * P T f H D ! T * * P T %T0 )* +T 1P 5* H D !z 7P ;
0x12bd80…12bf14 (1, 62) Dummy {f00=0x012f, f01=0x4072, f02=» . @ IDENT FILLER DUMMY 84-01-05 FILLER 6 FILLER H @ n&P&X&`
0x12bf14…12c0a8 Dummy {f00=0x012f, f01=0x2008, f02=» L = KMD25 DATE = 81 09 23 1216PACK NBR = 0025
0x12c0a8…12c23c Dummy {f00=0x012f, f01=0x0190, f02=» > @ IDENT I:TRA T,REL=11.0,810128,870137141100 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
0x12c23c…12c3d0 Dummy {f00=0x012f, 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
0x12c3d0…12c564 Dummy {f00=0x012f, 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
0x12c564…12c6f8 Dummy {f00=0x012f, 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
0x12c6f8…12c88c Dummy {f00=0x012f, f01=0x018e, f02=» > @ IDENT I:ERR T,REL=11.0,810128,870137141100 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
0x12c88c…12ca20 Dummy {f00=0x012f, f01=0x0190, f02=» l I:ERR0 I:ERR1 I:ERR2 0 I:ERR3 D I:ERR4 X I:ERR5 l I:ERR6 I:ERR7 , ( W W W W W W W W I:ERR8 I:ERR9 $ I:ERR
0x12ca20…12cbb4 (1, 63) Dummy {f00=0x010f, f01=0x0190, f02=» DATA CHAR s M P DATA CHAR t N P DATA CHAR u N ( P DATA CHAR v N < P DATA CHAR w N P P DATA CHAR x N d P DATA CHAR y N x P DATA CHAR z N P DATA CHAR N P DATA CHAR N P DATA CHAR N P DATA CHAR N P DATA RETURN N P*80 N P
0x12cbb4…12cd48 Dummy {f00=0x010f, f01=0x0190, f02=» DATA RDHOME N P DATA EREOF O P DATA ERINPT O ( P IFT IN:DL=1 O < P DATA INSERT O P P DATA DELETE O d P XIF O x P IFF IN:DL=1 O P DATA RETURN O P DATA RETURN O P XIF O P DATA RESET O P DATA DUP O P DATA FLDMRK O P D
0x12cd48…12cedc Dummy {f00=0x010f, f01=0x0190, f02=»KEYL O P DATA KEYL P P DATA KEYL P P DATA KEYL P 0 P DATA KEYL P B P DATA KEYL P T P DATA KEYL P f P DATA KEYL P x P XIF P P IFF KEYLST=1 P P DATA RETURN P P DATA RETURN P P DATA RETURN P P DATA RETURN P P DATA RETURN
0x12cedc…12d070 Dummy {f00=0x010f, f01=0x0190, f02=» 8 P DATA RETURN FREE LABEL FOR NEW KEY (NOT P. A. KEY) Q 8 P DATA RETURN FREE LABEL FOR NEW KEY (NOT P. A. KEY) Q @ P*FIRST P. A. KEY Q | P IFT OFLIN=1 Q P DATA OFLINE Q P XIF Q P IFF OFLIN=1 Q P DATA RETURN Q P XIF Q P*A0 Q P
0x12d070…12d204 Dummy {f00=0x010f, f01=0x018e, f02=»RN Q P DATA CLEAR R P DATA RETURN R P XIF R 2 P IFT NBRLIN=2 R > P DATA RETURN R T P XIF R h P IFF NBRLIN=2 R t P DATA RETURN R P XIF R P IFT PAX=1 R P DATA PAEX R P XIF R P IFF PAX=1 R P DATA RETURN R P XIF R
0x12d204…12d398 Dummy {f00=0x010f, f01=0x0190, f02=» P DATA PAALFA S P DATA PAALFA S P DATA PAALFA S , P DATA PAALFA S @ P*B0 S T P IFT PFX=1 S ` P DATA PFEX S r P XIF S P IFF PFX=1 S P DATA RETURN S P XIF S P DATA PF 1 S P DATA PF 2 S P DATA PF 3 S P DATA PF 4 S
0x12d398…12d52c Dummy {f00=0x010f, f01=0x0190, f02=»A PF 12 S P DATA PF 13 T P DATA PF 14 T $ P DATA PF 15 T 8 P*C0 T L P DATA PF 16 T X P DATA PF 17 T l P DATA PF 18 T P DATA PF 19 T P DATA PF 20 T P DATA PF 21 T P DATA PF 22 T P DATA PF 23 T P DATA PF 24 T
0x12d52c…12d6c0 Dummy {f00=0x010f, f01=0x0190, f02=»************************************************ T D P* * U 8 B P* CHAR ALPHABETIC AND SPEC. CHAR UPDAT. DISPL. * U B P* * U
0x12d6c0…12d854 (1, 64) Dummy {f00=0x010f, f01=0x0190, f02=»IBUTE MASKL U P* A4= RESERVED V P* A5= RESERVED V * P* A6= RESERVED V @ P* A11= RESERVED V V P* A13= RESERVED V n P* V B P************************************************************** V PCHAR EQU * V $ P LDK A3,/30 LOAD ATTRIBUTE MASK
0x12d854…12d9e8 Dummy {f00=0x010f, f01=0x0190, f02=»****** V X B P* * W B P* NUM NUMERIC UPDAT. DISPL. * W T B P* NUMCOM NUMERIC COMMA * W D P*
0x12d9e8…12db7c Dummy {f00=0x010f, f01=0x0190, f02=»= KEY-CHAR W P* A3= ATTRIBUTE MASK X P* A4= RESERVED X . P* A5= RESERVED X D P* A6= RESERVED X Z P* A11= RESERVED X p P* A13= RESERVED X P* X B P************************************************************* X PNUMCOM EQU * X P LDK
0x12db7c…12dd10 Dummy {f00=0x010f, f01=0x018e, f02=» X P EJECT Y D P*************************************************************** Y D P* * Y ^ D P* ANCOMM COMMON ROUTINE FOR ALPHANUM. CHAR. * Y D P*
0x12dd10…12dea4 Dummy {f00=0x010f, f01=0x0190, f02=» P* Z P* A2= KEY-CHAR Z " P* A3= AT ENTRY ATTRIBUTE MASK Z $ P* A4= REL. CURSOR POS. Z J P* A5= REL. ATTRIBUTE POS. Z h P* A6= ATTRIBUTE CHAR. Z P* A11= CREDIT WORK AREA Z P* A13= RESERVED Z P* Z D P******************************
0x12dea4…12e038 Dummy {f00=0x010f, f01=0x0190, f02=»TE Z t P RF(E) ANC800 YES [ P LDR A1,A6 [ $ P ANR A1,A3 ALLOWED POS. ? [ 6 P RF(NZ) ANC800 NO [ X P IFT IN:DL=1 [ r P LD A1,MODE,A11 INSERT MODE? [ P RF(Z) ANC100 NO [ P CF A14,INSMOD [ P LDR A7,A1 [ P ANK A7,1 INSRETED NORMAL? [
0x12e038…12e1cc Dummy {f00=0x010f, f01=0x0190, f02=» [ P LDR A7,A2 0 P CF A14,STOVDU STORE KEY-CHAR IN VDU BUFFER * P CF A14,WCHAR DISPLAY CHAR AND CURSOR N 8 P CF A14,POSUNP MOVE CURSOR TO NEXT UNPROTECTED POS. | P RF ANC900 PANC800 EQU * P CF A14,ERROR INDICATE ERROR PANC900
0x12e1cc…12e360 Dummy {f00=0x010f, f01=0x0190, f02=» * x @ P* CURMOV MOVE CURSOR ON SCREEN * ] , @ P* * ] p @ P************************************************************ ] P* REGISTERS ]
0x12e360…12e4f4 (1, 65) Dummy {f00=0x00ae, f01=0x0190, f02=» * R J P********************************************************************* PIOACT EQU * ^ P LDK A4,0 r & P LD A1,PRTMOD,A11 SHARED OR LOCAL? P RF(Z) IOAC20 LOCAL " P ADK A4,1 ADD NUMBER OF WAITS 4 P LD A2,ECBBLK+4,A11 REQU
0x12e4f4…12e688 Dummy {f00=0x00ae, f01=0x0190, f02=»,ECBBLK+4,A11 PIOAC10 EQU * P IFT NBRLIN=2 * P ADK A4,1 ADD MORE WAITS @ P LD A2,ECBBLK+6,A11 ALREADY? ` P RF(NZ) IOAC20 YES P IM MAIN,A11 INDICATE LINE 2 P CF A14,TSTMES TEST MESSAGE P ST A8,ECBBLK+6,A11 P XIF
0x12e688…12e81c Dummy {f00=0x00ae, f01=0x018e, f02=» r P ST A8,ECBBLK+2,A11 PIOAC30 EQU * $ & P ST A4,ECBBLK,A11 NUMBER OF WAITS 8 P RTN A14 b P EJECT r J P********************************************************************* J P*
0x12e81c…12e9b0 Dummy {f00=0x00ae, f01=0x018e, f02=» J P********************************************************************* ! PIOCPL EQU * ! R $ P CM MAIN,A11 CLEAR MF FLAG DK39 ! f " P CW A8,ECBBLK+2,A11 INTERTASK? ! P RF(NE) IOCP10 NO ! P CM ECBBLK+2,A11 ! P CF A14,ICPINP MAKE HARDCOPY !
0x12e9b0…12eb44 Dummy {f00=0x00ae, f01=0x0190, f02=» P IFF NBRLIN=2 " P RF(NE) IOCP90 NO FORGET IT " P XIF " > P CM ECBBLK+4,A11 " J P CM MAIN,A11 INDICATE LINE 1 " b P RF IOCP30 " P IFT NBRLIN=2 " PIOCP20 EQU * " " P CW A8,ECBBLK+6,A11 DC LINE 2? " P RF(NE) IOCP90 NO " P CM EC
0x12eb44…12ecd8 Dummy {f00=0x00ae, f01=0x0190, f02=» " P RTN A14 # P EJECT # D P*************************************************************** # & D P* * # n D P* DCPINP DC PRINTER INPUT * # D P*
0x12ecd8…12ee6c Dummy {f00=0x00ae, f01=0x0190, f02=»PINP EQU * # ( P CF A14,ICABOR ABORT LOCAL HARD COPY $ " P LDR A7,A7 ALREADY COMPLETED? $ > P RF(Z) DCP100 NO $ d * P CF A14,ICPINP TAKE CARE OF THAT FIRST $ | PDCP100 EQU * $ P LD A8,ECBDC,A11 $ P IFT NBRLIN=2 $ P LD A1,MAIN,A11 LINE 1 $
0x12ee6c…12f000 Dummy {f00=0x00ae, f01=0x018e, f02=»L A1,/701 OK? $ P RF(NZ) DCP500 NO STOP IT % P XIF % 8 P CF A14,GETBUF GET BUFFER % D P LDR A3,A8 % f $ P CF A14,READW READ FIRST BUFFER % x P ANK A1,3 ERROR? % P RF(NZ) DCP400 NO % P LDR A8,A12 % " P CF A14,RELBUF RELEASE BUFFER %
0x12f000…12f194 (1, 66) Dummy {f00=0x00ae, f01=0x018e, f02=» P RF(Z) DCP450 . =1 & P ORKL A10,LICREC . =1 & PDCP450 EQU * . =1 & < P XIF . =1 & V P LD A1,ECBEL,A8 & h " P ST A1,DCLENG,A11 SAVE LENGTH & * P ST A12,BUFPNT,A11 SAVE BUFFER ADDRESS & P IFT SNA=1 & & P CF A14,GETBUF GET ANOTHER BUFFER
0x12f194…12f328 Dummy {f00=0x00ae, f01=0x0190, f02=» & P IFF SNA=1 ' P LDK A1,0 ' " P CF A14,SETSTA SET DEVICE END ' , P XIF ' R P RTN A14 ' ^ P EJECT ' n D P**************************************************************** ' | D P* * '
0x12f328…12f4bc Dummy {f00=0x00ae, f01=0x018e, f02=» * ' T D P**************************************************************** ( PICPINP EQU * ( T P CF A14,COPP MAKE HARDCOPP ( h , P ST A1,REGI,A11 RETURN CODE TO TERMINAL ( " P CF A14,ICPWRT WRITE INTERTASK ( P RTN A14 ( P EJECT ( F P**********
0x12f4bc…12f650 Dummy {f00=0x00ae, f01=0x0190, f02=» F P* ICPRED INTERTASK READ * ) F P* * ) N F P****************************************************************** ) PICPRED EQU * ) P LD A8,ECBICR,A11
0x12f650…12f7e4 Dummy {f00=0x00ae, f01=0x0190, f02=»+/20 ) " P CF A14,ICREAD READ INTERTASK * P RTN A14 * 2 P EJECT * B H P******************************************************************** * P H P* * * H P* ICPWRT WRITE IN
0x12f7e4…12f978 Dummy {f00=0x00ae, f01=0x0190, f02=»**************************************************** * PICPWRT EQU * + < P LD A8,ECBICW,A11 + P P CF A14,ICSET SET NO TIMEOUT + j P LD A1,ECBICR,A11 + P LD A1,ECBCW,A1 GET TASKID + P RF(Z) ICPW90 NOT THERE + P LDKL A3,REGI RETURN CODE +
0x12f978…12fb0c Dummy {f00=0x00ae, f01=0x0190, f02=»************************************************************* + B P* * , F B P* ICABOR INTERTASK ABORT * , B P*
0x12fb0c…12fca0 Dummy {f00=0x00ae, f01=0x0190, f02=»C,A11 , P LD A8,ECBICR,A11 - P LKM - ( P DATA 10 - 4 P RTN A14 - D P EJECT - T J P********************************************************************* - b J P* * - J P* C
0x12fca0…12fe34 (1, 67) Dummy {f00=0x00af, f01=0x0190, f02=»* - L J P********************************************************************* . P* REGISTERS . X P* . | P* A2= CHAR. . " P* A3= SCREEN BUFFER POINTER . & P* A4= REL. SCREEN BUFFER ADDRESS . P* A5= LINE LENGTH . P
0x12fe34…12ffc8 Dummy {f00=0x00af, f01=0x0190, f02=»A11= TASK BLOCK BASE . P* A13= ECB BASE / P* / 6 J P********************************************************************* / @ PCOPP EQU * . =2 / , P CM REGI,A11 CLEAR EXTRA CHAR. ACCU DK43 / P LD A8,ECBPRT,A11 / & P CM ECBRL,A8 RESET PRINT
0x12ffc8…13015c Dummy {f00=0x00af, f01=0x0190, f02=»ESET LINE COUNTER / P LD A1,WCC,A11 0 P ANK A1,/38 MASK RELEVANT 0 0 P LDR A5,A1 0 R P ANK A1,8 START PRINT? 0 d $ P ABL(Z) COP950 NO FORGET IT =19 0 P SRL A5,4 0 $ P LC A5,LINLEN,A5 GET LINE LENGTH 0 ( P LDR A5,A5 NL,EM AND CR DET. LENGTH?
0x13015c…1302f0 Dummy {f00=0x00af, f01=0x018e, f02=»VDU 0 P ADR A3,A11 1 P IFT BASWRI=1 . =24 1 P LDR A1,A8 . =24 1 < . P LD A8,PRBA,A11 PRINTER BUFFER ADDRESS =24 1 T $ P ST A8,ECBBA,A1 STORE IN ECB =24 1 , P AD A8,PRLMAR,A11 ALLOW LEFT MARG/CR =25 1 6 P CM PRCCCT,A11 CLEAR BUFFER CHARACTER COUN
0x1302f0…130484 Dummy {f00=0x00af, f01=0x0190, f02=» 1 P XIF . =24 2 P SUR A9,A9 2 P LDK A2,0 2 . P LDK A4,0 2 @ P SUR A10,A10 RESET STATUS 2 R PCOP200 EQU * 2 t P CWK A4,LBVDU ALL PRINTED? 2 P RF(NL) COP850 YES 2 P CWR A9,A5 LINE FULL? 2 P RF(L) COP400 NO 2 P CF A14,PRLINE
0x130484…130618 Dummy {f00=0x00af, f01=0x0190, f02=»/FF 2 P RF(Z) COP650 NULL CHAR. 3 P CCK A2,/8000 ATTRIBUTE? 3 , P RF(L) COP500 NO 3 L P LDR A6,A2 GET NEW ATTRIBUTE 3 d P RF COP650 3 PCOP500 EQU * 3 P CCK A2,/2020 ORDER? 3 P RF(L) COP550 YES 3 * P ANKL A10,/FFFF-CRREC RESET CR RCV =
0x130618…1307ac Dummy {f00=0x00af, f01=0x0190, f02=»RINTER ERROR? 3 P RF(NZ) COP900 YES 4 P LDR A1,A10 GET STATUS 4 0 P RF(N) COP800 GET NEXT CHAR. 4 N P SLL A1,1 4 r P RF(N) COP850 END 4 PCOP600 EQU * 4 P LDR A1,A6 CHECK IF NONPRINT 4 P ANK A1,/C 4 P XRK A1,/C 4 P RF(Z) COP650
0x1307ac…130940 Dummy {f00=0x00af, f01=0x0190, f02=» PCOP700 EQU * 5 P IFF TRANAT=0 . =4 5 * P LC A2,CONNAT,A2 TRANSFORM NAT.CHAR =4 5 2 P XIF . =4 5 ` P IFT P6883=1 5 r 2 P CF A14,DKEDIT CONVERT CHARS. FOR 6883 PRINTER 5 P XIF 5 P SCR A2,A8 5 P ADKL A9,1 5 P ADKL A8,1 5 P CCK A
0x130940…130ad4 (1, 68) Dummy {f00=0x00af, f01=0x0190, f02=»MULATED SI'S AND SO'S 5 x ( P CM REGI,A11 CLEAR THE ACCUMULATOR 6 2 P ST A9,ECBRL,A1 UPDATE LAST POS. NOT SPACE =3 6 J PCOP800 EQU * 6 2 P ANKL A10,/FFFF-NXTCHA RESET TAKE NEXT CHAR =3 6 P ADK A3,1 6 P ADK A4,1 6 P RB COP200 6 PCOP850 E
0x130ad4…130c68 Dummy {f00=0x00af, f01=0x0190, f02=»AST LINE 6 z P ANKL A10,ENDPRT END MESS.? 7 P RF(Z) COP900 NO STOP IT 7 4 ( P ORKL A10,NTONLY INDICATE PRINTABLE 7 T " P CF A14,PRLINE EXTRA LINE FEED 7 P XIF . =24 7 P IFT BASWRI=1 . =24 7 , P LDR A9,A9 SOME TEXT LEFT TO PRINT? =24 7 P R
0x130c68…130dfc Dummy {f00=0x00af, f01=0x018e, f02=» MESS. DK38 7 | P ANKL A1,ENDPRT DK38 8 P RF(Z) COP870 DK38 8 2 2 P ANKL A10,NOEMLF TEST IF EXTRA LF NECESS. DK38 8 N $ P RF(NZ) COP870 NO, SKIP IT DK38 8 , P ORKL A10,NTONLY INDICATE PRINTABLE =24 8 & P CF A14,PRLINE EXTRA LINEFEED =24 8 P X
0x130dfc…130f90 Dummy {f00=0x00af, f01=0x018e, f02=» 8 PCOP900 EQU * 9 P LDR A1,A1 PRINTER FAILED? 9 P RF(Z) COP950 NO 9 > P LD A2,WCC,A11 . =32 9 V $ P CWK A2,/38 LOCAL HARDCOPY? =32 9 r ( P RF(E) COP910 YES. SKIP PRINTING =32 9 PCOP902 EQU * 9 2 P CF A14,TSTPRT WAIT UNTIL PRINTER OPERABLE =
0x130f90…131124 Dummy {f00=0x00af, f01=0x0190, f02=» P DATA 6 : P RB COP902 : PCOP905 EQU * : ( " P ABL COPP RESUME PRINTING =34 : > PCOP910 EQU * . =32 : d " P LDKL A2,PRTERR INDICATE ERROR : ~ P ORS A2,PRTMOD,A11 : PCOP950 EQU * : P RTN A14 : P EJECT : P IFT P6883=1 : P
0x131124…1312b8 Dummy {f00=0x00af, f01=0x0190, f02=»O INSERTS 'OF' AND '0E' CHARS. : P* TO SELECT OPTIONAL ROM.... ; & P* ; J PDKEDIT EQU * ; T " P LDR* A1,A11 GET TASK ID DK43 ; j P CWK A1,'L1' 6883 PRINTER? ; P RF(NE) DKED90 NO, SKIP IT ; P CCK A2,/5D SPECIAL ? ; P RF(NE) DKED10 NOT Y
0x1312b8…13144c Dummy {f00=0x00af, f01=0x0190, f02=»DKED20 NOT YET ; P LDK A2,/25 REPLACE < P RF DKED80 < 4 PDKED20 EQU * < H P CCK A2,/5C SPECIAL? < ^ P RF(NE) DKED30 NOT YET < z P LDK A2,/26 REPLACE < P RF DKED80 < PDKED30 EQU * < P RF DKED90 NOTHING SPECIAL < P* <
0x13144c…1315e0 Dummy {f00=0x00af, f01=0x0190, f02=»ERT CORRECTED CODE < P ADKL A8,1 UPDATE POINTER = " P LDK A2,SI SHIFT IN TO BUFFER = > * P* LET OLD CODING INSERT IT IN BUFFER = d & P LDK A1,2 ACCUMULATE EXTRA CHARS. = P ADS A1,REGI,A11 = PDKED90 EQU * = P RTN A14 = P XIF =
0x1315e0…131774 (1, 69) Dummy {f00=0x00b7, f01=0x0190, f02=»1 ORDER = 07 P RF(E) ACLP07 YES PACERR ABL DISIOE . P* F $ P LDK A1,/05 REPLACE ORDER IN DWT P P SC A1,DWTOR+1,A6 x ( P LDKL A1,IHLP50 CHANGE BRANCH ADDR. & P ST A1,IHLPXX IN INTERRUPT HANDLER " P RF ACLP30 PROCESS AS ORDER 5
0x131774…131908 Dummy {f00=0x00b7, f01=0x0190, f02=» A2,2 YES , SAME ACTIONS AS FOR REQ. LENGTH=2 P* 6 PACLP12 EQU * @ P LDR A3,A4 BUFFER ADDRESS T & P ADR A3,A2 ADDED WITH REQ. LENGTH v $ P SCR A1,A3 STORE PRINT CHARACTER P ADK A2,1 P LCR A3,A4 P ECR A3,A3 & P LC A3,1,A
0x131908…131a9c Dummy {f00=0x00b7, f01=0x0190, f02=» $ P SUK A2,2 DECREMENT REQ. LENGTH & P ADK A4,2 INCREMENT BUFFER ADDRESS , P RF ACLP30 V P* h PACLP15 LDK A1,/0A LINE FEED r * P SC A1,1,A4 SECOND CHARACTER IN BUFFER P SUK A3,5 TWO LINE FEEDS ? P RF(E) ACLP20 YES P LDK A1,
0x131a9c…131c30 Dummy {f00=0x00b7, f01=0x0190, f02=»1 P* P* 4 PACLP20 SCR A1,A4 STORE FIRST CHARACTER IN BUFFER $ PACLP30 CF A5,CIOSTA SEND BUFFER V P SUK A7,6 ORDER 6 ? ~ P RF(NE) ENDIO P LDR A2,A2 P RF(NN) ACLP35 4 P IM 6,A8 ADD FOR EXTRA CHAR. AT BUFFER END (/0D)
0x131c30…131dc4 Dummy {f00=0x00b7, f01=0x0190, f02=»L CHARACTER IN BUFFER x P ECR A3,A3 $ P SCR A3,A4 ALSO RESET FIRST BYTE 0 P* X $ PENDIO CF A15,TENDIO END REQUEST b PEXIT ABL TDISP P* P EJECT DRLP01 P* P* P* CIOSTA " P* SUBROUTINE TO SEND BUFFER
0x131dc4…131f58 Dummy {f00=0x00b7, f01=0x0190, f02=»=1 p . P ST A1,DWTA3,A6 END OF BUFFER INDICATOR =1 & P ST A4,DWTA4,A6 BUFFER POINTER =1 < P XIF =1 f 6 P ORKL A2,/4000 INDICATE CHARACTER MODE, OUTPUT AND x P IN RIGHT BYTE NUMBER OF P CHARACTERS TO SEND 0 P WER A2,MUXLP FIRST WR
0x131f58…1320ec Dummy {f00=0x00b7, f01=0x018e, f02=»PENDING | P CIO A2,1,DWALP CIO START P RB(Z) EXIT 2 P LDK A1,1 ERROR F P RB ENDIO ^ P* p P EJECT DRLP01 z P* P* P* RECOVERY ROUTINE P* P* PLPON EQU * P IFT CPU852=1 & P CF A15,
0x1320ec…132280 Dummy {f00=0x00b7, f01=0x0190, f02=» P LDK A1,1 NOT OPERABLE P LDKL A6,DWLP01 DWT ADDRESS " P LD A2,DWTST,A6 DWT STATUS F P RB(N) EXIT LP FREE h P RF IHLP30 P* P EJECT DRLP01 P* P* P* I N T E R R U P T P* P* PIHLP EQU *
0x132280…132414 (1, 70) Dummy {f00=0x0132, f01=0x0190, f02=» @ " 9a @ $ 3 V : @ 9 @ 9 9@ @ " :HP @ x U W 9 9@ @ $P$ @ ( ;A 9@T 9 9@ x 9 : P P 9@T 9 9@ _* :! )R @R P FQ ! : N PD !
0x132414…1325a8 Dummy {f00=0x0132, f01=0x0190, f02=» : &=H F : F =H F : ? ? @ > > : P N =H N T 0 _ : @ ! P (W ( : @ 0 P 0 _ @ Q @ P P$_ @ A P A P _ Q @ Q 1 a : @ * PF J # P
0x1325a8…13273c Dummy {f00=0x0132, f01=0x0190, f02=» .X @ P T :D * J TT J & P T .& >aW T (& P T &@P @ 9 A J ] W @ 9 A P _d @ 8P 0P _ 1 _ @ 8P 9 _ (T P _ 3 _ : @ @ T : dR
0x13273c…1328d0 Dummy {f00=0x0132, f01=0x0190, f02=» A A r : @ A P t @ A @ @ : . ! T ! . : R Y : t N b ) @ A R A V A CR |T @ T DW @ $ @ A 6 @ A 8
0x1328d0…132a64 Dummy {f00=0x0132, f01=0x0190, f02=»T K W8 2 " T @ X 2 N =H N @ R ) !TTXX !CCT !UUT 4 @ R K (9A A R @ @ 2 .:H N R P V _ N R :h$ @ R S YT : @ R @ A >
0x132a64…132bf8 Dummy {f00=0x0132, f01=0x0190, f02=» H K @ & " A ( J (P6 " 4X 1 R Z0 . . _ k k :A K J 4 P . . _ K K @ @ R @ : @ D @ @ F @ > A b @ r @ p A r b A
0x132bf8…132d8c Dummy {f00=0x0132, f01=0x0190, f02=» V ;k , @ 6T A , @ 8P( U U A , K l A A J @ & A @ . 9k! P % _ @ @ A A A A J F ` ) K @ < G F `
0x132d8c…132f20 Dummy {f00=0x0132, f01=0x0190, f02=» _ J PJ F I H I $ @ < D ` E , D H C ` J j A X A N (Pn @ X A X % R , F " E R A N R R P R Xv _|W T : r A J _ A L
0x132f20…1330b4 (1, 71) Dummy {f00=0x0132, f01=0x0190, f02=» H ` E #_ A * @ & 9k l $ A A J ` ( ` A ( J $ K . J J V V (P V j $ $ A 1 I $ I H ) P _ " = D 4 Q _l 1 = G $ b
0x1330b4…133248 Dummy {f00=0x0132, f01=0x0190, f02=»T2 @ A 6 @ A 8 @ @ :B A @ 9n A 0 @ @ ,P J V @ 8 A @ 6 A A , K : @ "<B A T *P ` P ` : $ F @ *P ` a P ` : @ P $ @ @ $ F @ P M : 4 A 0 @ " R RV > R
0x133248…1333dc Dummy {f00=0x0132, f01=0x0190, f02=» _ @ . : " D PH A . @ .P. D X D P H E _( F E _6 " D T E F E D E % : 4 " R ;B 4 F " R P< *P ` @ @ B B ` 4 : @ "P 9a _ "
0x1333dc…133570 Dummy {f00=0x0132, f01=0x0190, f02=» - I Y0 : @ : R r 2 A B @ (T : N @ @ A Z H @ "]" T 2 . BT" A H A B @ NP A J . v . Z ._v J , V P _ N L % J J ` G G ` U ` G ` : P
0x133570…133704 Dummy {f00=0x0132, f01=0x0190, f02=» B ; Z [ : : [ [ : A Z A. c ? : > : R $ )_ : A A A ~ QF @ @ ` x A @ @ ` p R0
0x133704…133898 Dummy {f00=0x0132, f01=0x0190, f02=» _ V ` Z K A A :K A Q R V . @ P @ ` : V W V ) : V W @ : A ; @ : : , X G : " L @ V @ 0 H A
0x133898…133a2c Dummy {f00=0x0132, f01=0x0190, f02=»_" : P _ : @ | ` |U WP L P _ @ P _" l 0 W r P . ! A . @ : ;h 0 :C # : .=H N .=H N N : d 8" R _ ZY QY : L ?
0x133a2c…133bc0 Dummy {f00=0x0132, f01=0x0190, f02=» P P P P _ _ @ @ :b @ :b V W U4 T 9BW P P( X V W Y P @ Q @ P A. @ @ P _l A 9n A :B A @ | < | P: N P4 9b .V 3 S S
0x133bc0…133d54 (1, 72) Dummy {f00=0x0132, f01=0x0190, f02=» Y P: P4 S @ P 3 _ 3 | Z A. @ @ W A h : A $ ) _ > . 8 F @ v B 0 1 ! j A @ v B d ! j R h P j
0x133d54…133ee8 Dummy {f00=0x0132, f01=0x0190, f02=» B[^DC @ r KB V 0 B B F DI ?O_o N Y
0x133ee8…13407c Dummy {f00=0x0132, f01=0x0190, f02=» @ r KB 0 F DI ?O_o B vDC V
0x13407c…134210 Dummy {f00=0x0132, f01=0x0190, f02=»
[…0x4…]
0x134860…1349f4 (1, 73) Dummy {f00=0x0133, f01=0x018e, f02=»ECK SPECIAL ATTRIBUT P RF(NE) TRT104 P LDK A2,/30 2 PTRT104 EQU * F P CF A5,WRITEP SEND ATTRIBUTE Z P ADK A3,1 ~ P RF TRT110 PTRT105 EQU * P XIF P EJECT P IFF TPMODE=1 P CWK A2,/07 ( P RF(L) TRT110
0x1349f4…134b88 Dummy {f00=0x0133, f01=0x0190, f02=» & P LD A1,FECBRL GET REQUESTED LENGTH P CW A1,FBAX . " P RF(NG) TRT130 END OF MESSAGE B * P ADK A3,1 INCREMENT CHARACTER COUNTER h P CWK A3,TBLEN P IFT TPMODE=1 P RB(L) TRT105 NOT FULL BLOCK P XIF P RB(L) TRT100 NOT FULL
0x134b88…134d1c Dummy {f00=0x0133, f01=0x0190, f02=»1,A4 P RF(NE) TRT116 NO SEND ETB ( P LCR A2,A4 GET FIRST BYTE AFTER SBA . P ADK A4,1 INREMENT POINTER Z P CF A5,WRITEP SEND IT | P IM FBAX INCREMENT INDEX . PTRT115 LCR A2,A4 GET SECOND BYTE AFTER SBA P CF A5,WRITEP SEND IT
0x134d1c…134eb0 Dummy {f00=0x0133, f01=0x0190, f02=»DLE t P XIF P LDK A2,ETB LOAD ETB PTRT120 EQU * 4 P IFT TPMODE=1 H P CM TPM ^ P XIF n P CF A5,WRITEP SEND IT z P IFF CODE=1 P LDR A2,A8 GET LRC P CF A5,WRITEP SEND LRC P XIF P IFT CODE=1 P LDR
0x134eb0…135044 Dummy {f00=0x0133, f01=0x0190, f02=» " P CF A5,WRIT05 SEND CRC BYTE 2 P XIF * P IFT STTSTS=1 6 P* L P* V " P* COUNT MESSAGES TRANSMITTED ` P* P LDK A1,CSSTBL P CF A15,DCSUPS P XIF P ABL TRRE10 HALT OUTPUT PTRT130 EQU * P IM XETX IND
0x135044…1351d8 Dummy {f00=0x0133, f01=0x0190, f02=»TX ~ P RB TRT120 SEND ETX AND LRC P EJECT . P* < P* F P* TRANSMIT STATUS MESSAGE P P* r P* | P IFF STARVI=0 PTRSTA EQU * $ P IM XSTA INDICATE 'STATUS SENT' P ST A6,FDWTUT SAVE A6 P CF A5,TRSYNC STAR
0x1351d8…13536c Dummy {f00=0x0133, f01=0x0190, f02=» z P LDK A2,'R' P CF A5,WRITEP SEND 'R' P LDK A2,STX : P CF A5,WRITE SEND STX N P LDR* A2,A7 l P CF A5,WRITEP SEND TCA " P LD A4,FDWTUT GET DWT-ADDRESS ( P LDR* A2,A4 GET NETWORK SUB-ADDRESS P CF A5,WRITEP SEND STA
0x13536c…135500 Dummy {f00=0x0133, f01=0x0190, f02=»A5,WRITEP SEND S/S 0 P LDK A2,NOIR PRELOAD S/S 1 P LD A1,DWTST,A4 GET STATUS > P ANK A1,5 ` P RF(Z) TRST10 NOT 'IR' r P ANK A1,4 P RF(NZ) TRST10 NO IR IF DE P LDK A2,IR PTRST10 EQU * P CF A5,WRITEP SEND S/S 1
0x135500…135694 (1, 74) Dummy {f00=0x00a9, f01=0x018e, f02=» @ @ A , ( ! P A @ , ( ! @ $ A A @ P , ( H @ @ E E E E E , ( 9A A & E @ F CRP , ( U <A COP <A BAP AS<A E ASP
0x135694…135828 Dummy {f00=0x00a9, f01=0x0190, f02=» , ( F ;j , ( Y P F P 4 , ( @ P - P _ d , ( :L E A W , ( F D AST =l R , ( ? W R Q
0x135828…1359bc Dummy {f00=0x00a9, f01=0x0190, f02=» :L AST , ( A A E E A A " , ( 8 P W 89B @ V R , ( $ W Zb A @ @ , ( A A @ D , ( # B AS @ A
0x1359bc…135b50 Dummy {f00=0x00a9, f01=0x0190, f02=» _H r , ( S W , ( Y* B , ( H @ @ A @ r , ( L P , ( :l 9b ) , (
0x135b50…135ce4 Dummy {f00=0x00a9, f01=0x0190, f02=» m U 8 !RRT A SCTNOP 0 , ( $ " @ P A A " @ > B , ( V T P T r , ( ;a=a?j V Y R W , ( ?J E =A;A E PUS
0x135ce4…135e78 Dummy {f00=0x00a9, f01=0x0190, f02=»" A @ A @ * & M E A @ V @ * & e @ P , . A N , ( } @ @ A A | , ( , (
0x135e78…13600c Dummy {f00=0x00a9, f01=0x0190, f02=» l , ( 3 _ 0 !TTX A 8 !CCT CC A , ( S _ 0 !;; !AAP !DDT < , ( sI @ @ A 6 0_ ; # l , ( H @ @ @ I A , ( P T , ( TT
0x13600c…1361a0 Dummy {f00=0x00a9, f01=0x0190, f02=» T @ " A @ @ @ MOVE , , ( / I A ( A < SCTMXS l , ( IA @ A @ ~ SYSLDM , ( c $ *P @ A * @ , , ( y $ ) @
0x1361a0…136334 (1, 75) Opaque[0x194]
0x136334…1364c8 # DirEnt {nam=»SCLASS«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0e20, f03=0x0000}
0x136334…1364c8 IdxSect {
0x136334…1364c8 f00 = 0x0071 // 0x136334 @0x0
0x136334…1364c8 f01 = 0x0002 // 0x136336 @0x2
0x136334…1364c8 gno = [ // 0x136338 @0x4
0x136334…1364c8 [0x00]: C0x0071.0x0.0
0x136334…1364c8 ]
0x136334…1364c8 }
0x1364c8…13665c Dummy {f00=0x0071, f01=0x0190, f02=» 4 P IDENT SCLASS REL 11.0 DK 82-04-14 870105041100 P < P* D P* N P ENTRY SCLASS X P* n P* x P EXTRN DWII01 P EXTRN DWIO01 P EXTRN DW1501 P EXTRN DW2501 P EXTRN DWLP01
0x13665c…1367f0 Dummy {f00=0x0071, f01=0x0190, f02=»LASE EQU * PTC00 DATA TC00E-* P DATA /0050 4 P DATA DWII01 T P DATA /0051 t P DATA DWIO01 P DATA /0061 P DATA DW1501 P DATA /0062 P
0x1367f0…136984 Dummy {f00=0x0071, f01=0x4022, f02=»QU * P END @ TC00E-* P DATA /0050 4 P DATA DWII01 T P DATA /0051 t P DATA DWIO01 P DATA /0061 P DATA DW1501 P DATA /0062 P
0x136984…136b18 Dummy {f00=0x0071, f01=0x2008, f02=» NT TCLASS * * $ * . ENTRY TCLASS 8 * N * X * b * l * v * * TCLASS DATALTCLASE-* TCLASE EQU * END @ 1 INTLT2 INTRT1
0x136b18…136cac Dummy {f00=0x0071, f01=0x0190, f02=» P G 2 P T R T eP H D ! P P P@ T T " " " P& %P +P 1P 7P < H D ! =P CP EW IW O SP UW [ gT sR yU R Q T H D ! 0 TV T Q0 R* P P 9 A
0x136cac…136e40 Dummy {f00=0x0071, f01=0x416a, f02=» W YP ] a mTd qW l H D ! T T( P W W J V S PN TD T> Tp P P( ( H D !) 'T MTr i yTF S W V W, Q( T W& T R P t H D ! ) N T #R )U =T K J YV eP wP {W T P T
0x136e40…136fd4 (1, 76) Opaque[0x194]
0x136fd4…137168 # DirEnt {nam=»MONTAB«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0b70, f03=0x0000}
0x136fd4…137168 IdxSect {
0x136fd4…137168 f00 = 0x005b // 0x136fd4 @0x0
0x136fd4…137168 f01 = 0x0002 // 0x136fd6 @0x2
0x136fd4…137168 gno = [ // 0x136fd8 @0x4
0x136fd4…137168 [0x00]: C0x005b.0x2.0
0x136fd4…137168 ]
0x136fd4…137168 }
0x137168…1372fc Dummy {f00=0x005b, f01=0x018e, f02=» 2 P IDENT MONTAB REL 11.0 81-05-27 870105041100 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
0x1372fc…137490 Dummy {f00=0x005b, f01=0x0190, f02=» P EXTRN CTAB01 P EXTRN CTAB02 P EXTRN ITAD 0 P D P L P T P P d P l P EXTRN KBAD4 t P EXTRN TPAD P EXTRN GPAD P EXTRN DNAD P EXTRN DIAD P EXTRN DYAD P EXTRN MSAD P EXTRN O
0x137490…137624 Dummy {f00=0x005b, f01=0x018e, f02=»XTRN TPAD4 P P P " P * P**** 2 P DATA CTAB01 > P DATA CTAB02 T P DATA ITAD j P ~ P P P PMONTAB EQU * PFREQUE DATA 0 PPAGQUE DATA 0,0 P P P P P P
0x137624…1377b8 Dummy {f00=0x005b, f01=0x40a6, f02=» P P P P P ( P 0 P DATA KBAD4 8 P DATA DIAD L P DATA DYAD ^ P DATA GPAD8 p P* P P END @ QU * PFREQUE DATA 0 PPAGQUE DATA 0,0 P P P P P P
0x1377b8…13794c Dummy {f00=0x005b, 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
0x13794c…137ae0 Dummy {f00=0x005b, f01=0x0190, f02=»O FREE FWT AVAILABLE D P LDKL A4,/8400 RETURN CODE E P RF ER:RTN E > P* E P POP:040 EQU * FILE ATTACHED E Z P LDK A4,/40 RETURN CODE E | P* E PER:RTN EQU * E & P ORS A4,RETCOD PREPARE RETURN CODE E P ABL FMEXIT RETURN E P* E P
0x137ae0…137c74 (1, 77) Opaque[0x194]
0x137c74…137e08 # DirEnt {nam=»TDISP «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0b78, f03=0x0000}
0x137c74…137e08 IdxSect {
0x137c74…137e08 f00 = 0x005b // 0x137c74 @0x0
0x137c74…137e08 f01 = 0x0008 // 0x137c76 @0x2
0x137c74…137e08 gno = [ // 0x137c78 @0x4
0x137c74…137e08 [0x00]: C0x005b.0x3.0
0x137c74…137e08 [0x01]: C0x005c.0x0.0
0x137c74…137e08 [0x02]: C0x005c.0x1.0
0x137c74…137e08 [0x03]: C0x005c.0x2.0
0x137c74…137e08 ]
0x137c74…137e08 }
0x137e08…137f9c Dummy {f00=0x005b, f01=0x0190, f02=» 0 P IDENT TDISP REL 11.0 81-01-26 870105041100 P 8 P* @ P* J 6 P************************************************** T P* $ P* PHILIPS TERMINAL SYSTEM PTS P* P* TDISP = TOSS DISPATCHER P* 6 P****************
0x137f9c…138130 Dummy {f00=0x005b, 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.
0x138130…1382c4 Dummy {f00=0x005b, 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
0x1382c4…138458 Dummy {f00=0x005b, 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
0x138458…1385ec Dummy {f00=0x005b, 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
0x1385ec…138780 Dummy {f00=0x005b, f01=0x0190, f02=» P************* P* P* ( P EXTRN ACTOT ACTIVATE TASK 2 P EXTRN TTB:AP ACB ADDRESS T P EXTRN TTB:SA SAVE AREA v P EXTRN TTB:ST STATUS & P EXTRN TTB:PW PROGRAM STATUS WORD P EXTRN TTB:MT MMUTAB & P EXTRN TTB:CB CU
0x138780…138914 (1, 78) Dummy {f00=0x005c, f01=0x0190, f02=» ADDRESS ~ . P EXTRN PAG:QB PAGE QUEUE BACKWARD POINTER P EXTRN TENDIO END I/O B P EXTRN EXIT PROGRAM EXIT ` 2 P EXTRN QLTDSK ACTIVATE LDTASK AT ENTRY LT:DSK , P EXTRN QTJOB QUEUE TASK FOR DISPATCHING . P EXTRN ACBLAP LOGICAL ADDRESS OF C
0x138914…138aa8 Dummy {f00=0x005c, f01=0x0190, f02=» . P***************************************** P* : P* CONDITIONAL ASSEMBLY D P* b . P***************************************** l P* . P* A PROGRAM VERSION USING TOSS MMU PAGING * P* IS OBTAINED BY SETTING MMUPAG EQU 1. P
0x138aa8…138c3c Dummy {f00=0x005c, f01=0x0190, f02=» CPU852 EQU 0. t P* PCPU852 EQU 0 P* 4 P* > . P* A PROGRAM VERSION USING TOSS DISC PAGING H * P* IS OBTAINED BY SETTING DSKPAG EQU 1. z P* PDSKPAG EQU 0 P* P* @ P* A PROGRAM VERSION PREVENTING SEGMENTS TO MOV
0x138c3c…138dd0 Dummy {f00=0x005c, f01=0x0190, f02=» 1. ` P* PDIFPRI EQU 0 P* * P EJECT TDISP 4 P* J P* D I S Q U E T P* l 2 P* POINTER TO FIRST TASK IN DISPATCHER QUEUE v P* PDISQUE DATA 0 P* P* P R U N P* $ P* TTAB ADDRESS OF
0x138dd0…138f64 Dummy {f00=0x005c, f01=0x0190, f02=»EGISTERS FROM STACK AND RETURN P* & PRETUR8 EQU * 0 P D P IFT CPU852=0 L P MLR 8,A15 b P XIF t P P IFT CPU852=1 P LDR* A8,A15 P LDR* A7,A15 P LDR* A6,A15 P LDR* A5,A15 P LDR* A4,A15 P LDR*
0x138f64…1390f8 Dummy {f00=0x005c, f01=0x0190, f02=»M E X I T, M E X I T, T E X I T P* ( 2 P* DO EXIT ON (MONITOR) TASK AND GO TO TDISP 2 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 C
0x1390f8…13928c Dummy {f00=0x005c, f01=0x018e, f02=» PACTDIS CF A15,ACTOT P RF TDISP P EJECT TDISP 2 P H P* P P* D I S I O E Z 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*
0x13928c…139420 Dummy {f00=0x005c, f01=0x0190, f02=» & P* PAUSE TASK (I. E. GO TO TDISP) P* . PTPAUSE EQU * 8 P EJECT TDISP L P* b P* T D I S P l P* $ P* THIS IS THE DISPATCHER ENTRY P* PTDISP INH & P LC A1,18,A15 LOAD PSW FROM STACK P ANK A1,/FC
0x139420…1395b4 (1, 79) Dummy {f00=0x005c, f01=0x0190, f02=»DKL A2,DISQUE P LDR* A3,A2 P RB(Z) RETUR8 QUEUE EMPTY * P L P LD A5,PRUN T $ P RF(Z) TDCQ10 IDLE LOOP RUNNING h & P LD A4,TTB:ST+1,A5 COMPARE RUNNING 4 P CC A4,TTB:ST+1,A3 AND QUEUED TASK'S PRIORITIES * P RB(NG) RETUR8 RUNNING
0x1395b4…139748 Dummy {f00=0x005c, f01=0x0190, f02=»D A1,TTB:SB,A3 GET SEGMENT BLOCK ADDR P RF(Z) TDISSW NONE . P LDR* A7,A1 H 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*
0x139748…1398dc Dummy {f00=0x005c, f01=0x0190, f02=»IDLE LOOP P . P ADK A6,0 QUEUE OLD TASK FIRST ON PRIORITY P RF(Z) TDSW20 EMPTY QUEUE L 0 PTDSW10 CC A4,TTB:ST+1,A6 COMPARE PRIORITIES n 0 P RF(NG) TDSW20 SAME OR LOWER PRIORITY FOUND P LDR A2,A6 P LDR* A6,A2 , P RB(NZ) TDSW
0x1398dc…139a70 Dummy {f00=0x005c, f01=0x0190, f02=» l P LDR A14,A5 P P IFT CPU852=0 $ P MLR 8,A15 : P MS 13,TTB:SA+2,A14 L P MLR 2,A15 h P z P XIF P IFT CPU852=1 P LDR* A8,A15 P LDR* A7,A15 P LDR* A6,A15 P LDR* A5,A15 P LDR* A4,A15 P
0x139a70…139c04 Dummy {f00=0x005c, f01=0x0190, f02=»2,A14 P ST A10,TTB:SA+20,A14 P ST A9,TTB:SA+18,A14 , P ST A8,TTB:SA+16,A14 H 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
0x139c04…139d98 Dummy {f00=0x005c, f01=0x0190, f02=»W,A14 AND PSW IN TTAB P IFT DSKPAG+DIFPRI=2 P : * P LD A1,TTB:SB,A14 GET SEGM BLOCK ADDR B P RF(Z) TDISST NONE p P LDR* A2,A1 GET SEGM STATUS P LDKL A3,/1000 , P TM A2,A3 CHECK IF SEGM USED BY INT TASK P RF(NZ) TDISST YES
0x139d98…139f2c Dummy {f00=0x005c, f01=0x018e, f02=» P EJECT TDISP P* P* START NEW TASK $ P* < PTDISST LD A14,PRUN F 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
0x139f2c…13a0c0 Dummy {f00=0x005c, f01=0x0190, f02=» ( P LDR* A2,A4 CHECK IF PAGE IN PAGQUE P RF(NZ) TDST10 YES 4 " P LDR* A3,A1 NO GET SEGM STATUS N 2 P ANKL A3,/1000 CHECK IF SEGM USED BY INT TASK t P RF(Z) TDST20 NO 4 P CW A14,PAG:QB,A4 YES CHECK IF IT WAS THIS TASK P RF(NE) TDST20
0x13a0c0…13a254 (1, 80) Dummy {f00=0x005c, f01=0x0190, f02=»A3,PAG:QB,A4 TAKE PAGE OUT OF QUEUE P STR A2,A3 , P ST A3,PAG:QB,A2 > P CMR A4 V P f , PTDST20 LD A1,PAG:PA,A4 GET PAGE ADDRESS n P P IFT MMUPAG=1 P " P ECR A2,A1 CALC PHYS PAGE ADDR P ANK A2,/FC * P LDR A3,A1
0x13a254…13a3e8 Dummy {f00=0x005c, f01=0x018e, f02=»RIES j P 2 PTDST22 SCR A2,A3 UPDATE MMU TABLE JUST IN CASE P SUK A4,1 J P RF(Z) TDST25 P ADK A2,4 r P ADK A3,2 P RB TDST22 P PTDST25 EQU * " P TL TTB:MT,A14 LOAD MMU TABLE 2 P SLL A1,2 UPDATE BASE IN T:A A
0x13a3e8…13a57c Dummy {f00=0x005c, f01=0x0190, f02=» P XIF P P IFT DSKPAG-MMUPAG=1 2 P ST* A1,TTB:CB,A14 UPDATE CURRENT SEGMENT BASE 8 P XIF n P z PTDST30 EQU * P IFT MMUPAG=1 " P TL TTB:MT,A14 LOAD MMU TABLE P XIF P & PTDST35 LD A1,TTB:SA,A14 GET NEW PC
0x13a57c…13a710 Dummy {f00=0x005c, f01=0x0190, f02=»AD REGISTERS z P P XIF P IFT CPU852=1 ( P > P STR A1,A15 PUT PC F P STR A2,A15 AND PSW ON STACK ` & P LD A1,TTB:SA+2,A14 LOAD REGISTERS P LD A2,TTB:SA+4,A14 P LD A3,TTB:SA+6,A14 P LD A4,TTB:SA+8,A14 P LD A5
0x13a710…13a8a4 Dummy {f00=0x005c, f01=0x40e8, f02=»D A10,TTB:SA+20,A14 P LD A11,TTB:SA+22,A14 P LD A12,TTB:SA+24,A14 : P LD A13,TTB:SA+26,A14 X P LD A14,TTB:SA+28,A14 v P P XIF P P RTN A15 START THE TASK P P END @ D A4,TTB:SA+8,A14 P LD A5
0x13a8a4…13aa38 Dummy {f00=0x005c, 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
0x13aa38…13abcc Dummy {f00=0x005c, f01=0x0190, f02=» EQU * + P CF A5,FD:REA PERFORM READ , P* , 0 P IFT TOSS+IBM=2 , : P LD A1,DWTFIB,A6 , R P RF(Z) FD:090 NOT IBM , j P XIF , P* , P IFT IBM=1 , P IFT MMUPAG=0 , ( P LD A4,DWTBA,A6 ASCII OUTPUT ADDRESS , P XIF , P* , P
0x13abcc…13ad60 Dummy {f00=0x005c, f01=0x0190, f02=»* , P* - P IFT MMUPAG=1 - P IFT CHAN=0 - * P IFT TOSS+IBM=2 - > P LD A1,DWTFIB,A6 - V P RF(Z) FD:100 TOSS DISC - n P XIF - P* - P IFT MMUPAG=1 - P IFF CHAN+IBM=0 - 4 P LD A2,DWT:LA,A6 GET FLAG/LOGICAL BUFFER ADDRESS - (
0x13ad60…13aef4 (1, 81) Opaque[0x194]
0x13aef4…13b088 # DirEnt {nam=»LRPINT«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0b98, f03=0x0000}
0x13aef4…13b088 IdxSect {
0x13aef4…13b088 f00 = 0x005c // 0x13aef4 @0x0
0x13aef4…13b088 f01 = 0x000c // 0x13aef6 @0x2
0x13aef4…13b088 gno = [ // 0x13aef8 @0x4
0x13aef4…13b088 [0x00]: C0x005c.0x3.0
0x13aef4…13b088 [0x01]: C0x005d.0x0.0
0x13aef4…13b088 [0x02]: C0x005d.0x1.0
0x13aef4…13b088 [0x03]: C0x005d.0x2.0
0x13aef4…13b088 [0x04]: C0x005d.0x3.0
0x13aef4…13b088 [0x05]: C0x005e.0x0.0
0x13aef4…13b088 ]
0x13aef4…13b088 }
0x13b088…13b21c Dummy {f00=0x005c, f01=0x0190, f02=» 2 P IDENT LRPINT REL 11.0 81-09-16 870105041100 P : P =2, POWER FAIL IN MOVES B P REL 11.0 81-07-27 d P =1,60 HZ COND BUG P REL 11.0 81-01-26 P P* P* 6 P**************************************************
0x13b21c…13b3b0 Dummy {f00=0x005c, f01=0x0190, f02=»OWER FAILURE ~ P* P* P* ( P* 2 P* < 6 P************************************************** F P* P* : P* THIS MODULE CONTAINS MANDATORY INTERRUPT HANDLERS P* FOR TOSS. THESE ARE: P* P* -IHLKM:
0x13b3b0…13b544 Dummy {f00=0x005c, f01=0x0190, f02=»E FOLLOWING ENTRIES ARE USED TO QUEUE TASKS: P* 4 6 P* -LKMRQE: SET A7 = -1, QUEUE TASK AND DISPATCH > P* x H P* -LKMSRC: SET A7 TO RETURN CODE (C(A2)), QUEUE TASK AND DISPATCH P* ( P* -LKMQDI: QUEUE TASK AND DISPATCH P*
0x13b544…13b6d8 Dummy {f00=0x005c, f01=0x0190, f02=» IHLKM LKM INTERRUPT HANDLER 4 P ENTRY LKM030 SPECIAL TLDSEG REQUEST ERROR ENTRY $ $ P ENTRY LKMRQE LKM REQUEST ERROR 4 P ENTRY LKMERR HALT SYSTEM DUE TO FATAL LKM ERROR * P ENTRY LKMQDI QUEUE TASK AND DISPATCH 0 P ENTRY LKMSRC SET RETURN CODE
0x13b6d8…13b86c Dummy {f00=0x005c, f01=0x018e, f02=»O MONITOR CLOCK 2 P ENTRY IHPFAR POWER FAILURE INTERRUPT HANDLER & P ENTRY INIFLG INITIALIZATION FLAG N * P ENTRY PFPOST PWF POST PROCESSING FLAG x P EJECT LRPINT P* P* P************* P* EXTERNALS * P**********
0x13b86c…13ba00 Dummy {f00=0x005c, f01=0x0190, f02=» n " P EXTRN MEXIT MONITOR TASK EXIT , P EXTRN MONMMU MONITOR (SYSTEM) MMU TABLE . P EXTRN QTJOB QUEUE TASK ^ $ P EXTRN QMJOB QUEUE MONITOR TASK ~ $ P EXTRN SWL48 SWITCH TO LEVEL 48 $ P EXTRN SWLXY SWITCH TO LEVEL XY P EXTRN FREBLK SET
0x13ba00…13bb94 (1, 82) Dummy {f00=0x005d, f01=0x0190, f02=»NTSAV INTERRUPT SAVE MODULE P EXTRN RELPAG RELEASE PAGE $ , P EXTRN TLDSEG LOAD SEGMENT LKM PROCESSOR F ( P EXTRN TTB:SB SEGMENT BLOCK POINTER v & P EXTRN TTB:PW PROGRAM STATUS WORD 2 P EXTRN TTB:SA FIRST WORD OF SAVE AREA IN TTAB " P EXTRN
0x13bb94…13bd28 Dummy {f00=0x005d, f01=0x0190, f02=»* CONDITIONAL ASSEMBLY P* . P***************************************** ( P* Z . P* A PROGRAM VERSION USING TOSS MMU PAGING d * P* IS OBTAINED BY SETTING MMUPAG EQU 1. P* PMMUPAG EQU 1 P* P* 6 P* A PROGRAM VERSIO
0x13bd28…13bebc Dummy {f00=0x005d, f01=0x0190, f02=» . P* A PROGRAM VERSION USING TOSS DISC PAGING * P* IS OBTAINED BY SETTING DSKPAG EQU 1. 6 P* d PDSKPAG EQU 0 n P* P* 8 P* A PROGRAM VERSION USING NO MONITOR CLOCK FUNCTIONS * P* IS OBTAINED BY SETTING MONCLK EQU 0. P*
0x13bebc…13c050 Dummy {f00=0x005d, f01=0x0190, f02=»TIONS h 2 P* IS OBTAINED BY SETTING MONDAT = MONCLK = 1. P* D PX:B EQU 0 N PMONDAT EQU X:B ` P* v P* 4 P* A PROGRAM VERSION WITH MONITOR CLOCK FUNCTIONS 4 P* ADAPTED TO 60 HERTZ NET FREQUENCY (USA/CANADA) , P* IS OBTAINED
0x13c050…13c1e4 Dummy {f00=0x005d, f01=0x0190, f02=» LRPINT P* P* P* I H L K M & P* < P* F 8 P* THIS IS THE LKM INTERRUPT HANDLER. THE FOLLOWING P P* STEPS ARE CARRIED OUT: P* * P* - IF STACK OVERFLOW SYSTEM HALTS. P* D P* - ELSE REGISTERS A1
0x13c1e4…13c378 Dummy {f00=0x005d, f01=0x0190, f02=»E LKM PROCESSOR. P* P* EXIT CONDITIONS ARE: " P* B * P* A4 = LABEL ADDRESS OF LKM REQUEST L 8 P* (A4 = 0 INDICATES NO LABEL IN LKM REQUEST) z * P* A5 = TTAB ADDRESS OF CALLING TASK P* A6 = LKM DATA DIRECTIVE P
0x13c378…13c50c Dummy {f00=0x005d, f01=0x0190, f02=»U * $ P ST P,INTSAV SAVE LAST INTERRUPT * P RIT /1D RESET INTERNAL INTERRUPT FLAG 4 P* b P EJECT LRPINT l P* P* P ST A15,LKM010 SAVE A15 " P LD A15,PRUN LOAD TTAB ADDRESS P* P IFT CPU852=1 4 P ADKL A15,
0x13c50c…13c6a0 Dummy {f00=0x005d, f01=0x0190, f02=» ~ P STR A11,A15 -A11 P STR A10,A15 -A10 " P STR A9,A15 -A9 < P STR A8,A15 -A8 T P STR A7,A15 -A7 l P STR A6,A15 -A6 P STR A5,A15 -A5 P STR A4,A15 -A4 P STR A3,A15 -A3 P STR A2,A15 -A2 P STR A1,A15
0x13c6a0…13c834 (1, 83) Dummy {f00=0x005d, f01=0x0190, f02=» LD A5,PRUN TTAB ADDRESS OF CALLING TASK * P LDKL A15,0 RESTORE A15 STACK POINTER 0 PLKM010 EQU *-2 ^ P* t P EJECT LRPINT ~ P* " P* GET LKM REQUEST PARAMETERS P* P LDR* A3,A15 4 P LDR* A2,A15 LOAD P.C. AND ADJUST ST
0x13c834…13c9c8 Dummy {f00=0x005d, f01=0x0190, f02=»* A6,A2 DATA DIRECTIVE P XIF P* * P IFT MMUPAG=1 4 P ANK A3,1 J P RF(NZ) LKM015 USER MODE * P TL MONMMU NO, LOAD MONITOR MMU TABLE | P* PLKM015 EQU * " P EL A3,-2,A2 INSTRUCTION CODE P ELR A6,A2 DATA DIRECTIVE
0x13c9c8…13cb5c Dummy {f00=0x005d, f01=0x0190, f02=»* STACK OVERFLOW: HALT SYSTEM P* ( P LDK A1,7 HALT PARAMETER 2 0 P RF LKM070 HALT SYSTEM DUE TO STACK OVERFLOW R P* P EJECT LRPINT P* P* PLKM025 EQU * & P ADK A2,2 UPDATE DISPATCH ADDRESS P* P IFF
0x13cb5c…13ccf0 Dummy {f00=0x005d, f01=0x0190, f02=»PAG=1 * P LD A3,TTB:SB,A5 SEGMENT BLOCK ADDRESS P RF(Z) LKM030 NO SEGMENT < P LCR A4,A3 SEGMENT STATUS , P ANK A4,/5E CHECK IF CORE RESIDENT OR... ~ 2 P RF(NZ) LKM030 ...USED BY AN INTERRUPTED TASK P CF A15,RELPAG RELEASE PAGE P
0x13ccf0…13ce84 Dummy {f00=0x005d, f01=0x0190, f02=»5,SWL48 SWITCH TO LEVEL 48 P LDK A4,0 " P LDR A3,A6 DATA DIRECTIVE 4 P RF(NN) LKM050 NO LABEL V P* v P* LKM REQUEST WITH LABEL P* P IFT MMUPAG=0 P LDR* A4,A2 LABEL P XIF P* P IFT MMUPAG=1 P
0x13ce84…13d018 Dummy {f00=0x005d, f01=0x018e, f02=»* P EJECT LRPINT P* " . P* UPDATE TTB:SA AND GO TO LKM PROCESSOR , P* ^ PLKM050 EQU * h . P ST A2,TTB:SA,A5 SET NEXT DISPATCH ADDRESS | P ADR A3,A3 INDEX IN LKMAL & P RF(Z) LKMQDI TASK SWITCH REQUEST P CW A3,LKMAL
0x13d018…13d1ac Dummy {f00=0x005d, f01=0x0190, f02=» P EJECT LRPINT P* P* * P* L K M E R R 4 P* L P* V > PLKMERR LDK A1,15 INDICATE REQUESTED LKM PROC. NOT PRESENT ` P* PLKM070 EQU * P CF A15,HALT HALT SYSTEM P* P* P* L K M R Q E
0x13d1ac…13d340 Dummy {f00=0x005d, f01=0x0190, f02=» P LDKL A2,-1 P* P* & P* L K M S R C 0 P* H . P* SET A7 = A2, QUEUE TASK AND DISPATCH. R P* P* A2 = RETURN CODE P* A5 = TTAB ADDRESS P* P* PLKMSRC EQU * 8 P ST A2,TTB:SA+14,A5 SET
0x13d340…13d4d4 (1, 84) Dummy {f00=0x005d, f01=0x0190, f02=» P* P* A5 = TTAB ADDRESS P* , P* 6 PLKMQDI EQU * @ P CF A15,QTJOB T P* j * PT:DISP EQU * COMMON EXIT TO DISPATCHER t P ABL TDISP GO TO DISPATCHER P* P EJECT LRPINT P P* P* I H P F A
0x13d4d4…13d668 Dummy {f00=0x005d, f01=0x0190, f02=»BLOCK ADDRESS P DATA 0 & PTTABPF DATA 0 TTAB FOR POWER FAIL & P DATA '#P' P P DATA 0 b PA15SAV DATA 0 r P DATA /00C0 P DATA PFTASK P P P P P & PPFX DATA 1 POWER ON/OFF INDICATOR $ P P=P
0x13d668…13d7fc Dummy {f00=0x005d, f01=0x0190, f02=»F POST PROCESSING FLAG P NZ=PWF POST PROCESSING P EJECT LRPINT @ P X P* ` * P* POWER FAIL/AUTO RESTART INTERRUPT j P* P PIHPFAR EQU * $ P ST P,INTSAV SAVE LAST INTERRUPT & P RIT /17 RESET INTERNAL INTERRUP
0x13d7fc…13d990 Dummy {f00=0x005d, f01=0x018e, f02=»1 & P CF A15,SAVE8 SAVE A1-A14 ON STACK P STR A9,A15 4 P STR A10,A15 H P STR A11,A15 P STR A12,A15 p P STR A13,A15 P STR A14,A15 P XIF P P IFT CPU852=0 $ P MSR 14,A15 SAVE A1-A14 ON STACK P XIF
0x13d990…13db24 Dummy {f00=0x005d, f01=0x0190, f02=» P EJECT LRPINT P P* ( P* POWER ON 2 P* F P P " PPOWON LD A15,A15SAV RELOAD A15 X P ~ P IFT MMUPAG=1 $ P TL -30,A15 RESTORE MMU TABLE =2 P XIF P IFT CPU852=1 P LDR* A14,A15 RESTORE A9-A14
0x13db24…13dcb8 Dummy {f00=0x005d, f01=0x0190, f02=»PU852=0 P MLR 14,A15 RESTORE A9-A14 P MSR 8,A15 2 P XIF D P P 4 P LD A1,DISQUE QUEUE PFTASK FIRST FOR DISPATCHING X P LDKL A2,TTABPF P CWR A1,A2 4 P RB(E) T:DISP ALREADY QUEUED, PWF DURING PFPOST P STR A1,A2 P ST
0x13dcb8…13de4c Dummy {f00=0x005d, f01=0x0190, f02=»FAIL TASK . P* STARTED AFTER ALL PWF POST PROCESSING P* D P N . PPFTASK CM PFPOST CLEAR PWF POST PROC FLAG V P CM INIFLG AND INIT FLAG & P CF A15,PFINIT RESTART I/O DEVICES P CM PRUN EXIT PFTASK P RB T:DISP P EJECT
0x13de4c…13dfe0 Dummy {f00=0x005d, f01=0x0190, f02=»WILL BE PROCESSED EACH 100 MS. | P* & * PIHRTC ST P,INTSAV SAVE LAST INTERRUPT 0 " P RIT /1B RESET INTERRUPT FLAG ^ P IM COUNT $ P RF(P) RTC010 CHECK TIMER QUEUE P RTN A15 P* PRTC010 EQU * P IFT CPU852=1 & P CF A1
0x13dfe0…13e174 (1, 85) Dummy {f00=0x005d, f01=0x0190, f02=» P EJECT LRPINT P* P* & P IFT NETFRQ=50 0 " P LDKL A4,-4 SET 100 MS SWITCH F P XIF l P* x P IFT NETFRQ=60 " P LDKL A4,-5 SET 100 MS SWITCH P XIF P ST A4,COUNT =1 P* . P LDKL A2,CLOCK QUEUE CLOCK R
0x13e174…13e308 Dummy {f00=0x005d, f01=0x0190, f02=» XIF P* PSWDISP EQU * $ P CF A15,SWLXY SWITCH TO LEVEL XY * P RB T:DISP R P* d P EJECT LRPINT n P* P* P IFT MONCLK=1 P* < P* MONITOR CLOCK UPDATING ROUTINE STARTED EACH SECOND. P* PRTC0
0x13e308…13e49c Dummy {f00=0x005d, f01=0x018e, f02=»ES AND SECONDS p P* ( PMCLO20 IM MONCLO+2,A4 INCREMENT TIME . P XR A3,MONCLO+2,A4 CHANGE MINUTES OR HOURS L $ P RB(NE) SWDISP GO TO DISPATCHER ~ ( P CM MONCLO+2,A4 RESTART TIME COUNTER P SUK A4,2 END 6 P RF(N) MCLO30 MIDNIGHT CARRY AND
0x13e49c…13e630 Dummy {f00=0x005d, f01=0x0190, f02=» ( P IM MCARRY INCREMENT MIDNIGHT CARRY ! P* ! 4 P EJECT LRPINT ! > P* ! V P* ! ` P IFT MONDAT=1 ! j P* ! P* UPDATE DAY, MONTH AND YEAR ! P* ! P IFT CPU852=1 ! P LDKL A1,MONTH MONTH ADDRESS ! P LDKL A2,DAY DAY ADDRE
0x13e630…13e7c4 Dummy {f00=0x005d, f01=0x0190, f02=»H AND DAY ADDRESS TO A1 AND A2 ! z P XIF " & P* " 2 P IFT MONCLK+MONDAT=2 " < P IMR A2 INCREMENT DAY " X P LDR* A4,A1 MONTH " v P LDR A6,A4 " P LDR* A5,A2 NEW DAY " " P SUK A5,29 CHECK IF DAY WAS 28 " 0 P RF(Z) MCLO40 YES, GO AND CHECK IF F
0x13e7c4…13e958 Dummy {f00=0x005d, f01=0x0190, f02=» RETURN " ~ ( P RF MCLO50 YES, WE HAVE A NEW MONTH # P* # < PMCLO40 EQU * # F P SUK A6,2 CHECK IF FEBRUARY # Z P RB(NZ) SWDISP NO, RETURN # ~ P* # P EJECT LRPINT # P* # & P* CHANGE TO NEW MONTH (AND YEAR?) # P* # P* #
0x13e958…13eaec Dummy {f00=0x005d, f01=0x0190, f02=»NZ) SWDISP NO, RETURN # $ P STR A3,A1 SET MONTH TO JANUARY $ P IM YEAR HAPPY NEW YEAR!!! $ F P RB SWDISP RETURN $ h P* $ PMCLO60 EQU * $ P LDR A7,A6 MONTH $ P ANK A6,1 $ P RF(Z) MCLO70 MONTH EVEN $ P SUK A7,7 $ ( P RB(P) MCLO5
0x13eaec…13ec80 Dummy {f00=0x005d, f01=0x0190, f02=»O50 APRIL OR JUNE $ P XIF % P* % & P IFT MONCLK=1 % 0 P RB SWDISP RETURN % F P XIF % ` P* % l P EJECT LRPINT % v P* % P* % P* M O N C L O % P* % P* % P IFT MONCLK+MONDAT=2 % , P DATA 0 THIS WORD USED BY MONT
0x13ec80…13ee14 (1, 86) Dummy {f00=0x005e, f01=0x0190, f02=» , PMCARRY DATA 0 ACKUMULATED 24 HOUR CARRY & P DATA 0 HOUR & 4 P DATA 0 MINUTE & H P DATA 0 SECOND & ^ PSECOND DATA 0 SECOND SWITCH & t P XIF & P* & P EJECT LRPINT & P* & * P* CLOCK ROUTINE STARTED EACH 100 MS. & P* & P
0x13ee14…13efa8 Dummy {f00=0x005e, f01=0x0190, f02=»CK & v P ABL(Z) MEXIT END OF QUEUE ' P IM 4,A4 INCREMENT TIMER ' , P RB(N) CLK10 NOT TIME OUT ' L P RF(Z) CLK30 TIME OUT ' n P LDR* A3,A4 RELEASE TIMER ' P STR A3,A6 ' P CF A15,FREBLK ' P LDR A4,A2 ' P CF A15,FREBLK ' P RB CLK20
0x13efa8…13f13c Dummy {f00=0x005e, f01=0x0190, f02=»VEL 48 ' v P INH ( P RB CLK10 ( P* ( , PCLK40 EQU * ( 6 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 LDKL A1,/C4C0 LEVEL 4
0x13f13c…13f2d0 Dummy {f00=0x005e, f01=0x4124, f02=»2 GO TO TIME OUT ROUTINE ( P* ) P* ) * PCOUNT DATA 0 100 MS SWITCH ) 4 P* ) V P* ) ` P* T I M Q U E ) j P* ) . P* POINTER TO FIRST BLOCK IN TIMER QUEUE ) P* ) P* ) PTIMQUE EQU * ) P DATA 0 ) P* ) P* )
0x13f2d0…13f464 Dummy {f00=0x005e, 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
0x13f464…13f5f8 Dummy {f00=0x005e, f01=0x018e, f02=»------------------------------- * h P EJECT + ( > P********************************************************** + : P* + | P* LINE CONTROL CHAR EQU:S + P* + > P********************************************************** + P* + & PSF E
0x13f5f8…13f78c Dummy {f00=0x005e, f01=0x0190, f02=» PSOH EQU /01 , PENQ EQU /05 , PDLE EQU /10 , , PEOT EQU /04 , @ PNAK EQU /15 , T PESC EQU /1B , h PSBA EQU /11 , | PGP EQU /22 , PRDBCOM EQU /32 , PRDMCOM EQU /36 , P EJECT , P IFT CODE=0 , PPAR EQU /80 , PRVI
0x13f78c…13f920 Dummy {f00=0x005e, f01=0x018e, f02=»E=0 , P IFT MSV1=1 - 0 PWACK EQU /BF =WABT - SIEMENS MSV1 PROCEDURE - P XIF - T P IFT CODE=1 - ` PPAR EQU /00 - t PWACK EQU /2C - PRVI EQU /40 - PACK0 EQU /18 - PACK1 EQU /2F - PSYNEBC EQU /32 - PENQEBC EQU /2D - PETBE
0x13f920…13fab4 (1, 87) Opaque[0x194]
0x13fab4…13fc48 # DirEnt {nam=»TPROC «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0bc8, f03=0x0000}
0x13fab4…13fc48 IdxSect {
0x13fab4…13fc48 f00 = 0x005e // 0x13fab4 @0x0
0x13fab4…13fc48 f01 = 0x0006 // 0x13fab6 @0x2
0x13fab4…13fc48 gno = [ // 0x13fab8 @0x4
0x13fab4…13fc48 [0x00]: C0x005e.0x1.0
0x13fab4…13fc48 [0x01]: C0x005e.0x2.0
0x13fab4…13fc48 [0x02]: C0x005e.0x3.0
0x13fab4…13fc48 ]
0x13fab4…13fc48 }
0x13fc48…13fddc Dummy {f00=0x005e, f01=0x0190, f02=» 0 P IDENT TPROC REL 11.0 81-03-05 870105041100 P 8 0 P =1, A4 PARAM. NOT TRANSM. WHEN LKM ACTIV. @ P =1, REL 11.0 81-01-26 t P* P* 6 P************************************************** P* $ P* PHILIPS TERMINAL SYSTEM
0x13fddc…13ff70 Dummy {f00=0x005e, f01=0x018e, f02=»************************************ P* , P* 6 * P* THIS MODULE CONTAINS THE FOLLOWING @ P* TOSS LKM PROCESSORS: n P* P* - TWAIT = WAIT P* P* - TMWAIT = MULTIPLE WAIT P* ( P* - TACTOT = ACTIVATE/REST
0x13ff70…140104 Dummy {f00=0x005e, f01=0x0190, f02=» P* P ENTRY TWAIT WAIT PROCESSOR * P ENTRY TMWAIT MULTIPLE WAIT PROCESSOR 2 , P ENTRY TACTOT ACTIVATE/RESTART PROCESSOR ` P EJECT TPROC P* P* P************* P* EXTERNALS * P************* P* P*
0x140104…140298 Dummy {f00=0x005e, f01=0x0190, f02=»XTRN ACTDIS ACTIVATE TASK AND DISPATCH $ P EXTRN LKMRQE LKM REQUEST ERROR . 2 P EXTRN FNDDWT FIND DWT ADDRESS FROM FILE CODE V 0 P EXTRN FNDTID FIND TTAB ADDRESS FROM TASK ID P EXTRN TTB:SA TTAB SAVE AREA P EXTRN DWTST DWT STATUS P EXT
0x140298…14042c Dummy {f00=0x005e, f01=0x0190, f02=»*********************** ~ P* P* CONDITIONAL ASSEMBLY * P* H . P***************************************** R P* . P* A PROGRAM VERSION USING TOSS MMU PAGING * P* IS OBTAINED BY SETTING MMUPAG EQU 1. P* PMMUPAG EQU 1
0x14042c…1405c0 Dummy {f00=0x005e, f01=0x0190, f02=»THE WAIT LKM PROCESSOR. P* , P* THIS MODULE IS ENTERED WHEN THE TASK * 6 P* WANTS TO SYNCHRONIZE WITH A PARTICULAR EVENT. Z P* * P* IT IS ENTERED FROM THE LKM HANDLER & P* WITH THE FOLLOWING PARAMETERS: P* P* A5 =
0x1405c0…140754 (1, 88) Dummy {f00=0x005e, f01=0x0190, f02=» & P RF(Z) TP:RQE FILE CODE NOT FOUND P* . P IFT MMUPAG=0 8 * P LDR* A1,A8 RETURN IF EVENT COMPLETED N P XIF | P* P IFT MMUPAG=1 ( P ELR A1,A8 RETURN IF EVENT COMPLETED P XIF P* ( P RF(N) TP:QDI I/O ALREADY COMP
0x140754…1408e8 Dummy {f00=0x005e, f01=0x0190, f02=» TPROC P* P* P********** " P* TACTOT * 4 P********** F P* X P* b 8 P* THIS IS THE ACTIVATE/RESTART TASK LKM PROCESSOR. l P* 4 P* THIS MODULE IS ENTERED FROM THE LKM HANDLER ( P* WHEN A TASK HAS TO BE ACTI
0x1408e8…140a7c Dummy {f00=0x005e, f01=0x0190, f02=» = START ADDRESS AT ACTIVATION, ELSE ZERO P* A5 = TTAB 2 4 P* A7 = IDENTIFICATION FOR TASK TO BE ACTIVATED H P* P* PTACTOT EQU * $ P CF A15,FNDTID FIND TTAB ADDRESS P ADK A2,0 SET CR $ P RF(Z) TP:RQE TASK NOT IN SYSTEM
0x140a7c…140c10 Dummy {f00=0x005e, f01=0x0190, f02=»METER =1 v P LDR A5,A2 P LDR A2,A4 " 0 P RF(Z) TP:QDI RESTART: QUEUE FOR DISPATCHING 4 P LDR A4,A7 A4 PARAMETER =1 h * P ABL ACTDIS ACTIVATE TASK AND DISPATCH P* P EJECT TPROC P* P* P********** P* TMWAIT *
0x140c10…140da4 Dummy {f00=0x005e, f01=0x0190, f02=»KM HANDLER t & P* WITH THE FOLLOWING PARAMETERS: P* < P* A5 = TTAB ADDRESS F P* A7 = ECBBLK ADDRESS d P* 6 P* WHEN ONE OF THE SPECIFIED EVENTS IS COMPLETED, 6 P* RETURN IS MADE TO THE CALLING TASK VIA TENDIO & P* WI
0x140da4…140f38 Dummy {f00=0x005e, f01=0x0190, f02=»AND NO RETURN VIA TENDIO). p P* " ( P* NOTICE THAT ALL EVENTS MUST HAVE , ( P* BEEN ISSUED IN THE NO WAIT MODE. X P* P* P EJECT TPROC P* P* $ PTMWAIT EQU * MULTIPLE WAIT ENTRY P LDK A3,0 P* P I
0x140f38…1410cc Dummy {f00=0x005e, f01=0x0190, f02=» IN ECBBLK v P XIF P* ( P RF(NP) TP:RQE REQUEST ERROR IF <= 0 ( P* T PTMW:10 EQU * ^ 2 P ADK A7,2 POINT TO NEXT ECB ADDRESS IN ECBBLK r P* P IFT MMUPAG=0 P LDR* A8,A7 GET ECB ADDRESS & P LDR* A2,A8 GET FIRST WORD O
0x1410cc…141260 Dummy {f00=0x005e, f01=0x0190, f02=» P* ( P RF(N) TMW:30 I/O ALREADY COMPLETED 8 P CF A15,FNDDWT NO, SEARCH DWT ADDRESS FROM FILE CODE > P ADK A6,0 SET CR z P RF(Z) TP:RQE NOT FOUND P* P EJECT TPROC P* P* " P LD A2,DWTST,A6 GET DWT STATUS
0x141260…1413f4 (1, 89) Dummy {f00=0x005e, f01=0x0190, f02=»T/ACTIVATE INDICATOR x , P RF(NZ) TP:RQE REQUEST ISSUED WITH WAIT P ORK A6,1 SET BIT 15 L 2 P ADK A3,0 CHECK FLAG IF FIRST ECB TO WAIT FOR h . P RF(NZ) TMW:20 NOT THE FIRST ECB IN ECBBLK & P LDR A9,A6 SAVE FIRST DWT ADDRESS P LDR A3,A6
0x1413f4…141588 Dummy {f00=0x005e, f01=0x0190, f02=»UK A1,1 & P RB(P) TMW:10 MORE ECB:S IN ECBBLK : P ST A3,DWTWAT,A9 NO, SET FIRST DWT ADDRESS IN THE LAST : P RB T:DISP GO TO DISPATCHER x P* PTMW:30 EQU * 4 P ST A8,TTB:SA+16,A5 UPDATE A8 IN TTAB SAVE AREA 2 P ADK A3,0 CHECK FLAG I
0x141588…14171c Dummy {f00=0x005e, f01=0x4184, f02=»OR $ P LDR* A2,A3 GET NEXT DWT ADDRESS P RF(Z) TP:QDI NO MORE DWT:S 2 P CMR A3 SET TO NO WAIT AGAIN V P LDR A3,A2 z P RB TMW:40 P* P EJECT TPROC P* P* PTP:RQE EQU * " P ABL LKMRQE LKM REQUEST ERROR
0x14171c…1418b0 Dummy {f00=0x005e, 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
0x1418b0…141a44 Dummy {f00=0x005e, f01=0x0190, f02=» RESTORE NO OF EXTENTS i P RB MSX20 j P* j 0 PMSX99 EQU * j : P RTN A14 j N P EJECT j ^ 4 P*********************************************** j l P* j P* GETMON j P* ====== j P* j & P* SEARCH FOR MONIT
0x141a44…141bd8 Dummy {f00=0x005e, f01=0x0190, f02=»************** j n P* k P* k PGETMON EQU * k * ( P LD A1,SCTANO GET APPLICATION NUMBER k > P ST A1,MONNO+STKEND SAVE k j 2 P CF A14,GETNBR GET CORRESPONDING ENTRY IN VTOC k 0 P LC A1,8,A4 GET CORRESPONDING MONITOR NUMBER k 2 P SLL A1,8 FORM MONIT
0x141bd8…141d6c Dummy {f00=0x005e, f01=0x0190, f02=»GTMON2 EQU * k 0 P LD A1,MONNO+STKEND GET MONITOR NO (BIT 0-7) l ( P CW A1,8,A4 IS IT THE RIGHT MONITOR? l H P RF(E) GTMON4 YES! l t P* l 8 P CF A14,GTNBR4 NO, CONTINUE TO NEXT MONITOR IN VTOC l P RB GTMON2 l P* l PGTMON4 EQU * l $ P LD
0x141d6c…141f00 Dummy {f00=0x005e, f01=0x0190, f02=»,18,A4 AND MONITOR DISC ADDRESS (BIT 16-31) l " P ST A2,4,A1 AND SAVE IN MXSTAB m 4 P RTN A14 RETURN m Z P EJECT m r PGETNBR EQU * m $ P CF A14,GETVLB READ VOLUME LABEL m PGTNBR0 EQU * m P CF A14,RDSEC READ SECTOR m ( P LDK A7,QBLFAC VTOC BL
0x141f00…142094 (1, 90) Opaque[0x194]
0x142094…142228 # DirEnt {nam=»MSUBS «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0be0, f03=0x0000}
0x142094…142228 IdxSect {
0x142094…142228 f00 = 0x005f // 0x142094 @0x0
0x142094…142228 f01 = 0x000e // 0x142096 @0x2
0x142094…142228 gno = [ // 0x142098 @0x4
0x142094…142228 [0x00]: C0x005f.0x0.0
0x142094…142228 [0x01]: C0x005f.0x1.0
0x142094…142228 [0x02]: C0x005f.0x2.0
0x142094…142228 [0x03]: C0x005f.0x3.0
0x142094…142228 [0x04]: C0x0060.0x0.0
0x142094…142228 [0x05]: C0x0060.0x1.0
0x142094…142228 [0x06]: C0x0060.0x2.0
0x142094…142228 ]
0x142094…142228 }
0x142228…1423bc Dummy {f00=0x005f, f01=0x0190, f02=» 0 P IDENT MSUBS REL 11.0 81-01-26 870105041100 P 8 P* @ P* J 6 P************************************************** T P* $ P* PHILIPS TERMINAL SYSTEM PTS P* $ P* MSUBS = MONITOR SUBROUTINES P* P* P*
0x1423bc…142550 Dummy {f00=0x005f, 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 TASK FOR DISPATCHING . P* -ACTOT ACTIVATE TASK ON FIFO BASIS . P*
0x142550…1426e4 Dummy {f00=0x005f, f01=0x0190, f02=» SET A MONITOR BLOCK FREE 4 P* -FNDDWT FIND DWT ADDRESS IN TTAB OR CDTAB " , P* -FNDDWD FIND DWT ADDRESS IN CDTAB Z * P* -FNDTID FIND TASK IDENTIFICATION P* -PFINIT RESTART DEVICE $ P* -SWL48 SWITCH TO LEVEL 48 $ P*
0x1426e4…142878 Dummy {f00=0x005f, f01=0x0190, f02=»* P* P*********** P* ENTRIES * ( P*********** < P* P P* Z " P ENTRY SAVE8 SAVE 8 REGISTERS d P ENTRY QTJOB QUEUE TASK $ P ENTRY QMJOB QUEUE MONITOR TASK & P ENTRY ACTOT ACTIVATE TASK (FIFO) & P ENTRY ACTOT
0x142878…142a0c Dummy {f00=0x005f, f01=0x0190, f02=»NDDWT FIND DWT IN TTAB OR CDTAB $ P ENTRY FNDDWD FIND DWT IN CDTAB ( , P ENTRY FNDTID FIND TASK INDENTIFICATION P P ENTRY PFINIT RESTART DEVICE $ P ENTRY SWL48 SWITCH TO LEVEL 48 $ P ENTRY SWLXY SWITCH TO LEVEL XY , P ENTRY ILLINT ILLEGA
0x142a0c…142ba0 Dummy {f00=0x005f, f01=0x0190, f02=» * P ENTRY RELPA2 RELEASE PAGE (2ND ENTRY) " P ENTRY IHRET8 RESTORE FROM A8 2 P ENTRY IHRET2 A2 X " P ENTRY IHRET1 A1 p 2 P ENTRY IHRTN RETURN WITHOUT ENABLE INTERRUPTS P EJECT MSUBS P* P* P*************
0x142ba0…142d34 (1, 91) Dummy {f00=0x005f, f01=0x0190, f02=» FREQUE POINTER TO FIRST FREE MONITOR BLOCK P EXTRN TTABLD LOAD TASK TTAB 4 ( P EXTRN PQEMTY PAGE QUEUE EMPTY FLAG X " P EXTRN PAGQUE FREE PAGE QUEUE $ P EXTRN SEG:PB PAGE BLOCK ADDRESS & P EXTRN PAG:QB QUEUE LINK BACKWARD 4 P EXTRN LKMER
0x142d34…142ec8 Dummy {f00=0x005f, f01=0x0190, f02=» TTB:ST TASK STATUS AND PRIORITY LEVEL & P EXTRN TTB:ID TASK IDENTIFICATION . P EXTRN TTB:SA SAVE AREA X * P EXTRN TTB:PP POINTER TO PENDING QUEUE x $ P EXTRN TTB:TD TASK DEVICE TABLE $ P EXTRN SCTTCT TASK CONTROL TABLE & P EXTRN SCTCDT COMM
0x142ec8…14305c Dummy {f00=0x005f, 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 1
0x14305c…1431f0 Dummy {f00=0x005f, f01=0x0190, f02=» PCPU852 EQU 0 P* P* & . P* A PROGRAM VERSION USING TOSS DISC PAGING 0 * P* IS OBTAINED BY SETTING DSKPAG EQU 1. b P* PDSKPAG EQU 0 P* P* " PSOP EQU /2E SOP DEVICE ADDRESS P* P EJECT MSUBS P
0x1431f0…143384 Dummy {f00=0x005f, f01=0x0190, f02=» p P* P* PSAVE8 EQU * P INH INHIBIT INTERRUPTS 0 P STR A3,A15 P P STR A4,A15 d P STR A5,A15 x P STR A6,A15 P STR A7,A15 P STR A8,A15 , P LD A3,16,A15 LOAD P.C. (RETURN ADDRESS) , P ST A3,SAVE81 AN
0x143384…143518 Dummy {f00=0x005f, f01=0x018e, f02=»H BACK t PSAVE81 EQU *-2 P* $ P EJECT MSUBS . P* D P* N P* Q T J O B X P* n 2 P* SUBROUTINE TO QUEUE TASK FOR DISPATCHING. x P* P* ENTRY PARAMETER: P* 0 P* A5 = TTAB ADDRESS OF TASK TO BE QUEUED
0x143518…1436ac Dummy {f00=0x005f, f01=0x018e, f02=» X P* PUT LAST IN QUEUE. P* & P* 0 PQTJOB EQU * : P INH N P* Z P IFT CPU852=1 d $ P STR A1,A15 SAVE A1-A3 ON STACK z P STR A2,A15 P STR A3,A15 P XIF P* P IFT CPU852=0 " P MSR 3,A15 SAVE A1
0x1436ac…143840 Dummy {f00=0x005f, f01=0x0190, f02=» d P RF(Z) QTJ020 DISQUE EMPTY & P LD A3,TTB:ST+1,A5 PRIORITY LEVEL * P* T P EJECT MSUBS ^ P* t P* ~ 6 PQTJ010 CC A3,TTB:ST+1,A2 COMPARE WITH QUEUED LEVEL P RF(L) QTJ020 INSERT P LDR A1,A2 SAVE ADDRESS * P LDR* A2,A
0x143840…1439d4 (1, 92) Dummy {f00=0x005f, f01=0x0190, f02=»5,A1 P* P IFT CPU852=1 P ABL IHRET3 , P XIF @ P* L P IFT CPU852=0 V * P MLR 3,A15 RESTORE A1-A3 FROM STACK... l P RTN A15 ...AND RETURN P XIF P* P EJECT MSUBS P* P* P* Q M J O B
0x1439d4…143b68 Dummy {f00=0x005f, f01=0x0190, f02=» ~ P* A2 = DISPATCH ADDRESS P* A3 = PARAMETER * P* A4 = PARAMETER D P* ^ > P* A5 IS SET TO TTAB ADDRESS OF MONITOR TASK '#M' AND THE h B P* SUBROUTINE 'ACTOT' IS USED TO ACTIVATE AND QUEUE THE TASK. P* P* PQMJO
0x143b68…143cfc Dummy {f00=0x005f, f01=0x0190, f02=» MSR 8,A15 SAVE A1-A8 ON STACK P XIF & P* 2 P LDKL A5,TTMJOB TTAB ADDRESS < P RF ACT01 ` P* r P EJECT MSUBS | P* P* P* A C T O T , A C T O T P P* & P* SUBROUTINE TO ACTIVATE A TASK. P* P
0x143cfc…143e90 Dummy {f00=0x005f, f01=0x0190, f02=» A4 = PARAMETER 2 P* A5 = TTAB ADDRESS P* 8 6 P* - IF REQUESTED TASK IS NOT ACTIVE THE TASK IS B : P* PUT IN DISPATCHER QUEUE VIA SUBROUTINE 'QTJOB'. | < P* - IF TASK IS ACTIVE, THE REQUEST IS PUT IN A PENDING P* QUEUE.
0x143e90…144024 Dummy {f00=0x005f, f01=0x0190, f02=» R P* P* PACTOTP EQU * P IFT CPU852=1 0 & P CF A15,SAVE8 SAVE A1-A8 ON STACK F P XIF p P* | P IFT CPU852=0 P INH " P MSR 8,A15 SAVE A1-A8 ON STACK P XIF P* P LDK A6,1 INDICATE LIFO P RF
0x144024…1441b8 Dummy {f00=0x005f, f01=0x018e, f02=»STACK t P XIF P* P IFT CPU852=0 $ P INH : " P MSR 8,A15 SAVE A1-A8 ON STACK F P XIF l P* x PACT01 LDK A6,0 INDICATE FIFO P* PACT03 EQU * , P LD A7,TTB:SA,A5 (OLD) DISPATCH ADDRESS $ P RF(NZ) ACT020 IS PR
0x1441b8…14434c Dummy {f00=0x005f, f01=0x0190, f02=» p & P ST A3,TTB:SA+6,A5 SEGMENT NUMBER " P ST A4,TTB:SA+8,A5 PARAMETER 2 2 P LD A4,TTB:ID,A5 SET TASK ID X * P ST A4,TTB:SA+4,A5 TO A2 IN SAVE AREA | P XIF P* P IFT CPU852=0 P LD A2,TTB:ID,A5 TASK ID 6 P MS 4,TTB:SA+2,A5
0x14434c…1444e0 Dummy {f00=0x005f, f01=0x0190, f02=»TTB:SB,A5 INDICATE NOT RUNNING IN ANY SEGMENT P XIF 6 P* B P CF A15,QTJOB QUEUE THE TASK L P* p PACT010 EQU * z P IFT CPU852=1 ( P RF IHRET8 RESTORE A1-A8 AND RETURN P XIF P* P IFT CPU852=0 * P MLR 8,A15 R
0x1444e0…144674 (1, 93) Dummy {f00=0x005f, f01=0x0190, f02=» PENDING QUEUE ~ P* & PACT020 LDR A7,A4 SAVE PARAMETER 2 $ P CF A15,GETBLK GET A FREE BLOCK J P LDR A1,A7 PARAMETER 2 r P LDR A2,A4 P CF A15,GETBLK P ADKL A5,TTB:PP P* " PACT030 LDR A3,A5 SAVE ADDRESS ( P LDR* A5
0x144674…144808 Dummy {f00=0x005f, f01=0x0190, f02=»T030 NOT END OF QUEUE P* PACT040 EQU * ( " P STR A4,A3 SET BLOCK IN QUEUE < P STR A5,A4 b P RB ACT010 t P* P EJECT MSUBS P* P* P* E X I T P* 6 P* SUBROUTINE TO SET A TASK FREE AND QUEUE FIRS
0x144808…14499c Dummy {f00=0x005f, f01=0x0190, f02=» A7 ARE DESTROYED P* P* $ PEXIT EQU * . ( P CM TTB:SA,A5 RESET DISPATCH ADDRESS @ , P LD A4,TTB:PP,A5 PENDING REQUEST POINTER l $ P RF(Z) IHRTN NO PENDING REQUEST P LDR* A3,A4 QUEUE THREAD 0 P ST A3,TTB:PP,A5 AND SAVE IN PENDING
0x14499c…144b30 Dummy {f00=0x005f, f01=0x018e, f02=»EBLK P LDR A4,A7 PARAMETER 2 P RB ACTOT ACTIVATE TASK * P* J P EJECT MSUBS T P* j P* t P* G E T B L K ~ P* 4 P* SUBROUTINE TO GET A FREE BLOCK FROM MONITOR 8 P* BLOCK POOL. REGISTERS A3-A1 ARE STORED IN FO
0x144b30…144cc4 Dummy {f00=0x005f, f01=0x0190, f02=» P* PGETBLK EQU * P INH " P STR A5,A15 SAVE A5 . , P LD A4,FREQUE FIRST BLOCK IN FREE QUEUE J P RF(NZ) GBL010 z P LDK A1,/B HALT PARAMETER , P CF A15,HALT HALT IF NO MORE FREE BLOCKS P* PGBL010 LDR* A5,A4 . P S
0x144cc4…144e58 Dummy {f00=0x005f, f01=0x0190, f02=»,A15 RESTORE A5 P* P IFT CPU852=1 " P RF IHRTN 8 P XIF J P* V P IFT CPU852=0 ` P RTN A15 v P XIF P* P EJECT MSUBS P* P* P* F R E B L K P* : P* SUBROUTINE TO GET PARAMETERS
0x144e58…144fec Dummy {f00=0x005f, f01=0x0190, f02=» z P* P* EXIT PARAMETERS: P* . & P* A3 = FIRST PARAMETER IN BLOCK 8 $ P* A2 = SECOND " " b $ P* A1 = THIRD " " P* P* PFREBLK EQU * P INH P LDR* A3,A4 UPDATE A3 P LD
0x144fec…145180 Dummy {f00=0x005f, f01=0x0190, f02=» P RF IHRTN P XIF P* & P IFT CPU852=0 0 P RTN A15 F P XIF V P* b P EJECT MSUBS l P* P* P* F N D D W T P* 2 P* SUBROUTINE TO FIND A DWT IN TTAB OR CDTAB. P* P* ENTRY PARAME
0x145180…145314 (1, 94) Dummy {f00=0x0060, f01=0x0190, f02=» = DWT INDEX * P* A6 = DWT ADDRESS IF FOUND, ELSE 0 P* B P* L P* F N D D W D V P* n * P* SUBROUTINE TO FIND A DWT IN CDTAB. x P* P* ENTRY PARAMETERS: P* P* A2 = FILE CODE P* $ P* EXIT PAR
0x145314…1454a8 Dummy {f00=0x0060, f01=0x0190, f02=»D FILE CODE FROM ECB P XIF P* ( P IFT MMUPAG=0 2 ( P LDR* A2,A8 LOAD FILE CODE FROM ECB H P XIF t P* P STR A1,A15 SAVE A1 P LDKL A6,TTB:TD+2 , P ADR A6,A5 ADDRESS TO TASK DEVICE TABLE P LD A1,-2,A6 TABLE LENGT
0x1454a8…14563c Dummy {f00=0x0060, f01=0x018e, f02=» FND200 FILE CODE FOUND ( P ADK A6,4 ADDRESS TO NEXT FILE CODE P RB FND100 TRY NEXT L P* h P EJECT MSUBS r P* $ P* SEARCH IN COMMON DEVICE TABLE P* PFNDDWD EQU * P STR A1,A15 SAVE A1 P* & PFND110 LD
0x14563c…1457d0 Dummy {f00=0x0060, f01=0x018e, f02=» & P RF(N) FND130 FILE CODE NOT FOUND ! P CC A2,1,A6 ! . " P RF(E) FND200 FILE CODE FOUND ! B ( P ADK A6,4 ADDRESS TO NEXT FILE CODE ! h & P RB FND120 TRY NEXT ENTRY IN CDTAB ! P* ! PFND130 LDK A6,0 ! P RF IHRET1 ! P* ! PFND200 EQU *
0x1457d0…145964 Dummy {f00=0x0060, f01=0x0190, f02=» P* " P* F N D T I D " P* " & B P* SUBROUTINE TO FIND TTAB ADDRESS FROM TASK IDENTIFICATION. " 0 P* " v P* ENTRY PARAMETER: " P* " P* A7 = TASK IDENTIFICATION " P* " P* EXIT PARAMETER: " P* " P* A2 = TTAB
0x145964…145af8 Dummy {f00=0x0060, f01=0x0190, f02=» TCTAB LENGTH " P AD A1,SCTTCT # P* # , PFTI010 SUK A1,2 # 6 P CW A1,SCTTCT # N $ P RF(E) FTI030 ALL TTABS EXAMINED # d P LDR* A2,A1 TTAB ADDRESS # , P CW A7,TTB:ID,A2 COMPARE IDENTIFICATIONS # P RB(NE) FTI010 NO MATCH # P RF IHRET1
0x145af8…145c8c Dummy {f00=0x0060, f01=0x0190, f02=» RESTORE REGISTERS AND RETURN WITHOUT # P* ENABLE INTERRUPTS. $ . P* $ L P* $ V P IFT CPU852=1 $ ` PIHRET8 LDR* A8,A15 $ v P LDR* A7,A15 $ P LDR* A6,A15 $ P LDR* A5,A15 $ P LDR* A4,A15 $ P* $ PIHRET3 LDR* A3,A15 $ P* $
0x145c8c…145e20 Dummy {f00=0x0060, f01=0x0190, f02=» ABR* A15 AND RETURN $ P XIF % P* % ( P IFT CPU852=0 % 2 0 PIHRET8 MLR 8,A15 RESTORE A1-A8 FROM STACK... % H P RTN A15 ...AND RETURN % | P* % 0 PIHRET2 MLR 2,A15 RESTORE A1-A2 FROM STACK... % P RTN A15 ...AND RETURN % P* % 0 PIHRET1 L
0x145e20…145fb4 (1, 95) Dummy {f00=0x0060, f01=0x0190, f02=» % P* & P* P F I N I T & P* & * & P* SUBROUTINE TO RESTART DEVICES. & 4 P* & ^ @ P* ALL RESTART ROUTINES GIVEN IN TABLE 'PFTAB' ARE CALLED. & h @ P* REGISTERS A1-A8 ARE AVAILABLE FOR THE RESTART ROUTINES. & P* & P* & PPFIN
0x145fb4…146148 Dummy {f00=0x0060, f01=0x0190, f02=»ED & v P STR A1,A15 SAVE A1 ' P INH ' & * P CFI A15,PFTAB,A1 CALL RESTART MODULE ' 2 P LDR* A1,A15 RESTORE A1 ' ` P ADK A1,2 NEXT DEVICE ' P RB PFI100 ' P* ' * PPFI110 RTN A15 RETURN WHEN ALL STARTED ' P* ' P EJECT MSUBS ' P
0x146148…1462dc Dummy {f00=0x0060, f01=0x018e, f02=»TR A1,A15 SAVE A1 ' P* ( PSWL481 EQU * ( $ $ P LDKL A1,/C0C0 PSW FOR LEVEL 48 ( 8 P* ( ` PSWL482 EQU * ( j & P ST A1,4,A15 SAVE IT ON A15 STACK ( ~ P LDR* A1,A15 RESTORE A1 ( P RTN A15 ( P* ( P EJECT MSUBS ( P* ( P* (
0x1462dc…146470 Dummy {f00=0x0060, f01=0x0190, f02=» 0 P* LEVEL := XY " " " " " XY < 48 ) P* ) 8 > P* THIS MODULE IS TO BE CALLED WITH 8 REGISTERS ON STACK. ) B P* ) P* ) PSWLXY EQU * ) P STR A1,A15 SAVE A1 ) " P LC A1,24,A15 LEVEL FROM STACK ) P ANK A1,/FC ) P SUK A
0x146470…146604 Dummy {f00=0x0060, f01=0x0190, f02=»BS ) P* * P* * & P* INTERRUPT SAVE AND HALT MODULE * P* * H P* * R PINTSAV DATA 0 * PSAVA15 DATA 0 * r P* * " PILLINT LDK A1,5 HALT PARAMETER * P CF A15,HALT * P* * PHALT EQU * * P IFT CPU852=1 * & P CF A15,SA
0x146604…146798 Dummy {f00=0x0060, f01=0x0190, f02=» A13,A15 * P STR A14,A15 + P XIF + $ P* + 0 P IFT CPU852=0 + : $ P MSR 14,A15 SAVE A1-A14 ON STACK + P P XIF + x P* + P ST A15,SAVA15 + ( P OTR A1,0,SOP INDICATE TYPE OF HALT + P HLT + P* + P EJECT MSUBS + P* + P*
0x146798…14692c Dummy {f00=0x0060, f01=0x0190, f02=»: + | P* , 6 P* A3 = SEGBLK ADDRESS (PAGBLK ADDRESS IF RELPA2) , " P* A5 = TTAB ADDRESS (RELPA2) , N P* , t P* EXIT PARAMETER: , ~ P* , P* A4 IS DESTROYED , P* , P* , P IFT DSKPAG=1 , PRELPA2 EQU * , 6 P CM TTB:SB
0x14692c…146ac0 Dummy {f00=0x0060, f01=0x018e, f02=» PAGE BLOCK ADDRESS , P* - PREL:10 EQU * - & " P LDKL A4,PAGQUE PAGQUE ADDRESS - : P ST A4,PAG:QB,A3 - ` 0 P LDR* A4,A4 ADDRESS OF FIRST BLOCK IN PAGQUE - x " P STR A4,A3 UPDATE QUEUE LINKS - P ST A3,PAGQUE - P ST A3,PAG:QB,A4 - 4 P LD A4,P
0x146ac0…146c54 (1, 96) Dummy {f00=0x0060, f01=0x018e, f02=» - x P* . , P CM PQEMTY INDICATE PAGE QUEUE NOT EMPTY . P LDR A4,A5 SAVE A5 . B ( P LDKL A5,TTABLD LDTASK TTAB ADDRESS . $ P CF A15,QTJOB RESTART LOAD TASK . P LDR A5,A4 RESTORE A5 . P* . PREL:20 EQU * . P IFT CPU852=1 . P RB IH
0x146c54…146de8 Dummy {f00=0x0060, f01=0x40b2, f02=» 2 PRELPAG EQU * DUMMY ENTRIES TO AVOID ASS. ERR. / PRELPA2 EQU * / : & P ABL LKMERR INDICATE SYSGEN ERROR / N P XIF / x P* / P* / P* / P END / @ / DR A5,A4 RESTORE A5 . P* . PREL:20 EQU * . P IFT CPU852=1 . P RB IH
0x146de8…146f7c Dummy {f00=0x0060, f01=0x2008, f02=» 0 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. "
0x146f7c…147110 Dummy {f00=0x0060, f01=0x018e, f02=» ** 2 P** WORK REGISTERS: A2 ** 4 2 P** ** j 2 P** SUBROUTINES: MOVING ** 2 P** **
0x147110…1472a4 Dummy {f00=0x0060, f01=0x0190, f02=» ` P RF(Z) CALL:10 NO! & P LD A2,PDDIVL,A10 YES! GET LENGTH " P SUR A2,A3 L " P RF(NN) CALL:20 ENOUGH SPACE? ^ P IFT MMUPAG=0 , P LD A2,SCTEFA+2 N0! GET END OF FREE AREA , P ST A2,LSTADR+STKCOM UPDATE LAST ADDRESS P XIF P I
0x1472a4…147438 Dummy {f00=0x0060, f01=0x018e, f02=»G+STKCOM UPDATE PHYSICAL PAGE NUMBER P XIF , P CM PDDIV+STKEND RESET FLAG 8 PCALL:20 EQU * $ P ST A2,PDDIVL,A10 UPDATE PDDIVL r PCALL:10 EQU * P CALL MOVING P RTN A14 P EJECT P 4 P** G E T W B
0x147438…1475cc Dummy {f00=0x0060, f01=0x0190, f02=» ^ 4 P** GET WORK BLOCK ADDRESS AND DISPLACE- ** 4 P** MENT IN T:A ** @ 4 P** ** x 4 P** INPUT : A8= POINTER TO T:A-ADD IN T:ATAB ** 4 P** BIT=BIT NUMBER SAT I
0x1475cc…147760 Dummy {f00=0x0060, f01=0x0190, f02=»** A11=W.B.-ADDRESS ** 4 P** WBADD=POINTER TO W.B.-ADD IN T:A ** 8 4 P*********************************************** p P PGETWB EQU * $ P LD A4,BIT+STKEND GET BIT NUMBER $ P SLL A4,2 ADJUST FOR ADD
0x147760…1478f4 (1, 97) Opaque[0x194]
0x1478f4…147a88 # DirEnt {nam=»TTMJOB«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0c18, f03=0x0000}
0x1478f4…147a88 IdxSect {
0x1478f4…147a88 f00 = 0x0060 // 0x1478f4 @0x0
0x1478f4…147a88 f01 = 0x0004 // 0x1478f6 @0x2
0x1478f4…147a88 gno = [ // 0x1478f8 @0x4
0x1478f4…147a88 [0x00]: C0x0060.0x3.0
0x1478f4…147a88 [0x01]: C0x0061.0x0.0
0x1478f4…147a88 ]
0x1478f4…147a88 }
0x147a88…147c1c Dummy {f00=0x0060, f01=0x0190, f02=» 2 P IDENT TTMJOB REL 11.0 81-01-26 870105041100 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
0x147c1c…147db0 Dummy {f00=0x0060, f01=0x0190, f02=»S n P ENTRY TTB:AP ACB ADDRESS P ENTRY TTMJOB TABLE ENTRY , ( P ENTRY TTB:QL DISPATCHER QUEUE LINK N & P ENTRY TTB:ID TASK IDENTIFICATION z P ENTRY TTB:ST TASK STATUS " P ENTRY TTB:PP PENDING POINTER & P ENTRY TTB:PW PROGRAM STATUS
0x147db0…147f44 Dummy {f00=0x0060, f01=0x018e, f02=»* . P***************************************** P* < P* CONDITIONAL ASSEMBLY F P* d . P***************************************** n P* . P* A PROGRAM VERSION USING TOSS MMU PAGING * P* IS OBTAINED BY SETTING MMUPAG EQU 1.
0x147f44…1480d8 Dummy {f00=0x0060, f01=0x0190, f02=» l P* * PTTB:MT EQU -40 MMU TABLE DISPLACEMENT P IFT MMUPAG=1 @ " P DATA /0000,/0400,/0800,/0C00 V " P DATA /1000,/1400,/1800,/1C00 | " P DATA /2000,/2400,/2800,/2C00 " P DATA /3000,/3400,/3800,/3C00 P XIF P* & PTTB:
0x1480d8…14826c Dummy {f00=0x0060, f01=0x0190, f02=»* 4 PTTB:SB EQU -4 SEGMENT BLOCK ADDRESS DISPLACEMENT P DATA 0 B P* R : PTTB:AP EQU -2 APPLICATION CONTROL BLOCK ADDRESS DISPL. P DATA 0 P* P EJECT TTMJOB P* P* PTTMJOB EQU * TTMJOB ENTRY . PTTB:QL
0x14826c…148400 Dummy {f00=0x0060, f01=0x0190, f02=»* $ PTTB:ST EQU *-TTMJOB TASK STATUS P DATA 49 2 P* B ( PTTB:PP EQU *-TTMJOB PENDING POINTER L P DATA 0 x P* PTTB:PW EQU *-TTMJOB 4 P DATA /C4C0 PROGRAM STATUS WORD FOR MONITOR JOB P* P EJECT TTMJOB P
0x148400…148594 (1, 98) Dummy {f00=0x0061, f01=0x4090, f02=»R A1-A14 j P DATA 0,0,0,0,0,0,0 P* , ( PTTB:TD EQU *-TTMJOB TERMINAL DEVICES 6 P* b P* l P* v P END @
0x148594…148728 Dummy {f00=0x0061, 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,
0x148728…1488bc Dummy {f00=0x0061, 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
0x1488bc…148a50 Dummy {f00=0x0061, f01=0x0190, f02=» PCPU852 EQU 1 P* * & . ** A PROGRAM VERSION USING TOSS DISC PAGING 0 * &* IS OBTAINED BY SETTING DSKPAG EQU 1. b * PDSKPAG EQU 0 * P* " PSOP EQU /2E SOP DEVICE ADDRESS P* P EJECT MSUBS P
0x148a50…148be4 Dummy {f00=0x0061, f01=0x0190, f02=» p P* P* PSAVE8 EQU * P INH INHIBIT INTERRUPTS 0 P STR A3,A15 P P STR A4,A15 d P STR A5,A15 x P STR A6,A15 P STR A7,A15 P STR A8,A15 , P LD A3,16,A15 LOAD P.C. (RETURN ADDRESS) , P ST A3,SAVE81 AN
0x148be4…148d78 Dummy {f00=0x0061, f01=0x018e, f02=»H BACK t PSAVE81 EQU *-2 P* $ P EJECT MSUBS . P* D P* N P* Q T J O B X P* n 2 P* SUBROUTINE TO QUEUE TASK FOR DISPATCHING. x P* P* ENTRY PARAMETER: P* 0 P* A5 = TTAB ADDRESS OF TASK TO BE QUEUED
0x148d78…148f0c Dummy {f00=0x0061, f01=0x018e, f02=» X P* PUT LAST IN QUEUE. P* & P* 0 PQTJOB EQU * : P INH N P* Z P IFT CPU852=1 d $ P STR A1,A15 SAVE A1-A3 ON STACK z P STR A2,A15 P STR A3,A15 P XIF P* P IFT CPU852=0 " P MSR 3,A15 SAVE A1
0x148f0c…1490a0 Dummy {f00=0x0061, f01=0x0190, f02=» d P RF(Z) QTJ020 DISQUE EMPTY & P LD A3,TTB:ST+1,A5 PRIORITY LEVEL * P* T P EJECT MSUBS ^ P* t P* ~ 6 PQTJ010 CC A3,TTB:ST+1,A2 COMPARE WITH QUEUED LEVEL P RF(L) QTJ020 INSERT P LDR A1,A2 SAVE ADDRESS * P LDR* A2,A
0x1490a0…149234 (1, 99) Opaque[0x194]
0x149234…1493c8 # DirEnt {nam=»TOSSIO«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0c28, f03=0x0000}
0x149234…1493c8 IdxSect {
0x149234…1493c8 f00 = 0x0061 // 0x149234 @0x0
0x149234…1493c8 f01 = 0x0024 // 0x149236 @0x2
0x149234…1493c8 gno = [ // 0x149238 @0x4
0x149234…1493c8 [0x00]: C0x0061.0x1.0
0x149234…1493c8 [0x01]: C0x0061.0x2.0
0x149234…1493c8 [0x02]: C0x0061.0x3.0
0x149234…1493c8 [0x03]: C0x0062.0x0.0
0x149234…1493c8 [0x04]: C0x0062.0x1.0
0x149234…1493c8 [0x05]: C0x0062.0x2.0
0x149234…1493c8 [0x06]: C0x0062.0x3.0
0x149234…1493c8 [0x07]: C0x0063.0x0.0
0x149234…1493c8 [0x08]: C0x0063.0x1.0
0x149234…1493c8 [0x09]: C0x0063.0x2.0
0x149234…1493c8 [0x0a]: C0x0063.0x3.0
0x149234…1493c8 [0x0b]: C0x0064.0x0.0
0x149234…1493c8 [0x0c]: C0x0064.0x1.0
0x149234…1493c8 [0x0d]: C0x0064.0x2.0
0x149234…1493c8 [0x0e]: C0x0064.0x3.0
0x149234…1493c8 [0x0f]: C0x0065.0x0.0
0x149234…1493c8 [0x10]: C0x0065.0x1.0
0x149234…1493c8 [0x11]: C0x0065.0x2.0
0x149234…1493c8 ]
0x149234…1493c8 }
0x1493c8…14955c Dummy {f00=0x0061, f01=0x0190, f02=» 4 P IDENT TOSSIO REL 11.0 DK 81-10-10 870105041100 P < ( P =4, CPU857 DEFINITION NOT CORRECT D P =4, REL 11.0 81-03-18 p . P =3, ORDERS IN ORDTAB CHANGED TO FIT TND P =3, REL 11.0 81-02-25 & P =2, CORRECTION OF UPDATE =1 =1
0x14955c…1496f0 Dummy {f00=0x0061, f01=0x0190, f02=»************************************************ P* 8 $ P* PHILIPS TERMINAL SYSTEM PTS B P* j ( P* TOSSIO = TOSS I/O LKM PROCESSOR t P* P* P* 6 P************************************************** P* P*
0x1496f0…149884 Dummy {f00=0x0061, f01=0x0190, f02=»TIALIZE I/O P* P* -TENDIO END I/O P* : P* -ATTACH ATTACH DEVICE D P* f P* -DETACH DETACH DEVICE p P* 8 P* -DC:MIN DATA COMMUNICATION MOVE ROUTINE (READ) P* 8 P* -DC:MOT DATA COMMUNICATION MOVE R
0x149884…149a18 Dummy {f00=0x0061, f01=0x0190, f02=» 8 P* THIS MODULE ALSO CONTAINS STANDARD DISPLACEMENT * P* VALUES FOR ECB, DWT AND DAB AREAS. D P* r P EJECT TOSSIO | P* P* P*********** P* ENTRIES * P*********** P* P* P ENTRY TIO I/O P
0x149a18…149bac Dummy {f00=0x0061, f01=0x0190, f02=»D I/O 0 P ENTRY QUEDEV QUEUE REQUEST IN DEVICE QUEUE 4 P ENTRY QUEFIL QUEUE FILE REQUEST IN DEVICE QUEUE B 2 P ENTRY DC:MIN MOVE ROUTINE FOR DATACOM, INPUT z 2 P ENTRY DC:MOT MOVE ROUTINE FOR DATACOM, OUTPUT 6 P ENTRY TIOMXI CONVERT LOGICAL ADDR
0x149bac…149d40 Dummy {f00=0x0061, f01=0x018e, f02=»NTRY ECBBA BUFFER ADDRESS " P ENTRY ECBRL REQUESTED LENGTH " " P ENTRY ECBEL EFFECTIVE LENGTH H P ENTRY ECBRC RETURN CODE n P ENTRY ECBCW CONTROL WORD P ENTRY ECBCW1 CONTROL WORD 1 P ENTRY ECBCW2 CONTROL WORD 2 2 P ENTRY DC:DIX DE
0x149d40…149ed4 (1, 100) Dummy {f00=0x0061, f01=0x0190, f02=» ` 0 P ENTRY MX:DIX DEVICE INDEX MULTIPLEX CHANNEL , P ENTRY KB:DIX DEVICE INDEX KEYBOARD/CTW < 6 P ENTRY IT:DIX DEVICE INDEX INTERTASK COMMUNICATION l $ P ENTRY DK:DIX DEVICE INDEX DISC $ P ENTRY BUFLEN MMU BUFFER LENGTH P* P EJECT
0x149ed4…14a068 Dummy {f00=0x0061, f01=0x0190, f02=»ADDRESS x 2 P ENTRY POLADR BUFFER POOL ADDRESS (DC DRIVERS) 4 P ENTRY HDRLEN BUFFER HEADER LENGTH (DC DRIVERS) F " P ENTRY RECADR RECOVERY ADDRESS ~ P ENTRY ECHADR ECHO ADDRESS $ P ENTRY DWTCHP CHANNEL PARAMETERS P ENTRY DWTST STATUS
0x14a068…14a1fc Dummy {f00=0x0061, f01=0x0190, f02=» ( P ENTRY DWTOCH LAST OUTPUT CHARACTER & P ENTRY DWTADR DRIVER ADDRESS BLOCK 0 P ENTRY DWTTAB TTAB ADDRESS Z * P ENTRY DWTWAT WAIT/ACTIVATE INDICATOR | P ENTRY DWTTQ TERMINAL QUEUE $ P ENTRY DWTOTQ OUTPUT QUEUE LINK " P ENTRY DWTUEC USER
0x14a1fc…14a390 Dummy {f00=0x0061, f01=0x0190, f02=»A4 SAVE AREA A4 P ENTRY DWTA5 SAVE AREA A5 & P ENTRY DWTSB1 STACK BASE 1 IN DWT : & P ENTRY DWTSB2 STACK BASE 2 IN DWT d P ENTRY DWTTP TIMER POINTER " P ENTRY DWTECH ECHO DEVICE DWT P ENTRY DWTSQ START OF QUEUE , P ENTRY DWTORD
0x14a390…14a524 Dummy {f00=0x0061, f01=0x018e, f02=»AREA A7 ~ P ENTRY DWTA8 SAVE AREA A8 & P ENTRY DWTCP2 CHANNEL PARAMETERS 2 2 * P ENTRY DWTLD1 LINE DRIVER DEPENDENT 1 * P ENTRY DWTLD2 LINE DRIVER DEPENDENT 2 ( P ENTRY DWTDEV TERMINAL DEVICE STATUS * P ENTRY DWTTBU PLC TEST BUFFER ADDRES
0x14a524…14a6b8 Dummy {f00=0x0061, f01=0x0190, f02=» P* P************* P* EXTERNALS * $ P************* : P* P P* Z " P EXTRN SAVE8 SAVE 8 REGISTERS d 0 P EXTRN IHRET8 RESTORE 8 REGISTERS AND RETURN 4 P EXTRN IHRTN RETURN WITHOUT ENABLING INTERRUPTS & P EXTRN ACTOTP ACTI
0x14a6b8…14a84c Dummy {f00=0x0061, f01=0x0190, f02=»G j P EXTRN TDISP DISPATCHER 2 P EXTRN DISEND BRANCH TO DISPATCHER VIA TENDIO * * P EXTRN LKMQDI QUEUE TASK AND DISPATCH ` * P EXTRN LKMERR HALT SYSTEM, FATAL ERROR , P EXTRN GETBLK PUT BLOCK IN PENDING QUEUE 2 P EXTRN FREBLK RELEASE BLOCK
0x14a84c…14a9e0 Dummy {f00=0x0061, f01=0x0190, f02=»XTRN TTB:ST TASK STATUS AND LEVEL & P EXTRN TTB:PW PROGRAM STATUS WORD * P EXTRN TTB:SA SAVE AREA T P EXTRN TTB:MT MMUTAB t P EXTRN HALT =1 P* P EJECT TOSSIO P* P* . P*****************************************
0x14a9e0…14ab74 (1, 101) Dummy {f00=0x0061, f01=0x0190, f02=»N USING TOSS MMU PAGING ~ * P* IS OBTAINED BY SETTING MMUPAG EQU 1. P* N PMMUPAG EQU 1 X P* l P* v 6 P* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION . P* SET IS OBTAINED BY SETTING CPU852 EQU 0. P* PCPU852 EQU 0
0x14ab74…14ad08 Dummy {f00=0x0061, f01=0x0190, f02=»U 0 PATTDET EQU X:A P* " P* , 4 P* A PROGRAM VERSION SPECIALIZED FOR THE 857 CPU 6 * P* IS OBTAINED BY SETTING CPU857 EQU 1. n P* PCPU857 EQU 1 =4 P* PX:C EQU 0 PTC8000 EQU X:C P EJECT TOSSIO
0x14ad08…14ae9c Dummy {f00=0x0061, f01=0x0190, f02=» 8,8 P* P EJECT TOSSIO P* . P* 8 P********************* B P* DWT DISPLACEMENTS * ` P********************* ~ P* 2 P* DEVICE WORK TABLE DISPLACEMENTS: FIXED PART P* & PDWTCHP EQU /00 CHANNEL PARAMETERS
0x14ae9c…14b030 Dummy {f00=0x0061, f01=0x0190, f02=» " PDWTOR EQU /06 INDEX AND ORDER ( PDWTOCH EQU /06 LAST OUTPUT CHARACTER * ( PDWTADR EQU /08 DRIVER ADDRESS BLOCK V PDWTTAB EQU /0A TTAB ADDRESS * PDWTWAT EQU /0C WAIT/ACTIVATE INDICATOR PDWTTQ EQU /0E TERMINAL QUEUE $ PDWTUEC EQU /10 U
0x14b030…14b1c4 Dummy {f00=0x0061, f01=0x018e, f02=» PART f P XIF P* P IFT MMUPAG=1 $ 4 PDWTDRD EQU DWTMEC+2 START OF DRIVER DEFINED PART : P XIF r P* ~ P EJECT TOSSIO P* , P* DWT DISPLACEMENTS: DRIVER DEFINED PART P* , PDWTOTQ EQU DWTDRD+/00 OUTPUT QUEUE L
0x14b1c4…14b358 Dummy {f00=0x0061, f01=0x0190, f02=» & PDWTA5 EQU DWTDRD+/06 SAVE AREA A5 . PDWTSB1 EQU DWTDRD+/0A STACK BASE 1 IN DWT . . PDWTSB2 EQU DWTDRD+/0E STACK BASE 2 IN DWT ` & PDWTTP EQU DWTDRD+/10 TIMER POINTER 4 PDWTORD EQU DWTDRD+/10 SAVE AREA INDEX AND ORDER & PDWTA7 EQU DWTDRD+/10
0x14b358…14b4ec Dummy {f00=0x0061, f01=0x0190, f02=»/14 CHANNEL PARAMETERS 2 ~ 2 PDWTLD1 EQU DWTDRD+/16 LINE DRIVER DEPENDENT 1 2 PDWTLD2 EQU DWTDRD+/18 LINE DRIVER DEPENDENT 2 V 0 PDWTDEV EQU DWTDRD+/1A TERMINAL DEVICE STATUS P 2 PDWTTBU EQU DWTDRD+/1A PLC TEST BUFFER ADDRESS * PDWTVOL EQU
0x14b4ec…14b680 Dummy {f00=0x0061, f01=0x0190, f02=»TTCW EQU DWTDRD+/1E PLC TEST PARAMETER ( PDWTSQ EQU DWTDRD+/2A START OF QUEUE . P* Z P EJECT TOSSIO d P* | P* P********************* P* DAB DISPLACEMENTS * P********************* P* ( P* DRIVER ADDRESS BLO
0x14b680…14b814 (1, 102) Dummy {f00=0x0062, f01=0x0190, f02=» INDEX | $ PACTADR EQU 0 ACTIVATION ADDRESS PABTADR EQU 2 ABORT ADDRESS 6 " PINTADR EQU 4 INTERRUPT ADDRESS X 2 PPOLADR EQU 4 BUFFER POOL ADDRESS (DC DRIVERS) ~ 2 PHDRLEN EQU 6 BUFFER HEADER LENGTH (DC DRIVERS) " PRECADR EQU 6 RECOVERY ADDRESS
0x14b814…14b9a8 Dummy {f00=0x0062, f01=0x0190, f02=»************* P* P* J P* THE VALUES ARE USED IN MMU SYSTEMS FOR SELECTING A SPECIAL ROUTINE * F P* FROM ADDRESS TABLES TIOTAB AND TENTAB AT READ/WRITE REQUESTS. x P* $ PDC:DIX EQU -2 DATA COMMUNICATION PDM:DIX EQU 0 DATA MA
0x14b9a8…14bb3c Dummy {f00=0x0062, f01=0x018e, f02=»QU 8 INTERTASK COMMUNICATION PDK:DIX EQU 10 DISC $ P* > P EJECT TOSSIO H P* ` P* j P********************* t P* ECB DISPLACEMENTS * P********************* P* ( P* EVENT CONTROL BLOCK DISPLACEMENTS P*
0x14bb3c…14bcd0 Dummy {f00=0x0062, f01=0x018e, f02=» PECBEL EQU 6 EFFECTIVE LENGTH PECBRC EQU 8 RETURN CODE ( PECBCW EQU 10 CONTROL WORD H PECBCW1 EQU 10 CONTROL WORD 1 j PECBCW2 EQU 12 CONTROL WORD 2 P* P EJECT TOSSIO P* P* P IFT MMUPAG=1 P* P
0x14bcd0…14be64 Dummy {f00=0x0062, f01=0x018e, f02=» P* 2 PTIOTAB EQU * DEVICE TYPE/ROUTINE ADDRESS TABLE . P DATA TIO:DM DATA MANAGEMENT, INPUT/OUTPUT D * P DATA TIOPCI PROGRAMMED CHANNEL, INPUT v P DATA TIOMXI MUX, INPUT $ P DATA TIOKBI KEYBOARD/CTW, INPUT 0 P DATA TIOITI INTERTASK COMMU
0x14be64…14bff8 Dummy {f00=0x0062, f01=0x0190, f02=» f P DATA TIOMXO MUX, OUTPUT & P DATA TIOKBO KEYBOARD/CTW, OUTPUT ( 0 P DATA TIOITO INTERTASK COMMUNICATION, OUTPUT R P DATA TIODKO DISC, OUTPUT P* P EJECT TOSSIO P* P* P********** P* TENTAB * P******
0x14bff8…14c18c Dummy {f00=0x0062, f01=0x0190, f02=»RESS TABLE l . P DATA TEN:DM DATA MANAGEMENT, INPUT/OUTPUT * P DATA TENPCI PROGRAMMED CHANNEL, INPUT D P DATA TENMXI MUX, INPUT r $ P DATA TENKBI KEYBOARD/CTW, INPUT 0 P DATA TENITI INTERTASK COMMUNICATION, INPUT P DATA TENDKI DISC, INPUT
0x14c18c…14c320 Dummy {f00=0x0062, f01=0x0190, f02=»NITO INTERTASK COMMUNICATION, OUTPUT P DATA TENDKO DISC, OUTPUT , P XIF N P* Z P EJECT TOSSIO d P* | P* P********** P* MONMMU * P********** P* P* MONITOR (SYSTEM) MMU TABLE P* PMONMMU EQU
0x14c320…14c4b4 (1, 103) Dummy {f00=0x0062, f01=0x0190, f02=»0 t " P DATA /3000,/3400,/3800,/3C00 P XIF 0 P* < P EJECT TOSSIO F P* ^ P* h P IFT ATTDET=1 r P* 2 P* SUBROUTINES BELOW ARE USED BY ATTACH/DETACH P* P* T I M O U T P* P* INPUT: A1 = DWT ADD
0x14c4b4…14c648 Dummy {f00=0x0062, f01=0x0190, f02=» t P* A6 = DWT ADDRESS " P* A1-A3 ARE DESTROYED * P* P PTIMOUT LDR A6,A1 Z & P LDR* A2,A2 TIMER POINTER ADDRESS r P LD A5,2,A2 TTAB ADDRESS P CF A15,FNDBLK P LDR* A1,A4 " P STR A1,A2 REMOVE FROM ATT:CH
0x14c648…14c7dc Dummy {f00=0x0062, f01=0x0190, f02=» & P ADK A1,DWTTQ QUEUE ANCHOR ADDRESS P* . PTIM:10 LDR A2,A1 SAVE 8 P LDR* A1,A1 NEXT IN QUEUE V , P RF(Z) TIM:20 ERROR IN QUEUE HANDLING =1 x P CWR A1,A5 P RB(NE) TIM:10 NOT FOUND P* P EJECT TOSSIO P* & P*
0x14c7dc…14c970 Dummy {f00=0x0062, f01=0x0190, f02=»DATE DISPATCH ADDRESS | 6 P LD A8,TTB:SA+16,A5 ECB ADDRESS FROM A8 SAVE AREA ! P LDK A3,/40 SET TIMEOUT BIT ! X P* ! | P IFT MMUPAG=0 ! * P ST A3,ECBRC,A8 INDICATE ERROR IN ECB ! P XIF ! P* ! P IFT ATTDET=1 ! P IFT MMUPAG=1 !
0x14c970…14cb04 Dummy {f00=0x0062, f01=0x0190, f02=» TABLE ! l P XIF " P* " P IFT ATTDET=1 " $ & P RF TIORTN QUEUE TASK AND DISPATCH " : PTIM:20 EQU * =1 " d P LDK A1,1 INDICATE ERROR =1 " | P CF A15,HALT =1 " P* " P EJECT TOSSIO " P* " P* F N D B L K " P* " ( P* SU
0x14cb04…14cc98 Dummy {f00=0x0062, f01=0x0190, f02=»K IN CHAIN " h 2 P* A4 = BLOCK ADDRESS IF FOUND, ELSE 0 # P* # H ( PFNDBLK LDKL A4,ATT:CH ANCHOR ADDRESS # R P* # ~ PFND:10 LDR A2,A4 SAVE A4 # P LDR* A4,A4 # P RF(Z) FND:20 END OF ATT:CH # P CW A5,4,A4 # P RB(NE) FND:10 NOT F
0x14cc98…14ce2c Dummy {f00=0x0062, f01=0x0190, f02=»FT CPU852=0 # P RTN A15 RETURN $ P XIF $ , P* $ 8 P IFT ATTDET=1 $ B & PATT:CH DATA 0 ATTACH CHAIN ANCHOR $ X P* $ P EJECT $ P* $ P* F R A B L K =1 $ P* $ 0 P* FREE BLOCK AND TIMER IN ATT:CH IF FOUND =1 $ P* $ P*
0x14ce2c…14cfc0 Dummy {f00=0x0062, f01=0x018e, f02=»1 =1 $ ~ * P CF A15,FNDBLK FIND BLOCK IN ATT:CH =1 % P ADK A4,0 SET CR =1 % : . P RF(Z) FRAEND TASK NOT FOUND IN ATT:CH =1 % V P CM* 2,A4 FREE TIMER =1 % & P LDR* A3,A4 REMOVE FROM ATTACH =1 % P STR A3,A2 =1 % $ P CF A15,FREBLK RELEASE BLOCK =1
0x14cfc0…14d154 (1, 104) Dummy {f00=0x0062, f01=0x0190, f02=» P********** & P* ATTACH * & P********** & ( P* & : P* & D * P* THIS MODULE IS CALLED FROM TIO WITH & N P* THE FOLLOWING PARAMETERS: & | P* & & P* A3 /8000 (REQUEST ERROR BIT) & & P* A4 I/O AND ACTIVATE INDICATOR & P* A5 TT
0x14d154…14d2e8 Dummy {f00=0x0062, f01=0x018e, f02=» A12 ADDRESS TO DRIVER ADDRESS BLOCK & P* A13 DWT STATUS ' . P* ' H PATTACH EQU * ENTRY ' R P ADK A4,0 SET CR ' l * P RF(NZ) TIOERR I/O AND ACTIVATE ERROR ' P* ' P IFT MMUPAG=0 ' " P CM ECBRC,A8 RESET RETURN CODE ' P XIF ' P* '
0x14d2e8…14d47c Dummy {f00=0x0062, f01=0x0190, f02=» P* ( P* ( P IFT ATTDET=1 ( P TM A10,A13 ( . * P RF(NZ) ATT:40 DEVICE ALREADY ATTACHED ( B P LDR A13,A13 ( p P RF(NN) ATT:50 DEVICE BUSY ( P* ( P* ATTACH REQUESTING TASK ( P* ( P ORS A10,DWTST,A6 ATTACH ( , P ST A5,DWT
0x14d47c…14d610 Dummy {f00=0x0062, f01=0x0190, f02=» TASK ( l P* ) PATT:50 EQU * =1 ) P* ) 0 P* SET TIMER ) : P* ) R P IFT MMUPAG=0 ) P LD A1,ECBCW,A8 TIME ) r P XIF ) P* ) P EJECT TOSSIO ) P* ) P* ) P IFT ATTDET=1 ) P IFT MMUPAG=1 ) P EL A1,ECBCW
0x14d610…14d7a4 Dummy {f00=0x0062, f01=0x0190, f02=» PATT:60 ST A1,ATTIM * P LDR A1,A5 TTAB ADDRESS * P LD A3,ATT:CH ANCHOR * > P CF A15,GETBLK BLOCK * Z P ST A4,ATT:CH UPDATE ANCHOR * v $ P ADK A4,2 TIMER POINTER ADDRESS * P LDR A1,A6 DWT ADDRESS * P CF A15,SETIMP SET TIMER * P DATA TI
0x14d7a4…14d938 Dummy {f00=0x0062, f01=0x0190, f02=»DK A3,/40 SET TIME OUT BIT * P RF TIOERR RETURN + " P* + < P EJECT TOSSIO + F P* + ^ P* + h P********** + r P* DETACH * + P********** + P* + * P* THIS MODULE IS CALLED FROM TIO WITH + $ P* THE SAME PARAMETERS AS ATTACH. + P
0x14d938…14dacc Dummy {f00=0x0062, f01=0x0190, f02=»T ATTACHED + P CW A5,DWTTAB,A6 , * P RF(NE) TIOERR ATTACHED TO OTHER TASK , * P XRS A10,DWTST,A6 DETACH , X $ P LDR A7,A5 SAVE TTAB ADDRESS =1 , x P LD A5,DWTTQ,A6 QUEUE ANCHOR , P RF(Z) DET:10 QUEUE EMPTY , 2 P CF A15,FRABLK FREE ATTACH BLOCK A
0x14dacc…14dc60 Dummy {f00=0x0062, f01=0x0190, f02=»10 EQU * , & P LDR A5,A7 RESTORE TTAB ADDRESS =1 - P* - : 2 PATTRTN EQU * COMMON ATTACH/DETACH NORMAL EXIT - D PDETRTN LDK A3,0 RETURN CODE - z P XIF - P* - P EJECT TOSSIO - P* - P* - P********** - P* TIOERR * - P****
0x14dc60…14ddf4 (1, 105) Dummy {f00=0x0062, f01=0x018e, f02=»'. - n P* . PTIOERR EQU * . P IFT MMUPAG=0 . ( * P ST A3,ECBRC,A8 SET RETURN CODE IN ECB . > ( P CM ECBEL,A8 RESET EFFECTIVE LENGTH . l P XIF . P* . P IFT MMUPAG=1 . * P ES A3,ECBRC,A8 SET RETURN CODE IN ECB . P LDK A3,0 . * P ES
0x14ddf4…14df88 Dummy {f00=0x0062, f01=0x0190, f02=» P EJECT TOSSIO / P* / P* / & P**************** / 0 P* QUEUE DEVICE * / H P**************** / ` P* / x P* / 8 P* THIS IS THE ROUTINE FOR QUEUEING DEVICE REQUESTS. / > P* THE ROUTINE IS ENTERED AT DIFFERENT LABELS DEPENDING ON / @
0x14df88…14e11c Dummy {f00=0x0062, f01=0x0190, f02=»CHED, WHETHER THE DEVICE IS ATTACHED TO THE TASK OR NOT. / P* 0 @ P IFT ATTDET=1 0 J P* 0 ` P* QUEUE ECHO DEVICE FIRST 0 j P* 0 PTIOQ00 LDR A6,A2 0 P* 0 P* QUEUE DEVICE FIRST 0 P* 0 $ PTIOQ05 ADK A6,DWTTQ QUEUE ANCHOR 0 P L
0x14e11c…14e2b0 Dummy {f00=0x0062, f01=0x0190, f02=» P* 1 . PQUEDEV EQU * ENTRY USED BY FILE MANAGEMENT 1 $ PTIOQ20 ADK A6,DWTTQ QUEUE ANCHOR 1 @ P* 1 h . PQUEFIL EQU * ENTRY USED BY FILE MANAGEMENT 1 r P LD A1,TTB:ST+1,A5 LEVEL 1 P* 1 P EJECT TOSSIO 1 P* 1 * P* SEARCH QUEUE FOR PLACE
0x14e2b0…14e444 Dummy {f00=0x0062, f01=0x0190, f02=»TB:ST+1,A6 COMPARE LEVELS 1 P RB(NL) TIOQ30 TRY NEXT 2 " P* 2 B 0 P* INSERT IN QUEUE AND UPDATE PROGRAM COUNTER 2 L P* 2 PTIOQ40 LDKL A3,-4 2 P STR A6,A5 INSERT IN QUEUE 2 P STR A5,A2 2 P ADK A4,0 SET CR 2 P RF(Z) TIOQ50 NO ACTIVAT
0x14e444…14e5d8 Dummy {f00=0x0062, f01=0x0190, f02=» ABL TDISP GO TO DISPATCHER 2 P* 3 $ P EJECT TOSSIO 3 . P* 3 F P* 3 P P******* 3 Z P* TIO * 3 j P******* 3 z P* 3 P* 3 4 P* THIS MODULE IS ENTERED WHEN TASK INPUT/OUTPUT 3 2 P* IS REQUIRED. IF A REQUEST CANNOT BE SERVICED 3
0x14e5d8…14e76c Dummy {f00=0x0062, f01=0x0190, f02=»OPTION SPECIAL DEVICE 3 x * P* DEPENDENT SUBROUTINES ARE PERFORMED. 4 P* 4 L 6 P* THIS MODULE IS CALLED BY THE LKM HANDLING MODULE 4 V & P* WITH THE FOLLOWING PARAMETERS:- 4 P* 4 . P* A1 = PARAMETER WHEN I/O AND ACTIVATION 4 P* 4 $ P* A4 =
0x14e76c…14e900 Dummy {f00=0x0062, f01=0x0190, f02=»R CODE 4 P* 5 P* A8 = ECB ADDRESS 5 P* 5 4 P EJECT TOSSIO 5 > P* 5 V P* 5 ` < P* THE 'TIO'-ROUTINE EXITS TO REQUESTED ACTIVATION DRIVER 5 j * P* WITH THE FOLLOWING REGISTER VAULES:- 5 P* 5 P* A5 = STACK BASE 2 IN DWT 5 P*
0x14e900…14ea94 (1, 106) Dummy {f00=0x0063, f01=0x0190, f02=»TO DRIVER ADDRESS BLOCK 5 P* 6 0 P* A13 = 0, IF REQUEST ISSUED IN SYSTEM MODE 6 * . P* = 1, " " " " USER MODE 6 ^ P* 6 P* 6 , P* THE FOLLOWING DWT FIELDS ARE UPDATED:- 6 P* 6 " P* -DWTOR DWT INDEX AND ORDER 6 P* -
0x14ea94…14ec28 Dummy {f00=0x0063, f01=0x0190, f02=» . P* -DWTUEC USER ECB ADDRESS (MMU SYSTEMS) 7 P* 7 6 P* 7 @ * P* THE FOLLOWING ECB FIELDS ARE RESET:- 7 J P* 7 x P* -BIT 0 IN THE FIRST WORD 7 P* -ECBEL EFFECTIVE LENGTH 7 P* -ECBRC RETURN CODE 7 P* 7 P EJECT TOSSIO 7
0x14ec28…14edbc Dummy {f00=0x0063, f01=0x0190, f02=» * ENTRY USED BY FILE MANAGEMENT 7 P CF A15,SWITCH SWITCH LEVEL 8 ( P INH 8 L P LDKL A3,/8000 8 X P ADK A6,0 SET CR 8 n $ P RB(Z) TIOERR FILE CODE UNKNOWN 8 6 P LD A12,DWTADR,A6 ADDRESS TO DRIVER ADDRESS BLOCK 8 P LD A13,DWTST,A6 DWT STATUS 8
0x14edbc…14ef50 Dummy {f00=0x0063, f01=0x0190, f02=»T=1 8 P LDKL A10,/0800 ATTACH BIT 9 P CCK A7,/BB00 9 . P RB(E) ATTACH ATTACH ORDER 9 D P CCK A7,/BC00 9 f P RB(E) DETACH DETACH ORDER 9 | P TM A10,A13 9 P RF(Z) TIO020 NOT ATTACHED 9 P CW A5,DWTTAB,A6 9 * P RB(NE) TIOQ20 ATTACHED TO O
0x14ef50…14f0e4 Dummy {f00=0x0063, f01=0x0190, f02=»O020 EQU * 9 P TM A3,A13 : P RB(Z) TIOQ20 DEVICE BUSY : $ P* : F P EJECT TOSSIO : P P* : h H P* CHECK IF ECHO, AND WHEN TRUE CHECK IF ECHO DEVICE IS BUSY/ATTACHED : r P* : * PTIO030 SC A2,DWTOR,A6 STORE DWT INDEX : P LDK A2,/40 CHECK
0x14f0e4…14f278 Dummy {f00=0x0063, f01=0x0190, f02=»KEYBOARD : x 4 P RF(NZ) TIO070 ECHO NOT ALLOWED IF NOT KEYBOARD ; , P LD A2,DWTECH,A6 ECHO DEVICE DWT ADDRESS ; H P RF(Z) TIO070 NO ECHO DEVICE ; x $ P LD A14,DWTST,A2 ECHO DWT STATUS ; P* ; P IFT ATTDET=1 ; P TM A10,A14 ; * P RF(Z) TIO050 EC
0x14f278…14f40c Dummy {f00=0x0063, f01=0x0190, f02=») TIO060 ECHO DEVICE NOT BUSY ; & P RB TIOQ00 BUSY, QUEUE ECHO DEVICE < & P XIF < P P* < P EJECT TOSSIO < f P* < ~ P* < PTIO050 TM A3,A14 < " P RB(Z) TIOQ10 ECHO DEVICE BUSY < P* < PTIO060 LDKL A3,/A000 < : P XRS A3,DWTST,A2 U
0x14f40c…14f5a0 Dummy {f00=0x0063, f01=0x0190, f02=» ECHO BITS IN DWT STATUS < l P* = P IFT MMUPAG=1 = * P LD A13,TTB:PW,A5 PSW = @ $ P ANKL A13,1 SYSTEM/USER MODE BIT = ^ $ P RF(NZ) TIO100 JUMP IF USER MODE = P LDKL A2,/7FFF = , P ANRS A2,A8 RESET BIT 0 IN ECB FILE CODE = , P ST A8,DWTECB,A6 SET
0x14f5a0…14f734 (1, 107) Dummy {f00=0x0063, f01=0x0190, f02=» P EJECT TOSSIO > P* > P* MOVE USER ECB TO DWT ECB > & P* > H PTIO100 EQU * > R P LDKL A2,/4FFF > f * P ELR A3,A8 LOAD FIRST WORD OF USER ECB > | 0 P ANR A3,A2 RESET BITS 0,2,3 IN ECB FILE CODE > P ESR A3,A8 > ( P LD A2,DWTMEC,A6 DWT MMU
0x14f734…14f8c8 Dummy {f00=0x0063, f01=0x0190, f02=» A9,A8 > P LDK A3,0 ? * P ES A3,ECBEL,A8 RESET EFFECTIVE LENGTH ? & P ES A3,ECBRC,A8 RESET RETURN CODE ? N P* ? x P LDR A10,A1 SAVE PARAMETER ? P LDR A1,A8 ? P ADK A1,ECBRL ? ( P LDR A8,A2 SET A8 TO DWT ECB ADDRESS ? P ADK A2,ECBRL ?
0x14f8c8…14fa5c Dummy {f00=0x0063, f01=0x018e, f02=»FT MMUPAG=0 ? P LDKL A3,/7FFF @ , P ANRS A3,A8 RESET BIT 0 IN ECB FILE CODE @ * ( P CM ECBEL,A8 RESET EFFECTIVE LENGTH @ Z $ P CM ECBRC,A8 RESET RETURN CODE @ P XIF @ P* @ P EJECT TOSSIO @ P* @ P* @ PTIO110 EQU * @ P ECR
0x14fa5c…14fbf0 Dummy {f00=0x0063, f01=0x0190, f02=» P* A PTIO120 EQU * A P LDR A3,A7 A " P ANK A7,/3F A 4 ( P SC A7,DWTOR+1,A6 STORE ORDER IN DWT A H 0 P ST A5,DWTTAB,A6 SAVE TTAB ADDRESS IN DWTTAB A t P* A PTIO130 EQU * A P IFT MMUPAG=0 A & P ST A8,DWTECB,A6 SET ECB ADDRESS A P X
0x14fbf0…14fd84 Dummy {f00=0x0063, f01=0x018e, f02=»ETER A z & P RF(NZ) TIO210 I/O AND ACTIVATION B 4 P ANK A3,/80 NORMAL I/O. CHECK IF WAIT REQUESTED B 6 P RF(Z) TIO220 NOT WAIT B n P LDK A4,1 INDICATE WAIT B P RF TIO230 B P* B P* I/O WITH ACTIVATION B P* B < PTIO210 CF A15,GETBLK SAV
0x14fd84…14ff18 Dummy {f00=0x0063, f01=0x0190, f02=» B P* WAIT C P* C 8 PTIO230 ST A4,DWTWAT,A6 STORE WAIT/ACTIVATE INDICATOR C P* C P EJECT TOSSIO C f P* C ~ P* C P IFT MMUPAG=1 C * P LDR A13,A13 CHECK IF SYSTEM/USER MODE C & P RF(Z) TIO250 JUMP IF SYSTEM MODE C " P LD A3,D
0x14ff18…1500ac Dummy {f00=0x0063, f01=0x0190, f02=» IF DISC C | P RF(NE) TIO235 NOT DISC D ( P CF A15,TIOCW2 MOVE 2ND CONTROL WORD D 0 P* D " P* PERFORM CHECK ON ORDER CODE D f P* D PTIO235 EQU * D P LDR A4,A7 ORDER CODE D 0 P CF A15,RD:WR2 CHECK IF ORDER IS READ/WRITE D . P RF(Z) TIO25
0x1500ac…150240 Dummy {f00=0x0063, f01=0x0190, f02=» D X P XIF E P* E * PTIO250 ENB GIVE OTHER TASKS A CHANCE E P* E L * PTIO260 LDK A5,DWTSB2 LOAD STACK BASE 2 E V P ADR A5,A6 E P INH E & P ABR* A12 GO TO DRIVER ACTIVATION E P* E P EJECT TOSSIO E P* E P* E P******
0x150240…1503d4 (1, 108) Dummy {f00=0x0063, f01=0x0190, f02=» E l ( P* IF CPU852, " " " " 16 F ( P* IF CPU857, " " " " 16 F 4 P* F ` $ P* A3 IS DESTROYED, AND SO IS CR F j P* F & PSWITCH EQU * SWITCH LEVEL ON STACK F P IFT TC8000=0 F P IFF CPU852+CPU857=0 =4 F P LDK A3,/40
0x1503d4…150568 Dummy {f00=0x0063, f01=0x0190, f02=» F | P LDK A3,/30 CPU851: LEVEL 12 G P XIF G , P* G 8 P* G B ( P SC A3,2,A15 SET NEW LEVEL ON STACK G L " P RTN A15 RETURN WITH NEW LEVEL G x P* G P EJECT TOSSIO G P* G P* G P IFT MMUPAG=0 G 0 PTIOMXI EQU * DUMMY ENTRY IN NO
0x150568…1506fc Dummy {f00=0x0063, f01=0x0190, f02=» P* H @ P* THIS MODULE IS CALLED BY 'TIO' AND 'TENDIO' FOR SELECTING H @ P* THE APPROPRIATE ROUTINE AT READ/WRITE REQUESTS, DEPENDING H R > P* ON THE DEVICE CONNECTION (PROGRAMMED CHANNEL, MUX ETX). H > P* IF NO READ/WRITE REQUEST, CONDITION REGISTER O
0x1506fc…150890 Dummy {f00=0x0063, f01=0x0190, f02=» H v P* I : P* OUTPUT: A3 = INDEX FOR USE IN THE INDEXED BRANCHING I . P* CR = 0 IF NO READ/WRITE REQUEST I P , P* CR <> 0 IF READ/WRITE REQUEST I P* A4 IS DESTROYED I P* I , PRD:WR LD A4,DWTOR,A6 ORDER CODE FROM DWT I P A
0x150890…150a24 Dummy {f00=0x0063, f01=0x0190, f02=»)* A15 RETURN IF NO READ/WRITE ORDER I P SUK A4,1 J , $ P ADR A3,A4 ADD READ/WRITE INDEX J > ( P ABR* A15 RETURN WITHOUT CHANGING CR J f P* J P EJECT TOSSIO J P* J P* J P********** J P* ORDTAB * J P********** J P* J 2 P
0x150a24…150bb8 Dummy {f00=0x0063, f01=0x0190, f02=»: WRITE ORDER J P* K PORDTAB EQU * ORDER CONSTANTS K P BYTES 0,1 /00, /01 K D P BYTES 1,1 /02, /03 K ` P BYTES 0,TINDEX+1 /04, /05 K | & P BYTES TINDEX+1,TINDEX+1 /06, /07 K P BYTES TINDEX+1,0 /08, /09 K P BYTES 1,TINDEX+1 /0A, /0B K
0x150bb8…150d4c Dummy {f00=0x0063, f01=0x0190, f02=»4, /15 K | P BYTES 0,0 /16, /17 L P BYTES 0,0 /18, /19 L * P BYTES 0,0 /1A, /1B L F P BYTES 0,0 /1C, /1D L b P BYTES 0,0 /1E, /1F L ~ P BYTES 0,TINDEX+1 /20, /21 L P BYTES TINDEX+1,0 /22, /23 L P BYTES TINDEX+1,0 /24, /25 L P BYTES 0
0x150d4c…150ee0 Dummy {f00=0x0063, f01=0x0190, f02=»X+1 /2E, /2F L P BYTES 0,0 /30, /31 M P BYTES 0,0 /32, /33 M 0 P BYTES 0,0 /34, /35 M L P BYTES 0,0 /36, /37 M h P BYTES 0,0 /38, /39 M P BYTES 0,0 /3A, /3B M P BYTES 0,0 /3C, /3D M P BYTES 0,0 /3E, /3F M P* M P EJECT T
0x150ee0…151074 (1, 109) Dummy {f00=0x0063, f01=0x0190, f02=»S BEEN ISSUED. M x 4 P* THE CORRESPONDING MODULE CALLED BY 'TENDIO' AT N , P* COMPLETION OF THE REQUEST IS 'TEN:DM'. N N P* N ~ " P* INPUT: A8 = DWT ECB ADDRESS N $ P* A9 = USER ECB ADDRESS N P* N P* OUTPUT: A2 IS DESTROYED N P* N
0x151074…151208 Dummy {f00=0x0063, f01=0x0190, f02=»W2 EQU * N ( P EL A2,ECBCW2,A9 SECOND CONTROL WORD O P ST A2,ECBCW2,A8 O < P* O T PA15RTN EQU * O ^ P RTN A15 O r P* O P EJECT TOSSIO O P* O P* T I O P C I O P* O B P* THIS MODULE IS CALLED BY 'TIO' WHEN A READ REQUEST HAS B
0x151208…15139c Dummy {f00=0x0063, f01=0x0190, f02=» ARE O V < P* EVEN OR UNEVEN, DEPENDING ON THE USER BUFFER ADDRESS. P 4 P* THE CORRESPONDING MODULE CALLED BY 'TENDIO' AT P L , P* COMPLETION OF THE REQUEST IS 'TENPCI'. P 4 P* NOTICE THAT ENTRY TIPI05 IS USED BY 'TIOKBI'. P P* P " P* INPUT: A8 = DWT
0x15139c…151530 Dummy {f00=0x0063, f01=0x0190, f02=»STROYED P ~ P* Q * PTIOPCI EQU * PROGRAMMED CHANNEL, INPUT Q $ P LD A1,ECBRL,A8 REQUESTED LENGTH Q H 2 P CW A1,BUFLEN,A12 COMPARE WITH DWT BUFFER SIZE Q p 6 P RF(G) IO:ERR REQ. LENGTH EXCEEDS DWT BUFFER SIZE Q P* Q . PTIPI05 EQU * ENTRY POINT USED
0x151530…1516c4 Dummy {f00=0x0063, f01=0x0190, f02=»ECBBA,A8 Q P RTN A15 R P* R 0 PTIPI10 SUK A1,2 MAKE DWT BUFFER ADDRESS EVEN R * P ANS A1,ECBBA,A8 R ^ P RTN A15 R v P* R P EJECT TOSSIO R P* R P* T I O M X I R P* R B P* THIS MODULE IS CALLED BY 'TIO' WHEN A READ REQUEST H
0x1516c4…151858 Dummy {f00=0x0063, f01=0x0190, f02=»H IS R Z , P* TRANSFERRED TO THE MUX BY THE DRIVER. S 4 P* THE CORRESPONDING MODULE CALLED BY 'TENDIO' AT S < , P* COMPLETION OF THE REQUEST IS 'TENMXI'. S t N P* NOTICE THAT MODULES 'TIOMXO', 'TIODKI' AND 'TIODKO' ARE EQUAL TO TIOMXI. S P* S P* INPUT:
0x151858…1519ec Dummy {f00=0x0063, f01=0x0190, f02=»D S t B P* 18 BIT USER BUFFER ADDRESS IS TRANSFERRED TO DWT ECB T P* T P PTIOMXI EQU * MUX, INPUT T Z P LDK A1,0 T z 2 P EL A2,ECBBA,A9 USER BUFFER ADDRESS (LOGICAL) T " P DLL 4 4 LEFTMOST BITS INTO A1 T P ADR A1,A1 DOUBLE INDEX T P
0x1519ec…151b80 Dummy {f00=0x0063, f01=0x0190, f02=» SET BITS 0-1 IN DWT ECB 1ST WORD T 0 P ST A2,ECBBA,A8 BITS 2-17 IN 18-BIT ADDRESS U * P RTN A15 U ^ P* U n P EJECT TOSSIO U x P* U P* T I O K B I U P* U B P* THIS MODULE IS CALLED BY 'TIO' WHEN A READ REQUEST HAS BEEN U N P* ISSUED
0x151b80…151d14 (1, 110) Dummy {f00=0x0064, f01=0x0190, f02=» 'TIOPCI' AND ENTRY TIPO05 IN 'TIOPCO'. U 4 P* THE CORRESPONDING MODULE CALLED BY 'TENDIO' AT V 0 , P* COMPLETION OF THE REQUEST IS 'TENKBI'. V h P* V P* INPUT: A6 = DWT ADDRESS V P* A7 = ORDER CODE V " P* A8 = DWT ECB ADDRESS V P* A
0x151d14…151ea8 Dummy {f00=0x0064, f01=0x0190, f02=»OKBI EQU * KEYBOARD/CTW V $ P LD A1,ECBRL,A8 REQUESTED LENGTH W 2 P CW A1,BUFLEN,A12 COMPARE WITH DWT BUFFER SIZE W H 6 P RF(G) IO:ERR REQ. LENGTH EXCEEDS DWT BUFFER SIZE W ~ 6 P CF A15,TIPI05 CHECK AND CORRECT BUFFER ADDRESSES W P CWK A7,1 CHECK ORDER
0x151ea8…15203c Dummy {f00=0x0064, f01=0x0190, f02=» P* X P EJECT TOSSIO X P* X & P* X 0 P LDR A1,A9 X : P ADK A1,8 X L P ADKL A8,12 X ^ * P ST A8,-2,A8 SET DWT KEYTABLE ADDRESS X r P SUKL A8,4 X * P ELR A3,A4 FIRST WORD OF USER KEYTABLE X P ANK A4,1 X * P RF(NZ) TIKB10 KEYTABL
0x15203c…1521d0 Dummy {f00=0x0064, f01=0x0190, f02=»1 X 0 P CW A3,KEYLEN,A12 CHECK KEYTABLE BUFFER SIZE Y P RF(G) IO:ERR TOO SMALL Y > P CF A15,TIPO05 Y ^ & P SUKL A8,8 ADJUST DWT ECB ADDRESS Y t P* Y PTIKB20 EQU * Y P RTN A15 Y P* Y P EJECT TOSSIO Y P* Y P* T I O I T I Y
0x1521d0…152364 Dummy {f00=0x0064, f01=0x018e, f02=», INPUT Y z P* Z P EJECT TOSSIO Z P* Z 2 P* T I O P C O Z < P* Z R B P* THIS MODULE IS CALLED BY 'TIO' WHEN A WRITE REQUEST HAS BEEN Z > P* ISSUED AND THE DEVICE IS RUNNING ON PROGRAMMED CHANNEL. Z B P* TIOPCO CHECKS THAT REQUESTED LENGT
0x152364…1524f8 Dummy {f00=0x0064, f01=0x0190, f02=» Z r 4 P* THE CORRESPONDING MODULE CALLED BY 'TENDIO' AT [ , P* COMPLETION OF THE REQUEST IS 'TENPCO'. [ @ 6 P* NOTICE THAT MODULE 'TIOKBO' IS EQUAL TO TIOPCO. [ p F P* NOTICE ALSO THAT ENTRY TIPO05 IS USED BY 'TIOKBI' AND 'TENITO'. [ & P* TIOPCO IS ALSO USE
0x1524f8…15268c Dummy {f00=0x0064, f01=0x018e, f02=»STROYED [ z P* , PTIOPCO EQU * PROGRAMMED CHANNEL, OUTPUT 4 P LD A2,DWTADR,A6 ADDRESS TO DRIVER ADDRESS BLOCK J $ P LD A3,ECBRL,A8 REQUESTED LENGTH ( P RF(NP) TIPO20 REQUESTED LENGTH <= 0 2 P CW A3,BUFLEN,A2 COMPARE WITH DWT BUFFER SIZE
0x15268c…152820 Dummy {f00=0x0064, f01=0x018e, f02=» P* ] P* ] : PTIPO05 EQU * ENTRY POINT USED BY 'TIOKBI' AND 'TENITO' ] P ADK A3,1 ] V . P ANKL A3,/FFFE MAKE REQUESTED LENGTH EVEN ] h ( P EL A1,ECBBA,A1 USER BUFFER ADDRESS ] & P LD A2,ECBBA,A8 DWT BUFFER ADDRESS ] 0 P ANKL A2,/FFFE MAKE DWT
0x152820…1529b4 (1, 111) Dummy {f00=0x0064, f01=0x0190, f02=» P* ^ 6 PTIPO10 MVUS A3 MOVE (USER BUFFER) TO SYSTEM BUFFER ^ P* ^ H PTIPO20 RTN A15 ^ R P* ^ h 0 PTIPO30 EQU * USER BUFFER ADDRESS WAS UNEVEN ^ r 4 P ORS A4,ECBBA,A8 MAKE DWT BUFFER ADDRESS UNEVEN ^ 0 P ELR A4,A1 FIRST CHARACTER FROM USER BUFFE
0x1529b4…152b48 Dummy {f00=0x0064, f01=0x0190, f02=»POINTER ^ t ( P RB TIPO10 MOVE REMAINING CHARACTERS _ P* _ < P EJECT TOSSIO _ F P* _ ^ P* I O : E R R _ h P* _ ~ , P* DRIVER (DWT) MMU BUFFER IS TOO SMALL. _ B P* SET RETURN CODE /8008 (REQUEST ERROR AND INCORRECT LENGTH). _ & P* BRANCH T
0x152b48…152cdc Dummy {f00=0x0064, f01=0x0190, f02=»OINTER _ v P LD A1,DWTST,A6 DWT STATUS ` P SLL A1,2 CHECK ECHO BIT ` 0 P RF(NN) IO:E10 NOT ECHO ` P P LDR A1,A6 SAVE DWT ADDRESS ` p & P LD A6,DWTECH,A6 ECHO DWT ADDRESS ` P CF A15,TENDIO ` " P LDR A6,A1 RESTORE DWT ADDRESS ` P* ` PIO:E
0x152cdc…152e70 Dummy {f00=0x0064, f01=0x0190, f02=» P* a P* T I O M X O a P* a $ " PTIOMXO EQU TIOMXI MUX, OUTPUT a . P* a T P* T I O K B O a ^ P* a t * PTIOKBO EQU TIOPCO KEYBOARD/CTW, OUTPUT a ~ P* a P* T I O I T O a P* a 6 PTIOITO EQU A15RTN INTERTASK COMMUNICATION, OUTPUT
0x152e70…153004 Dummy {f00=0x0064, f01=0x0190, f02=»E N : D M a P* b 6 P* THIS MODULE IS CALLED BY 'TENDIO' WHEN A REQUEST b . P* FOR DATA MANAGEMENT HAS BEEN COMPLETED. b V D P* NOTICE THAT MODULES 'TENDKI' AND 'TENDKO' ARE EQUAL TO TEN:DM. b P* b P* INPUT: A6 = DWT ADDRESS b $ P* A8
0x153004…153198 Dummy {f00=0x0064, f01=0x018e, f02=»A1,DWTMEC,A6 MMU ECB ADDRESS b ( P LD A1,ECBCW2,A1 SECOND CONTROL WORD c $ P ES A1,ECBCW2,A8 c P P RTN A15 c h P* c x P EJECT TOSSIO c P* c P* T E N P C I c P* c D P* THIS MODULE IS CALLED BY 'TENDIO' WHEN A READ REQUEST HAS BEEN c
0x153198…15332c Dummy {f00=0x0064, f01=0x0190, f02=» P* TO THE USER BUFFER. d D P* NOTICE THAT MODULES 'TENKBI' AND 'TENITI' ARE EQUAL TO TENPCI. d " 8 P* NOTICE ALSO THAT ENTRY TEN:DC IS USED BY 'DC:MIN'. d j P* d P* INPUT: A6 = DWT ADDRESS d $ P* A8 = USER ECB ADDRESS d P* d & P* OU
0x15332c…1534c0 Dummy {f00=0x0064, f01=0x0190, f02=»D A4,ECBEL,A2 EFFECTIVE LENGTH d " P RF(NP) TEPI30 NO MOVE IF ZERO e & & P LD A1,ECBBA,A2 DWT BUFFER ADDRESS e L P* e v . PTEN:DC EQU * ENTRY POINT USED BY 'DC:MIN' e ( P EL A2,ECBBA,A8 USER BUFFER ADDRESS e $ P LDK A3,1 CHECK BUFFER ADDRESSES e P T
0x1534c0…153654 (1, 112) Dummy {f00=0x0064, f01=0x018e, f02=»ADDRESS EVEN e v P* f P EJECT TOSSIO f P* f 6 P* f @ 2 PTEPI10 EQU * BOTH BUFFER ADDRESSES WERE UNEVEN f J 0 P LDR* A3,A1 FIRST CHARACTER FROM DWT BUFFER f P ELR A8,A2 f P* f * PTEPI15 ANK A3,/FF SKIP LEFT CHARACTER f ( P ANKL A8,/
0x153654…1537e8 Dummy {f00=0x0064, f01=0x0190, f02=» f n P ADK A2,1 g P SUK A4,1 g * P RF(P) TEPI25 MORE CHARACTERS TO MOVE g , P RTN A15 NO, RETURN g Z P* g v PTEPI20 TM A3,A2 g * P RF(Z) TEPI25 USER BUFFER ADDRESS EVEN g " P LDR A3,A1 DWT BUFFER ADDRESS g $ P ADR A3,A4 ADD EFFECTIVE LEN
0x1537e8…15397c Dummy {f00=0x0064, f01=0x0190, f02=» NEXT CHARACTER g ~ 4 P CWR A3,A1 COMPARE WITH START ADDRESS OF BUFFER h * P RB(NE) TEPI23 MORE CHARACTERS TO MOVE h P 0 P ADK A1,1 NO, MAKE DWT BUFFER ADDRESS UNEVEN h ~ P RB TEPI10 h P* h P EJECT TOSSIO h P* h P* h , PTEPI25 LDR A3,
0x15397c…153b10 Dummy {f00=0x0064, f01=0x0190, f02=»BUFFER h j P* i PTEPI30 RTN A15 i P* i . , PTEPI40 EQU * EFFECTIVE LENGTH WAS UNEVEN i 8 ( P SUK A4,1 MAKE EFFECTIVE LENGTH EVEN i h , P RF(Z) TEPI50 ONLY ONE CHARACTER TO MOVE i P LDR A8,A4 NO, SAVE A4 i 0 P MVSU A4 MOVE (SYSTEM BUFFER) TO USER
0x153b10…153ca4 Dummy {f00=0x0064, f01=0x0190, f02=»DWT BUFFER i p P ELR A3,A2 j P RB TEPI15 j $ P* j 6 . PTEPI60 EQU * DWT BUFFER ADDRESS WAS UNEVEN j @ " P LDR A3,A1 DWT BUFFER ADDRESS j r $ P ADR A1,A4 ADD EFFECTIVE LENGTH j P* j " PTEPI70 LCR A8,A3 ONE CHARACTER j 6 P SC A8,-1,A3 MOVE THIS C
0x153ca4…153e38 Dummy {f00=0x0064, f01=0x0190, f02=» MORE CHARACTERS TO MOVE j . P SUR A1,A4 NO, RESTORE DWT BUFFER ADDRESS k * P SUK A1,1 MAKE DWT BUFFER ADDRESS EVEN k R P RB TEPI25 k P* k P EJECT TOSSIO k P* k P* T E N M X I k P* k PTENMXI EQU A15RTN MUX, INPUT k P* k
0x153e38…153fcc Dummy {f00=0x0064, f01=0x0190, f02=»I INTERTASK COMMUNICATION, INPUT k P* l ( P* T E N D K I l 2 P* l H " PTENDKI EQU TEN:DM DISC, INPUT l R P* l x P EJECT TOSSIO l P* l P* T E N P C O l P* l 0 PTENPCO EQU A15RTN PROGRAMMED CHANNEL, OUTPUT l P* l P* T E
0x153fcc…154160 Dummy {f00=0x0064, f01=0x0190, f02=», OUTPUT l r P* m P* T E N D K O m P* m 0 " PTENDKO EQU TEN:DM DISC, OUTPUT m : P* m ` P EJECT TOSSIO m j P* m P* T E N I T O m P* m F P* THIS MODULE IS CALLED BY 'TENDIO' WHEN A WRITE REQUEST HAS BEEN m L P* COMPLETED FOR IN
0x154160…1542f4 (1, 113) Dummy {f00=0x0064, f01=0x018e, f02=» , P* 'TIOPCO' IS USED FOR MOVING THE DATA. n P* n 4 P* INPUT: A6 = DWT ADDRESS n > P* n ` & P* OUTPUT: A1-A4, A8 ARE DESTROYED n j P* n 0 PTENITO EQU * INTERTASK COMMUNICATION, OUTPUT n $ P LD A8,DWTECB,A6 DWT ECB ADDRESS n $ P LD A3,ECBEL,A
0x1542f4…154488 Dummy {f00=0x0064, f01=0x0190, f02=» n j P* o PTEIO10 RTN A15 o P* o ( P EJECT TOSSIO o 2 P* o J P* D C : M O T o T P* o j < P* THIS MODULE IS CALLED BY THE DATA COMMUNICATION DRIVER o t < P* IN PURPOSE TO MOVE THE CONTENTS OF THE USER BUFFER TO o < P* THE DRIVER BUFFER.
0x154488…15461c Dummy {f00=0x0064, f01=0x0190, f02=»* OUTPUT: NO REGISTERS ARE DESTROYED o P* p , , PDC:MOT EQU * DATA COMMUNICATION, OUTPUT p 6 " P MSR 8,A15 SAVE A1-A8 ON STACK p f $ P SUKL A15,32 ADJUST STACKPOINTER p * P TS 2,A15 SAVE MMU REGISTERS ON STACK p " P LD A5,DWTTAB,A6 TTAB ADDRESS p $ P
0x15461c…1547b0 Dummy {f00=0x0064, f01=0x0190, f02=» P* q $ PDC:RTN EQU * RETURN TO DC DRIVER q . P TL 2,A15 RESTORE MMU REGISTERS FROM STACK q 6 $ P ADKL A15,32 ADJUST STACKPOINTER q h * P MLR 8,A15 RESTORE A1-A8 FROM STACK... q P RTN A15 ...AND RETURN q P XIF q P* q P EJECT TOSSIO q
0x1547b0…154944 Dummy {f00=0x0064, f01=0x0190, f02=»TENTS OF THE DRIVER BUFFER TO THE USER BUFFER. q t P* r 6 P* INPUT: A1 = RETURN CODE r @ ( P* A4 = DRIVER BUFFER ADDRESS r b P* A6 = DWT ADDRESS r P* r ( P* OUTPUT: NO REGISTERS ARE DESTROYED r P* r PDC:MIN EQU * r P IFT
0x154944…154ad8 Dummy {f00=0x0064, f01=0x0190, f02=» SAVE A1-A8 ON STACK r P* s P IFT MMUPAG=1 s & $ P SUKL A15,32 ADJUST STACKPOINTER s < * P TS 2,A15 SAVE MMU REGISTERS ON STACK s d " P LD A5,DWTTAB,A6 TTAB ADDRESS s $ P TL TTB:MT,A5 LOAD MMU REGISTERS s P XIF s P* s P EJECT TOSSIO s
0x154ad8…154c6c Dummy {f00=0x0064, f01=0x0190, f02=»R BUFFER ADDRESS s | P* A6 = DWT ADDRESS t P* t : " PMINMOV EQU * DC:MIN MOVE ENTRY t D P ENB t j P LD A3,DWTECB,A6 ECB ADDRESS t z * P LDR A7,A4 SAVE DRIVER BUFFER ADDRESS t $ P LD A2,ECBEL,A3 EFFECTIVE LENGTH t " P RF(NP) MIN:40 NOTHI
0x154c6c…154e00 Dummy {f00=0x0064, f01=0x0190, f02=»PAG=0 t ( P LD A5,ECBBA,A3 USER BUFFER ADDRESS u P LDR A3,A5 u : ( P ANK A3,1 CHECK USER BUFFER ADDRESS u L . P RF(NZ) MIN:30 USER BUFFER ADDRESS UNEVEN u x P SUK A2,2 u , P RF(N) MIN:30 ONLY ONE CHARACTER TO MOVE u P* u P EJECT TOSSIO u
0x154e00…154f94 (1, 114) Dummy {f00=0x0065, f01=0x0190, f02=»T BUFFER POINTERS u ~ P ADK A5,2 v $ P SUK A2,2 DECREMENT LOOP COUNTER v , 2 P RB(NN) MIN:10 AT LEAST ONE MORE WORD TO MOVE v T P* v PMIN:20 EQU * v P ADK A2,1 v P RF(N) MIN:40 MOVE FINISHED v P* v P* CHARACTER MOVE v P* v
0x154f94…155128 Dummy {f00=0x0065, f01=0x0190, f02=» $ P SUK A2,1 DECREMENT LOOP COUNTER w 6 P RB(P) MIN:30 AT LEAST ONE MORE CHARACTER TO MOVE w , P XIF w f P* w r P IFT MMUPAG=1 w | * P ST A1,ECBRC,A3 SET RETURN CODE IN ECB w $ P LDR A1,A4 DRIVER BUFFER ADDRESS w P LDR A4,A2 EFFECTIVE LENGTH w
0x155128…1552bc Dummy {f00=0x0065, f01=0x0190, f02=» A1,0 w P XIF x P* x P EJECT TOSSIO x $ P* x < P* x F PMIN:40 EQU * x P P INH x d " P CF A15,TENDIO PERFORM TENDIO x p P* x P* RELEASE BUFFER x P* x * P LD A3,DWTADR,A6 DRIVER ADDRESS BLOCK x ( P LD A1,POLADR,A3 BUFFER
0x1552bc…155450 Dummy {f00=0x0065, f01=0x018e, f02=»A1,A2 NEXT BUFFER ADDRESS x , P RB(NZ) MIN:50 NOT LAST BUFFER IN CHAIN y " P* y R $ P* INSERT BUFFER AT END OF CHAIN y P* y ( P SU A4,HDRLEN,A3 REAL BUFFER ADDRESS y " P STR A4,A2 UPDATE QUEUE LINKS y P CMR A4 y P* y PMIN:60 EQU * y
0x155450…1555e4 Dummy {f00=0x0065, f01=0x018e, f02=» P IFT MMUPAG=0 z P IFT CPU852=0 z * P MLR 8,A15 RESTORE A1-A8 FROM STACK... z 0 P* z ^ PDC:MOT RTN A15 ...AND RETURN z h P XIF z P* z P IFT MMUPAG=1 z " P RB DC:RTN RETURN TO DC DRIVER z P XIF z P* z P* ERROR EXIT z P
0x1555e4…155778 Dummy {f00=0x0065, f01=0x018e, f02=» z n P* { P EJECT TOSSIO { P* { * P* { 4 P IFT MMUPAG=0 { > P IFT CPU852=1 { T PDC:MOT EQU * { j 2 P ABL IHRTN RETURN WITHOUT ENABLING INTERRUPTS { ~ P XIF { P* { P EJECT TOSSIO { P* { P* { P********** { P
0x155778…15590c Dummy {f00=0x0065, f01=0x018e, f02=» ( P* - IF I/O AND ACTIVATION REQUEST:- | P* | 0 * P* ACTOTP IS CALLED TO START THE TASK | : P* | h P* -IF NORMAL I/O WITH WAIT:- | r P* | * P* QTJOB IS CALLED TO QUEUE THE TASK | 8 P* FOR DISPATCHING WITH THE FOLLOWING PARAMETERS:- |
0x15590c…155aa0 Dummy {f00=0x0065, f01=0x0190, f02=» | > P* IF AN EVENT WAS QUEUED FOR THIS DEVICE (DWTTQ NOT ZERO) } J P* THAT TASK IS PUT IN DISPATCHER QUEUE TO REPEAT THE LKM INSTRUCTION. } J P* } P EJECT TOSSIO } P* } P* } 0 P* ENTRY PARAMETERS TO THIS SUBROUTINE ARE:- } P* }
0x155aa0…155c34 (1, 115) Dummy {f00=0x0065, f01=0x0190, f02=»NING WITH MMU OPTION SPECIAL DEVICE } * P* DEPENDENT SUBROUTINES ARE PERFORMED. ~ , P* ~ Z P EJECT TOSSIO ~ d P* ~ | P* END I/O ENTRY ~ P* ~ PTENDIO EQU * ~ P IFT CPU852=1 ~ & P CF A15,SAVE8 SAVE A1-A8 ON STACK ~ P XIF ~ P
0x155c34…155dc8 Dummy {f00=0x0065, f01=0x0190, f02=» LDR A4,A6 DWT ADDRESS ~ & P ADK A4,DWTST POINT TO DWT STATUS P INH H ( P LD A5,DWTTQ,A6 TERMINAL QUEUE LINK T P RF(Z) TEN110 NO TASK QUEUED P* P IFT ATTDET=1 P LDKL A2,/800 ATTACH BIT P ANR* A2,A4 , P RF(Z) TEN095 DE
0x155dc8…155f5c Dummy {f00=0x0065, f01=0x0190, f02=» =2 =1 2 P CF A15,FRABLK FREE ATTACH BLOCK AND TIMER =1 P LDR A4,A6 =1 F P ADK A4,DWTST RESTORE A4 =1 P XIF P* P EJECT TOSSIO P* P* PTEN100 EQU * , P LDR* A3,A5 UPDATE QUEUE ANCHOR ADDRESS P S
0x155f5c…1560f0 Dummy {f00=0x0065, f01=0x0190, f02=»TAB,A6 TTAB ADDRESS FROM DWT P* $ PTEN120 LDKL A2,/8000 . , P ORRS A2,A4 INDICATE DEVICE READY IN DWT J P LDKL A3,/DBFF z ( P ANRS A3,A4 RESET ECHO BIT AND BIT 5 P LD A3,DWTECB,A6 ECB ADDRESS : P RF(Z) TEN260 BRANCH IF ENTERED FROM ECH
0x1560f0…156284 Dummy {f00=0x0065, f01=0x0190, f02=»A3 SET RETURN CODE IN ECB P* " P IFT MMUPAG=1 , P LD A4,TTB:PW,A5 PSW B " P ANK A4,1 SYSTEM/USER MODE BIT ^ P RF(Z) TEN200 SYSTEM MODE P* P* LOAD MMU REGISTERS P* PTEN130 EQU * $ P SUKL A15,32 ADJUST STACKPOINT
0x156284…156418 Dummy {f00=0x0065, f01=0x018e, f02=» P* P* MOVE DWT ECB TO USER ECB P* 0 & P LD A8,DWTUEC,A6 USER ECB ADDRESS : P ELR A4,A8 d * P ORR A4,A2 SET EVENT COMPLETED IN ECB v P ESR A4,A8 P LDR A1,A3 P ADK A1,ECBEL P LDR A2,A8 P ADK A2,ECBEL P L
0x156418…1565ac Dummy {f00=0x0065, f01=0x0190, f02=» " P LD A3,DEVIND,A3 DEVICE INDEX , P RF(N) TEN160 NO SPECIAL ACTION REQUIRED * " P RF(Z) TEN140 DATA MANAGEMENT Z P CWK A3,DK:DIX CHECK IF DISC P RF(E) TEN140 DISC P* " P* PERFORM CHECK ON ORDER CODE P* , P CF A15,RD:WR CH
0x1565ac…156740 Dummy {f00=0x0065, f01=0x0190, f02=»TAB,A3 BRANCH TO RELEVANT READ/WRITE ROUTINE P* 4 P EJECT TOSSIO > P* V P* RESTORE MMU REGISTERS ` P* PTEN150 EQU * P INH P* PTEN160 EQU * . P TL 2,A15 RESTORE MMU REGISTERS FROM STACK $ P ADKL A15,32 A
0x156740…1568d4 (1, 116) Dummy {f00=0x0065, f01=0x0190, f02=» Z P* PTEN200 EQU * , P LD A4,DWTWAT,A6 WAIT/ACTIVATE INDICATOR & ( P RF(Z) TEN250 NOT WAIT OR ACTIVATION V P SUK A4,1 P RF(Z) TEN240 WAIT P ADK A4,1 P LDR A3,A4 P ANK A3,1 P RF(Z) TEN270 ACTIVATION P*
0x1568d4…156a68 Dummy {f00=0x0065, f01=0x0190, f02=» MODE BIT t P RF(Z) TEN210 SYSTEM MODE . P LD A8,DWTUEC,A6 NO, GET USER ECB ADDRESS 4 P XIF f P* r PTEN210 EQU * | 4 P ST A8,TTB:SA+16,A5 SET TO A8 IN TTAB SAVE AREA P* : PTEN220 ADK A4,DWTWAT POINT TO WAIT/ACTIVATE INDICATOR
0x156a68…156bfc Dummy {f00=0x0065, f01=0x0190, f02=» TOSSIO P* P* WAIT P* * PTEN240 EQU * 4 2 P CF A15,QTJOB WAIT: QUEUE TASK FOR DISPATCHING H P* ~ P* NO WAIT P* PTEN250 EQU * $ P CM DWTECB,A6 RESET ECB ADDRESS P* PTEN260 EQU * P IFT CPU85
0x156bfc…156d90 Dummy {f00=0x0065, f01=0x4110, f02=»D RETURN P XIF P* P* I/O WITH ACTIVATION & P* D PTEN270 EQU * N 8 P CF A15,FREBLK ACTIVATE: GET PARAMETER AND DISP ADDR b . P CF A15,ACTOT ACTIVATE TASK ON FIFO BASIS P RB TEN250 P* P* P* P END
0x156d90…156f24 Dummy {f00=0x0065, f01=0x2008, f02=» NT TOSSIO END @ &
0x156f24…1570b8 Dummy {f00=0x0065, f01=0x40ea, f02=» L H IDENT D:TB10 TRA 11.0 - - F1 O1111 REL 11.0 81-04-08 87015054110 D:TB10 T D:TB10T f * & : z ( $ L : @ *
0x1570b8…15724c Dummy {f00=0x0065, f01=0x0190, f02=» L H IDENT C:CB10 TRA 11.0 - - F1 O1111 REL 11.0 81-04-08 87015054110 C:CB10 T C:CB10C f * & ABIDENT NOT OPERABLE z * & * & = * &
0x15724c…1573e0 Dummy {f00=0x0065, f01=0x4012, f02=» @ TRA 11.0 - - F1 O1111 REL 11.0 81-04-08 87015054110 C:CB10 T C:CB10C f * & ABIDENT NOT OPERABLE z * & * & = * &
0x1573e0…157574 (1, 117) Opaque[0x194]
0x157574…157708 # DirEnt {nam=»LDTASK«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0cb8, f03=0x0000}
0x157574…157708 IdxSect {
0x157574…157708 f00 = 0x0065 // 0x157574 @0x0
0x157574…157708 f01 = 0x0012 // 0x157576 @0x2
0x157574…157708 gno = [ // 0x157578 @0x4
0x157574…157708 [0x00]: C0x0065.0x3.0
0x157574…157708 [0x01]: C0x0066.0x0.0
0x157574…157708 [0x02]: C0x0066.0x1.0
0x157574…157708 [0x03]: C0x0066.0x2.0
0x157574…157708 [0x04]: C0x0066.0x3.0
0x157574…157708 [0x05]: C0x0067.0x0.0
0x157574…157708 [0x06]: C0x0067.0x1.0
0x157574…157708 [0x07]: C0x0067.0x2.0
0x157574…157708 [0x08]: C0x0067.0x3.0
0x157574…157708 ]
0x157574…157708 }
0x157708…15789c Dummy {f00=0x0065, f01=0x0190, f02=» 2 P IDENT LDTASK REL 11.0 81-06-10 870105041100 P : P =2,REL 11.0 81-01-26 B 2 P =2,END OF RELOC. CHECK FAILS (SPECIAL CASE) b " P =1,PRR 11.0 80-06-12 BOFE & P =1,CHECK FOR END OF RELOCATION P* 6 P**********************
0x15789c…157a30 Dummy {f00=0x0065, f01=0x0190, f02=»* P* P* 6 P************************************************** P* X P* b * P* THIS MODULE CONTAINS THE LOAD TASK l , P* FOR TOSS MEMORY MANAGEMENT SYSTEMS. P* & P* IT CONTAINS TWO ENTRY POINTS: P* . P
0x157a30…157bc4 Dummy {f00=0x0065, f01=0x0190, f02=» LDTASK P* P* P*********** & P* ENTRIES * : P*********** N P* b P* l $ P ENTRY LT:DSK DISC PAGING ENTRY v , P ENTRY LT:SWB SWAPPABLE WORK BLOCK ENTRY P ENTRY TTABLD LOAD TASK TTAB 2 P ENTRY QLTDSK ACTIVATE
0x157bc4…157d58 Dummy {f00=0x0065, f01=0x0190, f02=»B LDTASK ECB AREA P ENTRY LD:BUF LDTASK BUFFER P ENTRY LD:BUE END OF BUFFER > ( P ENTRY PQEMTY PAGE QUEUE EMPTY FLAG b $ P ENTRY LD:STB LDTASK STACK BASE P EJECT LDTASK P* P* P************* P* EXTERNALS *
0x157d58…157eec Dummy {f00=0x0065, f01=0x0190, f02=» EXTRN QMEXIT QUEUE TASK AND EXIT MONITOR TASK 4 P EXTRN LKMERR HALT SYSTEM DUE TO FATAL LKM ERROR 6 P EXTRN ACTOT ACTIVATE TASK n P EXTRN RELPA2 RELEASE PAGE " P EXTRN PAGQUE FREE PAGE QUEUE & P EXTRN PAG:QB QUEUE LINK BACKWARDS P EXTRN
0x157eec…158080 Dummy {f00=0x0065, f01=0x0190, f02=»S p P EXTRN SEG:EL SEGMENT LENGTH $ P EXTRN SEG:PB PAGE BLOCK ADDRESS . 4 P EXTRN SWB:DS DISC SECTOR ADDRESS OF FIRST COPY V $ P EXTRN SWB:EL SWB LENGTH (BYTES) & P EXTRN SWB:NS SWB LENGTH (SECTORS) $ P EXTRN ECBBA ECB BUFFER ADDRESS & P
0x158080…158214 (1, 118) Dummy {f00=0x0066, f01=0x0190, f02=»B CONTROL WORD 1 $ P EXTRN ECBCW2 ECB CONTROL WORD 2 P EXTRN TTB:AP ACB ADDRESS @ P EXTRN TTB:SA TTAB SAVE AREA b P EXTRN TTB:MT MMU TABLE & P EXTRN TTB:CB CURRENT SEGMENT BASE P EXTRN TTB:SP SEGTAB ADDRESS P EJECT LDTASK
0x158214…1583a8 Dummy {f00=0x0066, f01=0x0190, f02=»ES l P EJECT LDTASK P* " P* , . P***************************************** 6 P* h P* CONDITIONAL ASSEMBLY r P* . P***************************************** P* . P* A PROGRAM VERSION USING TOSS MMU PAGING * P
0x1583a8…15853c Dummy {f00=0x0066, f01=0x0190, f02=»NSTRUCTION h . P* SET IS OBTAINED BY SETTING CPU852 EQU 0. P* D PCPU852 EQU 0 N P* b P* l 6 P* A PROGRAM VERSION INCLUDING TOSS SWAPPABLE WORK v 2 P* BLOCKS IS OBTAINED BY SETTING SWPBLK EQU 1. P* PSWPBLK EQU 0 P*
0x15853c…1586d0 Dummy {f00=0x0066, f01=0x018e, f02=»0 PCPU857 EQU X:B P* P EJECT LDTASK * P* B P* L 4 P* A PROGRAM VERSION USING TOSS ASSEMBLER PAGING V * P* IS OBTAINED BY SETTING ASMPAG EQU 1. P* PX:C EQU 0 PASMPAG EQU X:C P* P EJECT LDTASK
0x1586d0…158864 Dummy {f00=0x0066, f01=0x0190, f02=» p P* P* . PLD:ECB DATA 0,0,0,0,0,0,0 LDTASK ECB AREA P* N 4 PLD:BUF RES 128 INTERMEDIATE BUFFER FOR LOAD TASK X PLD:BUE EQU * END OF BUFFER P* $ P RES 4 LDTASK STACK (TWO LEVELS) ( PLD:STB EQU *-2 LOAD TASK STACK BASE
0x158864…1589f8 Dummy {f00=0x0066, f01=0x0190, f02=» P XIF P* P EJECT LDTASK P* 2 P* < P********** F P* TTABLD * X P********** j P* | P* LDTASK TTAB P* P IFT MMUPAG=1 P RES 16 LDTASK MMU TABLE P XIF P* ( P DATA 0 CURRENT SEGMEN
0x1589f8…158b8c Dummy {f00=0x0066, f01=0x0190, f02=»UMMY) z P* PTTABLD EQU * TTABLD ENTRY " P DATA 0 DISPATCHER QUEUE LINK : " P DATA '#L' TASK IDENTIFICATION ` P DATA 49 PRIORITY LEVEL P DATA 0 PENDING POINTER * P DATA /C4C0 PSW (PROGRAM STATUS WORD) P DATA 0 DISPATCH ADD
0x158b8c…158d20 Dummy {f00=0x0066, f01=0x0190, f02=»* P EJECT LDTASK P* " P* , P********** 6 P* LT:SWB * H P********** Z P* l P* v D P* LT:SWB HANDLES THE LOADING/STORING OF SWAPPABLE WORK BLOCKS. P* 2 P* INPUT: A1 = SWAPPABLE WORK BLOCK ADDRESS 2 P
0x158d20…158eb4 (1, 119) Dummy {f00=0x0066, f01=0x0190, f02=»NDLING ENTRY v P IFT SWPBLK=1 P IFT MMUPAG=1 * P INH @ ( P LDKL A5,TTABLD LDTASK TTAB ADDRESS L , P TL TTB:MT,A3 LOAD MMU WITH CALLING TASK x , P TS TTB:MT,A5 STORE IN LDTASK MMU TABLE P ENB P XIF P* P IFT SWPBLK=1
0x158eb4…159048 Dummy {f00=0x0066, f01=0x0190, f02=»K) f * P LDR* A3,A1 DISC ADDRESS OF FIRST COPY P ANK A3,/FF 8 P LD A4,SWB:DS,A1 L , P LD A6,SWB:EL,A1 SWB COPY LENGTH (BYTES) d . P LD A2,SWB:NS,A1 SWB COPY LENGTH (SECTORS) P* P EJECT LDTASK P* , P* COMPUTE DISC ADDRESS
0x159048…1591dc Dummy {f00=0x0066, f01=0x0190, f02=»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:15 OVERFLOW x P RB LTS:10 P* $ PLTS:15 EQU * OVERFLOW CORRECTION P ADK A3,1 P ANKL A4,/7FFF P RB LT
0x1591dc…159370 Dummy {f00=0x0066, f01=0x0190, f02=»WPBLK=1 P IFT CPU852=0 P MUR A1 & P DAR A3 6 P XIF F P* R P EJECT LDTASK P* t P* ~ P IFT SWPBLK=1 0 P LD A3,TTB:SA+16,A5 MEMORY ADDRESS (LOGICAL) P ADK A6,1 P LDR A4,A6 & P LD A12,SCTIPL SWB
0x159370…159504 Dummy {f00=0x0066, f01=0x0190, f02=»RMEDIATE BUFFER j P LDK A7,/95 PHYSICAL WRITE P RF LTSWB2 STORE SWB : P XIF V P* b P EJECT LDTASK l P* P* P********** P* LT:DSK * P********** P* P* D P* LT:DSK PERFORMS LOADING OF DISC RE
0x159504…159698 Dummy {f00=0x0066, f01=0x0190, f02=» b P* P* * PLT:DSK EQU * LDTASK DISC PAGING ENTRY , P LDR A5,A3 TTAB ADDRESS OF CALLING TASK J P LDR* A2,A1 SEGMENT STATUS z . P RF(NN) LTD:05 SEGMENT NOT LOADED IN CORE P* 2 P* UPDATE MMU TABLE FOR CALLING TASK (IF MMU),
0x159698…15982c Dummy {f00=0x0066, f01=0x0190, f02=» CF A15,TLSEG1 , P LDR A5,A7 TTAB ADDRESS OF CALLING TASK * P ABL QMEXIT QUEUE TASK AND EXIT LDTASK F P* t P EJECT LDTASK ~ P* 6 P* NO PAGE AVAILABLE. PAUSE LDTASK UNTIL RESTARTED * P* BY RELPAG WHEN PAGE AVAILABLE AGAIN. P
0x15982c…1599c0 Dummy {f00=0x0066, f01=0x0190, f02=» RECENTLY USED PAGE FROM PAGQUE P* ( PLTD:05 EQU * 2 P LD A2,PAGQUE+2 F P CWK A2,PAGQUE ^ $ P RB(E) LTD:00 NO PAGE AVAILABLE t P* P EJECT LDTASK P* $ P* TAKE FOUND PAGE OUT OF PAGQUE P* P INH 0 P L
0x1599c0…159b54 (1, 120) Dummy {f00=0x0066, f01=0x0190, f02=»A4 UPDATE QUEUE LINK FORWARD NEXT BLOCK 0 P CMR A2 RESET QUEUE LINK FORWARD THIS BLOCK 0 . P LD A4,PAG:SB,A2 OLD SEGMENT BLOCK ADDRESS d P RF(Z) LTD:10 P LDKL A6,/7FFF 4 P ANRS A6,A4 INDICATE SEGMENT NOT LOADED ANYMORE P* P* CO
0x159b54…159ce8 Dummy {f00=0x0066, f01=0x0190, f02=»EW SEGMENT BLOCK ADDRESS z P* P IFT MMUPAG=1 * P* @ 2 P* UPDATE MMU TABLE FOR CALLING TASK AND LDTASK J P* ( P LDKL A3,TTABLD LDTASK TTAB ADDRESS 2 P MS 5,TTB:SA+2,A3 SAVE A1-A5 IN TTAB SAVE AREA , P TL TTB:MT,A5 LOAD MMU WITH
0x159ce8…159e7c Dummy {f00=0x0066, f01=0x0190, f02=»A3 $ P LD A1,TTB:AP,A5 GET ACB ADDRESS , P ST A1,TTB:AP,A3 STORE IN LDTASK'S TTAB 2 P LDR A1,A2 b " P LDR A5,A3 LDTASK TTAB ADDRESS t . P CF A15,TLSEG2 UPDATE MMU TABLE FOR LDTASK 6 P TS TTB:MT,A5 STORE NEW MMU TABLE FOR CALLING TASK P X
0x159e7c…15a010 Dummy {f00=0x0066, f01=0x0190, f02=»E ADDRESS (PHYSICAL) | P LD A4,SCTPSZ PAGE SIZE $ P LD A6,SEG:EL,A1 SEGMENT LENGTH < * P LDR A9,A1 SAVE SEGMENT BLOCK ADDRESS d $ P LD A12,TTB:SP,A5 SEGTAB ADDRESS . P LD A12,SEG:FC,A12 SEGMENT DISC FILE CODE P* P IFT CPU852=1
0x15a010…15a1a4 Dummy {f00=0x0066, f01=0x0190, f02=»ADDRESS z P XIF P* P IFT MMUPAG=0 & 2 P ST* A3,TTB:CB,A5 UPDATE CURRENT SEGMENT BASE < P XIF r P* ~ P EJECT LDTASK P* P* P IFT SWPBLK=1 P* P* P********** P* LTSWB1 * P* LTSW
0x15a1a4…15a338 Dummy {f00=0x0066, f01=0x0190, f02=»ANDLING IS SIMILAR TO v P* DISC PAGING HANDLING. P* @ 0 P* INPUT: A1 = DISC SECTOR NUMBER, PART 1 J 0 P* A2 = " " " , PART 2 ~ . P* A3 = MEMORY ADDRESS (LOGICAL) & P* A4 = SWB SIZE (BYTES)
0x15a338…15a4cc Dummy {f00=0x0066, f01=0x018e, f02=»WRITE (LTSWB2 ONLY) j N P* A9 = 0 (INDICATES SWB HANDLING BY SETTING SEGBLK ADDRESS = 0) $ P* A12 = DISC FILE CODE n P* P* P XIF P* & PLTSWB1 EQU * ENTRY USED BY LT:SWB P ANK A1,/FF P LDK A7,/9
0x15a4cc…15a660 Dummy {f00=0x0066, f01=0x0190, f02=» & P LDR A11,A4 PAGE/SWB SIZE (WORDS) P SRL A6,1 . ( P LDR A10,A6 SEGMENT/SWB SIZE (WORDS) @ P* l P* SET ECB PARAMETERS v P* " P LDKL A8,LD:ECB LD:ECB ADDRESS * P STR A12,A8 SET DISC FILE CODE IN ECB ( P CM ECBEL,A8 RESET EFFEC
0x15a660…15a7f4 (1, 121) Dummy {f00=0x0066, f01=0x0190, f02=»ECTOR NUMBER IN ECB z P ST A2,ECBCW2,A8 P XIF 4 P* @ P IFT CPU852=0 J , P MS 2,ECBCW1,A8 SET SECTOR NUMBER IN ECB ` P XIF P* P EJECT LDTASK P* P* P IFT MMUPAG=1 P ECR A1,A3 P* P IFT
0x15a7f4…15a988 Dummy {f00=0x0066, f01=0x0190, f02=»K P* . P* SWB: CONVERT LOGICAL ADDRESS TO PHYSICAL P* F P SRL A1,3 P & P ANK A1,/1E MMUTAB INDEX (5 BITS) b P ADR A1,A5 ADD TTAB ADDRESS * P LC A1,TTB:MT,A1 PHYSICAL PAGE ADDRESS P LDR A2,A1 P ANK A2,/3C P SRC
0x15a988…15ab1c Dummy {f00=0x0066, f01=0x0190, f02=»* 2 P* SEGMENT: CONVERT PHYSICAL ADDRESS TO LOGICAL P* @ P SLL A3,2 J P LD A2,TTB:AP,A5 ACB ADDRESS P LDR A12,A3 6 P ANKL A12,/FFF CONVERT PHYSICAL ADDRESS TO LOGICAL P OR A12,ACBLAP,A2 P* PLTD:40 EQU * P S
0x15ab1c…15acb0 Dummy {f00=0x0066, f01=0x0190, f02=»SET BUFFER ADDRESS P* ! P IFT SWPBLK=1 ! $ 0 P LDR A9,A9 CHECK SEGBLK ADDRESS (=0 IF SWB) ! : P RF(Z) LTD:45 SWB HANDLING ! n P XIF ! P* ! P IFT ASMPAG=1 ! P LDR* A1,A9 SEGMENT STATUS ! ( P SLL A1,1 CHECK IF ASSEMBLER SEGMENT ! (
0x15acb0…15ae44 Dummy {f00=0x0066, f01=0x0190, f02=»CCESSARY ! r P* " PLTD:45 EQU * " . P ADKL A10,127 NEXT HIGHER MULTIPLE OF 128 " . P ANKL A10,/7F80 " ` . P SUR A4,A10 CHECK IF PAGE IS LARGE ENOUGH " x * P RF(NN) LTD:50 OK, JUST ONE LKM NEEDED " P LDR A10,A6 " . P ANKL A10,/7F80 NEXT LOWER M
0x15ae44…15afd8 Dummy {f00=0x0066, f01=0x0190, f02=»TO BYTES " t , P RF(Z) LTD:55 INTERMEDIATE BUFFER NEEDED # 0 P ST A10,ECBRL,A8 SET REQUESTED LENGTH IN ECB # @ P* # t P EJECT LDTASK # ~ P* # P* READ/WRITE SEGMENT SWB # P* # ( P CF A14,LD:IO READ/WRITE SEGMENT/SWB # 2 P ADK A6,0 CHECK IF
0x15afd8…15b16c Dummy {f00=0x0066, f01=0x0190, f02=»D AND MOVE LAST PART OF SEGMENT/SWB # ~ P* $ , 4 P* COMMON EXIT FOR DISC PAGING, ASSEMBLER PAGING $ 6 2 P* AND SWAPPABLE WORK BLOCK HANDLING REQUESTS. $ n P* $ PLDEXIT EQU * $ P IFT SWPBLK=1 $ 0 P LDR A9,A9 CHECK SEGBLK ADDRESS (=0 IF SWB) $
0x15b16c…15b300 Dummy {f00=0x0066, f01=0x0190, f02=» EQU * $ P ORRS A4,A9 % P* % " PLDEXI3 EQU * % , * P ABL QMEXIT QUEUE TASK AND EXIT LDTASK % @ P* % n P EJECT LDTASK % x P* % P* % P********** % P* LD:IO * % P********** % P* % P* % < P* LDTASK I/O ROUTINE FOR
0x15b300…15b494 (1, 122) Dummy {f00=0x0067, f01=0x0190, f02=»GAIN. CREDIT APPLICATIONS % n 8 P* ARE RESTARTED AT THE SPECIFIED REENTER ADDRESS. & " P* & ^ 2 P* INPUT: A5 = TTAB ADDRESS OF CALLING TASK & h P* A7 = ORDER CODE & P* A8 = LD:ECB ADDRESS & ( P* A9 = SEGBLK ADDRESS (=0 IF SWB) & P*
0x15b494…15b628 Dummy {f00=0x0067, f01=0x0190, f02=» CODE AND ABORT IF ERROR & P* ' P LD A2,ECBRC,A8 RETURN CODE ' * " P ANKL A2,/FEFF SKIP RETRY BIT ' N P RF(NZ) LDIO10 DISC ERROR ' t P RTN A14 NO, RETURN ' P* ' P EJECT LDTASK ' P* ' 2 P* ERROR: SET RETURN CODE IN A7 OF CALLING
0x15b628…15b7bc Dummy {f00=0x0067, f01=0x0190, f02=»ET RETURN CODE IN A7 ' z P* ( P IFT SWPBLK=1 ( & 0 P LDR A9,A9 CHECK SEGBLK ADDRESS (=0 IF SWB) ( < P RB(Z) LDEXI3 SWB HANDLING ( p P XIF ( P* ( " P* INSERT PAGE IN PAGQUE AGAIN ( P* ( ( P LD A3,SEG:PB,A9 PAGE BLOCK ADDRESS ( P INH
0x15b7bc…15b950 Dummy {f00=0x0067, f01=0x0190, f02=»ER SEGMENT ( v ( P RF(N) LDIO20 YES, ASSEMBLER SEGMENT ) P XIF ) > P* ) J 2 P LD* A4,TTB:AP,A5 APPLICATION RESTART ADDRESS ) T . P ST A4,TTB:SA,A5 SET NEW DISPATCH ADDRESS ) P* ) PLDIO20 EQU * ) $ P LDKL A4,/100 SEGMENT ERROR BIT ) P RB LD
0x15b950…15bae4 Dummy {f00=0x0067, f01=0x0190, f02=» ) P********** * P* * P* * $ 6 P* THIS ENTRY IS CALLED FROM THE LDTASK MAIN FLOW * . 8 P* WHEN LOADING OF AN ASSEMBLER SEGMENT IS WANTED. * h 2 P* ASSPAG WILL READ ONE SECTOR AT A TIME AND * * P* PERFORM THE NECESSARY RELOCATIONS. * P
0x15bae4…15bc78 Dummy {f00=0x0067, f01=0x018e, f02=»SS * z P* A9 = SEGBLK ADDRESS + $ P* A10 = SEGMENT LENGTH (WORDS) + * P* A11 = PAGE SIZE (WORDS) + R , P* A12 = PAGE ADDRESS (RELOCATION BASE) + v P* + P* + ( PASSPAG EQU * ASSEMBLER PAGING ENTRY + P LDK A1,1 + , P SC A1,ECBRL,A8
0x15bc78…15be0c Dummy {f00=0x0067, f01=0x0190, f02=» P EJECT LDTASK , P* , P* , & P IFT ASMPAG=1 , 0 P* , F . P* PREPARE FOR RELOCATION OF ONE SECTOR AND , P 4 P* CHECK REMAINING PAGE SIZE. IF NOT LARGE ENOUGH , 6 P* THEN READ (LAST) SECTOR TO INTERMEDIATE BUFFER, , 2 P* ELSE READ SECTOR D
0x15be0c…15bfa0 Dummy {f00=0x0067, f01=0x0190, f02=»SEGMENT POINTER , P* - P XIF - " P* - . P IFT ASMPAG=1 - 8 P IFT MMUPAG=1 - N . P LD A1,LD:LAD GET LOGICAL ADDRESS POINTER - d P XIF - P* - P IFT ASMPAG=1 - * P CWK A11,128 CHECK REMAINING PAGE SIZE - , P RF(L) ASS:85 INTERMEDIA
0x15bfa0…15c134 (1, 123) Dummy {f00=0x0067, f01=0x0190, f02=»ON BITS - l P CWK A10,120 . P RF(NL) ASS:02 . $ P LDR A2,A10 . : P ADR A2,A2 . N P* . ` PASS:02 EQU * . j P ADR A2,A1 . ~ P* . P EJECT LDTASK . P* . " P* RELOCATE ONE SEGMENT SECTOR . P* . PASS:05 EQU * . P SRL A2,
0x15c134…15c2c8 Dummy {f00=0x0067, f01=0x0190, f02=»ION BITS COUNTER . ~ P* / P IFT MMUPAG=1 / " 2 P LDR A8,A8 CHECK WHERE TO FIND RELOCATION BITS / 8 , P RF(Z) ASS:15 RELOCATION BITS IN LD:BUF / n " P ELR A4,A2 16 RELOCATION BITS / P RF ASS:20 / P XIF / P* / P IFT ASMPAG=1 / PASS:15
0x15c2c8…15c45c Dummy {f00=0x0067, f01=0x0190, f02=»25 EQU * / 0 P LDR A6,A3 NUMBER OF RELOCATION BITS TO SKIP 0 P RF ASS:45 0 D P* 0 V P EJECT LDTASK 0 ` P* 0 x P* 0 PASS:30 EQU * 0 * P SLL A4,1 NEXT RELOCATION BIT TO TEST 0 & P RB(Z) ASS:25 NEXT RELOCATION WORD 0 P* 0 PASS:40
0x15c45c…15c5f0 Dummy {f00=0x0067, f01=0x0190, f02=»* 0 PASS:45 EQU * 1 . P SUR A3,A6 UPDATE RELOCATION BITS COUNTER 1 2 P SRL A1,1 WORD ADDRESS FOR SEGMENT POINTER =1 1 P 0 P ADR A1,A6 UPDATE SEGMENT POINTER (WORD) =1 1 0 P RF(O) ASS:70 ALL RELOCATED,END OF SECTOR =1 1 2 P SLL A1,1 BYTE ADDRESS FOR
0x15c5f0…15c784 Dummy {f00=0x0067, f01=0x0190, f02=»ORD 1 P* 2 PASS:50 EQU * 2 P IFT MMUPAG=0 2 * $ P ADRS A12,A1 ADD RELOCATION BASE 2 @ P XIF 2 h P* 2 t P IFT ASMPAG=1 2 ~ P IFT MMUPAG=1 2 P ELR A6,A1 WORD TO RELOCATE 2 $ P ADR A6,A12 ADD RELOCATION BASE 2 $ P ESR A6,A1 STORE R
0x15c784…15c918 Dummy {f00=0x0067, f01=0x0190, f02=»F SECTOR OR IF NEW RELOCATION WORD NEEDED 2 P* 3 2 PASS:60 EQU * 3 < P LDR A6,A1 SEGMENT POINTER 3 P P SRL A6,1 WORD ADDRESS 3 r 4 P SUR A6,A13 COMPARE WITH END OF REL. ADDRESS =2 3 P ADK A6,0 SET CR =2 3 $ P RF(NN) ASS:70 END OF SECTOR =2 3
0x15c918…15caac Dummy {f00=0x0067, f01=0x0190, f02=»INTER 3 j ( P RB ASS:10 NEXT RELOCATION BITS WORD 4 P* 4 : P EJECT LDTASK 4 D P* 4 . P* RETURN IF SEGMENT LOADING IS COMPLETED, 4 f . P* ELSE PREPARE FOR READING OF NEXT SECTOR. 4 P* 4 PASS:70 EQU * 4 * P SUKL A10,120 DECREMENT SEGMENT
0x15caac…15cc40 Dummy {f00=0x0067, f01=0x018e, f02=»E PAGE ADDRESS 4 z P XIF 5 P* 5 " P IFT ASMPAG=1 5 , P IFT MMUPAG=1 5 B 2 P ADS A4,LD:LAD UPDATE LOGICAL ADDRESS POINTER 5 X P LDK A3,0 5 P MLR 2,A8 BUFFER ADDRESS 5 P SLC A1,4 5 P DLL 1 5 P SRL A2,1 5 P DAR A3 5 P SLL A
0x15cc40…15cdd4 (1, 124) Dummy {f00=0x0067, f01=0x0190, f02=» 5 ~ P* 6 P* 6 P IFT ASMPAG=1 6 * P IM ECBCW2,A8 INCREMENT SECTOR NUMBER 6 2 P RF(O) ASS:80 OVERFLOW 6 ` ( P RB ASS:00 READ NEXT SECTOR TO PAGE 6 ~ P* 6 PASS:80 EQU * 6 & P LDKL A4,/7FFF OVERFLOW CORRECTION 6 P ANS A4,ECBCW2,A8 6
0x15cdd4…15cf68 Dummy {f00=0x0067, f01=0x0190, f02=»INTERMEDIATE BUFFER. 6 z 0 P* MOVE CODE BUT NOT RELOCATION BITS TO PAGE. 7 P* 7 P PASS:85 EQU * 7 Z . P LDR A13,A10 SAVE REMAINING SEGMENT LENGTH 7 n P LDR A6,A10 7 & P LDR A11,A12 SAVE RELOCATION BASE 7 $ P LDR A12,A1 ACTUAL PAGE ADDRESS 7 6 P S
0x15cf68…15d0fc Dummy {f00=0x0067, f01=0x0190, f02=»S OF CODE TO RELOCATE 7 v P LDR A10,A13 8 0 P LDR A2,A13 REMAINING SEGMENT LENGTH (WORDS) 8 2 2 P ADR A2,A2 DISPL. IN SECTOR TO RELOCATION BITS 8 f . P ADKL A2,LD:BUF ADDRESS TO RELOCATION BITS 8 P* 8 P IFT MMUPAG=1 8 2 P SUR A8,A8 INDICATE RELOCA
0x15d0fc…15d290 Dummy {f00=0x0067, f01=0x0190, f02=»TS 8 b 4 P LDR A1,A12 LOGICAL ADDRESS OF CODE TO RELOCATE 9 ( P LDR A12,A11 RESTORE RELOCATION BASE 9 B . P RB ASS:10 RELOCATE LAST SECTOR AND RETURN 9 n P XIF 9 P* 9 P EJECT LDTASK 9 P* 9 P* 9 P********** 9 P* LDSECT * 9 P*
0x15d290…15d424 Dummy {f00=0x0067, f01=0x0190, f02=»RMEDIATE BUFFER 9 r P* : ( P* INPUT: A6 = NO OF WORDS TO MOVE : " $ P* A8 = LD:ECB ADDRESS : N ( P* A9 = SEGBLK ADDRESS (=0 IF SWB) : v 0 P* A10 = EFFECTIVE LENGTH, LAST I/O : B P* A12 = LAST USED PAGE ADDRESS, LOGICAL (
0x15d424…15d5b8 Dummy {f00=0x0067, f01=0x0190, f02=»UAL PAGE ADDRESS (LOGICAL) : | , P* A1-A4, A7, A10 ARE DESTROYED ; " P* ; R P* ; PLDSECT EQU * ; f , P ADR A12,A10 UPDATE DESTINATION POINTER ; z P* ; P EJECT LDTASK ; P* ; P* SET ECB PARAMETERS ; P* ; PLDSEC2 EQU *
0x15d5b8…15d74c Dummy {f00=0x0067, f01=0x0190, f02=»ATE BUFFER NOW IN SYSTEM AREA ; P ADK A2,/80 A2 := 256 < & 6 P ST A2,ECBRL,A8 SET REQUESTED LENGTH TO ONE SECTOR < D P LDKL A4,/7FFF < ~ P XIF < P* < P IFT CPU852=0 < P MLK 4 < P DATA LD:BUF,256 < P DATA /80,/7FFF < 2 P SCR A3,A8
0x15d74c…15d8e0 Dummy {f00=0x0067, f01=0x018e, f02=» * P ADS A2,ECBCW2,A8 UPDATE SECTOR NUMBER = P RF(O) LDS:30 OVERFLOW = 2 P* = P PLDS:10 EQU * = Z , P CF A14,LD:IO READ ONE SECTOR TO LD:BUF = n $ P LDR A2,A12 DESTINATION POINTER = & P ADR A6,A6 CONVERT LENGTH TO BYTES = P* = P EJECT LDTAS
0x15d8e0…15da74 (1, 125) Dummy {f00=0x0067, f01=0x018e, f02=» P XIF > P* > PLDS:20 EQU * > P IFT MMUPAG=0 > . P IFT CPU852=1 > D P LDR* A10,A1 MOVE ONE WORD > Z P STR A10,A2 > | ( P ADK A1,2 INCREMENT BUFFER POINTERS > P ADK A2,2 > P SUK A6,2 DECREMENT COUNTER > P RB(P) LDS:20 > P
0x15da74…15dc08 Dummy {f00=0x0067, f01=0x018e, f02=» > ( P ADK A1,2 INCREMENT BUFFER POINTERS ? P ADK A2,2 ? 4 P SUK A6,2 DECREMENT COUNTER ? F P RB(P) LDS:20 ? j P XIF ? P* ? P IFT MMUPAG=0 ? P IFT CPU852=0 ? P IFT CPU857=1 ? 2 P MVB A6 MOVE REMAINING PART OF SEGMENT TO PAGE ?
0x15dc08…15dd9c Dummy {f00=0x0067, f01=0x0190, f02=» ? | P RB LDS:10 @ P* @ P EJECT LDTASK @ $ P* @ < P* @ F P********** @ P P* QLTDSK * @ b P* QLTSWB * @ t P********** @ P* @ P* @ : P* THIS ROUTINE PERFORMS ACTIVATION OF THE LOAD TASK. @ P* @ : P* ACTIVATION IS AT
0x15dd9c…15df30 Dummy {f00=0x0067, f01=0x018e, f02=» = SEGMENT BLOCK ADDRESS (LT:DSK) @ 6 P* = SWAPPABLE WORK BLOCK ADDRESS (LT:SWB) A * 2 P* A3 = TTAB ADDRESS OF CALLING TASK A d * P* A4 = LKM DATA DIRECTIVE (LT:SWB) A P* A $ P* OUTPUT: A2, A5 ARE DESTROYED A P* A P* A
0x15df30…15e0c4 Dummy {f00=0x0067, f01=0x018e, f02=» P XIF B P* B P IFT SWPBLK=0 B 6 P ABL LKMERR INDICATE SYSGEN ERROR AND HALT SYSTEM B 0 P XIF B j P* B v 0 PQLTDSK EQU * ACTIVATE LDTASK AT ENTRY LT:DSK B $ P LDKL A2,LT:DSK DISPATCH ADDRESS B P* B P EJECT LDTASK B P* B P
0x15e0c4…15e258 Dummy {f00=0x0067, f01=0x4014, f02=» P END C @ C P IFT SWPBLK=0 B 6 P ABL LKMERR INDICATE SYSGEN ERROR AND HALT SYSTEM B 0 P XIF B j P* B v 0 PQLTDSK EQU * ACTIVATE LDTASK AT ENTRY LT:DSK B $ P LDKL A2,LT:DSK DISPATCH ADDRESS B P* B P EJECT LDTASK B P* B P
0x15e258…15e3ec Dummy {f00=0x0067, f01=0x2008, f02=» D 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*
0x15e3ec…15e580 Dummy {f00=0x0067, f01=0x0190, f02=»NB GIVE OTHER TASKS A CHANCE D P* E & * PTIO260 LDK A5,DWTSB2 LOAD STACK BASE 2 E 0 P ADR A5,A6 E ^ P INH E p & P ABR* A12 GO TO DRIVER ACTIVATION E | P* E P EJECT TOSSIO E P* E P* E P********** E P* SWITCH * E P********
0x15e580…15e714 (1, 126) Opaque[0x194]
0x15e714…15e8a8 # DirEnt {nam=»ST8000«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0d00, f03=0x0000}
0x15e714…15e8a8 IdxSect {
0x15e714…15e8a8 f00 = 0x0068 // 0x15e714 @0x0
0x15e714…15e8a8 f01 = 0x0004 // 0x15e716 @0x2
0x15e714…15e8a8 gno = [ // 0x15e718 @0x4
0x15e714…15e8a8 [0x00]: C0x0068.0x0.0
0x15e714…15e8a8 [0x01]: C0x0068.0x1.0
0x15e714…15e8a8 ]
0x15e714…15e8a8 }
0x15e8a8…15ea3c Dummy {f00=0x0068, f01=0x0190, f02=» 2 P IDENT ST8000 REL 11.0 81-01-26 870105041100 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* PST8000 EQU * P* P
0x15ea3c…15ebd0 Dummy {f00=0x0068, f01=0x018e, f02=» P DATA ILLINT P DATA ILLINT 6 $ P DATA IHTW 7 @ P DATA IASCUZ 8 Z P DATA IHSOP 9 v P DATA ISLCI P DATA ISLCO P DATA CHRT1 12 P DATA IHMD 13 P
0x15ebd0…15ed64 Dummy {f00=0x0068, f01=0x0190, f02=» P DATA ILLINT 19 P DATA ILLINT 20 P DATA ILLINT 21 < P DATA ILLINT 22 X P DATA ILLINT 23 t P DATA ILLINT 24 P DATA ILLINT 25 P DATA ILLINT 26 P DATA ILLINT 27 P DATA IL
0x15ed64…15eef8 Dummy {f00=0x0068, f01=0x0190, f02=»A ILLINT 33 P DATA ILLINT 34 P DATA ILLINT 35 4 P DATA ILLINT 36 P P DATA ILLINT 37 l P DATA ILLINT 38 P DATA ILLINT 39 P DATA ILLINT 40 P DATA ILLINT 41 P DATA ILLINT
0x15eef8…15f08c Dummy {f00=0x0068, f01=0x0190, f02=» 47 P DATA ILLINT 48 P DATA ILLINT 49 , P DATA ILLINT 50 H P DATA ILLINT 51 d P DATA ILLINT 52 P DATA ILLINT 53 P DATA ILLINT 54 P DATA ILLINT 55 P DATA ILLINT 56
0x15f08c…15f220 Dummy {f00=0x0068, f01=0x4034, f02=» | P DATA ILLINT 62 P END $@ 0LINT 49 , P DATA ILLINT 50 H P DATA ILLINT 51 d P DATA ILLINT 52 P DATA ILLINT 53 P DATA ILLINT 54 P DATA ILLINT 55 P DATA ILLINT 56
0x15f220…15f3b4 (1, 127) Dummy {f00=0x0068, f01=0x2008, f02=» NT ST8000 79-09-10 JOS * ( * 2 * < * F * P * Z ENTRY ST8000 d ST8000 EQU * z END @
0x15f3b4…15f548 Dummy {f00=0x0068, f01=0x0190, f02=»D A1,ECBRL,A8 REQUESTED LENGTH V 2 P CW A1,BUFLEN,A12 COMPARE WITH DWT BUFFER SIZE W & 6 P RF(G) IO:ERR REQ. LENGTH EXCEEDS DWT BUFFER SIZE W 6 P CF A15,TIPI05 CHECK AND CORRECT BUFFER ADDRESSES W P CWK A7,1 CHECK ORDER CODE W , P RF(E) TIKB20 NO KEYTA
0x15f548…15f6dc Dummy {f00=0x0068, f01=0x0190, f02=» P* X P* X P LDR A1,A9 X P ADK A1,8 X * P ADKL A8,12 X < * P ST A8,-2,A8 SET DWT KEYTABLE ADDRESS X P P SUKL A8,4 X ~ * P ELR A3,A4 FIRST WORD OF USER KEYTABLE X P ANK A4,1 X * P RF(NZ) TIKB10 KEYTABLE ADDRESS UNEVEN X , P ECR A3,A3
0x15f6dc…15f870 Dummy {f00=0x0068, f01=0x0190, f02=»KEYTABLE BUFFER SIZE X x P RF(G) IO:ERR TOO SMALL Y P CF A15,TIPO05 Y < & P SUKL A8,8 ADJUST DWT ECB ADDRESS Y R P* Y | PTIKB20 EQU * Y P RTN A15 Y P* Y P EJECT TOSSIO Y P* Y P* T I O I T I Y P* Y 4 PTIOITI EQU A15RTN
0x15f870…15fa04 Dummy {f00=0x0068, f01=0x0190, f02=» TOSSIO Y P* Z P* T I O P C O Z P* Z 0 B P* THIS MODULE IS CALLED BY 'TIO' WHEN A WRITE REQUEST HAS BEEN Z : > P* ISSUED AND THE DEVICE IS RUNNING ON PROGRAMMED CHANNEL. Z B P* TIOPCO CHECKS THAT REQUESTED LENGTH DOES NOT EXCEED THE DWT Z D P
0x15fa04…15fb98 Dummy {f00=0x0068, f01=0x0190, f02=»ALLED BY 'TENDIO' AT Z t , P* COMPLETION OF THE REQUEST IS 'TENPCO'. [ 6 P* NOTICE THAT MODULE 'TIOKBO' IS EQUAL TO TIOPCO. [ L F P* NOTICE ALSO THAT ENTRY TIPO05 IS USED BY 'TIOKBI' AND 'TENITO'. [ & P* TIOPCO IS ALSO USED BY 'DC:MOT'. [ P* [ P* IN
0x15fb98…15fd2c Dummy {f00=0x0068, f01=0x0190, f02=» * PROGRAMMED CHANNEL, OUTPUT [ 4 P LD A2,DWTADR,A6 ADDRESS TO DRIVER ADDRESS BLOCK & $ P LD A3,ECBRL,A8 REQUESTED LENGTH ^ ( P RF(NP) TIPO20 REQUESTED LENGTH <= 0 2 P CW A3,BUFLEN,A2 COMPARE WITH DWT BUFFER SIZE 6 P RF(G) IO:ERR REQ. LENGTH EXCEED
0x15fd2c…15fec0 Dummy {f00=0x0068, f01=0x0190, f02=»NTRY POINT USED BY 'TIOKBI' AND 'TENITO' P ADK A3,1 ] 0 . P ANKL A3,/FFFE MAKE REQUESTED LENGTH EVEN ] B ( P EL A1,ECBBA,A1 USER BUFFER ADDRESS ] t & P LD A2,ECBBA,A8 DWT BUFFER ADDRESS ] 0 P ANKL A2,/FFFE MAKE DWT BUFFER ADDRESS EVEN ] P LDR A4,A1
0x15fec0…160054 (1, 128) Opaque[0x194]
0x160054…1601e8 # DirEnt {nam=»DRND01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0d10, f03=0x0000}
0x160054…1601e8 IdxSect {
0x160054…1601e8 f00 = 0x0068 // 0x160054 @0x0
0x160054…1601e8 f01 = 0x001e // 0x160056 @0x2
0x160054…1601e8 gno = [ // 0x160058 @0x4
0x160054…1601e8 [0x00]: C0x0068.0x2.0
0x160054…1601e8 [0x01]: C0x0068.0x3.0
0x160054…1601e8 [0x02]: C0x0069.0x0.0
0x160054…1601e8 [0x03]: C0x0069.0x1.0
0x160054…1601e8 [0x04]: C0x0069.0x2.0
0x160054…1601e8 [0x05]: C0x0069.0x3.0
0x160054…1601e8 [0x06]: C0x006a.0x0.0
0x160054…1601e8 [0x07]: C0x006a.0x1.0
0x160054…1601e8 [0x08]: C0x006a.0x2.0
0x160054…1601e8 [0x09]: C0x006a.0x3.0
0x160054…1601e8 [0x0a]: C0x006b.0x0.0
0x160054…1601e8 [0x0b]: C0x006b.0x1.0
0x160054…1601e8 [0x0c]: C0x006b.0x2.0
0x160054…1601e8 [0x0d]: C0x006b.0x3.0
0x160054…1601e8 [0x0e]: C0x006c.0x0.0
0x160054…1601e8 ]
0x160054…1601e8 }
0x1601e8…16037c Dummy {f00=0x0068, f01=0x0190, f02=» 2 P IDENT DRND01 REL 11.0 81-05-27 870105041100 P : $ P =2, INTERRUPT TABLES INCLUDED B P REL 11.0 81-05-25 j ( P =1, COND. ASS. FOR ONLY SUM-CONN. P REL 11.0 81-01-26 P* P* P* @ P****************************
0x16037c…160510 Dummy {f00=0x0068, f01=0x0190, f02=»RIBUTOR l P* P* P* $ @ P************************************************************ . P* r P* | 6 P* THIS PROGRAM CONTAINS INPUT AND OUTPUT ENTRIES 6 P* CALLED BY TERMINAL DEVICE DRIVERS. AT CALL, IT 6 P* CHECKS CHA
0x160510…1606a4 Dummy {f00=0x0068, f01=0x0190, f02=»UCTION MAKES IT p 8 P* POSSIBLE TO HAVE ONLY ONE TERMINAL DEVICE DRIVER 2 P* FOR EACH TERMINAL DEVICE, IRRESPECTIVE OF T 4 P* CONNECTION TYPE. IT IS ALSO POSSIBLE TO USE 6 P* SEVERAL TERMINAL DEVICE CHANNEL UNITS TOGETHER P* IN THE S
0x1606a4…160838 Dummy {f00=0x0068, f01=0x0190, f02=»IVERS ` P* AND LINE DRIVERS. P* , P EJECT 6 P* D : P* THE PROGRAM IS DIVIDED INTO A NUMBER OF SECTIONS. N 4 P* SECTIONS CONTAINING PROGRAM CODE ARE DIVIDED 2 P* INTO ROUTINES. THE ROUTINES ARE LISTED AT 4 P* BEGINNING
0x160838…1609cc Dummy {f00=0x0068, f01=0x0190, f02=»ENTRIES DECLARE ENTRY POINTS . P* EXTERNALS DECLARE EXTERNAL REFERENCES ( 6 P* CONDITION SET CONDITIONAL ASSEMBLY PARAMETERS Z & P* CONSTANTS SET CONSTANT VALUES P* DATA DATA AREAS P* 4 P* DEVICE DR ROUTINES CALLED BY DEV
0x1609cc…160b60 Dummy {f00=0x0068, f01=0x0190, f02=»* P*********** P* ( P* TERMINAL DEVICE DRIVER REQUESTS ( P* T ( P ENTRY INPUT INPUT OF ONE CHARACTER ^ ( P ENTRY STABLK DEFINE START OF BLOCK * P ENTRY OUTPUT OUTPUT OF ONE CHARACTER & P ENTRY ENDBLK DEFINE END OF BLOCK
0x160b60…160cf4 (1, 129) Dummy {f00=0x0068, f01=0x0190, f02=»ACTER FROM ECB-BUFFER v $ P ENTRY ABORT ABORT INPUT REQUEST P* F P* P . P* TERMINAL DEVICE DRIVER EXIT ROUTINES Z P* 2 P ENTRY LENDER REQUEST ERR, END I/O & DISPATCH $ P ENTRY LENDIS END I/O & DISPATCH P ENTRY LDISP DISPATC
0x160cf4…160e88 Dummy {f00=0x0068, f01=0x0190, f02=»ETURN | P ENTRY NDREP POP & RETURN P ENTRY NDRET RETURN 0 P* L P EJECT V P* d & P* LINE DRIVER SERVICE ROUTINES n P* * P ENTRY NDSAV8 SAVE A3-A5, A7-A8 IN DWT , P ENTRY NDGET8 GET A3-A5, A7-A8 FROM DWT 0 P ENTRY N
0x160e88…16101c Dummy {f00=0x0068, f01=0x0190, f02=» ( P ENTRY NDGEDW CALCULATE DWT ADDRESS P* 0 P EJECT : P* H " P* INTERRUPT TABLE FOR CHLT R P* x & P ENTRY INTLT1,INTLT2,INTLT3,INTLT4 P* " P* INTERRUPT TABLE FOR CHRT P* & P ENTRY INTRT1,INTRT2,INTRT3,INTRT4
0x16101c…1611b0 Dummy {f00=0x0068, f01=0x0190, f02=»7,INTSL8 v P* $ P* INTERRUPT TABLE FOR ASCU4Z P* B & P ENTRY INTAS1,INTAS2,INTAS3,INTAS4 L & P ENTRY INTAS5,INTAS6,INTAS7,INTAS8 v P* ( P* INTERRUPT TABLE FOR PLC - LOCAL P* & P ENTRY INTPL1,INTPL2,INTPL3,INTPL4
0x1611b0…161344 Dummy {f00=0x0068, f01=0x0190, f02=»ABLE FOR VIDEO P* & P ENTRY INTVU1,INTVU2,INTVU3,INTVU4 & P ENTRY INTVU5,INTVU6,INTVU7,INTVU8 J P* t P EJECT ~ P* P************* P* EXTERNALS * P************* P* P* TOSS ROUTINES P* ( P E
0x161344…1614d8 Dummy {f00=0x0068, f01=0x0190, f02=»I/O REQUEST ~ P* P* * P* REQUEST ROUTINES IN LINE DRIVERS ( P* V P* CHLT ` P* t " P EXTRN LTCHRI CHARACTER INPUT ~ P EXTRN LTSTBL START OF BLOCK " P EXTRN LTCHRO CHARACTER OUTPUT P EXTRN LTENBL END OF BLOCK
0x1614d8…16166c Dummy {f00=0x0068, f01=0x018e, f02=»OF BLOCK | " P EXTRN RTCHRO CHARACTER OUTPUT P EXTRN RTENBL END OF BLOCK 6 P EXTRN RTDISP DISPATCH X P* v P EJECT P* P* SALCUZ P* " P EXTRN SLCHRI CHARACTER INPUT P EXTRN SLSTBL START OF BLOCK " P EXTRN
0x16166c…161800 Dummy {f00=0x0068, f01=0x018e, f02=» " P EXTRN ASCHRI CHARACTER INPUT P EXTRN ASSTBL START OF BLOCK * " P EXTRN ASCHRO CHARACTER OUTPUT N P EXTRN ASENBL END OF BLOCK t P EXTRN ASDISP DISPATCH P* P* FT80 P* " P EXTRN FTCHRI CHARACTER INPUT P EXTRN
0x161800…161994 (1, 130) Dummy {f00=0x0069, f01=0x0190, f02=» P* PLC - LOCAL P* " " P EXTRN PLCHRI CHARACTER INPUT , P EXTRN PLSTBL START OF BLOCK R " P EXTRN PLCHRO CHARACTER OUTPUT v P EXTRN PLENBL END OF BLOCK P EXTRN PLDISP DISPATCH P* P EJECT P* P* PLC
0x161994…161b28 Dummy {f00=0x0069, f01=0x0190, f02=» P EXTRN PRENBL END OF BLOCK P EXTRN PRDISP DISPATCH & P* D P* VIDEO N P* b " P EXTRN VUCHRI CHARACTER INPUT l P EXTRN VUSTBL START OF BLOCK " P EXTRN VUCHRO CHARACTER OUTPUT P EXTRN VUENBL END OF BLOCK P EXTRN VUD
0x161b28…161cbc Dummy {f00=0x0069, f01=0x0190, f02=»XTRN DWTST STATUS P EXTRN DWTECB ECB ADDRESS P EXTRN DWTOR INDEX AND ORDER < . P EXTRN DWTADR DRIVER ADDRESS BLOCK ADDRESS ` * P EXTRN DWTWAT WAIT/ACTIVATE INDICATOR " P EXTRN DWTA3 SAVE AREA FOR A3 " P EXTRN DWTA4 SAVE AREA FOR A4
0x161cbc…161e50 Dummy {f00=0x0069, f01=0x0190, f02=»OR A8 x 4 P EXTRN DWTECH DWT ADDRESS OF ECHO OUTPUT DEVICE P* F P* P P* ECB DISPLACEMENTS Z P* x P EXTRN ECBBA BUFFER ADDRESS " P EXTRN ECBRL REQUESTED LENGTH " P EXTRN ECBEL EFFECTIVE LENGTH P* P* P*
0x161e50…161fe4 Dummy {f00=0x0069, f01=0x0190, f02=»LOCK b P* P EJECT P* $ P************************ . P* CONDITIONAL ASSEMBLY * N P************************ n P* 6 P* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION . P* SET IS OBTAINED BY SETTING CPU852 EQU 0. P*
0x161fe4…162178 Dummy {f00=0x0069, f01=0x0190, f02=»ARE USED IN THE SYSTEM. t ( P* 0 MEANS CHANNEL UNIT IS NOT USED. $ P* 1 MEANS CHANNEL UNIT IS USED. L P* t PX:A EQU 0 ~ PLT EQU 00 CHLT P* PX:B EQU 0 PRT EQU 00 CHRT P* PX:C EQU 0 PSL EQU 00 SALCUZ
0x162178…16230c Dummy {f00=0x0069, f01=0x018e, f02=» EQU 01 PLC - LOCAL P* P EJECT & P* 4 PX:G EQU 0 > PPR EQU 01 PLC - REMOTE P P* n PX:H EQU 0 x PVU EQU 00 VIDEO P* P* * P* ECHO FUNCTION IS INCLUDED IF CECHO=1 P* PX:I EQU 1 PCECHO EQ
0x16230c…1624a0 Dummy {f00=0x0069, f01=0x0190, f02=» h P* PS1 EQU SL+AS U =1 PS2 EQU S1+FT U =1 , PS3 EQU S2+PL U =1 F PS4 EQU S3+PR U =1 ` PS5 EQU S4+VU U =1 z P* PNTONSU EQU S5 U =1 P* P EJECT P* P************* P* CONSTANTS * P**
0x1624a0…162634 (1, 131) Dummy {f00=0x0069, f01=0x0190, f02=»MODE z $ PDWFINP EQU /0020 INPUT REQUESTED P* 4 P* > P* MISCELLANEOUS H P* b 0 PNOTOPR EQU /0001 RETURN CODE "NOT OPERABLE" l 6 PCONFER EQU /0001 RETURN CODE "CONFIGURATION ERROR" 0 PREQERR EQU /8000 RETURN CODE "REQUEST ERROR"
0x162634…1627c8 Dummy {f00=0x0069, f01=0x0190, f02=» P************** P* P IFF NTONSU=0 U =1 $ P* > P* DISPATCH TABLES H P* d P* CHARACTER INPUT n PINPTAB EQU * P IFT LT=0 P DATA NDRETE P XIF P IFF NTONSU=0 U =1 P IFT LT=1 P DATA LTCH
0x1627c8…16295c Dummy {f00=0x0069, f01=0x0190, f02=»FT RT=1 P DATA RTCHRI P XIF $ P IFF NTONSU=0 U =1 0 P* J P IFT SL=0 T P DATA NDRETE f P XIF z P IFF NTONSU=0 U =1 P IFT SL=1 P DATA SLCHRI P XIF P IFF NTONSU=0 U =1 P* P IFT AS=0 P
0x16295c…162af0 Dummy {f00=0x0069, f01=0x0190, f02=» P IFT FT=0 P DATA NDRETE P XIF . P IFF NTONSU=0 U =1 : P IFT FT=1 T P DATA FTCHRI f P XIF z P IFF NTONSU=0 U =1 P* P IFT PL=0 P DATA NDRETE P XIF P IFF NTONSU=0 U =1 P IFT PL=1 P
0x162af0…162c84 Dummy {f00=0x0069, f01=0x0190, f02=» ~ P IFT PR=1 P DATA PRCHRI P XIF . P IFF NTONSU=0 U =1 : P* T P IFT VU=0 ^ P DATA NDRETE p P XIF P IFF NTONSU=0 U =1 P IFT VU=1 P DATA VUCHRI P XIF P IFF NTONSU=0 U =1 PDTABLN EQU *-INPTA
0x162c84…162e18 Dummy {f00=0x0069, f01=0x0190, f02=»TONSU=0 U =1 P IFT LT=1 P DATA LTSTBL & P XIF : P IFF NTONSU=0 U =1 F P* ` P IFT RT=0 j P DATA NDRETE | P XIF P IFF NTONSU=0 U =1 P IFT RT=1 P DATA RTSTBL P XIF P IFF NTONSU=0 U =1 P*
0x162e18…162fac Dummy {f00=0x0069, f01=0x0190, f02=»TONSU=0 U =1 P* P IFT AS=0 P DATA NDRETE 0 P XIF D P IFF NTONSU=0 U =1 P P IFT AS=1 j P DATA ASSTBL | P XIF P IFF NTONSU=0 U =1 P* P IFT FT=0 P DATA NDRETE P XIF P IFF NTONSU=0 U =1
0x162fac…163140 Dummy {f00=0x0069, f01=0x0190, f02=» P IFF NTONSU=0 U =1 P IFT PL=1 P DATA PLSTBL 0 P XIF D P IFF NTONSU=0 U =1 P P* j P IFT PR=0 t P DATA NDRETE P XIF P IFF NTONSU=0 U =1 P IFT PR=1 P DATA PRSTBL P XIF P IFF NTONSU=0 U =1
0x163140…1632d4 (1, 132) Dummy {f00=0x0069, f01=0x0190, f02=» P IFF NTONSU=0 U =1 P* P* ( P* CHARACTER OUTPUT 2 POUPTAB EQU * R P IFT LT=0 f P DATA NDRETE x P XIF P IFF NTONSU=0 U =1 P IFT LT=1 P DATA LTCHRO P XIF P IFF NTONSU=0 U =1 P* P
0x1632d4…163468 Dummy {f00=0x0069, f01=0x0190, f02=»U=0 U =1 P* P IFT SL=0 P DATA NDRETE , P XIF @ P IFF NTONSU=0 U =1 L P IFT SL=1 f P DATA SLCHRO x P XIF P IFF NTONSU=0 U =1 P* P IFT AS=0 P DATA NDRETE P XIF P IFF NTONSU=0 U =1 P
0x163468…1635fc Dummy {f00=0x0069, f01=0x0190, f02=» IFF NTONSU=0 U =1 P IFT FT=1 P DATA FTCHRO , P XIF @ P IFF NTONSU=0 U =1 L P* f P IFT PL=0 p P DATA NDRETE P XIF P IFF NTONSU=0 U =1 P IFT PL=1 P DATA PLCHRO P XIF P IFF NTONSU=0 U =1 P
0x1635fc…163790 Dummy {f00=0x0069, f01=0x0190, f02=» IFF NTONSU=0 U =1 P* ! P IFT VU=0 ! $ P DATA NDRETE ! 6 P XIF ! J P IFF NTONSU=0 U =1 ! V P IFT VU=1 ! p P DATA VUCHRO ! P XIF ! P IFF NTONSU=0 U =1 ! P* ! P* ! P* END OF BLOCK ! PENBTAB EQU * ! P IFT LT=
0x163790…163924 Dummy {f00=0x0069, f01=0x0190, f02=» ! ~ P* " P IFT RT=0 " P DATA NDRETE " $ P XIF " 8 P IFF NTONSU=0 U =1 " D P IFT RT=1 " ^ P DATA RTENBL " p P XIF " P IFF NTONSU=0 U =1 " P* " P IFT SL=0 " P DATA NDRETE " P XIF " P IFF NTONSU=0 U =1 " P IFT SL=
0x163924…163ab8 Dummy {f00=0x0069, f01=0x0190, f02=»NSU=0 U =1 " P IFT AS=1 # P DATA ASENBL # $ P XIF # 8 P IFF NTONSU=0 U =1 # D P* # ^ P IFT FT=0 # h P DATA NDRETE # z P XIF # P IFF NTONSU=0 U =1 # P IFT FT=1 # P DATA FTENBL # P XIF # P IFF NTONSU=0 U =1 # P* #
0x163ab8…163c4c Dummy {f00=0x0069, f01=0x0190, f02=»NSU=0 U =1 # P* $ P IFT PR=0 $ P DATA NDRETE $ . P XIF $ B P IFF NTONSU=0 U =1 $ N P IFT PR=1 $ h P DATA PRENBL $ z P XIF $ P IFF NTONSU=0 U =1 $ P* $ P IFT VU=0 $ P DATA NDRETE $ P XIF $ P IFF NTONSU=0 U =1 $
0x163c4c…163de0 Dummy {f00=0x0069, f01=0x0190, f02=»QU * $ P IFT LT=0 % P DATA TDISP % P XIF % 2 P IFF NTONSU=0 U =1 % > P IFT LT=1 % X P DATA LTDISP % j P XIF % ~ P IFF NTONSU=0 U =1 % P* % P IFT RT=0 % P DATA TDISP % P XIF % P IFF NTONSU=0 U =1 % P IFT RT=1 %
0x163de0…163f74 (1, 133) Dummy {f00=0x0069, f01=0x0190, f02=»U =1 % P IFT SL=1 & P DATA SLDISP & P XIF & 2 P IFF NTONSU=0 U =1 & > P* & X P IFT AS=0 & b P DATA TDISP & t P XIF & P IFF NTONSU=0 U =1 & P IFT AS=1 & P DATA ASDISP & P XIF & P IFF NTONSU=0 U =1 & P* & P IFT
0x163f74…164108 Dummy {f00=0x0069, f01=0x0190, f02=»U =1 & P* ' P IFT PL=0 ' P DATA TDISP ' ( P XIF ' < P IFF NTONSU=0 U =1 ' H P IFT PL=1 ' b P DATA PLDISP ' t P XIF ' P IFF NTONSU=0 U =1 ' P* ' P IFT PR=0 ' P DATA TDISP ' P XIF ' P IFF NTONSU=0 U =1 ' P IFT
0x164108…16429c Dummy {f00=0x0069, f01=0x0190, f02=» NTONSU=0 U =1 ' P IFT VU=1 ( P DATA VUDISP ( ( P XIF ( < P* ( H P EJECT ( R P* ( ` P* INTERRUPT TABLES ( j P* ( P IFT LT=0 U =2 ( P* DUMMY ENTRIES CHLT ( PINTLT1 EQU * U =2 ( PINTLT2 EQU * U =2 ( PINTLT3 EQU *
0x16429c…164430 Dummy {f00=0x0069, f01=0x018e, f02=»T2 DATA 0 U =2 ( PINTLT3 DATA 0 U =2 ) PINTLT4 DATA 0 U =2 ) 0 P XIF U =2 ) J P* ) P IFT RT=0 U =2 ) f P* DUMMY ENTRIES CHRT ) | PINTRT1 EQU * U =2 ) PINTRT2 EQU * U =2 ) PINTRT3 EQU * U =2 ) PINTRT4 EQU * U =2 ) P XIF
0x164430…1645c4 Dummy {f00=0x0069, f01=0x0190, f02=» ) | PINTRT4 DATA 0 U =2 * P XIF U =2 * " P* * 4 P IFT SL=0 U =2 * > P* DUMMY ENTRIES SALCUZ * T PINTSL1 EQU * * t PINTSL2 EQU * U =2 * PINTSL3 EQU * U =2 * PINTSL4 EQU * U =2 * PINTSL5 EQU * U =2 * PINTSL6 EQU * U =2 *
0x1645c4…164758 Dummy {f00=0x0069, f01=0x0190, f02=»0 U =2 * PINTSL2 DATA 0 U =2 + PINTSL3 DATA 0 U =2 + ( PINTSL4 DATA 0 U =2 + B PINTSL5 DATA 0 U =2 + PINTSL6 DATA 0 U =2 + v PINTSL7 DATA 0 U =2 + PINTSL8 DATA 0 U =2 + P XIF U =2 + P* + P IFT AS=0 U =2 + P* DUMMY ENTRIES
0x164758…1648ec Dummy {f00=0x0069, f01=0x0190, f02=» + ~ PINTAS6 EQU * U =2 , PINTAS7 EQU * U =2 , " PINTAS8 EQU * U =2 , < P XIF U =2 , V P* , h P IFT AS=1 U =2 , r P* ASCU4Z , PINTAS1 DATA 0 U =2 , PINTAS2 DATA 0 U =2 , PINTAS3 DATA 0 U =2 , PINTAS4 DATA 0 U =2 , PINTA
0x1648ec…164a80 Dummy {f00=0x0069, f01=0x0190, f02=»0 U =2 , " P* DUMMY ENTRIES PLC - LOCAL - PINTPL1 EQU * U =2 - 4 PINTPL2 EQU * U =2 - N PINTPL3 EQU * U =2 - h PINTPL4 EQU * U =2 - P XIF U =2 - P* - P IFT PL=1 U =2 - P* PLC - LOCAL - PINTPL1 DATA 0 U =2 - PINTPL2 D
0x164a80…164c14 (1, 134) Dummy {f00=0x006a, f01=0x0190, f02=»ES PLC - REMOTE - PINTPR1 EQU * U =2 . PINTPR2 EQU * U =2 . 2 PINTPR3 EQU * U =2 . L PINTPR4 EQU * U =2 . f P XIF U =2 . P* . P IFT PR=1 U =2 . P* PLC - REMOTE . PINTPR1 DATA 0 U =2 . PINTPR2 DATA 0 U =2 . PINTPR3 D
0x164c14…164da8 Dummy {f00=0x006a, f01=0x0190, f02=» * U =2 . PINTVU2 EQU * U =2 / PINTVU3 EQU * U =2 / * PINTVU4 EQU * U =2 / D PINTVU5 EQU * U =2 / ^ PINTVU6 EQU * U =2 / x PINTVU7 EQU * U =2 / PINTVU8 EQU * U =2 / P XIF U =2 / P* / P IFT VU=1 U =2 / P* VIDEO /
0x164da8…164f3c Dummy {f00=0x006a, f01=0x0190, f02=»U6 DATA 0 U =2 / PINTVU7 DATA 0 U =2 0 PINTVU8 DATA 0 U =2 0 0 P XIF U =2 0 J P* 0 P EJECT 0 f P* 0 t P************************** 0 ~ P* DEVICE DRIVER ROUTINES * 0 P************************** 0 P* 0 B P* THIS SECTION CONTAINS
0x164f3c…1650d0 Dummy {f00=0x006a, f01=0x0190, f02=»R SWITCH CONTROL TO THE LINE DRIVER TO WHICH 0 | D P* THE DEVICE IS CONNECTED. WHEN THE LINE DRIVER HAS PERFORMED 1 4 D P* THE REQUESTED ACTIONS, IT WILL RETURN TO THE DEVICE DRIVER, 1 | D P* EITHER DIRECTLY OR THROUGH THE TERMINAL NETWORK DISTRIBUTOR 1
0x1650d0…165264 Dummy {f00=0x006a, f01=0x0190, f02=»RETURN TO THE DEVICE 1 f P* DRIVER. 2 P* 2 0 P* 2 : 0 P* ROUTINES IN ORDER OF APPEARANCE IN CODE: 2 D P* 2 x P* NAME FUNCTION 2 P* 2 2 P* INPUT FETCH ONE CHARACTER FROM INPUT DEVICE 2 * P* STABLK DEFINE START OF OUTPUT BLOCK 2 0 P
0x165264…1653f8 Dummy {f00=0x006a, f01=0x0190, f02=» 2 h $ P* ECHRTN RETURN FROM ECHO OUTPUT 3 * P* GETCHR GET CHARACTER FROM ECB BUFFER 3 0 * P* ABORT SET INPUT NO LONGER REQUESTED 3 ^ . P* LDISP DISPATCH AT I/O REQUEST COMPLETED 3 P* 3 P EJECT 3 P* 3 @ P****************************************
0x1653f8…16558c Dummy {f00=0x006a, f01=0x018e, f02=» OF ONE CHARACTER 3 t 0 P* FROM A DEVICE TO A TERMINAL DEVICE DRIVER. 4 P* 4 N P* CALL: 4 X P* CF A5,INPUT 4 h P* 4 ~ P* INPUT: 4 P* A5 = LOCAL STACK POINTER 4 P* A6 = DWT ADDRESS 4 P* 4 P* OUTPUT: 4 & P* A1 = BITS 0-14 N
0x16558c…165720 Dummy {f00=0x006a, f01=0x0190, f02=» P* 5 @ P************************************************************ 5 P* 5 R PINPUT EQU * 5 P IFF NTONSU=0 U =1 5 p & P LC A1,DWTCHP,A6 CHANNEL PARAMETER 5 ( P ANK A1,MASKCT CLEAN CONNECTION TYPE 5 P SLA A1,1 MAKE INDEX 5 P CWK A1,DTAB
0x165720…1658b4 (1, 135) Dummy {f00=0x006a, f01=0x0190, f02=»U =1 5 & P ABL LTCHRI ACTIVATE SUM-DRIVER =1 6 P XIF U =1 6 6 P* 6 H P EJECT 6 R P* 6 ` @ P************************************************************ 6 j P* 6 P* ROUTINE NAME: 6 P* STABLK 6 P* 6 P* FUNCTION: 6 6 P* THIS ROU
0x1658b4…165a48 Dummy {f00=0x006a, f01=0x0190, f02=»OCK VARIES FOR 6 n P* DIFFERENT LINE DRIVERS. 7 P* 7 8 P* CALL: 7 B P* CF A5,STABLK 7 R P* 7 h P* INPUT: 7 r . P* A2 = MAXIMAL NR OF CHARACTERS IN BLOCK 7 P* A5 = LOCAL STACK POINTER 7 P* A6 = DWT ADDRESS 7 P* 7 P* OUTPUT:
0x165a48…165bdc Dummy {f00=0x006a, f01=0x0190, f02=» = CONTENTS OF A1 7 P* 8 @ P************************************************************ 8 $ P* 8 h PSTABLK EQU * 8 r & P LC A1,DWTCHP,A6 CHANNEL PARAMETER 8 P IFF NTONSU=0 U =1 8 ( P ANK A1,MASKCT CLEAN CONNECTION TYPE 8 P SLA A1,1 MAKE IND
0x165bdc…165d70 Dummy {f00=0x006a, f01=0x0190, f02=» 8 P IFT NTONSU=0 U =1 9 " P ANK A1,1 LOCAL OR REMOTE ? =1 9 " P ABL(Z) LTSTBL LOCAL =1 9 H P ABL RTSTBL REMOTE =1 9 h P XIF U =1 9 P EJECT 9 P* 9 @ P************************************************************ 9 P* 9 P* ROUTINE
0x165d70…165f04 Dummy {f00=0x006a, f01=0x0190, f02=»CE DRIVER TO A DEVICE. 9 z P* : P* CALL: : ( P* CF A5,OUTPUT : 8 P* : N P* INPUT: : X P* A2 = BITS 0-7 IRRELEVANT : h P* BITS 8-15 CHARACTER : P* A5 = LOCAL STACK POINTER : P* A6 = DWT ADDRESS : P* : P* OUTPUT: : P
0x165f04…166098 Dummy {f00=0x006a, f01=0x0190, f02=»ENTS OF A1 : P* ; @ P************************************************************ ; P* ; ` POUTPUT EQU * ; j P IFF NTONSU=0 U =1 ; ~ & P LC A1,DWTCHP,A6 CHANNEL PARAMETER ; ( P ANK A1,MASKCT CLEAN CONNECTION TYPE ; P SLA A1,1 MAKE INDEX ;
0x166098…16622c Dummy {f00=0x006a, f01=0x0190, f02=» IFT NTONSU=0 U =1 ; & P ABL LTCHRO ACTIVATE SUM-DRIVER =1 < P XIF U =1 < D P* < V P EJECT < ` P* < n @ P************************************************************ < x P* < P* ROUTINE NAME: < P* ENDBLK < P* < P* FUNCTION: <
0x16622c…1663c0 Dummy {f00=0x006a, f01=0x0190, f02=» END OF BLOCK VARIES FOR < z P* DIFFERENT LINE DRIVERS. = P* = B P* CALL: = L P* CF A5,ENDBLK = P* = r P* INPUT: = | P* A5 = LOCAL STACK POINTER = P* A6 = DWT ADDRESS = P* = P* OUTPUT: = P* A1 = RETURN CODE = P* 0
0x1663c0…166554 (1, 136) Dummy {f00=0x006a, f01=0x0190, f02=»******************************************************** = P* > @ PENDBLK EQU * > J & P LC A1,DWTCHP,A6 CHANNEL PARAMETER > ^ P IFF NTONSU=0 U =1 > ( P ANK A1,MASKCT CLEAN CONNECTION TYPE > P SLA A1,1 MAKE INDEX > P CWK A1,DTABLN INSIDE LIMIT? >
0x166554…1666e8 Dummy {f00=0x006a, f01=0x018e, f02=»1,1 LOCAL OR REMOTE ? =1 > P ABL(Z) LTENBL LOCAL =1 ? P ABL RTENBL REMOTE =1 ? @ P XIF U =1 ? ^ P* ? p P EJECT ? z P* ? @ P************************************************************ ? P* ? P* ROUTINE NAME: ? P* ECHO ? P*
0x1666e8…16687c Dummy {f00=0x006a, f01=0x0190, f02=» ? d 4 P* PART ONE: FIND DWT-ADDRESS OF ECHO-DEVICE, @ 2 P* LOAD STACKBASE AND FIND ADDRESS @ @ 4 P* TO DEVICE-DEPENDENT ECHO-ROUTINE @ v . P* PART TWO: ECHO ONE OR MORE CHARACTERS @ 2 P* CORRESPONDING TO ONE CHAR
0x16687c…166a10 Dummy {f00=0x006a, f01=0x0190, f02=»E DRIVER MODULE CORRESPONDING TO ECHO @ P* OUTPUT DEVICE A . P* A H 4 P* ECHO IS USED WHEN A CHARACTER SHOULD BE ECHOED A R , P* ECHEND IS USED AT END OF INPUT REQUEST A 6 P* THE ECHO-ROUTINE SHOULD BE TERMINATED WITH A A P* JUMP TO 'ECHRTN
0x166a10…166ba4 Dummy {f00=0x006a, f01=0x0190, f02=» SIGNIFICANT A p 4 P* BIT 15 1 IF MORE CHARACTERS B & P* A2 = BITS 0-7 NOT SIGNIFICANT B L & P* BITS 8-17 CHARACTER (IF ECHO) B v P* A5 = LOCAL STACK POINTER B P* A6 = DWT ADDRESS B P* B P EJECT B P* B P* OUTP
0x166ba4…166d38 Dummy {f00=0x006a, f01=0x0190, f02=»5 1 IF MORE CHARACTERS B x $ P* A2 = BITS 0-7 ZERO (IF ECHO) C & P* BITS 8-15 CHARACTER (IF ECHO) C H P* A5 = LOCAL STACK POINTER C r ( P* A6 = ADDRESS OF OUTPUT DEVICE DWT C * P* A7 = BIT 0 0 IF ECHO, 1 IF ECHEND C " P* BITS 1-15 NOT SIGNI
0x166d38…166ecc Dummy {f00=0x006a, f01=0x0190, f02=»******************************************************** C P* D @ PECHEND EQU * D J P* D ^ P IFT CECHO=1 D h , P CF A15,NDSAV8 SAVE A3-A5, A7-A8 IN DWT D | ( P LDKL A7,/8000 INDICATE END OF ECHO D P RF ECHO10 D P* D P EJECT D P* D
0x166ecc…167060 Dummy {f00=0x006a, f01=0x0190, f02=»ND OF ECHO D x P* E P* E PECHO10 EQU * E & P LD A3,DWTST,A6 STATUS E : $ P ANKL A3,DWFECH ECHO REQUESTED? E X P RF(Z) NDREP NO, RETURN E P* E 0 P LDR A4,A6 SAVE DWT-ADDRESS OF INPUT DEVICE E 2 P LD A6,DWTECH,A6 DWT-ADDRESS OF OUTPUT DEV
0x167060…1671f4 (1, 137) Dummy {f00=0x006a, f01=0x0190, f02=» ANK A2,/FF CLEAN CHARACTER E . P LD A3,DWTADR,A6 ADDRESS TO ADDRESS-BLOCK F $ 6 P ABI ECHADR,A3 GO TO ECHO-ROUTINE DEVICE-DEPENDENT F V P XIF F P* F P EJECT F P* F @ P************************************************************ F P* F
0x1671f4…167388 Dummy {f00=0x006a, f01=0x0190, f02=»* IS READY WITH ECHOING ACTIONS, AND WANTS TO LEAVE F * P* CONTROL BACK TO INPUT DEVICE DRIVER. G < P* G j P* CALL: G t P* ABL ECHRTN G P* G P* INPUT: G ( P* A6 = DWT ADDRESS OF OUTPUT DEVICE G P* G P* OUTPUT: G $ P* AT ENTR
0x167388…16751c Dummy {f00=0x006a, f01=0x0190, f02=» PECHRTN EQU * H P IFT CECHO=1 H 0 P LD A6,DWTWAT,A6 DWT-ADDRESS OF INPUT DEVICE H , , P RF NDREP RELOAD A3-A5, A7-A8 AND RETURN H ` P XIF H P* H P EJECT H P* H @ P************************************************************ H P* H
0x16751c…1676b0 Dummy {f00=0x006a, f01=0x0190, f02=»BUFFER AND INCREMENT THE BUFFER INDEX. H 2 P* IF NO CHARACTER IS LEFT, INDEX IS STORED IN I . P* ECB REQUESTED LENGTH. I d P* I P* CALL: I P* CF A15,GETCHR I P* I P* INPUT: I P* A3 = BUFFER INDEX I P* A8 = ECB ADDRESS I P
0x1676b0…167844 Dummy {f00=0x006a, f01=0x0190, f02=» & P* BITS 8-15 CHARACTER (IF A1>0) J ( P* A3 = UPDATED BYTE INDEX (IF A1>0) J . P* CR = CHANGED J Z P* INTERR. ENABLED J r P* J @ P************************************************************ J P* J PGETCHR EQU * J $ P LD A1,ECBRL,A8
0x167844…1679d8 Dummy {f00=0x006a, f01=0x0190, f02=»8 GET BUFFER ADDRESS J P ADR A2,A3 K P LCR A2,A2 CHAR. TO A2 K . P ANK A2,/FF K L $ P ADK A3,1 INCREMENT BUFFER INDEX K ` P RF GCH020 K P* K P* K PGCH010 EQU * K * P ST A3,ECBEL,A8 STORE EFFECTIVE LENGTH K PGCH020 EQU * K " P ADK
0x1679d8…167b6c Dummy {f00=0x006a, f01=0x0190, f02=»************************ K l P* L P* ROUTINE NAME: L * P* ABORT L B P* L R P* FUNCTION: L : P* THIS ROUTINE RESETS THE INPUT REQUESTED FLAG IN DWT. L p : P* IT IS USED AT ABORT REQUESTS, WHEN A REQUESTED INPUT L P* IS NO LONGER WANTED. L
0x167b6c…167d00 Dummy {f00=0x006a, f01=0x0190, f02=» = CHANGED L P* CR = CHANGED M P* M , @ P************************************************************ M 6 P* M z PABORT EQU * M 2 P LDKL A1,/FFFF-DWFINP MASK FOR INPUT REQUESTED M P ANS A1,DWTST,A6 RESET FLAG M P IFT CPU852=1 M P
0x167d00…167e94 (1, 138) Dummy {f00=0x006b, f01=0x018e, f02=»********************************************** M P* N 6 P* ROUTINE NAME: N @ P* LDISP N X P* N h P* FUNCTION: N r 8 P* THIS ROUTINE PERFORMS DISPATCHING FOR THE TERMINAL N 8 P* DEVICE DRIVERS. IT ALSO PROVIDES QUICK EXITS FROM N 0 P* DEVICE D
0x167e94…168028 Dummy {f00=0x006b, f01=0x0190, f02=» P* INPUT: O $ P* A1 = RETURN CODE (IF LENDIS) O P* A6 = DWT ADDRESS O < P* O X P* OUTPUT: O b 2 P* AT ENTRY TO LINE DRIVER DISPATCH ENTRY: O t P* A6 = DWT ADDRESS O P* O @ P********************************************************
0x168028…1681bc Dummy {f00=0x006b, f01=0x018e, f02=»UEST O v P* P P EJECT P P* P $ PLDISP EQU * P . P IFF NTONSU=0 U =1 P B & P LC A1,DWTCHP,A6 CHANNEL PARAMETER P ( P ANK A1,MASKCT CLEAN CONNECTION TYPE P P SLA A1,1 MAKE INDEX P P CWK A1,DTABLN INSIDE LIMIT? P 0 P ABI(L) ENRTAB,A1 YES,
0x1681bc…168350 Dummy {f00=0x006b, f01=0x018e, f02=» P v P* LINE DRIVER ROUTINES * Q P************************ Q ( P* Q H F P* THIS SECTION CONTAINS AN EXIT ROUTINE THAT CAN BE USED BY THE Q R : P* LINE DRIVERS WHEN RETURNING TO THE DEVICE DRIVER. Q > P* IT ALSO CONTAINES A NUMBER OF SERVICE SUBR
0x168350…1684e4 Dummy {f00=0x006b, f01=0x0190, f02=» P* R P* NAME FUNCTION R P* R & $ P* NDRET RETURN TO DEVICE DRIVER R 0 & P* NDSAV8 SAVE A3-A5, A7-A8 IN DWT R X & P* NDGET8 GET A3-A5, A7-A8 FROM DWT R 8 P* NDREWS CALL RECOVERY FOR ALL DWT:S ON WORK STATION R * P* NDREDW CALL RECOVERY ROUTINE F
0x1684e4…168678 Dummy {f00=0x006b, f01=0x0190, f02=»************************************************************ R P* S D P* ROUTINE NAME: S N P* NDRET S f P* S v P* FUNCTION: S 4 P* THIS ROUTINE CONTAINS A NUMBER OF ENTRIES FOR S 0 P* RETURNING TO THE TERMINAL DEVICE DRIVERS. S 4 P* THEY C
0x168678…16880c Dummy {f00=0x006b, f01=0x0190, f02=» ALSO CONTAINS A "RTN A15" S . P* SIMULATION THAT DOESN'T PERFORM ENABLE. T $ P* T V P* CALL: T ` P* RF "NAME" T p P* RB "NAME" T P* ABL "NAME" T P* T P* INPUT: T , P* A5 = LOCAL STACK POINTER (IF NDRETX) T $ P* A6 = DWT ADDRES
0x16880c…1689a0 Dummy {f00=0x006b, f01=0x0190, f02=»NDLING ROUTINE T n P* U @ P************************************************************ U P* U d PNDRETE EQU * U n & P LDK A1,CONFER CONFIGURATION ERROR U P RF NDRET RETURN U P* U P EJECT U P* U PNDREPO EQU * U , P CF A15,NDGET8
0x1689a0…168b34 (1, 139) Dummy {f00=0x006b, f01=0x0190, f02=» U P* V PNDREP EQU * V , P CF A15,NDGET8 GET A3-A5, A7-A8 FROM DWT V & PNDRET EQU * V V P ENB V j & P ADK A5,4 ADJUST STACK FOR RETURN V v P LDR A1,A1 SET CR V $ P ABR* A5 RETURN TO DEVICE DRIVER V P* V P* V P IFT CPU852=1 V
0x168b34…168cc8 Dummy {f00=0x006b, f01=0x0190, f02=»****************************************** V ~ P* W 2 P* ROUTINE NAME: W < P* NDSAV8 W T P* W d P* FUNCTION: W n 6 P* THIS ROUTINE SAVES REGISTERS A3, A4, A5, A7 AND W P* A8 IN A SAVE AREA IN DWT. W P* W P* CALL: W P* CF A15,NDSAV
0x168cc8…168e5c Dummy {f00=0x006b, f01=0x0190, f02=»************************************************** W P* X : PNDSAV8 EQU * X D " P* SAVE A3-A5, A7-A8 IN DWT X X P ST A3,DWTA3,A6 X ~ P ST A4,DWTA4,A6 X P ST A5,DWTA5,A6 X P ST A7,DWTA7,A6 X P ST A8,DWTA8,A6 X P* X P IFT CPU
0x168e5c…168ff0 Dummy {f00=0x006b, f01=0x018e, f02=»************************************************************ X P* Y D P* ROUTINE NAME: Y N P* NDGET8 Y f P* Y v P* FUNCTION: Y 8 P* THIS ROUTINE FETCHES REGISTERS A3, A4, A5, A7 AND Y " P* A8 FROM A SAVE AREA IN DWT. Y P* Y P* CALL:
0x168ff0…169184 Dummy {f00=0x006b, f01=0x0190, f02=» P* Z @ P************************************************************ Z P* Z R PNDGET8 EQU * Z " P* GET A3-A5, A7-A8 FROM DWT Z p P LD A3,DWTA3,A6 Z P LD A4,DWTA4,A6 Z P LD A5,DWTA5,A6 Z P LD A7,DWTA7,A6 Z P LD A8,DWTA8,A6 Z
0x169184…169318 Dummy {f00=0x006b, f01=0x0190, f02=» EJECT Z P* [ @ P************************************************************ [ P* [ P* ROUTINE NAME: [ f P* NDREWS [ ~ P* [ P* FUNCTION: [ 8 P* THIS ROUTINE CALLS RECOVERY ROUTINES FOR ALL DWT:S [ : P* ON A WORK STATION, EXEPT FOR T
0x169318…1694ac Dummy {f00=0x006b, f01=0x0190, f02=»= WORK STATION TABLE ADDRESS [ P* A4 = RECOVERY CAUSE $ P* A6 = WORK STATION NUMBER B P* f P* OUTPUT: p ( P* AT ENTRY TO RECOVERY ROUTINE: P* SEE NDREDW P* AT SUBROUTINE RETURN: P* CR = CHANGED P* INTERR.
0x1694ac…169640 Dummy {f00=0x006b, f01=0x0190, f02=»0 U =1 P IFT CPU852=1 ] P CF A15,SAVE8 PUSH A1-A8 ] $ P XIF ] D P IFF NTONSU=0 U =1 ] P P IFF CPU852=1 ] j P MSR 8,A15 PUSH A1-A8 ] P XIF ] P IFF NTONSU=0 U =1 ] P* ] P EJECT ] P* ] P LDR A8,A6 SAVE WS NUMBER ] * P
0x169640…1697d4 (1, 140) Dummy {f00=0x006b, f01=0x018e, f02=»100 EQU * ] P SUK A7,1 NEXT DWT ^ " P RF(N) RW120 EXIT IF ALL DONE ^ , " P LDR A6,A8 WORK STATION NUMBER ^ R * P LDR A1,A3 WORK STATION TABLE ADDRESS ^ x $ P CF A15,NDGEDW A6 := DWT ADDRESS ^ P* ^ P LDR A6,A6 DWT DEFINED? ^ P RB(Z) RW100 NO,
0x1697d4…169968 Dummy {f00=0x006b, f01=0x0190, f02=» & P* CHECK IF OUTPUT ECHO DEVICE _ P LD A1,DWTST,A6 DWT STATUS _ . P LDR A2,A1 SAVE _ P P ANKL A1,DWFECH ECHO MODE? _ h P RF(Z) RW110 NO, CONTINUE _ " P ANKL A2,DWFINP INPUT DEVICE? _ , P RB(Z) RW100 NO, ECHO OUTPUT. TAKE NEXT _ P* _
0x169968…169afc Dummy {f00=0x006b, f01=0x0190, f02=» ALL DWT:S HANDLED _ P ABL TDISP RETURN ` P XIF U =1 ` 6 P* ` H P EJECT ` R P* ` ` @ P************************************************************ ` j P* ` P* ROUTINE NAME: ` P* NDREDW ` P* ` P* FUNCTION: ` < P* THIS ROU
0x169afc…169c90 Dummy {f00=0x006b, f01=0x0190, f02=»NED, DWT IS BUSY BUT NO REQUEST ` x : P* IS ON, TENDIO IS CALLED TO ACTIVATE TERMINAL QUEUE. a ( P* a f P* CALL: a p P* CF A15,NDREDW a P* a P* INPUT: a P* A4 = RECOVERY CAUSE a P* A6 = DWT ADDRESS a P* a P* OUTPUT: a ( P
0x169c90…169e24 Dummy {f00=0x006b, f01=0x0190, f02=» = BITS 0-9 ZERO a ( P* BITS 10-15 ORDER (IF REQUEST ON) b & P* A8 = ECB ADDRESS IF REQUEST ON, b F P* ELSE ZERO b p P* INTERR. ENABLED b P* AT SUBROUTINE RETURN: b P* CR = CHANGED b P* INTERR. CHANGED b P* b @ P********
0x169e24…169fb8 Dummy {f00=0x006b, f01=0x0190, f02=» CF A15,SAVE8 PUSH A1-A8 b P XIF c P IFF CPU852=1 c , P MSR 8,A15 PUSH A1-A8 c B P XIF c ` P ENB c l P* c x P LDR A5,A6 DWT ADDRESS c P ADKL A5,DWTSB2 STACK BASE c P LC A7,DWTOR+1,A6 ORDER c P ANK A7,/3F CLEAN c P LD A8,DWTEC
0x169fb8…16a14c Dummy {f00=0x006b, f01=0x0190, f02=»Y IF DEFINED c x P* d P* d : P* NO RECOVERY. CALL TENDIO IF BUSY BUT NO REQUEST d ( P LD A2,DWTST,A6 DWT STATUS d f P ANKL A2,DWFBSY BUSY? d P RF(NZ) RD100 NO, EXIT d P LDR A8,A8 REQUEST ON? d & P ABL(Z) DISEND NO, TENDIO & RETURN d
0x16a14c…16a2e0 Dummy {f00=0x006b, f01=0x0190, f02=»******** d P* e P* ROUTINE NAME: e P* NDGEDN e 2 P* e B P* FUNCTION: e L 4 P* THIS ROUTINE CALCULATES THE HIGEST DWT NUMBER e ` 8 P* (POSITION NUMBER IN DWT TABLE) FOR A WORK STATION. e P* e P* CALL: e P* CF A15,NDGEDN e P*
0x16a2e0…16a474 (1, 141) Dummy {f00=0x006b, f01=0x0190, f02=»A7 = HIGEST DWT NUMBER (0-7) e P* -1 IF NO DWT:S FOUND f & P* CR = CHANGED f F P* f ^ @ P************************************************************ f h P* f PNDGEDN EQU * f P IFF NTONSU=0 U =1 f P STR A6,A15 PUSH WS NUMBER f P L
0x16a474…16a608 Dummy {f00=0x006b, f01=0x0190, f02=»GN100 YES, EXIT f P* g P EJECT g " P* g 0 P ADR A6,A1 g : " P LDR* A6,A6 DWT ADDRESS TABLE g L " P RF(Z) GN100 NOT DEFINED, EXIT g r P LD A7,-2,A6 TABLE LENGTH g P SUK A7,2 OFFSET TO LAST DWT g P SRA A7,1 NUMBER OF LAST DWT g P RF GN
0x16a608…16a79c Dummy {f00=0x006b, f01=0x018e, f02=» IFT CPU852=1 g P RB RTNP15 RETURN h P XIF h 0 P IFF NTONSU=0 U =1 h < P IFF CPU852=1 h V P RTN A15 h l P XIF h | P* h P EJECT h P* h @ P************************************************************ h P* h P* ROUTINE NAME:
0x16a79c…16a930 Dummy {f00=0x006b, f01=0x0190, f02=» P* CALL: i P* CF A15,NDGEDW i P* i , P* INPUT: i 6 2 P* A1 = ADDRESS OF WORK STATION TABLE (INTXXN) i F P* A6 = WORK STATION NUMBER i | P* A7 = DEVICE ADDRESS i P* i P* OUTPUT: i P* A6 = DWT ADDRESS IF FOUND i P* ELSE 0
0x16a930…16aac4 Dummy {f00=0x006b, f01=0x0190, f02=» P IFF NTONSU=0 U =1 j * P SLL A7,1 MAKE INDEX OF DEVICE ADDRESS j P LDR A1,A1 WS TABLE DEFINED? j L P RF(Z) GD100 NO, EXIT j p * P SLL A6,1 INDEX IN WORK STATION TABLE j P CW A6,-2,A1 INSIDE TABLE? j P RF(NL) GD100 NO, ERROR j P* j P
0x16aac4…16ac58 Dummy {f00=0x006b, f01=0x0190, f02=»NDEX TOO HIGH? j P RF(NL) GD100 YES, EXIT k P ADR A6,A7 k 6 P LDR* A6,A6 DWT ADDRESS OR 0 k H P RF GD110 EXIT k l P* k PGD100 EQU * k P LDK A6,0 DWT NOT FOUND k PGD110 EQU * k $ P SRL A7,1 RESTORE DEVICE ADDRESS k P IFT CPU852=
0x16ac58…16adec Dummy {f00=0x006b, f01=0x4022, f02=» k P* l P END l @ l 0 YES, EXIT k P ADR A6,A7 k 6 P LDR* A6,A6 DWT ADDRESS OR 0 k H P RF GD110 EXIT k l P* k PGD100 EQU * k P LDK A6,0 DWT NOT FOUND k PGD110 EQU * k $ P SRL A7,1 RESTORE DEVICE ADDRESS k P IFT CPU852=
0x16adec…16af80 Dummy {f00=0x006b, f01=0x2008, f02=» m " " " " "("0"8"@
0x16af80…16b114 (1, 142) Dummy {f00=0x006c, f01=0x0190, f02=» - P IFF STARVI=0 . . PSSTAB EQU * S/S 0 : NO STATUS,DB,DE,DB+DE . P* . P P* . Z P DATA /4248 . d P DATA /4242 . x P* . 2 PNOIR EQU /20 S/S 1 : NO INTERVENTION REQUIRED . , PIR EQU /26 S/S 1 : INTERVENTION REQUIRED . P XIF . P
0x16b114…16b2a8 Dummy {f00=0x006c, f01=0x0190, f02=» B P************************************************************* / P* / J . P* LINE CONTROL UNIT FUNCTION CONTROL EQU:S / T P* / B P************************************************************* / P* / P IFT CODE=0 / PSYNC EQU /16 / P
0x16b2a8…16b43c Dummy {f00=0x006c, f01=0x0190, f02=»=1 / PCBSTOP EQU /00 0 P IFT CODE=0 0 PPARITY EQU /0C 0 4 P XIF 0 J P IFT P6805=1 0 V P IFT CODE=1 0 j PPARITY EQU /00 0 ~ P XIF 0 P EJECT 0 8 P*************************************************** 0 P* 0 ( P* LINE CONTROL UNIT
0x16b43c…16b5d0 Dummy {f00=0x006c, f01=0x0190, f02=»3 H:NOOP+H:THRU+H:CARR 0 P XIF 1 P IFT P6805=1 1 * . PH:ERR EQU /27 H:NOOP+H:THRU+H:CARR+H:PARI 1 > P XIF 1 p P EJECT 1 | D P**************************************************************** 1 P* 1 P* DRIVER ADDRESS BLOCK 1 P* 1 D P
0x16b5d0…16b764 Dummy {f00=0x006c, f01=0x0190, f02=»E INDEX 1 ~ ( PDC15AD DATA DCACT ACTIVATION ADDRESS 2 P DATA ABORT ABORT ROUTINE 2 < $ P DATA DCRBUF REC. BUFFER ANCHOR 2 ^ P DATA 6 HEADER LENGTH 2 P* 2 , P RES 15 SUBROUTINE STACK FOR INTERRUPTS 2 PSTB RES 1 2 P EJECT 2 P 2 @ P**
0x16b764…16b8f8 Dummy {f00=0x006c, f01=0x0190, f02=» 2 x P 3 ( PABORT LD A1,DWTRTP,A6 TIMER POINTER 3 " P RF(Z) AB:10 NO TIMER RUNNING 3 < P CMR A1 KILL TIMER 3 b P CM DWTRTP,A6 3 | P 3 $ PAB:10 LD A2,DWTOR,A6 ORDER CODE 3 P ANK A2,/7F 3 P SUK A2,6 3 P RF(NE) AB:RTN 3 . P CF A15,RE
0x16b8f8…16ba8c Dummy {f00=0x006c, f01=0x0190, f02=» CM FDWTUT REST SENDING DWT 3 P CM XACK RESET ACK EXPECTED 4 $ P 4 H PAB:RTN EQU * 4 P P ABL RTABRT 4 d P EJECT 4 x J P********************************************************************** 4 J P****************************************************
0x16ba8c…16bc20 Dummy {f00=0x006c, f01=0x0190, f02=»************************************************ 4 z J P********************************************************************** 5 8 P* 5 $ P* ACTIVATION FROM TERMINAL TASKS 5 P* 5 PDCACT EQU * 5 P LDK A1,0 PRESET RETURN CODE 5 & P LDR A2,A7 ORD
0x16bc20…16bdb4 (1, 143) Opaque[0x194]
0x16bdb4…16bf48 # DirEnt {nam=»DCADDR«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0d88, f03=0x0000}
0x16bdb4…16bf48 IdxSect {
0x16bdb4…16bf48 f00 = 0x006c // 0x16bdb4 @0x0
0x16bdb4…16bf48 f01 = 0x000a // 0x16bdb6 @0x2
0x16bdb4…16bf48 gno = [ // 0x16bdb8 @0x4
0x16bdb4…16bf48 [0x00]: C0x006c.0x1.0
0x16bdb4…16bf48 [0x01]: C0x006c.0x2.0
0x16bdb4…16bf48 [0x02]: C0x006c.0x3.0
0x16bdb4…16bf48 [0x03]: C0x006d.0x0.0
0x16bdb4…16bf48 [0x04]: C0x006d.0x1.0
0x16bdb4…16bf48 ]
0x16bdb4…16bf48 }
0x16bf48…16c0dc Dummy {f00=0x006c, f01=0x0190, f02=» 0 P IDENT DCADDR REL 11.0 81-01-26 870105041100 P* 8 4 P*********************************************** B P* z " P* PHILIPS TERMINAL SYSTEM PTS P* 0 P* DC:ADR : ADDRESS TRANSLATION ROUTINES FOR * P* DATA COMMUNICATION SO
0x16c0dc…16c270 Dummy {f00=0x006c, f01=0x0190, f02=»************************* z P* " P* PROGRAM DESCRIPTION , P* J : P* FOLLOWING SUBROUTINES CAN BE FOUND IN THIS MODULE : T P* 2 P* FNDDNA : FINDS A DTE NETWORK ADDRESS FROM A $ P* SYMBOLIC DTE ADDRESS P* 2 P* FN
0x16c270…16c404 Dummy {f00=0x006c, f01=0x0190, f02=»LATES A SYMBOLIC DTE ADDRESS INTO A " P* DTE NETWORK ADDRESS , P* R 6 P* GETDNT : TRANSLATES A SYMBOLIC DTE ADDRESS OF A 8 P* SPECIFIED TYPE INTO A DTE NETWORK ADDRESS P* 6 P* GETDSA : TRANSLATES A DTE NETWORK ADDRESS
0x16c404…16c598 Dummy {f00=0x006c, f01=0x0190, f02=» SPECIFIED ` 0 P* TYPE INTO A SYMBOLIC DTE ADDRESS P* F 6 P* GETSNA : TRANSLATES A SYMBOLIC DTE ADDRESS AND A P > P* SYMBOLIC SUB-ADDRESS INTO A NETWORK SUB-ADDRESS P* 6 P* GETSNT : TRANSLATES A SYMBOLIC DTE ADDRESS OF A
0x16c598…16c72c Dummy {f00=0x006c, f01=0x0190, f02=»RANSLATES A SYMBOLIC DTE ADDRESS AND A > P* NETWORK SUB-ADDRESS INTO A SYMBOLIC SUB-ADDRESS . P* p @ P* GETSST : TRANSLATES A SYMBOLIC DTE ADDRESS OF A SPECIFIED z > P* TYPE AND A NETWORK SUB-ADDRESS INTO A SYMBOLIC P*
0x16c72c…16c8c0 Dummy {f00=0x006c, f01=0x018e, f02=»TRIES P* P ENTRY FNDDNA P ENTRY FNDDNT . P ENTRY GETDNA D P ENTRY GETDNT Z P ENTRY GETDSA p P ENTRY GETDST P ENTRY GETSNA P ENTRY GETSNT P ENTRY GETSSA P ENTRY GETSST P* P* P
0x16c8c0…16ca54 (1, 144) Dummy {f00=0x006c, f01=0x0190, f02=» b * P EXTRN RETUR8 RELOAD A1-A8 AND RETURN 2 P EXTRN IHRET8 RELOAD A1-A8 AND RETURN INHIBIT 6 P* l P EJECT v P* & P* CONDITIONAL ASSEMBLY PARAMETERS P* ( PX:A EQU 1 SUB-ADDRESSING SUPPORTED ? PSUBADR EQU X:A 0=NO 1=YES
0x16ca54…16cbe8 Dummy {f00=0x006c, f01=0x0190, f02=»NTRY INDICATORS PDN EQU 1 PSS EQU 2 ( PSN EQU 3 8 P* H P EJECT R P* ` P* j 4 P* ROUTINES TO GET A SYMBOLIC DTE ADDRESS FROM A t $ P* DTE NETWORK ADDRESS (AND TYPE) P* 6 P******************************************
0x16cbe8…16cd7c Dummy {f00=0x006c, f01=0x0190, f02=»ING DTE NETWORK ADDRESS z ( P* A3 = TYPE (ONLY FOR GETDST ENTRY) P* L P* CALLING SEQUENCES : V P* CF A15,GETDSA t P* CF A15,GETDST P* P* OUTPUT PARAMETERS : B P* A1 = SYMBOLIC DTE ADDRESS(OR -1 IF INVALID ADDRESS OR TYP
0x16cd7c…16cf10 Dummy {f00=0x006c, f01=0x0190, f02=»15 SAVE REG. A1-A8 P XIF P IFT CPU852=1 & " P CF A15,SAVE8 SAVE REG. A1-A8 < P XIF b $ P SUR A3,A3 CLEAR TYPE INDICATOR n P RF GET090 PGETDST EQU * P IFT CPU852=0 P MSR 8,A15 P XIF P IFT CPU852=1 P C
0x16cf10…16d0a4 Dummy {f00=0x006c, f01=0x0190, f02=»A5,-1 RESET TYPE COUNTER 6 P LDKL A8,SCTDCT POINTER TO DC ADDRESS TABLE ENTRY PGET110 EQU * Z P LDR* A8,A8 MORE ENTRIES ? n P RF(Z) GET330 NO P ADK A3,0 TYPE SPECIFIED ? P RF(Z) GET120 NO P CW A3,4,A8 TYPE FOUND ? P RB(NE
0x16d0a4…16d238 Dummy {f00=0x006c, f01=0x0190, f02=»A/GETDST ENTRY ? P RF(NZ) GET220 NO P* 2 P* TEST ON ADDRESS LENGTH < P* P CC A1,6,A8 SAME ? f P RB(NE) GET110 NO,TAKE NEXT P* P EJECT P* P* GET ADDRESS PARAMETERS P* P ADK A1,1 CONVERT..
0x16d238…16d3cc Dummy {f00=0x006c, f01=0x0190, f02=»6,7 ..FIND LAST OCTET OF.. P ADR A6,A1 ..NETWORK ADDRESS " . P ADR A2,A1 POINTER TO LAST OCTET IN BUFFER F P LDR A7,A1 SAVE LENGTH x P* " P* COMPARE DTE NETWORK ADDRESS P* PGET130 EQU * P SUK A1,1 LAST ONE ? P RF(N) G
0x16d3cc…16d560 Dummy {f00=0x006c, f01=0x018e, f02=» CCR A4,A2 COMPARE WITH DRIVER BUFFER P RB(E) GET130 EQUAL . P* J P EJECT T P* b P* COMPARED OCTETS NOT EQUAL l P* PGET140 EQU * P SUR A7,A1 FIRST ONE ? P SUK A7,1 . P RF(NZ) GET150 NO $ P ADK A4,0 SEMI
0x16d560…16d6f4 (1, 145) Dummy {f00=0x006c, f01=0x0190, f02=» " P ANK A1,/F0 MAKE IT SEMI-OCTET P CWR A4,A1 EQUAL ? * P RF(E) GET160 YES D PGET150 EQU * ^ P LC A1,6,A8 RELOAD LENGTH r & P LDK A4,DS RELOAD ENTRY INDICATOR P RB GET110 TRY NEXT P* P* COMMON EXIT ROUTINE P*
0x16d6f4…16d888 Dummy {f00=0x006c, f01=0x0190, f02=» * P ST A5,12,A15 SAVE TYPE COUNTER IN A3 PGET180 EQU * 6 P ST A1,16,A15 SAVE A1 J P IFT CPU852=0 h P ABL RETUR8 RETURN TO CALLER ~ P XIF P IFT CPU852=1 P LD A1,18,A15 GET PSW P ANK A1,/40 ENABLE MODE ? P ABL
0x16d888…16da1c Dummy {f00=0x006c, f01=0x0190, f02=»O FIND OR GET A DTE NETWORK ADDRESS FROM A * P* SYMBOLIC NETWORK ADDRESS (AND TYPE) 2 P* ` : P****************************************************** j P* P* INPUT PARAMETERS : P* A1 = SYMBOLIC DTE ADDRESS * P* A2 = BUFFER (ONLY I
0x16da1c…16dbb0 Dummy {f00=0x006c, f01=0x0190, f02=»F A15,FNDDNT P* CF A15,GETDNA P* CF A15,GETDNT , P* D P* OUTPUT PARAMETERS : N 8 P* A1 = LENGTH OF DTE NETWORK ADDRESS IN SEMI-OCTETS l < P* (OR -1 IF ILLEGAL SYMBOLIC DTE ADDRESS OR TYPE) : P* A2 = NEXT FREE ADDRESS IN BUF
0x16dbb0…16dd44 Dummy {f00=0x006c, f01=0x0190, f02=»NOT CHANGED) b P* PFNDDNT EQU * P IFT CPU852=0 2 P MSR 8,A15 SAVE REG. A1-A8 H P XIF j P IFT CPU852=1 v " P CF A15,SAVE8 SAVE REG. A1-A8 P XIF $ P SUR A2,A2 CLEAR BUFFER ADDRESS P RF GET210 P* P EJECT
0x16dd44…16ded8 Dummy {f00=0x006c, f01=0x018e, f02=»IF $ P SUR A2,A2 CLEAR BUFFER ADDRESS P RF GET200 2 PGETDNT EQU * D P IFT CPU852=0 X P MSR 8,A15 n P XIF P IFT CPU852=1 P CF A15,SAVE8 P XIF P RF GET210 PGETDNA EQU * P IFT CPU852=0 P MSR 8,A
0x16ded8…16e06c Dummy {f00=0x006c, f01=0x0190, f02=» PGET210 EQU * " P LDK A4,DN SET ENTRY INDICATOR P RB GET100 RUN > P* T P EJECT ^ P* l P* TEST ON SYMBOLIC ADDRESS v P* PGET220 EQU * P CW A1,2,A8 FOUND ? P RB(NE) GET110 NO P* P* GET ADDRESS PARA
0x16e06c…16e200 Dummy {f00=0x006c, f01=0x0190, f02=»ERT LENGTH.. P SRC A7,1 ..INTO.. P ANK A7,/7F ..OCTETS . * P LDR A6,A8 GET ADDRESS WHERE TO FIND.. J P ADK A6,7 ..NETWORK ADDRESS x P IFT SUBADR=1 P* P* TEST ON ENTRY P* $ P SUK A4,SS ...DNA/...DNT ENTRY ? P R
0x16e200…16e394 (1, 146) Dummy {f00=0x006d, f01=0x0190, f02=»JECT P* P* SAVE PARAMETERS P* 0 PGET230 EQU * : $ P ST A2,14,A15 SAVE NEXT ADDRESS N P RB GET170 EXIT v P* P* GET NETWORK ADDRESS P* PGET240 EQU * P SUK A7,1 READY ? P RB(N) GET230 YES P
0x16e394…16e528 Dummy {f00=0x006d, f01=0x0190, f02=»UBADR=1 P EJECT P* P* ( 4 P* ROUTINES TO GET A SYMBOLIC SUB-ADDRESS FROM A 2 6 P* SYMBOLIC DTE ADDRESS (OF A SPECIFIED TYPE) AND A j P* NETWORK SUB-ADDRESS P* 8 P**************************************************** P
0x16e528…16e6bc Dummy {f00=0x006d, f01=0x0190, f02=»ST ENTRY) v P* P* CALLING SEQUENCE : P* CF A15,GETSSA 8 P* CF A15,GETSST P P* h P* OUTPUT PARAMETERS : r : P* A1 = SYMBOLIC SUB-ADDRESS(OR -1 IF ILLEGAL SYMBOLIC 4 P* DTE ADDRESS,TYPE OR NETWORK SUB-ADDRESS) D P*
0x16e6bc…16e850 Dummy {f00=0x006d, f01=0x0190, f02=» P XIF P IFT SUBADR=1 P IFT CPU852=1 & " P CF A15,SAVE8 SAVE REG. A1-A8 < P XIF b P IFT SUBADR=1 n P RF GET300 P* P EJECT P* PGETSSA EQU * P IFT CPU852=0 P MSR 8,A15 P XIF P IFT SUB
0x16e850…16e9e4 Dummy {f00=0x006d, f01=0x0190, f02=»00 EQU * " P LDK A4,SS SET ENTRY INDICATOR PGET305 EQU * 6 P RB GET100 RUN J P* ` P* TEST ON ENTRY j P* PGET310 EQU * " P ADR A6,A7 GET # OF ENTRIES IN " P LCR A7,A6 ..SUB-ADDRESS TABLE P LDR A4,A4 * P RF(NZ) GE
0x16e9e4…16eb78 Dummy {f00=0x006d, f01=0x0190, f02=»OR b PGET320 EQU * P ADK A6,1 NEXT ENTRY , P CCR A2,A6 COMPARE NETWORK SUB-ADDRESSES : P RB(E) GET170 EXIT ! j ( P ADK A1,1 STEP SYMBOLIC SUB-ADDRESS P SUK A7,1 MORE ENTRIES ? P RB(P) GET320 YES P XIF P* P EJECT
0x16eb78…16ed0c Dummy {f00=0x006d, f01=0x018e, f02=»TSSA EQU * PGETSST EQU * P XIF & PGET330 EQU * 2 P LDKL A1,-1 ERROR INDICATION F P RB GET180 EXIT j P* P IFT SUBADR=1 P EJECT P* P* 2 P* ROUTINES TO GET A NETWORK SUB-ADDRESS FROM A 4 P* SYMBOLIC DTE
0x16ed0c…16eea0 Dummy {f00=0x006d, f01=0x0190, f02=» Z P* P* INPUT PARAMETERS : P* A1 = SYMBOLIC DTE ADDRESS . P* A2 = SYMBOLIC SUB-ADDRESS R ( P* A3 = TYPE (ONLY IF GETSNT ENTRY) v P* P* CALLING SEQUENCES : P* CF A15,GETSNA P* CF A15,GETSNT P* P* OU
0x16eea0…16f034 (1, 147) Dummy {f00=0x006d, f01=0x0190, f02=») ` D P* A3 = TYPE INDEX (ONLY IF GETSNT ENTRY,OTHERWISE NOT CHANGED) P* R PGETSNT EQU * P IFT CPU852=0 p P MSR 8,A15 SAVE REG. A1-A8 P XIF P IFT SUBADR=1 P IFT CPU852=1 " P CF A15,SAVE8 SAVE REG. A1-A8 P X
0x16f034…16f1c8 Dummy {f00=0x006d, f01=0x0190, f02=» P XIF P IFT SUBADR=1 P IFT CPU852=1 * P CF A15,SAVE8 @ P XIF V P IFT SUBADR=1 b $ P SUR A3,A3 CLEAR TYPE INDICATOR x PGET400 EQU * " P LDK A4,SN SET ENTRY INDICATOR P RB GET305 RUN P* P* GET NETWORK
0x16f1c8…16f35c Dummy {f00=0x006d, f01=0x4116, f02=»ID SYMBOLIC SUB-ADDRESS | 2 P SUR A7,A2 SYMBOLIC SUB-ADDRESS WITHIN TABLE ? P RB(N) GET330 NO V 2 P ADR A6,A2 SET POINTER(INDEX STARTS WITH /30) n & P LCR A1,A6 GET NETWORK SUB-ADDRESS P RB GET170 EXIT P* P XIF P* P E
0x16f35c…16f4f0 Dummy {f00=0x006d, f01=0x2008, f02=» ! TO SAVE REGISTERS A1-A8 * ( SAVE8 EQU * 2 * F * &* SUBROUTINE TO RELOAD REGISTERS A1-A8 P * ~ RELOA8 EQU * * END @ & ! LDR A6,A8 GET ADDRESS WHERE TO.. " ADK A6,7 FIND LAST OCTET OF..
0x16f4f0…16f684 Dummy {f00=0x006d, f01=0x018e, f02=»TONSU=0 U =1 P IFT PR=1 P DATA PRCHRI & P XIF : P IFF NTONSU=0 U =1 F P* ` P IFT VU=0 j P DATA NDRETE | P XIF P IFF NTONSU=0 U =1 P IFT VU=1 P DATA VUCHRI P XIF P IFF NTONSU=0 U =1 PDTABLN
0x16f684…16f818 Dummy {f00=0x006d, f01=0x0190, f02=» P IFF NTONSU=0 U =1 P IFT LT=1 " P DATA LTSTBL 4 P XIF H P IFF NTONSU=0 U =1 T P* n P IFT RT=0 x P DATA NDRETE P XIF P IFF NTONSU=0 U =1 P IFT RT=1 P DATA RTSTBL P XIF P IFF NTONSU=0 U =1
0x16f818…16f9ac Dummy {f00=0x006d, f01=0x018e, f02=» P IFF NTONSU=0 U =1 P* " P IFT AS=0 , P DATA NDRETE > P XIF R P IFF NTONSU=0 U =1 ^ P IFT AS=1 x P DATA ASSTBL P XIF P IFF NTONSU=0 U =1 P* P IFT FT=0 P DATA NDRETE P XIF P IFF NTO
0x16f9ac…16fb40 Dummy {f00=0x006d, f01=0x0190, f02=» P XIF P IFF NTONSU=0 U =1 P IFT PL=1 . P DATA PLSTBL @ P XIF T P IFF NTONSU=0 U =1 ` P* z P IFT PR=0 P DATA NDRETE P XIF P IFF NTONSU=0 U =1 P IFT PR=1 P DATA PRSTBL P XIF P IFF N
0x16fb40…16fcd4 (1, 148) Opaque[0x194]
0x16fcd4…16fe68 # DirEnt {nam=»TMOVE «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0db0, f03=0x0000}
0x16fcd4…16fe68 IdxSect {
0x16fcd4…16fe68 f00 = 0x006d // 0x16fcd4 @0x0
0x16fcd4…16fe68 f01 = 0x000e // 0x16fcd6 @0x2
0x16fcd4…16fe68 gno = [ // 0x16fcd8 @0x4
0x16fcd4…16fe68 [0x00]: C0x006d.0x2.0
0x16fcd4…16fe68 [0x01]: C0x006d.0x3.0
0x16fcd4…16fe68 [0x02]: C0x006e.0x0.0
0x16fcd4…16fe68 [0x03]: C0x006e.0x1.0
0x16fcd4…16fe68 [0x04]: C0x006e.0x2.0
0x16fcd4…16fe68 [0x05]: C0x006e.0x3.0
0x16fcd4…16fe68 [0x06]: C0x006f.0x0.0
0x16fcd4…16fe68 ]
0x16fcd4…16fe68 }
0x16fe68…16fffc Dummy {f00=0x006d, f01=0x0190, f02=» 0 P IDENT TMOVE REL 11.0 81-05-21 870105041100 P 8 * P =4,CORR. OF UPDATE =3 (A14,A15) =3 @ P =4,REL 11.0 81-05-15 =3 n $ P =3,CONDITION FOR MOVUU ADDED P =3,REL 11.0 81-01-26 $ P =2,SAVE MMU WHEN MOVUS,MOVSU P =2,PR
0x16fffc…170190 Dummy {f00=0x006d, f01=0x0190, f02=»********************************** P* * $ P* PHILIPS TERMINAL SYSTEM PTS 4 P* ( P* TMOVE = TOSS MOVE LKM PROCESSOR f P* P* P* P* P* P* 6 P************************************************** P
0x170190…170324 Dummy {f00=0x006d, f01=0x018e, f02=» - MOVSS = MOVE FROM SYSTEM AREA TO SYSTEM AREA 4 P* - MOVUS = MOVE FROM USER AREA TO SYSTEM AREA 8 4 P* - MOVSU = MOVE FROM SYSTEM AREA TO USER AREA p 2 P* - MOVUU = MOVE FROM USER AREA TO USER AREA > P* - MOVFW = MOVE FORWARD (ONLY SYSTEM A
0x170324…1704b8 Dummy {f00=0x006d, f01=0x0190, f02=» P*********** P* ENTRIES * P*********** 0 P* D P* N ( P ENTRY TMOVE TOSS MOVE LKM PROCESSOR X , P ENTRY MOVSS MOVE FROM SYSTEM TO SYSTEM * P ENTRY MOVSU MOVE FROM SYSTEM TO USER * P ENTRY MOVUS MOVE FROM USER TO SYSTEM
0x1704b8…17064c Dummy {f00=0x006d, f01=0x0190, f02=» P* P* P************* P* EXTERNALS * 2 P************* H P* ^ P* h * P EXTRN LKMQDI QUEUE TASK AND DISPATCH r 4 P EXTRN LKMRQE SET A7=-1, QUEUE TASK AND DISPATCH 0 P EXTRN FNDTID FIND TTAB ADDRESS FROM TASK ID
0x17064c…1707e0 Dummy {f00=0x006d, f01=0x018e, f02=» f P* P* CONDITIONAL ASSEMBLY P* 0 . P***************************************** : P* l . P* A PROGRAM VERSION USING TOSS MMU PAGING v * P* IS OBTAINED BY SETTING MMUPAG EQU 1. P* PMMUPAG EQU 1 P* P* 6 P
0x1707e0…170974 (1, 149) Dummy {f00=0x006d, f01=0x018e, f02=» P* P* 6 P* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION : P* SET FOR CPU 857 IS OBTAINED BY SETTING CPU857 EQU 1. R P* PCPU857 EQU 1 P* P* 4 P* A PROGRAM VERSION CONTAINING SUBROUTINE MOVUU $ P* WILL EXIST B
0x170974…170b08 Dummy {f00=0x006d, f01=0x0190, f02=» P* P* P************************ P* MOVBLK DISPLACEMENTS * 8 P************************ X P* x , P* DISPLACEMENTS IN MOVE PARAMETER BLOCK P* & PMOVTIS EQU 0 TASK ID SENDING TASK ( PMOVTIR EQU 2 TASK ID RECEIVING TAS
0x170b08…170c9c Dummy {f00=0x006d, f01=0x0190, f02=» TO MOVE t 4 PLENGTH EQU 128 INTERMEDIATE BUFFER LENGTH WORDS P* H P EJECT TMOVE R P* h P* r P********* | P* TMOVE * P********* P* P* ( P* THIS IS THE MOVE LKM PROCESSOR. P* * P* IT IS EN
0x170c9c…170e30 Dummy {f00=0x006d, f01=0x0190, f02=»ESS | P* PTMOVE EQU * P ENB * P* 6 P IFT MMUPAG=0 @ * P LD A1,MOVBAS,A7 SOURCE BUFFER ADDRESS V 0 P LD A2,MOVBAR,A7 DESTINATION BUFFER ADDRESS " P LD A3,MOVLEN,A7 BUFFER LENGTH P CF A15,MOVSS MOVE BUFFER P XIF
0x170e30…170fc4 Dummy {f00=0x006d, f01=0x0190, f02=» BUFFER ADDRESS SENDING TASK 4 P EL A10,MOVBAR,A8 BUFFER ADDRESS RECEIVING TASK $ , P EL A3,MOVLEN,A8 REQUESTED BUFFER LENGTH $ P ELR A7,A8 TASK ID SENDING TASK P CWK A7,'#M' * P RF(E) MOV100 MOVE FROM SYSTEM BUFFER $ P CF A15,FNDTID GET
0x170fc4…171158 Dummy {f00=0x006d, f01=0x0190, f02=» P CWK A7,'#M' ( P RF(E) MVUS10 MOVE TO SYSTEM BUFFER $ P CF A15,FNDTID GET TTAB ADDRESS D P LDR A4,A2 SAVE TTAB ADDRESS l P RF(Z) TTABNF TTAB NOT FOUND P* P EJECT TMOVE P* * P* MOVE FROM USER BUFFER TO USER BUFFER
0x171158…1712ec Dummy {f00=0x006d, f01=0x0190, f02=» WHERE TO MOVE P* PMOV100 EQU * , P EL A7,MOVTIR,A8 TASK ID RECEIVING TASK 4 P CWK A7,'#M' d ( P RF(E) MVSS10 MOVE TO SYSTEM BUFFER x $ P CF A15,FNDTID GET TTAB ADDRESS P LDR A4,A2 P RF(Z) TTABNF TTAB NOT FOUND P*
0x1712ec…171480 Dummy {f00=0x006d, f01=0x0190, f02=» * P CF A15,MOVSU MOVE FROM SYSTEM TO USER P RF END 2 P* B , P* MOVE FROM USER BUFFER TO SYSTEM BUFFER L P* | PMVUS10 EQU * * P LDR A2,A10 DESTINATION BUFFER ADDRESS * P CF A15,MOVUS MOVE FROM USER TO SYSTEM P RF END P*
0x171480…171614 (1, 150) Dummy {f00=0x006e, f01=0x018e, f02=»F A15,MOVSS MOVE FROM SYSTEM TO SYSTEM P* . P XIF 8 P* D P EJECT TMOVE N P* d P* END n P* | PEND EQU * P IFT MMUPAG=1 " P LDR A5,A12 TTAB CALLING TASK P XIF P* ( P ABL LKMQDI QUEUE TASK AND DIS
0x171614…1717a8 Dummy {f00=0x006e, f01=0x0190, f02=» v 2 P ABL LKMRQE SET A7=-1, QUEUE TASK AND DISPATCH P XIF > P EJECT J P* X P* b P* l P********* v P* MOVFW * P********* P* P* $ P* SUBROUTINE TO MOVE CHARACTERS * P* FROM SYSTEM BUFFER TO SYSTEM B
0x1717a8…17193c Dummy {f00=0x006e, f01=0x0190, f02=» A3 = BUFFER LENGTH P* > P* EXIT: A1 = SYSTEM BUFFER ADDRESS,SOURCE+BUFFER LENGTH * B P* A2 = SYSTEM BUFFER ADDRESS,DESTINATION+BUFFER LENGTH l P* A3 = 0 P* PMOVFW EQU * PMOVBW EQU * P ADK A3,0
0x17193c…171ad0 Dummy {f00=0x006e, f01=0x0190, f02=» & P LDKL A6,/8000 INDICATE A14 RETURN P RF MSS005 MOVE BUFFER . P L P T P PRTNA14 EQU * d P LD A6,-4,A14 SAVED REGISTER x P LD A5,-2,A14 SAVED REGISTER P LDR* A4,A14 SAVED REGISTER P LDK A3,0 PRETA14 EQU *
0x171ad0…171c64 Dummy {f00=0x006e, f01=0x0190, f02=»SUBROUTINE TO MOVE CHARACTERS * P* FROM SYSTEM BUFFER TO SYSTEM BUFFER & P* T 0 P* ENTRY: A1 = SYSTEM BUFFER ADDRESS,SOURCE ^ 4 P* A2 = SYSTEM BUFFER ADDRESS,DESTINATION P* A3 = BUFFER LENGTH P* > P* EXIT: A1 = S
0x171c64…171df8 Dummy {f00=0x006e, f01=0x0190, f02=» P* P IFT MMUPAG=0 PMOVUS EQU * ( PMOVSU EQU * < PMOVUU EQU * P P XIF d P* p PMOVSS EQU * z P ADK A3,0 CHECK LENGTH * P RF(NP) MOVRT2 NOTHING TO MOVE, RETURN P STR A4,A15 SAVE A4 P STR A5,A15 SAVE A
0x171df8…171f8c Dummy {f00=0x006e, f01=0x0190, f02=» RF(Z) MSS100 SOURCE BUFFER ADDRESS EVEN P TM A4,A2 0 2 P RF(Z) MSS110 DESTINATION BUFFER ADDRESS EVEN B P EJECT x P* 4 P* BOTH SOURCE AND DESTINATION BUFFER ADDRESS ODD P* & P LCR A5,A1 FIRST CHARACTER TO MOVE P SCR A5,A2 S
0x171f8c…172120 Dummy {f00=0x006e, f01=0x0190, f02=»ENT LENGTH $ P RF(NP) MOVRT1 ALL MOVED,RETURN P* : 6 P* BOTH SOURCE AND DESTINATION BUFFER ADDRESS EVEN D P* ~ PMSS010 EQU * P IFF CPUHLP+CPU852=2 P SUK A3,2 SUBTRACT LENGTH 2 P RF(N) MSS020 TEST IF LAST CHARACTER IS MOVED
0x172120…1722b4 (1, 151) Dummy {f00=0x006e, f01=0x0190, f02=»ON BUFFER v P RB MSS010 CONTINUE MOVE P* 2 PMSS020 EQU * < P ADK A3,2 P " P RF(Z) MOVRT1 ALL MOVED,RETURN b P XIF P* P IFT CPU852=0 P IFT CPU857=1 P TM A4,A3 ( P RF(Z) MSS020 REQUESTED LENGTH EVEN " P
0x1722b4…172448 Dummy {f00=0x006e, f01=0x0190, f02=»ED,RETURN z P XIF P* & P LCR A5,A1 LAST CHARACTER TO MOVE ( 0 P SCR A5,A2 STORE CHARACTER IN SYSTEM BUFFER R ( P ADK A1,1 UPDATE USER BUFFER ADDRESS * P ADK A2,1 UPDATE SYSTEM BUFFER ADDRESS P RF MOVRT1 RETURN P EJECT P
0x172448…1725dc Dummy {f00=0x006e, f01=0x0190, f02=»R EVEN , DESTINATION BUFFER ODD P* OR ( 2 P* SOURCE BUFFER ODD , DESTINATION BUFFER EVEN 4 P* j PMSS110 EQU * t P LCR A4,A1 LOAD CHARACTER P SCR A4,A2 STORE CHARACTER $ P ADK A1,1 UPDATE SOURCE ADDRESS ( P ADK A2,1 UPDATE DES
0x1725dc…172770 Dummy {f00=0x006e, f01=0x018e, f02=»PAG=1 P EJECT TMOVE P* $ P* . P********* 8 P* MOVUS * J P********* P* n P* x $ P* SUBROUTINE TO MOVE CHARACTERS ( P* FROM USER BUFFER TO SYSTEM BUFFER P* & P* ENTRY: A1 = USER BUFFER ADDRESS (
0x172770…172904 Dummy {f00=0x006e, f01=0x0190, f02=» 4 P* EXIT : A1 = USER BUFFER ADDRESS+BUFFER LENGTH 6 P* A2 = SYSTEM BUFFER ADDRESS+BUFFER LENGTH < P* A3 = 0 v P* PMOVUS EQU * P ADK A3,0 CHECK LENGTH * P RF(NP) MOVRT2 NOTHING TO MOVE, RETURN P STR A4,A15 SAVE
0x172904…172a98 Dummy {f00=0x006e, f01=0x0190, f02=»4,1 MASK P TM A4,A1 " P RF(Z) MUS110 USER BUFFER EVEN " P TM A4,A2 H $ P RF(Z) MUS100 SYSTEM BUFFER EVEN Z P* P EJECT TMOVE P* ( P* USER BUFFER ODD,SYSTEM BUFFER ODD P* 0 P ELR A5,A1 FIRST CHARACTER FROM USER B
0x172a98…172c2c Dummy {f00=0x006e, f01=0x0190, f02=»DECREMENT LENGTH $ P RF(NP) MOVRT3 ALL MOVED, RETURN P* @ * P* USER BUFFER EVEN,SYSTEM BUFFER EVEN J P* x PMUS010 EQU * P TM A4,A3 ( P RF(Z) MUS020 REQUESTED LENGTH EVEN " P LDK A4,0 INDICATE LENGTH ODD P* PMUS0
0x172c2c…172dc0 Dummy {f00=0x006e, f01=0x0190, f02=»TER z P ECR A5,A5 P RB MUS005 =1 P* 4 P XIF > P* J P EJECT TMOVE T P* j P* t P********** ~ P* MOVRTN * P********** P* , P* COMMON RETURN LABELS FOR MOVE ROUTINES P* PMOVRT1 EQU *
0x172dc0…172f54 (1, 152) Dummy {f00=0x006e, f01=0x0190, f02=»VRT3 EQU * P TL 2,A15 SAVED MMU =2 P ADKL A15,32 =2 0 P XIF H PMOVRTN EQU * T P LDR* A5,A15 RELOAD A5 h P LDR* A4,A15 RELOAD A4 P LDK A3,0 ALL MOVED P* PMOVRT2 EQU * P RTN A15 P* P IFT MMUPAG=1
0x172f54…1730e8 Dummy {f00=0x006e, f01=0x0190, f02=»ER FROM USER BUFFER x P RF MUS125 P* . PMUS110 EQU * 8 P TM A4,A2 L $ P RB(Z) MUS010 SYSTEM BUFFER EVEN ^ P* ( P* USER BUFFER EVEN,SYSTEM BUFFER ODD P* PMUS120 EQU * P ELR A4,A1 GET TO CHARACTERS P ECR A5,A4
0x1730e8…17327c Dummy {f00=0x006e, f01=0x018e, f02=»DDRESS p P SUK A3,1 DECREMENT LENGTH $ P RB(NP) MOVRT3 ALL MOVED, RETURN 0 P* X PMUS125 EQU * b ( P ADK A1,1 UPDATE USER BUFFER ADDRESS v 0 P SCR A4,A2 STORE CHARACTER IN SYSTEM BUFFER * P ADK A2,1 UPDATE SYSTEM BUFFER ADDRESS P SUK
0x17327c…173410 Dummy {f00=0x006e, f01=0x0190, f02=» P* ! P********* ! P* MOVSU * ! $ P********* ! 6 P* ! H P* ! R $ P* SUBROUTINE TO MOVE CHARACTERS ! ( P* FROM SYSTEM BUFFER TO USER BUFFER ! P* ! ( P* ENTRY: A1 = SYSTEM BUFFER ADDRESS ! & P* A2 = USER BUFFER ADDRESS
0x173410…1735a4 Dummy {f00=0x006e, f01=0x0190, f02=»+LENGTH ! l . P* A2 = USER BUFFER ADDRESS+LENGTH " P* A3 = 0 " B P* " Z PMOVSU EQU * " d P ADK A3,0 CHECK LENGTH " x * P RB(NP) MOVRT2 NOTHING TO MOVE, RETURN " P STR A4,A15 SAVE A4 " P STR A5,A15 SAVE A5 " P SUKL A15,32
0x1735a4…173738 Dummy {f00=0x006e, f01=0x0190, f02=» BUFFER EVEN " ~ P TM A4,A1 # $ P RF(Z) MSU100 SYSTEM BUFFER EVEN # & P* # N P EJECT TMOVE # X P* # n ( P* SYSTEM BUFFER ODD,USER BUFFER ODD # x P* # * P ELR A5,A2 USER BUFFER FIRST CHARACTER # " P LCR A5,A1 GET FIRST CHARACTER # 4 P ESR A
0x173738…1738cc Dummy {f00=0x006e, f01=0x0190, f02=»ENT LENGTH # * P RB(NP) MOVRT3 NOTHING TO MOVE, RETURN $ P* $ @ P EJECT TMOVE $ J P* $ ` * P* SYSTEM BUFFER EVEN,USER BUFFER EVEN $ j P* $ PMSU010 EQU * $ P TM A4,A3 $ ( P RF(Z) MSU020 REQUESTED LENGTH EVEN $ P SUK A3,1 LENGTH EVE
0x1738cc…173a60 Dummy {f00=0x006e, f01=0x0190, f02=» ADR A1,A5 UPDATE SYSTEM BUFFER ADDRESS $ * P ADR A2,A5 UPDATE USER BUFFER ADDRESS % 0 P ADK A4,0 CHECK LENGTH % ^ $ P RB(NZ) MOVRT3 ALL MOVED, RETURN % | " P LDR* A5,A1 GET LAST CHARACTER % * P ADK A1,1 UPDATE SYSTEM BUFFER ADDRESS % P* % PMSU030
0x173a60…173bf4 (1, 153) Dummy {f00=0x006e, f01=0x0190, f02=»WORD IN USER BUFFER % P ESR A5,A2 & ( P ADK A2,1 UPDATE USER BUFFER ADDRESS & . P RB MOVRT3 RETURN & Z P* & t P EJECT TMOVE & ~ P* & ( P* SYSTEM BUFFER EVEN,USER BUFFER ODD & P* & PMSU100 EQU * & P SUK A2,1 USER BUFFER EVEN & .
0x173bf4…173d88 Dummy {f00=0x006e, f01=0x0190, f02=» $ P RB(Z) MSU010 SYSTEM BUFFER EVEN ' P* ' , ( P* SYSTEM BUFFER ODD,USER BUFFER EVEN ' 6 P* ' b PMSU120 EQU * ' l " P LCR A5,A1 GET FIRST CHARACTER ' $ P ECR A5,A5 CHARACTER TO THE LEFT ' * P ADK A1,1 UPDATE SYSTEM BUFFER ADDRESS ' P SUK A3,1 DE
0x173d88…173f1c Dummy {f00=0x006e, f01=0x0190, f02=»R ' f $ P ESR A5,A2 STORE TWO CHARACTERS ( * P ADK A1,1 UPDATE SYSTEM BUFFER ADDRESS ( 2 ( P ADK A2,2 UPDATE USER BUFFER ADDRESS ( ` P SUK A3,1 DECREMENT LENGTH ( P RB(P) MSU120 MORE TO MOVE ( P RB MOVRT3 ALL MOVED, RETURN ( P* ( P XIF =3
0x173f1c…1740b0 Dummy {f00=0x006e, f01=0x018e, f02=»UUMOV=2 =3 ( P EJECT TMOVE ) P* ) * P* ) 4 P********* ) > P* MOVUU * ) P P********* ) b P* ) t P* ) ~ $ P* SUBROUTINE TO MOVE CHARACTERS ) & P* FROM USER BUFFER TO USER BUFFER ) P* ) ( P* ENTRY: A1 = SOURCE BUFFER ADDRESS
0x1740b0…174244 Dummy {f00=0x006e, f01=0x0190, f02=» , P* A5 = TTAB ADDRESS SENDING TASK * P* * 4 2 P* EXIT: A1,A2,A3,A8,A9,A10,A11 ARE DESTROYED * > P* * t PMOVUU EQU * * ~ P LDR A11,A3 SAVE LENGTH * * P RF(NP) MUU120 NOTHING TO MOVE, RETURN * " P LDR A9,A1 SAVE SOURCE ADDRESS * ( P L
0x174244…1743d8 Dummy {f00=0x006e, f01=0x0190, f02=»EDIATE BUFFER LENGTH * z 0 P RF(NP) MUU120 INTERMEDIATE BUFFER TOO SMALL + P CWR A11,A3 + P , P RF(G) MUU110 MORE THAN ONE MOVE NEEDED + d ( P LDR A3,A11 REMAINING BUFFER LENGTH + P* + PMUU110 EQU * + P LDR A8,A3 SAVE PART LENGTH + $ P LDR A
0x1743d8…17456c Dummy {f00=0x006e, f01=0x0190, f02=» A9,A1 SAVE NEW SOURCE ADDRESS + 0 P LDKL A1,INTBUF INTERMEDIATE BUFFER ADDRESS , & $ P LDR A2,A10 DESTINATION ADDRESS , Z P LDR A3,A8 LENGTH , * P CF A15,MOVSU MOVE FROM SYSTEM TO USER , , P LDR A10,A2 SAVE NEW DESTINATION ADDRESS , P SUR A11,A8 DE
0x17456c…174700 Dummy {f00=0x006e, f01=0x40cc, f02=» , P* INTERMEDIATE BUFFER - P* - & PINTBUF EQU * - 0 P RES LENGTH - D PINTLEN EQU *-INTBUF - X P* - t P* - ~ P* - P XIF - P* - P* - P* - P END - @ - DR A10,A2 SAVE NEW DESTINATION ADDRESS , P SUR A11,A8 DE
0x174700…174894 (1, 154) Dummy {f00=0x006f, f01=0x2008, f02=» . P `
0x174894…174a28 Dummy {f00=0x006f, f01=0x0002, f02=»
0x174a28…174bbc Dummy {f00=0x006f, f01=0x0190, f02=» J F IDENT LRPINT REL 11.0 81-01-26 870105041100 J F " IHLKM LKM030 LKMRQE LKMERR LKMQDI LKMSRC IHRTC TIMQUE MONCLOC R IHPFAR INIFLGN PFPOST IHLKM INTSAVR PRUNN TTB:SA , (
0x174bbc…174d50 Dummy {f00=0x006f, f01=0x0190, f02=»LDSEG LKM030 J SWL48 " , ( 5 $P c P W A 2 LKMAL b , ( Q B V ( U P @ r LKMERR t HALTN LKMRQE z LKMSRC ~ LKMQDI QTJ
0x174d50…174ee4 Dummy {f00=0x006f, f01=0x0190, f02=» #P DISQUE . , ( H @ A A Q ? > ? @ @ , ( XB ) A A _N A A p PFINIT IHRTC , ( $@ A _` A A Q > QMJOB S
0x174ee4…175078 Dummy {f00=0x006f, f01=0x416a, f02=» , ( 1 Y _ A _0 8 FREBLK 8 , ( Q@" Q Z P 0 9 " " J , ( k _ _, ? _ P H z TIMQUE H H D ! %T 5P ;P ?W6 WV eP kV Q
0x175078…17520c Dummy {f00=0x006f, f01=0x2008, f02=»
0x17520c…1753a0 Dummy {f00=0x006f, f01=0x0190, f02=»OOP UNTIL ACCEPTED P ANK A2,/1F STATUS P RF(NZ) DUERR READING ERROR 4 P LDR A2,A9 BUFFER ADDRESS X P LDR A1,A1 z " P RF(N) RETURN ,XXXX , , " P RF(P) READ33 , , XXXX, P ADKL A2,256 SOURCE POINTER & P LDK A4,64 N
0x1753a0…175534 (1, 155) Opaque[0x194]
0x175534…1756c8 # DirEnt {nam=»DCSTAT«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0de8, f03=0x0000}
0x175534…1756c8 IdxSect {
0x175534…1756c8 f00 = 0x006f // 0x175534 @0x0
0x175534…1756c8 f01 = 0x000e // 0x175536 @0x2
0x175534…1756c8 gno = [ // 0x175538 @0x4
0x175534…1756c8 [0x00]: C0x006f.0x1.0
0x175534…1756c8 [0x01]: C0x006f.0x2.0
0x175534…1756c8 [0x02]: C0x006f.0x3.0
0x175534…1756c8 [0x03]: C0x0070.0x0.0
0x175534…1756c8 [0x04]: C0x0070.0x1.0
0x175534…1756c8 [0x05]: C0x0070.0x2.0
0x175534…1756c8 [0x06]: C0x0070.0x3.0
0x175534…1756c8 ]
0x175534…1756c8 }
0x1756c8…17585c Dummy {f00=0x006f, f01=0x0190, f02=» 0 P IDENT DCSTAT REL 11.0 81-01-26 870105041100 P* 8 B P************************************************************* B P* $ P* PHILIPS TERMINAL SYSTEM, P T S P* 4 P* DCSTAT STATISTIC DATA COLLECTION ROUTINE FOR * P* DA
0x17585c…1759f0 Dummy {f00=0x006f, f01=0x0190, f02=»AM DESCRIPTION P*. FUNCTIONS: > P*. DCSTAT SUPPLIES THE DATA COMMUNICATION DRIVERS/PACKAGES , > P*. WITH A SET OF ROUTINES TO MAINTAIN STATISTICAL COUNTERS n , P*. FOR A DWT OR A DWT AND ITS HEAD DWT. @ P*. THE FUNCTIONS ARE CONFIGURABLE BY THE
0x1759f0…175b84 Dummy {f00=0x006f, f01=0x0190, f02=»EM STACK IN d 8 P*. INHIBIT MODE. THEY CAN BE USED SIMULTANEOUSLY BY , P*. DIFFERENT TYPES OF DRIVERS/PACKAGES. P > P*. THE COUNTERS ARE MAINTAINED IN A BUFFER LINKED FROM THE : P*. DWT. EACH BUFFER CONTAINS A CONTROL WORD INDICATING < P*. STATU
0x175b84…175d18 Dummy {f00=0x006f, f01=0x0190, f02=» COUNTERS ENTRY: DCSRST AND DCSRLL 2 P* -UPDATE COUNTERS ENTRY: DCSUPR AND DCSUPD . ( P* -READ COUNTERS ENTRY: DCSRED d P* P* 8 P* ACTIONS TO INCLUDE STATISTICS IN A DRIVER/PACKAGE 8 P* 1. DEFINE EVENTS IN THE DRIVER TO CALL
0x175d18…175eac Dummy {f00=0x006f, f01=0x0190, f02=»E COUNTER AREA IN THE DWT AND ITS LINK(OFFSET) : P* THE LAYOUT DESCRIBED BELOW MUST BE APPLIED AS REQ 6 P* BY DCSTAT t P EJECT P*. TABLE STRUCTURE: ( P*. THE DWT HAS THE FOLLOWING LAYOUT P*. P* .................. P
0x175eac…176040 Dummy {f00=0x006f, f01=0x0190, f02=»UFF . -- P* .................. ! " P* . LINK HEAD DWT . --!----> 4 P* .................. ! Z " P* . LINK NEXT DWT . --!----> | P* .................. ! P* . . P* / / ! P* /
0x176040…1761d4 (1, 156) Dummy {f00=0x006f, f01=0x0190, f02=»NTER AREA . P* .................. P* . . 4 P* / / R P* .................. p P EJECT P* P* ENTRY POINTS P* , P ENTRY DCSRST REST COUNTERS IN SPEC DWT . P ENTRY DCSRLL RESE
0x1761d4…176368 Dummy {f00=0x006f, f01=0x0190, f02=»TETAB ^ 2 P ENTRY DCSUPD UPDATE COUNTER SPEC IN PKT, (A2) 6 P ENTRY DCSRED READ STATISTIC COUNTERS TO USER BUFF D P* ~ P* ENTRY EQU:S P* ( P ENTRY CSMAXL MAX INDEX FOR LINK DWT * P ENTRY DWTCHD EQU DWT OFFSET HEAD DWT * P ENTRY
0x176368…1764fc Dummy {f00=0x006f, f01=0x0190, f02=»* 8 P**************************************************** P* F & P* CONDITIONAL ASSEMBLY PARAMETERS P P* z 2 P********************************************* P* P PMMUPAG EQU 1 MMU SWITCH P P* 8 P* COND
0x1764fc…176690 Dummy {f00=0x006f, f01=0x0190, f02=» P STATISTIC ON SUBUNITS PSTUNIT EQU 1 IF 0= NO 1= YES $ P H P DOUBLE WORD COUNTERS R PSTDBLE EQU 0 IF 0=NO, 1=YES r P P P 2 P********************************************** P* P* EXTERNAL TABLE OFF
0x176690…176824 Dummy {f00=0x006f, f01=0x0190, f02=» " REQ LENGTH PECBEL EQU 6 " EFF LENGTH P 8 P B P IFT MMUPAG=0 L ( PDWTDRD EQU /10 DRIVER DEP AREA START b P XIF P IFT MMUPAG=1 ( PDWTDRD EQU /14 DRIVER DEP AREA START P XIF P < PDWTSTB EQU DWTDRD DWT
0x176824…1769b8 Dummy {f00=0x006f, f01=0x0190, f02=»LINK TO NEXT DWT n 0 PDWTLAD EQU DWTCHN+2 " LOCAL DTE ADDRESS . PDWTSUB EQU DWTLAD+4 POSSIBLE SUB ADDRESS L P EJECT ~ B P************************************************************* P* P* STATISTIC EQU:S * P* USED IN CALLS FO
0x1769b8…176b4c Dummy {f00=0x006f, f01=0x0190, f02=» < P* THE FORMAT OF THE PARAMETER-1 IN CALL TO DCSUPR/DCSUPD P* IS: D @ P* BITS XYZZZZZZ WHERE X=1IF PARAMETER-2 USED AS INCREMENT R 8 P* ELSE INCREMENT WITH +1 8 P* Y=1 IF DOUBLE WORD COUNTER
0x176b4c…176ce0 Dummy {f00=0x006f, f01=0x0190, f02=»*********** ^ P P* P* LINK LEVEL COUNTERS ( P F . PCSSRBL EQU /10 SYNCH DATA BLOCKS RECEIVED P : PCSSRBY EQU /11 " DATA BLOCKS REJECTED BUFFER BUSY > PCSSRBO EQU /12 " DATA BLOCKS REJECTED BUFFER OVERFLOW 6 PCSSRAB
0x176ce0…176e74 (1, 157) Dummy {f00=0x006f, f01=0x0190, f02=»ATA BLOCKS TRANSMITTED z 2 PCSSTRT EQU /16 " DATA BLOCKS RETRANSMITTED , PCSSTAB EQU /17 " DATA BLOCKS ABORTED T , PCSSXC1 EQU /18 " PROTOCOL DEPENDENT , PCSSXC2 EQU /19 " PROTOCOL DEPENDENT , PCSSXC3 EQU /1A " PROTOCOL DEPEND
0x176e74…177008 Dummy {f00=0x006f, f01=0x0190, f02=»CSBRBO EQU /12 " I-FRAMES REJECTED BUFFER OVERFLOW 2 PCSBRAB EQU /13 " I-FRAMES REJECTED ABORTED > 4 PCSBRPE EQU /14 " I-FRAMES REJECTED FCS ERROR t . PCSBTIF EQU /15 " I-FRAMES TRANSMITTED 0 PCSBTRT EQU /16 " I-FRAMES RETRANSMITTE
0x177008…17719c Dummy {f00=0x006f, f01=0x0190, f02=» p & PCSBRFR EQU /1A " FRMR RECEIVED $ PCSBRUA EQU /1B " UA RECEIVED 2 & PCSBRRJ EQU /1C " REJ RECEIVED Z & PCSBRNR EQU /1D " RNR RECEIVED 4 PCSBTSM EQU /1E " SNRM/SARM/SABM TRANSMITTED * PCSBTDI EQU /1F " DISC TRANSMIT
0x17719c…177330 Dummy {f00=0x006f, f01=0x0190, f02=»D n ( PCSBTRJ EQU /23 " REJ TRANSMITTED ( PCSBTNR EQU /24 " RNR TRANSMITTED 6 , PCSBXC1 EQU /25 " PROTOCOL DEPENDENT b ( PCSBXC2 EQU /26 " " " ( PCSBXC3 EQU /27 " " " P P P* DTE/DCE
0x177330…1774c4 Dummy {f00=0x006f, f01=0x018e, f02=»HROUGHPUT ERROR | $ PCSCDCE EQU /2B DCE NOT OPERABLE * PCSCXC1 EQU /2C CONTROL UNIT DEPENDENT @ PCSCXC2 EQU /2D " n PCSCXC3 EQU /2E " P P 6 PCSINIV EQU /10 1ST IMPL COUNTER CSSRBL AND CSBRBL 8 PCSMAXL EQU CSCXC3-/F
0x1774c4…177658 Dummy {f00=0x006f, f01=0x018e, f02=» P* P* STATISTIC BUFFER LAYOUT P* 0 < P******************************************************* : P z P* ................... " P* . . STWSID P* .................. " P* . . STWCST
0x177658…1777ec Dummy {f00=0x006f, f01=0x0190, f02=» P* / / P* / / " P* ................... @ ( PSTWSID EQU 0 RESERV FOR SYMBOLIC ID ^ & PSTWCST EQU STWSID+2 COUNTER STATUS P =0, RESET , P /=0, OVERFLOW IN COUNTER WITH BIT 0=1 8 PSTWMIX EQU STWCS
0x1777ec…177980 Dummy {f00=0x006f, f01=0x0190, f02=»O VALUE IN STWMIX v P EJECT P* ( @ P*********************************************************** 2 P* v < P* DCSRST - RESET STATISTIC COUNTERS FOR SPECIFIED DWT P* & P* THE FOLLOWING ACTIONS ARE TAKEN 4 P* -CHECK IF FUNCTION
0x177980…177b14 (1, 158) Dummy {f00=0x0070, f01=0x0190, f02=» COUNTERS d P* . P* ENTRY: CF A15,DCSRST A6=DWT 2 P* EXIT: ABR* A15 A1=STATUS N F P* 0=COMPLETED -1= NOT CONFIG P* @ P************************************************
0x177b14…177ca8 Dummy {f00=0x0070, f01=0x0190, f02=»UFFER IF ANY z P LDR* A2,A15 RELOAD REG P XIF 4 P RF DCSEXI COMMON EXIT @ P EJECT ^ P l @ P*********************************************************** v P* B P* DCSRLL - RESET STATISTIC COUNTERS FOR ALL DWT:S IN CHAIN
0x177ca8…177e3c Dummy {f00=0x0070, f01=0x0190, f02=»S OF HEAD DWT IF ANY. IF NOT START WITH CURRENT < P* -LOCATE LINK TO STATISTIC BUFFER. IF 0 GO TO NEXT DWT 8 $ P* -CLEAR COUNTERS IN THE BUFFER x P* 2 P* ENTRY: CF A15,DCSRLL A6=DWT 4 P* EXIT: ABR* A15 A
0x177e3c…177fd0 Dummy {f00=0x0070, f01=0x0190, f02=»********************** j P PDCSRLL EQU * ( P IFT STAT=1 < $ P IFT STUNIT=1 SUBUNIT STATISTICS P * P STR A2,A15 SAVE REGS ON SYSTEM STACK x P STR A6,A15 $ P LDR A1,A6 TEMP SAVE OF SPEC DWT " P LD A6,DWTCHD,A6 LINK TO HEAD & P
0x177fd0…178164 Dummy {f00=0x0070, f01=0x0190, f02=» . P LD A6,DWTCHN,A6 LINK TO NEXT DWT IN CHAIN . P RB(NZ) DCSR10 NOT LAST CONTINUE TO CLEAR 6 P LDR* A6,A15 RELOAD REGS h P LDR* A2,A15 P XIF P IFT STAT=1 P IFF STUNIT=1 P RB DCSRST P XIF P RF DCSEXI COMMON EXIT
0x178164…1782f8 Dummy {f00=0x0070, f01=0x0190, f02=» SPEC WITH PARAMETERS IN p . P* REGS A1 AND POSSIBLY A2 < P* DCSUPS - UPDATE COUNTER SPEC WITH PARAMETERS IN R : P* REGS A1 AND POSSIBLY A2. A7 = DTETAB < P* DCSUPD - UPDATE COUNTER SPEC WITH PARAMETERS IN
0x1782f8…17848c Dummy {f00=0x0070, f01=0x0190, f02=»IGURED. IF NOT EXIT WITH STATUS t : P* -IF ENTRY DCSUPD USED FETCH PARAMETER-1 FROM PACKET ( < P* -UPDATE COUNTER IN SPEC DWT IF PARAMETER WITHIN RANGE f 4 P* OF MAX VALUE KEPT IN THE CONTROL WORD OF THE P* STATISTIC BUFFER * P* IF SUBUNIT S
0x17848c…178620 Dummy {f00=0x0070, f01=0x018e, f02=»5,DCSUPR A6=DWT A1=PARAM-1 (A2=PARAM-2) t P* OR 2 2 P* CF A15,DCSUPD A6=DWT H 8 P* DATA PARAM-1 (A2=PARAM-2) ~ P* 6 P* EXIT: ABR* A15 A1=STATUS F P*
0x178620…1787b4 (1, 159) Dummy {f00=0x0070, f01=0x0190, f02=» H B P* +1=COUNTER OVERFLOWED P* N D P************::************************************************* X P PDCSUPR EQU * P IFT STAT=1 * P STR A3,A15 SAVE REGS ON SYSTEM STACK P STR A4,
0x1787b4…178948 Dummy {f00=0x0070, f01=0x0190, f02=»QU * P IFT STAT=1 * P STR A3,A15 SAVE REGS ON SYSTEM STACK P STR A4,A15 N P STR A5,A15 b P STR A6,A15 v " P LDR A6,A7 A6 = DTETAB ADDRESS P RF DCSU00 P XIF P P PDCSUPD EQU * P IFT STAT=1 * P S
0x178948…178adc Dummy {f00=0x0070, f01=0x0190, f02=» STACK p P LDK A4,2 ( P ADS A4,+12,A15 ADJUST RETURN POINT P L P V 0 PDCSU00 EQU * COMMON POINT FOR DCSUPR DCSUPD ` $ P LDK A4,0 PRESET STATUS FOR EXIT PDCSU01 EQU * P CF A15,DCOUNT INCR COUNTER P IFT STUNIT=1 &
0x178adc…178c70 Dummy {f00=0x0070, f01=0x0190, f02=»KEEP IT x 4 P RB DCSU00 CLEAR STATUS AND UPDATE FOR HEAD DWT ! PDCSU04 EQU * ! H P XIF ! P IFT STAT=1 ! h $ P LDR A1,A4 MOVE STATUS FOR EXIT ! | P LDR* A6,A15 RELOAD REGS ! P LDR* A5,A15 ! P LDR* A4,A15 ! P LDR* A3,A15 ! P XIF !
0x178c70…178e04 Dummy {f00=0x0070, f01=0x0190, f02=»ATISTIC COUNTERS INTO USER BUFFER ! x P* " * & P* THE FOLLOWING ACTIONS ARE TAKEN " 4 < P* -CHECK IF FUNCTION CONFIGURED. IF NOT EXIT WITH STATUS " ^ 0 P* -CHECK USER PARAMETERS IF NOT CORRECT EXIT " : P* -FETCH SYMBOLIC ID FROM DWT AND MOV COUNTERS IF ANY
0x178e04…178f98 Dummy {f00=0x0070, f01=0x0190, f02=»ACTION " n P* # : P* ENTRY: CF A15,DCSRED A6=DWT A8=ECB # P* # V 4 P* EXIT: ABR* A15 A1=STATUS # ` D P* 0=COMPLETED -1=NOT CONFIG # : P* -
0x178f98…17912c Dummy {f00=0x0070, f01=0x0190, f02=» IN ECBEL AND (ECBBA)=COUNTERS # j > P********************************************************** $ & P $ h PDCSRED EQU * $ r P IFT STAT=1 $ * P STR A2,A15 SAVE REGS ON SYSTEM STACK $ P STR A3,A15 $ P STR A4,A15 $ P STR A5,A15 $ P STR
0x17912c…1792c0 Dummy {f00=0x0070, f01=0x0190, f02=» $ $ P LD A5,ECBRL,A8 ANY LENGTH GIVEN % P RF(Z) DCSRER NO % 0 P LD A4,DWTTAB,A6 TTAB ADDR % H P IFT STUNIT=1 % j " P LD A1,DWTCHD,A6 ANY HEAD DWT % P RF(Z) DCSR01 NO % 0 P LD A7,DWTSUB,A6 SYMBOLIC SUB ADDRESS IF ANY % P RF DCSR02 MOVE COUNTE
0x1792c0…179454 (1, 160) Dummy {f00=0x0070, f01=0x0190, f02=»F(Z) DCSR04 NO SYMBOLIC ID MOVE 0 % $ P LD A1,DWTSTB,A6 ANY STAT BUFFER & * P RF(Z) DCSR04 NO MOVE 0 & R P ADR A1,A6 ADD BASE OF DWT & r $ P LD A3,STWMIX,A1 NO OF COUNTERS & P RF(Z) DCSR04 NOE MOVE 0 & P SLL A3,1 COUNTERS TO BYTES & , P ADK A3,
0x179454…1795e8 Dummy {f00=0x0070, f01=0x0190, f02=»ID OR STAT BUFFER MOVE ZEROE & P LDK A3,2 SIZE ' $ " P LDKL A1,DCZERO BUFFER ADDRESS ' : PDCSR06 EQU * ' ` & P SUR A5,A3 ANY SPACE IN USER BUFF ' t P RF(N) DCSRER NO ' 0 P CF A15,MOVSU MOVE STAT BUFFER TO USER BUFF ' P XIF ' P IFT STAT=1 '
0x1795e8…17977c Dummy {f00=0x0070, f01=0x0190, f02=»IF ' P IFT STAT=1 ( P ( $ PDCSR08 EQU * ALL MOVE UPDATE ECB ( * " P SU A2,ECBBA,A8 START OF USER ( R P ST A2,ECBEL,A8 NO OF BYTES ( x P LDK A1,0 STATUS OK ( P RF DCSREX EXIT ( P ( 2 PDCSRER EQU * BUFFER ERROR E.G NONE OR OVERFLOW
0x17977c…179910 Dummy {f00=0x0070, f01=0x0190, f02=»* A4,A15 ( P LDR* A3,A15 ) P LDR* A2,A15 ) $ P XIF ) 8 P RF DCSEXI COMMON EXIT ) D P* ) b PDCZERO DATA 0 ZEROE BUFFER ) l P EJECT ) > P********************************************************* ) P* ) P* COMMON EXIT FROM FUNCTIONS )
0x179910…179aa4 Dummy {f00=0x0070, f01=0x0190, f02=»A1,-1 STATUS NOT CONFIGURED ) P XIF * $ P ADKL A15,4 * 0 P ABR* A15 RETURN * D P EJECT * P IFT STAT=1 * j : P****************************************************** * ~ P* * " P* COMMON INTERNAL SUBROUTINES * P* * : P******************
0x179aa4…179c38 Dummy {f00=0x0070, f01=0x0190, f02=»ENTRY: CF A15,DCLEAR A6=DWT * 0 P* EXIT: ABR* A15 A1=0 A6=DWT + , PDCLEAR EQU * + ` 0 P LD A2,DWTSTB,A6 ANY STATISTIC BUFFER LINKED + t P RF(Z) DCLEXI NO + P ADR A2,A6 ADD BASE OF DWT + 2 P LD A1,STWMIX,A2 GET MAX INDEX FOR THI
0x179c38…179dcc Dummy {f00=0x0070, f01=0x0190, f02=»DD OFFSET + , P ADR A2,A1 POINT AT LAST WORD+1 IN BUFF , PDCLOOP EQU * , B P CMR A2 CLEAR COUNTER , V P SUK A2,2 POINTER -2 , t P SUK A1,2 ALL CLEARED , P RB(NZ) DCLOOP NO , PDCLEXI EQU * , P LDK A1,0 STATUS , P RF DCEXIT COMMON RE
0x179dcc…179f60 Dummy {f00=0x0070, f01=0x0190, f02=»A6=DWT , l * P* EXIT: ABR* A15 A4= - PDCOUNT EQU * - < P STR A1,A15 SAVE PARAM-1 - P $ P STR A2,A15 SAVE PARAM-2 IF ANY - p * P LD A3,DWTSTB,A6 ANY STATISTIC BUFFER - P RF(Z) DCONOB NO - P ADR A3,A6 ADD BASE OF DWT - P LDR A5,
0x179f60…17a0f4 (1, 161) Dummy {f00=0x0070, f01=0x0190, f02=»PARAM-1 - | 0 P CW A5,STWMIX,A3 PARAM-1 >MAX VALUE IN BUFF . P RF(NL) DCOMAX YES . D , P ADK A3,STWCTA START AFTER CONTROL WORD . ^ P ADR A3,A5 IN WORDS TO . P ADR A3,A5 START OF BUFFER . " P SLL A1,8 CHECK IF PARAM-2 REQ . P RF(N) DCO010 YES .
0x17a0f4…17a288 Dummy {f00=0x0070, f01=0x018e, f02=»RITHM . p P RF(N) DCODBL / P XIF / $ P IFT STAT=1 / 0 ( P LDR* A1,A3 CHECK COUNTER OVERFLOWED / D P RF(N) DCOVRE YES NO UPDATE / p P ADR A2,A1 INCREMENT / P / P RF(O) DCOVRF OVERFLOW / P STR A2,A3 SAVE NEW VALUE / P RF DCOEXI /
0x17a288…17a41c Dummy {f00=0x0070, f01=0x0190, f02=» / p P RF(N) DCOVRE 0 " P LDK A1,0 A1=0 A2=INCR VALUE 0 P DAR* A3 ADD TO COUNTER 0 D P RF(O) DCOVRF OVERFLOW 0 d $ P STR A1,A3 SAVE COUNTER 1ST WRD 0 & P ST A2,+2,A3 SAVE COUNTER 2ND WRD 0 P RF DCOEXI 0 P XIF 0 P IFT STAT=1 0 P
0x17a41c…17a5b0 Dummy {f00=0x0070, f01=0x018e, f02=»A3 SAVE INDEX OVERFLOW FLAG 0 PDCOVRE EQU * 1 $ " P LDK A4,+1 SET STATUS OVERFLOW 1 8 P 1 ^ P RF DCOEXI 1 h P 1 z $ PDCOMAX EQU * PARAM-1 >MAX INDEX 1 P LDKL A4,-2 SET STATUS 1 P RF DCOEXI 1 PDCONOB EQU * NO BUFFER 1 ( P LDKL A4,-3 SE
0x17a5b0…17a744 Dummy {f00=0x0070, f01=0x40e2, f02=» P RF DCEXIT COMMON RETURN 2 P EJECT 2 $ P* 2 2 P* 2 < & P* COMMON RETURN FROM INTERNAL SUBS 2 F P* 2 p PDCEXIT EQU * 2 z " P ADKL A15,4 ADJUST STATUCK POS 2 P ABR* A15 2 P XIF 2 P END 2 @ 2 EQU * NO BUFFER 1 ( P LDKL A4,-3 SE
0x17a744…17a8d8 Dummy {f00=0x0070, f01=0x2008, f02=» 3 DCEXIT COMMON RETURN # END # $@ # 0 RF(Z) DCLEXI ZEROE " : 2 - ST A1,STWCTL,A2 RESTORE IT CLEANED STATUS =0 " V SLL A1,1 COUNTER INTO BYTES " , ' ADR A2,A1 POINT AT LAST WORD+1 IN BUFF " DCLOOP EQU * " SUK A2,2 POINTER -2
0x17a8d8…17aa6c Dummy {f00=0x0070, f01=0x0190, f02=» [ p & P RB POL210 RETRANSMIT WITHOUT (D) PPOL220 EQU * 2 P CWK A2,EOTP (C) RECEIVED ? F P RF(NE) POL250 NO j P EJECT P 0 P******************************************* P* P* (C) RECEIVED P* 0 P****************
0x17aa6c…17ac00 Dummy {f00=0x0070, f01=0x0190, f02=» h PPOL240 EQU * ] " P CF A5,COMREQ COMPLETE REQUEST ] P ABL BRM ] B PPOL250 EQU * ] R P CWK A2,ACKP (Y) RECEIVED ? ] f P RF(NE) POL260 NO ] P EJECT ] P ] 2 P********************************************** ] P* ] P* (Y) RECEIVED
0x17ac00…17ad94 (1, 162) Opaque[0x194]
0x17ad94…17af28 # DirEnt {nam=»PFTAB «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x14d0, f03=0x0000}
0x17ad94…17af28 IdxSect {
0x17ad94…17af28 f00 = 0x00a6 // 0x17ad94 @0x0
0x17ad94…17af28 f01 = 0x0002 // 0x17ad96 @0x2
0x17ad94…17af28 gno = [ // 0x17ad98 @0x4
0x17ad94…17af28 [0x00]: C0x00a6.0x2.0
0x17ad94…17af28 ]
0x17ad94…17af28 }
0x17af28…17b0bc Dummy {f00=0x00a6, f01=0x0190, f02=» 0 P IDENT PFTAB REL 11.0 81-01-26 870105041100 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
0x17b0bc…17b250 Dummy {f00=0x00a6, f01=0x0190, f02=»N TYPEWRITER P EXTRN TCDRON TAPE CASSETTE P EXTRN SOPR SOP. PANEL 8 ( P EXTRN CHLTON LOCAL/REMOTE TERMINALS V P EXTRN FDON FLEXIBLE DISC P EXTRN LPON LINE PRINTER P EXTRN CRON CARD READER P EXTRN DUON DISC UNIT P EXTRN
0x17b250…17b3e4 Dummy {f00=0x00a6, f01=0x0190, f02=»SALCUZ P EXTRN ASCUON ASCU4Z P EXTRN CDON CDC DISC * P EXTRN PLON LINE CONTROLLER F P EXTRN VUON VIDEO j P EXTRN X25:ON X25 LEVEL 3 P P P P P $ PPFTAB DATA PFTABE-* TABLE LENGTH P DATA
0x17b3e4…17b578 Dummy {f00=0x00a6, f01=0x4018, f02=» v P END @ UON ASCU4Z P EXTRN CDON CDC DISC * P EXTRN PLON LINE CONTROLLER F P EXTRN VUON VIDEO j P EXTRN X25:ON X25 LEVEL 3 P P P P P $ PPFTAB DATA PFTABE-* TABLE LENGTH P DATA
0x17b578…17b70c Dummy {f00=0x00a6, 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
0x17b70c…17b8a0 Dummy {f00=0x00a6, f01=0x018e, f02=»IN DATA PACKETS ARE HANDLED BY THIS DRIVER. P* 4 P EJECT > P* L : P* THE PROGRAM IS DIVIDED INTO A NUMBER OF SECTIONS. V 4 P* SECTIONS CONTAINING PROGRAM CODE ARE DIVIDED 2 P* INTO ROUTINES. THE ROUTINES ARE LISTED AT 4 P* BE
0x17b8a0…17ba34 (1, 163) Opaque[0x194]
0x17ba34…17bbc8 # DirEnt {nam=»LKMAL «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0e28, f03=0x0000}
0x17ba34…17bbc8 IdxSect {
0x17ba34…17bbc8 f00 = 0x0071 // 0x17ba34 @0x0
0x17ba34…17bbc8 f01 = 0x0004 // 0x17ba36 @0x2
0x17ba34…17bbc8 gno = [ // 0x17ba38 @0x4
0x17ba34…17bbc8 [0x00]: C0x0071.0x1.0
0x17ba34…17bbc8 [0x01]: C0x0071.0x2.0
0x17ba34…17bbc8 ]
0x17ba34…17bbc8 }
0x17bbc8…17bd5c Dummy {f00=0x0071, f01=0x0190, f02=» 0 P IDENT LKMAL REL 11.0 81-01-26 870105041100 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
0x17bd5c…17bef0 Dummy {f00=0x0071, f01=0x0190, f02=» EXTRN TACTOT ACTIVATE OTHER TERMINAL P EXTRN TPAUSE PAUSE TERMINAL . P EXTRN TIMER TIMER R P EXTRN TMWAIT MULTIPLE WAIT l & P EXTRN TLUSEG LOCK/UNLOCK SEGMENT P EXTRN TLDSEG SEGMENT TLDSEG P EXTRN TABORT ABORT FUNCTION P EXTRN
0x17bef0…17c084 Dummy {f00=0x0071, f01=0x0190, f02=»XTRN TIOFM FILE MANAGEMENT ( P EXTRN DMTEND DATA MANAGEMENT COMMIT " " P EXTRN TCHPAG CHANGE MMU PAGE N " P EXTRN TCHMMU CHANGE MMU TABLE t 2 P EXTRN TSWBLK LOAD/STORE SWAPPABLE WORK BLOCK P EXTRN TMOVE MOVE P EXTRN TENEDM TENDIO FOR EDM
0x17c084…17c218 Dummy {f00=0x0071, f01=0x0190, f02=» P* P* P* P* " P* , P* 6 P* @ P* J P EJECT T P* b $ PLKMAL DATA LKMALE-* TABLE LENGTH l P DATA TIO TERMINAL I/O P DATA TWAIT TERMINAL WAIT P DATA TEXIT TERMINAL EXIT ( P DATA TACTOT ACTIV
0x17c218…17c3ac Dummy {f00=0x0071, f01=0x0190, f02=»OCK/UNLOCK SEGMENT P DATA TLDSEG SEGMENT TLDSEG P DATA TABORT ABORT FUNCTION > P DATA 0 b 4 P DATA GETTIM GET CURRENT VALUE OF MONITOR CLOCK ~ " P DATA SETTIM SET MONITOR CLOCK P DATA 0 P DATA
0x17c3ac…17c540 Dummy {f00=0x0071, f01=0x4018, f02=» P END @ P DATA TLDSEG SEGMENT TLDSEG P DATA TABORT ABORT FUNCTION > P DATA 0 b 4 P DATA GETTIM GET CURRENT VALUE OF MONITOR CLOCK ~ " P DATA SETTIM SET MONITOR CLOCK P DATA 0 P DATA
0x17c540…17c6d4 (1, 164) Dummy {f00=0x0071, 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
0x17c6d4…17c868 Dummy {f00=0x0071, f01=0x0190, f02=»A1,1,A8 P ELR A4,A8 P SRL A6,8 " P ANKL A4,/FF00 4 P ORR A6,A4 J P* 6 PGETT15 ESR A6,A8 SET VALUE IN TIMER CONTROL BLOCK f P XIF P* P SUK A3,2 P RF(E) GETT20 P ADKL A8,2 , P LDR* A6,A15 GET ACTUAL
0x17c868…17c9fc Dummy {f00=0x0071, f01=0x0190, f02=»ACCUMULATED 24 HOUR CARRY 2 P ST A6,TTB:SA+14,A5 STORE IN TTAB SAVE AREA A7 " P* X PTPDIS EQU * b P CMR A7 CLEAR MIDNIGTH CARRY v P ABL LKMQDI P* P EJECT MONTIM P* P* P********** P* SETTIM * P
0x17c9fc…17cb90 Dummy {f00=0x0071, f01=0x0190, f02=»WITH h 0 P* ADDRESS TO THE USER TIMER CONTROL BLOCK 0 P* IN A8. VALUE IN TIMER CONTROL BLOCK IS @ $ P* COPIED INTO MONITOR CLOCK. t P* P* PSETTIM EQU * 6 P LDKL A7,MONCLO+6 ADDRESS TO MONITOR CLOCK SECOND P* $ P
0x17cb90…17cd24 Dummy {f00=0x0071, f01=0x0190, f02=»6,A8 GET LEFTHAND CHARACTER P ECR A6,A6 $ ( P LC A6,1,A8 GET RIGHTHAND CHARACTER 6 P XIF b P* n P EJECT MONTIM x P* P* P IFT MMUPAG=1 2 P ELR A6,A8 GET VALUE FROM TIMER CONTROL BLOCK . P LDR A4,A8 GET TIMER CON
0x17cd24…17ceb8 Dummy {f00=0x0071, f01=0x0190, f02=» SLL A6,8 P SRL A4,8 P ORR A6,A4 $ P* 6 PSETT15 EQU * @ P XIF T P* ` $ P CF A15,ASCTBY CONVERT TO BINARY j P SUK A3,2 END P RF(E) SETT20 P ADKL A8,2 0 P STR A6,A15 SAVE ON STACK (HOURS AND MINUTES P RB
0x17ceb8…17d04c Dummy {f00=0x0071, f01=0x0190, f02=» l P SUK A7,2 P LDR* A6,A15 ( P STR A6,A7 MINUTES TO MONITOR CLOCK . P SUK A7,2 Z P LDR* A6,A15 l & P STR A6,A7 HOURS TO MONITOR CLOCK P SUK A7,2 P RB TPDIS P* P EJECT MONTIM P* P* P****
0x17d04c…17d1e0 Dummy {f00=0x0071, f01=0x0190, f02=» IT IS ENTERED FROM THE LKM HANDLER ( P* WITH THE FOLLOWING PARAMETERS: , P* X $ P* A7 = GET/SET DATE PARAMETER b < P* (A7 = 0 MEANS GET DATE, A7 = 1 MEANS SET DATE) & P* A8 = DATE CONTROL BLOCK (DCB) P* P* 0 P
0x17d1e0…17d374 (1, 165) Opaque[0x194]
0x17d374…17d508 # DirEnt {nam=»SYSLOD«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0e38, f03=0x0000}
0x17d374…17d508 IdxSect {
0x17d374…17d508 f00 = 0x0071 // 0x17d374 @0x0
0x17d374…17d508 f01 = 0x0058 // 0x17d376 @0x2
0x17d374…17d508 gno = [ // 0x17d378 @0x4
0x17d374…17d508 [0x00]: C0x0071.0x3.0
0x17d374…17d508 [0x01]: C0x0072.0x0.0
0x17d374…17d508 [0x02]: C0x0072.0x1.0
0x17d374…17d508 [0x03]: C0x0072.0x2.0
0x17d374…17d508 [0x04]: C0x0072.0x3.0
0x17d374…17d508 [0x05]: C0x0073.0x0.0
0x17d374…17d508 [0x06]: C0x0073.0x1.0
0x17d374…17d508 [0x07]: C0x0073.0x2.0
0x17d374…17d508 [0x08]: C0x0073.0x3.0
0x17d374…17d508 [0x09]: C0x0074.0x0.0
0x17d374…17d508 [0x0a]: C0x0074.0x1.0
0x17d374…17d508 [0x0b]: C0x0074.0x2.0
0x17d374…17d508 [0x0c]: C0x0074.0x3.0
0x17d374…17d508 [0x0d]: C0x0075.0x0.0
0x17d374…17d508 [0x0e]: C0x0075.0x1.0
0x17d374…17d508 [0x0f]: C0x0075.0x2.0
0x17d374…17d508 [0x10]: C0x0075.0x3.0
0x17d374…17d508 [0x11]: C0x0076.0x0.0
0x17d374…17d508 [0x12]: C0x0076.0x1.0
0x17d374…17d508 [0x13]: C0x0076.0x2.0
0x17d374…17d508 [0x14]: C0x0076.0x3.0
0x17d374…17d508 [0x15]: C0x0077.0x0.0
0x17d374…17d508 [0x16]: C0x0077.0x1.0
0x17d374…17d508 [0x17]: C0x0077.0x2.0
0x17d374…17d508 [0x18]: C0x0077.0x3.0
0x17d374…17d508 [0x19]: C0x0078.0x0.0
0x17d374…17d508 [0x1a]: C0x0078.0x1.0
0x17d374…17d508 [0x1b]: C0x0078.0x2.0
0x17d374…17d508 [0x1c]: C0x0078.0x3.0
0x17d374…17d508 [0x1d]: C0x0079.0x0.0
0x17d374…17d508 [0x1e]: C0x0079.0x1.0
0x17d374…17d508 [0x1f]: C0x0079.0x2.0
0x17d374…17d508 [0x20]: C0x0079.0x3.0
0x17d374…17d508 [0x21]: C0x007a.0x0.0
0x17d374…17d508 [0x22]: C0x007a.0x1.0
0x17d374…17d508 [0x23]: C0x007a.0x2.0
0x17d374…17d508 [0x24]: C0x007a.0x3.0
0x17d374…17d508 [0x25]: C0x007b.0x0.0
0x17d374…17d508 [0x26]: C0x007b.0x1.0
0x17d374…17d508 [0x27]: C0x007b.0x2.0
0x17d374…17d508 [0x28]: C0x007b.0x3.0
0x17d374…17d508 [0x29]: C0x007c.0x0.0
0x17d374…17d508 [0x2a]: C0x007c.0x1.0
0x17d374…17d508 [0x2b]: C0x007c.0x2.0
0x17d374…17d508 ]
0x17d374…17d508 }
0x17d508…17d69c Dummy {f00=0x0071, f01=0x0190, f02=» 2 P IDENT SYSLOD REL 11.0 83-08-24 870105041100 P : $ P DK, LINE 1771, FIX FOR TID=X: B ( P =12,COND. ASSEMBLY EDM INTRODUCED j P =12,REL 11.0 81-05-19 * P =11,ERROR IN READ ROUT. FOR 16M,80M P =11,REL 11.0 81-05-11 , P =
0x17d69c…17d830 Dummy {f00=0x0071, f01=0x0190, f02=» l P =9,REL 11.0 81-04-06 2 P =8,WHEN CFTEST=1 TEST ALSO RWSI CONNECTION ( P =8,REL 11.0 81-03-31 ^ $ P =7,WRONG VTOC-SECTOR POINTER ~ P =7,REL 11.0 81-03-12 * P =6,DC BLOCK DESTROYED WHEN CFTEST=0 P =6,REL 11.0 81-02
0x17d830…17d9c4 Dummy {f00=0x0071, f01=0x018e, f02=»4,REL 11.0 81-01-26 & P =3,IF 256 KBYTE MEMORY OVERFLOW * P =3,WILL OCCUR IN SEGMENT ALLOCATION F P =3,PRR 11.0 80-12-03 t 0 P =2,LOOK IF APPL. TYPE ALLOWED IN MONITOR 0 P =2,REDESIGNED SEGMENT ALLOCATION ALGORITM P =2,PRR 11
0x17d9c4…17db58 Dummy {f00=0x0071, f01=0x0190, f02=» P ENTRY NUMSEG P ENTRY PRGLG1 P ENTRY APLADA 4 P ENTRY APLLAC J P ENTRY APLLAP ` P ENTRY APLLDA v P ENTRY APLMMC P ENTRY APLMMP P ENTRY APLNPE P ENTRY APLREL P ENTRY APLSTA P ENTRY APLTYP
0x17db58…17dcec Dummy {f00=0x0071, f01=0x0190, f02=»* v P* ENTRIES AND EXTERNALS * P* * . P*************************** R P EXTRN CONVRT v ( P EXTRN POB RESTORE REGISTER CONTENTS & P EXTRN PUSH SAVE REGISTER CONTENTS P EXTRN SYSLDM P EXTRN SCTANO
0x17dcec…17de80 Dummy {f00=0x0071, f01=0x0190, f02=»NOP P EXTRN SCTOPT P EXTRN SCTIPL " P EXTRN SCTPSZ 8 P EXTRN SCTSFA N P EXTRN SCTSTB d P EJECT z P EXTRN REL P EXTRN ERROR P EXTRN MMDDIV P EXTRN TABBE P EXTRN MMEND P EXTRN CMPADR P EXTRN
0x17de80…17e014 (1, 166) Dummy {f00=0x0072, f01=0x0190, f02=» EJECT P P $ P******************************* & $ P* CONFIGURATION FILE (CONFIG) * N $ P******************************* v P P* TASK DEFINITION BLOCK: PTDBBT EQU 0 1A BLOCK TYPE ( PTDBNT EQU TDBBT+1 2N NUMBER
0x17e014…17e1a8 Dummy {f00=0x0072, f01=0x0190, f02=»K LEVEL x : PTDBNC EQU TDBTL+6 2N NUMBER OF TERMINAL DEVICE CLASSES P* N & PTDBFST EQU TDBNC+2 SAVE05 TERM DEF X $ PTDC EQU 7 TERMINAL DEVICE CLASS PTLC EQU 7 LINE CONNECTION ( PTDBREC EQU TDC+TLC TDB-RECORD LENGTH P* * PSDC EQ
0x17e1a8…17e33c Dummy {f00=0x0072, f01=0x0190, f02=»1 2N NUMBER OF SPEC. DEV. CLASSES ( PSDCFST EQU CDBNC+2 SAVE05 SDC-RECORD * P* V P* ` & P* USER WORK BLOCK TYPE DEF. BLOCK j PUDBBT EQU 0 1A BLOCK TYPE , PUDBNU EQU UDBBT+1 3A NUMBER OF UWB TYPES P* ( PUDBFST EQU UDBNU+3 SAVE0
0x17e33c…17e4d0 Dummy {f00=0x0072, f01=0x0190, f02=» P EJECT P**************** P* SOP-HANDLING * * P**************** B PSOP EQU /2E DEVICE ADDRESS Z P | PLMP1 EQU /400 LAMP 1 CODE PLMP2 EQU /200 PLMP3 EQU /100 PLMP4 EQU /80 PLMP5 EQU /40 PLMP6 EQU /20
0x17e4d0…17e664 Dummy {f00=0x0072, f01=0x0190, f02=»******************************* ( P* MXSTAB DISPLACEMENTS * ( ( P*********************************** T P P PMX:NOX EQU 6 , PMX:NOS EQU 8 NUMBER OF SEGMENT CLUSTERS P P 2 P************************************
0x17e664…17e7f8 Dummy {f00=0x0072, f01=0x0190, f02=»=============== * 2 P* * , 2 P********************************************* b P P 2 PAPLADA EQU 22 APPLICATION DISC FILE ADDRESS =2 . PAPLREL EQU 18 APPLICATION RELOCATION BASE
0x17e7f8…17e98c Dummy {f00=0x0072, f01=0x0190, f02=»L PAGE ADDRESS | 8 PAPLLDA EQU 0 APPLICATION LOAD ADDR. (PHYSICAL ADDR.) . PAPLMMC EQU 10 APPLICATION MMU START ENTRY R ( PAPLMMP EQU 8 SEGMENT START MMU ENTRY . PAPLSEG EQU 4 PHYSICAL START OF 1ST SEGMENT . PAPLNPE EQU 6 NUMBER OF PAGE ENTRIES IN
0x17e98c…17eb20 Dummy {f00=0x0072, f01=0x0190, f02=» j " PAPLTYP EQU 8 APPLICATION TYPE P EJECT . " P****************************** < " P* * b " P* COMMON DISPLACEMENTS * " P* AND CONSTANTS * " P* * " P**************
0x17eb20…17ecb4 (1, 167) Dummy {f00=0x0072, f01=0x0190, f02=» CONTROL TABLE r $ PAPPLNO EQU 18 APPLICATION NUMBER ( PBUFSIZ EQU 14 TEMPORARY BUFFER SIZE > . PCONLEN EQU 0 LENGTH OF CONFIGURATION DATA j , PCONSTA EQU 2 START OF CONFIGURATION DATA ( PDATEND EQU 34 END OF DDIV PROTOTYPE : PFSTADR EQU 20 1S
0x17ecb4…17ee48 Dummy {f00=0x0072, f01=0x0190, f02=» 6 PLSTADR EQU 26 LAST ADDRESS WHEN BUILDING DATA PART ( PMAPLEN EQU 30 LENGTH OF AREA TO MAP > * PMMFROM EQU 36 2ND MMU TABLE WORK AREA j ( PMMTO EQU 38 1:ST MMU TABLE WORK AREA $ PM:REL EQU 16 RELOCATION CONSTANT , PSYSBUF EQU 28 START OF TEMPO
0x17ee48…17efdc Dummy {f00=0x0072, f01=0x0190, f02=»2 WORK AREA FOR MMU TABLE $ PCOM01 EQU 40 COMMON SAVE AREA 1 " $ PCOM02 EQU 42 COMMON SAVE AREA 2 J $ PCOM03 EQU 44 COMMON SAVE AREA 3 r * PTOTSGM EQU 46 TOTAL NUMBER OF SEGMENTS , PSWBFLG EQU 48 SWAPPPABLE WORK BLOCK FLAG $ PCOM04 EQU 50 COM
0x17efdc…17f170 Dummy {f00=0x0072, f01=0x0190, f02=» * " P* LOCAL DISPLACEMENTS * " P* AND CONSTANTS * < " P* * b " P****************************** P P , PAPLCNT EQU 4 NO OF APPLICATIONS TO LOAD & PBLKLEN EQU 6 SEGME
0x17f170…17f304 Dummy {f00=0x0072, f01=0x0190, f02=»U 4 LENGTH OF CORE RESIDENT PART * PCONDAD EQU 44 CONF. FILE DISC ADDRESS ( P* EQU 46 V 0 PCONDEV EQU 32 SAVE AREA FOR CONF. DATA DEV. f , PCURAPL EQU 24 CURRENT APPL. CONTR. BLOCK PDEVTYP EQU 50 DEVICE TYPE 6 PDISCAD EQU 28 SAVE AREA FOR
0x17f304…17f498 Dummy {f00=0x0072, f01=0x0190, f02=» AREA v & PEXLEN EQU 4 MONITOR EXTENT LENGTH 6 PFILCOD EQU 36 LOAD DEVICE FILE CODE (NOT CASSETTE) 8 ( PFSTSEC EQU 16 FIRST SECTOR INDICATOR r 0 PIPLDEV EQU 34 SAVE AREA FOR PGM LOAD DEVICE & PIPLTYP EQU 48 PGM LOAD DEVICE TYPE & PLLDADR EQU 1
0x17f498…17f62c Dummy {f00=0x0072, f01=0x0190, f02=»EQU 22 MONITOR NUMBER * PNCHAID EQU 8 NO OF CHAR. IN APPL. NAME * PNCHTID EQU 5 NO OF CHAR IN TID RECORD L & PNDEVCL EQU 18 NO OF DEVICE CLASSES z 2 PNUMSEG EQU 10 DISPL. TO NO OF SEGM. IN S:GTAB . POPTION EQU 52 SAVE AREA FOR OPTOIN WORD =2
0x17f62c…17f7c0 Dummy {f00=0x0072, f01=0x0190, f02=»GLG1 EQU 2 PROGRAM LENGTH DISPLACEMENT : PPSECNL EQU 40 PHYSICAL SECTOR NUMBER LEAST SIGNIFICANT . : PPSECNM EQU 42 PHYSICAL SECTOR NUMBER MOST SIGNIFICANT l , PPSECPA EQU 38 PHYSICAL SECTOR PART (0-2) " PSEGCNT EQU 10 SEGMENT COUNTER $ PSWPFEL E
0x17f7c0…17f954 (1, 168) Dummy {f00=0x0072, f01=0x0190, f02=»HANDLING * P*********************** , PCHCR EQU /E DEVICE ADDRESS FOR CASSETTE 4 PLOCK EQU /2 LOCK CASSETTE d ( PSBOT EQU 8 SEARCH BEGINNING OF TAPE ( PSTMF EQU /C SEARCH TAPEMARK FORWARD P* " P* DISC/FLEXIBLE DISC HANDLING
0x17f954…17fae8 Dummy {f00=0x0072, f01=0x0190, f02=»E RECORD LENGTH r * PFDCU EQU /09 FLEXIBLE DISC CU ADDRESS $ PFDIOP EQU FDCU+FDCU MUX ADDRESS F PFORDEV EQU 48 DISC FORMAT n " PMUXCC EQU /8080 1:ST MUX WORD * PMXCCD3 EQU /80C1 BYTE2=NUMBER OF WORDS PQBLFAC EQU 6 BLOCKING FACTOR , P
0x17fae8…17fc7c Dummy {f00=0x0072, f01=0x0190, f02=»*** R F P* CALL-FORMAT, PERFORMS: CFR A14,A13 * F P* DATA [REL-ADDRESS] * V F P* * F P******************************
0x17fc7c…17fe10 Dummy {f00=0x0072, f01=0x0190, f02=»************** P* CONDITIONAL ASSEMBLY * P************************** 8 P Z P b P* j " P* CONSTANTS EDITED BY SYSGEN t P* P P PX:A EQU 1 PX:B EQU 1 PX:C EQU 1 PX:D EQU 0 PX:E EQU 0
0x17fe10…17ffa4 Dummy {f00=0x0072, f01=0x0190, f02=»TORS =12 n 0 PCASS EQU 0 1-PROGRAM LOAD DEVICE = CASSETTE , PDISC EQU 0 1-PROGRAM LOAD DEVICE = DISC D 8 PFLDISC EQU 1 1= PROGRAM LOAD DEVICE = FLEXIBLE DISC t 8 PMFDISC EQU 0 1-PROGRAM LOAD DEVICE = MINI FIXED DISC 4 PCDDISC EQU 0 1-PROGRAM LOAD
0x17ffa4…180138 Dummy {f00=0x0072, f01=0x0190, f02=» PCFTCAS EQU CFTEST+CASS PCFTFLD EQU CFTEST+FLDISC " P EJECT B : P****************************************************** P : P* * : P* APPLICATION LOAD PART OF SYSLOD * :
0x180138…1802cc Dummy {f00=0x0072, f01=0x0190, f02=» A1 - FORMAT AND DEVICE TYPE * : P* A2 - PROGRAM LOAD DEVICE * 2 : P* A3 - APPLICATION NUMBER * p : P* A7 - APPLICATION DISC ADDRESS BIT 16-31 * : P* A8 - APPLICATION
0x1802cc…180460 Dummy {f00=0x0072, f01=0x0190, f02=» * h : P* * : P* EXIT: * T : P* * : P* SUBROUTINES: CASSIN,SOPIN,CHCRIO,LODCOM *
0x180460…1805f4 (1, 169) Dummy {f00=0x0072, f01=0x0190, f02=» * : P****************************************************** 8 PSYSLOD EQU * v P* P* SAVE REGISTERS P* 4 P ST A1,IPLTYP+STKEND SAVE FORMAT AND DEVICE TYPE * P ST A2,SCTIPL SAVE PROGR
0x1805f4…180788 Dummy {f00=0x0072, f01=0x0190, f02=» p & P LDR A3,P USE BEGINNING OF SYSLOD P SUK A3,TBLBAS 2 PTBLBAS EQU *-2-SYSLOD H & P ST A3,APLTAB+STKCOM AS TABLE AREA f " P LDK A1,1 INITIATE NO OF APPL. P STR A1,A3 AND SAVE IN TABLE > P ST A8,APLADA+2,A3 SAVE APPLICATION DISC ADDRE
0x180788…18091c Dummy {f00=0x0072, f01=0x0190, f02=»L A14,SYSLOD P LDR A13,P 4 PSYS100 ADKL A13,SYS110-SYS100 POINTER TO SYS110 & P LD A1,SCTBUG ^ P LDR A2,A1 t 8 P ANK A2,1 TEST IF DEBUG ADDRESS IS ODD,IF TRUE START P ABR(NZ) A1 P* PSYS110 EQU * " P LD A15,SCTSTB LOAD
0x18091c…180ab0 Dummy {f00=0x0072, f01=0x0190, f02=»1,0,SOP P* ! B P* INIT POINTER TO SUBROUTINE HANDLER (A13), STACK BASE (A14) ! $ P* AND ADDRESS TO GETPSW-ROUTINE ! ` P* ! P LDR A8,P RETURN ADDRESS ! & P LDKL A3,REL+2 RELOCATION ROUTINE ! P CFR A8,A3 ! $ P LDKL A5,/5555 LOAD TEST P
0x180ab0…180c44 Dummy {f00=0x0072, f01=0x0190, f02=»PTION EXCLUSIVELY ! h P* " " P SLL A6,2 UPPER SAVE20=256 KB " $ P LDK A1,0 MMU ENTRY POINTER " J PAP:010 EQU * " n " P LD A2,TABBE GET PAGE ADDRESS " 2 P SUKL A2,/400 DECREMENT PHYSICAL PAGE ADDRESS " P ST A2,TABBE STORE IT BACK " P TL TABB
0x180c44…180dd8 Dummy {f00=0x0072, f01=0x0190, f02=»SIZ-2,A1 GET MEMORY CONTENT " 2 P ES A3,PAGSIZ-2,A1 RESTORE OLD MEMORY CONTENTS # $ ( P CWR A2,A5 COMPARE WITH TEST PATTERN # Z P RF(E) AP:020 # ( P SUK A6,4 DECREMENT NUMBER OF PAGES # P RB AP:010 # P* # $ P* CHECK IF MMU HARDWARE PRESENT #
0x180dd8…180f6c Dummy {f00=0x0072, f01=0x0190, f02=»TERS # l . P TS MMDDIV,A13 SAVE REGISTERS IN MMU TABLE $ " P CW A1,MMDDIV,A13 SUCCESSFUL? $ > " P RF(E) AP:030 YES! MMU PRESENT $ d P LDKL A1,LMP9 $ . P CALL ERROR INDICATE HARDWARE NOT PRESENT $ $ PAP:030 CM TABBE RESET MMU TABLE $ P* $ D P* E
0x180f6c…181100 Dummy {f00=0x0072, f01=0x0190, f02=» * $ P* % @ P* EXECUTION PATH FOR SYSTEMS WITHOUT MMU OPTION EXCLUSIVELY % P* % X $ P LDKL A1,PAGSIZ-2 START AT /FFFE % b PAP:110 EQU * % & P SUKL A1,PAGSIZ NEXT PHYSICAL PAGE % ( P LDR* A2,A1 SAVE OLD MEMORY CONTENT % " P STR A5,A1 STORE TES
0x181100…181294 (1, 170) Dummy {f00=0x0073, f01=0x0190, f02=» % d P RB AP:110 & PAP:120 EQU * & * P STR A2,A1 RESTORE OLD MEMORY CONTENT & . P* & H P* END OF EXECUTION PATH FOR SYSTEMS WITHOUT MMU OPTION EXCLUSIVELY & f P* & P XIF & P EJECT & P* & P* COMMON EXECUTION PATH & P* &
0x181294…181428 Dummy {f00=0x0073, f01=0x0190, f02=»DRESS & x ( P ST A6,SCTEFA FIRST FRAME TO BE USED ' P LDK A3,0 ' : . P ST A3,SCTEFA+2 AREA EMPTY IN FIRST FRAME ' L $ P LD A1,SCTOPT GET OPTION WORD =2 ' ~ P ST A1,OPTION+STKEND =2 ' $ P ANKL A1,/FFF RESET TYPE BITS =2 ' * P ST A1,SCTOPT AND SET AS
0x181428…1815bc Dummy {f00=0x0073, f01=0x0190, f02=»D BUFFER ' t ( P ST A9,MXBUF ADDRESS TO READ-BUFFER ( * P LD A1,SCTIPL GET PROGRAM LOAD DEVICE ( < P* ( j & P* INITIALIZE PROGRAM LOAD DEVICE ( t P* ( P CF A14,LODDEV ( P LDR A3,A9 SAVE ( . P AD A3,SAVCON COMPUTE START OF APPL. TABLE ( " P
0x1815bc…181750 Dummy {f00=0x0073, f01=0x0190, f02=»AND. ACC. DEV. ( p P EJECT ) PAP:232 EQU * ) $ P IFT EDM=1 =12 ) 8 P* ) P & P* LOAD MONITOR EXTENTS IF PRESENT ) Z P* ) ( P CF A14,LODMEX LOAD MONITOR EXTENTS ) P XIF ) P* ) $ P* SCAN CONF. FILE FOR POSSIBLE ) $ P* APPLICATION D
0x181750…1818e4 Dummy {f00=0x0073, f01=0x0190, f02=» ) l 6 P LD A12,APLADA,A1 MOST SIGN. PART OF DISC ADDRESS * 8 P LD A11,APLADA+2,A1 LEAST SIGN. PART OF DISC ADDRESS * B ( P LD A10,READ GET SUBROUTINE ADDRESS * ~ " P CFR A14,A10 READ FIRST SECTOR * PAP:233 EQU * * 0 P LD A1,APLTAB+STKCOM GET APPL. TABLE
0x1818e4…181a78 Dummy {f00=0x0073, f01=0x018e, f02=»DK A1,2 * 4 P ST A1,CURAPL+STKEND CURRENT APPL. CONTROL BLOCK + PAP:234 EQU * + H ( P LD A7,SCTEFA GET FIRST FRAME TO USE + ( P LD A5,SCTEFA+2 AND AREA EMPTY IN IT + : P LD A1,CURAPL+STKEND RESTORE APPL. CONTROL BLOCK ADDR. + P EJECT + PAP:235 E
0x181a78…181c0c Dummy {f00=0x0073, f01=0x0190, f02=» 2 P CM APLSEG,A1 RESET PHYSICAL ADDRESS TO FIRST , * P CM APLSEG+2,A1 CORE RESIDENT SEGMENT , : 4 P CM APLMMC,A1 CLEAR REL. POSITION OF CONF. DATA , h . P CM APLPSZ,A1 CLEAR SEGMENT SIZE ENTRY =2 , 0 P CM TNBRSG+STKEND CLEAR NBR. OF SEGMENTS =5 , : P L
0x181c0c…181da0 Dummy {f00=0x0073, f01=0x018e, f02=»RGLG1+8,A9 GET PROGRAM TYPE , 4 P LDKL A4,/1000 INITIALIZE BIT SETTING (BIT 3=1) - $ $ P CWK A6,'CR' CREDIT APPLICATION? - P RF(E) AP2340 - P* - . P SLL A4,1 BIT SETTING FOR COBOL (BIT 2=1) - $ P CWK A6,'CO' COBOL APPLICATION? - P RF(E) AP2
0x181da0…181f34 (1, 171) Dummy {f00=0x0073, f01=0x018e, f02=» - $ P LDKL A6,'AS' SET ASSEMBLER TYPE . 2 P SLL A4,1 BIT SETTING FOR ASSEMBLER (BIT 0=1) . 0 PAP2340 EQU * . f * P ST A6,APLTYP,A1 SAVE APPLICATION TYPE . z , P CWK A6,'AS' ASSEMBLER ALWAYS ALLOWED =2 . P RF(E) AP2345 =2 . 6 P AN A4,OPTION+STKEND L
0x181f34…1820c8 Dummy {f00=0x0073, f01=0x0190, f02=» PAP2345 EQU * =2 / & P ORR A2,A4 SET BIT IN OPTION WORD / P ST A2,SCTOPT AND SAVE / H P CWK A6,'AS' / f * P RF(E) AP2350 SKIP IF ASSEMBLER APPL. / z P* / , P LD A3,PAGLG+8,A9 GET DEFINED PAGE SIZE / 6 P CW A3,SCTPSZ COMPARE WITH PREVIOUSLY
0x1820c8…18225c Dummy {f00=0x0073, f01=0x0190, f02=»50 EQU * / P IFT MMUPAG=1 0 P EJECT 0 & P* 0 4 2 P* EXECUTION PATH FOR SYSTEMS WITH MMU OPTION 0 > P* 0 t ( P CWK A6,'AS' ASSEMBLER APPLICATION? 0 ~ $ P ABL(E) AP:330 YES! NO SEGMENTS 0 P LDR A4,A3 SAVE 0 $ P ANKL A4,/3FF EVEN 1K MULTIPLE
0x18225c…1823f0 Dummy {f00=0x0073, f01=0x0190, f02=» 2 P LD A2,NUMSEG+8,A9 NUMBER OF SEGMENTS DEFINED 1 P* 1 : PAP:238 EQU * 1 D P ABL(Z) AP:330 NO SEGMENTS! 1 X P* 1 | 2 P CF A14,ALOCSG RESERVE AREA FOR RESIDENT SEGM. 1 P* 1 2 P* A1 - POINTER TO CURRENT APPL. CONTR. BLOCK 1 " P* A3 - PAGE
0x1823f0…182584 Dummy {f00=0x0073, f01=0x0190, f02=»4K PAGE FRAME 1 v P* 2 ( P* STORE ADDRESS(ES) TO PAGE FRAMES 2 & P* HOLDING THE FIRST LOGICAL PAGE 2 L P* 2 v , P SRL A3,10 SEGMENT SIZE IN 1K BLOCKS =2 2 ( P LDKL A6,MMEND GET END OF MMU-TABLE 2 " P LDKL A8,16 AND NO OF ENTRIES 2 * P LDR A
0x182584…182718 Dummy {f00=0x0073, f01=0x0190, f02=»OINTER 2 p 2 P SUK A3,4 DECREMENT PAGE SIZE WITH FRAME SIZE 3 P RB(P) AP:295 3 D $ P RF(Z) AP:300 EVEN 4K BYTES PAGE 3 Z P* 3 " P* RESERVE ONE EXTRA MMU ENTRY 3 P* WHEN PAGE SIZE IS NOT AN 3 P* EVEN MULTIPLE OF 4K 3 P* 3 $ P LD A3,PAG
0x182718…1828ac Dummy {f00=0x0073, f01=0x0190, f02=»NTRY ENOUGH 3 x P* 4 & P SUK A6,2 ALLOCATE ONE ENTRY EXTRA 4 P SUKL A8,1 4 H P* 4 Z PAP:300 EQU * 4 d 4 P LD A3,SEGCNT+STKEND ANY CORE RESIDENT SEGMENTS? 4 x P RF(Z) AP:310 NO! 4 P* 4 ( P LDR A2,A7 GET SEGMENT FRAME ADDRESS 4 P LDR A3,
0x1828ac…182a40 Dummy {f00=0x0073, f01=0x0190, f02=»ESS 4 n $ P CWK A3,MMEND END OF MMU TABLE? 5 P RF(E) AP:310 YES! 5 4 P* 5 N , P ADKL A2,/400 INCREMENT PAGE FRAME ADDR. 5 X P RB AP:305 5 P* 5 PAP:310 EQU * 5 P* 5 P* SAVE LOGICAL ADDRESS 5 P* TO SEGMENT 5 P* 5 P LDR A
0x182a40…182bd4 (1, 172) Dummy {f00=0x0073, f01=0x0190, f02=» CONCATENATE DISPLACEMENT 5 8 P ST A2,LSTASG+STKEND AND SAVE AS LOGICAL START ADDR. 6 " P RF AP:335 6 ^ P* 6 p P* NO SEGMENTS DEFINED 6 z P* 6 PAP:330 EQU * 6 0 P LDK A3,0 RESET NO OF MMU ENTRIES TO UPDATE 6 ( P LDKL A6,MMEND INITIATE MMU PO
0x182bd4…182d68 Dummy {f00=0x0073, f01=0x0190, f02=»E APPLICATION START ADDRESS 6 P* 7 $ 0 P* A1 - POINTER TO APPLICATION CONTROL BLOCK 7 . , P* A4 - AREA LEFT IN CURRENT PAGE FRAME 7 b " P* A7 - PHYSICAL PAGE ADDRESS 7 P* A6 - MMU ENTRY ADDRESS 7 P* A8 - CURRENT MMU ENTRY 7 P* 7 0 P L
0x182d68…182efc Dummy {f00=0x0073, f01=0x018e, f02=»AP:336 NO! 7 P* 8 , P ADK A2,10 YES, ADD 5 WORDS FOR DEBUGGER 8 PAP:336 EQU * 8 L P ADK A2,1 8 ` $ P ANKL A2,/FFFE MAKE EVEN LENGTH 8 r P* 8 $ P* IF APPLICATION IS LARGER THAN 8 P* 60 K BYTES, START ON A 4K 8 " P* BOUNDARY, TO MAKE SUR
0x182efc…183090 Dummy {f00=0x0073, f01=0x0190, f02=» P CWK A5,15 >60 KBYTES? 9 P RF(L) AP:337 NO! 9 " P* 9 < $ P LDK A4,0 START ON A 4K BOUNDARY 9 F P RF AP:341 9 n P* 9 PAP:337 EQU * 9 & P ADK A2,0 RESTORE LENGTH CONDITION 9 & P RF(N) AP:340 LARGER THAN ONE PAGE 9 P* 9 & P* APPLICATIO
0x183090…183224 Dummy {f00=0x0073, f01=0x0190, f02=»F(G) AP:340 LARGER 9 P* : ( P* APPLICATION LENGTH LESS THAN AREA : $ P* LEFT IN LAST PAGE : P P* COPY FRAME ADDRESS IN NEXT : l P* MMU ENTRY : P* : P* : P SUKL A8,1 : " P RF(N) TABOVF TABBE OVERFLOW! : P* : P SUK A6,2 :
0x183224…1833b8 Dummy {f00=0x0073, f01=0x018e, f02=»* : ( P* RESERVE ENTRIES IN MMU TABLE FOR ; " P* COMMON PART OF APPLICATION ; 6 P* ; $ P* A4 - AREA MAPPED BUT NOT USED ; f P* IN LAST MMU ENTRY ; " P* A2 - LENGTH OF COMMON PART ; P LDR A4,A4 EMPTY FRAME? ; P RF(Z) AP:341 YES!
0x1833b8…18354c Dummy {f00=0x0073, f01=0x0190, f02=» ; j & P STR A7,A6 AND COPY FRAME ADDRESS < PAP:341 EQU * < 2 2 P SUR A2,A4 SUBTRACT AREA LEFT IN CURRENT FRAME < F , P LDK A4,0 RESET AREA LEFT IN LAST FRAME < | * P LDR A5,A2 SAVE REMAINING AREA NEEDED < P RF(Z) AP:351 NOTHING LEFT < P* < * P S
0x18354c…1836e0 Dummy {f00=0x0073, f01=0x018e, f02=»E ENTRY < v P* = P* UPDTE MMU ENTRIES = P* = 6 PAP:342 EQU * = @ & P SUK A2,1 MORE ENTRIES TO UPDATE? = T P RF(N) AP:350 NO! = ~ P* = * P SUKL A8,1 DECREMENT MMU ENTRY POINTER = " P RF(N) TABOVF TABLE OVERFLOW! = P* = ( P SUK A6,
0x1836e0…183874 (1, 173) Dummy {f00=0x0073, f01=0x0190, f02=» P* > PTABOVF EQU * > P LDK A1,LMP7 > " & P CALL ERROR SIGNAL TABBE OVERFLOW! > 6 PMEMOVF EQU * > ` P LDKL A1,LMP3 > t P CALL ERROR MEMORY OVERFLOW! > P* > PAP:350 EQU * > P* > 0 P LDR A5,A5 RESTORE AREA TO USE IN LAST FRAME >
0x183874…183a08 Dummy {f00=0x0073, f01=0x018e, f02=»AME > d P LDR A2,A8 GET MMU ENTRY ? * P SLL A2,12 MOVE TO FOUR LEFTMOST BITS ? , P LDR A8,A2 ? Z $ P ORR A8,A4 LOGICAL START ADDRESS ? l ( P CWK A3,'AS' ASSEMBLER APPLICATION? ? P RF(NE) AP:352 NO! ? P* ? * P ADKL A8,10 SKIP FIVE PRECEEDING WOR
0x183a08…183b9c Dummy {f00=0x0073, f01=0x0190, f02=» ? f : P ST A7,APLLDA,A1 SAVE APPLICATION LOAD ADDR. (BIT 0-5) @ $ P ST A4,APLLDA+2,A1 AND BIT 6-17 @ F , P ST A7,FYSPAG+STKCOM SAVE LAST PHYSICAL @ n & P ST A4,LSTADR+STKCOM ADDRESS USED @ , P LDR* A1,A6 GET ADDRESS TO PHYSICAL PAGE @ $ P ANKL A1,/C000 G
0x183b9c…183d30 Dummy {f00=0x0073, f01=0x0190, f02=»GET PHYSICAL ADDRESS @ P SLL A1,2 A P ADR A1,A4 ADD DISPLACEMENT A . ( P LD A2,SCTSFA GET START OF FREE AREA A R ( P TNM A1,A2 ON SAME SIDE OF 32K-LIMIT A ~ P RF(NN) AP3532 YES! A P CWR A2,A1 A P RF AP3534 A PAP3532 CWR A1,A2 A PAP3534
0x183d30…183ec4 Dummy {f00=0x0073, f01=0x0190, f02=» COMMON PART A r P TL TABBE LOAD MMU REGISTERS B P XIF B 8 P IFT MMUPAG=0 B D P EJECT B Z PAP:240 EQU * B h P* B | @ P* EXECUTION PATH EXCLUSIVELY FOR SYSTEMS WITHOUT MMU OPTION B P* B P* B & P* CHECK IF ASSEMBLER APPLICATION B P
0x183ec4…184058 Dummy {f00=0x0073, f01=0x0190, f02=»275 NO SEGMENTS! B , P CF A14,ALOCSG RESERVE AREA FOR SEGMENTS C , P LDR A2,A7 CONFIGURE LOGICAL START ADDR. C H P SLL A2,2 TO FIRST SEGMENT C x P ORR A2,A5 C P ST A2,LSTASG+STKEND C PAP:275 EQU * C . P LD A10,COMLG,A9 GET LENGTH OF COMMON PART C
0x184058…1841ec Dummy {f00=0x0073, f01=0x0190, f02=», ADD 5 WORDS FOR DEBUGGER C PAP:276 EQU * D " P ADKL A10,1 D 6 $ P ANKL A10,/FFFE MAKE EVEN LENGTH D J 8 P RF(N) AP:278 APPLICATION IS LARGER THAN FRAME SIZE D r P* D > P CWR A10,A5 APPL. IS SMALLER THAN AREA LEFT IN LAST FRAME D P RF(NG) AP:280
0x1841ec…184380 Dummy {f00=0x0073, f01=0x0190, f02=»E D j $ P LDR A2,A10 GET REMAINING LENGTH E $ P SRL A2,12 COUNT NO OF 4K BLOCKS E 2 , P SRL A7,10 FRAME ADDRESS AS BLOCK COUNT E Z $ P SUR A7,A2 SUBTRACT AREA NEEDED E " P RF(N) MEMOVF MEMORY OVERFLOW! E P* E . P ANKL A10,/0FFF ISOLATE POSSIBLE REMAI
0x184380…184514 (1, 174) Dummy {f00=0x0074, f01=0x0190, f02=»MORY OVERFLOW! E P* F PAP:279 EQU * F $ P SLL A7,10 RESTORE FRAME ADDRESS F 4 PAP:280 EQU * F 2 P SUR A5,A10 ALLOCATE AREA NEEDED IN LAST FRAME F p P LDR A4,A9 SAVE A9 F P LDR A8,A11 SAVE A11 F P ST A7,SCTEFA AND SAVE F 2 P ST A5,SCTEFA+
0x184514…1846a8 Dummy {f00=0x0074, f01=0x0190, f02=»LICATION F j , P ST A7,FYSPAG+STKCOM SAVE LAST PHYSICAL G & P ST A5,LSTADR+STKCOM ADDRESS USED G @ P SLL A7,2 G j P LDR A11,A7 G | . P ORR A11,A5 MAKE ADDRESS AS A 16 BIT ADDR. G ( P LD A9,SCTSFA GET START OF FREE AREA G $ P CALL CMPADR A11 COMPARED
0x1846a8…18483c Dummy {f00=0x0074, f01=0x0190, f02=»:290 EQU * G ( P CWK A3,'AS' ASSEMBLER APPLICATION? H P RF(NE) AP:295 NO! H > P* H X ( P ADKL A11,10 SKIP 5 PRECEEDING WORDS H b PAP:295 EQU * H 2 P ST A11,LLDADR+STKEND SAVE APPL. LOAD ADDRESS H P LDR A9,A4 RESTORE A9 H P LDR A11,A8 RESTOR
0x18483c…1849d0 Dummy {f00=0x0074, f01=0x0190, f02=»MLG,A9 GET LENGTH OF COMMON PART H P XIF I ( P EJECT I 4 P* I B P* COMMON EXECUTION PATH I L P* I l : P* READ AND RELOCATE CORE RESIDENT PART OF APPLICATION I v P* I $ P* A8 - APPLICATION LOAD ADDRESS I * P* A10 - LENGTH OF CORE RESIDENT P
0x1849d0…184b64 Dummy {f00=0x0074, f01=0x0190, f02=»ADDRESS I r 6 P ST A8,APLREL,A1 SAVE APPLICATION RELOCATION BASE J 4 P CM FSTSEC+STKEND RESET FIRST SECTOR/BLOCK IND. J J 6 P LDKL A7,240 INITIATE NR OF CODE WORDS/SECT/BLOCK J $ P ST A7,LOD:10 MODIFY INSTRUCTION J * P CF A14,LODCOM LOAD CORE RESIDENT PA
0x184b64…184cf8 Dummy {f00=0x0074, f01=0x0190, f02=»A2,APLTYP,A1 AND TYPE OF THIS APPL. J ( P CWK A2,'AS' ASSEMBLER APPLICATION? K , P ABL(E) AP:400 YES K X : P LD A8,LSTASG+STKEND GET LOGICAL ADDRESS TO FIRST PAGE K r 0 P LD A2,TNBRSG+STKEND GET NUMBER OF SEGMENTS K . P ABL(Z) AP:400 NO SEGMENTS IN APPLIC
0x184cf8…184e8c Dummy {f00=0x0074, f01=0x0190, f02=»ONTENTS K n P XIF L PAP:360 EQU * L P* L 0 & P* READ AND RELOCATE THE SEGMENTS L : P* L d . P* A8 - LOGICAL ADDRESS OF SAVE05 SEGMENT L n P* A10 - SEGMENT LENGTH L P* L 6 P LD A3,CURAPL+STKEND GET APPL. CONTROL BLOCK ADDR. L 0 P LD
0x184e8c…185020 Dummy {f00=0x0074, f01=0x0190, f02=» * L P RF(Z) AP:370 M P ADK A2,BLKLEN NEXT BLOCK M & P SUK A1,1 DECREMENT BLOCK COUNTER M B P RB AP:365 M l PAP:370 EQU * M ~ P* M P* CHECK IF DISC PAGING M P* M " P LD A1,SCTOPT GET OPTION WORD M P ANK A1,2 DISC PAGING? M
0x185020…1851b4 (1, 175) Dummy {f00=0x0074, f01=0x0190, f02=»,A1 GET MOST SIGNIFICANT PART M " P ANKL A12,/FF OF DISC ADDRESS N & * P SRL A1,8 SEGMENT TYPE TO RIGHT BYTE N L ( P CCK A1,'RR' CORE RESIDENT SEGMENT? N z * P RF(E) AP:376 YES: LOAD THIS SEGMENT! N P* N * P* BYPASS THIS SEGMENT AND CHECK NEXT N
0x1851b4…185348 Dummy {f00=0x0074, f01=0x0190, f02=»ENT N P CWR A1,A2 LAST SEGMENT? O P ABL(E) AP:400 YES! O , 4 P ST A1,SEGCNT+STKEND SAVE CURRENT SEGMENT NUMBER O H P RB AP:360 O & PAP:375 LDKL A1,LMP2 DISC I/O ERROR O P CALL ERROR O P EJECT O PAP:376 EQU * O " P ADK A2,2 DISC SECTOR
0x185348…1854dc Dummy {f00=0x0074, f01=0x0190, f02=» O P RF(O) AP:377 OVERFLOW P P RF AP:378 NOT OVERFLOW P & 4 PAP:377 ADKL A12,1 INCR. M. S. P. OF DISC ADDRESS P F " P ANKL A11,/7FFF RESET OVERFLOW P ~ 4 PAP:378 AD A12,APLADA,A3 ADD M. S. P. OF A. D. A. P P CWK A12,255 OVERFLOW? P , P RB(G) AP:375
0x1854dc…185670 Dummy {f00=0x0074, f01=0x0190, f02=»A10,1 P $ P ANKL A10,/FFFE MAKE EVEN LENGTH Q P ST A8,LLDADR+STKEND Q 6 P CF A14,LODSEG LOAD SEGMENT Q R , P LD A1,SEGCNT+STKEND GET SEGMENT COUNTER Q v 6 P LD A2,TNBRSG+STKEND GET TOTAL NUMBER OF SEGMENTS Q ( P ADK A1,1 INCREMENT SEGMENT COUNTER Q
0x185670…185804 Dummy {f00=0x0074, f01=0x0190, f02=»STKEND GET CURRENT APPL. CONTROL BLOCK =2 Q 0 P LD A4,APLPSZ,A3 AND SEGMENT SIZE DEFINED =2 R 2 P IFT MMUPAG=0 R f , P ADR A8,A4 COMPUTE ADDRESS TO NEXT PAGE R | P RB AP:360 R P XIF R P IFT MMUPAG=1 R P EJECT R PAP:379 EQU * R P LDR A
0x185804…185998 Dummy {f00=0x0074, f01=0x0190, f02=»RESS TO NEXT PAGE R r P LDR A4,A1 SAVE S . P ANKL A4,/0C00 GET MODULO 4K DISCRIMINANT S 2 0 P ANKL A1,/F000 LOGICAL ADDRESS TO NEXT PAGE S d 2 P ANKL A8,/F000 LOGICAL ADDRESS TO CURRENT PAGE S * P SUR A1,A8 COMPUTE PHYSICAL INCREMENT S PAP:380 EQU *
0x185998…185b2c Dummy {f00=0x0074, f01=0x0190, f02=»RL A2,12 MOVE TO 4 RIGHTMOST BITS S P ADR A2,A2 2*MMU ENTRY T * P ADR A2,A13 T H & P ADKL A2,MMDDIV MMU ENTRY ADDRESS T P LDR A3,A13 T P ADKL A3,MMDDIV+32 T * P SRL A1,2 MAP PHYSICAL ADDRESS ON MMU T PAP:385 EQU * T , P ADRS A1,A2 LOGICA
0x185b2c…185cc0 Dummy {f00=0x0074, f01=0x0190, f02=» T n P RB AP:360 U P* U P XIF U $ P EJECT U 0 PAP:400 EQU * U > 8 P LD A1,CURAPL+STKEND GET CURRENT APPL.CONTROL BLOCK U R P IM APLCNT+STKEND U * P ABL(Z) CONLOD ALL APPLICATIONS LOADED U P* U . P ADK A1,ACBLEN ADVANCE TO NEXT APPLICATI
0x185cc0…185e54 (1, 176) Dummy {f00=0x0074, f01=0x0190, f02=»,A1 LEAST SIGN. PART OF DISC ADDR. U ( P LD A10,READ GET SUBROUTINE ADDRESS V * " P CFR A14,A10 READ FIRST SECTOR V V P ABL AP:234 V | P EJECT V 2 P********************************************* V 2 P* * V 2
0x185e54…185fe8 Dummy {f00=0x0074, f01=0x0190, f02=» * V v 2 P* * W 2 P* RESERVE PAGES FOR RESIDENT SEGMENTS * W R 2 P* * W 2 P* * W 2 P********************
0x185fe8…18617c Dummy {f00=0x0074, f01=0x0190, f02=»+STKEND RESET NO OF CORE RESIDENT SEGMENTS W * P ST A3,APLPSZ,A1 SAVE SEGMENT SIZE =2 X 2 " P LD A4,SCTOPT GET OPTION WORD X ` P SRC A4,2 DISC PAGING? X P RF(NN) ALSG04 NO! X P* X * P LD A4,SCTIPL GET PROGRAM LOAD DEVICE X " P SUK A4,/F0 CHECK
0x18617c…186310 Dummy {f00=0x0074, f01=0x0190, f02=» $ P LDR A6,A9 START OF APPLICATION Y & P ADK A6,14 START OF SEGMENT BLOCKS Y , PALSG00 EQU * Y V P ADK A6,6 NEXT SEGMENT BLOCK Y j P* LOOK IF OUTSIDE BUFFER Y P* IF SO READ NEXT Y P* SECTOR BLOCK Y P* Y $ P LDR A4,A6 SAVE BUFFER POSIT
0x186310…1864a4 Dummy {f00=0x0074, f01=0x0190, f02=»NXTSEC READ NEXT SECTOR Y 8 P SUK A6,BUFLEN-16 COMPENSATE FOR RELOCATION BITS =5 Z $ P AND RESET BUFFER POSITION =5 Z P* Z PALSG01 EQU * Z P LCR A4,A6 GET SEGMENT TYPE Z ( P CCK A4,'RR' CORE RESIDENT SEGMENT? Z P RF(NE) ALSG02 NO! Z
0x1864a4…186638 Dummy {f00=0x0074, f01=0x0190, f02=»! Z ~ 4 P LD A2,SEGCNT+STKEND NUMBER OF RESIDENT SEGMENTS [ ( P RF(Z) ALSG12 NO RESIDENT SEGMENTS! [ B PALSG04 EQU * [ n 6 P ST A2,SEGCNT+STKEND SAVE NBR OF RESIDENT SEGMENTS [ 4 P ADS A2,SCTNOP ACKUMULATE NO OF CORE RES. SEGM. [ " P LD A6,SCTOPT GET OP
0x186638…1867cc Dummy {f00=0x0074, f01=0x0190, f02=» [ . P RF(NZ) ALSG08 NOT A MULTIPLE OF 4K BYTES P* : 0 P LDR A5,A5 LOOK IF ALREADY ON A 4K BOUNDARY D P RF(Z) ALSG08 YES x P* $ P LDK A5,0 START ON A 4K BOUNDARY PALSG08 EQU * * P LDR A7,A7 LOOK IF 256 KBYTE MEMORY =3 P R
0x1867cc…186960 Dummy {f00=0x0074, f01=0x0190, f02=» . P ANKL A5,/1C00 ALWAYS START ON 1K BOUNDARY ] . P SRL A3,1 MAKE SEGMENT LENGTH IN WORDS =2 ] : ( P SRL A5,1 AND REMAINING AREA TOO =2 ] l * P SRL A7,10 CONVERT TO NO OF FRAMES =2 ] " P LDR A4,A3 GET SEGMENT SIZE =2 ] . P NGR A4,A4 AND CORRESPONDING
0x186960…186af4 (1, 177) Dummy {f00=0x0074, f01=0x0190, f02=»FRAME COUNT =2 ] | , P ADKL A5,/800 ALLOCATE ANOTHER FRAME =2 ^ $ P RB(P) ALSG09 LOOK IF ENOUGH =2 ^ F PALSG10 EQU * =2 ^ n 4 P TNM A5,A3 FREE AREA GREATER THAN 32K WORDS? =2 ^ P RF(N) ALS11A YES =2 ^ . P SUR A5,A3 ALLOCATE AREA TO ONE SEGMENT =2 ^
0x186af4…186c88 Dummy {f00=0x0074, f01=0x0190, f02=»CREMENT SEGMENT COUNTS =2 ^ $ P RB(NZ) ALSG09 MORE SEGMENTS =2 _ " P LDR A7,A7 =2 _ J $ P ABL(N) MEMOVF MEMORY OVERFLOW! _ ` P* _ $ P SLL A7,10 RESTORE FRAME ADDRESS _ . P ST A7,APLSEG,A1 SAVE PHYSICAL ADDRESS TO _ , P SLL A5,1 RESTORE AREA LEFT
0x186c88…186e1c Dummy {f00=0x0074, f01=0x0190, f02=» P* ` * P* REREAD FIRST SECTOR OF APPLICATION ` * P* IF S:GTAB IS LARGER THAN ONE SECTOR ` < P* ` j 8 P LD A12,APLADA,A1 GET MOST SIGN. PART OF DISC ADDR. ` t 2 P LD A11,APLADA+2,A1 AND LEAST SIGNIFICANT PART ` & P CF A14,NXTSEC REREAD FIRST SECTOR
0x186e1c…186fb0 Dummy {f00=0x0074, f01=0x018e, f02=»TOR ` v P CFR A14,A10 a 8 P ST A11,DISCAD+STKEND SAVE CURRENT SECTOR/BLOCK =10 a ( P ST A12,DISCAD+2+STKEND ADDRESS =10 a . P CALL POB RESTORE FORMER REGISTER CONTENTS a : P LD A11,DISCAD+STKEND RESTORE CURRENT SECTOR/BLOCK =10 a ( P LD A12,DISCAD+2
0x186fb0…187144 Dummy {f00=0x0074, f01=0x0190, f02=» 4 P* * b 4 P* LODMEX - LOAD MONITOR EXTENT(S) * b < 4 P* =============================== * b t 4 P* * b 4 P* REFERENCED IN: SYSLOD
0x187144…1872d8 Dummy {f00=0x0074, f01=0x0190, f02=» * b 4 P* EXIT: * c 4 4 P* * c l 4 P* WORK REGISTERS: A1-A12 * c 4 P*
0x1872d8…18746c Dummy {f00=0x0074, f01=0x0190, f02=»*********************************** c PLODMEX EQU * d , & P LD A1,SCTMXS MONITOR EXTENT TABLE d @ PMSX10 EQU * d j P RF(Z) MSX99 d ~ P* d ( P LD A1,SCTOPT GET MONITOR OPTION =12 d ( P SRC A1,1 LOOK IF MMU OPTION ON =12 d P RF(N) MSX15 YES =12
0x18746c…187600 Dummy {f00=0x0074, f01=0x0190, f02=»ONITOR DISC ADDRESS d | * P LD A3,MX:NOX,A1 GET NUMBER OF EXTENTS e 4 P LD A6,MX:NOS,A1 GET NUMBER OF SEGMENT CLUSTERS e J $ P SLL A6,1 MAKE BYTE DISPLACEMENT e P ADK A6,4 e " P ADR A6,A1 FIRST EXTENT BLOCK e PMSX20 EQU * e & P SUK A3,1 DECREMEN
0x187600…187794 (1, 178) Dummy {f00=0x0075, f01=0x0190, f02=» e t $ P LD A7,SCTEFA RESTORE ADDRESS TO f $ P LD A5,SCTEFA+2 END OF FREE AREA f 0 P RF(NZ) MSX25 f X P* f n 2 P LDKL A5,PAGSIZ EMPTY FRAME, START ON NEXT ONE f x P SUKL A7,/400 f PMSX25 EQU * f ( P LD A2,EXLEN,A6 GET LENGTH OF EXTENT f & P ADK
0x187794…187928 Dummy {f00=0x0075, f01=0x0190, f02=»EXTENT LENGTH LESS THAN 32K BYTES? f P RF(N) MSX30 NO g * P* g B 2 P CWR A2,A5 EXTENT LESS THAN AREA LEFT IN FRAME g L P RF(L) MSX40 YES! g P* g PMSX30 EQU * g P LDR A1,A2 g . P SRL A1,12 CONVERT LENGTH TO NO OF FRAMES g P CWK A1,14
0x187928…187abc Dummy {f00=0x0075, f01=0x018e, f02=» ( P LDKL A5,PAGSIZ START ON 4K BOUNDARY h P SUK A7,1 h 0 PMSX35 EQU * h B 0 P SUR A2,A5 SUBTRACT AREA LEFT IN LAST FRAME h V " P LDK A5,0 AND SET EMPTY FRAME h P LDR A1,A2 h . P SRL A1,12 CONVERT LENGTH TO NO OF FRAMES h , P SUR A7,A1 AND SUBTR
0x187abc…187c50 Dummy {f00=0x0075, f01=0x0190, f02=» P* i * P LDKL A5,PAGSIZ TAKE NEXT EMPTY FRAME i P SUK A7,1 i < PMSX40 EQU * i N 4 P SUR A5,A2 SUBTACT FROM AREA LEFT IN LAST FRAME i b PMSX45 EQU * i & P CWK A7,15 LOOK IF FIRST PARTITION i * P ABL(NG) MEMOVF YES, MEMORY OVERFNGOW! i P*
0x187c50…187de4 Dummy {f00=0x0075, f01=0x0190, f02=» i j & P ST A7,SCTEFA TO END OF FREE AREA j P* j 2 $ P LD A4,SCTMXS GET MXSTAB ADDRESS j < " P ADK A4,2 MONITOR DISC ADDRESS j d P XRR A1,A1 RESET REG. A1 j * P LDR* A2,A6 GET MONITOR EXTENT ADDRESS j ( P DAR* A4 AND RELOCATE EXTENT ADDRESS j * P LDR
0x187de4…187f78 Dummy {f00=0x0075, f01=0x0190, f02=»D ADDRESS j r $ P ORR A1,A7 TO A 16 BITS ADDRESS k " P STR A1,A6 AND SAVE IN MXSTAB k : P* k ` * P ADK A5,10 SKIP PRECCEDING FIVE WORDS k j : P ST A5,LLDADR+STKEND SAVE AS PGM LOAD ADDR. (LOGICAL) k $ P LDR A8,A5 SAVE RELOCATION BASE k 0 P ADS A5,2,
0x187f78…18810c Dummy {f00=0x0075, f01=0x0190, f02=» , P LDKL A2,TABBE GET ADDRESS TO MMU TABLE l 6 P ST A3,FSTSEC+STKEND RESET FIRST SECTOR INDICATOR l 4 PMSX50 EQU * l n " P STR A7,A2 STORE PAGE ADDRESS l $ P ADKL A7,/400 NEXT PAGE ADDRESS l P ADK A2,2 NEXT MMU ENTRY l & P ADK A3,1 INCREMENT ENTR
0x18810c…1882a0 Dummy {f00=0x0075, f01=0x018e, f02=»L LOD:70 LOAD EXTENT l & P LDR* A3,A15 RESTORE NO OF EXTENTS m P RB MSX20 m F P* m X PMSX99 EQU * m b P RTN A14 m v P EJECT m 4 P*********************************************** m P* m P* GETMON m P* ====
0x1882a0…188434 (1, 179) Dummy {f00=0x0075, f01=0x0190, f02=» m 4 P************************************************ n P* n @ P* n J PGETMON EQU * n T ( P LD A1,SCTANO GET APPLICATION NUMBER n h P ST A1,MONNO+STKEND SAVE n 2 P CF A14,GETNBR GET CORRESPONDING ENTRY IN VTOC n 0 P LC A1,8,A4 GET CORRESPONDING
0x188434…1885c8 Dummy {f00=0x0075, f01=0x0190, f02=»R APPL. NBR. 0 (MONITOR) n x P* o PGTMON2 EQU * o * 0 P LD A1,MONNO+STKEND GET MONITOR NO (BIT 0-7) o > ( P CW A1,8,A4 IS IT THE RIGHT MONITOR? o r P RF(E) GTMON4 YES! o P* o 8 P CF A14,GTNBR4 NO, CONTINUE TO NEXT MONITOR IN VTOC o P RB GTMON2
0x1885c8…18875c Dummy {f00=0x0075, f01=0x0190, f02=»T A2,2,A1 AND SAVE IN MXSTAB o 6 P LD A2,18,A4 AND MONITOR DISC ADDRESS (BIT 16-31) p $ " P ST A2,4,A1 AND SAVE IN MXSTAB p ^ P RTN A14 RETURN p P EJECT p PGETNBR EQU * p $ P CF A14,GETVLB READ VOLUME LABEL p PGTNBR0 EQU * p P CF A14,RDSEC
0x18875c…1888f0 Dummy {f00=0x0075, f01=0x0190, f02=»MBER p j PGTNBR2 EQU * q . P LCR A2,A4 GET 1ST CHARACTER IN FILE NAME q P CCK A2,/2020 UNUSED? q R P RF(E) GTNBR4 YES! q p P* q ( P CC A1,9,A4 SAME APPLICATION NUMBER? q P RF(E) GTNBR6 YES, RETURN q P* q PGTNBR4 EQU * q P ADR A4,
0x1888f0…188a84 Dummy {f00=0x0075, f01=0x0190, f02=» P* r $ P RB GTNBR0 NO, READ NEXT SECTOR r P* r 6 PGTNBR6 EQU * r @ P RTN A14 r T P XIF r d P EJECT r p > P********************************************************** r ~ > P* * r > P*
0x188a84…188c18 Dummy {f00=0x0075, f01=0x0190, f02=» * r > P* ENTRY: A9 - BUFFER ADDRESS * s 8 > P* * s z > P* EXIT: * s > P*
0x188c18…188dac Dummy {f00=0x0075, f01=0x0190, f02=» * s > P********************************************************** t 4 PCONLOD EQU * t v & P LD A1,SCTEFA GET END OF FREE AREA t P LDR A2,A1 SAVE t " P ANKL A1,/3C00 ISOLATE BIT 2-5 t P SLL A1,2 ROTATE TO BI
0x188dac…188f40 Dummy {f00=0x0075, f01=0x0190, f02=» P ST A2,SCTEFA AND SAVE u 8 P LD A1,CURAPL+STKEND START OF LAST APPL. CTRL. BLOCK u " 0 P ADK A1,ACBLEN END OF LAST APPL. CTRL. BLOCK u ^ , P ST A1,SCTSFA UPDATE START OF FREE AREA u 8 P LD A1,APLTAB+STKCOM GET START OF APPL. CONTR. TABLE u , P ADK A1,2
0x188f40…1890d4 (1, 180) Dummy {f00=0x0075, f01=0x0190, f02=» u f & P ST A1,CURAPL+STKEND CONTROL BLOCK v * P LD A1,SCTIPL GET PROGRAM LOAD DEVICE v 2 " P SUK A1,/F0 CHECK DEVICE TYPE v ` P RF(NN) CONRAD NOT CASSETTE v P IFT CFTEST+CASS=2 v P* v & P* PROGRAM LOAD DEVICE = CASSETTE v P* v PCON:30
0x1890d4…189268 Dummy {f00=0x0075, f01=0x0190, f02=»0100 v P ST A1,COR:38 MODIFY w P LDR A1,A9 START OF BUFFER w ( " P ADKL A1,BUFLEN END OF BUFFER w J , P ST A1,PLDADR+STKEND SAVE END OF BUFFER w p P ST A1,EINPBF+STKEND SAVE w , P ST A1,CONSTA+STKCOM START OF CONF. DATA w P CF A14,RDBLK READ ONE
0x189268…1893fc Dummy {f00=0x0075, f01=0x0190, f02=» RF(Z) TST:10 NO! w . P CF A14,CASSIN INIT CONFIGURATION CASSETTE x P CALL CON:40 x L P RF TST:10 x ` PCONEX EQU * x r P* x > P* UNLOAD CASSETTE IF NO APPLICATION DATA ON SAME CASSETTE x P* x " P CF A14,RDBLK READ NEXT BLOCK x P LDR A
0x1893fc…189590 Dummy {f00=0x0075, f01=0x0190, f02=»PASS TAPEMARK x P RF CON:90 y PCON:80 EQU * y ( P LDK A1,/F y < " P CF A14,CHCRIO UNLOAD CASSETTE y N PCON:90 EQU * y t P ABL CONMOV y P XIF y P IFT CFTEST=1 y P EJECT y PCONRAD EQU * y P* y 6 P* LOAD CONFIGURATION DATA FRO
0x189590…189724 Dummy {f00=0x0075, f01=0x0190, f02=» y j P* z 0 P CF A14,CONFLD INITIATE CONF. DATA LOAD DEV. z PCONRA0 EQU * z F * P LD A11,CONDAD+STKEND GET START SECTOR z Z 2 P LD A12,CONDAD+2+STKEND MOST SIGNIFICANT PART z " P LDR A1,A9 GET START OF BUFFER z $ P ADKL A1,BUFLEN-6 END OF BUFFER z
0x189724…1898b8 Dummy {f00=0x0075, f01=0x0190, f02=»A1,EINPBF+STKEND SAVE =2 z , P ST A1,CONSTA+STKCOM START OF CONF. DATA { $ P LDKL A10,0 RESET RECORD COUNTER { P P* { x 0 P* READ ONE SECTOR FROM RANDOM ACCESS DEVICE { P* { P CALL READC READ SECTOR { P* { 0 P* TEST THE SYNTAX OF THE CONFI
0x1898b8…189a4c Dummy {f00=0x0075, f01=0x0190, f02=»ST { P CALL AA | P CALL CONRD | P CALL TCL | . P CALL TEST | @ P CALL AA | R P CALL CONRD | b P CALL LEV | v P CALL TEST | P CALL NN1 | PTST:20 CALL CONRD | P CALL NN1 | P CALL CONRD | B PTST:30 LD A5,NDEVCL+STKEND G
0x189a4c…189be0 Dummy {f00=0x0075, f01=0x0190, f02=»ALL TEST | P CALL NN } P CALL CONRD } P CALL LC } 4 P CALL TEST } D P CALL NNL } V P CALL CONRD } h P RB TST:30 } | PTST:40 EQU * } P CALL NN1 } P CALL CONRD } PTST:50 EQU * } < P LD A5,NDEVCL+STKEND GET NUMBER OF SPECIAL D
0x189be0…189d74 (1, 181) Dummy {f00=0x0075, f01=0x018e, f02=»NN } P CALL CONRD ~ P RB TST:50 ~ PTST:60 EQU * ~ 0 P LCR A5,A4 GET CHARACTER ~ D , P CCK A5,'TT' BLOCK TYPE T? (MOD. INSTR.) ~ d PTST:70 EQU *-2 ~ P RB(E) TST:10 YES! ~ P LDKL A3,/FFFF ~ * P ST A3,TST:70 MODIFY INSTRUCTION TO RF ~ P
0x189d74…189f08 Dummy {f00=0x0075, f01=0x018e, f02=» P RB TST:20 PTST:80 EQU * . P LDR A1,A5 SAVE FIRST CHARACTER IN RECORD * & P ADK A4,1 INCREMENT BUFFER POINTER P LCR A5,A4 GET CHARACTER P CCK A5,';;' END OF RECORD P ABL(NE) CONERR NO! PTST:85 EQU * . P CCK A1,'AA' STA
0x189f08…18a09c Dummy {f00=0x0075, f01=0x0190, f02=» | P* 8 P LD A1,EINPBF+STKEND CURRENT POSITION IN CONF. DATA 4 P SU A1,CONSTA+STKCOM CALCULATE RELATIVE POSITION N P ST A1,DCBLK+STKCOM SAVE PTST:87 EQU * ( P CALL CONRD MOVE AND GET NEXT RECORD $ P LCR A1,A4 AND FIRST CHAR. IN IT
0x18a09c…18a230 Dummy {f00=0x0075, f01=0x0190, f02=»CAN CONFIGURATION DATA P* : P LDKL A1,/FF3B SUBSTITUTE 'A;' WITH 'HEX. FF' AND ';' ( P STR A1,A8 f 4 P LD A2,CURAPL+STKEND CURRENT APPL. CONTR. BLOCK x 8 P LD A1,EINPBF+STKEND CURRENT POSITION IN CONF. DATA P ADK A1,1 SKIP BLOCK MARKER
0x18a230…18a3c4 Dummy {f00=0x0075, f01=0x0190, f02=»BLEN < P ST A2,CURAPL+STKEND ADVANCE TO NEXT APPL. CONTR. BLOCK $ P CALL CONRD MOVE AND PACK RECORD L ( P ADKL A10,1 INCREMENT RECORD COUNTER t & P CW A10,LSTREC+STKEND LAST RECORD P RF(E) COR:50 YES! . P ADKL A8,RECLEN+1 INCREMENT RECORD P
0x18a3c4…18a558 Dummy {f00=0x0075, f01=0x0190, f02=» * P LDKL A1,'TT' LOOK FOR TASK DEF. BLOCK P ST A1,TST:70 MODIFY INSTR. 2 P ST A1,T:10 V P LDR A4,A8 j P ABL TST:10 SCAN CONF. DATA | P* PCOR:50 EQU * " P LD A1,SCTOPT GET OPTION WORD P ANK A1,8 SWB:S? P RF(Z) COR:5
0x18a558…18a6ec Dummy {f00=0x0075, f01=0x0190, f02=» | . P CF A14,LODDEV INITIALIZE PGM LOAD DEVICE P CF A14,GETFIL : P* P P* UNLOCK FLEXIBLE DISC Z P* z PCOR:55 EQU * 4 P LD A1,CONDEV+STKEND GET CONF. DATA LOAD DEVICE , P RF(Z) COR:58 SAME AS APPL. LOAD DEVICE P*
0x18a6ec…18a880 Dummy {f00=0x0075, f01=0x0190, f02=»=2 ~ ( P CF A14,UNLOCK UNLOCK FLEXIBLE DISC P XIF 6 P IFT CFTEST=1 B PCOR:58 EQU * X * P LD A1,SCTIPL GET PROGRAM LOAD DEVICE l P SUK A1,/F8 CHECK TYPE $ P RF(N) COR:60 NOT FLEXIBLE DISC P* P XIF " P SUK A1,/FC-/F8 FL
0x18a880…18aa14 (1, 182) Dummy {f00=0x0076, f01=0x0190, f02=»SC PAGING? $ P RF(NZ) COR:60 YES! DON'T UNLOCK P* : P LD A1,IPLDEV+STKEND D ( P CF A14,UNLOCK UNLOCK FLEXIBLE DISC ` P XIF P IFT CFTEST=1 PCOR:60 EQU * P EJECT PCONMOV EQU * P* 4 P* MOVE CONFIGURATION DATA
0x18aa14…18aba8 Dummy {f00=0x0076, f01=0x018e, f02=»OV10 LD A3,EINPBF+STKEND GET END OF CONFIGURATION DATA 0 P LD A2,ESYSTA+STKEND GET END OF SYSTEM AREA > * P CM -2,A2 MAKE SURE CONFIGURATION FILE r " P SUK A2,1 IS FOLLOWED BY X'00' , P SUR A3,A1 LENGTH OF CONFIGURATION DATA 2 P ST A3,CONLEN+STKC
0x18aba8…18ad3c Dummy {f00=0x0076, f01=0x0190, f02=» : P ST A2,CONSTA+STKCOM SAVE START OF CONFIGURATION DATA 2 P LD A1,CONLEN+STKCOM GET LENGTH OF CONF. DATA F 0 P ADK A1,2 INCLUDE TRAILING ZEROES IN LENGTH | P ANKL A1,/FFFE AND MAKE EVEN P ST A1,CONLEN+STKCOM & P LDR A1,A9 GET START OF
0x18ad3c…18aed0 Dummy {f00=0x0076, f01=0x0190, f02=»ANT f $ P LD A2,SCTMXS GET MXSTAB ADDRESS $ P RF(Z) CMOV20 NO MXSTAB PRESENT 4 P* 0 P AD A2,M:REL+STKCOM RELOCATE MXSTAB ADDRESS f * P ST A2,SCTMXS AND SAVE AS NEW ADDRESS PCMOV20 EQU * , P LD A2,CONSTA+STKCOM GET START OF CONFF
0x18aed0…18b064 Dummy {f00=0x0076, f01=0x0190, f02=» A1,2 P SUK A2,2 P LDR* A4,A1 P STR A4,A2 4 P CWR A1,A13 F P RB(NE) MOPRO Z ( P ABR A2 CONTINUE EXECUTION IN SYSLDM p P EJECT D P*************************************************************** D P* SUROUTINES USED TO
0x18b064…18b1f8 Dummy {f00=0x0076, f01=0x0190, f02=»CONRD EQU * P* 2 P* COMPUTE NUMBER OF CHARACTERS IN THIS RECORD P* T 6 P LD A1,EINPBF+STKEND GET CURRENT POINTER IN BUFFER ^ P LDR A2,A1 SAVE & P LDK A3,0 RESET CHARACTER COUNTER P LDR A4,A8 START OF RECORD PCOR:30 EQU *
0x18b1f8…18b38c Dummy {f00=0x0076, f01=0x0190, f02=» MAXIMUM SIZE ACHIEVED? PCOR:38 EQU *-2 P RF(E) COR:40 YES! 6 * P CW A1,ESYSTA+STKEND MEMORY OVERFLOW? P P RF(E) MEMOFL YES! ~ & P ADK A1,1 INCREMENT BUFFER POINTER * P ADK A3,1 INCREMENT CHARACTER COUNTER & P ADK A4,1 INCREMENT RECO
0x18b38c…18b520 Dummy {f00=0x0076, f01=0x0190, f02=» RF(NE) COR:45 NO! * P CWK A3,NCHTID CHECK IF END OF RECORD 4 P RB(E) COR:35 NO: SEMICOLON CHARACTER IN RECORD H PCOR:45 EQU * 2 P ST A1,EINPBF+STKEND SAVE CURRENT DESTINATION P LDR A1,A8 START OF RECORD P CALL MOVE PCOR:48 EQU
0x18b520…18b6b4 (1, 183) Dummy {f00=0x0076, f01=0x018e, f02=»LEN+1 INCREMENT RECORD POINTER & P CW A8,PLDADR+STKEND END OF BUFFER & P RF(NE) COR:10 NO! P P CALL READC READ SECTOR j $ PCOR:10 LDR A4,A8 START OF RECORD P RTN A14 P XIF P IFT CFTEST+CASS=2 PCON:40 EQU * " P CF A14,RDBL
0x18b6b4…18b848 Dummy {f00=0x0076, f01=0x018e, f02=» P RTN A14 P XIF P IFT CFTEST=1 PMEMOFL EQU * 6 * P LDKL A1,LMP3 INDICATE MEMORY OVERFLOW J P CALL ERROR x P EJECT PREADC EQU * P CF A14,RDSEC READ SECTOR P LDR A8,A9 " P LDR A4,A8 GET START OF BUFFER P
0x18b848…18b9dc Dummy {f00=0x0076, f01=0x0190, f02=» ~ & P ADK A4,1 INCREMENT BUFFER POINTER " P LCR A5,A4 GET NEXT CHARACTER 2 P CCK A5,';;' END OF RECORD? X P ABL(NE) CONERR NO! | P RTN A14 P EJECT PNNL EQU * * P LDK A3,3 NO OF DIGITS IN LINE NUMBER & P CF A14,NUMB LOOK
0x18b9dc…18bb70 Dummy {f00=0x0076, f01=0x0190, f02=» GET NEXT CHARACTER P CCK A5,'LL' LINE L? P RF(E) NN:40 YES! 8 P CCK A5,'RR' LINE R? R P RF(E) NN:40 YES! n P CCK A5,'AA' LINE A? P RF(E) NN:40 YES! P CCK A5,'SS' LINE S? P RF(E) NN:40 YES! P CCK A5,'PP' LINE P?
0x18bb70…18bd04 Dummy {f00=0x0076, f01=0x018e, f02=» RF CONERR PNN:40 EQU * & P ADK A4,1 INCREMENT BUFFER POINTER & P RF NN:50 P P* b PNN EQU * l $ P LDK A3,2 NO OF DIGITS IN NUMBER | & P CF A14,NUMB LOOK IF LEGAL DIGITS $ P LDR A1,A1 SET RETURN CONDITION " P RF(Z) CONERR '00'
0x18bd04…18be98 Dummy {f00=0x0076, f01=0x0190, f02=» & P CF A14,NUMB LOOK IF LEGAL DIGITS $ P ST A5,NDEVCL+STKEND SAVE NUMBER . " PNN:50 LCR A5,A4 GET CHARACTER V P CCK A5,';;' END OF RECORD? | P RF(NE) CONERR NO! P RTN A14 P EJECT PAA EQU * P LDK A3,2 PAA:10 EQU *
0x18be98…18c02c Dummy {f00=0x0076, f01=0x0190, f02=»OR TASK ID =X: P* 0 P CCK A5,/5A5A ALPHA-NUMERIC CHARACTER > 39? P** T P RF(NG) AA:20 NO! ^ 0 P CCK A5,/4141 ALPHA-NUMERIC CHARACTER < 41? x P RF(L) CONERR 0 P CCK A5,/5A5A ALPHA-NUMERIC CHARACTER > 5A? P RF(G) CONERR
0x18c02c…18c1c0 Dummy {f00=0x0076, f01=0x0190, f02=» r P CCK A5,';;' END OF RECORD? P RF(NE) CONERR NO! , P RTN A14 F P EJECT V PTID EQU * d " P LDKL A2,SEQ1 SELECT SEQUENCE v & P LDK A3,4 GET NUMBER OF CHARACTERS P RTN A14 PTCL EQU * " P LDKL A2,SEQ2 SELECT SEQUENCE
0x18c1c0…18c354 (1, 184) Dummy {f00=0x0076, f01=0x0190, f02=»MBER OF CHARACTERS P RTN A14 P EJECT * PTDCT EQU * 8 " P LDKL A2,SEQ4 SELECT SEQUENCE J & P LDK A3,5 GET NUMBER OF CHARACTERS p P RTN A14 PLC EQU * " P LDKL A2,SEQ5 SELECT SEQUENCE & P LDK A3,3 GET NUMBER OF CHARACTERS
0x18c354…18c4e8 Dummy {f00=0x0076, f01=0x0190, f02=»CT PTEST EQU * P LCR A5,A4 GET CHARACTER P CCR A5,A2 < P RF(NE) CONERR N & P ADK A4,1 INCREMENT BUFFER POINTER d ( P ADK A2,1 INCREMENT SEQUENCE POINTER . P SUK A3,1 MORE CHARACTERS IN THE SEQUENCE? P RB(NZ) TEST YES! P R
0x18c4e8…18c67c Dummy {f00=0x0076, f01=0x0190, f02=»5,/F6 N0! PSUK:10 SUK A5,1 0 P ST A5,NDEVCL+STKEND STORE NUMBER OF CLASSES * P RTN A14 ^ P EJECT n PNUMB EQU * | * P LDK A1,0 RESET NO OF NON ZERO DIGITS PNUMB00 EQU * " P LCR A5,A4 GET DIGIT IN NUMBER & P ADK A4,1 INCREMEN
0x18c67c…18c810 Dummy {f00=0x0076, f01=0x0190, f02=»<0? p P RF(L) CONERR YES! & P RF(Z) NUMB10 NUMERIC CHARACTER =0 & P* P . P ADK A1,1 INCREMENT NO OF NON ZERO DIGITS Z PNUMB10 EQU * & P SUK A3,1 DECREMENT DIGIT COUNTER & P RF(Z) NUMB20 ALL DIGITS PROCESSED P* , P SLL A5,8
0x18c810…18c9a4 Dummy {f00=0x0076, f01=0x0190, f02=» P* P* 6 P************************************************** 6 P* * V 6 P* SEQUENCES * 6 P* * 6 P****
0x18c9a4…18cb38 Dummy {f00=0x0076, f01=0x0190, f02=» DATA 'D=' PSEQ2 EQU * TCL= P DATA 'TC' * P DATA 'L=' < PSEQ3 EQU * LEV= N P DATA 'LE' f P DATA 'V=' x PSEQ4 EQU * TDC=T P DATA 'TD' P DATA 'C=' P DATA 'T0' PSEQ5 EQU * LC= P DATA 'LC' P DATA '=
0x18cb38…18cccc Dummy {f00=0x0076, f01=0x0190, f02=»* PROGRAM LOAD DEVICE = CASSETTE P* * PCON:30 EQU * 4 P LDR A1,A9 START OF BUFFER H " P ADKL A1,BUFLEN END OF BUFFER j , P ST A1,PLDADR+STKEND SAVE END OF BUFFER P ST A1,EINPBF+STKEND SAVE 4 P ST A1,CONSTA+STKCOM START OF CONFIGUR
0x18cccc…18ce60 Dummy {f00=0x0076, f01=0x0190, f02=»! . P CF A14,CASSIN INIT CONFIGURATION CASSETTE PCON:40 EQU * < " P CF A14,RDBLK READ NEXT BLOCK P P LDR A1,A1 TAPEMARK? v P RF(NZ) CONEX YES! PCON:50 EQU * P* 2 P* COMPUTE NUMBER OF CHARACTERS IN THIS BLOCK P* 6
0x18ce60…18cff4 (1, 185) Dummy {f00=0x0076, f01=0x0190, f02=» GET START OF BUFFER PCON:60 EQU * & P LCR A5,A4 GET CHARACTER IN BUFFER 0 P CCK A5,';;' CHECK IF SPACE Z & P RF(E) CON:70 NO MOORE CHARACTERS ~ PCON:65 EQU * P CWK A3,CBLEN END OF BUFFER? P RF(E) CON:75 YES! * P CW A1,ESYSTA+
0x18cff4…18d188 Dummy {f00=0x0076, f01=0x0190, f02=»COUNTER r & P ADK A4,1 INCREMENT BUFFER POINTER P RB CON:60 : PCON:70 EQU * L " P LC A5,1,A4 GET NEXT CHARACTER ` " P CCK A5,';;' TWO SEMI-COLONS? P RF(NE) CON:75 NO! * P CWK A3,NCHTID CHECK IF END OF RECORD 4 P RB(E) CON:65 NO: SE
0x18d188…18d31c Dummy {f00=0x0076, f01=0x0190, f02=»FFER v P CALL MOVE P RB CON:40 PCONEX EQU * 0 P* D > P* UNLOAD CASSETTE IF NO APPLICATION DATA ON SAME CASSETTE N P* " P CF A14,RDBLK READ NEXT BLOCK P LDR A1,A1 APPLICATION DATA? P RF(NZ) CON:80 NO! P LDK A1,/D
0x18d31c…18d4b0 Dummy {f00=0x0076, f01=0x0190, f02=»1,/F " P CF A14,CHCRIO UNLOAD CASSETTE PCON:90 EQU * 2 P ABL CONMOV F P XIF Z PCONERR EQU * f P LDKL A1,LMP4 z P CALL ERROR P IFF CFTEST=1 PMEMOFL EQU * * P LDKL A1,LMP3 INDICATE MEMORY OVERFLOW P CALL ERROR
0x18d4b0…18d644 Dummy {f00=0x0076, f01=0x0190, f02=»KEND GET LOAD DEVICE FOR CONF. DATA * P RF(Z) CONRA0 SAME AS PGM LOAD DEVICE , P* Z 0 P CF A14,CONFLD INITIATE CONF. DATA LOAD DEV. d PCONRA0 EQU * * P LD A11,CONDAD+STKEND GET START SECTOR 2 P LD A12,CONDAD+2+STKEND MOST SIGNIFICANT PART
0x18d644…18d7d8 Dummy {f00=0x0076, f01=0x0190, f02=»DR A1,A9 GET START OF BUFFER & P AD A1,SAVCON START OF SAVE BUFFER $ P ST A1,EINPBF+STKEND SAVE =2 N P ST A1,CONSTA+STKCOM r $ P LDKL A10,0 RESET RECORD COUNTER PCOR:10 EQU * P* 0 P* READ ONE SECTOR FROM RANDOM ACCESS DEVICE P
0x18d7d8…18d96c Dummy {f00=0x0076, f01=0x0190, f02=»RACTERS IN THIS RECORD x P* 6 P LD A1,EINPBF+STKEND GET CURRENT POINTER IN BUFFER ( P LDR A2,A1 SAVE b & P LDK A3,0 RESET CHARACTER COUNTER z P LDR A4,A8 START OF RECORD P* P* LOOK IF WE HAVE AN P* APPLICATION CONTROL BLO
0x18d96c…18db00 Dummy {f00=0x0076, f01=0x0190, f02=» P* ( P CWK A5,'A;' AND LOOK IF IT IS 'A;' P RF(NE) COR:30 NO! : P* T * P LDKL A5,/FF3B YES, SUBSTITUTE A; WITH ^ P STR A5,A4 'HEX FF' AND ';' 8 P LD A5,CURAPL+STKEND GET CURRENT APPL. CONTR. BLOCK P ADK A1,1 SKIP BLOCK MARKER
0x18db00…18dc94 (1, 186) Dummy {f00=0x0077, f01=0x0190, f02=»MMC,A5 SAVE IN APPL. CONTROL BLOCK P LDR A1,A8 START OF RECORD * 0 P ADK A3,1 INCREMENT NO OF CHARACTERS TO MOVE L P CALL MOVE P ADKL A10,2 SKIP NEXT RECORD P* . P ADKL A8,RECLEN+1 INCREMENT RECORD POINTER ( P CW A8,PLDADR+STKEND E
0x18dc94…18de28 Dummy {f00=0x0077, f01=0x0190, f02=» n P RF COR:48 P* PCOR:25 EQU * $ : P LD A5,EINPBF+STKEND CURRENT POSITION IN CONF. DATA =6 8 8 P SU A5,CONSTA+STKCOM CALCULATE RELATIVE POSITION =6 v P ST A5,DCBLK+STKCOM SAVE =6 PCOR:30 EQU * P LCR A5,A4 GET CHARACTER
0x18de28…18dfbc Dummy {f00=0x0077, f01=0x0190, f02=» COR:40 YES! * P CW A1,ESYSTA+STKEND MEMORY OVERFLOW? P RB(E) MEMOFL YES! B & P ADK A1,1 INCREMENT BUFFER POINTER * P ADK A3,1 INCREMENT CHARACTER COUNTER & P ADK A4,1 INCREMENT RECORD POINTER P RB COR:30 LOOP PCOR:40 EQU * "
0x18dfbc…18e150 Dummy {f00=0x0077, f01=0x0190, f02=»ORD n 4 P RB(E) COR:35 NO: SEMICOLON CHARACTER IN RECORD PCOR:45 EQU * D 2 P ST A1,EINPBF+STKEND SAVE CURRENT DESTINATION X P LDR A1,A8 START OF RECORD P CALL MOVE ( P ADKL A10,1 INCREMENT RECORD COUNTER & P CW A10,LSTREC+STKEND LAST
0x18e150…18e2e4 Dummy {f00=0x0077, f01=0x018e, f02=» OF BUFFER x P RB(E) COR:10 NEXT SECTOR P RB COR:20 NEXT RECORD 4 PCOR:50 EQU * R " P LD A1,SCTOPT GET OPTION WORD f P ANK A1,8 SWB:S? P RF(Z) COR:55 NO P LDK A3,'S' & P SC A3,GET:25+1 MODIFY INSTRUCTION & P SC A3,GET:60+
0x18e2e4…18e478 Dummy {f00=0x0077, f01=0x0190, f02=» P* UNLOCK FLEXIBLE DISC P* $ PCOR:55 EQU * . 4 P LD A1,CONDEV+STKEND GET CONF. DATA LOAD DEVICE B , P RF(Z) COR:58 SAME AS APPL. LOAD DEVICE z P* P LDR A2,A1 P ANK A2,/F P SUK A2,9 $ P RF(NZ) COR:58 NOT FLEXIBLE DI
0x18e478…18e60c Dummy {f00=0x0077, f01=0x0190, f02=»QU * * P LD A1,SCTIPL GET PROGRAM LOAD DEVICE P SUK A1,/F8 CHECK TYPE : $ P RF(N) COR:60 NOT FLEXIBLE DISC X P* " P SUK A1,/FC-/F8 FLEXIBLE DISC? P RF(NN) COR:60 NO! P* P XIF P IFT CFTFLD+FLDISC=2 " P LD A2,SCTOP
0x18e60c…18e7a0 Dummy {f00=0x0077, f01=0x0190, f02=»F A14,UNLOCK UNLOCK FLEXIBLE DISC P XIF * P IFF CFTEST=1 6 P IFF CFTEST=1 L PCOR:60 EQU * b P EJECT v PCONMOV EQU * P* 4 P* MOVE CONFIGURATION DATA TO END OF SYSTEM AREA P* & P CIO A1,0,SOP INHIBIT SOP SWITCHES
0x18e7a0…18e934 (1, 187) Dummy {f00=0x0077, f01=0x0190, f02=»ION DATA ` 0 P LD A2,ESYSTA+STKEND GET END OF SYSTEM AREA * P CM -2,A2 MAKE SURE CONFIGURATION FILE D " P SUK A2,1 IS FOLLOWED BY X'00' r , P SUR A3,A1 LENGTH OF CONFIGURATION DATA 2 P ST A3,CONLEN+STKCOM SAVE LENGTH OF CONF. DATA P SUR A2,A3
0x18e934…18eac8 Dummy {f00=0x0077, f01=0x0190, f02=» DATA ` 2 P LD A1,CONLEN+STKCOM GET LENGTH OF CONF. DATA 0 P ADK A1,2 INCLUDE TRAILING ZEROES IN LENGTH D P ANKL A1,/FFFE AND MAKE EVEN x P ST A1,CONLEN+STKCOM & P LDR A1,A9 GET START OF FREE AREA P LDR A12,A2 END OF FREE AREA $ P S
0x18eac8…18ec5c Dummy {f00=0x0077, f01=0x0190, f02=» RF(Z) CMOV20 NO MXSTAB PRESENT =1 P* =1 * * P ADR A2,A12 RELOCATE MXSTAB ADDRESS =1 : , P ST A2,SCTMXS AND SAVE AS NEW ADDRESS =1 h PCMOV20 EQU * =1 , P LD A2,CONSTA+STKCOM GET START OF CONFF P* < P* MOVE SYSLDA+SYSLDM+DWT-PR
0x18ec5c…18edf0 Dummy {f00=0x0077, f01=0x0190, f02=»1 P STR A4,A2 P CWR A1,A13 P RB(NE) MOPRO 0 ( P ABR A2 CONTINUE EXECUTION IN SYSLDM F P XIF r P EJECT ~ L P************************************************************************ L P* SUBROUTINES USED IN THE APPLICATION AND C
0x18edf0…18ef84 Dummy {f00=0x0077, f01=0x0190, f02=»*********** | $ P* SOPIN - READ SOP SWITCHES * $ P* ========================= * < $ P* * d $ P* ENTRY: * $ P* * $ P* EXIT: A1 - SOP INPUT * $ P*
0x18ef84…18f118 Dummy {f00=0x0077, f01=0x0190, f02=»A1 * | $ P* * $ P* SUBROUTINES: * < $ P* * d $ P******************************* PSOPIN EQU * P CIO A1,1,SOP P INR A1,0,SOP P RB(NA) *-2 P
0x18f118…18f2ac Dummy {f00=0x0077, f01=0x0190, f02=»E LOAD UNIT * ~ ( P* =========================== * ( P* * F ( P* USED FOR CONFIGURATION OF * r ( P* PROGRAM LOAD DEVICE AND * ( P* CONFIGURATION DATA LOAD * ( P* DEVICE (IF DIFFE
0x18f2ac…18f440 Dummy {f00=0x0077, f01=0x0190, f02=»DE * z ( P* * ( P*********************************** B P n P v PLODDEV EQU * ~ P LDKL A3,BUFLEN * P ST A3,SAVCON INITIALIZE BUFFER LENGTH P LDKL A2,-1 $ P ST A2,CYLNBR SET SEEK CONDI
0x18f440…18f5d4 (1, 188) Dummy {f00=0x0077, f01=0x018e, f02=»VICE r ( P SRL A2,4 BIT15 INDICATE UNIT 1 OR 2 * P LC A3,IPLTYP+1+STKEND GET DEVICE TYPE 8 P ANK A3,/FF f P SUK A3,3 z P RF(N) DISC:0 DISC P RF(Z) MFD:0 MINI FIXED DISC P SUK A3,3 =9 P RF(N) CDC:0 80M CDC DISC P RF FL
0x18f5d4…18f768 Dummy {f00=0x0077, f01=0x018e, f02=» > P LD A1,APLTAB+STKCOM GET CURRENT APPLICATION CONTR. BLOCK * P CM APLADA+2,A1 CLEAR APPLICATION DISC J ( P CM APLADA+4,A1 FILE ADDRESS ENTRIES x * P LDKL A1,RDBLK GET SUBROUTINE ADDRESS P LDR A10,A1 0 P ST A1,READ STORE IN PROGRAM LOAD
0x18f768…18f8fc Dummy {f00=0x0077, f01=0x0190, f02=» z P* , P CF A14,CASSIN INIT APPLICATION CASSETTE P RB CASS:2 B P XIF T P IFF CASS=1 ` P LDKL A1,LMP9 t & P CALL ERROR ILLEGAL MONITOR OPTION P XIF P EJECT PFLEX:0 EQU * P IFT FLDISC=1 P* * P* PRO
0x18f8fc…18fa90 Dummy {f00=0x0077, f01=0x0190, f02=» ( P ST A2,FILCOD+STKEND SAVE FILE CODE P* 4 P* INIT FLEXIBLE DISC > P* P CF A14,FDINIT f P RF FINISH | P* P XIF P IFF FLDISC=1 P LDKL A1,LMP9 & P CALL ERROR ILLEGAL MONITOR OPTION P XIF P E
0x18fa90…18fc24 Dummy {f00=0x0077, f01=0x0190, f02=»L:/F4-DRIVE 1,/F5-DRIVE 2 P* " P ORK A2,/F4 , ( P ST A2,FILCOD+STKEND SAVE FILE CODE @ P* l P* INIT MINI FIXED DISC v P* P CF A14,MDINIT P RF FINISH RETURN P* P XIF P IFF MFDISC=1 P LDKL A1,LMP9
0x18fc24…18fdb8 Dummy {f00=0x0077, f01=0x0190, f02=» LOAD DEVICE = DISC P* P* & : P* MODIFY SCTIPL: /F1 - CARTRIDGE DISC /F0 - FIX DISC 0 P* n & P LC A2,FCTAB,A2 LOAD FILE CODE =5 x ( P ST A2,FILCOD+STKEND SAVE FILE CODE P* P* INITIALIZE DISC COMMANDS P* P C
0x18fdb8…18ff4c Dummy {f00=0x0077, f01=0x0190, f02=»A1#0 MEANS RANDOM ACCESS DEVICE PFINIS EQU * ( * P LD A2,FILCOD+STKEND RESTORE FILE CODE < P RTN A14 j P EJECT z PCDC:0 EQU * P IFF CDDISC+CDDI16=0 P* 0 P* PROGRAM LOAD DEVICE = 16M OR 80M CDC DISC P* P*
0x18ff4c…1900e0 Dummy {f00=0x0077, f01=0x0190, f02=» PCDC:1 EQU * =9 $ P ANK A2,7 MASK BITS NOT USED =9 P ORK A2,/FC FILE CODE D ( P ST A2,FILCOD+STKEND SAVE FILE CODE b P* P* INITIALISE DISC COMMANDS P* P CF A14,CDINIT INIT DEVICE P RB FINISH RETURN P XIF
0x1900e0…190274 (1, 189) Dummy {f00=0x0077, f01=0x0190, f02=»********************************************* < P* * 6 < P* CONFLD - SELECT LOAD UNIT FOR CONF. DATA * v < P* ======================================== * < P*
0x190274…190408 Dummy {f00=0x0077, f01=0x0190, f02=» * v < P******************************************************* & P f P n PCONFLD EQU * v P LDKL A2,-1 $ P ST A2,CYLNBR SET SEEK CONDITION " P LDR A2,A1 SAVE DEVICE ADDRESS " P ANK A2,/F ISOLATE LAST DIGI
0x190408…19059c Dummy {f00=0x0077, f01=0x0190, f02=» RB(Z) DISC:0 DISC DEVICE P* " $ P RB FLEX:0 FLEXIBLE DISC DEVICE , P EJECT T P IFT CASS=1 b < P******************************************************* v < P* CASSIN - CASSETTE INITIATING ROUTINE * < P* =========
0x19059c…190730 Dummy {f00=0x0077, f01=0x0190, f02=»-LOADING PART- * v < P* * & < P* ENTRY: * f < P* * < P* EXIT:
0x190730…1908c4 Dummy {f00=0x0077, f01=0x0190, f02=» * f < P* * < P* SUBROUTINES: SOPIN,CHCRIO * V < P* * < P**************************************************
0x1908c4…190a58 Dummy {f00=0x0077, f01=0x0190, f02=» b P OTR A3,0,SOP PCAS:10 EQU * P CF A14,SOPIN READ SOP 2 $ P ANKL A1,/0300 ALLOWED SWITCHES? P P RB(Z) CAS:10 NO! x & P LDKL A3,LMP1 SWITCH ON LOAD LAMP P OTR A3,0,SOP P SRL A1,8 RIGHT ALIGN P ANK A1,1 SELECT UNIT
0x190a58…190bec Dummy {f00=0x0077, f01=0x0190, f02=»NZ) CAS:10 NO! P LDK A1,SBOT , P CF A14,CHCRIO SEARCH BEGINNING OF TAPE , P LDK A1,STMF * P CF A14,CHCRIO SEARCH TAPEMARK FORWARD p P RTN A14 P EJECT 2 P********************************************* 2 P* CHCRIO - CASSETTE I
0x190bec…190d80 Dummy {f00=0x0077, f01=0x0190, f02=» 2 P* REFERENCED IN: CASSIN,SYSLOD * 2 P* * : 2 P* ENTRY: A1 - I/O INSTRUCTION COMMAND * p 2 P* * 2 P* EXIT:
0x190d80…190f14 (1, 190) Dummy {f00=0x0078, f01=0x0190, f02=» * ~ 2 P* SUBROUTINES: * $ 2 P* * Z 2 P********************************************* PCHCRIO EQU * P CIO A1,1,CHCR P SST A3,CHCR P RB(
0x190f14…1910a8 Dummy {f00=0x0078, f01=0x0190, f02=» * r 6 P* RDBLK - READ ONE CASSETTE BLOCK * 6 P* =============================== * V 6 P* * 6 P* REFERENCED IN: SYSLOD * 6 P*
0x1910a8…19123c Dummy {f00=0x0078, f01=0x018e, f02=» * x 6 P* EXIT: A2 - NUMBER OF CHARACTERS IN BLOCK * " 6 P* * : P* WORK REGISTERS: A1,A2,A3,A4,A5 * 6 P* *
0x19123c…1913d0 Dummy {f00=0x0078, f01=0x0190, f02=» P LDK A5,0 PRDB:10 EQU * P LDR A3,A9 START OF BUFFER . & P LDK A2,0 RESET CHARACTER COUNTER P $ P LDR A4,A3 SAVE START OF BUFFER z P ADKL A3,CBLEN END OF BUFFER P LDK A1,/A P CIO A1,1,CHCR READ BLOCK P RF(NA) RDERR3
0x1913d0…191564 Dummy {f00=0x0078, f01=0x0190, f02=» A1,A4 STORE CHARACTER * P ADK A2,1 INCREMENT CHARACTER COUNTER & P ADK A4,1 INCREMENT BUFFER POINTER L PRDB:30 EQU * v P SST A1,CHCR P RB(NA) RDB:20 P ANKL A1,/FCFF CHECK STATUS P LDR A4,A1 SAVE STATUS P RF(Z) RDBEX OK
0x191564…1916f8 Dummy {f00=0x0078, f01=0x0190, f02=»: MAKE ANOTHER ATTEMPT TO READ v > P* THE SAME BLOCK IF NOT 3 ATTEMPTS ALREADY HAS BEEN MADE & P* h P ADK A5,1 NEXT ATTEMPT r P CWK A5,3 THIRD ATTEMPT? P RF(E) RDERR3 YES - GIVE UP! P LDK A1,/E REVERSE ONE BLOCK P CIO A1,1,CHCR E
0x1916f8…19188c Dummy {f00=0x0078, f01=0x0190, f02=» PRDBEX EQU * P RTN A14 P XIF ( P IFT DISC=1 4 P EJECT H ( P*********************************** V ( P* * ( P* DUINIT - INITIALIZE DISC UNIT * ( P* ============================= * ( P*
0x19188c…191a20 Dummy {f00=0x0078, f01=0x0190, f02=»RY: A1 - DEVICE ADDRESS * ( P* * & ( P* EXIT: * R ( P* * ~ * P* WORK REGISTERS: A2,A3 * ( P* * ( P* S
0x191a20…191bb4 (1, 191) Dummy {f00=0x0078, f01=0x0190, f02=»DUINIT EQU * * P LDKL A2,RDSEC2 GET SUBROUTINE ADDRESS P LDR A5,A1 SAVE FILE CODE B P EJECT d P* r $ P* INIT DISC COMMANDS VERSION A2 | P* , P ORKL A1,CIO+8 CONF. CIO A1,1,XX INSTR. P ST A1,SEEK20 ( P ORKL A1,/800 FORM S
0x191bb4…191d48 Dummy {f00=0x0078, f01=0x0190, f02=» A2,XX INSTR z P ST A1,READ22 * P ST A2,READ INIT SUBROUTINE ADDRESSES * P ST A2,READS X P LDK A2,4 l $ P XRS A2,CRCCHK DISCARD CRC CHECK ~ $ P CF A14,GETVLB GET VOLUME LABEL P LDK A2,4 P ORS A2,CRCCHK SET CRC CHECK P LC
0x191d48…191edc Dummy {f00=0x0078, f01=0x0190, f02=»A2,RDSEC3 GET SUBROUTINE ADDRESS P* ( $ P* INIT DISC COMMANDS VERSION A3 2 P* Z , P LDKL A3,DKBA3 BUFFER LENGTH VERSION A3 d * P ST A3,SAVCON BUFFER LENGTH VERSION A3 P ORKL A1,CIO+8 , P XRKL A1,/500 CONFIG. CIO A4,1,XX INSTR. P
0x191edc…192070 Dummy {f00=0x0078, f01=0x0190, f02=»T A1,READ30 ( P ORKL A1,/800 FORM SST A2,XX INSTR. P ST A1,READ31 @ P* V P* INIT SUBROUTINE ADDRESSES ` P* " PDUI:40 ST A2,READ READ PROGRAM ( P ST A2,READS READ CONFIGURATION DATA PDUI:50 EQU * P RTN A14 P EJE
0x192070…192204 Dummy {f00=0x0078, f01=0x0190, f02=»D ONE SECTOR FROM DISC * 4 P* ================================= * * 4 P* * b 4 P* REFERENCED IN: SYSLOD * 4 P* * "
0x192204…192398 Dummy {f00=0x0078, f01=0x0190, f02=» * h 4 P* * 4 P* EXIT: * H 4 P* * ( P* WORK REGISTERS: A1,A2,A3,A4,A7 4 P*
0x192398…19252c Dummy {f00=0x0078, f01=0x0190, f02=»******************************************* P* 4 P EJECT > P* L " P* READ DISC SECTOR VERSION A2 V P* | PRDSEC2 EQU * P LDK A2,0 * P LDR A1,A11 GET LOGICAL SECTOR NUMBER PDIV200 EQU * P ADR A2,A1 P SRL A1,
0x19252c…1926c0 Dummy {f00=0x0078, f01=0x018e, f02=»1,A11 P ADK A1,31 * P RF(P) DIV210 NO CORRECTION OF RESULT P ADK A2,1 N PDIV210 EQU * ` . P LDR A2,A2 A2:=CYL NBR = LOG SEC NBR / 31 t P RF(Z) DIV220 CYLINDER 0 P ADK A2,1 PDIV220 EQU * 4 P ADR A2,A11 A2:=PHYS. SEC NB
0x1926c0…192854 (1, 192) Dummy {f00=0x0078, f01=0x0190, f02=» P ST A1,CYLNBR P SLL A1,3 P ORK A1,2 SET BIT 14 , P EJECT H P* V P* SEEK CYLINDER ` P* x PSEEK20 CIO A1,1,0 P RB(NA) SEEK20 P* PSEEK21 SST A1,0 P RB(NA) SEEK21 P* P* INTERLACING
0x192854…1929e8 Dummy {f00=0x0078, f01=0x0190, f02=»YLNBR GET CYLINDER NUMBER P ANK A1,1 " P RF(Z) INT210 EVEN CYLINDER 4 P ADK A2,8 X PINT210 EQU * j P ANK A2,/1F ~ , P SLL A2,2 PHYSICAL SECTOR AND ORDER CODE P ST A2,SECNBR P EJECT P* P* READ SECTOR P*
0x1929e8…192b7c Dummy {f00=0x0078, f01=0x0190, f02=»ER A1,/11 WRITE BUFFER ADDRESS " PREAD21 CIO A2,1,0 READ SECTOR & & P RB(NA) READ21 LOOP UNTIL ACCEPTED L PREAD22 SST A2,0 STATUS v & P RB(NA) READ22 LOOP UNTIL ACCEPTED PCRCCHK EQU * P ANK A2,/1F STATUS P RF(NZ) DUERR READING ERROR
0x192b7c…192d10 Dummy {f00=0x0078, f01=0x0190, f02=» PRDSEC3 EQU * P LDK A2,0 * P LDR A1,A11 GET LOGICAL SECTOR NUMBER * P LDKL A7,/1000 X P LDKL A4,/3000 n PDIV300 EQU * P SUR A1,A4 P RF(N) DIV310 P ADR A2,A7 P RB DIV300 PDIV310 EQU * P ADR A1,A4 ADJUS
0x192d10…192ea4 Dummy {f00=0x0078, f01=0x0190, f02=» 6 P RF(NP) CASE10 ,XXXX , , OR , XX,XX , P ADK A2,1 , , XXXX, B PCASE10 EQU * d P LDR A4,A2 x P SRL A4,5 P CW A4,CYLNBR P RF(E) INT300 , P ST A4,CYLNBR STORE NEW CYLINDER NUMBER P SLL A4,3
0x192ea4…193038 Dummy {f00=0x0078, f01=0x0190, f02=»* PSEEK31 SST A4,0 GET STATUS P RB(NA) SEEK31 , P* B P* INTERLACING L P* b PINT300 EQU * l P LDR A3,A2 P ADR A2,A2 $ P ADR A2,A3 INTERLACING FACTOR 3 P ANK A2,/1F & P LD A4,CYLNBR GET CYLINDER NUMBER
0x193038…1931cc Dummy {f00=0x0078, f01=0x0190, f02=»2,/1F & P SLL A2,2 INTERLACED SECTOR NUMBER . P ST A2,SECNBR STORE PHYSICAL SECTOR NUMBER 8 P EJECT j P* x P* READ SECTOR P* P LDR A7,A9 BUFFER ADDRESS * PREAD34 LDKL A4,MXCCD3 NUMBER OF WORDS , PWERIO3 WER A4,/10 WRIT
0x1931cc…193360 Dummy {f00=0x0078, f01=0x0190, f02=»TIL ACCEPTED z P* PREAD31 SST A2,0 GET STATUS & P RB(NA) READ31 LOOP UNTIL ACCEPTED @ P ANK A2,/1F STATUS j P RF(NZ) DUERR READING ERROR P LDR A2,A9 BUFFER ADDRESS P LDR A1,A1 " P RF(N) RETURN ,XXXX , , " P RF(P)
0x193360…1934f4 (1, 193) Dummy {f00=0x0078, f01=0x0190, f02=» , v P LDR* A1,A2 P STR A1,A7 P ADK A2,2 0 P ADK A7,2 B P SUK A4,1 T " P RB(NZ) READ32 CONTINUE MOVING f P LD A1,SAVMEM P RF(P) RETURN ( P LD A2,SECNBR PHYSICAL SECTOR NUMBER " P ADK A2,/C NEW SECTOR TO READ
0x1934f4…193688 Dummy {f00=0x0078, f01=0x0190, f02=»8 NUMBER OF WORDS TO MOVE P RB READ32 " . PRETURN ADKL A11,1 INCREMENT SECTOR NUMBER 4 P RTN A14 f P v PDUERR EQU * ~ P LDKL A1,LMP2 P CALL ERROR P XIF P IFT MFDISC=1 P EJECT < P****************************
0x193688…19381c Dummy {f00=0x0078, f01=0x0190, f02=»SC UNIT * l < P* ======================================= * < P* * < P* REFERENCED IN: SYSLOD,GETFIL * < P*
0x19381c…1939b0 Dummy {f00=0x0078, f01=0x0190, f02=» * < P* EXIT: * < P* * L < P* WORK REGISTERS: * < P* *
0x1939b0…193b44 Dummy {f00=0x0078, f01=0x0190, f02=»**************************************************** PMDINIT EQU * < P* P $ P* INIT MINI FIXED DISC COMMANDS Z P* PMDI:00 EQU * , P ORKL A1,CIO CONFIG. CIO A1,1,XX INSTR. P ST A1,READM2 ( P ORKL A1,/800 FORM SST A1,XX INSTR
0x193b44…193cd8 Dummy {f00=0x0078, f01=0x0190, f02=» l P ST A1,SEEKM2 P EJECT P* , * P LDKL A2,MRDSEC GET SUBROUTINE ADDRESS 6 P ST A2,READ d P ST A2,READS x P RTN A14 P EJECT : P****************************************************** : P*
0x193cd8…193e6c Dummy {f00=0x0078, f01=0x0190, f02=»==== * d : P* * : P* REFERENCED IN: SYSLOD * P : P* * : P* ENTRY: A9 = BUFFER ADDRESS * :
0x193e6c…194000 Dummy {f00=0x0078, f01=0x0190, f02=» * : P* * 4 : P* WORK REGISTERS: * r : P* * : P* SUBROUTINES:
0x194000…194194 (1, 194) Dummy {f00=0x0079, f01=0x0190, f02=»*************** j PMRDSEC EQU * " P LDK A1,0 PREPARE FOR DIVISION , * P LDR A2,A11 GET LOGICAL SECTOR NUMBER R P DVK 104 DIVIDE BY 104 P SLL A2,2 P ORK A2,3 SET BIT 14 AND 15 P* " P* A1=SECTOR NUMBER ON CYLINDER P* A2
0x194194…194328 Dummy {f00=0x0079, f01=0x0190, f02=» ( P ST A2,CYLNBR STORE CYLINDER NUMBER P EJECT 0 P* > P* SEEK CYLINDER H P* ` " PSEEKM1 CIO A2,1,0 SEEK COMMAND j & P RB(NA) SEEKM1 LOOP UNTIL ACCEPTED P* PSEEKM2 SST A2,0 GET STATUS & P RB(NA) SEEKM2 WAIT UNTIL ACCEPTED
0x194328…1944bc Dummy {f00=0x0079, f01=0x0190, f02=»TOR 52-103 PINTM20 EQU * P LDR A2,A1 & " P SLL A2,2 A2:=4*SECTOR NUMBER 8 " P LDK A1,0 PREPARE FOR DIVISION ^ P DVK 52 , P ADR A1,A2 A1:=INTERLACED SECTOR NUMBER P* " P* A1:=INTERLACED SECTOR NUMBER P* & P LD A2,CYL
0x1944bc…194650 Dummy {f00=0x0079, f01=0x0190, f02=»INTM30 P ADK A1,52 PINTM30 EQU * P SLL A1,2 4 6 P LD A2,SECNBR GET SECTOR NUMBER BEFORE INTERLACING F P CWK A2,52 P RF(L) INTM40 HEAD NUMBER 0 P ORKL A1,/4000 HEAD NUMBER 1 PINTM40 EQU * P* P* READ SECTOR
0x194650…1947e4 Dummy {f00=0x0079, f01=0x0190, f02=»ITE NUMBER OF WORDS ~ " P WER A7,9 WRITE BUFFER ADDRESS P* B " PREADM2 CIO A1,1,0 READ SECTOR L & P RB(NA) READM2 LOOP UNTIL ACCEPTED r P* PREADM3 SST A1,0 GET STATUS & P RB(NA) READM3 LOOP UNTIL ACCEPTED P ANK A1,/1F STATUS
0x1947e4…194978 Dummy {f00=0x0079, f01=0x0190, f02=»,LMP2 P CALL ERROR P XIF " P IFT FLDISC=1 . P EJECT D 4 P************************************************ R 4 P* * 4 P* FDINIT - INITIALIZE FLEXIBLE DISC * 4 P* ===========
0x194978…194b0c Dummy {f00=0x0079, f01=0x0190, f02=» * j 4 P* * 4 P* ENTRY: A1 - DEVICE ADDRESS * J 4 P* * 4 P* EXIT: * 4 P*
0x194b0c…194ca0 Dummy {f00=0x0079, f01=0x0190, f02=» * b 4 P* SUBROUTINES: * 4 P* * B 4 P************************************************ z PFDINIT EQU * P ANK A1,/10 0 P ORKL A1,CIO+9 CONFIG. CIO+9 A1,1,XX INSTR.
0x194ca0…194e34 (1, 195) Dummy {f00=0x0079, f01=0x0190, f02=»TO ZERO PFDI:05 EQU * P EX SEKSST $ P RB(NA) FDI:05 6 P* L P ANK A1,/10 V ( P RF(NZ) FDI:10 0.25 MEG FLOPPY DRIVE j P* . P LDKL A1,FRD:B1+/5700 RF FRD:40 INSTR. =4 ( P ST A1,FRD:20 MODIFY INR INSTRUCTION P LDKL A1,/
0x194e34…194fc8 Dummy {f00=0x0079, f01=0x0190, f02=»S TO READ ON 1 MEG FLOPPY DRIVE z PFDI:10 EQU * ( P ST A2,READ < P ST A2,READS P $ P CF A14,GETVLB GET VOLUME LABEL d P LD A1,FORDEV,A9 GET FORMAT P ST A1,DEVTYP+STKEND P RTN A14 P EJECT 0 P******************************
0x194fc8…19515c Dummy {f00=0x0079, f01=0x0190, f02=»CK - UNLOCK FLEXIBLE DISC * 0 P* ============================= * * 0 P* * ^ 0 P* ON ENTRY: A1 = DEVICE ADDRESS * 0 P* * 0 P**************
0x19515c…1952f0 Dummy {f00=0x0079, f01=0x0190, f02=» LDKL A1,/C & P EX FRD:10 EXECUTE UNLOCK COMMAND $ P RB(NA) *-4 LOOP UNTIL ACCEPTED > P* f P EX FRD:40 SENSE STATUS p $ P RB(NA) *-4 LOOP UNTIL ACCEPTED P RTN A14 P EJECT @ P**************************************************
0x1952f0…195484 Dummy {f00=0x0079, f01=0x0190, f02=» * ^ @ P* ======================================= * @ P* * V @ P* REFERENCED IN: SYSLOD * @ P*
0x195484…195618 Dummy {f00=0x0079, f01=0x0190, f02=» * f @ P* * @ P* EXIT: * ^ @ P* * @ P* WORK REGISTERS: A1,A2,A3
0x195618…1957ac Dummy {f00=0x0079, f01=0x0190, f02=» * n @ P* * " @ P*********************************************************** f PFRDSEC EQU * " P LDR A2,A11 GET SECTOR NUMBER * P LDKL A4,/340 26 SHIFTED 10 STEPS LE
0x1957ac…195940 Dummy {f00=0x0079, f01=0x0190, f02=»NOTCY0 NOT CYLINDER 0 PSNHEAD EQU * * P SLL A2,1 A2=0-25,PHYSICAL SECTOR NBR 2 P RF DVK26 ` PNOTCY0 EQU * r P ADK A2,13 P EJECT P* P* A2=PHYSICAL SECTOR NUMBER P* PDVK26 EQU * P LDK A1,0 PDVK2
0x195940…195ad4 (1, 196) Dummy {f00=0x0079, f01=0x0190, f02=» EQU * P ADR A2,A4 P SRL A4,5 " P RB(NZ) DVK26A NEXT FIVE BITS 2 P EJECT X P* f P* A2=SECTOR NUMBER p P* A1=CYLINDER NUMBER P* $ P LD A4,DEVTYP+STKEND DEVICE TYPE P ANK A4,1 , P RF(NZ) DBHEAD 1 MEG FLOPPY,DO
0x195ad4…195c68 Dummy {f00=0x0079, f01=0x0190, f02=»CT POSITION r 0 P SLL A2,2 SECTOR NUMBER IN CORRECT POSITION $ P ORR A2,A4 A2=CIO READ REGISTER H 2 P SLL A1,1 CYLINDER NUMBER IN CORRECT POSITION p " P ORK A1,3 A1=CIO SEEK REGISTER 4 P CW A1,CYLNBR COMPARE OLD AN NEW CYLINDER NUMBER P RF(
0x195c68…195dfc Dummy {f00=0x0079, f01=0x0190, f02=» SST A1,FDCU P RB(NA) SEKSST P ANKL A1,/611 * P RF(NZ) FRD:50 SEEK ERROR @ PNOSEEK EQU * b P LDR A1,A2 v P RF FRD:05 P EJECT PFRDS25 EQU * P LDR A1,A11 SECTOR NO P SLL A1,4 8 P ORKL A1,/4000 NUMBER OF SEC
0x195dfc…195f90 Dummy {f00=0x0079, f01=0x0190, f02=» P WER A3,FDIOP+1 SECOND WER P & $ P LDR A2,A3 BUFFER START ADDRESS . $ P AD A2,SAVCON BUFFER END ADDRESS V P* ~ $ PFRD:10 CIO A1,1,FDCU START READ P RB(NA) FRD:10 P* P EJECT CRVOL P* P* PFRD:20 INR A1,
0x195f90…196124 Dummy {f00=0x0079, f01=0x0190, f02=» A1,0,FDCU STOP READ P RB FRD:20 PFRD:40 SST A1,FDCU . P RB(NA) FRD:20 H PFRD:42 EQU *+2 ^ P ANKL A1,/4E15 FATAL ERROR ? t P RF(NZ) FRD:50 YES! PFRD:43 CWR A3,A2 =4 ( P RF(E) FRD:44 PROGRAMMED CHANNEL =4 . P LDKL A1,FRD
0x196124…1962b8 Dummy {f00=0x0079, f01=0x018e, f02=»INSTR. =4 p & P ST A1,FRD:43 UPDATE CWR INSTR. =4 P ABI READ READ AGAIN =4 < PFRD:45 EQU * ( P ADKL A11,1 INCRMENT SECTOR ADDRESS p P RF(NN) FRD:48 0 P SUR A11,A11 RESET LEAST SIGN. PART OF D.A. 2 P ADKL A12,1 INCREMENT MOST SIGN. P
0x1962b8…19644c Dummy {f00=0x0079, f01=0x0190, f02=» P CALL ERROR " PFRD:B1 EQU FRD:40-FRD:20-2 =4 " PFRD:B2 EQU FRD:45-FRD:43-2 =4 > P XIF d P IFT CDDISC=1 p P IFT CDDI16=0 =9 P EJECT ( P*********************************** ( P* * ( P*
0x19644c…1965e0 Dummy {f00=0x0079, f01=0x0190, f02=»ERENCED IN: SYSLOD,GETFIL * ( P* * & ( P* ENTRY: A1 - DEVICE ADDRESS * R ( P* * ~ ( P* EXIT: * ( P* * ( P* WOR
0x1965e0…196774 (1, 197) Dummy {f00=0x0079, f01=0x0190, f02=» * ( P*********************************** " P N PCDINIT EQU * V P* j P* INIT 80M CDC DISC COMMANDS t P* , P ORKL A1,CIO CONFIG CIO A1,1,XX INSTR. P ST A1,READC1 ( P ORKL A1,/800 FORM SST A1,XX IN
0x196774…196908 Dummy {f00=0x0079, f01=0x0190, f02=»R. n P ST A1,SEEKC2 P LDKL A2,-1 2 P ST A2,PSECNL+STKEND INIT VALUE FOR SECTOR NBR 4 & P LDKL A2,/300 BUFLEN 80M CDC DISC j P ST A2,SAVCON SAVE LENGTH 4 P LDKL A2,CRDSEC GET READ SECTOR SUBROUTINE ADDR. P ST A2,READ P ST A2
0x196908…196a9c Dummy {f00=0x0079, f01=0x0190, f02=» * l 4 P* CRDSEC- READ ONE SECTOR FROM DISC * 4 P* ================================= * L 4 P* * 4 P* REFERENCED IN: SYSLOD * 4 P*
0x196a9c…196c30 Dummy {f00=0x0079, f01=0x0190, f02=» * d 4 P* A11 - SECTOR NBR LEAST SIGNIFICANT * 4 P* A12 - SECTOR NBR MOST SIGNIFICANT * D 4 P* * | 4 P* EXIT: A12,A11 = A12,A11 + 1 * 4 P*
0x196c30…196dc4 Dummy {f00=0x0079, f01=0x0190, f02=» 4 P* SUBROUTINES: ERROR * 4 P* * < 4 P*********************************************** t P* PCRDSEC EQU * P* P* SET BUFFER ADDRESS P* P LDR A1,A9 BUF
0x196dc4…196f58 Dummy {f00=0x0079, f01=0x0190, f02=»FF P ANS A1,CIOTAB RESET BITS P ANS A1,CIOTOT RESET BITS , . P LDR A1,A12 SECTOR NUMBER MOST SIGNIFICANT N 0 P LDR A2,A11 SECTOR NUMBER LEAST SIGNIFICANT P EJECT P* P* DIVIDE LOGICAL WITH 3 P* P LDK A3,0 P
0x196f58…1970ec Dummy {f00=0x0079, f01=0x0190, f02=»IOAD1 : P RF(NE) RED110 NOT SAME BUFFER ADDRESS MEANS NEW READ P CW A2,PSECNL+STKEND L , P RF(NE) RED110 NOT SAME PHYSICAL SEC NBR h P CW A3,PSECNM+STKEND , P RF(NE) RED110 NOT SAME PHYSICAL SEC NBR P CW A1,PSECPA+STKEND & P RF(E) T
0x1970ec…197280 Dummy {f00=0x0079, f01=0x018e, f02=» MS 3,PSECPA+STKEND SAVE NEW VALUES P LDR A1,A3 , P DVK 115 > P EJECT N P* A1=HEAD NBR * SECTOR NBR P* A2=CYLINDER NBR ~ P LDR A3,A2 P LDR A2,A1 P LDK A1,0 P DVK 23 P* A1=SECTOR NBR P* A2=HEAD NBR
0x197280…197414 (1, 198) Dummy {f00=0x007a, f01=0x0190, f02=» P LDR A2,A1 P MUK 5 INTERLACING 5 P SLC A3,1 2 ( P RF(NN) INT100 EVEN CYLINDER NUMBER D P ADK A2,12 SKEW FACTOR p PINT100 EQU * P DVK 23 P SLL A1,5 IN POSITION $ P ORS A1,CIOTAB UPDATE CIO TABLE P SRC A3,1 RESTOR
0x197414…1975a8 Dummy {f00=0x007a, f01=0x0190, f02=»R SAVE CYLINDER NBR P ADKL A3,/A800 SEEK COMMAND P ST A3,SEKTAB @ P LDKL A2,SEKTAB V PSEEKC1 EQU * n P CIO A2,1,0 SEEK P RB(NA) SEEKC1 PSEEKC2 EQU * P SST A2,0 P RB(NA) SEEKC2 P EJECT P* P*
0x1975a8…19773c Dummy {f00=0x007a, f01=0x0190, f02=» l PREADC1 CIO A1,1,0 READ & P RB(NA) READC1 LOOP UNTIL ACCEPTED & P* P PREADC2 SST A1,0 STATUS Z & P RB(NA) READC2 LOOP UNTIL ACCEPTED x P ANKL A1,/FF0F STATUS P RF(NZ) RET30 READING ERROR > P LD A1,PSECPA+STKEND GET RELATIV LOG
0x19773c…1978d0 Dummy {f00=0x007a, f01=0x0190, f02=»L SECTOR NUMBER t P RF(O) TURN10 OVERFLOW P RF TURN20 6 PTURN10 EQU * H P SUR A11,A11 RESET A11 P ADKL A12,1 z PTURN20 EQU * P RTN A14 P EJECT P* " P* MOVE UP NEXT LOGICAL SECTOR P* PREDMOV EQU *
0x1978d0…197a64 Dummy {f00=0x007a, f01=0x018e, f02=» LDR A2,A9 DESTINATION ADDRESS P LDK A3,128 LENGTH IN WORDS & PRMOV10 EQU * J P LDR* A6,A1 ^ P STR A6,A2 r P ADK A1,2 P ADK A2,2 P SUK A3,1 P RB(P) RMOV10 NEXT WORD P RB TURN P P P PNOFOND
0x197a64…197bf8 Dummy {f00=0x007a, f01=0x0190, f02=» PRET30 EQU * P SUK A6,1 P RB(NZ) REA100 NEW TRY . P LC A1,CIOTAB L P ANK A1,/C0 b 4 P RF(NZ) RET31 LAST RETRY WITH EARLY OR LATE D.S v P LDKL A2,/8000 0 P ORS A2,CIOTAB PREPARE FOR EARLY DATA STROBE P RB READER
0x197bf8…197d8c Dummy {f00=0x007a, f01=0x0190, f02=»NGE FROM EARLY TO LATE D.S ~ P RB READER " PRET32 EQU * 4 P LDKL A2,/3FFF H * P ANS A2,CIOTAB RESET LATE DATA STROBE ^ P LC A1,CIOTOT P ANK A1,/C0 4 P RF(NZ) RET33 LAST RETRY CARRIAGE+ OR CARRIAGE- P LDKL A2,/8000 ( P ORS
0x197d8c…197f20 Dummy {f00=0x007a, f01=0x0190, f02=»DKL A2,/C000 . P XRS A2,CIOTOT FROM CARRIAGE+ TO CARRIGE- P RB READER F P EJECT X P* f P* SEEK TABLE p P* PSEKTAB EQU * P DATA 0 P* P* CIO TABLE P* PCIOTAB EQU * & P DATA 0 ORDER,SECTOR NBR,H
0x197f20…1980b4 (1, 199) Dummy {f00=0x007a, f01=0x0190, f02=»HAINING BIT,NUMBER OF WORDS z PCIOAD1 EQU * $ P DATA 0 ADDRESS 1 8 PCIOPA2 EQU * R P DATA /4000+128 f PCIOAD2 EQU * ~ P DATA 0 ADDRESS 2 PCIOPA3 EQU * P DATA 128 PCIOAD3 EQU * P DATA 0 ADDRESS 3 P XIF
0x1980b4…198248 Dummy {f00=0x007a, f01=0x0190, f02=»DINIT - INITIALIZE DISC UNIT * ( P* ============================= * ( ( P* * T ( P* REFERENCED IN: SYSLOD,GETFIL * ( P* * ( P* ENTRY: A1 - DEVICE ADDRESS * ( P*
0x198248…1983dc Dummy {f00=0x007a, f01=0x0190, f02=»REGISTERS: A1,A2 * ( P* * $ ( P* SUBROUTINES: * P ( P* * | ( P*********************************** P PCDINIT EQU * P* ( P* INIT 16M OR
0x1983dc…198570 Dummy {f00=0x007a, f01=0x0190, f02=»SITION =9 p P ANK A2,/10 =9 < P ST A2,CARFIX+STKEND SAVE FIX OR CARTRIDGE INDICATOR =9 * , P ORKL A1,CIO CONFIG CIO A1,1,XX INSTR. j P ST A1,READC1 ( P ORKL A1,/800 FORM SST A1,XX INSTR. P ST A1,READC2 * P XRKL A1,/B00 FORM CIO
0x198570…198704 Dummy {f00=0x007a, f01=0x0190, f02=»A2,PSECNL+STKEND INIT VALUE FOR SECTOR NBR & P LDKL A2,/300 BUFLEN 80M CDC DISC 2 P ST A2,SAVCON SAVE LENGTH 4 P LDKL A2,CRDSEC GET READ SECTOR SUBROUTINE ADDR. ~ P ST A2,READ P ST A2,READS & P CF A14,GETVLB GET VOLUME LABEL =9 $ P
0x198704…198898 Dummy {f00=0x007a, f01=0x0190, f02=» DISC =9 ~ ( P LDK A2,115 CONSTANT FOR 80M DISC =9 PCDI:10 EQU * =9 < ( P ST A2,DIVCON SET DIVIDE CONSTANT =9 T P RTN A14 P EJECT 4 P*********************************************** 4 P* *
0x198898…198a2c Dummy {f00=0x007a, f01=0x0190, f02=» * ~ 4 P* REFERENCED IN: SYSLOD * & 4 P* * ^ 4 P* ENTRY: A9 = BUFFER ADDRESS * 4 P* * 4 P*
0x198a2c…198bc0 Dummy {f00=0x007a, f01=0x0190, f02=» * v 4 P* EXIT: A12,A11 = A12,A11 + 1 * 4 P* * V 4 P* WORK REGISTERS: A1,A2,A3,A6 * 4 P* * 4 P* SUBROUT
0x198bc0…198d54 (1, 200) Dummy {f00=0x007a, f01=0x0190, f02=»************* n P* PCRDSEC EQU * P* 4 P* SET BUFFER ADDRESS > P* Z P LDR A1,A9 BUFFER ADDRESS d P ADKL A1,256 P ST A1,CIOAD2 ADDRESS 2 P ADKL A1,256 P ST A1,CIOAD3 ADDRESS 3 P LDKL A1,/3FFF P ANS
0x198d54…198ee8 Dummy {f00=0x007a, f01=0x018e, f02=»BER LEAST SIGNIFICANT z P EJECT P* , P* DIVIDE LOGICAL WITH 3 6 P* V P LDK A3,0 ` PRED100 EQU * r P ADK A3,1 P SUK A1,3 P RB(NN) RED100 P ADK A1,3 P SUK A3,1 P DVK 3 P CW A9,CIOAD1 : P
0x198ee8…19907c Dummy {f00=0x007a, f01=0x0190, f02=» P CW A3,PSECNM+STKEND , P RF(NE) RED110 NOT SAME PHYSICAL SEC NBR P CW A1,PSECPA+STKEND P & P RF(E) TURN SAME LOG SEC AS BEFORE l . P RF(G) REDMOV MOVE UP NEXT LOGICAL SECTOR PRED110 EQU * P ST A9,CIOAD1 ADDRESS 1 ( P MS 3,PSECPA
0x19907c…199210 Dummy {f00=0x007a, f01=0x0190, f02=» v P* A2=CYLINDER NBR P LDR A3,A2 " P LDR A2,A1 4 P LDK A1,0 F P DVK 23 X P* A1=SECTOR NBR h P* A2=HEAD NBR $ P ORKL A2,/800 SET INTERRUPT BIT , P OR A2,CARFIX+STKEND FIX OR CARTRIDGE =9 " P ST A2,CIOTAB UPDATE CIO T
0x199210…1993a4 Dummy {f00=0x007a, f01=0x0190, f02=» RF(NN) INT100 EVEN CYLINDER NUMBER P ADK A2,12 SKEW FACTOR , PINT100 EQU * J P DVK 23 ^ P SLL A1,5 IN POSITION n $ P ORS A1,CIOTAB UPDATE CIO TABLE P SLC A3,1 RESTORE A3 =9 P CW A3,CYLNBR & P RF(E) READER SAME CYLINDER NU
0x1993a4…199538 Dummy {f00=0x007a, f01=0x0190, f02=» ST A3,SEKTAB P LDKL A2,SEKTAB PSEEKC1 EQU * . P CIO A2,1,0 SEEK B P RB(NA) SEEKC1 Z PSEEKC2 EQU * p P SST A2,0 P RB(NA) SEEKC2 P EJECT P* P* READ P* PREADER EQU * P LDK A6,3 NUMBER OF
0x199538…1996cc Dummy {f00=0x007a, f01=0x0190, f02=»ACCEPTED v P* PREADC2 SST A1,0 STATUS & P RB(NA) READC2 LOOP UNTIL ACCEPTED 8 P ANKL A1,/FF0F STATUS b P RF(NZ) RET30 READING ERROR : P LD A1,PSECPA+STKEND GET LOGICAL SECT. IN PHYSICAL =11 : P RF(NZ) REDMOV NOT FIRST LOGICAL SECT.
0x1996cc…199860 Dummy {f00=0x007a, f01=0x0190, f02=»TURN20 PTURN10 EQU * P SUR A11,A11 RESET A11 " P ADKL A12,1 @ PTURN20 EQU * T P RTN A14 h P EJECT x P* " P* MOVE UP NEXT LOGICAL SECTOR P* PREDMOV EQU * 6 P ST A1,PSECPA+STKEND SAVE NEW LOGICAL SECTOR PART
0x199860…1999f4 (1, 201) Dummy {f00=0x007a, f01=0x0190, f02=»E ADDRESS z " P LDR A2,A9 DESTINATION ADDRESS P LDK A3,128 LENGTH IN WORDS 8 PRMOV10 EQU * P LDR* A6,A1 p P STR A6,A2 P ADK A1,2 P ADK A2,2 P SUK A3,1 P RB(P) RMOV10 NEXT WORD P RB TURN P P
0x1999f4…199b88 Dummy {f00=0x007a, f01=0x0190, f02=»ADING P* PRET30 EQU * P SUK A6,1 , P RB(NZ) REA100 NEW TRY > P LC A1,CIOTAB P ANK A1,/C0 r 4 P RF(NZ) RET31 LAST RETRY WITH EARLY OR LATE D.S P LDKL A2,/8000 0 P ORS A2,CIOTAB PREPARE FOR EARLY DATA STROBE P
0x199b88…199d1c Dummy {f00=0x007a, f01=0x0190, f02=»RS A2,CIOTAB CHANGE FROM EARLY TO LATE D.S P RB READER 2 PRET32 EQU * D P LDKL A2,/3FFF X * P ANS A2,CIOTAB RESET LATE DATA STROBE n P LC A1,CIOTOT P ANK A1,/C0 4 P RF(NZ) RET33 LAST RETRY CARRIAGE+ OR CARRIAGE- P LDKL A2,/
0x199d1c…199eb0 Dummy {f00=0x007a, f01=0x0190, f02=»ERROR z P LDKL A2,/C000 ! . P XRS A2,CIOTOT FROM CARRIAGE+ TO CARRIGE- ! $ P RB READER ! V P EJECT ! h P* ! v P* SEEK TABLE ! P* ! PSEKTAB EQU * ! P DATA 0 ! P* ! P* CIO TABLE ! P* ! PCIOTAB EQU * ! & P DATA 0 OR
0x199eb0…19a044 Dummy {f00=0x007a, f01=0x018e, f02=»/4000+128 DATA CHAINING BIT,NUMBER OF WORDS ! " P DATA 0 ADDRESS1 MOST SIGN. =9 " 4 PCIOAD1 EQU * " Z P DATA 0 ADDRESS 1 " n PCIOPA2 EQU * " P DATA /4000+128 " $ P DATA 0 ADDRESS 2 MOST SIGN. =9 " PCIOAD2 EQU * " P DATA 0 ADDRESS 2 "
0x19a044…19a1d8 Dummy {f00=0x007a, f01=0x0190, f02=» P EJECT # 8 P*************************************************** # 8 P* * # N 8 P* GETFIL - GET CONFIGURATION FILE * # 8 P* =============================== * # 8 P*
0x19a1d8…19a36c Dummy {f00=0x007a, f01=0x0190, f02=» * # z 8 P* ENTRY: A9 - BUFFER ADDRESS * $ & 8 P* * $ b 8 P* EXIT: A11 - SECTOR ADDRESS TO CONF. FILE * $ 8 P*
0x19a36c…19a500 Dummy {f00=0x007a, f01=0x0190, f02=»UBROUTINES: READVL,READCF * $ 8 P* * % 8 8 P*************************************************** % t PGETFIL EQU * % P CF A14,GETVLB % PGET:10 EQU * % " P CF A14,RDSEC GET VOLUME L
0x19a500…19a694 (1, 202) Dummy {f00=0x007b, f01=0x0190, f02=» % z P CCR A5,A6 UNUSED FILE? & P RF(E) GET:50 YES! & ( P LDR A4,A6 START OF RECORD & B ( P LDK A5,'S' STANDARD FILE CHARACTER & d P CC A5,27,A6 STANDARD FILE? & P RF(NE) GET:50 NO! & * P LDK A5,'$' LEADING CHAR IN CONF. FILE & " P CCR A5,A4 C
0x19a694…19a828 Dummy {f00=0x007b, f01=0x0190, f02=» FILE? & r P RF(NE) GET:85 NO! ' P ADK A4,5 SIXTH CHARACTER ' ( , P LDK A5,':' CHARACTER TO PRECEED NUMBER ' J ( PGET:30 CCR A5,A4 CONFIGURATION FILE? ' z P RF(E) GET:40 YES! ' P SUK A4,1 TRY NEXT CHARACTER ' P CWR A4,A6 FIRST IN NAME? ' P R
0x19a828…19a9bc Dummy {f00=0x007b, f01=0x0190, f02=»FT DIGIT ' ~ P SLL A5,8 SHIFT TO LEFT BYTE ( P LC A5,2,A4 GET RIGHT DIGIT ( 4 " P CALL CONVRT CONVERT TO BINARY ( X , P CW A1,SCTANO SAME AS APPLICATION NUMBER ( ~ P RF(NE) GET:50 ( P* ( P* CONFIGURATION FILE FOUND ( P* ( $ P LD A1,22,A6
0x19a9bc…19ab50 Dummy {f00=0x007b, f01=0x0190, f02=» P* ) PGET:50 EQU * ) P ADR A6,A8 NEXT VTOC RECORD ) " & P ADK A6,1 BYPASS STATUS CHARACTER ) F , P SUK A7,1 MOORE RECORDS IN THIS SECTOR? ) p P RB(P) GET:20 YES! ) " P CWR A11,A10 LAST VTOC SECTOR? ) P RB(NE) GET:10 NO! ) 2 PGET:60 LDK A3,
0x19ab50…19ace4 Dummy {f00=0x007b, f01=0x0190, f02=» FILE NOT FOUND - READ SOP AND SELECT ) * P* LOAD MEDIUM FOR CONFIGURATION FILE * . P* * P* * f P LDKL A2,/7F8 * p & P OTR A2,0,SOP SWITCH ON SOP LAMPS * PGET:70 EQU * * P CF A14,SOPIN * " P ANKL A1,/7FC ALLOWED SWITCH? * P RB(Z) G
0x19ace4…19ae78 Dummy {f00=0x007b, f01=0x0190, f02=» * l PGET:75 EQU * + 6 P SC A1,CONDEV+1+STKEND SAVE CONF. DATA LOAD DEVICE + ( P CF A14,CONFLD CONFIGURE LOAD DEVICE + V P RB GETFIL + PGET:85 EQU * + $ P CCK A3,'SS' LOOKING FOR $SWAPP? + P RF(NE) GET:99 NO! + & P LDK A5,0 RESET CHARACTER COUN
0x19ae78…19b00c Dummy {f00=0x007b, f01=0x0190, f02=»DK A4,1 NEXT CHARACTER + * P ADK A5,1 INCREMENT CHARACTER COUNTER , & P CWK A5,8 ALL CHARACTERS CHECKED? , L P RB(NE) GET:90 NO! , v P* , : P* SWAPPABLE WORK BLOCK FILE FOUND - SAVE DISC ADDRESS , , P* TO FILE AND TO NEXT SECTOR AFTER FILE , P
0x19b00c…19b1a0 Dummy {f00=0x007b, f01=0x018e, f02=»WBFSA+STKCOM+2 SAVE , , P LD A3,SWPFEL,A6 GET BIT 16-31 OF LENGTH - . P LD A4,SWPFEL-2,A6 GET BIT 0-15 OF LENGTH - L ( P ADR A4,A2 ADD MOST SIGNIFICANT PART - ~ * P ADR A3,A1 ADD LEAST SIGNIFICANT PART - & P RF(O) GET:92 OVERFLOW - ADD CARRY - P RF GE
0x19b1a0…19b334 (1, 203) Dummy {f00=0x007b, f01=0x0190, f02=» - 0 P ST A4,SWBFSE+STKCOM+2 SAVE BIT 0-15 OF D.A. . . P IM SWBFLG+STKCOM INDICATE SWB-FILE FOUND . < PGET:99 RTN A14 . n P EJECT . : P***************************************************** . : P* * .
0x19b334…19b4c8 Dummy {f00=0x007b, f01=0x0190, f02=» * . : P* LODSEG - LOAD ONE SEGMENT * / 8 : P* ========================= * / v : P* * / : P* ENTRY: A8 - RELOCA
0x19b4c8…19b65c Dummy {f00=0x007b, f01=0x0190, f02=» * / n : P* EXIT: * 0 : P* * 0 Z : P* WORK REGISTERS: A1,A2,A3,A4,A7 * 0 : P*
0x19b65c…19b7f0 Dummy {f00=0x007b, f01=0x0190, f02=»***************************************************** 0 PLODCOM EQU * 1 > , P LD A9,MXBUF GET ADDRESS TO READ BUFFER 1 R " P LDR A3,A9 GET START OF BUFFER 1 P LDR A2,A3 SAVE 1 & P LDKL A7,240 NUMBER OF CODE WORDS 1 PLOD:10 EQU *-2 1 P LDR A10
0x19b7f0…19b984 Dummy {f00=0x007b, f01=0x0190, f02=»K IF IN END OF OF SEGMENT 1 P RF(P) LOD:50 NO YET! 2 " " P CWK A7,256 128 WORDS/SECTOR? 2 @ P RF(NE) LOD:30 NO! 2 f , P ADR A7,A10 COMPUTE NUMBER OF CODE WORDS 2 ( P LDKL A10,0 INDICATE END OF SEGMENT 2 P RF LOD:52 2 PLOD:30 EQU * 2 2 P ADR A
0x19b984…19bb18 Dummy {f00=0x007b, f01=0x0190, f02=»OCK 2 d P RF(NZ) LOD:50 NO! 3 P* 3 & 2 P ADK A7,8 YES, ADD 8 TO COMPENSATE FOR HEADER 3 0 : P CWK A7,240 LOOK IF OUTSIDE CODE PART OF SECTOR/BLOCK 3 f P RF(L) LOD:50 NO! 3 P* 3 ( P SUK A7,240 YES, GET WORDS REMAINING 3 P LDR A10,A7 AND SAVE
0x19bb18…19bcac Dummy {f00=0x007b, f01=0x018e, f02=» ADR A2,A7 START OF RELOCATION BITS 3 P CF A14,REBUF RELOCATE 4 , PLOD:52 EQU * 4 J " P LDR A1,A9 START OF CODE PART 4 ^ , P LD A4,FSTSEC+STKEND FIRST SECTOR/BLOCK? 4 P RF(NZ) LOD:55 NO! 4 6 P IM FSTSEC+STKEND INDICATE NOT FIRST SECTOR/BLOCK 4 0 P
0x19bcac…19be40 Dummy {f00=0x007b, f01=0x0190, f02=» 4 P RF(N) LOD:54 APPL. LARGER THAN ONE SECTOR/BLOCK 5 P* 5 < 0 P CWK A3,240 SINGLE SECTOR/BLOCK APPLICATION? 5 F P RF(NG) LOD:55 YES! 5 z P* 5 PLOD:54 ADKL A10,8 5 PLOD:55 EQU * 5 , P LDR A3,A7 NUMBER OF CHARACTERS TO MOVE 5 ( P LD A2,LLD
0x19be40…19bfd4 (1, 204) Dummy {f00=0x007b, f01=0x0190, f02=»TEM 5 t P XIF 6 P IFT MMUPAG=0 6 P CALL MOVE 6 . P XIF 6 @ P LDR A10,A10 END OF SEGMENT? 6 L P RF(NZ) LOD:70 6 p P RTN A14 EXIT 6 PLODSEG EQU * 6 ( P LDKL A1,256 NUMBER OF WORDS/SECTOR 6 $ P ST A1,LOD:10 MODIFY INSTRUCTION 6 PLOD:
0x19bfd4…19c168 Dummy {f00=0x007b, f01=0x0190, f02=»* 6 ` 6 P* * 7 6 P* REBUF - RELOCATE BUFFER ROUTINE * 7 D 6 P* =============================== * 7 ~ 6 P* * 7 6 P* REFERENCED IN: LOD
0x19c168…19c2fc Dummy {f00=0x007b, f01=0x0190, f02=» * 7 f 6 P* A2 - START OF RELOCATION TABLE * 8 6 P* * 8 J 6 P* EXIT: * 8 6 P* * 8 6 P* WORK REGISTER
0x19c2fc…19c490 Dummy {f00=0x007b, f01=0x0190, f02=» * 8 l 6 P* * 9 6 P************************************************* 9 P PREBUF EQU * 9 . P LDR A4,A2 GET START OPF RELOCATION TABLE 9 P SUK A4,2 9 PREB:10 EQU * 9 " P ADK A4,2 NEXT REL
0x19c490…19c624 Dummy {f00=0x007b, f01=0x0190, f02=»30 DON'T RELOCATE THIS WORD! 9 P LDR* A5,A3 GET CODE WORD : $ P ADR A5,A8 RELOCATE : F P STR A5,A3 STORE IT BACK : b PREB:30 EQU * : P ADK A3,2 NEXT CODE WORD : & P CWR A3,A2 END OF CODE WORD PART? : P RF(E) EXREL YES! : $ P SUK A6,1 MOOR
0x19c624…19c7b8 Dummy {f00=0x007b, f01=0x0190, f02=» : P EJECT ; . P***************************************** ; . P* GETCON - GET CONTENT IN MEMORY WORD * ; H . P***************************************** ; z P* ; P* REFERENCED IN: SEGGEN ; P* ; " P* ENTRY: A2 - MEMORY ADDRESS ; . P
0x19c7b8…19c94c Dummy {f00=0x007b, f01=0x0190, f02=» ; ~ P* < P* SUBROUTINES: < P* < * PGETCON EQU * < 4 " P LD A1,SCTOPT GET OPTION WORD < H P ANK A1,1 MMU OPTION < n P RF(Z) GCON10 NO MMU < P ELR A1,A2 < P RF GCON20 < PGCON10 EQU * < P LDR* A1,A2 < PGCON20 EQU * < P R
0x19c94c…19cae0 Dummy {f00=0x007b, f01=0x0190, f02=» < b 2 P* SCNCON * = 2 P* ====== * = > 2 P* * = t 2 P* SCAN CONFIGURATION FILE FOR POSSIBLE * = 2 P* APPLICATION DEFINITION BLOCKS. IF
0x19cae0…19cc74 (1, 205) Dummy {f00=0x007b, f01=0x0190, f02=» * = 2 P* ENTRY: A9 INPUT BUFFER ADDRESS * > . 2 P* * > d 2 P* WORK REGISTERS A1-A8,A10 * > 2 P* * > 2 P*
0x19cc74…19ce08 Dummy {f00=0x007b, f01=0x0190, f02=» * > r 2 P* * ? 2 P********************************************* ? N P* ? P* ? PSCNCON EQU * ? * P CF A14,GETFIL GET CONFIGURATION FILE ? 6 P ST A11,CONDAD+STKEND SAVE CONF. DISC FILE ADD
0x19ce08…19cf9c Dummy {f00=0x007b, f01=0x0190, f02=»ED ? j , P ST A8,ECNFBF+STKEND AND SAVE BUFFER END @ P* @ : $ P LDKL A10,0 RESET RECORD COUNTER @ D 2 P LD A6,APLTAB+STKCOM GET APLTAB+STKCOM ADDRESS @ l * P ADK A6,ACBLEN+2 SKIP 1ST TABLE BLOCK @ $ P CF A14,RDSEC READ FIRST SECTOR @ " P LDR A4,A9 GET S
0x19cf9c…19d130 Dummy {f00=0x007b, f01=0x0190, f02=» A1,'A;' APPLICATION DEFINITION BLOCK? @ P RF(NE) SCAN10 NO! A . P* A H * P CF A14,APLID YES GET APPLICATION NAME A R PSCAN10 EQU * A ( P ADKL A10,1 INCREMENT RECORD COUNTER A & P CW A10,LSTREC+STKEND LAST RECORD? A P RF(E) SCNEND YES! A P* A
0x19d130…19d2c4 Dummy {f00=0x007b, f01=0x018e, f02=» CF A14,RDSEC READ NEXT SECTOR A $ P LDR A8,A9 RESET RECORD ADDRESS B & PSCAN20 EQU * B N P LDR A4,A8 GET RECORD START B b $ P RB SCAN00 CONTINUE SCAN PROCESS B P* B $ P* THE WHOLE CONFIGURATION FILE B $ P* IS PROCESSED. SEARCH VTOC FOR B " P
0x19d2c4…19d458 Dummy {f00=0x007b, f01=0x0190, f02=» 0 P LD A1,IPLDEV+STKEND CONFIGURE PGM LOAD DEV. C P CF A14,LODDEV C 8 8 P LD A6,APLTAB+STKCOM GET APLTAB+STKCOM START ADDRESS C N * P ADK A6,ACBLEN+2 SKIP 1ST TABLE BLOCK C 0 P LD* A1,APLTAB+STKCOM GET NO OF APPLICATIONS C P SUK A1,1 DECREMENT C $ P
0x19d458…19d5ec Dummy {f00=0x007b, f01=0x0190, f02=»PDATE APPLIC. DISC ADDR. C P* D PRTRN EQU * D * P RTN A14 END OF SCNCON D < P EJECT D Z 2 P********************************************* D h 2 P* * D 2 P* * D 2
0x19d5ec…19d780 Dummy {f00=0x007b, f01=0x0190, f02=» * D v 2 P* APLID TAKES THE NAME OF APPLICATION * E 2 P* AND MOVES IT FROM CONF. FILE TO * E R 8 P* APLTAB+STKCOM. FOR EACH APPLICATION A ENTRY * E 8 P* IN APLTAB+STKCOM IS CREATED ACCORDINGLY: * E 2 P*
0x19d780…19d914 (1, 206) Dummy {f00=0x007c, f01=0x018e, f02=» * E l 2 P* * F 2 P* THE NAME ENTRY CONSISTS OF 1-4 WORDS * F H 2 P* * F ~ 8 P* ENTRY: A6 POINTER INTO APLTAB+STKCOM * F 2 P* A8 RECORD POIN
0x19d914…19daa8 Dummy {f00=0x007c, f01=0x0190, f02=» 2 P* WORK REGISTERS: A1-A5 * G 2 P* * G : 2 P********************************************* G p P* G P* G PAPLID EQU * G ( P ADKL A10,1 INCREMENT RECORD COUNTER G & P CW A10,LSTREC
0x19daa8…19dc3c Dummy {f00=0x007c, f01=0x0190, f02=» G f ( P CW A8,ECNFBF+STKEND OUTSIDE SECTOR? H P RF(NE) APLID0 NO! H 4 P* H N " P CF A14,RDSEC READ NEXT SECTOR H X P LDR A8,A9 GET RECORD START H ~ PAPLID0 EQU * H P LDR A4,A8 RECORD START H & P LDK A5,0 RESET CHARACTER COUNTER H PAPLID2 E
0x19dc3c…19ddd0 Dummy {f00=0x007c, f01=0x0190, f02=»DK A4,1 INCREMENT CHARACTER POINTER H ( P ADK A5,1 INCREMENT CHARACTER COUNT I , & P CWK A5,NCHAID END OF THIS RECORD? I X ( P RB(NE) APLID2 NO GET NEXT CHARACTER I P* I " P* END OF NAME RECORD, LOOK IF I $ P* NEXT CHARACTER IS A DELIMITER I P*
0x19ddd0…19df64 Dummy {f00=0x007c, f01=0x0190, f02=»DK A5,0 I . P ABL(Z) CONERR NO LEGAL CHARACTER IN NAME J P* J B P LDR A3,A6 SAVE BLOCK START J L 0 P STR A5,A3 SAVE NAME LENGTH IN APLTAB+STKCOM J p . P IM* APLTAB+STKCOM INCREMENT NO OF APPLIC. J ( P LDR A4,A8 GET START OF NAME RECORD J ( P ADK A
0x19df64…19e0f8 Dummy {f00=0x007c, f01=0x0190, f02=»R J r * P LDR* A1,A4 MOVE 2 CHARACTERS OF NAME K P STR A1,A3 TO APLTAB+STKCOM K 8 ( P ADK A4,2 ADVANCE CHARACTER POINTER K " P SUK A5,1 DECREMENT WORD COUNT K * P RB(P) APLID6 MORE CHARACTERS TO MOVE K P* K 0 P ADK A6,ACBLEN PREPARE FOR NEXT TA
0x19e0f8…19e28c Dummy {f00=0x007c, f01=0x0190, f02=» * K z 2 P* * L 2 P* GETAPL * L V 2 P* ====== * L 2 P* * L 2 P* SCANS VTOC FO
0x19e28c…19e420 Dummy {f00=0x007c, f01=0x0190, f02=»THE LENGTH * L r 8 P* OF APLTAB+STKCOM IS THEN USED TO CALCULATE * M 2 P* START OF FREE AREA. * M T 2 P* * M 8 P* ENTRY: A6 - 1ST ENTRY IN APLTAB+STKCOM * M @ P* AP
0x19e420…19e5b4 (1, 207) Dummy {f00=0x007c, f01=0x0190, f02=»******************* M v P* N P* N & PGETAPL EQU * N 0 $ P CF A14,GETVLB READ VOLUME LABEL N D PGETAP0 EQU * N l P CF A14,RDSEC READ SECTOR N ( P LDK A7,QBLFAC VTOC BLOCKING FACTOR N " P LDR A4,A9 GET START OF RECORD N PGETAP2 EQU * N ( P
0x19e5b4…19e748 Dummy {f00=0x007c, f01=0x0190, f02=» CHAR. ENTRY N | . P LCR A2,A4 GET 1ST CHARACTER IN FILE NAME O P CCK A2,/2020 UNUSED? O F P RF(E) GETAP4 YES! O d P* O ~ " P CF A14,CMPSYM COMPARE SYMBOLS O P ADK A5,0 O P RF(Z) FOUND EQUAL O P* O $ P* NO MATCH, TRY NEXT VTOC ENTRY O
0x19e748…19e8dc Dummy {f00=0x007c, f01=0x0190, f02=»THIS SECTOR O v P RB(P) GETAP2 YES! P P* P . " P CWR A11,A10 LAST VTOC SECTOR? P 8 & P ABL(E) CONERR ERROR IN CONF. FILE P ^ P* P P RB GETAP0 P P* P PFOUND EQU * P $ P LDK A2,'L' LOAD FILE CHARACTER P P CC A2,27,A4 LOAD FILE? P *
0x19e8dc…19ea70 Dummy {f00=0x007c, f01=0x0190, f02=»TAB+STKCOM P t . P LD A2,18,A4 GET DISC ADDRESS (BITS 16-31) Q 0 P ST A2,APLADA+2,A6 AND SAVE IN APLTAB+STKCOM Q D . P ADK A6,ACBLEN ADVANCE TO NEXT TABLE BLOCK Q x P* Q 2 P IM APLCNT+STKEND INCREMENT APPLICATION COUNT Q P RB(NZ) GETAPL MORE TO DO! Q
0x19ea70…19ec04 Dummy {f00=0x007c, f01=0x0190, f02=» * Q x 2 P* * R 2 P* CMPSYM * R T 2 P* ====== * R 2 P* * R 2 P* COMPARE TWO SYM
0x19ec04…19ed98 Dummy {f00=0x007c, f01=0x0190, f02=» R b 2 P* A1 - START OF SYMBOL 2 * S 2 P* A5 - LENGTH OF SYMBOL 2 * S > 2 P* * S t 2 P* EXIT: A5 = 0 IF SYMBOLS EQUAL * S 2 P*
0x19ed98…19ef2c Dummy {f00=0x007c, f01=0x018e, f02=»SYMBOL 1 S t 2 P CCR A2,A1 COMPARE WITH CHARACTER IN SYMBOL 2 T ( P RF(NE) CMPEND IF NOT EQUAL, RETURN T F P* T r ( P ADK A3,1 ADVANCE CHARACTER POINTERS T | P ADK A1,1 T ( P SUK A5,1 DECREMENT CHARACTER COUNT T , P RB(NZ) CMPSYM CONTINUE THE COMPAR
0x19ef2c…19f0c0 Dummy {f00=0x007c, f01=0x0190, f02=» P* U . P LCR A2,A3 GET NEXT CHARACTER IN FILE NAME U $ P CCK A2,/2020 END OF FILE NAME? U @ P RF(E) CMPEND YES! U h P* U P LDK A5,1 NO, NOT EQUAL! U PCMPEND EQU * U P RTN A14 END OF CMPSYM U P EJECT U 2 P****************************
0x19f0c0…19f254 (1, 208) Dummy {f00=0x007c, f01=0x0190, f02=» GETVLB * U 2 P* ====== * V 4 2 P* * V j 2 P* READ SECTOR CONTAINIG VOLUME LABEL * V 2 P* * V
0x19f254…19f3e8 Dummy {f00=0x007c, f01=0x0190, f02=»RD LENGTH * V x 2 P* * W 2 P********************************************* W T P* W P* W PGETVLB EQU * W P SUR A11,A11 VOLUME LABEL W P SUR A12,A12 W " P CF A14,RDSEC GET VOLUME LABEL W
0x19f3e8…19f57c Dummy {f00=0x007c, f01=0x0190, f02=»ENGTH W r . P AD A11,46,A9 FIRST FILE SECTOR IN VTOC =7 X P RTN A14 END OF GETVLB X @ P* X ^ P EJECT X h 2 P********************************************* X v 2 P* * X 2 P*
0x19f57c…19f710 Dummy {f00=0x007c, f01=0x0190, f02=» * X 2 P* READS A SECTOR FROM INPUT DISC. * Y * 2 P* * Y ` 2 P* ENTRY: A9 - BUFFER ADDRESS * Y 2 P* A11- SECTOR ADDRESS * Y 2 P*
0x19f710…19f8a4 Dummy {f00=0x007c, f01=0x0190, f02=»*********** Y n P* Z P* Z PRDSEC EQU * Z ( " P CF A14,READS MODIFIED ADDRESS Z < PREADS EQU *-2 Z b P RTN A14 Z x P EJECT Z P* Z P* DATA AREA DEFINITION Z P* Z PSYSBAS EQU * Z PSAVCON DATA BUFLEN Z 2 PMXBUF DATA 0 DIS
0x19f8a4…19fa38 Dummy {f00=0x007c, f01=0x4168, f02=»ECTOR NUMBER Z x P IFT CDDISC=1 =9 [ P IFT CDDI16=0 =9 [ . * PDEVTAB DATA 0,/1909,/3717,/2808,/1404 [ H P XIF =9 [ v P IFF CDDISC-CDDI16=1 =9 [ , PDEVTAB DATA 0,/1909,/3717,/2808,/5717 =9 [ P XIF =9 [ $ PSWPTAB DATA '$S','WA','P ','
0x19fa38…19fbcc Dummy {f00=0x007c, f01=0x2008, f02=» P X ` h p
0x19fbcc…19fd60 Dummy {f00=0x007c, f01=0x0190, f02=» U W 9 9@ @ $P$ @ ( ;A 9@T 9 9@ 9 : P P 9@T 9 9@ _* :! )R @R P FQ ! : 0 N PD ! P8 !==P( !NNP2 !SSP, U 0 - _> _H : P AAT : N
0x19fd60…19fef4 (1, 209) Opaque[0x194]
0x19fef4…1a0088 # DirEnt {nam=»SYSLDM«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0f98, f03=0x0000}
0x19fef4…1a0088 IdxSect {
0x19fef4…1a0088 f00 = 0x007c // 0x19fef4 @0x0
0x19fef4…1a0088 f01 = 0x0070 // 0x19fef6 @0x2
0x19fef4…1a0088 gno = [ // 0x19fef8 @0x4
0x19fef4…1a0088 [0x00]: C0x007c.0x3.0
0x19fef4…1a0088 [0x01]: C0x007d.0x0.0
0x19fef4…1a0088 [0x02]: C0x007d.0x1.0
0x19fef4…1a0088 [0x03]: C0x007d.0x2.0
0x19fef4…1a0088 [0x04]: C0x007d.0x3.0
0x19fef4…1a0088 [0x05]: C0x007e.0x0.0
0x19fef4…1a0088 [0x06]: C0x007e.0x1.0
0x19fef4…1a0088 [0x07]: C0x007e.0x2.0
0x19fef4…1a0088 [0x08]: C0x007e.0x3.0
0x19fef4…1a0088 [0x09]: C0x007f.0x0.0
0x19fef4…1a0088 [0x0a]: C0x007f.0x1.0
0x19fef4…1a0088 [0x0b]: C0x007f.0x2.0
0x19fef4…1a0088 [0x0c]: C0x007f.0x3.0
0x19fef4…1a0088 [0x0d]: C0x0080.0x0.0
0x19fef4…1a0088 [0x0e]: C0x0080.0x1.0
0x19fef4…1a0088 [0x0f]: C0x0080.0x2.0
0x19fef4…1a0088 [0x10]: C0x0080.0x3.0
0x19fef4…1a0088 [0x11]: C0x0081.0x0.0
0x19fef4…1a0088 [0x12]: C0x0081.0x1.0
0x19fef4…1a0088 [0x13]: C0x0081.0x2.0
0x19fef4…1a0088 [0x14]: C0x0081.0x3.0
0x19fef4…1a0088 [0x15]: C0x0082.0x0.0
0x19fef4…1a0088 [0x16]: C0x0082.0x1.0
0x19fef4…1a0088 [0x17]: C0x0082.0x2.0
0x19fef4…1a0088 [0x18]: C0x0082.0x3.0
0x19fef4…1a0088 [0x19]: C0x0083.0x0.0
0x19fef4…1a0088 [0x1a]: C0x0083.0x1.0
0x19fef4…1a0088 [0x1b]: C0x0083.0x2.0
0x19fef4…1a0088 [0x1c]: C0x0083.0x3.0
0x19fef4…1a0088 [0x1d]: C0x0084.0x0.0
0x19fef4…1a0088 [0x1e]: C0x0084.0x1.0
0x19fef4…1a0088 [0x1f]: C0x0084.0x2.0
0x19fef4…1a0088 [0x20]: C0x0084.0x3.0
0x19fef4…1a0088 [0x21]: C0x0085.0x0.0
0x19fef4…1a0088 [0x22]: C0x0085.0x1.0
0x19fef4…1a0088 [0x23]: C0x0085.0x2.0
0x19fef4…1a0088 [0x24]: C0x0085.0x3.0
0x19fef4…1a0088 [0x25]: C0x0086.0x0.0
0x19fef4…1a0088 [0x26]: C0x0086.0x1.0
0x19fef4…1a0088 [0x27]: C0x0086.0x2.0
0x19fef4…1a0088 [0x28]: C0x0086.0x3.0
0x19fef4…1a0088 [0x29]: C0x0087.0x0.0
0x19fef4…1a0088 [0x2a]: C0x0087.0x1.0
0x19fef4…1a0088 [0x2b]: C0x0087.0x2.0
0x19fef4…1a0088 [0x2c]: C0x0087.0x3.0
0x19fef4…1a0088 [0x2d]: C0x0088.0x0.0
0x19fef4…1a0088 [0x2e]: C0x0088.0x1.0
0x19fef4…1a0088 [0x2f]: C0x0088.0x2.0
0x19fef4…1a0088 [0x30]: C0x0088.0x3.0
0x19fef4…1a0088 [0x31]: C0x0089.0x0.0
0x19fef4…1a0088 [0x32]: C0x0089.0x1.0
0x19fef4…1a0088 [0x33]: C0x0089.0x2.0
0x19fef4…1a0088 [0x34]: C0x0089.0x3.0
0x19fef4…1a0088 [0x35]: C0x008a.0x0.0
0x19fef4…1a0088 [0x36]: C0x008a.0x1.0
0x19fef4…1a0088 [0x37]: C0x008a.0x2.0
0x19fef4…1a0088 ]
0x19fef4…1a0088 }
0x1a0088…1a021c Dummy {f00=0x007c, f01=0x0190, f02=» 2 P IDENT SYSLDM REL 11.0 81-08-19 870105041100 P : $ P =10,CORRECTION =9 NOT CORRECT B P REL 11.0 81-07-28 j 0 P =9,FOR MONITOR EXTENTS APLREL AND APLLAC * P =9,POINTS AT 1 WORD TO HIGH ADDRESS * P =8,BUILD REAL-TIME INTERRUPT
0x1a021c…1a03b0 Dummy {f00=0x007c, f01=0x0190, f02=»RUPT TABLE x P REL 11.0 81-02-16 2 P =6,INIT UNUSED MMU ENTRIES,AND INIT ACBSTA . ( P AND ACBREL FOR MONITOR EXTENTS d P REL 11.0 81-01-26 . P =5,CHANGES IN CONDITIONAL ASSEMBLY WHEN ( P BUILDING COMMON DEVICE TABLES
0x1a03b0…1a0544 Dummy {f00=0x007c, f01=0x0190, f02=» PRR 11.0 80-12-03 0 P =3,APPLICATION CONTROL BLOCK IS EXTENDED P WITH 1 WORD R P PRR 11.0 80-12-01 l , P =2,IF NO S-BLOCK IN CONF.DATA,PROCESS , P EVEN NEXT CREDIT APPL. CONVERT A $ P BINARY VALUE >99 TO ASCII
0x1a0544…1a06d8 Dummy {f00=0x007c, f01=0x0190, f02=» WHEN BUILDING r P USER TASK TABLES P PRR 11.0 80-11-20 4 8 P =1,IF NO D-BLOCK IN CONF. DATA, SKIP DCT-CREATION T P PRR 11.0 80-11-19 P ENTRY SYSLDM P* 0 P* EXTERNALS DEFINED IN SYSTEM CONTROL TABLE P*
0x1a06d8…1a086c Dummy {f00=0x007c, f01=0x0190, f02=»XTRN SCTCDT COMMON DEVICE TABLE ADDRESS $ P EXTRN SCTDCT DATA COMMUNICATION 0 . P EXTRN SCTDMI DM: INDEX BUFFER RECORD SIZE X ( P EXTRN SCTDMT DATA MANAGEMENT TASKS " P EXTRN SCTEFA END OF FREE AREA , P EXTRN SCTFWL FM: FILE WORK TABLE LENGTH
0x1a086c…1a0a00 Dummy {f00=0x007c, f01=0x018e, f02=»NT&SEGMENT TABLE v . P EXTRN SCTNFT DM/FM: NUMBER OF FILES/TASK ( P EXTRN SCTNOF DM/FM: NUMBER OF FILES J " P EXTRN SCTNOP NUMBER OF PAGES v 6 P EXTRN SCTNOS NUMBER OF SEGMENTS/TASK (BASIC ONLY) P EXTRN SCTOPT SYSTEM OPTIONS $ P EXTRN SCTPAG
0x1a0a00…1a0b94 (1, 210) Dummy {f00=0x007d, f01=0x018e, f02=» n $ P EXTRN SCTTCT TASK CONTROL TABLE P EJECT 0 P* > " P* EXTERNALS DEFINED IN MONTAB H P* n * P EXTRN FREQUE FREE PAGES QUEUE ANCHOR x " P EXTRN INTLT1 LOCAL CONNECTION $ P EXTRN INTRT1 REMOTE CONNECTION " P EXTRN INTVU1 VIDEO
0x1a0b94…1a0d28 Dummy {f00=0x007d, f01=0x0190, f02=» h ( P EXTRN INTSL1 SYNCHRONOUS CONNECTION P* 4 P* MISCELLANOEUS EXTERNALS > P* ` ( P EXTRN REL RELOCATION BASE IN SYSINI j , P EXTRN SCLASS SPECIAL DEVICE CLASS TABLE . P EXTRN TCLASS TERMINAL DEVICE CLASS TABLE " P EXTRN SYSLOD ST
0x1a0d28…1a0ebc Dummy {f00=0x007d, f01=0x0190, f02=»OUTINES P* P EXTRN ERROR ERROR HANDLING $ P EXTRN MOVE MOVE AREAS IN MEMORY > P EXTRN MULT MULTIPLY f ( P EXTRN PSW STORE PROGRAM STATUS WORD $ P EXTRN CMPADR COMPARE ADDRESSES . P EXTRN CONVRT CONVERT FROM ASCII TO BINARY * P
0x1a0ebc…1a1050 Dummy {f00=0x007d, f01=0x0190, f02=»RN INBIMA INIT MMU ALLOCATION BIT MAP . P EXTRN PUSH SAVE REGISTER A1-A14 ON STACK . 2 P EXTRN POB RESTORE REGISTER A1-A14 FROM STACK ` 8 P EXTRN GETAPP GET NEXT APPLICATION OF SPECIFIED TYPE P EJECT P* P* TTAB DISPLACEMENTS P
0x1a1050…1a11e4 Dummy {f00=0x007d, f01=0x0190, f02=»XTRN TTB:CB CURRENT SEGMENT BASE POINTER ( P EXTRN TTB:SP SEGMENT TABLE POINTER 0 ( P EXTRN TTB:SB SEGMENT BLOCK POINTER P EXTRN TTB:ID TASK ID P EXTRN TTB:ST STATUS " P EXTRN TTB:PP PENDING POINTER & P EXTRN TTB:PW PROGRAM STATUS WOR
0x1a11e4…1a1378 Dummy {f00=0x007d, f01=0x018e, f02=»XTRN DWTCHP CHANNEL PARAMETER-1 P EXTRN DWTST STATUS ( P EXTRN DWTECB ECB ADDRESS D P EXTRN DWTOR ORDER f P EXTRN DWTADR ADDRESS BLOCK P EXTRN DWTTAB TTAB ADDRESS * P EXTRN DWTWAT WAIT/ACTIVATE INDICATOR P EXTRN DWTTQ TERMINA
0x1a1378…1a150c Dummy {f00=0x007d, f01=0x0190, f02=» P EXTRN DWTDEV DEVICE STATUS P EXTRN DWTECH ECHO DEVICE ( P EXTRN DWTSQ START OF QUEUE J P EJECT n P | P , P*************************************** , P* CONDITIONAL ASSEMBLY * , P****************************
0x1a150c…1a16a0 Dummy {f00=0x007d, f01=0x0190, f02=»LE WORK BLOCK HANDLING x * PEDM EQU 0 1 - EXTENDED DATA MANAGEMENT PX:A EQU 1 L PX:B EQU 1 ^ PX:C EQU 1 p PX:D EQU 1 PX:E EQU 1 PX:F EQU 1 PX:G EQU 1 PX:H EQU 1 PX:I EQU 1 PX:J EQU 1 PX:K EQU
0x1a16a0…1a1834 (1, 211) Dummy {f00=0x007d, f01=0x0190, f02=» PFT80 EQU 00 PPLCL EQU 01 PPLCR EQU 01 , PVIDEO EQU 00 @ PTEDVCL EQU 01 T PSPDVCL EQU 01 j PNOEXMB EQU X:K PFM EQU 00 PDC EQU 01 P EJECT P* * P* COMMON DISPLACEMENTS AND CONSTANTS P* .
0x1a1834…1a19c8 Dummy {f00=0x007d, f01=0x0190, f02=» p ( PBUFSIZ EQU 14 TEMPORARY BUFFER SIZE . PCONLEN EQU 0 LENGTH OF CONFIGURATION DATA 4 , PCONSTA EQU 2 START OF CONFIGURATION DATA f ( PDATEND EQU 34 END OF DDIV PROTOTYPE : PFSTADR EQU 20 1ST FREE ADDRESS WHEN ALLOCATING BUFFER * PFSTPAG E
0x1a19c8…1a1b5c Dummy {f00=0x007d, f01=0x0190, f02=» ^ ( PMAPLEN EQU 30 LENGTH OF AREA TO MAP * PMMFROM EQU 36 2ND MMU TABLE WORK AREA 4 ( PMMTO EQU 38 1:ST MMU TABLE WORK AREA b $ PM:REL EQU 16 RELOCATION CONSTANT , PSYSBUF EQU 28 START OF TEMPORARY BUFFER 2 PSWBFSA EQU 4 SWB-FILE START ADDRES
0x1a1b5c…1a1cf0 Dummy {f00=0x007d, f01=0x0190, f02=»SAVE AREA 1 | $ PCOM02 EQU 42 COMMON SAVE AREA 2 $ PCOM03 EQU 44 COMMON SAVE AREA 3 < * PTOTSGM EQU 46 TOTAL NUMBER OF SEGMENTS d , PSWBFLG EQU 48 SWAPPPABLE WORK BLOCK FLAG $ PCOM04 EQU 50 COMMON SAVE AREA 4 ( PDCBLK EQU 54 START OF DC CONF.
0x1a1cf0…1a1e84 Dummy {f00=0x007d, f01=0x0190, f02=» 2 ADDRESS TO SCLASS & PCUTENT EQU 4 FIRST USER TASK ENTRY ( PFWTSIZ EQU 6 FWT AREA SIZE IN WORDS F , PAPCTAB EQU 8 CURRENT APPL CONTROL BLOCK r * PSFASAV EQU 10 SAVE START OF FREE AREA * PNBRTSK EQU 12 NUMBER OF TASKS IN CLASS & PTASKID EQU
0x1a1e84…1a2018 Dummy {f00=0x007d, f01=0x0190, f02=» 22 TEMP INTTERRUPT TABLE $ PFWTSTA EQU 24 START OF FWT AREA " , PLIMIT EQU 26 CURRENT END OF SYSTEM AREA J ( PNBRCOM EQU 28 NUMBER OF COMMON TDC:S z PCLASID EQU 30 CLASS ID " PCONTYP EQU 32 CONNECTION TYPE ( PLCNBR EQU 34 LINE CONNECTION N
0x1a2018…1a21ac Dummy {f00=0x007d, f01=0x0190, f02=» EQU 44 WORK AREA 2 PWRK3 EQU 46 WORK AREA 3 PWRK4 EQU 48 WORK AREA 4 < " PBRDTAB EQU 50 BOARD CONF TABLE , PLCDSTA EQU 52 CONFIGURATION DATA POINTER 2 PNBRSDC EQU 54 NUMBER OF SPECIAL DEVICE CLASSES 4 PNBRTDC EQU 56 NUMBER OF TERMINAL
0x1a21ac…1a2340 Dummy {f00=0x007d, f01=0x0190, f02=» r * PNUMDTE EQU 64 NUMBER OF DTE:S DEFINED & PDTENAM EQU 66 SDTE IDENTIFICATION 6 $ PDTETYP EQU 68 TYPE OF CONNECTION ` 4 PNASTRT EQU 70 START OF NETW. ADDR. IN CONF. DATA * PNALNG EQU 72 LENGTH OF NETWORK ADDRESS , PDTENSA EQU 74 NO OF SUBADD
0x1a2340…1a24d4 (1, 212) Dummy {f00=0x007d, f01=0x0190, f02=» APCTAB CURRENT APPLICATION CONTROL BLOCK 4 PSCBTAB EQU APCTAB CURRENT SEGMENT CONTROL BLOCK 2 2 PEXCTAB EQU SCBTAB CURRENT EXTENT CONTROL BLOCK j , PNBRSWB EQU FWTSIZ NUMBER OF SWB RECORDS . PSWBBLK EQU FWTFLG START OF SWB CONF. DATA * PSWBNAM
0x1a24d4…1a2668 Dummy {f00=0x007d, f01=0x0190, f02=»ASKID NUMBER OF SWB:S P EJECT P* , 0 P* DISPLACEMENT IN APPLICATION CONTROL TABLE 6 P* j 0 PAPLREL EQU 18 APPLICATION RELOCATION BASE =6 t , PAPLIOE EQU 0 APPLICATION RESTART ADDRESS * PAPLLAC EQU 14 APPLICATION LOAD ADDRESS & PAP
0x1a2668…1a27fc Dummy {f00=0x007d, f01=0x0190, f02=»MP EQU 8 SEGMENT START MMU ENTRY . PAPLSEG EQU 4 PHYSICAL START OF 1ST SEGMENT ( . PAPLNPE EQU 6 NUMBER OF PAGE ENTRIES IN MMU Z " PAPLSWB EQU 2 SWB TABLE ADDRESS , PAPLSTA EQU 16 APPL PROGRAM START ADDRESS " PAPLTYP EQU 8 APPLICATION TYPE 8 P
0x1a27fc…1a2990 Dummy {f00=0x007d, f01=0x0190, f02=»* P* CONSTANTS P* * PS:BTAB EQU 40 DISPL. TO S:BTAB ADDRESS ( PSWBLEN EQU 4 LENGTH OF SWB V ( PSWBSEC EQU 6 DISPL. TO SECTOR LENGTH x 0 PUP:REC EQU 6 RECORD LENGTH IN INITIAL S:BTAB PUPNAME EQU 4 PROTOTYPE NAME $ PWBLEN EQU -4
0x1a2990…1a2b24 Dummy {f00=0x007d, f01=0x0190, f02=»******************************* P ( P* TASK DEFINITION BLOCK: 4 PTDBBT EQU 0 1A BLOCK TYPE T ( PTDBNT EQU TDBBT+1 2N NUMBER OF TASKS v , PTDBID EQU TDBNT+2 6A TASK ID START VALUE , PTDBMC EQU TDBID+6 6A MATCHING TASK CLASS $ PTDBTL
0x1a2b24…1a2cb8 Dummy {f00=0x007d, f01=0x0190, f02=»DEF r $ PTDC EQU 7 TERMINAL DEVICE CLASS PTLC EQU 7 LINE CONNECTION 4 ( PTDBREC EQU TDC+TLC TDB-RECORD LENGTH V P* * PSDC EQU 7 SPECIAL DEVICE CLASS-RECORD P* P* COMMON DEVICE DEF. BLOCK: P* PCDBBT EQU 0 1A BLOCK T
0x1a2cb8…1a2e4c Dummy {f00=0x007d, f01=0x0190, f02=»USER WORK BLOCK TYPE DEF. BLOCK P* ( PUDBBT EQU 0 1A BLOCK TYPE 2 , PUDBNU EQU UDBBT+1 3A NUMBER OF UWB TYPES T P* ( PUDBFST EQU UDBNU+3 FIRST UDB-RECORD PNAMUWB EQU 3 NAME OF UWB " PNUMUBL EQU 3 NUMBER OF BLOCKS . PUDBREC E
0x1a2e4c…1a2fe0 Dummy {f00=0x007d, f01=0x0190, f02=»SET t & PTYPOFS EQU 7 START OF TYPE RECORD , PNANSA EQU 2 NA-NSA RECORD QUALIFIER POS. 6 " PNAOFS EQU 3 START OF NA NUMBER f $ PNSAOFS EQU 4 START OF NSA RECORD & PDTEFIX EQU 8 FIX PART OF DTE BLOCK P EJECT P**************** P* SO
0x1a2fe0…1a3174 (1, 213) Dummy {f00=0x007d, f01=0x0190, f02=» EQU /200 NOT USED " PLMP3 EQU /100 MEMORY OVERFLOW , PLMP4 EQU /80 ERROR IN CONFIGURATION DATA @ PLMP5 EQU /40 NOT USED p PLMP6 EQU /20 NOT USED PLMP7 EQU /10 NOT USED PLMP8 EQU 8 NOT USED PLMP9 EQU 4 NOT USED PLMP10
0x1a3174…1a3308 Dummy {f00=0x007d, f01=0x0190, f02=»* CALL-FORMAT, PERFORMS: CFR A14,A13 * F P* DATA [REL-ADDRESS] * J F P* * F P******************************************
0x1a3308…1a349c Dummy {f00=0x007d, f01=0x0190, f02=»LACEMENTS P* $ PMXSBL EQU 6 SEGMENT BLOCK LENGTH " PMXNOX EQU 6 NUMBER OF EXTENTS D * PMX:NOS EQU 8 NUMBER OF SEGMENT TABLES j , PMX:EBL EQU 6 MONITOR EXTENT BLOCK LENGTH ( PMX:LEV EQU /0031 MONITOR TASK LEVEL & PMX:LEN EQU 4 MONITOR
0x1a349c…1a3630 Dummy {f00=0x007d, f01=0x0190, f02=»:NOX EQU MX:DA2+2 NUMBER OF MONITOR EXTENTS , PMX:SBL EQU 6 MONITOR EXTENT BLOCK LENGTH ! 4 . PMX:STA EQU 2 MONITOR EXTENT START ADDRESS ! d P EJECT ! P* ! " P* *********** ! " P* * PAGTAB * ! " P*
0x1a3630…1a37c4 Dummy {f00=0x007d, f01=0x0190, f02=»DDRESS ! ~ & PPAGSB EQU 6 SEGMENT BLOCK ADDRESS " P EJECT " 8 P* " F & P* ************* " P & P* * SEGTAB * " z & P* ************* " P* " PSEGPB EQU 6 SEGMENT POINTER " " PSEGSB EQU 6
0x1a37c4…1a3958 Dummy {f00=0x007d, f01=0x0190, f02=»ES * " p * P* ******************* # P* # < PBUFLEN EQU -4 # F PDEVIND EQU -2 # PDWTLEN EQU 6 # r PTDCDD1 EQU 5 # PTDCDD2 EQU 6 # ( PTDCLCN EQU 10 DISP. TO LINE CON. NBR # $ PSLL0 EQU /3940 SLL A1,0 CONSTANT # 8 PNBRDPS
0x1a3958…1a3aec Dummy {f00=0x007d, f01=0x0190, f02=» * # : P* * $ 8 : P* THIS IS THE MONITOR CONFIGURATION PROGRAM ENTRY * $ v : P* * $ : P* IT IS ENTERED FROM
0x1a3aec…1a3c80 Dummy {f00=0x007d, f01=0x0190, f02=» * $ n : P* A1 - POINTER TO CURRENT LOCATION OF SYSLDX * % : P* A2 - POINTER TO PREVIOUS LOCATION OF SYSLDX * % Z : P* * % : P*
0x1a3c80…1a3e14 (1, 214) Dummy {f00=0x007e, f01=0x0190, f02=»A1,REL+2 RELOCATION ROUTINE ENTRY % ( P AD A1,STKCOM+M:REL RELOCATE ADDRESS & * P CFR A8,A1 & V $ P LDKL A11,SYSLOD START OF SYSLOD & h * P LDKL A2,TCLASS GET ADDRESS TO TCLASS & . P CWK A2,SCLASS SAME AS ADDRESS TO SCLASS? & $ P RF(E) NO:TCL YES:DUMMY
0x1a3e14…1a3fa8 Dummy {f00=0x007e, f01=0x0190, f02=»A2,SCLASS GET ADDRESS TO SCLASS & , P CALL CHPTRS RELOCATE POINTERS IN SCLASS ' ( 0 P ST A2,STKEND+SCLA SAVE RELOCATED TO SCLASS ' X P RF CLEAR ' P EJECT ' 4 P*********************************************** ' 4 P* CHPTRS - CHANGE POINTERS IN TCLAS
0x1a3fa8…1a413c Dummy {f00=0x007e, f01=0x0190, f02=» A11 - SYSLOD START ADDRESS ' ( P* A12 - RELOCATION CONSTANT ( * P* ( V 2 P* EXIT: A2 - POINTER TO MOVED TCLASS/SCLASS ( ` P* ( P* WORK REGISTER:A1-A7 ( P* ( P* SUBROUTINES: ( P* ( PCHPTRS EQU * ( P ADR A2,A1
0x1a413c…1a42d0 Dummy {f00=0x007e, f01=0x018e, f02=»QU * ( . P SUK A4,2 MOORE ENTRIES I TCLASS/SCLASS ? ) P RF(Z) CHPT30 NO! ) > P ADK A3,2 NEXT ENTRY ) X $ P LDR* A5,A3 GET POINTER TO CLASS ) t P ADR A5,A12 RELOCATE ) P STR A5,A3 STORE ) $ P LDR* A6,A5 GET LENGTH OF CLASS ) PCHPT20 EQU * )
0x1a42d0…1a4464 Dummy {f00=0x007e, f01=0x0190, f02=» ) r P LDR A9,A7 GET DWT-ADDRESS * " P CALL CMPADR COMPARE ADDRESSES * * P RB(G) CHPT20 DWT IN DRIVER! * P P ADR A7,A12 RELOCATE * t * P STR A7,A5 STORE RELOCATED DW-ADDRESS * " P LD A8,SCTOPT GET OPTION WORD * P ANKL A8,1 MMU IN SYSTEM? * P R
0x1a4464…1a45f8 Dummy {f00=0x007e, f01=0x0190, f02=»EADY RELOCATED? * z P RB(NZ) CHPT20 YES! + P ADR A8,A12 RELOCATE + 4 . P ADKL A8,1 INDICATE DWT-ADDRESS RELOCATED + P , P ST A8,DWTMEC,A7 STORE RELOCATED ADDRESS + P RB CHPT20 + PCHPT30 EQU * + P RTN A14 + P EJECT + PCLEAR EQU * +
0x1a45f8…1a478c Dummy {f00=0x007e, f01=0x0190, f02=» + P SUK A1,2 , P CMR A1 , P CWR A1,A2 , * P RB(NE) CLRSYS , < P LDKL A1,CONMON , R P AD A1,STKCOM+M:REL , j P ABR A1 , P EJECT , 6 P************************************************** , 6 P* B:TCT - BUILD TASK CONTROL TABLE
0x1a478c…1a4920 Dummy {f00=0x007e, f01=0x0190, f02=»* ENTRY: , P* - P* EXIT: - P* - , & P* WORK REGISTERS: A1-A7,A11,A12 - 6 P* - ` P* SUBROUTINES: - j P* - . P* TASK CONTROL TABLE LAYOUT - . P* _________________________ - . P* I L
0x1a4920…1a4ab4 (1, 215) Dummy {f00=0x007e, f01=0x018e, f02=» _________________________ - . P* I USER TASKS I . ( . P* __________________________ . Z P* . P EJECT . PB:TCT EQU * . * P LD A12,SCTSFA GET START OF FREE AREA . * P ST A12,SCTTCT STORE ADDRESS TO TC
0x1a4ab4…1a4c48 Dummy {f00=0x007e, f01=0x0190, f02=» P* AND MONITOR SEGMENT TASKS / P* / ( ( P LD A2,SCTMXS GET ADDRESS TO MXSTAB / 2 P RF(Z) BTCT20 NOT PRESENT! / ^ . P CALL MX:TDB GET FIRST MONITOR EXTENT TDB / 0 PBTCT02 SUK A7,1 DECREMENT NUMBER OF EXTENTS / P RF(N) BTCT05 NO MORE! / ( P LDR
0x1a4c48…1a4ddc Dummy {f00=0x007e, f01=0x0190, f02=»2 NO MORE! / P LDR* A2,A1 GET TASK ID 0 ( P CALL RESTCT RESERVE ENTRY IN TCTAB 0 2 P RB BTCT04 0 ^ 4 PBTCT05 CALL MX:STD GET FIRST MONITOR SEGMENT TDB 0 p > PBTCT06 SUK A6,1 DECREMENT NUMBER OF MONITOR SEGMENT TABLES 0 P RF(N) BTCT20 NO MORE! 0 ( P
0x1a4ddc…1a4f70 Dummy {f00=0x007e, f01=0x0190, f02=»TCT06 NO MORE 0 P LDR* A2,A1 GET TASK ID 1 $ P CALL RESTCT RESERVE ENTRY TCTAB 1 6 P RB BTCT08 1 ^ P XIF 1 p P EJECT 1 | P* 1 . P* RESERVE ENTRIES IN TCTAB FOR USER TASKS 1 P* 1 PBTCT20 EQU * 1 6 P ST A12,STKEND+CUTENT SAVE CURRENT U
0x1a4f70…1a5104 Dummy {f00=0x007e, f01=0x0190, f02=»UK A7,1 MORE APPLICATIONS? 1 P RF(N) BTCT70 NO! 2 " 6 P LD A11,APLMMC,A4 GET START OF CONFIGURATION DATA 2 < * P AD A11,STKCOM+CONSTA RELOCATE POINTER 2 v 2 P ST A12,APLMMC,A4 STORE FIRST USER TASK ENTRY 2 P LCR A2,A11 GET BLOCK TYPE 2 ( P CCK A2,'TT'
0x1a5104…1a5298 Dummy {f00=0x007e, f01=0x0190, f02=» EQU * 2 P* 3 0 P* COMPUTE NUMBER OF TASK IN EACH TASK CLASS 3 P* 3 L PBTCT40 EQU * 3 V $ P CALL GETTSK GET NUMBER OF TASKS 3 j PBTCT50 EQU * 3 . P ADKL A12,2 RESERV ANOTHER ENTRY IN TC:TAB 3 ( P SUK A1,1 MOORE TASKS IN THIS CLASS? 3 P RB(
0x1a5298…1a542c Dummy {f00=0x007e, f01=0x0190, f02=»60 EQU * 3 , P ADK A4,ACBLEN NEXT APPL. CONTROL BLOCK 4 P RB BTCT30 4 @ P* 4 R 4 P* ENTRIES FOR ALL USER TASKS RESERVED IN TC:TAB 4 P* 4 0 PBTCT70 ST A12,SCTSFA UPDATE END OF FREE AREA 4 " P SU A12,SCTTCT COMPUTE LENGTH 4 P ST* A12,SCTTCT
0x1a542c…1a55c0 Dummy {f00=0x007e, f01=0x0190, f02=» * 4 : P* RESTCT - RESERVE ENTRY IN TCTAB * 5 2 : P* =============================== * 5 p : P* * 5 : P* REFERENCED IN: B:TCT
0x1a55c0…1a5754 (1, 216) Dummy {f00=0x007e, f01=0x0190, f02=» * 5 h : P* A12 - NEXT FREE ENTRY IN TCTAB * 6 : P* * 6 T : P* EXIT: A12 - NEXT FREE ENTRY IN TCTAB * 6 : P* * 6
0x1a5754…1a58e8 Dummy {f00=0x007e, f01=0x0190, f02=»ROUTINES: * 6 : P* * 7 8 : P***************************************************** 7 v PRESTCT EQU * 7 P LDR A3,A12 GET END OF TCTAB 7 PREST10 SUK A3,2 NEXT ENTRY 7
0x1a58e8…1a5a7c Dummy {f00=0x007e, f01=0x018e, f02=» FREEE ENTRY IN TCTAB 7 PREST20 RTN A14 RETURN 8 , PREST30 CWR* A2,A3 CHECK IF SAME TASK ID 8 < P RB(NE) REST10 NOT THE SAME 8 l " P RB REST20 COINCIDENCE: RETURN 8 P XIF 8 P IFF FM=0 8 P EJECT 8 8 P**************************************
0x1a5a7c…1a5c10 Dummy {f00=0x007e, f01=0x0190, f02=» 8 Z 8 P* ============================= * 9 8 P* * 9 D 8 P*************************************************** 9 8 P* * 9 8 P* REFERENCED IN
0x1a5c10…1a5da4 Dummy {f00=0x007e, f01=0x0190, f02=»-FILES PER TASK * 9 p 8 P* SCTNOF - NUMBER OF GENERAL FM-FILES * : 8 P* SCTFWL - FILE WORK TABLE LENGTH IN * : X 8 P* BYTES * : 8 P* * :
0x1a5da4…1a5f38 Dummy {f00=0x007e, f01=0x0190, f02=» * : 8 P* WORK REGISTERS: A2,A3 * ; 0 8 P* * ; l 8 P* SUBROUTINES: ERROR,MULT * ; 8 P*
0x1a5f38…1a60cc Dummy {f00=0x007e, f01=0x0190, f02=» ; 8 P* FILE WORK TABLES. * < 8 P* SIZE OF THE AREA RESERVED IS GIVEN BY THE * < D 8 P* FORMULA: A=L*(G+N*T) * < 8 P* WHERE A=AREA SIZE IN BYTES * < 8 P* L=
0x1a60cc…1a6260 Dummy {f00=0x007e, f01=0x0190, f02=»S PER TASK * < p 8 P* N=NUMBER OF USER TASKS * = 8 P* * = X 8 P*************************************************** = P EJECT = PB:FWT EQU * = & P LD* A2,SCTTCT GET LEN
0x1a6260…1a63f4 (1, 217) Dummy {f00=0x007e, f01=0x0190, f02=»ASKS = v 2 P LD A3,SCTNFT GET NUMBER OF FM-FILES PER TASK > P CALL MULT MULTIPLY > B 0 P AD A3,SCTNOF 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 MULTIPL
0x1a63f4…1a6588 Dummy {f00=0x007e, f01=0x0190, f02=»IZ SAVE FWT AREA SIZE IN WORDS > ~ ( P LD A2,SCTSFA GET START OF FREE AREA ? & , P ST A2,SCTFWT STORE ADDRESS TO FIRST FWT ? R 0 P ST A2,STKEND+FWTSTA SAVE START OF FWT AREA ? 0 P ST P,STKEND+LIMIT UPDATE END OF SYSTEM AREA ? . PFWT50 CW A2,STKEND+LIMIT MEMOR
0x1a6588…1a671c Dummy {f00=0x007e, f01=0x0190, f02=»WT AREA ? | " P ADK A2,2 RESERVE ANOTHER WORD @ $ P SUK A3,1 DECREMENT WORD COUNTER @ 6 * P RB(NZ) FWT50 CHECK IF MEMORY OVERFLOW @ ^ , P ST A2,SCTSFA UPDATE START OF FREE AREA @ P SUK A2,2 @ 0 P ST A2,STKEND+INTTAB SAVE ADDRESS TO T.I.T. @ PFWT70
0x1a671c…1a68b0 Dummy {f00=0x007e, f01=0x0190, f02=»************************************ @ P* A , ( P* NUMBER OF BLOCKS TO BE GENERATED: A 6 ( P* 20+N*(NUMBER OF TASKS IN SYSTEM) A b $ P* WHERE N IS A SYSTEM CONSTANT A $ P* DEFINED AT SYSTEM GENERATION A P* A P* A P* REFERENCED IN: SYSL
0x1a68b0…1a6a44 Dummy {f00=0x007e, f01=0x0190, f02=»S - POINTER TO FIRST BLOCK A P* B " $ P* WORK REGISTERS: A1,A2,A7,A12 B , P* B T P* SUBROUTINES: BLKGEN B ^ P* B ~ P EJECT B PMONBLK EQU * B P LDK A1,0 B & P LD A12,SCTSFA START OF FREE AREA B . P ST A12,FREQUE SAVE POINTER TO FIR
0x1a6a44…1a6bd8 Dummy {f00=0x007e, f01=0x0190, f02=» NUMBER OF BLOCKS PER TASK TO GENERATE B P* C . P LD A2,SCTBLK C 8 0 P ST P,STKEND+LIMIT UPDATE END OF SYSTEM AREA C N PMON:10 EQU * C P SUK A7,2 MOORE TASKS? C P RF(Z) MON:20 NO C P CALL BLKGEN C P RB MON:10 C PMON:20 EQU * C P
0x1a6bd8…1a6d6c Dummy {f00=0x007e, f01=0x0190, f02=» C P CALL BLKGEN D P* D P* GENERATE END BLOCK D & P* D D P STR A1,A12 D N P ST A1,2,A12 D b P ST A1,4,A12 D v P* D F P* CHECK IF BUFFER GREATER THAN 2 WORDS RESERVED FOR SYSLOD PART A D 0 P* IF NOT - USE LAST MONITOR BLOCK AS BUFF
0x1a6d6c…1a6f00 Dummy {f00=0x007e, f01=0x018e, f02=»BUFFER SIZE D 0 P ST A1,STKCOM+BUFSIZ UPDATE MAX BUFFER SIZE E P ADKL A12,2 E H 0 P ST A12,STKCOM+SYSBUF UPDATE BUFFER ADDRESS E PMON:30 EQU * E P ADKL A12,6 E P E * P ST A12,SCTSFA UPDATE END OF FREE AREA E P RTN A14 E P EJECT E
0x1a6f00…1a7094 (1, 218) Dummy {f00=0x007f, f01=0x0190, f02=» E h P* F P* REFERENCED IN: MONBLK F P* F 4 P* ENTRY: A1=0 F > 4 P* A2 - NUMBER OF BLOCKS TO BE GENERATED F V $ P* A12 - NEXT FREE ENTRY F P* F P* EXIT: A1=0 F " P* A12 - NEXT FREE ENTRY F P* F P*
0x1a7094…1a7228 Dummy {f00=0x007f, f01=0x0190, f02=» -------------------- F 0 P* I DATA *+6 I G * 0 P* -------------------- G ^ 0 P* I DATA 0 I G 0 P* -------------------- G 0 P*
0x1a7228…1a73bc Dummy {f00=0x007f, f01=0x0190, f02=»DR A3,A2 G PBLK:10 EQU * H P RF(Z) BLKEX H & $ P LDK A4,3 NUMBER OF WORDS/BLOCK H : 0 PBLK:20 CW A12,STKEND+LIMIT MEMORY OVERFLOW? H b P RF(NE) BLK:30 NOT YET! H * P LDKL A1,LMP3 INDICATE MEMORY OVERFLOW H P CALL ERROR H * PBLK:30 ADKL A12,
0x1a73bc…1a7550 Dummy {f00=0x007f, f01=0x0190, f02=» ST A1,-2,A12 H P SUK A3,1 I P RB BLK:10 I ( PBLKEX EQU * I : P RTN A14 I N P IFF EDM=0 I ^ P EJECT I p H P******************************************************************* I ~ H P*
0x1a7550…1a76e4 Dummy {f00=0x007f, f01=0x0190, f02=»========== * I b H P* * J H P* REFERENCED IN: SYSLDM * J j H P* * J H P* ENT
0x1a76e4…1a7878 Dummy {f00=0x007f, f01=0x0190, f02=»* J N H P* EXIT: * K H P* * K V H P* WORK REGISTERS: A4 * K H P*
0x1a7878…1a7a0c Dummy {f00=0x007f, f01=0x0190, f02=» * K H P******************************************************************* L B PB:MXTT EQU * L ( P LD A2,SCTMXS GET ADDRESS TO MXSTAB L P RF(Z) BMX99 NOT PRESENT L 0 P LDK A4,2 DISPLACEMENT TO
0x1a7a0c…1a7ba0 Dummy {f00=0x007f, f01=0x0190, f02=» START-ADDRESS TABLE L t " P RF(NZ) BMX05 ALREADY DEFINED M $ P LD A4,SCTSFA START OF FREE AREA M B 0 P ST A4,SCTMOX ADDRESS TO START-ADDRESS TABLE M j 4 P LDK A4,2 INITIAL LENGTH OF START-ADDRESS TABLE M & P ST* A4,SCTMOX STORE IN FIRST WORD M $ P SUK A4,
0x1a7ba0…1a7d34 (1, 219) Dummy {f00=0x007f, f01=0x0190, f02=»K A3,1 MORE EXTENTS? M P RF(N) BMX03 NO N * P ADK A2,2 ADDRESS NUMBER OF TASK ID:S N 4 ( P LDR* A6,A2 GET NUMBER OF TASK ID:S N b ( P ADR* A4,A2 ADD NUMBER OF TASK ID:S N " PBMX02 SUK A6,1 MORE TASK ID:S? N P RB(N) BMX01 NO N " P ADK A2,2 ADDRES
0x1a7d34…1a7ec8 Dummy {f00=0x007f, f01=0x0190, f02=»D A4,SCTSFA END OF START-ADDRESS TABLE N , P ST A4,SCTSFA UPDATE START OF FREE AREA O . P LDR A11,A4 GET TABLE END O ^ " P LDR A9,P GET CURRENT LOCATION O " P CALL CMPADR COMPARE ADDRESSES O P RF(NG) BMXS05 OK O * P LDKL A1,LMP3 INDICATE MEMORY OVER
0x1a7ec8…1a805c Dummy {f00=0x007f, f01=0x0190, f02=» NUMBER OF EXTENTS O x P RF(N) BMX99 NO MORE P * P LD A12,SCTSFA GET START OF FREE AREA P 6 6 P ST A12,STKEND+EXCTAB SAVE ADDRESS TO CONTR. BLOCK P d 4 P ADKL A12,ACBLEN RESERVE AREA FOR CONTROL BLOCK P , P ST A12,SCTSFA UPDATE START OF FREE AREA P " P A
0x1a805c…1a81f0 Dummy {f00=0x007f, f01=0x0190, f02=»N) BMX10 NO MORE P P ADK A1,2 NEXT TASK ID Q P CALL MXTTAB Q 6 P RB BMX20 Q J PBMX99 RTN A14 RETURN Q P EJECT Q x H P******************************************************************** Q H P*
0x1a81f0…1a8384 Dummy {f00=0x007f, f01=0x0190, f02=»=================== * Q j H P* * R & H P* ENTRY: A1 -POINTER TO TASK ID IN MXSTAB * R r H P* A5 - POINTER TO MONITOR EXTENT BLOCK * R H
0x1a8384…1a8518 Dummy {f00=0x007f, f01=0x0190, f02=» * R V H P* EXIT: A1 - POINTER TO TASK ID IN MXSTAB * S H P* A5 - POINTER TO MONITOR EXTENT BLOCK * S ^ H P* * S H P* WORK REGISTER:
0x1a8518…1a86ac Dummy {f00=0x007f, f01=0x0190, f02=» SUBROUTINES: IMXTT,STRMOX,INBIMA * S H P* * T J H P******************************************************************** T P EJECT T PMXTTAB EQU * T , P MSR
0x1a86ac…1a8840 Dummy {f00=0x007f, f01=0x0190, f02=»GET TASK ID T P CALL STRMOX STORE IN MOXTAB U & P LD A2,MX:STA,A5 GET START ADDRESS U 8 4 P LD A3,STKEND+EXCTAB GET CURRENT EXTENT BLOCK =6 U b , P ST A2,APLSTA,A3 STORE START ADDRESS =6 U P CALL STRMOX STORE IN MOXTAB U " P LDR* A2,A5 GET EXTENT ADD
0x1a8840…1a89d4 (1, 220) Dummy {f00=0x007f, f01=0x0190, f02=» U & P ADK A2,12 5 WORDS FOR DEBUGGER =9 V 0 P ST A2,TTB:SA+26,A12 STORE IN A13 SAVE-AREA V 2 : P LD A3,STKEND+EXCTAB GET CURRENT EXTENT CONTROL BLOCK V f P SUK A2,2 =10 V 8 P ST A2,APLLAC,A3 STORE LOGICAL ADDR. TO COMMON PART V . P ST A2,APLREL,A3 S
0x1a89d4…1a8b68 Dummy {f00=0x007f, f01=0x0190, f02=»A3,TTB:AP,A12 STORE EXTENT CONTROL BLOCK ADDRESS V " P LD A2,SCTOPT GET OPTION WORD W 8 P ANK A2,/20 EMM? W ^ P RF(Z) MXTT20 NO W v & P LD A2,MX:LEN,A5 GET EXTENT LENGTH W P ST A2,MAPLEN,A13 SAVE W & P ST A12,TTAB,A13 SAVE TTAB ADDRESS W P CALL IN
0x1a8b68…1a8cfc Dummy {f00=0x007f, f01=0x018e, f02=»*************** W r 2 P* * X 2 P* STRMOX - STORE START ADDRRESS IN MOXTAB * X N 2 P* ======================================= * X 2 P* * X 2 P* REFERENCED IN: MXTTAB
0x1a8cfc…1a8e90 Dummy {f00=0x007f, f01=0x0190, f02=» 2 P* * Y 2 P* EXIT: * Y : 2 P* * Y p 2 P* WORK REGISTERS: * Y 2 P*
0x1a8e90…1a9024 Dummy {f00=0x007f, f01=0x0190, f02=»*************************** Y ~ PSTRMOX EQU * Z $ & P LD* A3,SCTMOX GET CURRENT LENGTH Z 8 , P AD A3,SCTMOX ADDRESS TO NEXT FREE ENTRY Z b " P STR A2,A3 STORE START ADDRESS Z P IM* SCTMOX INCREMENT LENGTH Z P IM* SCTMOX TWICE Z P RTN A14 RETURN Z
0x1a9024…1a91b8 Dummy {f00=0x007f, f01=0x0190, f02=» 8 P* IMXTT - INIT MMU TABLE FOR MONITOR EXTENT TASK * [ 8 P* ============================================== * [ @ 8 P* * [ | 8 P* REFERENCED IN: MXTTAB * [ 8 P*
0x1a91b8…1a934c Dummy {f00=0x007f, f01=0x0190, f02=» * [ l 8 P* * 8 P* EXIT: * T 8 P* * 8 P* WORK REGISTERS: A2,A3,A4,A9,A11 * 8 P
0x1a934c…1a94e0 Dummy {f00=0x007f, f01=0x0190, f02=» * 8 P**************************************************** ] , P EJECT ] h PIMXTT EQU * ] v P LDR A2,A12 GET TTAB ENTRY ] * P ADKL A2,TTB:MT GET START OF MMU TABLE ] . P LDR* A3,A5 GET PHYSICAL ADDRESS TO EXTENT ]
0x1a94e0…1a9674 (1, 221) Dummy {f00=0x007f, f01=0x0190, f02=» & P LDKL A9,/1000 PHYSICAL PAGE SIZE ^ P SUR A9,A4 SAVE ^ . ( P LD A11,MX:LEN,A5 GET EXTENT LENGTH ^ F 0 P CALL CMPADR ENOUGTH SPACE IN CURRENT PAGE? ^ r P RF(G) IMX10 NO! ^ & P XRR A11,A11 INDICATE SINGLE ENTRY ^ P RF IMX20 ^ < PIMX10 SUR A11,
0x1a9674…1a9808 Dummy {f00=0x007f, f01=0x0190, f02=» ADK A2,2 INCREMENT ENTRY POINTER ^ " P ADKL A11,0 ONE ENTRY ENOUGTH? _ * P RF(Z) IMX99 YES! _ P P RF(NN) IMX30 <32KB _ j $ P SUKL A11,/1000 DECREMENT LENGTH _ P RB IMX20 _ & PIMX30 STR A3,A2 STORE PAGE ADDRESS _ ( P ADKL A3,/400 INCREMENT PAGE A
0x1a9808…1a999c Dummy {f00=0x007f, f01=0x0190, f02=» " P LDR A4,A12 GET TTAB ENTRY =6 ` . P ADKL A4,TTB:MT+32 GET END OF MMU-TABLE =6 ` * P LDKL A3,/FC00 =6 ` PIMX100 EQU * =6 ` v , P CWR A4,A2 ENTRIES LEFT IN MMU-TABLE? =6 ` P RF(E) IMX110 NO! =6 ` 0 P STR A3,A2 STORE PAGE ERROR IN MMU-ENTRY =6 `
0x1a999c…1a9b30 Dummy {f00=0x007f, f01=0x0190, f02=»****************************************** ` < P* * a 2 < P* B:MSEG - BUILD MONITOR TASK SEGMENT TABLES & TTABS * a r < P* ================================================== * a < P*
0x1a9b30…1a9cc4 Dummy {f00=0x007f, f01=0x0190, f02=» * a r < P* ENTRY: * b " < P* * b b < P* EXIT: * b < P*
0x1a9cc4…1a9e58 Dummy {f00=0x007f, f01=0x018e, f02=» * b b < P* SUBROUTINES: MX:MST,MX:STD,BMSTAB,CHKTAD,BMXSTT * c < P* * c R < P******************************************************** c P EJECT c PB:MSEG EQU * c 2 P CALL MX:MST FIND FI
0x1a9e58…1a9fec Dummy {f00=0x007f, f01=0x0190, f02=» : P LDR A8,A1 SAVE POINTER TO FIRST MONITOR SEGMENT TABLE d 6 P CALL MX:STD FIND FIRST MONITOR SEGMENT TABLE TASK d B P DEFINITION BLOCK d | > PBMSG10 SUK A6,1 DECREMENT NUMBER OF MONITOR SEGMENT TABLES d P RF(N) BMSG99 NO MORE! d < P CM STKEND+SCBTA
0x1a9fec…1aa180 Dummy {f00=0x007f, f01=0x0190, f02=»R OF SEGMENTS d l , P CALL BMSTAB BUILD MONITOR SEGMENT TABLE e . P LDR* A7,A1 GET NUMBER OF TASKS IN SEGTAB e F PBMSG20 ADK A1,2 NEXT TASK ID e x , P SUK A7,1 DECREMENT NUMBER OF TASK ID:S e P RB(N) BMSG10 NO MORE! e . P CALL CHKTAD CHECK IF TASK ALR
0x1aa180…1aa314 (1, 222) Dummy {f00=0x0080, f01=0x0190, f02=»CBTAB GET SEGMENT CONTROL BLOCK e 2 P RF(NZ) BMSG25 SEGMENT CONTROL BLOCK GENERATED f ( * P LD A12,SCTSFA GET START OF FREE AREA f ^ P LDR A10,A12 SAVE f 6 P ADKL A12,ACBLEN RESERVE FOR SEGMENT CONTROL BLOCK f , P ST A12,SCTSFA UPDATE START OF FREE AREA
0x1aa314…1aa4a8 Dummy {f00=0x0080, f01=0x0190, f02=» < P LD A10,TTB:AP,A12 GET ADDRESS TO SEGMENT CONTROL BLOCK g 2 P LD A3,STKEND+MAXSGM GET MAXIMUM SEGMENT SIZE g D * P ADKL A3,/FFFF NUMBER OF 4K-MULTIPLES g z 2 P ANKL A3,/F000 ISOLATE NUMBER OF 4K-MULTIPLES g ( P LDKL A2,/F000 END OF LOGICAL MEMORY g ,
0x1aa4a8…1aa63c Dummy {f00=0x0080, f01=0x0190, f02=» g p P RF(NZ) BMSG40 NO! h & P ADKL A2,/1000 SAVE ONE MMU ENTRY h " : PBMSG40 ST A2,APLLAP,A10 STORE IN SEGMENT CONTROL TABLE h L P SRL A2,12 MMU TABLE ENTRY h $ P LDK A3,16 NUMBER OF MMU ENTRIES h . P SUR A3,A2 COMPUTE NUMBER OF PAGE ENTRIES h 4 P S
0x1aa63c…1aa7d0 Dummy {f00=0x0080, f01=0x0190, f02=»DKL A3,TTB:CB DISPL TO END OF MMU TABLE h 4 P ST A3,APLMMP,A10 STORE IN SEGMENT CONTROL TABLE i 0 2 P LD A3,STKEND+MAXSGM GET MAXIMUM SEGMENT SIZE i h 0 P ADKL A3,/3FF COMPUTE NUMBER OF 1K-MULTIPLES i 2 P ANKL A3,/FC00 ISOLATE NUMBER OF 1K-MULTIPLES i ( P
0x1aa7d0…1aa964 Dummy {f00=0x0080, f01=0x0190, f02=»L) BMSG20 NO i * P ST A3,SCTPSZ UPDATE MAX SEGMENT SIZE j P RB BMSG20 j B PBMSG99 RTN A14 RETURN j T P EJECT j r > P********************************************************** j > P* * j > P*
0x1aa964…1aaaf8 Dummy {f00=0x0080, f01=0x0190, f02=» * j > P* REFERENCED IN: B:MSEG * k : > P* * k | > P* ENTRY: A4 - POINTER TO NUMBER OF SEGMENTS * k > P*
0x1aaaf8…1aac8c Dummy {f00=0x0080, f01=0x0190, f02=» - SEGMENT TABLE ADDRESS * k > P* * l 6 > P* WORK REGISTERS: A2,A3,A9,A11 * l x > P* * l > P* SUBROUTIN
0x1aac8c…1aae20 Dummy {f00=0x0080, f01=0x0190, f02=»****************************************** l P EJECT m 2 PBMSTAB EQU * m @ * P STR A1,A15 SAVE REGISTER A1 ON STACK m T ( P LD A5,SCTSFA GET START OF FREE AREA m * P LD A2,SCTIPL GET PROGRAM LOAD DEVICE m & P STR A2,A5 STORE IN SEGMENT TABLE m * P A
0x1aae20…1aafb4 (1, 223) Dummy {f00=0x0080, f01=0x0190, f02=»T TABLE m v < P ADS A9,STKCOM+TOTSGM INCREMENT TOTAL NUMBER OF SEGMENTS n " P ADK A5,2 SEGMENT TABLE ENTRY n P P LDR A3,A5 SAVE n v P* n P* BUILD SEGMENT BLOCK 0 n P* n ( P LDKL A2,/8400 STATUS FOR SEGMENT 0 n ( P STR A2,A3 STORE IN SEGMEN
0x1aafb4…1ab148 Dummy {f00=0x0080, f01=0x0190, f02=»END OF SYSTEM AREA n x * P LDR A11,A3 GET END OF SEGMENT BLOCKS o " P CALL CMPADR COMPARE ADDRESSES o H P RF(NG) BMST25 OK o n * P LDKL A1,LMP3 INDICATE MEMORY OVERFLOW o P CALL ERROR o & PBMST25 LDR* A2,A8 GET SEGMENT TYPE o P SRL A2,8 ISOLATE o
0x1ab148…1ab2dc Dummy {f00=0x0080, f01=0x0190, f02=» o z P RF(Z) BMST40 NO! p P* p " * P* DISC PAGING & DISC RESIDENT SEGMENT p , P* p Z ( P LD A1,SCTMXS GET ADDRESS TO MXSTAB p d 0 P LD A2,MX:DA2,A1 GET DISC ADDRESS BITS 16-31 p 0 P LD A1,MX:DA1,A1 GET DISC ADDRESS BITS 0-15 p $ P LD A10,2,A8 GET
0x1ab2dc…1ab470 Dummy {f00=0x0080, f01=0x0190, f02=» A1,1 ADD CARRY p P RF(P) BMST30 NOT OVERFLOW q ( P LDKL A1,LMP10 DISC ADDRESS OVERFLOW q : P CALL ERROR q f 4 PBMST30 ORKL A1,/4000 INDICATE ASSEMBLER SEGMENT q z 4 P STR A1,A3 STORE SEGMENT DISC ADDRESS BITS 0-15 q 6 P ST A2,2,A3 STORE SEGMENT DISC
0x1ab470…1ab604 Dummy {f00=0x0080, f01=0x0190, f02=» STATUS FOR DISC RESIDENT SEGMENT q | & P STR A2,A3 STORE IN SEGMENT BLOCK r * ( PBMST50 LD A9,4,A8 GET SEGMENT LENGTH r T 4 P LD A11,STKEND+MAXSGM GET MAXIMUM SEGMENT LENGTH r P CALL CMPADR r . P RF(NL) BMST55 CURRENT SEGMENT NOT GREATER r 6 P ST A9,STK
0x1ab604…1ab798 Dummy {f00=0x0080, f01=0x0190, f02=»NTER IN MXSTAB r x 0 P LD A1,STKEND+SGMCNT GET NUMBER OF SEGMENTS s P SUK A1,1 s J P RB(NZ) BMST20 MORE SEGMENTS s " P ADK A3,8 END OF SEGMENT TABLE s 2 PBMST60 ST A3,SCTSFA UPDATE START OF FREE AREA s $ P LDR* A1,A15 RESTORE REGISTER A1 s P RTN
0x1ab798…1ab92c Dummy {f00=0x0080, f01=0x0190, f02=» * s f @ P* CHKTAD - CHECK IF TASK ALREADY DEFINED * t @ P* ====================================== * t ^ @ P* * t @ P* REFERENCED IN: B:MSEG
0x1ab92c…1abac0 Dummy {f00=0x0080, f01=0x0190, f02=» * t n @ P* FOR MONITOR SEGMENT TASK * u " @ P* * u f @ P* EXIT: A12 - TTAB ADDRESS IF TASK ALREADY DEFINED * u @ P* A12 = 0 IF TASK
0x1abac0…1abc54 (1, 224) Dummy {f00=0x0080, f01=0x0190, f02=» * u v @ P* * v * @ P* SUBROUTINES: PSW * v n @ P* * v @ P******************
0x1abc54…1abde8 Dummy {f00=0x0080, f01=0x0190, f02=»TCT END OF TCTAB v . PCHKT20 SUK A2,2 DECREMENT POINTER IN TCTAB w " P CW A2,SCTTCT START OF TCTAB? w J * P RF(E) CHKT30 YES: ALL TASKS CHECKED! w p $ P LDR* A3,A2 GET POINTER TO TTAB w P LD A3,TTB:ID,A3 GET TASK ID w ( P CWR* A3,A1 EQUAL TO CURRENT T
0x1abde8…1abf7c Dummy {f00=0x0080, f01=0x0190, f02=»D w h . PCHKT50 CFI A14,PSW,A13 STORE PSW ON STACK x P RTN A14 x < P EJECT x L H P******************************************************************* x Z H P* * x H P* BMXSTT - BU
0x1abf7c…1ac110 Dummy {f00=0x0080, f01=0x0190, f02=» * x H P* REFERENCED IN: MXTTAB,B:MSEG * y F H P* * y H P* ENTRY:
0x1ac110…1ac2a4 Dummy {f00=0x0080, f01=0x0190, f02=»SS * y v H P* * z 2 H P* WORK REGISTERS: A2,A9,A10,A11 * z ~ H P*
0x1ac2a4…1ac438 Dummy {f00=0x0080, f01=0x0190, f02=» * z b H P******************************************************************* { PBMXSTT EQU * { j * P LD A12,SCTSFA GET START OF FREE AREA { ~ , P LDKL A10,TTB:TD+2 STANDARD TTAB LENGTH { " P LD A2,SCTOPT GET OPTION WORD { P ANK A
0x1ac438…1ac5cc Dummy {f00=0x0080, f01=0x0190, f02=»LUDE LENGTH { | P RF BMXS40 | ( PBMXS20 LD A2,SCTOPT GET OPTION WORD | & P ANK A2,1 MMU OPTION? | R P RF(Z) BMXS30 NO! | p . P SUKL A12,TTB:MT INCLUDE MMU TABLE IN TTAB | $ P SUKL A10,TTB:MT INCLUDE LENGTH | P RF BMXS40 | ( PBMXS30 LD A2,SCTOP
0x1ac5cc…1ac760 Dummy {f00=0x0080, f01=0x0190, f02=»UKL A10,TTB:CB INCLUDE IN LENGTH | 4 PBMXS40 AD A10,SCTSFA COMPUTE START OF FREE AREA } ( P LDR A9,A10 SAVE } ` 0 P LD A11,STKEND+LIMIT GET END OF SYSTEM AREA } x " P CALL CMPADR MEMORY OVERFLOW? } P RF(NL) BMXS50 NO! } P LDKL A1,LMP3 } ( P CALL
0x1ac760…1ac8f4 (1, 225) Dummy {f00=0x0080, f01=0x0190, f02=»D A2,SCTTCT COMPUTE NEXT FREE ENTRY } " P STR A12,A2 STORE TTAB ADDRESS ~ , ( P IM* SCTTCT INCREMENT CURRENT LENGTH ~ R P IM* SCTTCT TWICE ~ ~ P LDR* A2,A1 GET TASK ID ~ $ P ST A2,TTB:ID,A12 STORE IN TTAB ~ * P LDKL A2,MX:LEV GET MONITOR TASK LEVEL ~
0x1ac8f4…1aca88 Dummy {f00=0x0080, f01=0x0190, f02=»ATUS WORD ~ n : P LD A2,STKEND+EXCTAB GET EXTENT CONTROL BLOCK ADDRESS $ P ST A2,TTB:AP,A12 STORE IN TTAB P P LDK A2,2 x 0 P ST A2,TTB:TD,A12 STORE DEVICE TABLE LENGTH P RTN A14 RETURN P EJECT B P************************************
0x1aca88…1acc1c Dummy {f00=0x0080, f01=0x0190, f02=»=================== * p B P* * & B P* REFERENCED IN: MX:MST * l B P* * B P* ENTRY: SCTMX
0x1acc1c…1acdb0 Dummy {f00=0x0080, f01=0x0190, f02=» - POINTER TO FIRST MONITOR EXTENT BLOCK * B P* A5 - POINTER TO NUMBER OF SEGTABS * : B P* A6 - NUMBER OF MONITOR SEGMENT TABLES * B P* A7 - NUMBER OF MONITOR EXTENTS *
0x1acdb0…1acf44 Dummy {f00=0x0080, f01=0x0190, f02=» R B P* * B P* SUBROUTINES: * N B P* * B P**********************************************
0x1acf44…1ad0d8 Dummy {f00=0x0080, f01=0x018e, f02=»99 NOT PRESENT * P LD A2,MX:NOS,A7 GET NUMBER OF SEGTABS P LDR A6,A2 SAVE D & P LDR A1,A7 SAVE ADDRESS TO MXSTAB * P LD A7,MX:NOX,A7 GET NUMBER OF EXTENTS , P ADK A1,MX:NOS ADDRESS NUMBER OF SEGTABS P LDR A5,A1 SAVE . PMEB10 ADK A1
0x1ad0d8…1ad26c Dummy {f00=0x0080, f01=0x0190, f02=» B P************************************************************** B P* * J B P* MX:MST - GET FIRST MONITOR SEGMENT TABLE * B P* =======================================
0x1ad26c…1ad400 Dummy {f00=0x0080, f01=0x0190, f02=» * b B P* * B P* ENTRY: SCTMXS - ADDRESS TO MXSTAB * ^ B P* * B P* EXIT: A1 - POINTER TO FIRS
0x1ad400…1ad594 (1, 226) Dummy {f00=0x0081, f01=0x0190, f02=»ONITOR SEGMENT TABLES * v B P* A7 - NUMBER OF MONITOR EXTENTS * , B P* * r B P* WORK REGISTERS: A2 * B P*
0x1ad594…1ad728 Dummy {f00=0x0081, f01=0x0190, f02=» * B P************************************************************** @ P EJECT PMX:MST EQU * : P CALL MX:MEB GET POINTER TO FIRST MONITOR EXTENT BLOCK 2 P LDR A2,A7 GET NUMBER OF MONITOR E
0x1ad728…1ad8bc Dummy {f00=0x0081, f01=0x0190, f02=»MX:EBL ADDRESS NEXT MONITOR EXTENT BLOCK P RB MST10 0 PMST99 RTN A14 RETURN B P EJECT ^ B P************************************************************* l B P* * B P* MX:TDB - GET
0x1ad8bc…1ada50 Dummy {f00=0x0081, f01=0x0190, f02=» * B P* REFERENCED IN: MX:STD * : B P* * B P* ENTRY: SCTMXS - ADDRESS TO MXSTAB *
0x1ada50…1adbe4 Dummy {f00=0x0081, f01=0x0190, f02=» R B P* DEFINITION BLOCK * B P* A5 - POINTER TO FIRST MONITOR EXTENT BLOCK * N B P* A6 - NUMBER OF MONITOR SEGMENT TABLES * B P* A7 - NUMBER OF MONITOR EXTENTS
0x1adbe4…1add78 Dummy {f00=0x0081, f01=0x0190, f02=» * f B P* * B P* SUBROUTINES: MX:MST * b B P* * B P**************************
0x1add78…1adf0c Dummy {f00=0x0081, f01=0x018e, f02=»2,A6 GET NUMBER OF SEGMENT TABLES . PTDB10 ADK A5,2 ADDRESS NUMBER OF SEGMENTS * * P SUK A2,1 DECREMENT NUMBER OF SEGTABS P RF(N) TDB99 NO MORE SEGTABS & P LDR* A3,A5 GET NUMBER OF SEGMENTS 0 PTDB20 SUK A3,1 DECREMENT NUMBER OF SEGMENTS
0x1adf0c…1ae0a0 Dummy {f00=0x0081, f01=0x0190, f02=» z P EJECT B P************************************************************** B P* * B P* MS:STD - GET FIRST MONITOR SEGMENT TASK DEFINITION BLOCK * B P* =============================
0x1ae0a0…1ae234 (1, 227) Dummy {f00=0x0081, f01=0x0190, f02=» * t B P* * * B P* ENTRY: * p B P* * B P* EXIT: A1
0x1ae234…1ae3c8 Dummy {f00=0x0081, f01=0x0190, f02=» A5 - POINTER TO FIRST MONITOR EXTENT BLOCK * B P* A6 - NUMBER OF MONITOR SEGMENT TABLES * > B P* A7 - NUMBER OF MONITOR EXTENTS * B P* *
0x1ae3c8…1ae55c Dummy {f00=0x0081, f01=0x0190, f02=» * V B P* SUBROUTINES: MX:TDB * B P* * R B P************************************************************** P EJECT PMX:STD EQU * 2 P CALL MX
0x1ae55c…1ae6f0 Dummy {f00=0x0081, f01=0x0190, f02=» EXTENTS f P RF(N) STD99 NO MORE EXTENTS . P LDR* A3,A1 GET NUMBER OF TASKS IN EXTENT 4 " PSTD20 ADK A1,2 ADDRESS TASK ID f ( P SUK A3,1 DECREMENT NUMBER OF TASKS P RB(NN) STD20 MORE TASKS P RB STD10 NEXT EXTENT PSTD99 RTN A14 RETU
0x1ae6f0…1ae884 Dummy {f00=0x0081, f01=0x0190, f02=»****** x P* P* REFERENCED IN: SYSLDM P* 8 P* ENTRY: B P* T 8 P* EXIT: TC:TAB CONTAIN POINTERS TO ALL TASK TABLES ^ P* P* WORK REGISERS: A1-A12 P* 8 P* SUBROUTINES: CONVRT,GETTSK,TETTDC,GETCLN,GETSDC
0x1ae884…1aea18 Dummy {f00=0x0081, f01=0x0190, f02=»ALLOCATION I z * P* I BIT MAP (4 WORDS) I * P* I______________________I F * P* TTB:MT I MMU I t * P* I TABLE I * P* I 16 I * P*
0x1aea18…1aebac Dummy {f00=0x0081, f01=0x018e, f02=» I______________________I * P* TTB:SP I SEGTAB POINTER I & * P* I______________________I T * P* TTB:SB I SEGM. BLOCK POINTER I * P* I----------------------I * P* TTB:AP I ACB POINTER I
0x1aebac…1aed40 Dummy {f00=0x0081, f01=0x0190, f02=» h * P* TTB:ID I TASK IDENTIFICATION I * P* ------------------------ 6 * P* TTB:ST I STATUS/LEVEL I d * P* ------------------------ * P* TTB:PP I PENDING QUEUE I * P* ------------
0x1aed40…1aeed4 (1, 228) Dummy {f00=0x0081, f01=0x0190, f02=»TCH ADDRESS I x * P* ------------------------ * P* I REGISTER I D * P* I SAVE I r * P* I AREA I * P* I 14 I * P*
0x1aeed4…1af068 Dummy {f00=0x0081, f01=0x0190, f02=» I SAVE01URATION I * P* I TABLE I $ * P* : : R * P* : : * P* I______________________I 2 P* TASK SAVE01URATION TABLE LAYOU
0x1af068…1af1fc Dummy {f00=0x0081, f01=0x0190, f02=»---------------------- z 0 P* I INDEX/FILCODE I 0 P* ------------------------------ R 0 P* I DWT-ADDRESS I 0 P* ------------------------------ 0 P* :
0x1af1fc…1af390 Dummy {f00=0x0081, f01=0x0190, f02=» I INDEX/FILECODE I 0 P* ------------------------------ . 0 P* I DWT-ADDRESS I b 0 P* ------------------------------ P EJECT PB:TT EQU * & P CALL FSTAPL GET FIRST APPLICA
0x1af390…1af524 Dummy {f00=0x0081, f01=0x0190, f02=» d * P ST P,STKEND+WRK1 SAVE PROGRAM COUNTER : P ST A11,STKEND+LCDSTA SAVE CONFIGURATION DATA POINTER 6 * P ST P,STKEND+WRK2 SAVE PROGRAM COUNTER t P* ( P* GET NUMBER OF TASKS IN THIS CLASS P* P CALL GETTSK . P ST A1,STKEND+NBRT
0x1af524…1af6b8 Dummy {f00=0x0081, f01=0x0190, f02=»5,8 MOVE TO LEFT BYTE * P LC A5,TDBID+5,A11 GET SECOND ID DIGIT 2 P ST A5,STKEND+TASKID SAVE TASK ID START VALUE L P* " P* CHECK IF CREDIT APPLICATION P* 6 P LD A5,STKEND+APCSTA GET APPLICATION CONTROL BLOCK * P LD A5,APLTYP,A5 G
0x1af6b8…1af84c Dummy {f00=0x0081, f01=0x0190, f02=»ATCH VALUE z P* , P LC A5,TDBMC+4,A11 GET FIRST CHAR IN TCL P SLL A5,8 MOVE TO LEFT BYTE L . P LC A5,TDBMC+5,A11 GET SECOND CHAR IN TCL p $ P CALL GETTCL GET TCL START VALUE P ST A5,STKEND+TCLSAV SAVE PBTT21 EQU * P EJECT
0x1af84c…1af9e0 Dummy {f00=0x0081, f01=0x018e, f02=» 0 P LC A5,TDBTL+5,A11 GET SECOND DIGIT IN LEVEL " P CALL CONVRT CONVERT TO BINARY 8 P ST A1,STKEND+TSKLEV SAVE ^ P EJECT P* B P* COMPUTE SIZE OF CONFIGURATION DEPENDENT PART OF TASK TABLE P* & P LDKL A10,TTB:TD+4 STANDARD LENG
0x1af9e0…1afb74 (1, 229) Dummy {f00=0x0081, f01=0x018e, f02=» P RF(NZ) BTT22 NO! 0 P SUKL A10,TTB:AM+2 INCLUDE BIT MAP IN LENGTH . P SUKL A12,TTB:AM RESERV SPACE FOR BIT MAP R P RF BTT30 PBTT22 LD A5,SCTOPT P SRC A5,1 MMU PAGING? P RF(NN) BTT25 NO . P SUKL A10,TTB:MT+2 16+2 WORD EXTRA
0x1afb74…1afd08 Dummy {f00=0x0081, f01=0x0190, f02=» P RF(NN) BTT30 NO! 6 P SUKL A10,TTB:CB+2 FOUR WORD EXTRA IF DISC PAGING 0 P SUKL A12,TTB:CB RESERV SPACE FOR EXTRA WORD X PBTT30 EQU * P EJECT P* < P* COMPUTE SIZE OF TERMINAL DEVICE CLASS DEPENDENT PART " P* OF TASK CONFI
0x1afd08…1afe9c Dummy {f00=0x0081, f01=0x0190, f02=»FST TERMINAL DEVICE CLASS DEFINITION $ P CALL GETTDC GET NUMBER OF TDC:S , P LDR A7,A1 SAVE T PBTT35 EQU * l P RF(Z) BTT40 ( P CALL GETCLN GET CLASS NUMBER (1-99) & P ADR A1,A1 2*(BINARY CLASS NUMBER) , P LD A8,STKEND+TCLA GET POINTER
0x1afe9c…1b0030 Dummy {f00=0x0081, f01=0x018e, f02=»TE FORMAT ERROR ~ PBTT37 EQU * " P ADR A8,A1 GET ENTRY IN TCLASS , $ P LDR* A8,A8 GET POINTER TO CLASS R $ P LDR* A8,A8 GET LENGTH OF CLASS z " P SUKL A8,2 EXCLUDE LENGTH WORD ( P ADR A10,A8 ADD TO TOTAL TTAB LENGTH . P ADR A6,A8 ADD TO TA
0x1b0030…1b01c4 Dummy {f00=0x0081, f01=0x0190, f02=» PBTT40 EQU * P* > P* COMPUTE SIZE OF SPECIAL DEVICE CLASS DEPENDENT PART OF & P* TASK CONFIGURATION TABLE h P* 6 P CALL GETSDC GET NUMBER OF SPECIAL DEVICE CLASSES P ADKL A9,2 FIRST SDC RECORD P LDR A7,A1 SAVE
0x1b01c4…1b0358 Dummy {f00=0x0081, f01=0x0190, f02=»R) p , P LD A8,STKEND+SCLA GET POINTER TO SCLASS P LDR* A2,A8 : P SUK A2,2 N P CWR A1,A2 ` P RF(NG) BTT52 r P LDKL A1,LMP4 & P CALL ERROR INDICATE FORMAT ERROR PBTT52 EQU * " P ADR A8,A1 GET ENTRY IN SCLASS $ P LDR*
0x1b0358…1b04ec Dummy {f00=0x0081, f01=0x0190, f02=» TTAB LENGTH x . P ADR A6,A8 ADD TO TASK CONF. TABLE LENGTH P ADKL A9,SDC NEXT CLASS F ( P SUK A7,1 DECREMENT NUMBER OF SDC:S f P RB BTT50 PBTT55 EQU * P IFF EDM=0 & P ADKL A10,14 7 EXTRA WORDS FOR EDM P XIF " P ADK A6,
0x1b04ec…1b0680 Dummy {f00=0x0081, f01=0x0190, f02=»LASS ^ PBTT60 EQU * P RF(Z) BTT70 P ST A9,STKEND+WRK3 SAVE A9 4 P ST A11,STKEND+WRK4 SAVE A11 V P LDR A9,A10 GET TTAB LENGTH z 4 P AD A9,STKEND+SFASAV COMPUTE END OF FREE AREA =2 P ST A9,STKEND+SFASAV =2 0 P LD A11,STKEND+LIM
0x1b0680…1b0814 (1, 230) Dummy {f00=0x0082, f01=0x0190, f02=»ORY OVERFLOW v P CALL ERROR & PBTT61 LD A9,STKEND+WRK3 RESTORE A9 ( $ P LD A11,STKEND+WRK4 RESTORE A11 R P* z 8 P* STORE LENGTH OF TASK SAVE01URATION TABLE IN TTAB P* P ST A6,TTB:TD,A12 P* : P* STORE TASK LEVEL IN RIG
0x1b0814…1b09a8 Dummy {f00=0x0082, f01=0x0190, f02=» < P* STORE TASK LEVEL IN LEFT BYTE OF PROGRAM STATUS WORD P* D & P SLL A5,10 MOVE LEVEL TO LEFT BYTE N P ORKL A5,/00C0 x " P LD A2,SCTOPT GET OPTION WORD P ANK A2,1 MMU OPTION? P ORR A5,A2 SET BIT 15 IF MMU $ P ST A5,TTB:PW,A12
0x1b09a8…1b0b3c Dummy {f00=0x0082, f01=0x0190, f02=» IN TTAB t P* * PBTT62 LD A5,STKEND+TASKID GET TASK ID $ P ST A5,TTB:ID,A12 STORE IN TTAB H P ADK A5,1 INCREMENT TASK ID p 8 P ST A5,STKEND+TASKID SAVE TO NEXT TASK IN SAME CLASS 0 P LD A5,STKEND+APCSTA GET APPL. CONTROL BLOCK , P ST
0x1b0b3c…1b0cd0 Dummy {f00=0x0082, f01=0x0190, f02=»* ( P* STORE TASK CLASS TO MATCH IN TTAB P* 6 , P LD A5,STKEND+TCLSAV GET TCL START VALUE @ " P ST A5,TTB:PP,A12 SAVE IN TTAB p P ADK A5,1 INCREMENT TCL P ST A5,STKEND+TCLSAV SAVE PBTT65 EQU * , P STR A12,A7 SAVE TTAB ADDRES
0x1b0cd0…1b0e64 Dummy {f00=0x0082, f01=0x0190, f02=»AB ENTRY IN THIS TASK CLASS | 6 P SUKL A8,1 DECREMENT NUMBER OF TASKS IN THIS CLASS $ P RB BTT60 ^ P EJECT p PBTT70 EQU * ~ P* * P* RESET POINTER TO START OF FREE AREA P* P LD A12,STKEND+SFASAV PBTT90 EQU * P C
0x1b0e64…1b0ff8 Dummy {f00=0x0082, f01=0x018e, f02=»* " P CALL NXTAPL NEXT APPLICATION P RF(Z) BTT98 0 P LD P,STKEND+WRK1 D 0 PBTT98 ST A12,SCTSFA SAVE START OF FREE AREA ^ P SU A7,SCTTCT COMPUTE LENGTH P ST* A7,SCTTCT STORE P RTN A14 RETURN P IFF SWPBLK=0 P EJECT
0x1b0ff8…1b118c Dummy {f00=0x0082, f01=0x0190, f02=» p P RF(Z) BSWT42 NO 0 P CM STKCOM+APPLNO RESET APPLICATION COUNTER , P ST P,STKEND+LIMIT SAVE LOCATION COUNTER T 0 PBSWT05 LDKL A1,'CR' APPLICATION TYPE=CREDIT , P CALL GETAPP GET NEXT CREDIT APPLICATION & P RF(Z) BSWT42 NO MORE APPLICATIO
0x1b118c…1b1320 Dummy {f00=0x0082, f01=0x0190, f02=»EARCH FOR SWB TYPE DEFINITION BLOCK IN CONF. FILE P* : & PBSWT10 CALL NXTBLK GET NEXT BLOCK D ( P CCK A2,'TT' TASK DEFINITION BLOCK? n P RB(E) BSWT10 YES! 0 P CCK A2,'CC' COMMON DEVICE DEFINITION BLOCK? P RF(NE) BSWT20 NO! P ADKL
0x1b1320…1b14b4 (1, 231) Dummy {f00=0x0082, f01=0x0190, f02=»L A11,1 NUMBER OF TYPES P LDR A6,A11 & P CALL GETNUM NUMBER OF UWB RECORDS 4 P LDR A1,A5 SAVE ^ $ P RF(Z) SWBERR ILLEGAL NUMBER!!! v ( P ADKL A11,UDBFST-1 FIRST UWB RECORD ( PBSWT30 ADKL A11,6 BYPASS UWB RECORD $ P SUK A1,1 DECR. NU
0x1b14b4…1b1648 Dummy {f00=0x0082, f01=0x0190, f02=»TION BLOCK n P RF(E) BSWT44 YES! ( P LDKL A1,0 NO SWB DEFINITION BLOCK! , ( P ST A1,APLSWB,A10 CLEAR SWB POINTER X : P LD P,STKEND+LIMIT PROCESS NEXT CREDIT APPLICATION =2 & PBSWT42 CALL POB RESTORE REGISTERS P RTN A14 & PBSWT44 ADKL
0x1b1648…1b17dc Dummy {f00=0x0082, f01=0x018e, f02=»DR A5,A5 ZERO? $ P RF(Z) SWBERR ILLEGAL NUMBER!!! 0 P ST A5,STKEND+NBRSWB SAVE NUMBER OF RECORDS > P ST A5,STKEND+WRK1 SAVE r . P LD A8,STKCOM+SWBFLG GET ADDRESS TO $SWAPP P RF(NZ) BSWT48 FILE CREATED " PSWBERR LDKL A1,LMP6 SWB ERROR!
0x1b17dc…1b1970 Dummy {f00=0x0082, f01=0x018e, f02=» P ADKL A12,2 FIRST POINTER P LDR A10,A12 SAVE & $ PBSWT50 ADKL A10,2 BYPASS POINTER @ ( P SUK A5,1 DECREMENT NUMBER OF TYPES h P RB(P) BSWT50 P* & P* GET ADDRESS TO S:BTAB PROTOTYPE P* , P LD A2,STKEND+APCSTA GET ADDRESS
0x1b1970…1b1b04 Dummy {f00=0x0082, f01=0x0190, f02=» j $ P CALL GETCON GET P:MTAB ADDRESS P LDR A2,A1 SAVE 0 , P ADKL A2,S:BTAB DISPL. TO S:BTAB ADDRESS H $ P CALL GETCON GET S:BTAB ADDRESS x * P LDR A2,A1 GET ADDRESS TO PROT. S:BTAB * P RB(Z) SWBERR NO SWB:S IN APPLICATION! P ADK A1,2 AD
0x1b1b04…1b1c98 Dummy {f00=0x0082, f01=0x0190, f02=»ROT. S:BTAB t P LDR A4,A1 SAVE P* , 2 P* CHECK IF ENOUGTH MEMORY IN FIRST PARTITION 6 P* l P XRR A2,A2 RESET COUNTER v $ PBSWT52 SUK A1,6 DECREMENT LENGTH $ P RF(N) BSWT55 NO MORE SWB-BLOCKS " P ADK A2,1 INCR. BLOCK COUNTER
0x1b1c98…1b1e2c Dummy {f00=0x0082, f01=0x0190, f02=»1,STKEND+LIMIT GET CURRENT LIMIT " P CALL CMPADR MEMORY OVERFLOW? ( P RF(NL) BSWT57 NO! N * P LDKL A1,LMP3 INDICATE MEMORY OVERFLOW h P CALL ERROR $ PBSWT57 SUK A4,2 SKIP LENGTH WORD " P LDKL A9,0 RESET BLOCK COUNTER , PBSWT60 STR A10,A
0x1b1e2c…1b1fc0 Dummy {f00=0x0082, f01=0x0190, f02=» NUMBER OF SWB RECORDS | 4 PBSWT65 LD A2,STKEND+SWBNAM NAME RECORD IN PROT. $ P CALL GETCON GET TWO FIRST CHAR. V ( P ADKL A11,NAMUWB NAME IN CONF. FILE ~ P LCR A3,A11 GET FIRST CHAR. P SLL A3,8 MOVE TO LEFT BYTE " P LC A3,1,A11 GET SECON
0x1b1fc0…1b2154 (1, 232) Dummy {f00=0x0082, f01=0x0190, f02=»ET THIRD CHAR. P SRL A1,8 ISOLATE CHAR. 0 P LC A3,2,A11 GET THIRD CHAR. FROM CONF. FILE 6 P ANK A3,/FF ISOLATE CHAR. j " P CWR A1,A3 THIRD CHAR. EQUAL? P RF(E) BSWT75 YES! $ PBSWT70 ADKL A11,NAMUWB SKIP NAME ( P SUK A7,1 DECREMENT
0x1b2154…1b22e8 Dummy {f00=0x0082, f01=0x018e, f02=»OCK J P* P STR A7,A10 1:ST WORD P ST A7,2,A10 2:ND WORD 4 P ST A7,4,A10 3:RD WORD R P ST A7,6,A10 4:TH WORD p P RF BSWT95 PBSWT75 EQU * P* P* MATCHING NAME FOUND P* . P LD A3,STKEND+WRK1 GET NUMBER OF S
0x1b22e8…1b247c Dummy {f00=0x0082, f01=0x0190, f02=» P LDR A3,A2 SAVE POINTER & P CALL GETNUM GET NUMBER OF COPIES $ , P SLL A5,8 NUMBER OF COPIES IN LEFT BYTE N > P OR A5,STKCOM+SWBFSA+2 DISC ADDRESS BITS 0-7 IN RIGHT BYTE ~ " P STR A5,A10 STORE IN SWB BLOCK , P SRL A5,8 NUMBER OF COPIES TO RIGH
0x1b247c…1b2610 Dummy {f00=0x0082, f01=0x0190, f02=»2,UPNAME PROTOTYPE ADDRESS & P CALL GETCON GET PROTOTYPE ADDRESS " P LDR A2,A1 SAVE L & P SUK A2,UPNAME LENGTH OF WORKBLOCK d P CALL GETCON * P ST A1,SWBLEN,A10 STORE LENGTH OF SWB 0 PBSWT85 LD A3,SWBLEN,A10 GET LENGTH OF BLOCK " P LDK
0x1b2610…1b27a4 Dummy {f00=0x0082, f01=0x0190, f02=» IM STKCOM+SWBFSA+2 P CM STKCOM+SWBFSA PBSWT90 EQU * 6 & P ADK A1,1 INCREMENT SECTOR COUNTER J " P SUKL A3,256 DECREMENT LENGTH t P RB(P) BSWT86 MOORE SECTORS? P SUK A5,1 MOORE COPIES? P RB(P) BSWT85 YES! * P ST A1,SWBSEC,A1
0x1b27a4…1b2938 Dummy {f00=0x0082, f01=0x0190, f02=» z ( P RF(G) BSWT98 $SWAP-FILE TOO SMALL! P RF(L) BSWT95 4 P LD A8,STKCOM+SWBFSA J P CW A8,STKCOM+SWBFSE f ( P RF(G) BSWT98 SWAPP-FILE TOO SMALL! * PBSWT95 ADKL A10,8 START OF NEXT BLOCK P ADKL A12,2 NEXT POINTER & P ADKL A9,1 I
0x1b2938…1b2acc Dummy {f00=0x0082, f01=0x0190, f02=» P ST A2,STKEND+SWBNAM SAVE 4 P LD A4,STKEND+SWBTBL GET LENGTH OF PROT. S:BTAB & P SUK A4,UP:REC DECREMENT ^ P RB(P) BSWT60 MOORE TYPES ~ . P LD A8,STKCOM+SWBCNT ANY BLOCKS GENERATED? P RF(Z) BSWT98 NO! . P LD A8,STKEND+WRK1 ALL SWB T
0x1b2acc…1b2c60 Dummy {f00=0x0082, f01=0x0190, f02=»START OF FREE AREA t 2 P LD A10,STKEND+APCSTA GET CURRENT ACB ADDRESS * P ST* A9,APLSWB,A10 NUMBER OF SWB TYPES P 6 P LD P,STKEND+LIMIT PROCESS NEXT CREDIT APPLICATION ~ P XIF P IFF MMUPAG+DSKPAG=0 P EJECT 8 P**************************
0x1b2c60…1b2df4 (1, 233) Dummy {f00=0x0082, f01=0x0190, f02=» * f 8 P* ============================= * 8 P* * N 8 P* REFERENCED IN: SYSLDM * 8 P* * 8 P* ENT
0x1b2df4…1b2f88 Dummy {f00=0x0082, f01=0x0190, f02=» * z 8 P* * & 8 P* WORK REGISTERS: A1-A14 (THEIR ORIGINAL * b 8 P* CONTENTS ARE SAVED ON STACK * 8 P* AND RESTORED BEFORE EXIT)
0x1b2f88…1b311c Dummy {f00=0x0082, f01=0x0190, f02=» FOR BASIC ONE SEGMENT TABLE AREA/TASK IS * 8 P* RESERVED. THE FIFTH WORD IN EACH SEGMENT TABLE * : 8 P* CONTAINS A POINTER TO THE FIFTH WORD IN NEXT * v 8 P* EXCEPT THE LAST CONTAINS A PONTER TO THE FIFTH * 8 P* WORD IN THE NEXT SEGMEN
0x1b311c…1b32b0 Dummy {f00=0x0082, f01=0x0190, f02=»EGMENT * f 8 P* TABLE PER APPLICATION IS GENERATED. STATUS, * 8 P* DISK ADDRESS AND LENGTH FOR EACH SEGMENT IS * N 8 P* WRITTEN IN CORRESPONDING SEGBLK. THE SEGMENT * 8 P* TABLE ADDRESS IS STORED IN THE TTAB FOR EACH * 8 P* TAS
0x1b32b0…1b3444 Dummy {f00=0x0082, f01=0x0190, f02=»***************************** z P EJECT & PB:STAB EQU * 4 $ P CALL PUSH SAVE A1-A14 ON STACK H & P CALL FSTAPL GET FIRST APPLICATION p " P LDR A9,P GET LIMIT FOR WRITE < PBST010 LD A10,STKEND+APCSTA SAVE POINTER TO CURRENT ACB . P CALL NX
0x1b3444…1b35d8 Dummy {f00=0x0082, f01=0x0190, f02=»D OF TCTAB P RF BST040 4 PBST020 LD A2,APLMMC,A2 GET END OF TCTAB ENTRIES $ $ PBST040 ST A2,STKEND+TCTEND SAVE P LDR A8,P 8 PBST045 ADKL A8,BST400-BST045 RELOCATE BRANCH ADDRESS 2 P LD A5,APLMMP,A10 GET CURRENT APPLICATION TYPE ( P
0x1b35d8…1b376c Dummy {f00=0x0082, f01=0x0190, f02=»Y j P CWK A5,'BA' BASIC? P RF(NE) BST050 NO & P SUR A2,A8 2*NUMBER OF TASKS @ P SRL A2,1 NUMBER OF TASKS d P ST A2,STKEND+WRK1 SAVE P ST A2,APLNPE,A10 SAVE . P LD A3,SCTNOS GET NUMBER OF SEGMENTS/TASK P SLL A3,3 MULTIPLY
0x1b376c…1b3900 Dummy {f00=0x0082, f01=0x0190, f02=» P RF BST090 P EJECT ( PBST050 LD A2,SCTOPT GET OPTION WORD $ P ANK A2,1 MMU? P P RF(Z) BST070 NO f P LDR* A7,A8 GET TTAB ADDRESS ~ P TL TTB:MT,A7 LOAD MMU TABLE * PBST070 LD A2,APLLAC,A10 ADDRESS S:GTAB * P ADK A2,10 ADDRESS N
0x1b3900…1b3a94 (1, 234) Dummy {f00=0x0083, f01=0x0190, f02=» BY 8 ~ $ P ADK A3,12 INCLUDE 6 FIRST WORDS 0 PBST090 LD A12,SCTSFA GET START OF FREE AREA 6 ( P LDR A2,A11 SAVE CONF. DATA POINTER j P LDR A11,A12 SAVE * P ADR A11,A3 END OF SEGMENT TABLE AREA " P CALL CMPADR MEMORY OVERFLOW? P RF(
0x1b3a94…1b3c28 Dummy {f00=0x0083, f01=0x0190, f02=» ` * P LDR A11,A2 RESTORE CONF. DATA POINTER P CWK A5,'BA' BASIC? 6 P RF(NE) BST200 NO R * P LD A2,STKEND+WRK1 GET NUMBER OF TASKS l . P LD A3,SCTNOS GET NUMBER OF SEGMENTS/TASK 0 P ADK A3,NBRDPS ADD NUMBER OF DATA PAGES/TASK P CALL MU
0x1b3c28…1b3dbc Dummy {f00=0x0083, f01=0x0190, f02=»APLSEG,A10 STORE ADDRESS TO SEGMENT TABLE POOL P EJECT 6 P* D P* CLEAR SEGMENT TABLE AREA N P* r 0 P LD A2,SCTSFA GET END OF SEGMENT TABLE AREA | & PBST110 SUK A2,2 DECREMENT POINTER P CMR A2 CLEAR , P CWR A2,A12 START OF SEG
0x1b3dbc…1b3f50 Dummy {f00=0x0083, f01=0x0190, f02=»LE AREA? p P RF(E) BST400 YES 2 P ADK A2,8 ADDRESS FIFTH WORD IN SEGMENT TABLE * 2 P ST A2,8,A12 STORE IN PRECEDING SEGMENT TABLE ` , P ADR A12,A4 START OF NEXT SEGMENT TABLE P LDR A2,A12 SAVE P RB BST120 0 PBST200 ST A6,2,A12 STORE
0x1b3f50…1b40e4 Dummy {f00=0x0083, f01=0x018e, f02=»A3,SCTIPL GET FILE-CODE FOR LOAD DEVICE P STR A3,A12 STORE 0 ( P ADKL A12,4 ADDRESS SEGMENT BLOCK 0 J P LDR A4,A12 SAVE v . PBST210 LDKL A2,/8400 STATUS FOR SEGMENT 0 " P STR A2,A12 STORE IN SEGBLK 0 * P LD A2,APLLAC,A10 GET START OF S:G
0x1b40e4…1b4278 Dummy {f00=0x0083, f01=0x0190, f02=» x " P ST A1,2,A12 STORE IN SEGBLK 0 * P LD A2,APLLAC,A10 GET START OF S:GTAB . * P ADK A2,10 ADDRESS NUMBER OF SEGMENTS ( PBST220 ADKL A12,8 NEXT SEGMENT BLOCK P SUK A6,1 ANY MORE SEGMENTS? P RF(N) BST300 NO P LDK A7,0 INIT STATUS
0x1b4278…1b440c Dummy {f00=0x0083, f01=0x0190, f02=» $ P ANK A3,/FF ISOLATE DISC ADDRESS " P SRL A1,8 ISOLATE SEGMENT TYPE , ( P CCK A1,'RR' CORE RESIDENT SEGMENT? R P RF(E) BST230 YES ~ " P LD A1,SCTOPT GET OPTION WORD P ANK A1,2 DISC PAGING? P RF(NZ) BST240 YES " P XRR A3,A3 CLEAR D
0x1b440c…1b45a0 Dummy {f00=0x0083, f01=0x0190, f02=»BST270 : PBST230 LDKL A7,/8800 INDICATE CORE RESIDENT AND LOADED * PBST240 ADK A2,2 DISC ADDRESS BIT 8-23 L * P CALL GETCON GET SEGMENT DISC ADDRESS z 0 P AD A1,APLADA+2,A10 RELOCATE PART 2 OF D. A. P RF(O) BST250 CARRY P RF BST260 *
0x1b45a0…1b4734 (1, 235) Dummy {f00=0x0083, f01=0x018e, f02=»1 OF D. A. j . P CWK A3,255 OVERFLOW IN PART 1 OF D. A. ? P RF(NG) BST270 NO! D ( P LDKL A1,LMP10 INDICATE DEVICE ERROR ^ P CALL ERROR 2 PBST270 ORR A7,A3 MERGE STATUS AND DISC ADDRESS P STR A7,A12 STORE , P ST A1,2,A12 STORE DISC AD
0x1b4734…1b48c8 Dummy {f00=0x0083, f01=0x0190, f02=» & P CM 6,A12 CLEAR PAGEBLOCK POINTER P RB BST220 . 0 PBST300 CW A8,STKEND+TCTEND LAST TCTAB ENTRY? @ P RF(E) BST400 YES t P LDR* A2,A8 GET TTAB ADDRESS 0 P ST A4,TTB:SP,A2 STORE SEGMENT TABLE POINTER * P ADKL A8,2 INCREMENT POINTER IN TC
0x1b48c8…1b4a5c Dummy {f00=0x0083, f01=0x0190, f02=» A9 NEXT APPLICATION PBST410 EQU * P CALL POB RESTORE REGISTERS 0 P RTN A14 RETURN T P XIF l P IFF SPDVCL+TEDVCL=0 x P EJECT L P************************************************************************ J P* B:DWTS - BUILD DWT:
0x1b4a5c…1b4bf0 Dummy {f00=0x0083, f01=0x0190, f02=»* P* REFERENCED IN: MONCON P* * , P* ENTRY: SCTSFA - START OF FREE ARE (X) 4 2 P* CONSTA - START OF CONFIGURATION DATA d ( P* SCTEFA - END OF FREE AREA P* P* EXIT: P* P* WORK REGISTERS: A1-A12
0x1b4bf0…1b4d84 Dummy {f00=0x0083, f01=0x0190, f02=»ET START OF CONFIGURATION FILE P* & & P LD A12,SCTSFA START OF FREE AREA 0 P* Z 6 P* CHECK IF FIRST BLOCK IS A TASK DEFINITION BLOCK d P* & P CALL FSTAPL GET FIRST APPLICATION 0 P ST P,STKEND+LIMIT UPDATE END OF SYSTEM AREA , P S
0x1b4d84…1b4f18 Dummy {f00=0x0083, f01=0x0190, f02=» ENTRY j P SUK A7,2 P EJECT PDWTS10 EQU * . P* B . P* GET NUMBER OF TASKS IN THIS TASK CLASS L P* ~ P CALL GETTSK PDWTS20 EQU * P ST A1,STKEND+NBRTSK SAVE P* * P* GET CORRESPONDING TASK TABLE (TTAB)
0x1b4f18…1b50ac Dummy {f00=0x0083, f01=0x0190, f02=»CE TABLE ENTRY t P* 0 P* INIT SUB-POINTER IN TASK DEFINITION BLOCK P* T . P LDR A9,A11 START OF TASK DEFINITION BLOCK ^ , P ADKL A9,TDBFST START OF TDC DEFINITION P EJECT P* 4 P* GET NUMBER OF TERMINAL DEVICES IN THIS CLASS
0x1b50ac…1b5240 Dummy {f00=0x0083, f01=0x018e, f02=»1,A1 , P LD A8,STKEND+TCLA GET POINTER TO TCLASS P ADR A8,A1 GET CLASS ENTRY < $ P LDR* A8,A8 GET POINTER TO CLASS ^ $ P LDR* A8,A8 GET LENGTH OF CLASS " P SUKL A8,2 EXCLUDE LENGTH WORD * P ADR A10,A8 INCREMENT POINTER IN TTAB 0 P ADKL
0x1b5240…1b53d4 (1, 236) Dummy {f00=0x0083, f01=0x0190, f02=» , P* GET NUMBER OF SPECIAL DEVICE CLASSES P* 4 P CALL GETSDC > P ADKL A9,SDCFST-CDBNC R P LDR A1,A1 p PDWTS50 EQU * P RF(Z) DWTS90 P ST A1,STKEND+NBRSDC SAVE P* & P* GET SPECIAL DEVICE CLASS NUMBER P*
0x1b53d4…1b5568 Dummy {f00=0x0083, f01=0x0190, f02=»SCLA POINTER TO SCLASS P ADR A6,A1 SELECT ENTRY $ P LDR* A6,A6 GET POINTER TO CLASS > P LDR A5,A6 SAVE f P LDR* A6,A6 GET LENGTH ~ " P SUK A6,2 EXCLUDE LENGTH WORD PDWTS60 EQU * P ADK A5,4 GET DEVICE ( P LDR* A1,A5 GET ADDRES
0x1b5568…1b56fc Dummy {f00=0x0083, f01=0x0190, f02=»2,A12 TO-ADDRESS , P ADR A12,A3 UPDATE POINTER TO FREE AREA P CALL CHKMOV COPY DWT H P EJECT f P* t 4 P* RELOCATE MONITOR ECB ADDRESS IF MMU IN SYSTEM ~ P* " P LD A3,SCTOPT GET OPTION WORD P ANK A3,1 MMU IN SYSTEM? P R
0x1b56fc…1b5890 Dummy {f00=0x0083, f01=0x0190, f02=»ONITOR ECB-ADDRESS z P SUR A4,A3 RELOCATE $ P ANKL A4,/FFFE MAKE EVEN ADDRESS 6 " P ST A4,DWTMEC,A2 STORE IT BACK ^ PDWTS65 EQU * $ P LDR A1,A2 DT-ADDRESS TO BE USED PDWTS70 EQU * P* . P* STORE FILE-CODE AND DWT-ADDRESS IN TTAB
0x1b5890…1b5a24 Dummy {f00=0x0083, f01=0x0190, f02=»0,4 UPDATE TASK CONFIGURATION POINTER PDWTS80 EQU * . * P SUK A6,4 DECREMENT NUMBER OF DEVICES B P RB(P) DWTS60 NEXT DEVICE p P EJECT P* 4 P* CHECK IF MOORE SPECIAL DEVICES IN THIS CLASS P* P ADKL A9,SDC P LD A1
0x1b5a24…1b5bb8 Dummy {f00=0x0083, f01=0x0190, f02=»ION ` P* P LD A1,STKEND+NBRTSK P SUK A1,1 2 P RB(P) DWTS20 D P* Z , P* CHECK IF MOORE TASK DEFINITION BLOCKS d P* P CALL NXTBLK ( P CCK A2,'TT' TASK DEFINITION BLOCK? P RB(E) DWTS10 YES & P CALL NXTAPL GET
0x1b5bb8…1b5d4c Dummy {f00=0x0083, f01=0x018e, f02=»R ECHO DEVICE p & P* AND TEMPORARY INTERRUPT TABLES P* @ & P LDR A1,P GET LOCATION COUNTER =4 J 0 PDWTS95 SUK A1,2 DECREMENT MEMORY ADDRESS =4 t P CMR A1 CLEAR MEMORY AREA =4 ( P CW A1,SCTSFA ALL WORDS CLEARED? =4 P RB(NE) DWTS95 N
0x1b5d4c…1b5ee0 Dummy {f00=0x0083, f01=0x0190, f02=» ^ 4 P* B:DWTT - BUILD TERMINAL DEVICE WORK TABLES * 4 P************************************************ @ 4 P************************************************ x P* P* REFERENCED IN: MONCON P* P* ENTRY: P* P* EXIT:
0x1b5ee0…1b6074 (1, 237) Dummy {f00=0x0083, f01=0x0190, f02=» P EJECT PB:DWTT EQU * $ P CM STKEND+FWTFLG CLEAR FWT FLAG * $ P LD A1,SCTFWT START OF FWT AREA R $ P RF(NZ) BDWT15 FWT AREA RESERVED z P LD A1,STKEND+LIMIT 8 P ST A1,STKEND+INTTAB START OF T.I.T. IF NO FWT AREA P IM STKEND+FWT
0x1b6074…1b6208 Dummy {f00=0x0083, f01=0x018e, f02=»IRST APPLICATION ~ * P LD A12,SCTSFA GET START OF FREE AREA P* F B P* INIT TC:TAB ENTRY POINTER TO POINT AT FIRST USER TASK ENTRY P P* . P LD A5,APLMMC,A2 GET FIRST USER TASK ENTRY : P ST A5,STKEND+CUTENT STORE IN CURRENT USER TASK ENTRY
0x1b6208…1b639c Dummy {f00=0x0083, f01=0x0190, f02=» PBDWT50 EQU * * P ST A1,STKEND+NBRTSK SAVE BINARY VALUE P* F @ P* GET NUMBER OF TERMINAL DEVICE CLASSES IN THIS TASK CLASS P P* P CALL GETTDC P* $ P* CHECK IF TASK WITHOUT DEVICES P* $ P LDR A1,A1 ANY TERMINAL DE
0x1b639c…1b6530 Dummy {f00=0x0083, f01=0x0190, f02=»ESS l 6 P ADKL A10,TTB:TD DISPLACEMENT TO TASK CONF. TABLE P* F ( P* GET TERMINAL DEVICE CLASS NUMBER P P* | . P LDR A9,A11 START OF TASK DEFINITION BLOCK 4 P ADKL A9,TDBFST TERMINAL DEVICE CLASS DEFINITION PBDWT55 EQU * " P CAL
0x1b6530…1b66c4 Dummy {f00=0x0083, f01=0x0190, f02=» TCLASS b P* 6 P LD A2,STKEND+CLANBR GET BINARY VALUE OF CLASS ID P ADR A2,A2 2*ID T ( P LD A7,STKEND+TCLA POINTER TO TCLASS l P ADR A7,A2 GET ENTRY $ P LDR* A7,A7 GET POINTER TO CLASS P* @ P* GET LINE CONNECTION NUMBER FOR
0x1b66c4…1b6858 Dummy {f00=0x0083, f01=0x0190, f02=»RY VALUE | , P LC A4,TDC+6,A9 GET LINE CONNECTION TYPE $ P CCK A4,'AA' ASCU4Z CONNECTION? @ P RF(NE) BDWT58 NO! h . P LDR* A8,A7 YES! GET LENGTH OF THIS CLASS $ P SUKL A8,2 EXCLUSIVE LENGTH WORD P CWK A8,4 ONE DEVICE? P RF(NE) BDWT57
0x1b6858…1b69ec Dummy {f00=0x0083, f01=0x018e, f02=»YES! PBDWT57 EQU * . P ADK A1,1 INCREMENT LINE CONNECTION NUMBER PBDWT58 EQU * R . P ADK A1,1 INCREMENT LINE CONNECTION NUMBER f 4 P CALL BINASC CONVERT INCREMENTED VALUE TO ASCII ( P SC A1,TDC+5,A9 STORE ASCII DIGIT =2 & P SRL A1,8 MO
0x1b69ec…1b6b80 Dummy {f00=0x0083, f01=0x0190, f02=» P* $ P* GENERATE DWT:S FOR THIS CLASS 2 P* A6 - LINE CONNECTION NUMBER (BINARY VALUE) 6 , P* A7 - POINTER TO TERMINAL DEVICE CLASS l P* . P* THE ENTRY IN TEMPORARY INTERRUPT TABLE . P* IS DERIVED FROM LINE CONNECTION NUMBER, :
0x1b6b80…1b6d14 (1, 238) Dummy {f00=0x0084, f01=0x0190, f02=»ET NUMBER OF TERMINAL DEVICE CLASSES z , P SUK A1,1 ANY MOORE IN THIS TASK CLASS? , P RF(Z) BDW100 NO . P ST A1,STKEND+NBRTDC SAVE REMAINING NUMBER t $ P ADKL A9,TDC+TLC NEXT TDC RECORD P RB BDWT55 PBDW100 EQU * " P CALL ECHO INIT ECHO
0x1b6d14…1b6ea8 Dummy {f00=0x0084, f01=0x0190, f02=» SAVE | : P LD A1,STKEND+NBRTSK GET NUMBER OF TASKS IN THIS CLASS " P SUK A1,1 ANY MOORE TASKS LEFT L P RB(P) BDWT50 YES r , P* CHECK IF MOORE TASK DEFINITION BLOCKS P* $ P CALL NXTBLK SKIP TO NEXT BLOCK ( P CCK A2,'TT' TASK DEFINITI
0x1b6ea8…1b703c Dummy {f00=0x0084, f01=0x0190, f02=» UPDATE START OF FREE AREA P RTN A14 RETURN " P XIF : P EJECT F , P**************************************** V , P* B:CDT - BUILD COMMON DEVICE TABLE * , P**************************************** P* P* REFERENCED IN: SYSLD
0x1b703c…1b71d0 Dummy {f00=0x0084, f01=0x0190, f02=»EFA - END OF FREE AREA P* 4 P* EXIT: CDTAB - POINTER TO COMMON DEVICE TABLE ( P* ` P* WORK REGISTERS: A1-A12 j P* < P* SUBROUTINES: NXTBLK,GETCTC,GETLCN,GETSDC,GETCLN,MOVE P* P EJECT PB:CDT EQU * & P LD A1
0x1b71d0…1b7364 Dummy {f00=0x0084, f01=0x0190, f02=»CE DEFINITION BLOCK ~ P* PCDG:10 EQU * & P CALL NXTBLK : ( P CCK A2,'TT' TASK DEFINITION BLOCK? N P RB(E) CDG:10 YES z ( P CCK A2,'CC' COMMON DEV. DEF. BLOCK? P RF(NE) BCDTEX NO P EJECT P* : P* RESERVE AREA IN COM
0x1b7364…1b74f8 Dummy {f00=0x0084, f01=0x018e, f02=»N DEFINITION BLOCK v 6 P ADKL A9,SDCFST NUMBER OF COMMON TERMINAL CLASSES & P CALL GETCTC GET NUMBER OF C.T.C. T P LDR A6,A1 SAVE ~ " PB:CT10 RF(Z) B:CT30 NO MOORE! . P CALL GETCLN GET CLASS IDENT NUMBER (1-99) , P ADR A1,A1 DISPLACEMENT TO
0x1b74f8…1b768c Dummy {f00=0x0084, f01=0x0190, f02=» v & P CWR A1,A2 MAKE SURE CLASS EXISTS P RF(NG) B:CT20 OK! 2 P LDKL A1,LMP4 FORMAT ERROR! L P CALL ERROR p , PB:CT20 ADR A1,A5 SELECT ENTRY IN TCLASS $ P LDR* A1,A1 GET POINTER TO CLASS $ P LDR* A1,A1 GET LENGTH OF CLASS " P SUK
0x1b768c…1b7820 Dummy {f00=0x0084, f01=0x0190, f02=»DECR. NBR OF C.T.C. P RB B:CT10 P EJECT . PB:CT30 EQU * < P* P : P* RESERVE AREA IN COMMON DEVICE TABLE FOR FILE-CODES Z 8 P* AND DWT-ADDRESSES USED BY COMMON SPECIAL DEVICES P* P CALL GETSDC P ADKL A9,SDCFST-CDBNC
0x1b7820…1b79b4 (1, 239) Dummy {f00=0x0084, f01=0x0190, f02=» TO SCLASS r P LDR* A2,A5 P SUK A2,2 & P CWR A1,A2 8 P RF(NG) BCDT15 J P LDKL A1,LMP4 ` P CALL ERROR v PBCDT15 EQU * P ADR A1,A5 SELECT ENTRY $ P LDR* A1,A1 GET POINTER TO CLASS P LDR* A1,A1 GET LENGTH P SUK
0x1b79b4…1b7b48 Dummy {f00=0x0084, f01=0x0190, f02=»ATION t $ P RB(P) CDG:10 MORE APPLICATIONS? & P CALL FSTAPL GET FIRST APPLICATION 6 & PB:CT35 CALL NXTBLK GET NEXT BLOCK ` ( P CCK A2,'TT' TASK DEFINITION BLOCK? P RB(E) B:CT35 YES P EJECT P* < P* RESERV ENTRIES IN COMMON DEVI
0x1b7b48…1b7cdc Dummy {f00=0x0084, f01=0x0190, f02=»VICE TABLE FOR l @ P* FILE-CODES AND DWT-ADDRESSES USED FOR DATA COMMUNICATION P* Z J P* FILE-CODES AND DWT-ADDRESSES ARE STORED IN THE LAST CLASS IN SCLASS d P* & P LD A1,SCTDCT DATA COMMUNICATION? " P LD A6,SCTDMT DATA MANAGEMENT
0x1b7cdc…1b7e70 Dummy {f00=0x0084, f01=0x0190, f02=»S IF NOT ZERO v P RF(Z) CDG:12 NO! , P LD A6,STKEND+SCLA GET POINTER TO SCLASS 0 $ 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 POINTER TO LAST CLASS ( P LDR
0x1b7e70…1b8004 Dummy {f00=0x0084, f01=0x018e, f02=» P ADK A7,2 P STR A7,A12 P ST A12,SCTCDT * P ADR A12,A7 @ P ST A11,STKEND+WRK1 SAVE A11 T " P LDR A11,A12 GET END OF CDTAB x . P LD A9,STKEND+LIMIT GET END OF SYSTEM AREA * P CALL CMPADR CHECK IF MEMORY OVERFLOW P RF(NG) CD
0x1b8004…1b8198 Dummy {f00=0x0084, f01=0x0190, f02=» P* 6 P* INIT POINTER TO START OF FREE AREA AND TO CDTAB P* L ( P LD A10,SCTCDT FIRST ENTRY IN SCTCDT V * PCDG:15 LCR A2,A11 GET FIRST CHARACTER . PCDG:16 CCK A2,'TT' TASK DEFINITION BLOCK/ P RF(NE) CDG:17 NO! P CALL NXTBLK
0x1b8198…1b832c Dummy {f00=0x0084, f01=0x0190, f02=»OMMON WORK BLOCKS x $ PCDG:18 RF CDG:EX CDTAB COMPLETE! & P CALL NXTAPL GET NEXT APPLICATION B $ P RB(P) CDG:15 MORE APPLICATIONS l " P RF CDGEX NO MORE APPLICATIONS PCDG:19 EQU * P* > P* GENERATE DEVICE WORK TABLES FOR COMMON TERMIN
0x1b832c…1b84c0 Dummy {f00=0x0084, f01=0x0190, f02=»L GETCTC GET NUMBER OF C.T.C. , P LDR A1,A1 ANY COMMON TERMINAL CLASSES? & PB:CT40 RF(Z) B:CT50 NO! V P ST A1,STKEND+NBRCOM SAVE v ( P CALL GETCLN GET CLASS IDENT NUMBER P ST A1,STKEND+CLASID SAVE , P CALL GETLCN GET LINE CONNECTION N
0x1b84c0…1b8654 (1, 240) Dummy {f00=0x0084, f01=0x0190, f02=»A7,STKEND+TCLA GET POINTER TO TCLASS & P ADR A7,A2 SELECT ENTRY IN TCLASS , $ P LDR* A7,A7 GET POINTER TO CLASS V . P CALL DWTGEN GENERATE DWT:S FOR THIS CLASS ~ . P ADKL A9,TDC+TLC NEXT RECORD IN CONF. FILE . P LD A1,STKEND+NBRCOM GET NUMBER OF C.T
0x1b8654…1b87e8 Dummy {f00=0x0084, f01=0x018e, f02=»AL DEVICE CLASSES z P* P CALL GETSDC $ P ADKL A9,SDCFST-CDBNC 8 P LDR A8,A1 V PCDG:20 EQU * h P RB(NP) CDG:18 | P* & P* GET SPECIAL DEVICE CLASS NUMBER P* P CALL GETCLN P* 0 P* GET CORRESPONDING DEVIC
0x1b87e8…1b897c Dummy {f00=0x0084, f01=0x0190, f02=» & P LDR* A5,A6 SAVE POINTER TO CLASS $ P LDR* A6,A6 GET POINTER TO CLASS . $ P LDR* A6,A6 GET LENGTH OF CLASS V " P SUK A6,2 EXCLUDE LENGTH WORD ~ PCDG:30 EQU * P ADK A5,4 NEXT DEVICE P LDR* A1,A5 GET DWT-ADDRESS ( P LD A3,DWTLEN,
0x1b897c…1b8b10 Dummy {f00=0x0084, f01=0x0190, f02=»UPDATE POINTER TO FREE AREA P CALL CHKMOV COPY DWT $ P* B 4 P* RELOCATE MONITOR ECB ADDRESS IF MMU IN SYSTEM L P* " P LD A3,SCTOPT GET OPTION WORD P ANK A3,1 MMU IN SYSTEM? P RF(Z) CDG:35 NO! ( P LDR A3,A1 GET PROTOTYPE D
0x1b8b10…1b8ca4 Dummy {f00=0x0084, f01=0x0190, f02=»VEN! x P SUR A4,A3 RELOCATE " P ST A4,DWTMEC,A2 STORE IT BACK ( PCDG:35 EQU * N " P LDR A1,A2 DWT-ADDRESS TO USE b PCDG:40 EQU * P* . P* STORE FILE-CODE AND DWT-ADDRESS IN TTAB P* " P ST A1,4,A10 STORE DWT-ADDRESS P
0x1b8ca4…1b8e38 Dummy {f00=0x0084, f01=0x0190, f02=»OUNTER t P RB(P) CDG:30 NEXT DEVICE P EJECT 0 P* > , P* CHECK IF MOORE SPECIAL DEVICE CLASSES H P* x P ADKL A9,SDC P SUKL A8,1 P RB CDG:20 PCDGEX EQU * " P LD A1,SCTDMT DATA MANAGEMENT $ P LD A5,SCTDCT DATA C
0x1b8e38…1b8fcc Dummy {f00=0x0084, f01=0x0190, f02=» COPY LAST SCLASS IF NOT ZERO P RF(Z) CDG:EX NO! & , P LD A5,STKEND+SCLA GET POINTER TO SCLASS @ $ P LDR* A1,A5 GET LENGTH OF SCLASS p " P SUK A1,2 EXCLUDE LENGTH WORD P ADR A5,A1 GET LAST ENTRY * P LDR* A5,A5 GET POINTER TO LAST CLASS
0x1b8fcc…1b9160 Dummy {f00=0x0084, f01=0x0190, f02=»TSFA UPDATE START OF FREE AREA P RTN A14 RETURN & P =6 > P EJECT L J P********************************************************************** Z H P* DWTGEN - GENERATE DEVICE WORK TABLES FOR A TERMINAL DEVICE CLASS J P********************
0x1b9160…1b92f4 (1, 241) Dummy {f00=0x0084, f01=0x0190, f02=»7 - POINTER TO TERMINAL DEVICE CLASS IN TCLASS * P* A6 - LINE CONNECTION NUMBER 6 P* d P* EXIT: n P* ~ P* WORK REGISTERS: A1-A8 P* P* SUBROUTINES: I:CHP,MOVE P* P EJECT PDWTGEN EQU * 4 P ST A6,S
0x1b92f4…1b9488 Dummy {f00=0x0084, f01=0x0190, f02=» A7,2 FIRST FILECODE PDWT05 EQU * . P LD A1,2,A7 GET ADDRESS OF PROTOTYPE DWT 0 2 P LD A6,STKEND+LCNBR GET LINE CONNECTION NUMBER b P* P* CHECK CONNECTION TYPE P* , P LC A4,TDC+6,A9 GET LINE CONNECTION TYPE $ P CCK A4,'SS'
0x1b9488…1b961c Dummy {f00=0x0084, f01=0x0190, f02=»,'AA' ASCU4Z CONNECTION? P RF(NE) DWT07 NO! . P CALL I:CHAZ INIT CHANEL PARAMETERS ASCU4Z : P RF DWT31 l * PDWT07 CCK A4,'VV' VCCU1/4 CONNECTION? ~ P RF(NE) DWT11 0 P CALL I:CHVC INIT CHANNEL PARAMETERS VCCU1/4 P RF DWT31 & P
0x1b961c…1b97b0 Dummy {f00=0x0084, f01=0x0190, f02=»DWT12 CCK A4,'LL' LT CONNECTION? P RF(NE) DWT08 NO! ( , P CALL I:CHLT INIT CHANNEL PARAMETERS LT B P RF DWT31 r $ PDWT08 CCK A4,'RR' RT CONNECTION? P RF(NE) DWT09 NO! =8 . P CALL I:CHRT INIT CHANNEL PARAMETERS RT =8 P RF DWT31 =8
0x1b97b0…1b9944 Dummy {f00=0x0084, f01=0x0190, f02=»R 6 PDWT06 CALL I:CHRI INIT CHANNEL PARAMETERS RWSI =8 PDWT31 EQU * D P ST A3,STKEND+CONTYP SAVE X P ST A5,STKEND+WRK3 SAVE z P ST A6,STKEND+WRK4 SAVE P* 2 P* CHECK IF DWT ALREADY GENERATED ON THIS LINE P* , P LD
0x1b9944…1b9ad8 Dummy {f00=0x0084, f01=0x0190, f02=» P RF(Z) DWT32 6 P LD A3,STKEND+CONTYP GET LINE AND CONNECTION TYPE P CW A3,-4,A4 EQUAL? R P RF(Z) DWT15 YES! n PDWT14 EQU * " P LDR* A4,A4 GET NEXT BLOCK =7 ( P SUK A5,1 DECREMENT NUMBER OF BLOCKS P RB DWT13 PDWT15 EQ
0x1b9ad8…1b9c6c Dummy {f00=0x0084, f01=0x0190, f02=»SS r . P LD A3,STKEND+WRK3 GET CHANNEL PARAMETER-2 $ P ANK A3,/003F GET DEVICE ADDRESS < P SUR A3,A6 EQUAL? d P RB(NE) DWT14 NO! ~ & P LD A6,DWTST,A2 GET DEVICE STATUS " P ANK A6,/00C0 GET BITS 8 AND 9 & P LD A3,DWTST,A1 GET DEVICE STATU
0x1b9c6c…1b9e00 Dummy {f00=0x0084, f01=0x0190, f02=» ANKL A6,/8000 ISOLATE ECHO BIT $ P LD A3,DWTTAB,A1 GET DEVICE TYPE ( $ P ANKL A3,/8000 ISOLATE ECHO BIT P P SUR A3,A6 EQUAL? x P RB(NE) DWT14 NO! P CALL DWT50 P LDKL A1,DWT70 P AD A1,STKCOM+M:REL P ABR A1 PDWT32
0x1b9e00…1b9f94 (1, 242) Dummy {f00=0x0085, f01=0x018e, f02=»T z P* P LDR A2,A12 TO-ADDRESS P LD A3,DWTOR,A1 LENGTH 2 P ADR A12,A3 NEXT FREE ENTRY P P CALL CHKMOV t P EJECT P* $ P* A1 - ADDRESS TO PROTOTYPE DWT P* A2 - ADDRESS TO REAL DWT P* P LD A6,STKEND+WRK4
0x1b9f94…1ba128 Dummy {f00=0x0085, f01=0x0190, f02=» P* CHECK IF INPUT DEVICE P* ( P LD A3,2,A1 GET DWT STATUS 2 P ANK A3,/0040 INPUT DEVICE? T P RF(Z) DWT45 NO x P* P* INPUT DEVICE: P* CHECK IF KEYBOARD P* P LD A3,DWTADR,A1 P LD A3,DEVIND,A3
0x1ba128…1ba2bc Dummy {f00=0x0085, f01=0x0190, f02=» ADDRESS OF KEYBOARD RUNTIME-DWT : P* AND ECHO DEVICE PROTOTYPE-DWT IN ECHO DEVICE TABLE ( P* f P* p P LD A5,DWTECH,A1 ECHO? z P RF(Z) DWT40 NO P AD A5,STKCOM+M:REL : P LD* A3,STKEND+ECHTAB GET LENGTH OF ECHO DEVICE TABLE (
0x1ba2bc…1ba450 Dummy {f00=0x0085, f01=0x0190, f02=» AD A4,STKEND+ECHTAB 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 h P ADK A3,4 UPDATE LENGTH * P ST* A3,STKEND+ECHTAB SAVE NEW LENGTH P EJECT PDWT4
0x1ba450…1ba5e4 Dummy {f00=0x0085, f01=0x0190, f02=»SQ DISPLACEMENT TO START OF BUFFER $ P ST A5,DWTSQ-4,A2 STORE POINTER * $ P ST A5,DWTSQ-2,A2 STORE POINTER R P* z P* IF DOUBLE KEYBOARD: D P* ADD 1 TO DWT-ADDRESS AND SAVE IT IN TEMPORARY INTERRUPT TABLE 6 P* IN ENTRY CORRESPONDING TO S
0x1ba5e4…1ba778 Dummy {f00=0x0085, f01=0x0190, f02=» RF(Z) DWT60 NOT DOUBLE KEYBOARD $ P LDR A5,A2 GET REAL DWT-ADDRESS ( P ADK A5,1 ADD ONE P * P CALL B:TTAB BUILD ONE BLOCK IN T.I.T. j P SUK A5,1 $ P LDR A2,A5 GET REAL DWT-ADDRESS P RF DWT60 P EJECT PDWT45 CALL DWT50
0x1ba778…1ba90c Dummy {f00=0x0085, f01=0x0190, f02=»E IS TO BE USED FOR ECHOING ON. 6 P* THE ADDRESSES OF THE PROTOTYPE- AND RUNTIME-DWT ( 0 P* IS THEN STORED IN THE ECHO DEVICE TABLE. b P* 0 P LD A5,DWTTAB,A1 GET DEVICE TYPE CHARACTERS , P RF(NN) DWT59 NO ECHOING ON THIS DEVICE : P LD*
0x1ba90c…1baaa0 Dummy {f00=0x0085, f01=0x0190, f02=»5 LDR A4,A3 SAVE LENGTH ( P AD A4,STKEND+ECHTAB NEXT FREE ENTRY . P STR A1,A4 STORE ADDRESS OF PROTOTYPE DWT L , P ST A2,2,A4 STORE ADDRESS OF RUNTIME DWT ~ P ADK A3,4 UPDATE LENGTH * P ST* A3,STKEND+ECHTAB STORE NEW LENGTH PDWT59 RTN A1
0x1baaa0…1bac34 (1, 243) Dummy {f00=0x0085, f01=0x0190, f02=» z P RF(Z) DWT70 P EJECT , P LD A5,DWTMEC,A2 GET MONITOR ECB ADDRESS * ( 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 ANKL A5,/FFFE MAKE EVEN ADDRESS
0x1bac34…1badc8 Dummy {f00=0x0085, f01=0x0190, f02=»ADR,A2 GET ADDRESS BLOCK 2 P LD A4,BUFLEN,A5 GET LENGTH OF INTERNAL BUFFER $ P RF(Z) DWT70 ALLOCATE NO BUFFER! V P* ~ L P* ALLOCATE INTERNAL BUFFER AND STORE ADDRESS IN SECOND WORD OF INTERNAL P* , P LD A5,DWTMEC,A2 GET MONITOR ECB-ADDRE
0x1badc8…1baf5c Dummy {f00=0x0085, f01=0x0190, f02=»AVE P LDR A3,A4 GET LENGTH & P ADK A3,3 ADD BO FERMS CONSTANT+1 * , P ANKL A3,/FFFE MAKE SURE OF EVEN LENGTH T P EJECT P* 4 P* CHECK IF INTERNAL BUFFER SIZE IS GREATER THAN 6 P* THE SIZE OF BUFFER RESERVED FOR SYSLOD PART A.
0x1baf5c…1bb0f0 Dummy {f00=0x0085, f01=0x0190, f02=»FSIZ P RF(NG) DWT65 P ST A3,STKCOM+BUFSIZ $ P ST A12,STKCOM+SYSBUF @ PDWT65 EQU * ^ P ADR A12,A3 NEXT FREE ENTRY r P EJECT PDWT70 EQU * P* . P* STORE FILE-CODE AND DWT-ADDRESS IN TTAB P* " P ADKL A10,
0x1bb0f0…1bb284 Dummy {f00=0x0085, f01=0x0190, f02=»N TTAB x " P STR A2,A10 STORE DWT-ADDRESS P* 4 , P* CHECK IF MOORE DEVICES IN THIS CLASS > P* n P SUKL A8,4 x P RF(Z) DWTEX P ADK A7,4 NEXT DEVICE P LDKL A1,DWT05 P AD A1,STKCOM+M:REL P ABR A1 PDWTEX EQU
0x1bb284…1bb418 Dummy {f00=0x0085, f01=0x0190, f02=» IN ONE POINTER-SET t 4 P* AND SECOND POINTER IN THE OTHER POINTER-SET: 0 P* STORE SECOND POINTER OF FIRST POINTER-SET T 2 P* IN RUNTIME-DWT POINTED AT BY FIRST POINTER 2 P* OF SECOND POINTER-SET AND CLEAR POINTERS OF P* SECOND POINTER-SE
0x1bb418…1bb5ac Dummy {f00=0x0085, f01=0x0190, f02=»STKEND+ECHTAB GET LENGTH OF ECHO DEVICE TABLE " P RF(Z) DWT160 NO ECHO DEVICES! 6 : P AD A3,STKEND+ECHTAB COMPUTE END OF ECHO DEVICE TABLE 8 P LD A1,STKEND+ECHTAB GET START OF ECHO DEVICE TABLE P ADK A1,2 BYPASS LENGTH < PDWT90 LD A2,STKEND
0x1bb5ac…1bb740 Dummy {f00=0x0085, f01=0x0190, f02=»DWT110 CWR* A4,A2 COMPARE WITH FIRST POINTER IN SECOND SET P RF(E) DWT130 COINCIDENCE! B P ADK A2,4 NEXT POINTER-SET d ( P CWR A2,A3 END OF ECHO DEVICE TABLE $ P RB(NE) DWT110 NO:CHECK NEXT SET P RF DWT140 : PDWT130 LD A4,2,A2 ADDRESS TO
0x1bb740…1bb8d4 (1, 244) Dummy {f00=0x0085, f01=0x0190, f02=»DEVICE b P CMR A1 CLEAR FIRST POINTER " P CM 2,A1 CLEAR SECOND POINTER 2 $ PDWT140 ADK A1,4 NEXT POINTER-SET X ( P CWR A1,A3 END OF ECHO DEVICE TABLE P RB(NE) DWT90 NO! * PDWT150 CM* STKEND+ECHTAB CLEAR LENGTH PDWT160 RTN A14 RETUR
0x1bb8d4…1bba68 Dummy {f00=0x0085, f01=0x0190, f02=»-TIME INTERRUPT TABLE * z 2 P********************************************** P* V P* REFERENCED IN: DWTGEN ` P* * P* ENTRY: SCTSFA - START OF FREE AREA P* , P* EXIT: REAL TIME INTERRUPT TABLES FOR 2 P* LT,RT,PLC,
0x1bba68…1bbbfc Dummy {f00=0x0085, f01=0x018e, f02=» b 0 P LD A1,STKEND+FWTFLG T.I.T. IN FREE AREA? =7 P RF(P) B:ITLT YES? =7 < 4 P ST P,STKEND+LIMIT UPDATE END OF SYSTEM AREA =7 Z P LDR A1,P =7 PBIT05 EQU * =7 * P SUK A1,2 DECREMENT MEMORY ADDRESS =7 P CMR A1 CLEAR MEMORY AREA
0x1bbbfc…1bbd90 Dummy {f00=0x0085, f01=0x0190, f02=» d P* P XIF PB:ITLT EQU * P IFF SUML=0 2 $ P LDKL A8,0 CONNECTION TYPE = LT F P LDKL A9,7 1:ST BOARD n . P LDK A1,16 MAX.LENGTH OF BOARD CONF. TABLE P ST A1,STKEND+WRK4 SAVE P CM STKEND+WRK1 CLEAR P CM STKEND+W
0x1bbd90…1bbf24 Dummy {f00=0x0085, f01=0x0190, f02=» IN MONTAB t " P LD A2,STKEND+WRK3 ANY LINES? P RF(Z) BIT15 NO! 8 P CM STKEND+WRK3 CLEAR P : P LD A2,STKEND+BRDTAB GET ADDRESS TO BOARD CONF. TABLE n P ST A2,INTLT1,A1 SAVE PBIT15 EQU * P ADK A1,2 & P ST A1,STKEND+WRK2 STORE
0x1bbf24…1bc0b8 Dummy {f00=0x0085, f01=0x0190, f02=»:ITRT YES! P RB BIT10 P XIF $ P EJECT 0 P* > . P* BUILD REAL-TIME INTERRUPT TABLES FOR RT H P* z PB:ITRT EQU * P IFF SUMR=0 $ P LDKL A8,1 CONNECTION TYPE = RT P LDKL A9,3 1:ST BOARD . P LDK A1,8 MAX.LENGTH O
0x1bc0b8…1bc24c Dummy {f00=0x0085, f01=0x018e, f02=»CLEAR PBRT10 EQU * P CALL B:BTAB " P CALL B:LTAB 6 * P LD A1,STKEND+WRK2 GET INDEX IN MONTAB J " P LD A2,STKEND+WRK3 ANY LINES? x P RF(Z) BRT15 NO! P CM STKEND+WRK3 CLEAR : P LD A2,STKEND+BRDTAB GET ADDRESS TO BOARD CONF. TABL
0x1bc24c…1bc3e0 Dummy {f00=0x0085, f01=0x0190, f02=» P ST A9,STKEND+WRK1 STORE P ADKL A9,3 NEXT BOARD $ P CWK A9,15 LAST BOARD? B P RF(G) B:ITPC YES! ` P RB BRT10 z P XIF P EJECT P* 4 P* BUILD REAL-TIME INTERRUPT TABLES FOR PLC-LOCAL P* PB:ITPC EQU * P I
0x1bc3e0…1bc574 (1, 245) Dummy {f00=0x0085, f01=0x0190, f02=» P ST A1,STKEND+WRK4 P LDK A1,1 =2 P ST A1,STKEND+WRK1 =2 4 P CM STKEND+WRK2 CLEAR R P CM STKEND+WRK3 CLEAR p PBPC10 EQU * P CALL B:BTAB P CALL B:LTAB * P LD A1,STKEND+WRK2 GET INDEX IN MONTAB " P LD A2,STKEND+WR
0x1bc574…1bc708 Dummy {f00=0x0085, f01=0x0190, f02=» P ST A2,INTPL1,A1 SAVE PBPC15 EQU * " P ADK A1,2 6 & P ST A1,STKEND+WRK2 STORE NEW INDEX H P ADKL A9,1 r P ST A9,STKEND+WRK1 P ADKL A9,31 NEXT BOARD P CWK A9,128 LAST BOARD? P RF(G) B:ITPR YES! =8 P RB BPC10
0x1bc708…1bc89c Dummy {f00=0x0085, f01=0x0190, f02=»LCR=0 * P LDKL A8,6 CONNECTION TYPE=PLC-REMOTE P LDKL A9,32 1:ST BOARD < 0 P LDK A1,66 MAX LENGHT OF BOARD CONF.TABLE =2 Z P ST A1,STKEND+WRK4 P LDK A1,1 =2 P ST A1,STKEND+WRK1 =2 P CM STKEND+WRK2 CLEAR P CM STKEND+WRK
0x1bc89c…1bca30 Dummy {f00=0x0085, f01=0x018e, f02=»WRK3 ANY LINES? P RF(Z) BPR15 NO! ! P CM STKEND+WRK3 ! 0 B P LD A2,STKEND+BRDTAB GET ADDRESS TO BOARD CONFIGURATION TABLE ! H P ST A2,INTPR1,A1 SAVE ! PBPR15 EQU * ! P ADK A1,2 ! & P ST A1,STKEND+WRK2 STORE NEW INDEX ! P ADKL A9,1 !
0x1bca30…1bcbc4 Dummy {f00=0x0085, f01=0x0190, f02=» P XIF " P EJECT " P " P* " & 2 P* BUILD REAL-TIME INTERRUPT TABLES FOR VCCU1/4 " 0 P* " f PB:ITVU EQU * " p P IFF VIDEO=0 " ( P LDKL A8,7 CONNECTION TYPE = VCCU1/4 " P LDKL A9,3 1:ST BOARD " . P LDK A1,8 MAX.LENGTH OF BOARD CONF. TA
0x1bcbc4…1bcd58 Dummy {f00=0x0085, f01=0x0190, f02=»U10 EQU * " P CALL B:BTAB # P CALL B:LTAB # & * P LD A1,STKEND+WRK2 GET INDEX IN MONTAB # : " P LD A2,STKEND+WRK3 ANY LINES? # h P RF(Z) BVU15 NO! # P CM STKEND+WRK3 CLEAR # : P LD A2,STKEND+BRDTAB GET ADDRESS TO BOARD CONF. TABLE # P ST A2
0x1bcd58…1bceec Dummy {f00=0x0085, f01=0x0190, f02=»WRK1 STORE # P ADKL A9,3 NEXT BOARD $ P CWK A9,31 LAST BOARD? $ 0 P RF(G) B:ITSZ YES! $ N P RB BVU10 $ h P XIF $ z P $ P EJECT $ P* $ 2 P* BUILD REAL-TIME INTERRUPT TABLES FOR SALCUZ $ P* $ PB:ITSZ EQU * $ P IFF SALCUZ=0
0x1bceec…1bd080 Dummy {f00=0x0085, f01=0x0190, f02=»A1,STKEND+WRK4 $ P CM STKEND+WRK1 CLEAR % P CM STKEND+WRK2 CLEAR % 4 P CM STKEND+WRK3 CLEAR % R PBSZ10 EQU * % p P CALL B:BTAB % P CALL B:LTAB % * P LD A1,STKEND+WRK2 GET INDEX IN MONTAB % " P LD A2,STKEND+WRK3 ANY LINES? % P RF(Z) B
0x1bd080…1bd214 (1, 246) Dummy {f00=0x0086, f01=0x018e, f02=»U * % P ADK A1,2 & & P ST A1,STKEND+WRK2 STORE NEW INDEX & P ADKL A9,1 & H P ST A9,STKEND+WRK1 & Z P CWK A9,7 LAST BOARD? & t P RF(G) B:ITAZ YES! & P RB BSZ10 & P XIF & P EJECT & P* & 2 P* BUILD REAL-TIME INTERRUPT TABLES FOR
0x1bd214…1bd3a8 Dummy {f00=0x0086, f01=0x0190, f02=» & x . P LDK A1,8 MAX. LENGTH OF BOARD CONF.TABLE ' P ST A1,STKEND+WRK4 ' : P CM STKEND+WRK1 CLEAR ' T P CM STKEND+WRK2 CLEAR ' r P CM STKEND+WRK3 CLEAR ' PBAZ10 EQU * ' P CALL B:BTAB ' P CALL B:LTAB ' * P LD A1,STKEND+WRK2 GET INDEX I
0x1bd3a8…1bd53c Dummy {f00=0x0086, f01=0x0190, f02=»D CONFIGURATION TABLE ' h P ST A2,INTAS1,A1 SAVE ( PBAZ15 EQU * ( < P ADK A1,2 ( P & P ST A1,STKEND+WRK2 STORE NEW INDEX ( b P ADKL A9,1 ( P ST A9,STKEND+WRK1 ( P ADKL A9,3 NEXT BOARD ( P CWK A9,31 LAST BOARD? ( P RF(G) BAZ20 YES! (
0x1bd53c…1bd6d0 Dummy {f00=0x0086, f01=0x0190, f02=» 2 P* I:CHSZ - INIT CHANNEL PARAMETERS SALCUZ * ) 2 P********************************************* ) : P* ) p P* REFERENCED IN: DWTGEN ) z P* ) , P* ENTRY: A1 - POINTER TO PROTOTYPE DWT ) ( P* A2 - POINTER TO REAL DWT ) * P*
0x1bd6d0…1bd864 Dummy {f00=0x0086, f01=0x0190, f02=» . P* A3 - BITS 12-15 CONNECTION TYPE * * P* BITS 4 -11 LINE NUMBER * 6 P* WORK REGISTERS: * d P* * ~ P* SUBROUTINES: * P* * PI:CHSZ EQU * * P IFF SALCUZ=0 * $ P CWK A6,8 CONNECTION NUMBER <=8? * P RF(G) NUMER
0x1bd864…1bd9f8 Dummy {f00=0x0086, f01=0x0190, f02=»WTCP2,A1 GET DWTCP2 OF PROTOTYPE DWT * $ P ANK A5,/3F CLEAR BITS TO MODIFY + , 0 P LDR A3,A6 GET MODIFY LINE CONNECTION NUMBER + T " P SLL A3,4 MOVE TO BITS 4 - 11 + ( P ADK A3,2 ADD CONNECTION TYPE SALCUZ + . P ADKL A6,/0200 ADD CONNECTION TYPE SALCUZ +
0x1bd9f8…1bdb8c Dummy {f00=0x0086, f01=0x018e, f02=»*********************************************** + 2 P* I:CHAZ - INIT CHANNEL PARAMETERS ASCU4Z * , 8 : P***************************************************** , n P* , P* REFERENCED IN: DWTGEN , P* , , P* ENTRY: A1 - POINTER TO PROTOTYPE DWT
0x1bdb8c…1bdd20 Dummy {f00=0x0086, f01=0x0190, f02=» , h P* - * P* EXIT: A6 - CHANNEL PARAMETER - 1 - * P* A5 - CHANNEL PARAMETER - 2 - @ . P* A3 - BITS 12-15 CONNECTION TYPE - n * P* BITS 4-11 LINE NUMBER - P* - P* WORK REGISTERS: - P* - P* SUBROUTIN
0x1bdd20…1bdeb4 (1, 247) Dummy {f00=0x0086, f01=0x0190, f02=» A6,1 CONNECTION NUMBER >=1? - P RF(L) NUMERR NO! . $ , P SUK A6,1 MODIFY LINE CONNECTION NUMBER . > 0 P LD A5,DWTCP2,A1 GET DWTCP2 OF PROTOTYPE DWT . n $ P ANK A5,/3F CLEAR BITS TO MODIFY . 0 P LDR A3,A6 GET MODIFY LINE CONNECTION NUMBER . P ANK A3,3
0x1bdeb4…1be048 Dummy {f00=0x0086, f01=0x0190, f02=»ONNECTION NUMBER . r P SLL A3,4 / , P ANK A6,/1C GET BITS 11-13 BOARD NUMBER / * P SRL A6,2 MOVE TO BITS 12-15 / Z ( P ADK A3,3 ADD CONNECTION TYPE ASCU4Z / ~ . P ADKL A6,/0300 ADD CONNECTION TYPE ASCU4Z / P RTN A14 / P XIF / P IFT ASCU4Z=0 /
0x1be048…1be1dc Dummy {f00=0x0086, f01=0x018e, f02=»* I:CHAZ - INIT CHANNEL PARAMETERS VCCU1/4 * / : P***************************************************** 0 6 P* 0 t P* REFERENCED IN: DWTGEN 0 ~ P* 0 , P* ENTRY: A1 - POINTER TO PROTOTYPE DWT 0 ( P* A2 - POINTER TO REAL DWT 0 ( P*
0x1be1dc…1be370 Dummy {f00=0x0086, f01=0x0190, f02=» 0 h * P* A5 - CHANNEL PARAMETER - 2 1 . P* A3 - BITS 12-15 CONNECTION TYPE 1 6 * P* BITS 4-11 LINE NUMBER 1 h P* 1 P* WORK REGISTERS: 1 P* 1 P* SUBROUTINES: 1 P* 1 PI:CHVC EQU * 1 P IFF VIDEO=0 1
0x1be370…1be504 Dummy {f00=0x0086, f01=0x0190, f02=» , P SUK A6,1 MODIFY LINE CONNECTION NUMBER 2 0 P LD A5,DWTCP2,A1 GET DWTCP2 OF PROTOTYPE DWT 2 4 $ P ANK A5,/3F CLEAR BITS TO MODIFY 2 h 0 P LDR A3,A6 GET MODIFY LINE CONNECTION NUMBER 2 P ANK A3,3 GET BITS 14-15 2 & P SLL A3,8 MOVE TO BITS TO BITS 6-7 2
0x1be504…1be698 Dummy {f00=0x0086, f01=0x0190, f02=»BITS 11-13 BOARD NUMBER 2 P SRL A6,2 MOVE TO BITS 12-15 3 * P ADK A3,7 ADD CONNECTION TYPE VCCU1/4 3 D . P ADKL A6,/0700 ADD CONNECTION TYPE VCCU1/4 3 r P RTN A14 3 P XIF 3 P IFT VIDEO=0 3 P LDKL A1,LMP4 3 P CALL ERROR 3 P XIF 3
0x1be698…1be82c Dummy {f00=0x0086, f01=0x0190, f02=»************************ 3 ~ P* 4 P* REFERENCED IN: DWTGEN 4 * P* 4 J , P* ENTRY: A1 - POINTER TO PROTOTYPE DWT 4 T ( P* A2 - POINTER TO REAL DWT 4 * P* A6 - LINE CONNECTION NUMBER 4 P* 4 * P* EXIT: A6 - CHANNEL PARAMETE
0x1be82c…1be9c0 Dummy {f00=0x0086, f01=0x0190, f02=» LINE NUMBER 4 v P* 5 P* WORK REGISTERS: 5 P* SUBROUTINES: 5 8 P* 5 P PI:CHPC EQU * 5 Z P IFF PLCL=0 5 n ( P CWK A6,128 CONNECTION NUMBER <=128? 5 P RF(G) NUMERR NO! 5 $ P CWK A6,1 CONNECTION NUMBER >=1? 5 P RF(L) NUMERR NO! 5
0x1be9c0…1beb54 (1, 248) Dummy {f00=0x0086, f01=0x0190, f02=»ECTION NUMBER 5 x P ANK A3,/1F GET BITS 11 - 15 6 P ADK A3,1 6 : P SLL A3,8 MOVE TO BITS 2 - 7 6 L & P ORR A5,A3 MERGE WITH OLD CONTENTS 6 p * P LDR A3,A6 GET LINE CONNECTION NUMBER 6 P ADK A3,1 6 " P SLL A3,4 MOVE TO BITS 4 - 11 6 & P ADK A3,
0x1beb54…1bece8 Dummy {f00=0x0086, f01=0x0190, f02=»DD CONNECTION TYPE PLC 6 P RTN A14 7 P XIF 7 . P IFT PLCL=0 7 : P LDKL A1,LMP4 7 N P CALL ERROR 7 d P XIF 7 x P EJECT 7 . P****************************************** 7 2 P* I:CHPC - INIT CHANNEL PARAMETERS RWSI * =8 7 . P**************
0x1bece8…1bee7c Dummy {f00=0x0086, f01=0x0190, f02=»* A2 - POINTER TO REAL DWT 7 * P* A6 - LINE CONNECTION NUMBER 8 , P* 8 Z * P* EXIT: A6 - CHANNEL PARAMETER - 1 8 d * P* A5 - CHANNEL PARAMETER - 2 8 . P* A3 - BITS 12-15 CONNECTION TYPE 8 * P* BITS 4
0x1bee7c…1bf010 Dummy {f00=0x0086, f01=0x0190, f02=»WK A6,128 CONNECTION NUMBER <=128? 8 P RF(G) NUMERR NO! 9 * $ P CWK A6,1 CONNECTION NUMBER >=1? 9 D P RF(L) NUMERR NO! 9 l P SUK A6,1 9 0 P LD A5,DWTCP2,A1 GET DWTCP2 OF PROTOTYPE DWT 9 $ P ANK A5,/3F CLEAR BITS TO MODIFY 9 * P LDR A3,A6 GET LINE
0x1bf010…1bf1a4 Dummy {f00=0x0086, f01=0x0190, f02=»H OLD CONTENTS 9 | * P LDR A3,A6 GET LINE CONNECTION NUMBER : P ADK A3,1 : D " P SLL A3,4 MOVE TO BITS 4 - 11 : V , P ADK A3,6 ADD CONNECTION TYPE PLC-REMOTE : | , P ANK A6,/60 GET BITS 9 - 10 BOARD NUMBER : " P SRL A6,5 MOVE TO BITS 12 - 15 : 2 P ADKL
0x1bf1a4…1bf338 Dummy {f00=0x0086, f01=0x0190, f02=» P CALL ERROR ; P EJECT ; * P************************************* ; & . P* I:CHLT - INIT CHANNEL PARAMETERS LT * ; T * P************************************* ; P* ; P* REFERENCED IN: DWTGEN ; P* ; , P* ENTRY: A1 - POINTER TO PROTO
0x1bf338…1bf4cc Dummy {f00=0x0086, f01=0x0190, f02=»NEL PARAMETERS -1 ; | * P* A5 - CHANNEL PARAMETERS -2 < . P* A3 - BITS 12-15 CONNECTION TYPE < H * P* BITS 4-11 LINE NUMBER < z P* < P* WORK REGISTERS: < P* < P* SUBROUTINES: < P* < P EJECT < PI:
0x1bf4cc…1bf660 Dummy {f00=0x0086, f01=0x0190, f02=»NUMBER >=01? < x P RB(L) NUMERR NO =8! = , P SUK A6,1 MODIFY LINE CONNECTION NUMBER = 0 0 P LD A5,DWTCP2,A1 GET DWTCP2 OF PROTOTYPE DWT = ` ( P ANKL A5,/003F CLEAR BITS TO MODIFY = 2 P LDR A3,A6 GET MODIFIED LINE CONNECTION NUMBER = P ANK A3,7 GET BITS
0x1bf660…1bf7f4 (1, 249) Dummy {f00=0x0086, f01=0x0190, f02=» = b P SLL A3,4 > P ANK A6,/18 GET BITS 11-12 > P SRL A6,3 MOVE TO BITS 14-15 > < P RTN A14 > ` P XIF > p P IFT SUML=0 > | P LDKL A1,LMP4 > P CALL ERROR > P XIF > P EJECT > . P***************************************** > . P*
0x1bf7f4…1bf988 Dummy {f00=0x0086, f01=0x0190, f02=» P* ? , P* ENTRY: A1 - POINTER TO PROTOTYPE DWT ? ( P* A2 - POINTER TO REAL DWT ? > * P* A6 - LINE CONNECTION NUMBER ? j P* ? * P* EXIT: A6 - CHANNEL PARAMETERS - 1 ? * P* A5 - CHANNEL PARAMETERS - 2 ? . P*
0x1bf988…1bfb1c Dummy {f00=0x0086, f01=0x0190, f02=»UBROUTINES: ? P* @ P EJECT @ PI:CHRT EQU * @ , P IFF SUMR=0 @ @ * P CWK A6,0016 CONNECTION NUMBER <= 16? @ T P RB(G) NUMERR NO =8! @ ( P CWK A6,0001 CONNECTION NUMBER >=1? @ P RB(L) NUMERR NO =8! @ , P SUK A6,1 MODIFY LINE CONNECTION N
0x1bfb1c…1bfcb0 Dummy {f00=0x0086, f01=0x0190, f02=»NE CONNECTION NUMBER @ v P ANK A3,3 GET BITS 14-15 A P SLL A3,8 MOVE TO BITS 6-7 A < & P ORR A5,A3 MERGE WITH OLD CONTENTS A ^ 2 P LDR A3,A6 GET MODIFIED LINE CONNECTION NUMBER A P SLL A3,4 A $ P ADK A3,1 ADD CONNECTION TYPE RT A P ANK A6,/C GET B
0x1bfcb0…1bfe44 Dummy {f00=0x0086, f01=0x0190, f02=»R=0 =8 A P LDKL A1,LMP4 B P CALL ERROR B $ P XIF =8 B 8 P IFT DC=1 B H P EJECT B Z < P******************************************************* B h < P* * B < P* B:CNA BUILD COMPUTER NETWOR
0x1bfe44…1bffd8 Dummy {f00=0x0086, f01=0x0190, f02=» * B h < P* SCANS POSSIBLE D-BLOCK IN CONFIGURATION DATA * C < P* AND BUILDS DATA COMMUNICATION TABLE IN MEMORY. * C X < P* TABLE START IS DEFINED BY THE POINTER SCTDCT * C < P* IN SYSTAB.
0x1bffd8…1c016c Dummy {f00=0x0086, f01=0x0190, f02=» C X < P* * D < P* REFERENCED IN: CONMON * D H < P* SUBROUTINES CALLED: GETDTE, P:DTE * D < P* WORK REGISTERS: A1-A12 * D < P
0x1c016c…1c0300 Dummy {f00=0x0086, f01=0x0190, f02=» P E PB:CNA EQU * E P LD A11,DCBLK+STKCOM E $ * P RF(Z) B:CN20 NO DATA COMMUNICATION =1 E @ P* E n < P AD A11,CONSTA+STKCOM GET D BLOCK ADDRESS IN CONF. DATA E x * P LD A12,SCTSFA GET START OF FREE AREA E ( P ST A12,SCTDCT UPDATE SYSTAB POINT
0x1c0300…1c0494 (1, 250) Dummy {f00=0x0087, f01=0x0190, f02=»F SDTE RECORD E r PB:CN00 EQU * F P SUK A1,1 F * 2 P RF(N) B:CN10 NO DTE BLOCKS LEFT IN CONF. DATA F < P* F r . P ST A1,NUMDTE+STKEND SAVE NO OF DTE:S LEFT F | , P ADKL A11,5 ADVANCE TO 1ST CHAR. IN NAME F & P CALL P:DTE PROCESS THIS DTE BLOCK F 2 P
0x1c0494…1c0628 Dummy {f00=0x0087, f01=0x0190, f02=»QU * F P CM 0,A12 AND RESET IT G P ADKL A12,2 G * , P ST A12,SCTSFA UPDATE START OF FREE AREA G > PB:CN20 EQU * =1 G n P RTN A14 G P EJECT G < P******************************************************* G < P*
0x1c0628…1c07bc Dummy {f00=0x0087, f01=0x018e, f02=»======== * G f < P* * H < P* SCANS DTE BLOCK IN CONF. DATA AND BUILDS CORRE- * H V < P* SPONDING DTE-BLOCK IN SCTDCT. IF MULTIPLE COPIES * H < P* ARE DEFINED CURRENT DTE IS DUPLICATED THE NO O
0x1c07bc…1c0950 Dummy {f00=0x0087, f01=0x0190, f02=» H V < P* ON ENTRY: A11 ADDRESS TO 1ST CHARACTER IN * I < P* SDTE NAME IN CONF. DATA * I H < P* A12 POINTER TO START OF CURRENT * I < P* DTE BLOCK IN SCTDCT TABLE * I < P
0x1c0950…1c0ae4 Dummy {f00=0x0087, f01=0x0190, f02=» PROCESSED DTE-BLOCK IN CONF. DATA * I < P* A12 POINTER TO LAST DEFINED DTE-BLOCK * J 8 < P* DEFINED IN SCTDCT TABLE * J x < P* * J < P* REFERENCED I
0x1c0ae4…1c0c78 Dummy {f00=0x0087, f01=0x0190, f02=» AND MOVE * J x < P* * K ( < P******************************************************* K h P K P K PP:DTE EQU * K * P LDKL A1,/3000 INITIALIZE NAME FILLER K , P LC A1
0x1c0c78…1c0e0c Dummy {f00=0x0087, f01=0x0190, f02=»PE RECORD? K x P RF(E) PDTE00 YES! L P* L , & P SLL A1,8 NO LEFT ADJUST CHAR. AND L 6 $ P LC A1,1,A11 GET NEXT CHARACTER L ` P ADKL A11,1 L PPDTE00 EQU * L , P ST A1,DTENAM+STKEND SAVE NAME IN STACK L " P CALL GETCOP GET NO OF COPIES L " P S
0x1c0e0c…1c0fa0 Dummy {f00=0x0087, f01=0x0190, f02=»ER L t P LC A1,2,A11 M & P ST A1,DTETYP+STKEND SAVE IN STACK M P ADKL A11,2 M H ( P LDK A2,0 RESET NETWORK ADDR. LENGTH M P CALL ENDBLK END OF D-BLOCK? M P LDR A8,A8 M P RF(Z) PDTE05 YES! M P* M . P LC A7,NANSA,A11 GET NA-NSA-SDTE QUALI
0x1c0fa0…1c1134 (1, 251) Dummy {f00=0x0087, f01=0x0190, f02=»T A11,NASTRT+STKEND SAVE ADDRESS M & P CALL P:NA PROCESS NETWORK ADDRESS N ( P LC A7,2,A11 N R PPDTE05 EQU * N f * P ST A2,NALNG+STKEND SAVE LENGTH OF NA N z P LDK A1,0 N P CALL ENDBLK END OF D-BLOCK? N P LDR A8,A8 N P RF(Z) PDTE07 YES! N
0x1c1134…1c12c8 Dummy {f00=0x0087, f01=0x0190, f02=»TNSA N * P ADKL A11,2 SKIP NSA NR IN CONF. DATA O PPDTE07 EQU * O : 2 P ST A1,DTENSA+STKEND SAVE NO OF SUBADDR. DEF. O N $ P CWK A1,/FF LOOK IF LEGAL NUMBER O P RF(NG) PDTE10 YES! O P* O PNSAERR EQU * O * P LDKL A1,LMP4 NO, ERROR IN CONF. F
0x1c12c8…1c145c Dummy {f00=0x0087, f01=0x0190, f02=»END SAVE ADDR. OF 1ST SUBADDR. O ~ P SLL A1,1 P & . P ADR A11,A1 CALCULATE STAT OF NEXT RECORD P 8 PPDTE15 EQU * P j 2 P CALL DTESIZ CALCULATE SIZE OF THIS DTE BLOCK P ~ ( P CALL UPDDTE UPDATE DTE BLOCK IN DCT P * P LD A7,DTECOP+STKEND GET NO OF COPIES P
0x1c145c…1c15f0 Dummy {f00=0x0087, f01=0x0190, f02=» * P LD A4,DTENAM+STKEND GET PREVIOUS NAME Q P LDR A3,A4 Q 2 * P ANK A3,/FF ISOLATE RIGHT BYTE OF NAME Q D P CWK A3,/5F UPPER BOUNDARY? Q r P RF(L) PDTE25 NO! Q P* Q , P LC A4,/30 RESET RIGHT BYTE TO ASCII '0' Q & P SLL A5,8 LEFT BYTE INCREMENTA
0x1c15f0…1c1784 Dummy {f00=0x0087, f01=0x0190, f02=»OCK? Q x P LDR A8,A8 R P RF(Z) PDTE35 YES! R P* R 8 . P LC A1,2,A11 GET 2ND CHAR. IN NEXT RECORD R B 0 P CCK A1,'DD' IF A SDTE-RECORD USE OLD ADDR. R t P RF(E) PDTE35 R P* R P CCK A1,'SS' IF NSA RECORD R * P RF(E) PDTE30 USE OLD NETWORK
0x1c1784…1c1918 Dummy {f00=0x0087, f01=0x0190, f02=»RESS R r * P ST A2,NALNG+STKEND SAVE LENGTH OF NA S P* S : P CALL ENDBLK END OF D-BLOCK? S D P LDR A8,A8 S h P RF(Z) PDTE35 YES! S z P* S P LC A1,2,A11 S P CCK A1,'SS' S ( P RF(NE) PDTE35 NO NSA RECORD PRESENT S P* S PPDTE30 EQU *
0x1c1918…1c1aac Dummy {f00=0x0087, f01=0x018e, f02=»2 S P LDR A1,A1 T P RF(Z) PDTE35 NO SUBADDRESSE T P* T @ P CWK A1,/FF T J , P RB(G) NSAERR TOO MANY SUBADDR. DEFINED T ^ P* T 4 P ST A11,NSAADR+STKEND SAVE START OF 1ST SUBADDR. T P SLL A1,1 T . P ADR A11,A1 CALCULATE START OF NEXT RE
0x1c1aac…1c1c40 Dummy {f00=0x0087, f01=0x0190, f02=» P CALL UPDDTE U P RB PDTE20 U P* U * PPDTE40 EQU * U 4 P RTN A14 U H P EJECT U X < P******************************************************** U f < P* * U < P* DTESIZ CALCULATES THE LENGTH
0x1c1c40…1c1dd4 (1, 252) Dummy {f00=0x0087, f01=0x018e, f02=» * U f < P* ON ENTRY: A12 START OF CURRENT DTE BLOCK * V < P* * V V < P* WORK REGISTER: A1,A9 * V < P*
0x1c1dd4…1c1f68 Dummy {f00=0x0087, f01=0x0190, f02=» V z 6 P LD A1,NALNG+STKEND GET LENGTH OF NETWORK ADDRESS W P ADK A1,1 W B $ P SRL A1,1 2 DIGITS IN EACH BYTE W T , P AD A1,DTENSA+STKEND ADD NO OF SUBADDR. W | . P ADK A1,DTEFIX+1 AND LENGTH OF FIX PART+1 W P ANKL A1,/FFFE MAKE EVEN W ( P ADR A1,A1
0x1c1f68…1c20fc Dummy {f00=0x0087, f01=0x0190, f02=»1,LIMIT+STKEND GET END OF SYSTEM AREA W " P CALL CMPADR MEMORY OVERFLOW? X . P RF(NL) DTSIZ0 NO! X T P* X n P LDKL A1,LMP3 YES! X x P CALL ERROR X P* X PDTSIZ0 EQU * X 6 P LD A11,WRK1+STKEND RESTORE POSITION IN CONF. DATA X P RTN A14 X
0x1c20fc…1c2290 Dummy {f00=0x0087, f01=0x0190, f02=» * X < P* UPDDTE UPDATES CURRENT DTE BLOCK WITH ITS: * Y < P* ====== * Y L < P* NAME * Y < P* TYPE * Y
0x1c2290…1c2424 Dummy {f00=0x0087, f01=0x0190, f02=» * Y < P******************************************************** Z < P Z | P Z PUPDDTE EQU * Z 4 P LDR A6,A12 GET START OF CURRENT DTE BLOCK ENTRY Z P ADK A6,2 SKIP LINK ENTRY Z , P LD A1,DTENAM+
0x1c2424…1c25b8 Dummy {f00=0x0087, f01=0x0190, f02=» P STR A1,A6 AND SAVE IN DCT [ P ADK A6,2 [ & P LDK A5,4 GET NO OF SHIFTS [ 8 . P ORKL A5,SLL0 AND CONFIG. SLL A1,8 INSTR. [ Z 4 P LD A2,NALNG+STKEND GET LENGTH OF NETWORK ADDR. [ $ P LDR A3,A2 SAVE NO OF CHARACTERS [ P SLL A2,8 LEFT ADJUST [ ,
0x1c25b8…1c274c Dummy {f00=0x0087, f01=0x0190, f02=»D PACK NA TO DCT [ | $ P ANKL A5,/1F ISOLATE SHIFT COUNT & P CWK A5,4 LESS THAN ONE BYTE LEFT? @ P RF(NG) UPDTE2 YES! j PUPDTE0 EQU * P LDK A5,0 SET NO OF SHIFTS P RF UPDTE4 P* PUPDTE2 EQU * P STR A2,A6 STORE WORD IN DCT
0x1c274c…1c28e0 Dummy {f00=0x0087, f01=0x0190, f02=» ORKL A5,SLL0 CONFIGURE SSL A1,N INSTR. 4 P LD A1,DTENSA+STKEND GET NO OF SUBADDR. DEFINED ] 0 & P RF(Z) UPDTE8 NO SUBADDR. DEFINED ] h P* ] 4 P LD A4,NSAADR+STKEND GET ADDRESS TO 1ST SUBADDR. ] P LDR A3,A1 ] * P SLL A3,1 2 DIGITS FOR EACH SUDADD
0x1c28e0…1c2a74 (1, 253) Dummy {f00=0x0087, f01=0x0190, f02=» ] P STR A2,A6 YES! SAVE IN DCT ^ P LDK A2,0 CLEAR TABLE WORD ^ , " P ADK A6,2 ADVANCE DCT POINTER ^ N P LDK A5,16 NO OF SHIFTS ^ t , P ORKL A5,SLL0 CONFIGURE SLL A1,12 INSTR. ^ PUPDTE6 EQU * ^ P SUK A5,4 NEXT NIBBLE ^ ( P CALL HEXCPY COPY
0x1c2a74…1c2c08 Dummy {f00=0x0087, f01=0x018e, f02=»************** ^ f < P* * _ < P* HEXCPY COPIES AND PACKS 4 HEXADECIMAL DIGITS * _ V < P* IN ONE WORD. * _ < P*
0x1c2c08…1c2d9c Dummy {f00=0x0087, f01=0x0190, f02=» _ V < P* A4 ADDRESS TO FIRST ASCII DIGIT * ` < P* A5 PACKING INSTR. (SLL A1,N TIMES) * ` H < P* A6 POINTER WHERE TO STORE PACKED WORD * ` < P* * ` < P
0x1c2d9c…1c2f30 Dummy {f00=0x0087, f01=0x0190, f02=» PROCESSED DIGIT * ` < P* A5 PACKING INSTR. (SLL A1,N TIMES) * a 8 < P* A6 POINTER WHERE TO STORE NEXT WORD * a x < P* * a < P****************
0x1c2f30…1c30c4 Dummy {f00=0x0087, f01=0x0190, f02=» a v P CALL HEXCNV CONVERT TO HEX b P EXR A5 SHIFT b , " P ORR A2,A1 CONFIGURE DCT WORD b B ( P SUK A3,1 DECREMENT NO OF CHARACTERS b h $ P RF(Z) HXCPY8 WHOLE NA PROCESSED b P* b P CWK A5,SLL0 FULL WORD? b P RF(NE) HXCPY6 NO! b P* b
0x1c30c4…1c3258 Dummy {f00=0x0087, f01=0x0190, f02=» b x , P ORKL A5,SLL0 CONFIGURE SSL A1,16 INSTR. c PHXCPY6 EQU * c 8 P SUK A5,4 NEXT NIBBLE c L * P ADK A4,1 NEXT CHARACTER IN CONF. DATA c j P RB HEXCPY c P* c PHXCPY8 EQU * c P RTN A14 c P EJECT c < P**********************************
0x1c3258…1c33ec Dummy {f00=0x0087, f01=0x018e, f02=»N ASCII CODE * c f < P* TO CORRESPONDING HEXADECIMAL VALUE * d < P* (4 BITS BINARY CODE) * d V < P* * d < P* ON ENTRY: A1 CHARACTER TO CONVERT
0x1c33ec…1c3580 Dummy {f00=0x0087, f01=0x0190, f02=» d V < P* * e < P******************************************************** e H P e P e PHEXCNV EQU * e " P ANK A1,/FF ISOLATE CHARACTER e P CWK A1,/29 e P RF(L) TYPERR ERRANEOUS TY
0x1c3580…1c3714 (1, 254) Dummy {f00=0x0088, f01=0x0190, f02=» CWK A1,/46 DIGIT BETWEEN A-F? e P RF(G) TYPERR NO f & P* f > P ADK A1,9 YES! f H PHXCN00 EQU * f ^ " P ANK A1,/F ISOLATE HEX NUMBER f r P RTN A14 f P* f PTYPERR EQU * f " P LDKL A1,LMP4 CONF. DATA ERROR f P CALL ERROR f P EJECT f
0x1c3714…1c38a8 Dummy {f00=0x0088, f01=0x0190, f02=» P:NA PROCESS NETWORK ADDRESS * f < P* * g > < P* SCANS THE NETWORK ADDRESS RECORD (NA=..) IN CONF. * g ~ < P* DATA AND REPACKS THE RECORD, OVERWRITING POSSIBLE * g < P* CONTIN
0x1c38a8…1c3a3c Dummy {f00=0x0088, f01=0x0190, f02=» * g ~ < P* * h . < P* ON ENTRY: A11 ADDRESS TO 1ST CHARACTER IN NETWORK * h n < P* ADDRESS. * h < P*
0x1c3a3c…1c3bd0 Dummy {f00=0x0088, f01=0x0190, f02=»ORD IN CONF. DATA * h n < P* * i < P******************************************************** i ^ P i P i PP:NA EQU * i $ P LDK A4,1 RESET PACKING CONSTANT i " P LDK A2,0 RESET ADDRESS
0x1c3bd0…1c3d64 Dummy {f00=0x0088, f01=0x0190, f02=»:NA06 END OF CONF. DATA i P* j P CCK A1,/FF END OF D-BLOCK? j * P RF(E) P:NA05 YES! j N P* j h & P CCK A1,'==' CONTINUATION RECORD? j r P RF(E) P:NA04 YES! j P* j . P CCK A1,'NN' NO! START OF NA OR NSA RECORD j P RF(E) P:NA06 YES! RET
0x1c3d64…1c3ef8 Dummy {f00=0x0088, f01=0x0190, f02=»H j l P CWK A2,/FF TOO MANY DIGITS? k P RF(NG) P:NA02 NO! k . P* k H * P LDKL A1,LMP4 YES! ERROR IN CONF. DATA k R P CALL ERROR k PP:NA02 EQU * k P LDR A3,A4 k " P ADR A3,A11 REPACKING ADDRESS k * P SCR A1,A3 PUT CHARACTER BACK IN FILE k
0x1c3ef8…1c408c Dummy {f00=0x0088, f01=0x0190, f02=»R k d $ P SUK A4,2 SET REPACKING CONSTANT l * P ADKL A11,1 ADVANCE TO NEXT CHARACTER l 2 P RB P:NA00 l ` P* l r PP:NA05 EQU * l | " P SUK A2,1 DECREMENT NA LENGTH l * P SUKL A11,1 AND POSITION IN CONF. DATA l P* l PP:NA06 EQU * l P RTN A
0x1c408c…1c4220 Dummy {f00=0x0088, f01=0x0190, f02=» * l h < P* ENDBLK LOOKS FOR END OF DATA COMMUNICATION BLOCK * m < P* ================================================= * m X < P* * m < P* END OF BLOCK IS DEFINED BY A RECORD BEGINNIN
0x1c4220…1c43b4 (1, 255) Dummy {f00=0x0088, f01=0x0190, f02=» m X < P* CONFIGURATION DATA. * n < P* * n H < P* ON ENTRY: A11 CURRENT POSITION IN CONF. DATA * n < P* * n < P
0x1c43b4…1c4548 Dummy {f00=0x0088, f01=0x0190, f02=» * n < P******************************************************** o 8 P o x P o PENDBLK EQU * o $ P LC A8,1,A11 GET NEXT CHARACTER o " P CCK A8,/00 END OF CONF. DATA? o P RF(E) ENDBL0 YES! o P* o
0x1c4548…1c46dc Dummy {f00=0x0088, f01=0x0190, f02=»8,A8 SET END OF D-BLOCK COND. o PENDBL2 EQU * p & P RTN A14 p : P XIF p J P EJECT p V T P*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*= p d 6 P* GENERAL SUBROUTINES * p T P*=*=*=*=*=*=*=*=*=
0x1c46dc…1c4870 Dummy {f00=0x0088, f01=0x0190, f02=»********** p f 8 P* GETTSK - GET NUMBER OF TASKS IN A TASK-CLASS * q P* q N 6 P* GETCTC - GET NUMBER OF COMMON TERMINAL CLASSES q X P* q 8 P**************************************************** q P* q " P* REFERENCED IN: B:TCT,B:CDT q P
0x1c4870…1c4a04 Dummy {f00=0x0088, f01=0x0190, f02=» (BINARY VALUE) q ^ P* r P* WORK REGISTERS: A5 r " P* r @ P* SUBROUTINES: CONVRT r J P* r j PGETTSK EQU * r t PGETCTC EQU * r . PGETDTE EQU * GET NO OF DTE BLOCKS DEFINED r . PGETCOP EQU * GET NO OF COPIES OF LAST DTE r 0 PGETNSA E
0x1c4a04…1c4b98 Dummy {f00=0x0088, f01=0x018e, f02=» A14 r P EJECT s 8 P**************************************************** s 8 P* GETTDC - GET NUMBER OF TERMINAL DEVICE CLASSES * s V 8 P**************************************************** s P* s P* REFERENCED IN: B:TT s P* s > P* ENT
0x1c4b98…1c4d2c Dummy {f00=0x0088, f01=0x0190, f02=» s N P* t P* WORK REGISTERS: A5 t P* t 0 P* SUBROUTINES: CONVRT t : P* t X PGETTDC EQU * t b P LC A5,TDBNC,A11 t v P SLL A5,8 t P LC A5,TDBNC+1,A11 t P CALL CONVRT t P RTN A14 t P EJECT t 8 P****************************
0x1c4d2c…1c4ec0 Dummy {f00=0x0088, f01=0x0190, f02=»******* t d P* u P* REFERENCED IN: B:TT u P* u : 4 P* ENTRY: A9 - POINTER TO NUMBER OF SDC RECORD u D P* u | D P* EXIT: A1 - NUMBER OF SPECIAL DEVICE CLASSES (BINARY VALUE) u P* u P* WORK REGISTERS: A5 u P* u P* SUBRO
0x1c4ec0…1c5054 (1, 256) Dummy {f00=0x0088, f01=0x0190, f02=»14 u P EJECT v 2 P********************************************** v 2 P* GETCLN - GET CLASS IDENTIFICATION NUMBER * v N 2 P********************************************** v P* v P* REFERENCED IN: B:TT v P* v 6 P* ENTRY: A9 - POINTER TO
0x1c5054…1c51e8 Dummy {f00=0x0088, f01=0x018e, f02=» A5 v ~ P* w P* SUBROUTINES: CONVRT w P* w 6 PGETCLN EQU * w @ P LC A5,TDCDD1,A9 w T P SLL A5,8 w l P LC A5,TDCDD2,A9 w ~ P CALL CONVRT w P RTN A14 RETURN w P EJECT w . P***************************************** w . P* GET
0x1c51e8…1c537c Dummy {f00=0x0088, f01=0x0190, f02=» P* x 8 P* ENTRY: A9 - POINTER TO CLASS DEFINITION RECORD x P* x J : P* EXIT: A1 - LINE CONNECTION NUMBER (BINARY VALUE) x T P* x P* WORK REGISTERS: A5 x P* x P* SUBROUTINES: CONVRT x P* x PGETLCN EQU * x * P STR A
0x1c537c…1c5510 Dummy {f00=0x0088, f01=0x0190, f02=»TDCLCN ADDRESS LINE CONNECTION NUMBER x , P CALL GETNUM GET LINE CONNECTION NUMBER y . P LDR A1,A5 SAVE BINARY VALUE y ^ 0 P LDR* A6,A15 RESTORE REGISTER A6 FROM STACK y 0 P LDR* A4,A15 RESTORE REGISTER A4 FROM STACK y P RTN A14 y P EJECT y : P
0x1c5510…1c56a4 Dummy {f00=0x0088, f01=0x0190, f02=»GET TASK CLASS TO MATCH * y : P* ================================ * z 2 : P* * z p : P* REFERENCED IN: B:TT * z : P*
0x1c56a4…1c5838 Dummy {f00=0x0088, f01=0x0190, f02=» * z h : P* EXIT: A5 - TCL START VALUE FOR THIS TASK CLASS * { : P* * { T : P* WORK REGISTERS: A1-A7,A10 * { : P* * {
0x1c5838…1c59cc Dummy {f00=0x0088, f01=0x0190, f02=»*********************************************** { P | 8 PGETTCL EQU * | @ P LDR A6,A5 SAVE TCL | T P LDR A7,A6 TCL START VALUE | p 8 P LDR A10,A11 SAVE POINTER TO CURRENT TASK DEF. BLOCK | 6 P LD A11,STKEND+LCDSTA START OF CONFIGURATION DATA | 4 P
0x1c59cc…1c5b60 Dummy {f00=0x0088, f01=0x0190, f02=» A5,8 MOVE TO LEFT BYTE | . P LC A5,TDBMC+5,A11 GET SECOND CHAR IN TCL } P CWR A5,A6 SAME TCL? } R P RF(NE) TCL:50 NO! } n & P CALL GETTSK GET NUMBER OF COPIES } P ADR A7,A1 INCREMENT TCL } 0 PTCL:50 CALL NXTBLK GET NEXT TASK DEF. BLOCK } P R
0x1c5b60…1c5cf4 (1, 257) Dummy {f00=0x0088, f01=0x0190, f02=» } f . P* GETCON - GET CONTENT IN MEMORY WORD * ~ . P***************************************** ~ : P* ~ l P* REFERENCED IN: SEGGEN ~ v P* ~ " P* ENTRY: A2 - MEMORY ADDRESS ~ . P* MMUOPT - MMU OPTION SWITCH (X) ~ P* ~ , P* E
0x1c5cf4…1c5e88 Dummy {f00=0x0088, f01=0x0190, f02=» ~ " P LD A1,SCTOPT GET OPTION WORD P ANK A1,1 MMU OPTION . P RF(Z) GCON10 NO MMU J P ELR A1,A2 f P RF GCON20 x PGCON10 EQU * P LDR* A1,A2 PGCON20 EQU * P RTN A14 RETURN P EJECT . P****************************
0x1c5e88…1c601c Dummy {f00=0x0088, f01=0x0190, f02=»EFERENCED IN: DWTGEN P* 4 P* ENTRY: INTTAB - START OF TEMP.INTERRUPT TABLE & 6 P* CONTYP - CONNECTION TYPE AND LINE NUMBER ^ , P* A5 - RUN TIME DWT-ADDRESS P* P* EXIT: P* P* WORK REGISTERS: P*
0x1c601c…1c61b0 Dummy {f00=0x0088, f01=0x0190, f02=»* A2,A4 GET NUMBER OF BLOCKS P SUK A4,2 $ P 6 P LDR A2,A2 ZERO? > PTTA10 EQU * V P RF(Z) TTA11 YES! j ( P LDR* A4,A4 GET START OF NEXT BLOCK P SUK A2,1 ZERO? P RB TTA10 P* P* AREA TO BUILD BLOCKS P*
0x1c61b0…1c6344 Dummy {f00=0x0088, f01=0x018e, f02=» P* BUILD BLOCKS IN FWT AREA P* & PTTA09 EQU * 0 P LDK A3,5 D PTTA12 EQU * V P SUK A2,2 j < P CW A2,STKEND+FWTSTA START OF FWT OR USED PART OF SYSLDM | P RF(E) TTA14 P SUK A3,1 P RF(Z) TTA20 P RB TTA12 P
0x1c6344…1c64d8 Dummy {f00=0x0088, f01=0x018e, f02=» PTTA15 EQU * P LDK A3,5 PTTA16 EQU * . P SUK A2,2 B P CWR A2,A12 T P RF(E) TTA17 h P ST A2,STKEND+LIMIT | P SUK A3,1 P RF(Z) TTA20 P RB TTA16 PTTA17 EQU * P LDKL A1,LMP3 P CALL ERROR
0x1c64d8…1c666c Dummy {f00=0x0088, f01=0x0190, f02=» P ADK A2,4 0 P STR A2,A4 STRORE POINTER TO NEXT FREE BLOCK P* N P* STORE NUMBER OF BLOCKS X P* x . P IM* STKEND+INTTAB INCREMENT BLOCK COUNTER P RTN A14 RETURN P EJECT 2 P**********************************************
0x1c666c…1c6800 Dummy {f00=0x0088, f01=0x0190, f02=»CED IN: B:ITAB P* " P* ENTRY: A8 - CONNECTION TYPE P* A9 - BOARD NUMBER F 8 P* SAVE20 - MAX. LENGTH OF BOARD CONF. TABLE j P* & P* EXIT: A12 - START OF FREE AREA P* , P* WORK REGISTERS: A1,A2,A3,A10,A11,
0x1c6800…1c6994 (1, 258) Dummy {f00=0x0089, f01=0x0190, f02=»LOW? p , P LD A12,SCTSFA NO!GET START OF FREE AREA P LDR A11,A12 SAVE < P ADKL A12,2 V P ST A12,STKEND+BRDTAB STORE j @ P LD A10,STKEND+INTTAB GET START OF TEMPORARY INTERRUPT TABLE , P LDR* A1,A10 GET NUMBER OF BLOCKS.ZERO? P
0x1c6994…1c6b28 Dummy {f00=0x0089, f01=0x0190, f02=» TYPE d P LDR A3,A2 SAVE $ P ANK A3,/0F GET CONNECTION TYPE & P SUR A3,A8 RIGHT TYPE? N P RF(Z) BTA30 YES! l PBTA20 EQU * $ P LDR* A10,A10 NO!GET NEXT BLOCK P SUK A1,1 LAST BLOCK? P RB BTA10 PBTA30 EQU * " P A
0x1c6b28…1c6cbc Dummy {f00=0x0089, f01=0x0190, f02=» P* P LD A3,STKEND+WRK1 P CWR A2,A3 , P RB(L) BTA20 NO! > P* V & P* BUILD BOARD CONFIGURATION TABLE ` P* P IM STKEND+WRK3 " P CWK A8,5 LWSI CONNECTION? =2 P RF(E) BTA34 YES! =2 " P CWK A8,6 RWSI CONNECTION?
0x1c6cbc…1c6e50 Dummy {f00=0x0089, f01=0x018e, f02=» P LDR A12,A11 P ADKL A12,2 ( P ADR A12,A2 GET ENTRY IN BOARD TABLE 0 P STR A11,A12 STORE P RB BTA20 v PBTA40 EQU * P* 2 P* COMPUTE LENGTH OF BOARD CONFIGURATION TABLE P* : P LD A1,STKEND+WRK4 GET MAX. LENGTH
0x1c6e50…1c6fe4 Dummy {f00=0x0089, f01=0x0190, f02=» P RF(NZ) BTA60 P SUK A1,2 P RF(Z) BTA70 0 P SUKL A12,2 D P RB BTA50 X PBTA60 EQU * j : P STR A1,A11 STORE LENGTH OF BOARD CONFIGURATION TABLE ~ P ADKL A12,2 0 P ST A12,SCTSFA STORE NEW START OF FREE AREA PBTA7
0x1c6fe4…1c7178 Dummy {f00=0x0089, f01=0x0190, f02=»GURATION TABLES * t 2 P********************************************** P* P P* REFERENCED IN: B:ITAB Z P* z " P* ENTRY: WRK1 - BOARD NUMBER & P* A8 - CONNECTION TYPE P* & P* EXIT: A12 - START OF FREE AREA P
0x1c7178…1c730c Dummy {f00=0x0089, f01=0x0190, f02=» P RF(Z) BLT70 P LDKL A3,-1 LINE COUNTER P RF BLT15 8 PBLT10 EQU * J P SUK A1,2 DECREMENT LENGTH ^ P RF(Z) BLT70 RETURN P* PBLT15 EQU * P LDR A2,A12 P ADK A2,24 B P ST A2,STKEND+FWTFLG INITIATE POINTER TO
0x1c730c…1c74a0 Dummy {f00=0x0089, f01=0x0190, f02=»2 P LDR* A2,A11 READ LINE.ZERO? P RB(Z) BLT10 YES! . P LDK A4,32 GET TEST LENGTH H ( P CALL M:TST TEST IF MEMORY OVERFLOW? j P* $ P* SCAN TEMPORARY INTERRUPT TABLE P* ( P LD A2,STKEND+WRK1 GET BOARD NUMBER " P CWK A8,5
0x1c74a0…1c7634 (1, 259) Dummy {f00=0x0089, f01=0x0190, f02=» P SUK A2,1 =2 PBLT17 EQU * =2 P ADR A2,A3 ADD LINE NUMBER 6 P SLL A2,4 X " P ADR A2,A8 ADD CONNECTION TYPE j . P LD A10,STKEND+INTTAB GET START OF T.I.T. & P LDR* A4,A10 GET NUMBER OF BLOCKS P SUKL A10,2 PBLT20 EQ
0x1c7634…1c77c8 Dummy {f00=0x0089, f01=0x018e, f02=»ORE RUN-TIME DWT-ADDRESS IN LINE CONFIGURATION TABLE P* < * P LD A5,-2,A10 GET RUN TIME DWT-ADDRESS F P LDR A6,A5 t " P ANK A6,/0001 DOUBLE KEYBOARD? P RF(Z) BLT25 N0! & P LD A6,DWTDEV,A5 GET DEVICE STATUS ( P ANK A6,/FF GET EIGHT RIGH
0x1c77c8…1c795c Dummy {f00=0x0089, f01=0x0190, f02=» d P ANK A6,7 GET DEVICE ADDRESS PBLT26 EQU * , P ADR A6,A6 @ P LDR A7,A12 SAVE R P ADR A7,A6 j P LD A6,2,A7 ZERO? | P RF(Z) BLT27 YES! ( P LD A6,DWTST,A5 NO!GET DEVICE STATUS P ANK A6,/0040 INPUT DEVICE? P RF(Z) B
0x1c795c…1c7af0 Dummy {f00=0x0089, f01=0x0190, f02=» A5,A6 STORE RUN TIME DWT-ADDRESS & P ST A6,STKEND+FWTFLG STORE POINTER * * P LD A5,-2,A10 GET RUM TIME DWT-ADDRESS T PBLT27 EQU * * P ST A5,2,A7 STORE RUN TIME DWT-ADDRESS P RF BLT30 PBLT28 EQU * 2 P LD A6,STKEND+FWTFLG GET POINT
0x1c7af0…1c7c84 Dummy {f00=0x0089, f01=0x0190, f02=» P LDR* A10,A10 GET NEXT BLOCK P SUK A4,1 LAST BLOCK? ( P RF(Z) BLT40 YES! F P RB BLT20 NO! ` P* v D P* MOVE DWT-ADR.IN TEMP.AREA TO FREE LOCATIONS IN LINE CONF.TABLE P* PBLT40 EQU * 2 P LD A6,STKEND+FWTFLG GET POINTER T
0x1c7c84…1c7e18 Dummy {f00=0x0089, f01=0x0190, f02=»1 EQU * P ADK A4,2 P LDR* A2,A4 " P RF(Z) BLT42 6 P RB BLT41 J PBLT42 EQU * * P STR A5,A4 STORE RUN TIME DWT-ADDRESS p P SUK A6,2 P RB BLT43 P* P* CLEAR TEMP.AREA P* PBLT45 EQU * 2 P LD
0x1c7e18…1c7fac Dummy {f00=0x0089, f01=0x0190, f02=»MR A6 NO!CLEAR MEMORY WORD P SUK A6,2 DECREMENT POINTER " P RB BLT46 F P* X 0 P* COMPUTE LENGTH OF LINE CONFIGURATION TABLE b P* PBLT48 EQU * P LDR A2,A12 SAVE 2 P ADK A2,22 ADD. MAX LENGTH OF LINE CONF.TABLE P LDK A
0x1c7fac…1c8140 Dummy {f00=0x0089, f01=0x0190, f02=» P RB BLT50 PBLT60 EQU * 8 P STR A4,A12 STORE LENGTH OF LINE CONFIGURATION TABLE * P ADKL A12,2 f J P STR A12,A11 STORE THE ADDRESS IN BOARD CONF.TABLE TO LINE CONF.TABLE z 4 P ADR A12,A4 A12 - START OF NEXT LINE CONF.TABLE 2 PBLT65 ST
0x1c8140…1c82d4 (1, 260) Dummy {f00=0x0089, f01=0x0190, f02=»********************************* * P* M:TST - TEST IF MEMORY OVERFLOW * * * P************************************* X P* P* ENTRY: A4 - TEST LENGTH P* P* WORK REGISTERS: A2,A4 P* PM:TST EQU * $ P LD A2,SCTSFA
0x1c82d4…1c8468 Dummy {f00=0x0089, f01=0x018e, f02=»MTST20 P LDKL A1,LMP3 P CALL ERROR MEMORY OVERFLOW $ PMTST20 EQU * H P CWR A2,A4 P RB(NE) MTST10 n P RTN A14 RETURN P EJECT B P************************************************************** B P* BINASC - CONVERT A BI
0x1c8468…1c85fc Dummy {f00=0x0089, f01=0x018e, f02=» B P************************************************************** P* J P* REFERENCED IN: B:DWTT T P* v , P* ENTRY: A1 - BINARY NUMBER TO CONVERT P* $ P* EXIT: A1,A5 - ASCII OUTPUT P* P* WORK REGISTER: A2
0x1c85fc…1c8790 Dummy {f00=0x0089, f01=0x018e, f02=» P SUKL A1,100 =2 P LDKL A5,/100 =2 PBIN:10 CWK A1,10 =2 6 P RF(L) BIN:20 =2 R P SUK A1,10 =2 l P ADK A5,/1 =2 P RB BIN:10 =2 PBIN:20 ORKL A5,/3030 =2 P ORK A1,/30 =2 P SRC A5,8 =2 P LDR A2,A5
0x1c8790…1c8924 Dummy {f00=0x0089, f01=0x0190, f02=» : P****************************************************** : P* * B : P* MMUINI - INIT MMU TABLE IN TTAB * : P* =============================== * : P*
0x1c8924…1c8ab8 Dummy {f00=0x0089, f01=0x0190, f02=» * x : P* ENTRY: APCSTA - APPL. CONTROL BLOCK ADDRESS * & : P* * d : P* EXIT: * : P*
0x1c8ab8…1c8c4c Dummy {f00=0x0089, f01=0x018e, f02=» * : P* SUBROUTINES: * : P* * H : P****************************************************** P EJECT PMMUINI EQU * < P LD A2,STKEND+APCSTA GET ADDRESS T
0x1c8c4c…1c8de0 Dummy {f00=0x0089, f01=0x0190, f02=» . P LD A2,APLLAP,A2 GET LOGICAL PAGE ADDRESS ( P SRL A2,12 ISOLATE MMU ENTRY NUMBER 6 P RF(NZ) MMI:10 PAGES DEFINED b ( P LDK A2,16 MAX NUMBER OF MMU ENTRIES 0 PMMI:10 SUR A2,A3 NUMBER OF ENTRIES TO WRITE P SLL A3,1 TWICE P ADR A3,A1
0x1c8de0…1c8f74 (1, 261) Dummy {f00=0x0089, f01=0x0190, f02=»T ADD DISPL. TO START OF MMU TABLE =6 P LDKL A4,/FC00 =6 . PMMI:15 EQU * =6 H 2 P CWR A5,A3 INIT MMU ENTRY WHITH PAGE ERROR? =6 ` P RF(E) MMI:16 NO! =6 0 P STR A4,A5 STORE PAGE ERROR IN MMU TABLE =6 P ADK A5,2 NEXT MMU ENTRY =6
0x1c8f74…1c9108 Dummy {f00=0x0089, f01=0x0190, f02=» ENTRIES TO WRITE? | P RF(N) MMI:30 NO " P STR A4,A3 STORE PAGE ADDRESS 2 P ADK A3,2 NEXT MMU ENTRY X $ P ADKL A4,/400 NEXT PAGE ADDRESS x P RB MMI:20 PMMI:30 RTN A14 RETURN P XIF P EJECT 6 P******************************
0x1c9108…1c929c Dummy {f00=0x0089, f01=0x0190, f02=» ^ 6 P* ============================== * 6 P* * B 6 P* REFERENCED IN: * | 6 P* * 6 P* ENTRY:
0x1c929c…1c9430 Dummy {f00=0x0089, f01=0x0190, f02=» * d 6 P* A11- START OF CONFIGURATION DATA * 6 P* * H 6 P* WORK REGISTERS: A2 * 6 P* * 6 P* SUBROUTINES:
0x1c9430…1c95c4 Dummy {f00=0x0089, f01=0x0190, f02=»*********** j PFSTAPL EQU * , P LD A2,SYSLOD GET NUMBER OF APPLICATIONS ( P ST A2,STKEND+APLNO SAVE X 6 P LDKL A2,SYSLOD+2 FIRST APPLICATION CONTROL BLOCK x P ST A2,STKEND+APCSTA SAVE 6 P LD A11,STKCOM+CONSTA START OF CONFIGURATION DATA
0x1c95c4…1c9758 Dummy {f00=0x0089, f01=0x0190, f02=» * n 6 P* NXTAPL - GET NEXT APPLICATION * 6 P* ============================= * R 6 P* * 6 P* REFERENCED IN: * 6 P*
0x1c9758…1c98ec Dummy {f00=0x0089, f01=0x0190, f02=»PL. CONTROL * t 6 P* BLOCK ADDRESS * 6 P* * X 6 P* EXIT: APLNO - REMAINING NUMBER OF APPL.-1 * 6 P* APCSTA - NEXT APPL. CONTROL BLOCK * 6 P*
0x1c98ec…1c9a80 Dummy {f00=0x0089, f01=0x0190, f02=»,A2 * z 6 P* * $ 6 P* SUBROUTINES: * ^ 6 P* * 6 P*************************************************
0x1c9a80…1c9c14 (1, 262) Dummy {f00=0x008a, f01=0x018e, f02=»O SAVE REMAINING NUMBER OF APPL. ~ P RF(Z) NOAPL NO MORE! ( * P CALL NXTADB GET NEXT APPL DEF. BLOCK F @ P LD A2,STKEND+APCSTA GET ADDRESS TO CURRENT APPL. CTRL BLOCK t ( P ADK A2,ACBLEN NEXT APPL. CTRL BLOCK & P ST A2,STKEND+APCSTA SAVE ADDRESS
0x1c9c14…1c9da8 Dummy {f00=0x008a, f01=0x0190, f02=» ~ P EJECT D P**************************************************************** D P* * ^ D P* NXTADB - GET NEXT APPLICATION DEF. BLOCK * D P* ===============
0x1c9da8…1c9f3c Dummy {f00=0x008a, f01=0x0190, f02=» NXTAPL * ~ D P* * 6 D P* ENTRY: A11 - CURRENT POINTER TO CONFIGURATION DATA * ~ D P* *
0x1c9f3c…1ca0d0 Dummy {f00=0x008a, f01=0x0190, f02=»OCK * V D P* * D P* WORK REGISTERS: * V D P* * D P* SUBROUTINES: ERROR
0x1ca0d0…1ca264 Dummy {f00=0x008a, f01=0x0190, f02=»************************************** v PNXT10 ADKL A11,1 NEXT CHAR . ( PNXTADB LCR A2,A11 GET NEXT CHARACTER P $ P CCK A2,/0000 END OF CONF DATA? | P RF(NE) NEXT20 NOT YET P LDKL A1,LMP4 FORMAT ERROR P CALL ERROR 2 PNEXT20 CCK A2,/F
0x1ca264…1ca3f8 Dummy {f00=0x008a, f01=0x0190, f02=» RETURN P EJECT 2 P********************************************* 2 P* * T 2 P* CHKMOV - CHECK MEMORY OVERFLOW AND MOVE * 2 P* ======================================= * 2 P*
0x1ca3f8…1ca58c Dummy {f00=0x008a, f01=0x0190, f02=» b 2 P* ENTRY: A1 - FROM-ADDRESS * 2 P* A2 - TO-ADDRESS * > 2 P* A3 - LENGTH * t 2 P* STKEND+LIMIT - END OF SYSTEM * 2 P* AREA
0x1ca58c…1ca720 Dummy {f00=0x008a, f01=0x0190, f02=» * 2 P* WORK REGISTERS: * ( 2 P* * ^ 2 P* SUBROUTINES: MOVE,ERROR * 2 P* * 2 P********
0x1ca720…1ca8b4 (1, 263) Dummy {f00=0x008a, f01=0x018e, f02=» P LDR A11,A3 GET LENGTH . P XRR A9,A9 PHYSICAL END OF FIRST PARTITION " 0 P SUR A9,A2 COMPUTE AREA LEFT IN FIRST PART. T & P CALL CMPADR ENOUGTH MEMORY LEFT? P RF(L) CHK20 YES 0 PCHK10 LDKL A1,LMP3 INDICATE MEMORY OVERFLOW P CALL ERRO
0x1ca8b4…1caa48 Dummy {f00=0x008a, f01=0x018e, f02=» & P RB(G) CHK10 SYSTEM AREA OVERFLOW! P CALL MOVE MOVE AREA . P LDR* A11,A15 RESTORE A11 J P LDR* A9,A15 RESTORE A9 l P RTN A14 P EJECT D P**************************************************************** D P* STAR
0x1caa48…1cabdc Dummy {f00=0x008a, f01=0x0190, f02=» ( P CALL B:TCT BUILD TASK CONTROL TABLE P IFF FM=0 4 & P CALL B:FWT BUILD FILE WORK TABLES F P XIF p ( P CALL MONBLK GENERATE MONITOR BLOCKS | P IFF EDM=0 2 P CALL B:MXTT BUILD MONITOR EXTENT TASK TABLES 6 P CALL B:MSEG BUILD MONIT
0x1cabdc…1cad70 Dummy {f00=0x008a, f01=0x0190, f02=»LE WORK BLOCK TABLE v P XIF P IFF MMUPAG+DSKPAG=0 ( ( P CALL B:STAB BUILD SEGMENT TABLE(S) D P XIF p P IFF SPDVCL+TEDVCL=0 | 2 P CALL B:DWTS BUILD SPECIAL DEVICE WORK TABLES P XIF P IFF TEDVCL=0 2 P CALL B:DWTT BUILD TERMI
0x1cad70…1caf04 Dummy {f00=0x008a, f01=0x0190, f02=»ERRUPT TABLE =7 z P XIF P IFT DC=1 =7 $ 6 P CALL B:CNA BUILD COMPUTER NETWORK ARCHITECTURE =7 : P XIF t P EJECT F P***************************************************************** F P* END OF MONITOR SAVE01URATION PART
0x1caf04…1cb098 Dummy {f00=0x008a, f01=0x4036, f02=»***************************** l P END &@ 2 6 P CALL B:CNA BUILD COMPUTER NETWORK ARCHITECTURE =7 : P XIF t P EJECT F P***************************************************************** F P* END OF MONITOR SAVE01URATION PART
0x1cb098…1cb22c Dummy {f00=0x008a, f01=0x403c, f02=» 0 P******************************************** @ 8ALL B:CNA BUILD COMPUTER NETWORK ARCHITECTURE =7 : P XIF t P EJECT F P***************************************************************** F P* END OF MONITOR SAVE01URATION PART
0x1cb22c…1cb3c0 Dummy {f00=0x008a, f01=0x2008, f02=» P X ` h p
0x1cb3c0…1cb554 (1, 264) Dummy {f00=0x008a, f01=0x0190, f02=» CWR A3,A1 ATTRIBUTE BEFOR END OF LINE? } P RF(NG) DEL200 NO ~ 0 P LDR A3,A1 ~ J PDEL200 EQU * ~ P LDR A1,A4 ~ p PDEL300 EQU * ~ P ADK A1,1 ~ , P CF A14,GETVDU GET CHAR. IN VDU BUFFER ~ P SUK A1,1 ~ , P CF A14,STOVDU STORE CHAR. IN
0x1cb554…1cb6e8 Dummy {f00=0x008a, f01=0x018e, f02=»4,STOVDU STORE NULL CHAR IN VDU BUFFER ~ P CF A14,SAVE1 . P LDK A5,LLINE D P LDR A6,A11 Z P SUR A10,A10 n P CF A14,LINE GET LINE FLAG P LC A1,LINFLG,A6 P ORK A1,1 P SC A1,LINFLG,A6 P CF A14,REST1 ( P CF A14,DISM
0x1cb6e8…1cb87c Dummy {f00=0x008a, f01=0x0190, f02=» P XIF P EJECT < P******************************************************** " < P* * b < P* RESET RESET KEY HANDLING * < P*
0x1cb87c…1cba10 Dummy {f00=0x008a, f01=0x0190, f02=»RK AREA P* A13= RESERVED P* ( 8 P**************************************************** 2 PRESET EQU * n " P CM MODE,A11 RESET INSERT MODE * P CF A14,LMP6OF TURN OFF "INSERT" LAMP $ P CM KBINH,A11 RESSTORE KEYBOARD ( P CF A14,LM
0x1cba10…1cbba4 Dummy {f00=0x008a, f01=0x0190, f02=»******************************************* @ P* * 4 @ P* DUP DUPLICATE KEY * x @ P* * @ P********
0x1cbba4…1cbd38 Dummy {f00=0x008a, f01=0x0190, f02=»* A13= RESERVED P* @ P************************************************************ " PDUP EQU * f P LDK A2,DUPCH GET DUP CHAR. x P CF A14,NUM P CF A14,TAB P RTN A14 P EJECT @ P**************************************
0x1cbd38…1cbecc Dummy {f00=0x008a, f01=0x018e, f02=» * j @ P* * @ P*********************************************************** b P* REGISTERS P* P* A2= KEY-CHAR P* A11= RESERVED P* A13= RESERVED
0x1cbecc…1cc060 Dummy {f00=0x008a, f01=0x0190, f02=» l P CF A14,NUM P RTN A14 P EJECT , D P*************************************************************** : P* & P* Z E R O : 3 TRIPLE ZERO KEY ( P* Z E R O : 2 DOUBLE ZERO KEY P* 6 P****************************
0x1cc060…1cc1f4 (1, 265) Opaque[0x194]
0x1cc1f4…1cc388 # DirEnt {nam=»SYSLCR«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1158, f03=0x0000}
0x1cc1f4…1cc388 IdxSect {
0x1cc1f4…1cc388 f00 = 0x008a // 0x1cc1f4 @0x0
0x1cc1f4…1cc388 f01 = 0x0044 // 0x1cc1f6 @0x2
0x1cc1f4…1cc388 gno = [ // 0x1cc1f8 @0x4
0x1cc1f4…1cc388 [0x00]: C0x008a.0x3.0
0x1cc1f4…1cc388 [0x01]: C0x008b.0x0.0
0x1cc1f4…1cc388 [0x02]: C0x008b.0x1.0
0x1cc1f4…1cc388 [0x03]: C0x008b.0x2.0
0x1cc1f4…1cc388 [0x04]: C0x008b.0x3.0
0x1cc1f4…1cc388 [0x05]: C0x008c.0x0.0
0x1cc1f4…1cc388 [0x06]: C0x008c.0x1.0
0x1cc1f4…1cc388 [0x07]: C0x008c.0x2.0
0x1cc1f4…1cc388 [0x08]: C0x008c.0x3.0
0x1cc1f4…1cc388 [0x09]: C0x008d.0x0.0
0x1cc1f4…1cc388 [0x0a]: C0x008d.0x1.0
0x1cc1f4…1cc388 [0x0b]: C0x008d.0x2.0
0x1cc1f4…1cc388 [0x0c]: C0x008d.0x3.0
0x1cc1f4…1cc388 [0x0d]: C0x008e.0x0.0
0x1cc1f4…1cc388 [0x0e]: C0x008e.0x1.0
0x1cc1f4…1cc388 [0x0f]: C0x008e.0x2.0
0x1cc1f4…1cc388 [0x10]: C0x008e.0x3.0
0x1cc1f4…1cc388 [0x11]: C0x008f.0x0.0
0x1cc1f4…1cc388 [0x12]: C0x008f.0x1.0
0x1cc1f4…1cc388 [0x13]: C0x008f.0x2.0
0x1cc1f4…1cc388 [0x14]: C0x008f.0x3.0
0x1cc1f4…1cc388 [0x15]: C0x0090.0x0.0
0x1cc1f4…1cc388 [0x16]: C0x0090.0x1.0
0x1cc1f4…1cc388 [0x17]: C0x0090.0x2.0
0x1cc1f4…1cc388 [0x18]: C0x0090.0x3.0
0x1cc1f4…1cc388 [0x19]: C0x0091.0x0.0
0x1cc1f4…1cc388 [0x1a]: C0x0091.0x1.0
0x1cc1f4…1cc388 [0x1b]: C0x0091.0x2.0
0x1cc1f4…1cc388 [0x1c]: C0x0091.0x3.0
0x1cc1f4…1cc388 [0x1d]: C0x0092.0x0.0
0x1cc1f4…1cc388 [0x1e]: C0x0092.0x1.0
0x1cc1f4…1cc388 [0x1f]: C0x0092.0x2.0
0x1cc1f4…1cc388 [0x20]: C0x0092.0x3.0
0x1cc1f4…1cc388 [0x21]: C0x0093.0x0.0
0x1cc1f4…1cc388 ]
0x1cc1f4…1cc388 }
0x1cc388…1cc51c Dummy {f00=0x008a, f01=0x0190, f02=» 2 P IDENT SYSLCR REL 11.0 81-10-06 870105041100 P : P =5,NOT CORRECT CHANGE IN B P REL 11.0 81-09-16 f . P =4,T:A FOR TRABUG COMMON FOR ALL TASKS P REL 11.0 81-05-19 , P =3,WHEN MMUPAG=1 APPLICATION CODE IS * P
0x1cc51c…1cc6b0 Dummy {f00=0x008a, f01=0x018e, f02=»ING BUFFERS p P FROM TOP P PRR 11.0 80-12-03 * 0 P =1,APPLICATION CONTROL BLOCK IS EXTENDED J P WITH 1 WORD ~ P PRR 11.0 80-11-19 P P > P********************************************************
0x1cc6b0…1cc844 Dummy {f00=0x008a, f01=0x0190, f02=» N P* P* P* P* & P* 0 P* : > P********************************************************** D P* P* CREDIT APPLICATION: F P* SYSLCR READS CONFIGURATION FILE (ALREADY IN CORE) AND BUILD B P* SHADOW-
0x1cc844…1cc9d8 Dummy {f00=0x008a, f01=0x0190, f02=»F TO FOLLOW MONITOR AND WILL ALSO MOVE r P* DDIV-PROTOTYPE . . P* N H P* APPLICATION WORKBLOCKS, DESCRIPTORS, STACK AND TABLES ARE NOW X H P* BUILT FROM 'BOTTOM' (HIGHEST FREE ADDRESS) OF MEMORY. BUFFERS H P* ARE, IN CASE OF M
0x1cc9d8…1ccb6c Dummy {f00=0x008a, f01=0x018e, f02=» P* 'OVER' SYSLCR. P EJECT " P 0 P*************************** < P* * ` P* ENTRIES AND EXTERNALS * P* * P*************************** P P* LABEL ENTR
0x1ccb6c…1ccd00 Dummy {f00=0x008a, f01=0x0190, f02=» 2 P EXTRN XMOVE MOVE BLOCKS INSIDE MEMORY VIA MMU P EXTRN MOVMMT MOVE MM-TABLE > $ P EXTRN GETTAB FIND TTAB-ADDRESS b $ P EXTRN GETTTB FIND TTAB-ADDRESS 0 P EXTRN MMENT FIND LAST USED ENTRY IN MM-TAB ( P EXTRN ERROR ERROR HANDLING ROUTIN
0x1ccd00…1cce94 (1, 266) Dummy {f00=0x008b, f01=0x0190, f02=»DEFINITION BLOCK p * P EXTRN CONVRT CONVERSION ASCII-BINARY 2 P EXTRN GETNUM CONVERT 3 ASCII-DIGITS TO BINARY F & P EXTRN MULT MULTIPLICATION ROUTINE | 4 P EXTRN GETAPP FIND APPLICATION AND ITS CONF.FILE P EXTRN QUEJOB QUEUE TASK P " P*
0x1cce94…1cd028 Dummy {f00=0x008b, f01=0x0190, f02=»RN MMEND ABSOLUTE END ADDRESS OF WORK-TAB 1 2 P EXTRN MMDDIV WORK-TABLE 2 (MM) RELATIVE 'REL' 4 P EXTRN PSW j " P EXTRN INILEN LENGTH OF SYSINI | , P EXTRN LSTPAG DISPL. TO 'ENTRY-POINTER' P EXTRN MMBEG P P EJECT $ P* SYSTEM CON
0x1cd028…1cd1bc Dummy {f00=0x008b, f01=0x0190, f02=» " P EXTRN SCTEFA END OF FREE AREA " P EXTRN SCTNOP NUMBER OF PAGES * P EXTRN SCTPSZ PAGE SIZE P P EXTRN SCTOPT SYSTEM OPTION p $ P EXTRN SCTPAG PAGE TABLE ADDRESS 4 P EXTRN SCTSWB ADDRESS TO SWB CONTROL BLOCK TABLE P EXTRN SCTBUG BUGGER
0x1cd1bc…1cd350 Dummy {f00=0x008b, f01=0x0190, f02=»OF COMMON-PAD AREA | P P* EXTERNAL LABELS " P < P* D , P EXTRN TTB:SA START OF SAVE AREA IN TTAB N 8 P EXTRN TTB:CB DISPL. TO CURRENT SEGMENT BASE ADDRESS ~ & P EXTRN TTB:MT DISPL. TO MMU TABLE $ P EXTRN TTB:ID DISPL. TO TASK ID
0x1cd350…1cd4e4 Dummy {f00=0x008b, f01=0x018e, f02=»********************************* , P* CONDITIONAL ASSEMBLY * * , P*************************************** Z P PMMUPAG EQU 1 1 = NO MMU P . PSWPBLK EQU 0 0 = NO SWAPPABLE WORK BLOCKS P 2 P********************
0x1cd4e4…1cd678 Dummy {f00=0x008b, f01=0x0190, f02=» ` 2 P* ==================== * 2 P* * > 2 P********************************************* t P 4 PAPLADA EQU 22 APPL. DISC FILE ADDR. (2 WORDS) =1 ( PAPLREL EQU 18 APPL. RELOCATION
0x1cd678…1cd80c Dummy {f00=0x008b, f01=0x0190, f02=»APPLICATION LOAD ADDR. (LOGICAL ADDR.) & PAPLLAP EQU 12 LOGICAL PAGE ADDRESS . 8 PAPLLDA EQU 0 APPLICATION LOAD ADDR. (PHYSICAL ADDR.) X . PAPLMMC EQU 10 APPLICATION MMU START ENTRY ( PAPLMMP EQU 8 SEGMENT START MMU ENTRY . PAPLSEG EQU 4 PHYSICAL
0x1cd80c…1cd9a0 Dummy {f00=0x008b, f01=0x018e, f02=»M START ADDRESS z " PAPLTYP EQU 8 APPLICATION TYPE . PAPLPSZ EQU 20 APPLICATION SEGMENT SIZE =1 > P EJECT p P ~ P PROGRAM STRUCTURE: P F P* ENTRY ->! * SYSLCR ENTRY * ! N P* ! READ
0x1cd9a0…1cdb34 (1, 267) Dummy {f00=0x008b, f01=0x0190, f02=» F P* ! T:ATAB: ! F P* ! -A TABLE OF 'NUMBER OF REAL TASKS'IS BUILT AT ! N F P* ! THE END OF MONITOR. ! F P* ! U:BTAB:
0x1cdb34…1cdcc8 Dummy {f00=0x008b, f01=0x0190, f02=»OTYPE. ! v F P* ! ! 0 F P* ! -RELOCATE ALL W.B.-ADDRESSES IN DDIV-PROTOTYPE. ! z F P* ! -REMOVE NOT USED ENTRIES IN T:ATAB !
0x1cdcc8…1cde5c Dummy {f00=0x008b, f01=0x0190, f02=» ! X < P* ! SYSLCO AND SYSLBA),SYSINI AND CONF.DATA , P* ! TO FOLLOW SHADOW-TABLES T F P* ! -CONTINUE IN PART 2.A ! F P* -----------------------------------------------
0x1cde5c…1cdff0 Dummy {f00=0x008b, f01=0x0190, f02=» ! ~ F P* ! C O M D A T ! 8 F P* ! GENERATE COMMON DATA AREA. PROCESS CWB'S & UWB'S. ! F P* ! -MOVE D.T. AND W.B., COPY UWB'S ACCORDING TO
0x1cdff0…1ce184 Dummy {f00=0x008b, f01=0x0190, f02=» ! ` F P* ! C L A D A T ! F P* ! BUILD TASK CLASS DATA AREAS. PROCESS CWB'S, UWB'S ! d F P* ! AND DWB'S. ! F P* ! -B
0x1ce184…1ce318 Dummy {f00=0x008b, f01=0x0190, f02=» ! -MOVE D.T. & W.B., COPY UWB'S ! F P* ! -MOVE D.T.'S OF SWB'S AND TWB'S ! F F P* ! -SEARCH DBLK-TAB FOR DWB'S. MOVE D.T. AND UPDATE ! F P* ! W.B.-ADDRESS
0x1ce318…1ce4ac Dummy {f00=0x008b, f01=0x0190, f02=» ! n F P* ! BUILD PROTOTYPE TASK-LOCAL DATA AREAS. ! ( F P* ! -GENERATE TWB'S AND RESERVE FOR SWB'S ! r F P* ! -ALLOCATE FIXED BUFFERS AND TERMINAL STACK ! F P*
0x1ce4ac…1ce640 Dummy {f00=0x008b, f01=0x0190, f02=» ! P F P* ! -CONTINUE IN PART 2.B ! F P* !-----------------------------------------------------! T P P* ! R E A L T A ! PART 2.B F P* ! BUILD RE
0x1ce640…1ce7d4 (1, 268) Dummy {f00=0x008b, f01=0x0190, f02=» ! -COPY T:A'S ACCORDING TO SHADOW-TABLE ! F P* ! -BUILD TWB'S AND RESERVE FOR SWB'S ! @ F P* ! -ALLOCATE FIXED BUFFERS AND STACK ! F P* ! -UPDATE TID IN T:A AND SAVE TID IN T:A
0x1ce7d4…1ce968 Dummy {f00=0x008b, f01=0x0190, f02=» PARTS IN THIS PROGRAM ! h F P* !-----------------------------------------------------! & P EJECT p . P***************************************** ~ . P* * . P* COMMON DISPLACEMENTS AND CONSTANTS
0x1ce968…1ceafc Dummy {f00=0x008b, f01=0x0190, f02=»DRESS TO APPL. CONTROL TABLE $ PAPPLNO EQU 18 APPLICATION NUMBER $ ( PBUFSIZ EQU 14 TEMPORARY BUFFER SIZE L . PCONLEN EQU 0 LENGTH OF CONFIGURATION DATA x , PCONSTA EQU 2 START OF CONFIGURATION DATA ( PDATEND EQU 34 END OF DDIV PROTOTYPE $ PDY
0x1ceafc…1cec90 Dummy {f00=0x008b, f01=0x0190, f02=»L) l , PFYSPAG EQU 24 LAST PHYSICAL PAGE NUMBER 6 PLSTADR EQU 26 LAST ADDRESS WHEN BUILDING DATA PART : ( PMAPLEN EQU 30 LENGTH OF AREA TO MAP t * PMMFROM EQU 36 2ND MMU TABLE WORK AREA ( PMMTO EQU 38 1:ST MMU TABLE WORK AREA $ PM:REL EQU 16 R
0x1cec90…1cee24 Dummy {f00=0x008b, f01=0x0190, f02=»ILE END ADDRESS ~ ( PTTAB EQU 32 WORK AREA FOR MMU TABLE * PTOTSGM EQU 46 TOTAL NUMBER OF SEGMENTS D , PSWBFLG EQU 48 SWAPPABLE WORK BLOCK FLAG r $ PCOM01 EQU 40 COMMON WORK AREA 1 $ PCOM02 EQU 42 COMMON WORK AREA 2 $ PCOM03 EQU 44 COMMON WO
0x1cee24…1cefb8 Dummy {f00=0x008b, f01=0x0190, f02=» t P*************************** P* , & PT:ATOD EQU 0 T:ATAB 'OLD' ADDRESS 6 & PU:BTOD EQU 2 U:BTAB 'OLD' ADDRESS ` & PS:BTOD EQU 4 S:BTAB 'OLD' ADDRESS & PT:ATNW EQU 6 T:ATAB 'NEW' ADDRESS & PU:BTNW EQU 8 U:BTAB 'NEW' ADDRESS & P
0x1cefb8…1cf14c Dummy {f00=0x008b, f01=0x0190, f02=»T:ANO EQU 16 TOT. NUMBER OF T:A'S * PDDIVFR EQU 18 PROT. DDIV FROM ADDRESS * ( PS:BLEN EQU 20 LENGTH OF REAL S:BTAB X , PPDDIVL EQU 22 LENGTH OF PDDIV AND S:GTAB P EJECT & P********************************* & P* SCRATCH-PAD DISPLACEMENT
0x1cf14c…1cf2e0 Dummy {f00=0x008b, f01=0x0190, f02=»SUPER-LOOP | ( PCSTAPP EQU 74 CONF.START FOR A APPL. 4 PDDIVST EQU 76 START OF DDIV-PROTOTYPE AFTER MOVE > : PENDADD EQU 78 END-ADDRESS INDICATOR FOR TABLE-SCANNING v 4 PFLAG EQU 80 REAL TASK DATA PROCESSING INDICATOR $ PMMREL1 EQU 96 PHYSICAL PAGE
0x1cf2e0…1cf474 (1, 269) Dummy {f00=0x008b, f01=0x0190, f02=»NGTH 1 z PMOVLE2 EQU 108 MOVE LENGTH 2 ( PNEWAD1 EQU 110 SAVE FOR W.B.ADDRESS 2 ( PNEWAD2 EQU 112 SAVE FOR D.T. ADDRESS ^ , PPDDIV EQU 82 INDICATE IF SPACE IN PDDIV , PRELOCA EQU 100 SAVE FOR RELOCATION BASE PSWITCH EQU 114 D.T.INDICATOR
0x1cf474…1cf608 Dummy {f00=0x008b, f01=0x0190, f02=»ICATOR z $ PWBADD EQU 118 SAVE W.B.-ADDRESS PSAVE01 EQU 124 6 PSAVE02 EQU 126 L PSAVE03 EQU 128 b PSAVE04 EQU 84 x PSAVE05 EQU 86 PSAVE06 EQU 88 PSAVE07 EQU 90 2 PSAEFA1 EQU 92 SAVE SCTEFA BITS 0-5 PAGE NUMBER 2 PSA
0x1cf608…1cf79c Dummy {f00=0x008b, f01=0x0190, f02=»** ** P ** CONSTANTS ** P ***************** 6 P ** ** R P ***************** n P P********** P* P:MTAB * P********** PT:ATAB EQU 0 PU:BTAB EQU 2 PP:BAS EQU 6 SEGMENT
0x1cf79c…1cf930 Dummy {f00=0x008b, f01=0x0190, f02=»RESS p , PI:RSTE EQU 42 INTERPRETER RESTART ENTRY ! & PTRABUG EQU 44 TASK ID. FOR TRABUG ! < P ! f P ! n P********** ! v P* U:BTAB * ! P********** ! 0 PUP:REC EQU 6 RECORD LENGTH IN INITIAL U:BTAB ! " PUPADDR EQU 2 PROTOTYPE ADDRESS ! PUP
0x1cf930…1cfac4 Dummy {f00=0x008b, f01=0x0190, f02=»AL U:BTAB ! p * PURADDR EQU 2 ADDRESS TO FIRST REAL UWB " PURNUMB EQU 4 NUMBER OF UWB'S " @ PURLENG EQU 6 LENGTH OF UWB " d P EJECT " P " P " P " $ P******************************* " $ P* CONFIGURATION FILE (CONFIG) * " $ P
0x1cfac4…1cfc58 Dummy {f00=0x008b, f01=0x0190, f02=»2N NUMBER OF TASKS " ~ , PTDBID EQU TDBNT+2 6A TASK ID START VALUE # , PTDBMC EQU TDBID+6 6A MATCHING TASK CLASS # J $ PTDBTL EQU TDBMC+6 6A TASK LEVEL # z : PTDBNC EQU TDBTL+6 2N NUMBER OF TERMINAL DEVICE CLASSES # P* # & PTDBFST EQU TDBNC+2 FIRST TERM
0x1cfc58…1cfdec Dummy {f00=0x008b, f01=0x0190, f02=» * PSDC EQU 7 SPECIAL DEVICE CLASS-RECORD $ P* $ 2 P* COMMON DEVICE DEF. BLOCK: $ < PCDBBT EQU 0 1A BLOCK TYPE $ ` 6 PCDBNC EQU CDBBT+1 2N NUMBER OF SPEC. DEV. CLASSES $ ( PSDCFST EQU CDBNC+2 FIRST SDC-RECORD $ P* $ P* $ & P* USER WORK
0x1cfdec…1cff80 Dummy {f00=0x008b, f01=0x0190, f02=»NU+3 FIRST UDB-RECORD $ PNAMUWB EQU 3 NAME OF UWB % " PNUMUBL EQU 3 NUMBER OF BLOCKS % > . PUDBREC EQU NAMUWB+NUMUBL UDB RECORD-LENGTH % d P EJECT % P % P % P********* % P* T:A * % P********* % PT:ASTA EQU -14 T:A STA
0x1cff80…1d0114 (1, 270) Dummy {f00=0x008c, f01=0x0190, f02=»NUMBER (HERE LENGTH % t 2 P OF ALL DSCB-RECORDS & PT:DAD EQU -8 ADDRESS TO T:D & R * PCIA EQU -6 CURRENT INSTUCTION ADDRESS & v ( P (HERE: DISPLACEMENT TO T:A-START) & P & PT:ATID EQU -4 TASK ID & PSTKE EQU -2 ST
0x1d0114…1d02a8 Dummy {f00=0x008c, f01=0x0190, f02=»D: & PDSCBL EQU 20 RECORD LENGTH ' " PBL EQU 2 LENGTH OF FIX BUFFER ' , 2 PSB EQU 4 INDEX TO DSCB WHICH SHARE THE BUFFER ' R PBP EQU 18 BUFFER POINTER ' P EJECT ' P ' P ' P********* ' P* T:D * ' P********* ' ( PFCD
0x1d02a8…1d043c Dummy {f00=0x008c, f01=0x018e, f02=»DATTAB EQU 6 DISPLACEMENT TO BEGINNING OF DAT-TABLE ' & PWATLEN EQU 8 NUMBER OF WATELEMENTS ( < 0 PTWBMSK EQU 10 MASK FOR TWB'S (ONE BIT/ENTRY) ( f * PSWBMSK EQU 12 MASK FOR SWB'S -"- ( * PCWBMSK EQU 14 MASK FOR CWB'S -"- ( * PUWBMSK EQU 16 MASK
0x1d043c…1d05d0 Dummy {f00=0x008c, f01=0x0190, f02=» P ) P**************** ) P* SOP-HANDLING * ) $ P**************** ) < PSOP EQU /2E DEVICE ADDRESS ) T P ) v P LAMP CODE MEANING ) ~ P --------- ------- ) PLMP1 EQU /400 SYSLOAD RUNS ) PLMP2 EQU /200 READ ERROR ) " PLMP3 EQU /10
0x1d05d0…1d0764 Dummy {f00=0x008c, f01=0x0190, f02=»LMP7 EQU /10 MM-TABLE OVERFLOW ) PLMP8 EQU 8 * & PLMP9 EQU 4 * 8 PLMP10 EQU 2 * J PLMP11 EQU 1 * ^ P EJECT * r P********************* * P* OTHER CONSTA+STKCOMNTS * * P********************* * P * & PWBLEN EQU -4 LENGTH OF WORK-
0x1d0764…1d08f8 Dummy {f00=0x008c, f01=0x018e, f02=» FIRST DSET * | $ PFCBDD2 EQU 10 DISP TO 2:ND DSET + $ PFCBDD3 EQU 64 DISP. TO 1:ST DAT + < $ PFCBDD4 EQU 66 DISP. TO 2:ND DAT + d P + $ PSTKSZ EQU 128 DEFAULT STACK-SIZE + P + ( PSEGREC EQU 6 RECORD LENGTH IN S:GTAB + 8 PNUMSEG EQU 10 DI
0x1d08f8…1d0a8c Dummy {f00=0x008c, f01=0x0190, f02=» + ( PNTPA EQU 4 INTERPRETER START ADDRESS , & PIHRTC EQU 4 RTC INTERRUPT ADDRESS , 4 $ PRTCDA EQU /1B RTC DEVICE ADDRESS , ^ P , > PTABLEN EQU 24 LENGTH OF EACH APL.TABLE IN SCRATCH-PAD AREA , 0 PACBLEN EQU 26 APPL. CONTROL BLOCK LENGTH =1 , P
0x1d0a8c…1d0c20 Dummy {f00=0x008c, f01=0x0190, f02=» * , Z F P* DATA [REL-ADDRESS] * - F P* * - ^ F P***************************************************************** - P - P -
0x1d0c20…1d0db4 (1, 271) Dummy {f00=0x008c, f01=0x0190, f02=»******* ******* - 2 P** ** . 6 2 P* SYSLOAD PART 1 * . l 2 P** ** . 2 P***** ***** .
0x1d0db4…1d0f48 Dummy {f00=0x008c, f01=0x0190, f02=»-TABLES * . 2 P* * / , 2 P********************************************* / b P / P EJECT / P / P* START OF PROGRAM PART 1 * / P / P / PSYSLCR EQU * / P*
0x1d0f48…1d10dc Dummy {f00=0x008c, f01=0x0190, f02=»PAD AREA / n PSYA10 SUK A2,2 0 P CMR A2 CLEAR MEMORY WORD 0 & " P CWR A1,A2 ALL WORDS CLEARED? 0 H P RB(NE) SYA10 NO 0 n PSYA20 EQU * 0 P LD A1,SCTSFA 0 8 P ST A1,SHADST+STKEND SAVE START OF 1:ST SHADOW-TABLE 0 * P LDKL A10,STKEND START OF 1:
0x1d10dc…1d1270 Dummy {f00=0x008c, f01=0x0190, f02=»APPLICATION 0 P* 1 PSYA100 EQU * 1 $ P LDKL A1,'CR' CREDIT APPLICATION 1 2 . P CALL GETAPP FIND APPL. AND ITS CONF.FILE 1 Z 2 P RF(NZ) SYA105 MORE APPLICATIONS OF THIS TYPE 1 P LD A2,APPLNO+STKCOM 1 P RF(NZ) SYA102 1 P LDKL A2,LCREND 1
0x1d1270…1d1404 Dummy {f00=0x008c, f01=0x0190, f02=»COM 1 P ABR A2 GO TO SYA152 2 PSYA105 EQU * 2 ( 8 P ST A11,CSTAPP+STKEND SAVE CONF.START FOR THIS APPL. 2 < P EJECT 2 x P 2 , P* READ CONFIG FILE AND BUILD SHADOWTABLE 2 P 2 P IFT MMUPAG=0 2 * P LD* A2,APLLAC,A1 GET START OF P:MTA
0x1d1404…1d1598 Dummy {f00=0x008c, f01=0x0190, f02=»B,A2 GET U:BTAB FROM P:MTAB 2 " P SUK A4,2 INCLUDE LENGTH-WORD 3 $ P ST A4,U:BTOD,A10 3 J P XIF 3 d P IFT SWPBLK-MMUPAG=1 3 p ( P LD A4,S:BTAB,A2 GET S:BTAB ADDRESS 3 $ P SUK A4,2 ADJUST FOR LENGTH WORD 3 P ST A4,S:BTOD,A10 SAVE 3 P XIF 3
0x1d1598…1d172c Dummy {f00=0x008c, f01=0x0190, f02=»STKEND ADD LAST SHADOW (MONITOR) END ADDRESS 3 P* CHECK ADDRESSES 4 4 P 4 N " P LDR A11,A3 END OF SHADOW-TAB 4 V . P LD A9,SAVE01+STKEND GET LOCATION COUNTER 4 | P CALL CMPADR 4 P RF(L) SYA110 OK! 4 " P LDKL A1,LMP3 MEMORY OVERFLOW 4 P CALL
0x1d172c…1d18c0 Dummy {f00=0x008c, f01=0x0190, f02=»2 NEXT 4 P STR A2,A3 CLEAR 5 P CW A3,SHADST+STKEND ALL? 5 & P RB(NE) ZERO NO! 5 H " P STR A4,A3 STORE TABLE LENGTH 5 ` P* 5 ( P* READ CONF.FILE AND GET TASK CLASS 5 P* 5 8 P LD A11,CSTAPP+STKEND GET CONF.START FOR THIS APPL. 5 " P LC A2
0x1d18c0…1d1a54 (1, 272) Dummy {f00=0x008c, f01=0x018e, f02=» 5 ( PSYA120 LC A2,TDBMC+4,A11 GET TASK ID 6 P SLL A2,8 . 6 4 P LC A2,TDBMC+5,A11 ... 6 H P CWK A2,'TB' BUGGER TASK? 6 f P RF(NE) SYA125 NO! 6 2 P ST A2,BTASK,A10 INDICATE BUGGER TASK PRESENT 6 " P RF SYA136 SKIP TO NEXT BLOCK 6 PSYA125 LDR
0x1d1a54…1d1be8 Dummy {f00=0x008c, f01=0x0190, f02=» 6 PSYA130 ADKL A8,2 NEXT T:A 7 P LDR* A6,A8 GET T:A ADDRESS 7 * P SUK A4,2 7 N P RF(NZ) SYA135 7 ` 0 P LDK A1,LMP5 NO PROTOTYPE FOUND (TID ERROR) 7 v P CALL ERROR 7 PSYA135 EQU * 7 P CW A2,T:ATID,A6 TID EQUAL? 7 P RB(NE) SYA130 NO!
0x1d1be8…1d1d7c Dummy {f00=0x008c, f01=0x0190, f02=» P XIF 8 P IFT MMUPAG=1 8 6 P LD A2,FYSPAG+STKCOM GET LAST PHYSICAL PAGE NUMBER 8 & P ST A2,SAEFA1+STKEND SAVE 8 ` * P LD A2,LSTADR+STKCOM GET LAST ADDRESS 8 P ANKL A2,/FFF GET OFFSET 8 P ST A2,SAEFA2+STKEND SAVE 8 , P LD* A2,APLMMC,A1 GET
0x1d1d7c…1d1f10 Dummy {f00=0x008c, f01=0x018e, f02=» ADDRESS 8 x $ P SUKL A12,2 INCLUDE LENGTH WORD 9 & P ST A12,T:ATOD,A10 SAVE IN APPTAB 9 8 $ P EL A4,U:BTAB,A2 U:BTAB ADDRESS 9 b $ P SUK A4,2 ADJUST FOR LENGTH WORD 9 $ P ST A4,U:BTOD,A10 SAVE IN APPTAB 9 P XIF 9 P IFT MMUPAG+SWPBLK=2 9 ( P EL A4
0x1d1f10…1d20a4 Dummy {f00=0x008c, f01=0x0190, f02=» 9 P* T:ATAB PROCESSING: : P : $ P ELR A4,A12 T:ATAB-LENGTH : 0 P LDR A3,A4 SAVE : R 0 P SLL A3,1 RESERVE FOR MM-TABLE ADDRESS TABLE : j > P AD A3,SHADST+STKEND ADD LAST SHADOW (MONITOR) END ADDRESS : P* CHECK ADDRESSES : P : $ P LDR A
0x1d20a4…1d2238 Dummy {f00=0x008c, f01=0x0190, f02=»A1,LMP3 MEMORY OVERFLOW : P CALL ERROR ; ( PSYA110 LDR A9,A2 GET P:MTAB ADDRESS ; 4 P* CLEAR T:ATAB SHADOW-TABLE: ; ` P ; PSYA115 SUK A3,2 NEXT ; P CMR A3 CLEAR ; P CW A3,SHADST+STKEND ALL? ; P RB(NE) SYA115 NO! ; " P STR A4,A3
0x1d2238…1d23cc Dummy {f00=0x008c, f01=0x0190, f02=»S APPL. ; d " P LC A2,TDBBT,A11 GET BLOCKTYPE < P CCK A2,'TT' TASK DEF? < 6 P RF(E) SYA120 OK! < T P LDK A1,LMP4 NO TASK PRESENT < n P CALL ERROR < ( PSYA120 LC A2,TDBMC+4,A11 GET TASK ID < P SLL A2,8 . < P LC A2,TDBMC+5,A11 ... < P CWK
0x1d23cc…1d2560 Dummy {f00=0x008c, f01=0x0190, f02=»CK < x PSYA125 LDR A8,A12 SAVE = P ELR A4,A12 T:ATAB LENGTH = ( P* = J P* SCAN T:ATAB = T * P* FIND CORRESPONDING TASK CLASS IN T:A = j P* = PSYA130 ADKL A8,2 NEXT T:A = P ELR A6,A8 GET T:A ADDRESS = P SUK A4,2 = P RF(NZ) SYA135 =
0x1d2560…1d26f4 (1, 273) Dummy {f00=0x008c, f01=0x0190, f02=» TID EQUAL? = P RB(NE) SYA130 NO! > P* > . , P* STORE NUMBER OF TASKS IN SHADOW-TABLE > 8 P* FOR THIS TASK CLASS > h P* > P ELR A5,A12 > P SUR A4,A5 T:ATAB LENGTH > P XIF > . P NGR A4,A4 => A4=DISPLACEM. IN SHADOW-TAB > ( P LC A5
0x1d26f4…1d2888 Dummy {f00=0x008c, f01=0x018e, f02=»OW TABLE > n P ADR A2,A4 ? 6 P ADRS A1,A2 STORE NUMBER OF TASKS IN SHADOW TABLE ? " P ? P* SKIP TO NEXT BLOCK ? h P ? PSYA136 CALL NXTBLK ? PSYA137 EQU * ? P CCK A2,'TT' ? & P RB(E) SYA120 NEXT TASK DEF BLOCK ? P CCK A2,'CC'
0x1d2888…1d2a1c Dummy {f00=0x008c, f01=0x0190, f02=» P RF(NE) SYA141 NO UWB'S @ 2 P LD A8,U:BTOD,A10 GET MODIFIED U:BTAB ADDRESS @ $ 6 P CALL USWBTP INSERT NUMBER OF COPIES IN PROTOTYPE @ Z PSYA141 EQU * @ P IFT SWPBLK=1 @ P LCR A2,A11 @ P CCK A2,'SS' @ P RF(NE) SYA143 @ P LD A8,S:BTO
0x1d2a1c…1d2bb0 Dummy {f00=0x008c, f01=0x0190, f02=»0 SAVE IN APPTAB @ P LDR* A1,A2 GET LENGTH A P IFT MMUPAG=1 A 6 * P SLL A1,1 RESERVE FOR MM-ADDRESS-TABLE A L P XIF A z : P ADS A1,SHADST+STKEND SAVE START OF NEXT SHADOW-TABLE A P ADKL A10,TABLEN NEXT APPTAB A P LDKL A1,SYA100 A P AD A1,M
0x1d2bb0…1d2d44 Dummy {f00=0x008c, f01=0x0190, f02=»************* A V L P* * B L P* USWBTP - INSERT NUMBER OF COPIES IN U:BTAB/S:BTAB PROTOTYPE TABLE * B f L P* ================================================================= * B L P*
0x1d2d44…1d2ed8 Dummy {f00=0x008c, f01=0x0190, f02=» * B V L P* * C L P* ENTRY: A8 - MODIFIED ADDRESS TO U:BTAB/S:BTAB PROTOTYPE TABLE * C f L P* A11- POINTER IN CONFIGURATION TABLE TO 'U' OR 'S' BLOCK * C L P*
0x1d2ed8…1d306c Dummy {f00=0x008c, f01=0x0190, f02=» * C V L P* * D J P* WORK REGISTERS: A1,A2,A3,A4,A6,A12 * D f L P* * D L P* S
0x1d306c…1d3200 Dummy {f00=0x008c, f01=0x018e, f02=» * D T L P*********************************************************************** E P E d PUSWBTP EQU * E l P E P IFT MMUPAG=0 E P ADKL A11,1 E P LDR A6,A11 E * P CALL GETNUM PACK 3 DIG. RESULT IN A5 E $ P LDR A1,A5 SAVE NUMB
0x1d3200…1d3394 (1, 274) Dummy {f00=0x008d, f01=0x0190, f02=» E j PSYA145 EQU * F 0 P LCR A2,A11 GET FIRST CHARACTER FROM CONFIG F P SLL A2,8 F P P LC A2,1,A11 GET 2:ND CHAR F b 6 P CW A2,UPNAME,A12 COMPARE W. 1:ST WORD IN PROTOTYP F * P RF(E) FRSTOK FIRST TWO CHARACTERS OK! F 0 PSYA147 SUK A3,UP:REC DEC. NU
0x1d3394…1d3528 Dummy {f00=0x008d, f01=0x0190, f02=» ADD TO NEXT RECORD F P RB SYA145 G $ PFRSTOK LC A2,2,A11 GET 3:RD CHAR G . P CC A2,UPNAME+2,A12 G V P RB(NE) SYA147 .NEQ. G r P EJECT G P G P* PROTOTYPE FOUND * G P G 8 P ADKL A11,NAMUWB SKIP TO 'NUMBER OF BOCKS' IN CONFIG G
0x1d3528…1d36bc Dummy {f00=0x008d, f01=0x0190, f02=»CONFIG FILE G r P RB(P) SYA142 H P ADKL A11,UDBFST-1 H * P RTN A14 H D P XIF H T P IFT MMUPAG=1 H ` P ADKL A11,1 H v P LDR A6,A11 H * P CALL GETNUM PACK 3 DIG. RESULT IN A5 H $ P LDR A1,A5 SAVE NUMBER OF UWB'S H PSYA142 EQU * H P
0x1d36bc…1d3850 Dummy {f00=0x008d, f01=0x018e, f02=»CR A2,A11 GET FIRST CHARACTER FROM CONFIG H P SLL A2,8 I 2 P LC A2,1,A11 GET 2:ND CHAR I D 2 P EL A4,UPNAME,A12 GET FIRST WORD IN PROTOTYPE I f P CWR A2,A4 I P RF(E) FRSTOK FIRST WORD OK! I 0 PSYA147 SUK A3,UP:REC DEC. NUMBER OF PROT.'S I P R
0x1d3850…1d39e4 Dummy {f00=0x008d, f01=0x0190, f02=» P RB SYA145 J 0 PFRSTOK LC A4,2,A11 GET 3:RD CHAR FROM CONFIG J 0 P EL A2,UPNAME+2,A12 GET 3:RD CHAR FROM PROY J J P SRL A2,8 J ~ P ANK A4,/FF J P CWR A4,A2 J P RB(NE) SYA147 .NEQ. J P EJECT J P J P* PROTOTYPE FOUND * J P
0x1d39e4…1d3b78 Dummy {f00=0x008d, f01=0x0190, f02=»VERT J 4 P EL A4,UPNUMB-1,A12 SAVE IN U:BTAB SHADOW-TABLE K P ANKL A4,/FF00 K D P ORR A4,A5 K Z P ES A4,UPNUMB-1,A12 K l . P SUK A1,1 DEC. NO OF TYPES IN CONFIG FILE K P RB(P) SYA142 K P ADKL A11,UDBFST-1 K P RTN A14 K P XIF K P E
0x1d3b78…1d3d0c Dummy {f00=0x008d, f01=0x0190, f02=»W-TABLES) K d P ADK A7,1 L P ANKL A7,/FFFE EVEN ADDRESS L $ P* L H P* CALULATE RELOCATION L R P* L p & P LDKL A2,PART2 GET START OF PART2 L z , P AD A2,M:REL+STKCOM ADD RELOCATION BASE L P LDR A3,A2 L P SUR A2,A7 MOVE LENGTH L P NGR
0x1d3d0c…1d3ea0 Dummy {f00=0x008d, f01=0x0190, f02=»Y EXIST SYSLCO AND SYSLBA) L h P* CONF.FILE AND SYSINI M " P* M @ " P LDR A2,A7 TO-ADDRESS (SYSLCR) M J P ANKL A2,/F000 FIRST PAGE M p , P ST A2,MMREL1+STKEND SAVE PHYSIVAL PAGE M " P SRL A2,2 SHIFT FOR MM-PAGING M P LDKL A11,MMDDIV M , P ADR A11
0x1d3ea0…1d4034 (1, 275) Dummy {f00=0x008d, f01=0x0190, f02=» M z P ADKL A2,/400 PAGE INCREMENT N P SUK A1,1 ALL? N , P N B P RB(NZ) SYA157 NO! N J * P ANKL A7,/FFF GET DISPLACEMENT IN PAGE N d P XIF N 2 P ST A7,SHADST+STKEND SAVE (LOGICAL) TO-ADDRESS N $ P LDR A2,A13 A13=START OF SYSINI N P SUR A2,A3 L
0x1d4034…1d41c8 Dummy {f00=0x008d, f01=0x0190, f02=»NGTH TO MOVE N t 0 P AD A2,CONLEN+STKCOM ADD LENGTH OF CONF.FILE O P ADR A7,A2 O H 6 P ST A7,DDIVST+STKEND SAVE START OF DDIV AFTER MOVE O Z P* O " P* CALCULATE DDIV FROM-ADDRESS O P* O , P CM APPLNO+STKCOM RESET NUMBER OF APPL. O * P LDKL A10,
0x1d41c8…1d435c Dummy {f00=0x008d, f01=0x0190, f02=»ON O r P CALL GETAPP ANY APPLICATION P P ABR(Z) A5 NO P . " P LD A3,SCTOPT GET OPTION WORD P D P IFT MMUPAG=0 P j * P LD A2,APLLAC,A1 GET ADDRESS TO S:GTAB P $ P LDR* A9,A2 GET START OF P:MTAB P 0 P ST A3,OPTION,A9 STORE OPTION WORD IN P:MTAB P 0
0x1d435c…1d44f0 Dummy {f00=0x008d, f01=0x0190, f02=» P XIF Q P IFT MMUPAG=1 Q * P LD A2,APLLAC,A1 GET ADDRESS TO S:GTAB Q & " P ELR A9,A2 GET START OF P:MTAB Q T 0 P ES A3,OPTION,A9 STORE OPTION WORD IN P:MTAB Q z 0 P EL A3,I:RSTE,A9 GET INTERPRETER ERROR ENTRY Q " P ST A3,APLIOE,A1 STORE IN ACB Q , P
0x1d44f0…1d4684 Dummy {f00=0x008d, f01=0x0190, f02=»LT A2*A3 RESULT IN A3 Q P ADR A1,A3 R P ADK A1,NUMSEG+2 R 0 , P ST A1,DDIVFR,A10 SAVE DDIV FROM ADDRESS R H 6 P LD A6,DDIVST+STKEND GET START OF DDIV AFTER MOVE R x " P SUR A6,A1 RELOCATION FOR DDIV R P EJECT R P R P R P R 0 P*
0x1d4684…1d4818 Dummy {f00=0x008d, f01=0x0190, f02=» * R l . P* A9=P:MTAB A6=MOVE-RELOC * S . P***************************************** S @ P IFT MMUPAG=0 S r P S P* INITIATE POINTERS S P S ( P LD A8,T:ATOD,A10 GET T:ATAB ADDRESS S P LDR* A3,A8 GET LENGTH S P ADR A3,A8
0x1d4818…1d49ac Dummy {f00=0x008d, f01=0x0190, f02=» S x & P LDR A2,A8 2:ND POINTER IN T:ATAB T & P LDK A3,2 SET 'NEW' T:ATAB COUNTER T 2 . P SUR A11,A11 CLEAR REAL LENGTH ACCUMULATOR T P T P* SCAN T:ATAB: T P T " PSYA160 ADKL A8,2 TAKE NEXT T:A T $ P ADK A5,2 NEXT T:A IN SHADOW-TAB T P CW A8
0x1d49ac…1d4b40 Dummy {f00=0x008d, f01=0x0190, f02=»160 THIS T:A IS NOT USED!!!!! T " P ADR A11,A7 ACCUMULATE LENGTH U & , P ADK A3,2 INCREMENT 'NEW' T:ATAB LENGTH U L , P ADK A4,2 UPDATE 2:ND SHADOW-TAB ADDRESS U | ( P ADK A2,2 UPDATE 2:ND T:ATAB ADDRESS U 8 P STR A7,A4 STORE NUMBER OF T:A'S (EV. ON NEW PLA
0x1d4b40…1d4cd4 (1, 276) Dummy {f00=0x008d, f01=0x018e, f02=» W.B.-ADDRESSES U P V $ P LD A12,T:DAD,A1 GET T:D-ADDRESS V $ P LD A7,WATLEN,A12 LENGTH OF WAT V H . P ADK A1,WATFST+2 ADD TO FIRST W.B.-ADDRESS V p PSYA165 SUK A7,1 DEC. COUNTER V P RB(N) SYA160 TAKE NEXT T:A V P ADRS A6,A1 RELOCATE V P X
0x1d4cd4…1d4e68 Dummy {f00=0x008d, f01=0x0190, f02=» P ADR A3,A8 END OF T:ATAB W P ST A3,ENDADD+STKEND SAVE W $ 4 P LD A5,SHADOW,A10 GET START OF T:ATAB SHADOW-TAB W F P LDR A4,A5 2:ND POINTER W ~ & P LDR A2,A8 2:ND POINTER IN T:ATAB W & P LDK A3,2 SET 'NEW' T:ATAB COUNTER W . P SUR A11,A11 CLEAR REA
0x1d4e68…1d4ffc Dummy {f00=0x008d, f01=0x0190, f02=» W p P CW A8,ENDADD+STKEND X P RF(E) SYA170 ALL DONE X $ P ELR A1,A8 GET T:A X B * P LDR* A7,A5 GET CONTENTS OF SHADOW-TAB X , P RB(Z) SYA160 THIS T:A IS NOT USED!!!!! X " P ADR A11,A7 ACCUMULATE LENGTH X , P ADK A3,2 INCREMENT 'NEW' T:ATAB LENGTH
0x1d4ffc…1d5190 Dummy {f00=0x008d, f01=0x0190, f02=». ON NEW PLACE) X l P ELR A12,A8 GET T:A-ADDRESS Y P ADR A12,A6 RELOCATE Y < . P ESR A12,A2 STORE ADDR. (EV. ON NEW PLACE) Y X P* RELOCATE W.B.-ADDRESSES Y P Y $ P EL A12,T:DAD,A1 GET T:D-ADDRESS Y $ P EL A7,WATLEN,A12 LENGTH OF WAT Y . P ADK
0x1d5190…1d5324 Dummy {f00=0x008d, f01=0x0190, f02=»END SAVE Y ~ P ELR A10,A1 GET ADDRESS Z P ADR A10,A6 RELOCATE Z 0 P ESR A10,A1 Z L " P LD A10,SAVE04+STKEND RESTORE Z ` P XIF Z P ADK A1,4 NEXT W.B. Z P RB SYA165 Z P Z PSYA170 EQU * Z > P ST* A3,SHADOW,A10 STORE NEW TABLE LENGTH IN
0x1d5324…1d54b8 Dummy {f00=0x008d, f01=0x0190, f02=» AND IN T:ATAB Z ~ P XIF [ 0 P LDR A2,A11 GET NUMBER OF T:A'S ACCUMULATOR [ " ( P SLL A2,1 CALC. REAL LENGTH (BYTES) [ V P ADK A2,2 [ . P ST A2,T:ANO,A10 SAVE TOT. NUMBER OF T:A'S [ P [ P EJECT [ " P****************************** [ $ P*
0x1d54b8…1d564c Dummy {f00=0x008d, f01=0x0190, f02=»G=0 [ $ P LD A5,U:BTOD,A10 U:BTAB ADDRESS P LDR* A3,A5 LENGTH 4 P ADK A5,2 SKIP LENGTH WORD N P SUK A3,2 -"- p " PSYA180 RF(Z) SYA185 ALL DONE! P ADRS A6,A5 RELOCATE P XIF P IFT MMUPAG=1 $ P LD A5,U:BTOD,A10 U:BTAB ADD
0x1d564c…1d57e0 Dummy {f00=0x008d, f01=0x0190, f02=»04+STKEND STORE P ELR A10,A5 GET ADDRESS ] P ADR A10,A6 RELOCATE ] 8 P ESR A10,A5 ] T " P LD A10,SAVE04+STKEND RESTORE ] h P XIF ] 8 P ADK A5,UP:REC ADD TO NEXT RECORD IN U:BTAB PROTOTYP ] P SUK A3,UP:REC ] P RB SYA180 ] P EJECT ]
0x1d57e0…1d5974 (1, 277) Dummy {f00=0x008d, f01=0x0190, f02=» ADDRESS ] x " P ELR A3,A5 LENGTH OF PROTOTYPE ^ P LDR A2,A3 SAVE ^ 6 " P SUK A3,2 EXCLUDE LENGTH WORD ^ N , PSYA190 RF(Z) SYA199 ALL RECORDS SCANNED! ^ t $ P EL A4,2,A5 GET PROT. W.B.-ADDR. ^ P ADR A4,A6 RELOCATE ^ P ES A4,2,A5 STORE IT BACK ^ ,
0x1d5974…1d5b08 Dummy {f00=0x008d, f01=0x0190, f02=»DK A2,2 INCREMENT LENGTH ^ ( P SUK A4,1 DECREMENT NUMBER OF COPIES _ P RB SYA192 _ L 8 PSYA194 ADK A5,UP:REC NEXT RECORD IN S:BTAB PROTOTYPE _ ^ $ P SUK A3,UP:REC DECREMENT LENGTH _ P RB SYA190 _ P XIF _ P IFT SWPBLK-MMUPAG=1 _ $ P LD A5,S:BTO
0x1d5b08…1d5c9c Dummy {f00=0x008d, f01=0x0190, f02=»SYA195 RF(Z) SYA199 ALL RECORDS SCANNED! _ $ P LD A4,2,A5 GET PROT. W.B.-ADDR. ` 0 P ADR A4,A6 RELOCATE ` X P ST A4,2,A5 STORE IT BACK ` t , P LD A4,UPNUMB-1,A5 GET NUMBER OF COPIES ` P ANK A4,/FF ` . PSYA196 RF(Z) SYA198 NO MOORE OF THIS TYPE! `
0x1d5c9c…1d5e30 Dummy {f00=0x008d, f01=0x0190, f02=»S:BTAB PROTOTYPE ` l $ P SUK A3,UP:REC DECREMENT LENGTH a P RB SYA195 a @ P XIF a R P IFT SWPBLK=1 a ^ 4 PSYA199 ADS A6,S:BTOD,A10 RELOCATE S:BTAB ADDRESS a t 0 P ST A2,S:BLEN,A10 SAVE LENGTH OF REAL S:BTAB a P XIF a P EJECT a P a 6 P* RELO
0x1d5e30…1d5fc4 Dummy {f00=0x008d, f01=0x0190, f02=»T APPTAB a | P LDKL A1,SYA156 b P AD A1,M:REL+STKCOM b ( P ABR A1 b D POUT01 EQU * b T P* b h 8 P* MOVE SYSLCR (AND IF THEY EXIST SYSLCO AND SYSLBA) b r P* AND SYSINI b P* b ( P LD A2,SHADST+STKEND GET TO-ADDRESS b * P OR A2,MMREL1+ST
0x1d5fc4…1d6158 Dummy {f00=0x008d, f01=0x0190, f02=»RT OF PART2 b z , P AD A1,M:REL+STKCOM ADD RELOCATION BASE c P c D ( P LD A3,MOVLE2+STKEND LENGTH TO MOVE c L , P LD A4,RELOCA+STKEND GET RELOCATION BASE c x , P ADS A4,M:REL+STKCOM NEW RELOCATION BASE c P EJECT c P* c , P* JUMP TO MOVE ROUTINE
0x1d6158…1d62ec Dummy {f00=0x008d, f01=0x0190, f02=» A7=RETURN-ADDRESS c P* d $ P ABL STKMOV JUMP TO MOVE ROUTINE d & P EJECT d N P d P* ************************** d d " P* START OF PROGRAM PART 2.A * d " P***************************** d P d P d PPART2 EQU * d " P LDR A8,P LO
0x1d62ec…1d6480 Dummy {f00=0x008d, f01=0x0190, f02=»A1,CONSTA+STKCOM GET FROM ADDRESS d 0 P LD A3,CONLEN+STKCOM GET LENGTH OF CONF.FILE e * P LDR A7,P e ^ P ADK A7,10 e p 4 P ST A2,CONSTA+STKCOM UPDATE START OF CONF. DATA e $ P ABL STKMOV JUMP TO MOVE-ROUTINE e * P LDKL A10,STKEND START OF 1:ST APPTAB
0x1d6480…1d6614 (1, 278) Dummy {f00=0x008e, f01=0x0190, f02=»CR' CREDIT APPLICATION e " P CALL GETAPP FIND APPLICATION f * P RF(NZ) SYA205 MORE APPL.OF THIS TYPE f D P IFT MMUPAG=1 f r " P LD A2,SAEFA1+STKEND GET PAGE f P ST A2,FYSPAG+STKCOM f * P LD A2,SAEFA2+STKEND GET DISPLACEMENT f P ST A2,LSTADR+ST
0x1d6614…1d67a8 Dummy {f00=0x008e, f01=0x0190, f02=»PL. OF THIS TYPE f v P AD A2,M:REL+STKCOM g P ABR A2 g 4 PSYA205 EQU * g D : P ST A1,APCBLK+STKEND SAVE START OF APPL. CONTROL TABLE g X P LDR A4,A1 SAVE g * P LD A2,APLLAC,A1 GET ADDRESS TO S:GTAB g P IFT MMUPAG=0 g $ P LDR* A9,A2 GET START
0x1d67a8…1d693c Dummy {f00=0x008e, f01=0x0190, f02=»,DDIVFR,A10 END - START g & P AD A5,DDIVST+STKEND ADD NEW START h P ST A5,DATEND+STKCOM STORE h J P* h l * P* CALCULATE LENGTH OF PDDIV AND S:GTAB h v P* h " P LDR A3,A9 GET START OF P:MTAB h . P SUR A3,A2 GET LENGTH OF PDDIV AND S:GTAB h P I
0x1d693c…1d6ad0 Dummy {f00=0x008e, f01=0x0190, f02=» NO! h $ P CM PDDIV+STKEND YES!RESET FLAG i PSYA206 EQU * i 4 6 P ST A3,PDDIVL,A10 STORE LENGTH OF PDDIV AND S:GTAB i H P XIF i P IFT MMUPAG=1 i " P ELR A9,A2 GET START OF P:MTAB i * P ST A9,APLLAC,A1 SAVE START OF P:MTAB i P* i P* CALC
0x1d6ad0…1d6c64 Dummy {f00=0x008e, f01=0x0190, f02=» P LDR A6,A5 j . P ANKL A6,/F000 GET LOGICAL PAGE (MM-ENTRY) j $ P SRL A6,11 ADJUST FOR ADDRESSING j H . P ADKL A6,MMDDIV ADD RELATIVE START ADDRESS j p P ADR A6,A13 RELOCATE j & P LDR* A6,A6 GET MM-TABLE CONTENTS j P ST A6,FSTPAG+STKCOM SAVE j "
0x1d6c64…1d6df8 Dummy {f00=0x008e, f01=0x018e, f02=»A9 SAVE A9 j " P LDR A9,A6 GET FIRST FREE PAGE k , P LD A11,SAEFA1+STKEND GET LAST FREE PAGE k 8 P CALL CMPADR k h P RF(G) SYA201 OK! k | P RF(L) SYA208 NOK! k P LDR A9,A5 GET DISPLACEMENT k P LD A11,SAEFA2+STKEND k P CALL CMPADR k P R
0x1d6df8…1d6f8c Dummy {f00=0x008e, f01=0x0190, f02=» k ( P* CHECK IF START OF S:GTAB = SCTEFA l P* l 4 $ P LDR A3,A2 GET ADDRESS TO S:GTAB l > . P ANKL A3,/F000 GET LOGICAL PAGE (MM-ENTRY) l f $ P SRL A3,11 ADJUST FOR ADDRESSING l . P ADKL A3,MMTAB ADD RELATIVE START ADDRESS l P ADR A3,A13 RELOCATE l
0x1d6f8c…1d7120 Dummy {f00=0x008e, f01=0x0190, f02=»DR A3,A2 YES! COMPARE OFFSET l P ANKL A3,/0FFF GET OFFSET m $ P CM PDDIV+STKEND RESET FLAG m F P CW A3,SAEFA2+STKEND m j P RF(E) SYA203 OFFSET EQUAL? m P* m * P* CALCULATE LENGTH OF PDDIV AND S:GTAB m P* m PSYA202 EQU * m " P LDR A3,
0x1d7120…1d72b4 (1, 279) Dummy {f00=0x008e, f01=0x0190, f02=» A3,A2 GET START OF S:GTAB m & P ANKL A2,/F000 NO!GET PAGE NUMBER n " P ADKL A2,/1000 ADD n L P CWR A2,A9 n f P RF(NG) SYA204 n x P LDR A2,A3 n PSYA204 EQU * n " P LDR A3,A9 GET START OF P:MTAB n * P SUR A3,A2 LENGTH OF PDDIV AND S:GTAB n P
0x1d72b4…1d7448 Dummy {f00=0x008e, f01=0x0190, f02=»LES ADDRESSES n P* o P LDKL A4,MMDDIV o " P ADR A4,A13 GET TABLE ADDRESS o 8 2 P ST A4,MMTO+STKCOM SAVE 1:ST MM-TABLE ADDRESS o ^ P LDKL A4,MMTAB o " P ADR A4,A13 GET TABLE ADDRESS o 0 P ST A4,MMFROM+STKCOM SAVE 2:ND TABLE ADDRESS o P XIF
0x1d7448…1d75dc Dummy {f00=0x008e, f01=0x0190, f02=»ADDRESS o t P LDR A4,A2 p P SUR A3,A1 LENGTH OF DDIV p " " P SUR A4,A1 RELOCATION FOR DDIV p D P ST A4,MOVADD+STKEND SAVE p j P IFT MMUPAG=0 p P LD A8,STKCOM+TOTSGM PAGING? p P RF(NZ) PAGING YES! p & P LD A8,SCTOPT NO! GET OPTION WORD p
0x1d75dc…1d7770 Dummy {f00=0x008e, f01=0x0190, f02=»STADR+STKCOM IF SEGMENTS! p x P RF SEGMTS q " 2 PNOSGMT LD A8,SCTSFA ALLOCATE BUFFERS FROM TOP q 4 $ PSEGMTS ST A8,FSTADR+STKCOM STORE q j PMOVNXT LDR* A4,A1 GET WORD q P STR A4,A2 STORE q P ADK A1,2 q P ADK A2,2 q P SUK A3,2 DEC LENGTH q
0x1d7770…1d7904 Dummy {f00=0x008e, f01=0x0190, f02=» CALL CMPADR q P RF(NG) SYA207 r P LDKL A1,LMP3 r * P CALL ERROR r @ PSYA207 EQU * r T " P LDR A9,A3 GET P:MTAB ADDRESS r h , P SUK A3,10 RESERVE 5 WORDS FOR DEBUGGER r P XIF r P IFT MMUPAG=1 r P CALL XMOVE r & P* REMOVE DDIV ENTRIE
0x1d7904…1d7a98 Dummy {f00=0x008e, f01=0x0190, f02=»B ADDRESS-5WORDS =3 r | $ P SRL A1,11 ADJUST FOR ADDRESSING s P ANK A1,/1E s D & P LDKL A2,MMTAB-2 GET TABLE ADDRESS s X P ADR A2,A13 RELOCATE s , P ADR A1,A2 P:MTAB-5WORDS START ENTRY =3 s P LDKL A4,/FC00 s PSYA206 CWR A1,A2 ALL? s P RF(E)
0x1d7a98…1d7c2c Dummy {f00=0x008e, f01=0x0190, f02=»CHANGE TABLE - ADDRESSES s P* t P LD A4,MMFROM+STKCOM t * P LD A5,MMTO+STKCOM t F P ST A4,MMTO+STKCOM t ` P ST A5,MMFROM+STKCOM t z P XIF t P ANKL A3,/FFFE EVEN ADDRESS t . P ST A3,LSTADR+STKCOM SAVE END OF FREE AREA t P t P t P
0x1d7c2c…1d7dc0 Dummy {f00=0x008e, f01=0x0190, f02=» t l P ADR A3,A13 u , P* FIND LAST USED ENTRY IN REAL MMUTAB * u P u L P CALL MMENT u T P ST A9,TTAB+STKCOM u h , P ST A1,FYSPAG+STKCOM SAVE PHYSICALL PAGE u * P LD A3,T:ANO,A10 GET LENGTH OF T:ATAB u P LDR A5,A3 SAVE u * P CALL CALLMO RES
0x1d7dc0…1d7f54 (1, 280) Dummy {f00=0x008e, f01=0x0190, f02=» T:ATAB ADDRESS u v P ADK A2,2 SKIP LENGTH WORD v 8 P LD A1,APCBLK+STKEND GET START OF APLL.CONTROL BLOCK v : ( P LD A9,APLLAC,A1 GET P:MTAB ADDRESS v v $ P ES A2,T:ATAB,A9 STORE IN P:MTAB v $ P* RESERVE PLACE FOR T:AID TABLE v P v P LDR A3,A5 GET
0x1d7f54…1d80e8 Dummy {f00=0x008e, f01=0x0190, f02=» A5,A2 STORE TABLE LENGTH IN T:TID-TABLE v " P ADK A2,2 ADJUST TABLE ADDRESS w 0 P ESR A2,A3 STORE IN P:MTAB w V $ P LD A5,U:BTOD,A10 U:BTAB ADDRESS w x ( P TL* MMFROM+STKCOM SET CORRECT TABLE w P ELR A3,A5 GET LENGTH w P LDR A5,A3 SAVE w P CALL
0x1d80e8…1d827c Dummy {f00=0x008e, f01=0x018e, f02=» GET U:BTOD LENGTH w ~ P LDR A5,A3 SAVE x P CALL CALLMO RESERVE SPACE x 2 4 P ST A2,U:BTNW,A10 SAVE NEW (REAL) U:BTAB ADDRESS x T P STR A5,A2 STORE LENGTH x P ADK A2,2 x : P ST A2,U:BTAB,A9 SAVE 'REAL' U:BTAB-ADDRESS IN P:MTAB x * P LD A3,T:ANO
0x1d827c…1d8410 Dummy {f00=0x008e, f01=0x018e, f02=» x p . P ST A2,T:ATNW,A10 SAVE NEW T:ATAB ADDRESS y P ADK A2,2 y : & P ST A2,T:ATAB,A9 SAVE REAL ADDRESS y L P* RESERVE FOR T:AID TABLE y v P y P LDR A3,A5 LENGTH y P CALL CALLMO y P STR A5,A2 STORE LENGTH y $ P ADK A2,2 ADJUST FOR LENGT
0x1d8410…1d85a4 Dummy {f00=0x008e, f01=0x0190, f02=» P ESR A5,A2 STORE LENGTH z P ADK A2,2 SKIP LENGTH WORD z $ $ P ES A2,U:BTAB,A9 STORE IN P:MTAB z F P XIF z n P IFT SWPBLK=1 z z P* z * P* RESERV SPACE FOR REAL S:BTAB TABLE z P* z $ P LD A5,S:BTOD,A10 S:BTAB ADDRESS z 0 P LD A3,S:BLEN,
0x1d85a4…1d8738 Dummy {f00=0x008e, f01=0x0190, f02=»LK=2 z P TL* MMTO+STKCOM { P ESR A5,A2 { $ P ADK A2,2 { 6 P ES A2,S:BTAB,A9 { H P CALL B:RSWT { ` P XIF { t P IFT SWPBLK-MMUPAG=1 { P STR A5,A2 { P ADK A2,2 { P ST A2,S:BTAB,A9 { P CALL B:RSWT { P XIF { P IFT MMUPAG=1 {
0x1d8738…1d88cc Dummy {f00=0x008e, f01=0x0190, f02=»******** { ~ P* SEARCH CWB'S: | P | ( ( P LD A8,T:ATOD,A10 GET T:ATAB ADDRESS | 4 P IFT MMUPAG=0 | ` P LDR* A3,A8 GET LENGTH | v P XIF | P IFT MMUPAG=1 | P ELR A3,A8 GET LENGTH | P XIF | P ADR A3,A8 | 4 P ST A3,ENDADD+STKEND S
0x1d88cc…1d8a60 Dummy {f00=0x008e, f01=0x0190, f02=» ALL DONE? | | P RF(E) SYA245 YES! =5 } $ P CALL T:DADD T:D-ADDRESS TO A12 } 0 P IFT MMUPAG=0 } X " P LD A7,CWBMSK,A12 GET CWB-MASK } n P XIF } P IFT MMUPAG=1 } P EL A7,CWBMSK,A12 } P XIF } P CALL SHIFT SUPER-LOOPA } PSYA220 RF(Z)
0x1d8a60…1d8bf4 (1, 281) Dummy {f00=0x008e, f01=0x0190, f02=»* SEARCH UWB'S: } P* ~ ( P IM UWB+STKEND INDICATE UWB-SCANNING ~ " P IFT MMUPAG=0 ~ N P LD A7,UWBMSK,A12 ~ d P XIF ~ ~ P IFT MMUPAG=1 ~ P EL A7,UWBMSK,A12 ~ P XIF ~ P CALL SHIFT ~ " PSYA230 RB(Z) SYA210 ALL DONE! ~ PSYA235 C
0x1d8bf4…1d8d88 Dummy {f00=0x008e, f01=0x0190, f02=»QU * =5 ~ * P LD A1,BTASK,A10 BUGGER TASK INCLUDED? P RF(Z) CLADAT NO! > . P LDK A3,2 RESERVE ONE WORD FOR TRABUG-T:A X P CALL CALLMO P LDR A8,A2 SAVE CSB-POINTER 2 P CALL GETTTB GET TTAB ADDRESS. TID 'TB' IN A1 ( P CM TTB:PP,A2 CL
0x1d8d88…1d8f1c Dummy {f00=0x008e, f01=0x018e, f02=» * P LD A3,TTB:ID,A2 GET TRABUG'S TASK ID P IFT MMUPAG=0 6 8 P LD A1,APCBLK+STKEND GET START OF APL. CONTROL TABLE L ( P LD A1,APLLAC,A1 GET START OF P:MTAB 4 P ST A3,TRABUG,A1 SAVE TRABUG'S TASK ID IN P:MTAB P LD A1,P:BAS,A1 GET P:BAS
0x1d8f1c…1d90b0 Dummy {f00=0x008e, f01=0x0190, f02=» P XIF 0 P ST A8,TTB:CB,A2 SAVE ADDRESS TO CSB-POINTER . P CM TTB:SB,A2 CLEAR SEGMENT BLOCK ADDRESS D PSYA272 EQU * v 2 P SUKL A8,CSB ADD DISPL. TO CURRENT SEGMENT BAE P ST A8,TTB:SA+26,A2 SAVE A13 P IFT MMUPAG=1 8 P LD A1,APCBLK+
0x1d90b0…1d9244 Dummy {f00=0x008e, f01=0x0190, f02=»S A3,TRABUG,A1 SAVE TRABUG'S TASK ID IN P:MTAB P EL A1,P:BAS,A1 GET P:BAS 6 ( P TL MMBEG,A2 LOAD TRABUG'S MMU-TABLE X , P ES A1,CSB,A8 STORE CURRENT SEGMENT BASE ( P TL* MMFROM+STKCOM RELOAD DDIV TABLE P XIF P EJECT P * P*
0x1d9244…1d93d8 Dummy {f00=0x008e, f01=0x0190, f02=»SET POINTER TO LENGTH INT:ATAB ~ P IFT MMUPAG=0 & & PSYA250 CM UWB+STKEND INDICATE CWB < ( P ADKL A8,2 STEP TO NEXT T:A ADDRESS f P CW A8,ENDADD+STKEND P RF(E) SYA270 ALL T:A'S DONE ( P CALL T:DADD GET T:D ADDRESS TO A12 P P*
0x1d93d8…1d956c Dummy {f00=0x008e, f01=0x018e, f02=»ESS x ( P ADK A1,DWBFST+4 ADD DISPL. TO FIRST * P LDR A3,A1 GET NUMBER OF START-POINTS 8 P ADR A3,A12 ADD T:D-ADDRESS f P LDR* A3,A3 . 0 P LDK A2,STPREC GET STARTPOINTS RECORD LENGTH P CALL MULT AND MULTIPLY P ADK A3,2 'NUMBER-WO
0x1d956c…1d9700 Dummy {f00=0x008e, f01=0x0190, f02=» * P ST A2,T:DAD,A1 STORE NEW T:D ADDRESS " P LD A7,CWBMSK,A12 GET CWBMASK 2 P XIF X P IFT MMUPAG=1 d ( P* INITIATE MM-ADDRESS TABLE POINTER z P ( P LD A1,SHADOW,A10 SHADOW TABLE START * P AD* A1,SHADOW,A10 ADDRESS TABLE START P
0x1d9700…1d9894 (1, 282) Dummy {f00=0x008f, f01=0x0190, f02=»KEND " P RF(E) SYA270 ALL T:A'S DONE! " P CALL GETTAB GET TTAB-ADDRESS 2 P CALL MOVMMT MOVE MM-TABLE X " P* FILL MM-TABLE ADDRESS TABLE z P P LD A1,SAVE02+STKEND & P ADK A1,2 INCREMENT TABLE POINTER P ST A1,SAVE02+STKEND RESTO
0x1d9894…1d9a28 Dummy {f00=0x008f, f01=0x0190, f02=» P P* CALCULATE LENGTH OF T:D P . 2 P EL A1,WATLEN,A12 NUMBER OF BYTES-1 IN DBLKTAB 6 P ADK A1,2 l P ANKL A1,/FFFE EVEN ADDRESS ~ ( P ADK A1,DWBFST+4 ADD DISPL. TO FIRST , P LDR A3,A1 GET NUMB. OF START-POINTS... P ADR A3,A1
0x1d9a28…1d9bbc Dummy {f00=0x008f, f01=0x0190, f02=»RD' | P ADR A3,A1 =>LENGTH P LDR A1,A12 FROM-ADDRESS ( P CALL CALLMO MOVE T:D H P ELR A1,A8 GET T:A ADDRESS f * P ES A2,T:DAD,A1 ESORE NEW T:D ADDRESS " P EL A7,CWBMSK,A12 GET CWBMASK P XIF P P CALL MOVCLA P EJE
0x1d9bbc…1d9d50 Dummy {f00=0x008f, f01=0x0190, f02=»NG n P IFT MMUPAG=0 " P LD A7,UWBMSK,A12 GET UWBMASK P XIF F P IFT MMUPAG=1 R P EL A7,UWBMSK,A12 h P XIF P CALL MOVCLA P EJECT P P " P* MOVE DT:S OF SWB'S & TWB'S * " P**************************
0x1d9d50…1d9ee4 Dummy {f00=0x008f, f01=0x0190, f02=»A265 LD A7,TWBMSK,A12 P XIF P IFT MMUPAG=1 * P EL A7,SWBMSK,A12 @ P RF(Z) SYA265 NONE Z P CALL SKRITT t PSYA265 EL A7,TWBMSK,A12 P XIF P RB(Z) SYA250 P CALL SKRITT P RB SYA250 P PSYA270 RF PR
0x1d9ee4…1da078 Dummy {f00=0x008f, f01=0x018e, f02=» ** r 4 P** MOVE D.T ** 4 P** ** R 4 P*********************************************** PSKRITT EQU * P CALL SHIFT PNO RF(NZ) NES P RTN A14
0x1da078…1da20c Dummy {f00=0x008f, f01=0x0190, f02=» P RB NO P EJECT P $ & P* BUILD TASKDATA PROTOTYPE AREA * 0 & P********************************* Z PPRODAT EQU * 4 P IM SWITCH+STKEND INDICATE: -NO MORE D.T. MOVE! $ P LD A8,T:ATOD,A10 T:ATAB ADDRESS PSYA280 ADKL A8,2
0x1da20c…1da3a0 Dummy {f00=0x008f, f01=0x0190, f02=»DAD,A12 . 0 P CALL TWBSWB MOVE TWB'S & RESERVE FOR SWB'S P F " P* CALCULATE LENGTH OF DSCB'S * R " P*** *** x P P LDR* A1,A8 GET T:A-ADDRESS & P LD A3,DATLEN,A12 A12=T:D-ADDRESS P LDK A2,DSCBL DS
0x1da3a0…1da534 (1, 283) Dummy {f00=0x008f, f01=0x0190, f02=» P ADKL A2,T:ASTA ( P AD A4,DATTAB,A12 GET START OF DSCB P SUR A2,A4 LENGTH OF DAT'S H , P ADR A3,A2 A3=LENGTH OF DSCB'S AND DAT'S j ( P LD A2,FCD,A12 GET FCB-DISPLACEMENT P RF(NZ) SYA285 FCB PRESENT & P SUR A2,A3 MOVD30E A3(DSCB-LENGT
0x1da534…1da6c8 Dummy {f00=0x008f, f01=0x0190, f02=»TACK SIZE | $ P ST A2,CSE,A1 AND SAVE TEMPORARY 8 P LD A2,APCBLK+STKEND GET START OF APL.CONTROL TABLE : ( P LD A2,APLLAC,A2 GET START OF P:MTAB v P LD A2,P:BAS,A2 GET P:BAS P ST A2,CSB,A1 AND SAVE " P CALL ALLBUF ALLOCATE BUFFERS P
0x1da6c8…1da85c Dummy {f00=0x008f, f01=0x0190, f02=»TAB-ADDRESS v , P LD A12,T:DSAV,A2 GET 'OLD' T:D-ADDRESS P D 2 P* GET LAST USED ENTRY IN CLASS-LOCAL MM-TABLE L P ( P TL MMBEG,A2 LOAD CLASS LOCAL TABLE * P LDKL A3,MMTAB GET WORK TABLE ADDRESS P ADR A3,A13 $ P TSR A3 STORE TA
0x1da85c…1da9f0 Dummy {f00=0x008f, f01=0x0190, f02=»L TWBSWB MOVE TWB'S & RESERVE FOR SWB'S " P* CALCULATE LENGTH OF DSCB'S * 0 " P*** *** V P | P ELR A1,A8 GET T:A-ADDRESS & P EL A3,DATLEN,A12 A12=T:D-ADDRESS P LDK A2,DSCBL DSCB-LENGTH ( P CALL MULT A3() X
0x1da9f0…1dab84 Dummy {f00=0x008f, f01=0x0190, f02=»LACEMENT v P ADR A4,A1 GET START OF DSCB P SUR A2,A4 LENGTH OF DAT'S 4 , P ADR A3,A2 A3=LENGTH OF DSCB'S AND DAT'S V ( 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
0x1dab84…1dad18 Dummy {f00=0x008f, f01=0x0190, f02=»S A2,CSE,A1 AND SAVE (TEMPORARY) 8 P LD A2,APCBLK+STKEND GET START OF APL.CONTROL TABLE ( ( P LD A2,APLLAC,A2 GET START OF P:MTAB d ( P TL* MMTO+STKCOM LOAD CORRECT TABLE P EL A2,P:BAS,A2 GET P:BAS ( P TL* MMFROM+STKCOM RELOAD DDIV TABLE
0x1dad18…1daeac Dummy {f00=0x008f, f01=0x0190, f02=»AB l P XIF P RB SYA280 NEXT P EJECT . PSYA290 EQU * < 6 P IM FLAG+STKEND INDICATE REAL DATA-PART PROCESSING P P* P* INCLUDE DDIV IN FREE AREA P* P LD A1,DDIVST+STKEND P IFT MMUPAG=1 P LDR A2,A1 P A
0x1daeac…1db040 Dummy {f00=0x008f, f01=0x0190, f02=»A2,/FFF P ST A2,FSTADR+STKCOM P XIF , P IFT MMUPAG=0 8 P ST A1,DATEND+STKCOM N P XIF j P* MOVE T:ATAB v P . P LD A2,T:ATNW,A10 GET REAL T:A-TAB ADDRESS P IFT MMUPAG=0 P LDR* A1,A2 REAL LENGTH $ P ADR A2,A1 E
0x1db040…1db1d4 (1, 284) Dummy {f00=0x008f, f01=0x0190, f02=» SUR A2,A3 TO-ADDRESS P ST A2,T:ATOD,A10 SAVE P CALL MOVE < P XIF N P IFT MMUPAG=1 Z ( P TL* MMTO+STKCOM LOAD CORRECT TABLE p & P ELR A1,A2 GET REAL T:ATAB LENGTH $ P TL* MMFROM+STKCOM RELOAD TABLE P ADR A2,A1 END ADDRESS
0x1db1d4…1db368 Dummy {f00=0x008f, f01=0x0190, f02=» P SUR A2,A3 TO-ADDRESS P ST A2,T:ATOD,A10 SAVE " P CALL XMOVE @ P XIF T P ` P EJECT h P v P ~ 4 P************************************************ 4 P*** *** 4 P** SYSL
0x1db368…1db4fc Dummy {f00=0x008f, f01=0x0190, f02=»****** f P 4 P* BUILD REAL T:A'S. COPY T:A'S ACCORDING TO * 4 P* SHADOW TABLE * N 4 P* * 4 P************************************************ P PPART2B EQU
0x1db4fc…1db690 Dummy {f00=0x008f, f01=0x0190, f02=» f * P LD A7,T:ATNW,A10 REAL T:ATAB ADDRESS P ADK A7,2 6 P ST A8,SAVE01+STKEND SAVE A8 H * PSYA310 LD A8,SAVE01+STKEND RESTORE A8 l P ADKL A8,2 P CW A8,ENDADD+STKEND ALL? P RF(E) SYA350 YES! P ST A8,SAVE01+STKEND SAVE $
0x1db690…1db824 Dummy {f00=0x008f, f01=0x0190, f02=»TASK FLAG ~ : P ST A3,TTB:SA+26,A2 SAVE T:A ADDR. IN TTAB (SAVE-A13) " P LD A1,SCTOPT GET OPTION WORD P P ANK A1,2 DISC PAGING? v P RF(Z) SYA320 NO! P LDR A1,A3 GET T:A-ADDRESS 0 P ADKL A1,CSB ADDRESS TO CURRENT SEGMENT BASE " P ST
0x1db824…1db9b8 Dummy {f00=0x008f, f01=0x0190, f02=»DR* A6,A5 GET NUMBER OF COPIES P EJECT & PSYA340 SUK A6,1 4 P RF(P) SYA345 NEXT TASK L 2 P CALL CHTAID REPLACE TCL:S IN THIS TASK-CLASS l P RB SYA310 NEXT TASK-CLASS * PSYA345 LD A12,T:DAD,A1 GET T:D-ADDRESS P CALL MOVT:A MOVE T:A
0x1db9b8…1dbb4c Dummy {f00=0x008f, f01=0x0190, f02=»ORRESPONDING TTAB AND QUEUE ~ P IMR A4 SET QUEUE TASK FLAG $ 0 P ST A3,TTB:SA+26,A2 SAVE T:A-ADDRESS IN TTAB H " P LD A1,SCTOPT GET OPTION WORD | P ANK A1,2 DISC PAGING? P RF(Z) SYA348 NO! P LDR A1,A3 GET T:A-ADDRESS 0 P ADKL A1,CSB
0x1dbb4c…1dbce0 Dummy {f00=0x008f, f01=0x0190, f02=»BSWB MOVE TWB'S AND RESERVE FOR SWB'S " P CALL ALLBUF ALLOCATE BUFFERS . P XIF T P IFT MMUPAG=1 ` * P* GET ACTUAL MM-TABLE ADDRESS AND LOAD v P P LDR A1,A5 . P AD* A1,SHADOW,A10 ADD SHADOW-TABLE LENGTH $ P LDR* A1,A1 GET MM-TABLE
0x1dbce0…1dbe74 (1, 285) Dummy {f00=0x008f, f01=0x0190, f02=»EUE TASK FLAG : P ST A3,TTB:SA+26,A2 SAVE T:A ADDR. IN TTAB (SAVE-A13) P LDR A1,A3 GET T:A-ADDRESS T 0 P ADKL A1,CSB ADDRESS TO CURRENT SEGMENT BASE v " P ST A1,TTB:CB,A2 STORE IN TTAB 0 P LD A1,T:DSAV,A2 GET CLASS-LOCAL LAST ENTRY * P LDK
0x1dbe74…1dc008 Dummy {f00=0x008f, f01=0x0190, f02=»BLE l P P SUK A2,2 START OF TABLE P LDKL A12,/FC00 4 PSYA320 SUK A1,2 NEXT ENTRY L P CWR A1,A2 ALL? n P RF(E) SYA330 YES! P STR A12,A1 REMOVE ENTRY P RB SYA320 PSYA330 EQU * P ELR A1,A8 GET T:A ADDRESS $ P
0x1dc008…1dc19c Dummy {f00=0x008f, f01=0x0190, f02=»REAL T:ATAB x $ P LDR* A6,A5 GET NUMBER OF COPIES PSYA340 SUK A6,1 < P RF(P) SYA345 NEXT TASK T 2 P CALL CHTAID REPLACE TCL:S IN THIS TASK-CLASS t P RB SYA310 NEXT TASK-CLASS PSYA345 ADK A1,1 NEXT T:A ID ( P CALL GETTTB FIND CORRES
0x1dc19c…1dc330 Dummy {f00=0x008f, f01=0x0190, f02=»A7 STORE IN REAL T:ATAB @ P ST A2,TTB:SA+26,A9 PUT T:A-ADDRESS IN TTAB. A9=TTAB ADDRESS P LDR A8,A2 GET T:A-ADDRESS d 0 P ADKL A8,CSB ADDRESS TO CURRENT SEGMENT BASE " P ST A8,TTB:CB,A9 STORE IN TTAB " P LDR A8,A7 CHANGE T:A TO COPY , P A
0x1dc330…1dc4c4 Dummy {f00=0x008f, f01=0x018e, f02=»STKCOM GET TO-TABLE 2 P ST A1,MMFROM+STKCOM CHANGE T:A ADDRESS-TABLE P TLR A1 R " P CALL ALLBUF ALLOCATE BUFFERS b ( P LD A1,TTAB+STKCOM GET TTAB-ADDRESS * P CM LSTPAG,A1 CLEAR SAVE-AREA IN TTAB $ P ELR A3,A8 GET T:A-ADDRESS (NEW)
0x1dc4c4…1dc658 Dummy {f00=0x008f, f01=0x018e, f02=» ( P* SCAN TCTAB FOR TASKS TO BE QUEUED P* 4 , PSYA350 LD* A9,SCTTCT GET LENGTH OF TCTAB > $ P AD A9,SCTTCT ADD START OF TCTAB n ( PSYA355 SUKL A9,2 NEXT ENTRY IN TCTAB & P CW A9,SCTTCT ALL ENTRIES SCANNED? P RF(E) SYA360 YES P L
0x1dc658…1dc7ec Dummy {f00=0x008f, f01=0x018e, f02=» ~ $ P STR A5,A9 RESET QUEUE TASK FLAG ( P LD A12,TTB:SA+26,A5 GET T:A ADDRESS 0 , P LD A2,APCBLK+STKEND GET ADDRESS TO ACB ( P LD A2,APLLAC,A2 GET P:MTAB ADDRESS P IFT MMUPAG=1 & P TL TTB:MT,A5 LOAD TASKS MMU TABLE P EL A12,T:DAD,A1
0x1dc7ec…1dc980 Dummy {f00=0x008f, f01=0x0190, f02=» 0 P LD A2,NTPA,A2 GET INTERPRETER START ADDRESS P XIF 8 P CALL QUEJOB QUEUE TASK D P RB SYA355 d P EJECT v PSYA360 EQU * P ADKL A10,TABLEN NEXT TABLEN P CM SWITCH+STKEND P CM FLAG+STKEND P LD A1,PDDIV+STKEND GET FL
0x1dc980…1dcb14 (1, 286) Dummy {f00=0x0090, f01=0x0190, f02=» f P ST A1,SCTEFA+2 SAVE P XIF $ P IFT MMUPAG=1 0 6 P LD A1,FYSPAG+STKCOM GET LAST PHYSICAL PAGE NUMBER F P ST A1,SAEFA1+STKEND STORE * P LD A1,LSTADR+STKCOM GET LAST ADDRESS P ANKL A1,/FFF GET OFFSET P ST A1,SAEFA2+STKEND STO
0x1dcb14…1dcca8 Dummy {f00=0x0090, f01=0x0190, f02=»,FYSPAG+STKCOM GET LAST PHYSICAL PAGE P SLL A2,2 . P ORR A1,A2 @ P ST A1,SCTEFA+2 R P LD A1,FYSPAG+STKCOM j P SRL A1,14 P ST A1,SCTEFA P XIF PSYA370 EQU * P LDKL A1,SYA200 P AD A1,M:REL+STKCOM & P ABR A
0x1dcca8…1dce3c Dummy {f00=0x0090, f01=0x0190, f02=»N TO ALL PARTS IN THIS PROGRAM * z < P******************************************************* * P EJECT j 2 P** C A L L M O ** x 2 P** ** 2 P** CHECK IF MORE SPACE IN PDDIV ARE
0x1dce3c…1dcfd0 Dummy {f00=0x0090, f01=0x0190, f02=» PDDIV = IF "1" INDICATE THAT ** 2 P** MORE SPACE IN PDDIV ** , 2 P** PDDIVL = LENGTH OF PDDIV AND ** b 2 P** S:GTAB ** 2 P** OUTPUT: PDDIVL AND LSTADR IS UPDATED ** 2 P**
0x1dcfd0…1dd164 Dummy {f00=0x0090, f01=0x0190, f02=» ** p 2 P** SUBROUTINES: MOVING ** 2 P** ** L 2 P********************************************* P* PCALLMO EQU * 2 P LD A2,PDDIV+STKEND MORE SPACE IN PDDIV AREA?
0x1dd164…1dd2f8 Dummy {f00=0x0090, f01=0x0190, f02=»PAG=0 , P LD A2,SCTEFA+2 N0! GET END OF FREE AREA , P ST A2,LSTADR+STKCOM UPDATE LAST ADDRESS > P XIF n P IFT MMUPAG=1 z P LD A2,SAEFA2+STKEND , P ST A2,LSTADR+STKCOM UPDATE LAST ADDRESS P LD A2,SAEFA1+STKEND 4 P ST A2,FYSPAG+ST
0x1dd2f8…1dd48c Dummy {f00=0x0090, f01=0x0190, f02=»DDIVL v PCALL:10 EQU * P CALL MOVING $ P RTN A14 8 P EJECT H P V 4 P** G E T W B ** b 4 P** ** 4 P** ** 4
0x1dd48c…1dd620 Dummy {f00=0x0090, f01=0x0190, f02=» ** z 4 P** INPUT : A8= POINTER TO T:A-ADD IN T:ATAB ** " 4 P** BIT=BIT NUMBER SAT IN MASK (0-15)** Z 4 P** OUTPUT: A4=W.B. DISPLACEMENT IN T:A ** 4 P** TADISP=A4 ** 4 P**
0x1dd620…1dd7b4 (1, 287) Dummy {f00=0x0090, f01=0x0190, f02=»***************** r P PGETWB EQU * & $ P LD A4,BIT+STKEND GET BIT NUMBER : $ P SLL A4,2 ADJUST FOR ADDRESSING b P ADK A4,WATFST+2 * P ST A4,TADISP+STKEND SAVE DISPLACEMENT P IFT MMUPAG=0 P LDR* A11,A8 GET T:A-ADDRESS
0x1dd7b4…1dd948 Dummy {f00=0x0090, f01=0x0190, f02=» 2 P LD A11,FLAG+STKEND REAL TASK-DATA PROCESSING? P RF(Z) GETW10 NO! > " P TL* MMTO+STKCOM LOAD TO-TABLE X & PGETW10 ELR A11,A8 GET T:A-ADDRESS ~ P ADR A11,A4 ADD DISPLACEMENT P ST A11,WBADD+STKEND SAVE " P ELR A11,A11 GET W.B.-ADDR
0x1dd948…1ddadc Dummy {f00=0x0090, f01=0x018e, f02=» M O V W B ** 8 P** ** . 8 P** ** j 8 P** MOVE WORK-BLOCK. W.B.-ADDRESS IS UPDATED ** 8 P**
0x1ddadc…1ddc70 Dummy {f00=0x0090, f01=0x0190, f02=» Z 8 P** WORK-REGS: A1-A4 ** 8 P**************************************************** D P PMOVWB EQU * P LDR A1,A11 GET ADDRESS P ADKL A1,WBLEN FROM-ADDRESS P IFT MMUPAG=0 P LDR* A3,A1 LE
0x1ddc70…1dde04 Dummy {f00=0x0090, f01=0x0190, f02=» MOVE b P XIF P IFT MMUPAG=1 P ELR A3,A1 LENGTH 0 P CALL CALLMO J 6 P SUKL A2,WBLEN ADJUST TO-ADDRESS FOR DISPLACEMENT ^ 2 P LD A4,FLAG+STKEND REAL DATA-PART PROCESSING? P RF(Z) MOVW10 NO! " P TL* MMTO+STKCOM LOAD TO-TABLE
0x1dde04…1ddf98 Dummy {f00=0x0090, f01=0x0190, f02=» P EJECT P P " : P** M O V D T ** . : P** ** l : P** ** : P** MOVE DISCRIPTOR TABLE. D.T.-
0x1ddf98…1de12c Dummy {f00=0x0090, f01=0x0190, f02=»:A ** d : P** OUTPUT: A3=POINTER TO W.B.-ADDRESS ** : P** WORK REGS: A1-A4 ** P : P***************************************************** P PMOVDT EQU * : P LD A1,WBADD+STKEND GET POIN
0x1de12c…1de2c0 Dummy {f00=0x0090, f01=0x018e, f02=»A1,DTLEN ADJUST FOR LENGTH WORD " P AD A1,MOVADD+STKEND RELOCATE ( P LDR* A3,A1 LENGTH N P CALL CALLMO h P LD A3,WBADD+STKEND | P SUKL A2,DTLEN P SUKL A1,DTLEN 4 P ST A2,-2,A3 UPDATE D.T-ADDRESS. A2=NEW ADDRESS P XIF P
0x1de2c0…1de454 (1, 288) Dummy {f00=0x0090, f01=0x0190, f02=» P ELR A3,A1 LENGTH P CALL CALLMO P LD A3,WBADD+STKEND 2 P SUKL A2,DTLEN N P SUKL A1,DTLEN d 4 P ES A2,-2,A3 UPDATE D.T-ADDRESS. A2=NEW ADDRESS z P XIF P RTN A14 P EJECT P < P** M O V D W
0x1de454…1de5e8 Dummy {f00=0x0090, f01=0x0190, f02=» ** h < P** SEARCH T:D FOR DUMMY W.B. IF ANY FOUND, MOVE D.T. ** < P** AND UPDATE ADDRESSES (W.B. & D.T.) ** X < P** ** < P** INPUT : A12=T:D-ADDRESS
0x1de5e8…1de77c Dummy {f00=0x0090, f01=0x0190, f02=» X < P** WORK.REGS: A1-A4 ** < P******************************************************** H P PMOVDWB EQU * " P ST A10,SAVE07+STKEND SAVE A10 P ST A6,SAVE05+STKEND SAVE A6 P LDK A6,0 * PMOVD
0x1de77c…1de910 Dummy {f00=0x0090, f01=0x018e, f02=» P IFT MMUPAG=1 P EL A2,WATLEN,A12 P XIF 4 " P SUR A2,A6 ACTUAL TABLE LENGTH @ P ADR A6,A12 A6=TABLE POINTER f " PMOVD20 ADK A6,1 A6=TABLE INDEX P SUK A2,1 ALL? P RF(N) MOVD60 YES! P IFT MMUPAG=0 " P CC A4,DWBFST,A6 S
0x1de910…1deaa4 Dummy {f00=0x0090, f01=0x0190, f02=» P RF(N) MOVD30 RIGHT! P ANKL A10,/FF00 P ECR A10,A10 8 P RF MOVD40 L PMOVD30 ANKL A10,/FF ^ " PMOVD40 SLC A6,1 ADJUST POINTER z P CWR A4,A10 SHARED W.B.? P XIF P RB(NE) MOVD20 NO! P* DWB FOUND * , P NGR A4,A2 C
0x1deaa4…1dec38 Dummy {f00=0x0090, f01=0x0190, f02=» ~ P ADR A4,A10 P XIF P LDR A6,A4 SAVE TABLE INDEX ( P SUK A4,1 L P SLL A4,2 ^ P ADK A4,WATFST+2 p . P LD A3,NEWAD2+STKEND GET NEW W.B.-ADDRESS P IFT MMUPAG=0 2 P ADR* A4,A8 A4=POINTER TO W.B.-ADDRESS IN T:A " P S
0x1dec38…1dedcc Dummy {f00=0x0090, f01=0x0190, f02=»0 NO! " P TL* MMTO+STKCOM LOAD TO-TABLE PMOVD50 EQU * 4 . P ELR A10,A8 A4=POINTER TO W.B.-ADDR IN T:A H P ADR A4,A10 z " P ESR A3,A4 CHANGE W.B.-ADDRESS ( P TL* MMFROM+STKCOM RELOAD FROM-TABLE P XIF P ST A4,WBADD+STKEND 0 P
0x1dedcc…1def60 Dummy {f00=0x0090, f01=0x018e, f02=»VE D.T. P RB MOVD10 PMOVD60 EQU * " $ P LD A6,SAVE05+STKEND RESTORE A6 6 & P LD A10,SAVE07+STKEND RESTORE A10 ^ P RTN A14 P EJECT P P 4 P** T W B S W B ** 4 P**
0x1def60…1df0f4 (1, 289) Dummy {f00=0x0090, f01=0x018e, f02=» ^ 4 P** INPUT : A8=ACTUAL T:A-ADDRESS ** 4 P** A12=T:D-ADDRESS ** @ 4 P** WORK-REGS: A1-A4, A11 ** x 4 P************************************************ P PTWBSWB EQU * P ST
0x1df0f4…1df288 Dummy {f00=0x0090, f01=0x0190, f02=» P CALL SHIFT " PTWSW10 RF(Z) TWSW20 ALL DONE! P CALL GETWB B P CALL MOVWB V , P ST A2,NEWAD2+STKEND SAVE NEW WB-ADDRESS j & P CALL MOVDWB CHANGE DWB-ADDRESSES P CALL SKIFTA P RB TWSW10 PTWSW20 EQU * P IFT SWPBL
0x1df288…1df41c Dummy {f00=0x0090, f01=0x0190, f02=»FT SWPBLK-MMUPAG=1 P LD A7,SWBMSK,A12 P XIF 4 P IFT MMUPAG+SWPBLK=2 @ P EL A7,SWBMSK,A12 P XIF v P IFT SWPBLK=1 P CALL SHIFT PTWSW30 RF(Z) TARZAN ALL DONE P CALL GETWB P CALL MOVWB RESERVE SPACE * P S
0x1df41c…1df5b0 Dummy {f00=0x0090, f01=0x0190, f02=» P XIF $ P LD A7,SAVE04+STKEND RESTORE A7 P RTN A14 < P EJECT L P Z P b 4 P** A L L B U F ** j 4 P** ** 4 P** ALLOCATE FIXED DATA SET BUFFERS AND
0x1df5b0…1df744 Dummy {f00=0x0090, f01=0x018e, f02=»=ACTUAL T:A-ADDRESS IN T:ATAB ** 4 P** A12=T:D-ADDRESS ** * 4 P** CSN (IN T:A)=LENGTH OF DSCB'S ** b 4 P** CIA (IN T:A)=DISPL. TO T:A-START ** 4 P** CSE (IN T:A)=STACKSIZE ** 4
0x1df744…1df8d8 Dummy {f00=0x0090, f01=0x0190, f02=» P IFT MMUPAG=0 2 P LD A9,FSTADR+STKCOM GET BUFFER START ADDRESS P LDR* A1,A8 GET T:A-ADDRESS T ( P LD A3,CSN,A1 GET DSCB TOTAL LENGTH x P RF(Z) ALLB70 NO DSCB'S 2 P AD A1,DATTAB,A12 CALC. START OF DSCB RECORDS " P LDR A11,A1 SA
0x1df8d8…1dfa6c Dummy {f00=0x0090, f01=0x0190, f02=» RF(Z) ALLB70 NO DSCB * P EL A11,DATTAB,A12 GET DISPL. TO DAT'S P ADR A1,A11 START OF DAT'S L " P LDR A11,A1 SAVE START ADDRESS n P XIF P SUR A3,A1 P NGR A3,A3 P SUK A3,DSCBL END CONDITION < P ST A3,SAVE04+STKEND SAVE ADDRES
0x1dfa6c…1dfc00 Dummy {f00=0x0090, f01=0x0190, f02=»LLB70 YES! P IFT MMUPAG=0 : P LD A3,BL,A1 GET LENGTH OF THE REQUESTED BUFFER.ZERO? ( P RB(Z) ALLB10 YES! f * P LD A2,SB,A1 GET INDEX.SHARED BUFFER? P RF(Z) NOTSH NO! P LDK A3,DSCBL LENGTH OF DSCB " P CALL MULT A2*A3 RESULT IN A3
0x1dfc00…1dfd94 (1, 290) Dummy {f00=0x0091, f01=0x0190, f02=»TORE IN CURRENT DSCB P XIF P IFT MMUPAG=1 ( 0 P EL A3,BL,A1 GET LENGTH OF REQ.BUFFER.ZERO? > P RB(Z) ALLB10 YES! r * P EL A2,SB,A1 GET INDEX.SHARED BUFFER? P RF(Z) NOTSH NO! P LDK A3,DSCBL LENGTH OF DSCB " P CALL MULT A2*A3 R
0x1dfd94…1dff28 Dummy {f00=0x0091, f01=0x0190, f02=»S A4,BP,A1 STORE IN CURRENT DSCB P XIF ( P RB ALLB10 4 P F P IFT MMUPAG=0 N : PNOTSH ADK A3,2 ONE EXTRA WORD USED BY THE INTERPRETER d P LDR A9,A9 PAGING? P RF(NZ) NOTS10 NO! , P CALL CALLMO ALLOCATE BUFFER FROM BOTTOM & P A
0x1dff28…1e00bc Dummy {f00=0x0091, f01=0x0190, f02=»9,A9 , P SUR A9,A2 MAX LENGTH OF REM. MEM. AREA P LDR A4,A11 SAVE REGISTER < P LDR A11,A3 LENGTH OF BUFFER ^ P CALL CMPADR ENOUGTH MEMORY? P RF(G) ALLB50 NO! ( P LDR A9,A2 GET START OF MEMORY AREA ( P ADR A9,A3 ALLOCATE BUFFER F
0x1e00bc…1e0250 Dummy {f00=0x0091, f01=0x0190, f02=»RT r P CALL CMPADR P RF(NL) ALLB60 OK! PALLB50 LDKL A1,LMP3 8 P CALL ERROR T PALLB60 EQU * h P LDR A11,A4 RESTORE REGISTER | & P ADK A2,2 BUFFER MASK AT DISPL. -2 & P ST A2,BP,A1 STORE BUFFER POINTER 0 P ST A9,FSTADR+STKCOM
0x1e0250…1e03e4 Dummy {f00=0x0091, f01=0x0190, f02=»XTRA WORD USED BY THE INTERPRETER | . P CALL CALLMO ALLOCATE BUFFER FROM 'BOTTOM' * & P ADK A2,2 BUFFER MASK AT DISPL. -2 & P ES A2,BP,A1 STORE BUFFER ADDRESS P XIF P RB ALLB10 P , P* RESERVE STACK AND SET STACKPOINTERS *
0x1e03e4…1e0578 Dummy {f00=0x0091, f01=0x018e, f02=»80 $ P LDK A3,STKSZ DEFAULT STACKSIZE PALLB80 EQU * 2 , P ST A3,STKB,A1 STORE ACTUAL STACK SIZE F P CALL CALLMO ALLOCATE STACK v P ST A2,STKE,A1 SET STACK-END " P LD A3,STKB,A1 GET STACK SIZE " P ADR A2,A3 COMPUTE STACK BASE "
0x1e0578…1e070c Dummy {f00=0x0091, f01=0x0190, f02=» P IFT MMUPAG=1 P ELR A1,A8 GET T:A-ADDRESS P EL A3,CSE,A1 GET STACK SIZE < * P RF(NZ) ALLB80 USER DEFINED STACK SIZE ` $ P LDK A3,STKSZ DEFAULT STACK SIZE ( PALLB80 ES A3,STKB,A1 SAVE STACK SIZE P CALL CALLMO ALLOCATE STACK " P E
0x1e070c…1e08a0 Dummy {f00=0x0091, f01=0x0190, f02=»T WORD x $ P ES A2,STKB,A1 STORE STACK BASE * P ESR A2,A1 STORE CURRENT STACK POINTER 6 P XIF d P RTN A14 p P EJECT P 4 P** M O V T : A ** 4 P** ** 4 P**
0x1e08a0…1e0a34 (1, 291) Dummy {f00=0x0091, f01=0x0190, f02=» ** v 4 P** INPUT : A8=T:A-ADDRESS ** 4 P** A12=T:D-ADDRESS ** V 4 P** CIA (IN T:A)=DISL. TO T:A-START ** 4 P** OUTPUT: A2=NEW T:A-ADDRESS ** 4 P** WORKRE
0x1e0a34…1e0bc8 Dummy {f00=0x0091, f01=0x0190, f02=»0,SAVE07+STKEND SAVE A10 P IFT MMUPAG=0 P LDR* A1,A8 GET T:A-ADDRESS 6 ( P LD A3,WATLEN,A12 GET LENGTH OF WAT Z P SLL A3,2 BYTES , P SU A3,CIA,A1 ADD DISPLACEMENT TO START P ADK A3,WATFST A3=LENGTH P AD A1,CIA,A1 FROM-ADDRESS
0x1e0bc8…1e0d5c Dummy {f00=0x0091, f01=0x018e, f02=»COMPUTE AND STORE ADDRESSES TO DATA-SETS IN FCB * P : P LD A3,FCD,A12 ANY FCD? B P RF(Z) MOVT10 NO! b P ADR A3,A2 START OF FCB | P LDR A4,A2 SAVE T:A-ADDRESS 2 P LD A10,FLAG+STKEND REAL TASK DATA PROCESSING? P RF(Z) MOVT05 NO!
0x1e0d5c…1e0ef0 Dummy {f00=0x0091, f01=0x0190, f02=» | P ADS A4,FCBDD3,A3 P ADS A4,FCBDD4,A3 " , PMOVT10 LD A10,SAVE07+STKEND RESTORE A10 < P RTN A14 l P XIF | P IFT MMUPAG=1 P P ELR A1,A8 GET T:A-ADDRESS ( P EL A3,WATLEN,A12 GET LENGTH OF WAT P SLL A3,2 BYTES
0x1e0ef0…1e1084 Dummy {f00=0x0091, f01=0x0190, f02=»0,SAVE07+STKEND RESTORE A10 P CALL CALLMO $ P ELR A4,A8 8 P EL A10,CIA,A4 J P SUR A2,A10 NEW T:A-ADDRESS ` " P SUR A1,A10 'OLD' T:A-ADDRESS 8 P* COMPUTE AND STORE ADDRESSES TO DATA-SETS IN FCB * P P EL A3,FCD,A12 ANY FCD?
0x1e1084…1e1218 Dummy {f00=0x0091, f01=0x018e, f02=»! 8 P SUR A4,A1 ADJUST FOR OLD RELOCATION (OLD T:A-ADDR.) PMOVT05 EQU * F P ADR A3,A2 START OF FCB Z " P TL* MMTO+STKCOM LOAD TO-TABLE z P EL A10,FCBDD1,A3 P ADR A10,A4 P ES A10,FCBDD1,A3 P EL A10,FCBDD2,A3 P ADR A
0x1e1218…1e13ac Dummy {f00=0x0091, f01=0x0190, f02=» P ADR A10,A4 P ES A10,FCBDD4,A3 ( P TL* MMFROM+STKCOM RELOAD FROM-TABLE 2 , PMOVT10 LD A10,SAVE07+STKEND RESTORE A10 ^ P RTN A14 P XIF P EJECT D P*************************************************************** D P*
0x1e13ac…1e1540 Dummy {f00=0x0091, f01=0x0190, f02=»* ===================================== * D P* * H D P* REFERENCED IN: MOVCOM * D P*
0x1e1540…1e16d4 (1, 292) Dummy {f00=0x0091, f01=0x0190, f02=» * h D P* BIT - BIT NUMBER SET IN CWB- OR UWB-MASK * D P* * h D P* EXIT: CORRESPONDING BIT IN CURRENT STATCK POINTER * D P* IN T:A
0x1e16d4…1e1868 Dummy {f00=0x0091, f01=0x0190, f02=»REGISTERS: A1,A2 * D P* * @ D P* SUBROUTINES: * D P*
0x1e1868…1e19fc Dummy {f00=0x0091, f01=0x0190, f02=» SET BIT 0 8 P LD A2,BIT+STKEND GET BIT NUMBER IN CWB- OR UWB-MASK " PIBAM10 RF(Z) IBAM20 BIT FOUND N & P SRL A1,1 SHIFT BIT RIGHT ONE STEP t $ P SUK A2,1 DECREMENT BIT COUNTER P RB IBAM10 P* & P* UPDATE MOVED MASK IN FIRST T:A
0x1e19fc…1e1b90 Dummy {f00=0x0091, f01=0x0190, f02=»E CURRENT BLOCK MOVED ~ * P STR A3,A2 STORE NEW MOVED BLOCK MASK P* L & P* UPDATE MOVED MASK IN SECOND T:A V P* P LDR* A2,A6 GET T:A POINTER $ P LDR* A3,A2 GET MOVED BLOCK MASK , P ORR A3,A1 INDICATE CURRENT BLOCK MOVED * P S
0x1e1b90…1e1d24 Dummy {f00=0x0091, f01=0x0190, f02=»ED BLOCK MASK ~ , P ORR A3,A1 INDICATE CURRENT BLOCK MOVED * P ESR A3,A2 STORE NEW MOVED BLOCK MASK F P* t & P* UPDATE MOVED MASK IN SECOND T:A ~ P* P ELR A2,A6 GET T:A POINTER $ P ELR A3,A2 GET MOVED BLOCK MASK , P ORR A3,A1 I
0x1e1d24…1e1eb8 Dummy {f00=0x0091, f01=0x0190, f02=»******************************************************************* J P* * L J P* CHKMVD - CHECK IF BLOCK ALREADY MOVED * J P* ================
0x1e1eb8…1e204c Dummy {f00=0x0091, f01=0x0190, f02=»D IN: MOVCOM,MOVCLA * J P* * B J P* ENTRY: A8 - POINTER TO T:A * J P* BIT - BIT NUMBER IN CWB- OR UWB-
0x1e204c…1e21e0 Dummy {f00=0x0091, f01=0x0190, f02=»EADY MOVED THEN CR=2 ELSE CR<>2 * z J P* * 8 J P* WORK REGISTER: A1,A2 * J P*
0x1e21e0…1e2374 (1, 293) Dummy {f00=0x0091, f01=0x0190, f02=» * p J P********************************************************************* . P EJECT | PCHKMVD EQU * P IFT MMUPAG=0 P LDR* A1,A8 GET T:A POINTER $ P LDR* A1,A1 GET MOVED BLOCK MASK P XIF
0x1e2374…1e2508 Dummy {f00=0x0091, f01=0x0190, f02=»END GET BIT SET IN CWB- OR UWB-MASK 6 PCHKM10 RF(Z) CHKM20 BIT IN MOVED BLOCK MASK FOUND , * P SLL A1,1 NEXT BIT IN MOVED BLOCK MASK f $ P SUK A2,1 DECREMENT BIT COUNTER P RB CHKM10 PCHKM20 ADK A1,0 SET CR * P CFI A14,PSW,A13 PUT CONDITI
0x1e2508…1e269c Dummy {f00=0x0091, f01=0x0190, f02=» ** : P** S H I F T & SKIFTA ** < : P** ** z : P** CALCULATES BIT NUMBER SAT IN MASK-WORD ** : P** INPUT : A7=MAS
0x1e269c…1e2830 Dummy {f00=0x0091, f01=0x0190, f02=»PSW ON RETURN ** r : P****************************************************** P ^ PSHIFT EQU * j $ P CM BIT+STKEND RESET BIT COUNTER ~ P LDR A7,A7 P RF SHIF20 & PSKIFTA EQU * ENTRY: CONTINUE SHIFT PSHIF10 IM BIT+STKEND
0x1e2830…1e29c4 Dummy {f00=0x0091, f01=0x0190, f02=»OND IN PSW t P RTN A14 P EJECT " @ P************************************************************ 0 @ P* * t @ P* CHTAID - CHANGE T:A-ID AND CLEAR TCL SAVE AREA IN TTAB * B P*
0x1e29c4…1e2b58 Dummy {f00=0x0091, f01=0x0190, f02=» * @ P* * : @ P* REFERENCED IN: SYSLDA PART 2 B. * ~ @ P* * @ P*
0x1e2b58…1e2cec Dummy {f00=0x0091, f01=0x018e, f02=» * @ P* EXIT: * B @ P* * @ P* WORK REGISTERS: A1,A3,A6,A8 *
0x1e2cec…1e2e80 Dummy {f00=0x0091, f01=0x0190, f02=» R @ P* * @ P************************************************************ L PCHTAID EQU * 2 P LDR A8,A7 GET NEXT FREE ENTRY IN REAL T:ATAB $ P LDR* A6,A5 GET NUMBER OF COPIES " PCHT:10
0x1e2e80…1e3014 (1, 294) Dummy {f00=0x0092, f01=0x0190, f02=»T:A p $ P LD A1,T:ATID,A1 GET TCL IN T:A . PCHT:20 CALL GETTTB GET CORRESPONDING TTAB 4 * P LD A4,TTBTID,A2 GET REAL TID IN TTAB f 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
0x1e3014…1e31a8 Dummy {f00=0x0092, f01=0x0190, f02=»IF P IFT MMUPAG=1 & P ELR A1,A8 GET POINTER TO REAL T:A $ P EL A1,T:ATID,A1 GET TCL IN T:A J . PCHT:20 CALL GETTTB GET CORRESPONDING TTAB r ( P LDR A3,A2 GET POINTER TO TTAB ENTRY 2 P ADKL A3,MMBEG START OF MM-TABLE FOR THIS TTAB P T
0x1e31a8…1e333c Dummy {f00=0x0092, f01=0x018e, f02=»:ATID,A3 REPLACE TCL IN T:A *79-04-11* 0 P EL* A3,T:ATNW,A10 GET LENGTH OF REAL T:ATAB . $ P NGR A3,A3 NEGATIVE DISPLACEMENT b . P ADR A3,A8 COMPUTE ENTRY IN AUX. TID TABLE 8 P ESR A4,A3 SAVE TID FOR DEBUGGER PURPOSE *79-04-11* P XIF & P CM
0x1e333c…1e34d0 Dummy {f00=0x0092, f01=0x0190, f02=» j P RB(P) CHT:20 NEXT COPY PCHT:90 RTN A14 ( P > 4 P** T : D A D D ** J 4 P** ** 4 P** ** 4 P** GET T:D - ADDRESS
0x1e34d0…1e3664 Dummy {f00=0x0092, f01=0x018e, f02=»** b 4 P** OUTPUT: A12=T:D ADDRESS ** 4 P************************************************ B PT:DADD EQU * z P IFT MMUPAG=0 P LDR* A12,A8 T:A ADDRESS P LD A12,T:DAD,A12 P XIF P IFT MMUPAG=1 P ELR A12
0x1e3664…1e37f8 Dummy {f00=0x0092, f01=0x0190, f02=» P 6 P** M O V C O M ** 6 P** ** N 6 P** ** 6 P** SEARCH T:A'S FOR COMMON WORK BLOCKS THAT ** 6 P** ARE COMM
0x1e37f8…1e398c Dummy {f00=0x0092, f01=0x018e, f02=» ** p 6 P** INPUT : A8=POINTER IN T:ATAB ** 6 P** BIT=BIT NUMBER, SAT IN MASK ** T 6 P** ENDADD=ENDADDRESS OF T:ATAB ** 6 P** TADISP=W.B.-ADDR DISPLACEM. IN T:A ** 6 P** WO
0x1e398c…1e3b20 Dummy {f00=0x0092, f01=0x0190, f02=» & P CALL CHKMVD BLOCK ALREADY MOVED? P RF(N) MOVC20 YES! 2 : P CALL GETWB POINTER TO WB ADD TO 'WBADD',A5=T:A-DISPL L , P ST A11,SAVE06+STKEND SAVE W.B.-ADDRESS * P CM MOVED+STKEND CLEAR MOVED INDICATOR P LDR A6,A8 PMOVC10 ADK A6,
0x1e3b20…1e3cb4 (1, 295) Dummy {f00=0x0092, f01=0x0190, f02=»30 LDR* A11,A6 P LD A2,T:DAD,A11 T:D-ADDRESS " P AD A2,MOVADD+STKEND RELOCATE : P ST A2,SAVE03+STKEND SAVE ` , P LD A2,WATLEN,A2 NUMBER OF WAT-ELEMENTS P CW A2,BIT+STKEND ENOUGHT? 6 P RB(NG) MOVC10 TO FEW WAT ELEMENTS. TAKE NEXT T:A
0x1e3cb4…1e3e48 Dummy {f00=0x0092, f01=0x018e, f02=»IF P IFT MMUPAG=1 PMOVC30 ELR A11,A6 P EL A2,T:DAD,A11 T:D-ADDRESS : " P AD A2,MOVADD+STKEND RELOCATE ^ 4 P ST A2,SAVE03+STKEND SAVE T:D-ADDRESS TEMPORARY , P EL A2,WATLEN,A2 NUMBER OF WAT-ELEMENTS P CW A2,BIT+STKEND ENOUGHT?
0x1e3e48…1e3fdc Dummy {f00=0x0092, f01=0x0190, f02=» 0 P CW A11,SAVE06+STKEND COMPARE W.B.-ADDRESSES P XIF 8 P RB(NE) MOVC10 .NEQ. D , P LD A9,MOVED+STKEND W.B. ALREADY MOVED? ` . P RF(NZ) MOVC50 YES! CHANGE ADDRESSES ONLY & P CALL MOVDT MOVE DESCRIPTOR-TABLE * P ST A2,NEWAD1+STKEND SAVE D.
0x1e3fdc…1e4170 Dummy {f00=0x0092, f01=0x0190, f02=» MOVC40 NO! " P CALL GETPRO CREATE REAL UWB'S 8 PMOVC40 ST A2,NEWAD2+STKEND SAVE NEW ADDRESS TO W.B. : P CALL MOVDWB v & PMOVC50 CALL CHADR CHANGE ADDRESSES . P CALL ICBMVD INDICATE CURRENT BLOCK MOVED P LDR A11,A8 SAVE T:A-POINTER *
0x1e4170…1e4304 Dummy {f00=0x0092, f01=0x0190, f02=» P CALL MOVDWB P LDR A8,A11 , P LD A12,SAVE04+STKEND RELOAD T:D-ADDRESS , P RB MOVC10 P EJECT n P | P 4 P** G E T P R O ** 4 P** ** 4 P**
0x1e4304…1e4498 Dummy {f00=0x0092, f01=0x0190, f02=» ** t 4 P** ** 4 P** INPUT : A11=PROTOTYPE ADDRESS ** T 4 P** A2=LAST W.B. - ADDRESS ** 4 P** OUTPUT: A2=NEW ADDRESS ** 4 P** WORK-REG
0x1e4498…1e462c Dummy {f00=0x0092, f01=0x018e, f02=»A3,U:BTOD,A10 GET U:BTAB ADDRESS P IFT MMUPAG=0 ( P LDR* A4,A3 LENGTH > PGETP10 EQU * X 6 P SUK A4,UP:REC SUB RECORD LENGTH FRM TABLE LENGTH l P RF(NN) GETP20 P LDK A1,LMP6 W.B. NOT FOUND! P CALL ERROR PGETP20 EQU * P
0x1e462c…1e47c0 Dummy {f00=0x0092, f01=0x0190, f02=» 0 P* GET NUMBER OF COPIES * 0 P* A3 POINTS AT PROTOTYPE ADDRESS IN U:BTAB * < P p PGETP30 EQU * x P LD A4,WBLEN,A11 W.B.-LENGTH * P LC A5,UPNUMB,A3 GET NUMBER OF COPIES P ANK A5,/FF , P SU A3,U:BTOD,A10 GET
0x1e47c0…1e4954 (1, 296) Dummy {f00=0x0092, f01=0x0190, f02=»A5,URNUMB,A9 STORE IN REAL U:BTAB 0 P* COPY NUMBER OF WORKBLOCKS TO COMMON AREA * * 0 P******************************************** ^ . P SUK A5,1 ONE ALREADY MOVED (IN 'MOVCOM') P RF(NP) GETP50 PGETP40 CALL MOVWB P SUK A5,1 P R
0x1e4954…1e4ae8 Dummy {f00=0x0092, f01=0x018e, f02=» ST A2,URADDR,A9 STORE ADDRESS TO FIRST IN U:BTAB P XIF : P IFT MMUPAG=1 F P ELR A4,A3 LENGTH PGETP10 EQU * v 6 P SUK A4,UP:REC SUB RECORD LENGTH FRM TABLE LENGTH P RF(NN) GETP20 P LDK A1,LMP6 W.B. NOT FOUND! P CALL ERRO
0x1e4ae8…1e4c7c Dummy {f00=0x0092, f01=0x018e, f02=» f P ADK A3,UP:REC NEXT P RB GETP10 $ P 6 0 P* GET NUMBER OF COPIES * B 0 P* A3 POINTS AT PROTOTYPE ADDRESS IN U:BTAB * v 0 P******************************************** P PGETP30 EQU * P EL A4,WBLEN,A
0x1e4c7c…1e4e10 Dummy {f00=0x0092, f01=0x0190, f02=» . P AD A3,U:BTNW,A10 ADD TO NEW TABLE ADDRESS P LDR A9,A3 6 " P TL* MMTO+STKCOM LOAD TO-TABLE H * P ES A5,URNUMB,A9 ESORE IN REAL U:BTAB n " P ES A4,URLENG,A9 STORE LENGTH ( P TL* MMFROM+STKCOM RELOAD FROM TABLE 0 P* COPY NUMBER OF WORKBLOCK
0x1e4e10…1e4fa4 Dummy {f00=0x0092, f01=0x0190, f02=»GETP50 PGETP40 CALL MOVWB P SUK A5,1 ( P RB(NZ) GETP40 : P P & P* UPDATE POINTER IN REAL U:BTAB * & P********************************* PGETP50 EQU * P TL* MMTO+STKCOM 6 P ES A2,URADDR,A9 ESORE ADDRESS TO FIRES IN U
0x1e4fa4…1e5138 Dummy {f00=0x0092, f01=0x0190, f02=» ** f 2 P** ** 2 P** ** B 2 P** CHECKS IF W.B. ALREADY MOVED TO COMMON ** x 2 P** AREA. IF NOT MOVE W.B. & D.T. AND ** 2 P** CHECK IF ANY DWB'S
0x1e5138…1e52cc Dummy {f00=0x0092, f01=0x0190, f02=»*********************************** P , PMOVCLA EQU * 4 P CALL SHIFT H P RF(Z) MVCL30 * PMVCL10 CALL GETWB W.B.-ADDRESS TO A11 r & P CALL CHKMVD BLOCK ALREADY MOVED? P RF(NN) MVCL40 NO! , PMVCL20 CALL SKIFTA GET NEXT BIT IN M
0x1e52cc…1e5460 Dummy {f00=0x0092, f01=0x0190, f02=» P RF(Z) MVCL50 NO! P CALL GETPRO DUPLICATE WB'S 0 PMVCL50 ST A2,NEWAD2+STKEND SAVE W.B.-ADDRESS B P CALL MOVDWB PROCESS DWB'S v P RB MVCL20 P EJECT P P 6 P** C H A D R ** 6
0x1e5460…1e55f4 (1, 297) Dummy {f00=0x0092, f01=0x0190, f02=» TO W.B. & D.T. IN T:A, ** ~ 6 P** BLOCKS ALREDY MOVED ** ( 6 P** ** b 6 P** INPUT : A6=POINTER IN T:ATAB TO T:A ** 6 P** NEWADR1=NEW D.T.-ADDRESS **
0x1e55f4…1e5788 Dummy {f00=0x0092, f01=0x0190, f02=»S: A1,A2 ** 6 P************************************************* . P h PCHADR EQU * t P IFT MMUPAG=0 P LDR* A1,A6 T:A-ADDRESS 2 P AD A1,TADISP+STKEND ADDRESS TO W.B.-ADDRESS P LD A2,NEWAD2+STKEND
0x1e5788…1e591c Dummy {f00=0x0092, f01=0x0190, f02=»G=1 P ELR A1,A6 T:A-ADDRESS 2 P AD A1,TADISP+STKEND ADDRESS TO W.B.-ADDRESS * P LD A2,NEWAD2+STKEND ` P ESR A2,A1 | & P SUK A1,2 ADDRESS TO D.T.-ADDRESS P LD A2,NEWAD1+STKEND P ESR A2,A1 P XIF P RTN A14 P IFT S
0x1e591c…1e5ab0 Dummy {f00=0x0092, f01=0x0190, f02=» * l B P* * " B P* B:RSWT - BUILD REAL SWB CONTROL TABLE * h B P* ===================================== * B P*
0x1e5ab0…1e5c44 Dummy {f00=0x0092, f01=0x0190, f02=» * B P* ENTRY: A2 - POINTER TO FIRST RECORD IN REAL S:BTAB * 6 B P* A5 - LENGTH OF REAL S:BTAB * | B P* * B P
0x1e5c44…1e5dd8 Dummy {f00=0x0092, f01=0x0190, f02=» B P* WORK REGISTERS: A1-A7 * B P* * J B P* SUBROUTINES: * B P*
0x1e5dd8…1e5f6c Dummy {f00=0x0092, f01=0x0190, f02=»AVE POINTER TO FIRST BLOCK 8 P LD A1,APCBLK+STKEND GET START OF APL.CONTROL TABLE " 0 P LD A1,APLSWB,A1 POINTER TO SWB BLOCK TABLE ^ * P RF(Z) RSWBEX NO SWB:S IN APPLICATION P LDR* A3,A1 NUMBER OF TYPES P RF(Z) RSWBEX NO MOORE P LDK A
0x1e5f6c…1e6100 Dummy {f00=0x0092, f01=0x0190, f02=» COPIES | $ P LD A7,SWBLEN,A4 LENGTH IN BYTES P XIF 8 P IFT MMUPAG+SWPBLK=2 D & P ES A6,2,A2 STORE NUMBER OF COPIES ` , P ES A7,4,A2 STORE LENGTH OF SWB IN BYTES P XIF P IFT SWPBLK-MMUPAG=1 & P ST A6,2,A2 STORE NUMBER OF COPIES
0x1e6100…1e6294 (1, 298) Dummy {f00=0x0093, f01=0x0190, f02=»6 INCREMENT POINTER IN BLOCK ( P SUK A3,1 DECREMENT NUMBER OF TYPES $ P RB(P) RSWB10 P P LDR A4,A2 f P* x 4 P* INIT POINTERS TO TID BLOCKS FOR EACH SWB TYPE ( P* AND RESET ALL WORDS IN TID BLOCKS P* PRSWB20 EQU * ( P LDR
0x1e6294…1e6428 Dummy {f00=0x0093, f01=0x018e, f02=» t P RF(Z) RSWB50 NO COPIES! * P STR A6,A8 STORE POINTER TO TID BLOCK ( PRSWB30 STR A3,A2 RESET TID V , P ADK A2,2 INCREMENT POINTER IN TID BLOCK x . P SUK A5,2 DECREMENT LENGTH OF REAL S:BTAB $ P SUK A1,1 DECR. NUMBER OF COPIES P RB(P)
0x1e6428…1e65bc Dummy {f00=0x0093, f01=0x0190, f02=» * P ESR A6,A8 STORE POINTER TO TID BLOCK PRSWB40 ESR A3,A2 RESET TID 2 , P ADK A2,2 INCREMENT POINTER IN TID BLOCK T . P SUK A5,2 DECREMENT LENGTH OF REAL S:BTAB ( P SUK A1,1 DECREMENT NUMBER OF COPIES P RB(P) RSWB40 NEXT COPY P XIF
0x1e65bc…1e6750 Dummy {f00=0x0093, f01=0x4098, f02=» RSWBEX YES P LDKL A1,LMP6 SWB ERROR! P CALL ERROR 4 PRSWBEX RTN A14 H P XIF ^ PLCREND EQU * j P ~ P END @ LENGTH OF REAL S:BTAB ( P SUK A1,1 DECREMENT NUMBER OF COPIES P RB(P) RSWB40 NEXT COPY P XIF
0x1e6750…1e68e4 Dummy {f00=0x0093, f01=0x2008, f02=» -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
0x1e68e4…1e6a78 Dummy {f00=0x0093, f01=0x0000, f02=»
[…0x2…]
0x1e6da0…1e6f34 (1, 299) Opaque[0x194]
0x1e6f34…1e70c8 # DirEnt {nam=»SYSINI«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1268, f03=0x0000}
0x1e6f34…1e70c8 IdxSect {
0x1e6f34…1e70c8 f00 = 0x0093 // 0x1e6f34 @0x0
0x1e6f34…1e70c8 f01 = 0x0028 // 0x1e6f36 @0x2
0x1e6f34…1e70c8 gno = [ // 0x1e6f38 @0x4
0x1e6f34…1e70c8 [0x00]: C0x0093.0x1.0
0x1e6f34…1e70c8 [0x01]: C0x0093.0x2.0
0x1e6f34…1e70c8 [0x02]: C0x0093.0x3.0
0x1e6f34…1e70c8 [0x03]: C0x0094.0x0.0
0x1e6f34…1e70c8 [0x04]: C0x0094.0x1.0
0x1e6f34…1e70c8 [0x05]: C0x0094.0x2.0
0x1e6f34…1e70c8 [0x06]: C0x0094.0x3.0
0x1e6f34…1e70c8 [0x07]: C0x0095.0x0.0
0x1e6f34…1e70c8 [0x08]: C0x0095.0x1.0
0x1e6f34…1e70c8 [0x09]: C0x0095.0x2.0
0x1e6f34…1e70c8 [0x0a]: C0x0095.0x3.0
0x1e6f34…1e70c8 [0x0b]: C0x0096.0x0.0
0x1e6f34…1e70c8 [0x0c]: C0x0096.0x1.0
0x1e6f34…1e70c8 [0x0d]: C0x0096.0x2.0
0x1e6f34…1e70c8 [0x0e]: C0x0096.0x3.0
0x1e6f34…1e70c8 [0x0f]: C0x0097.0x0.0
0x1e6f34…1e70c8 [0x10]: C0x0097.0x1.0
0x1e6f34…1e70c8 [0x11]: C0x0097.0x2.0
0x1e6f34…1e70c8 [0x12]: C0x0097.0x3.0
0x1e6f34…1e70c8 [0x13]: C0x0098.0x0.0
0x1e6f34…1e70c8 ]
0x1e6f34…1e70c8 }
0x1e70c8…1e725c Dummy {f00=0x0093, f01=0x0190, f02=» 2 P IDENT SYSINI REL 11.0 81-01-26 870105041100 P : . P =2,WHEN MMUPAG=0 INITIATE PAGE ADDRESS B $ P IN PAGTAB WITH RIGHT VALUE t P PRR 11.0 80-12-03 , P =1,CREATE PAGES FOR APPLICATIONS WITH " P DIFFERENT SEGMENT SIZE
0x1e725c…1e73f0 Dummy {f00=0x0093, f01=0x0190, f02=» * P* ENTRIES AND EXTERNALS * P* * @ P*************************** d P P* LABEL ENTRIES P ENTRY SYSINI P ENTRY INILEN PROGRAM LENGTH P ENTRY INIEND END OF SYSINI
0x1e73f0…1e7584 Dummy {f00=0x0093, f01=0x018e, f02=» ENTRY NXTBLK SKIP TO NEXT CONFIGURATION BLOCK 4 P ENTRY NXTCOM SKIP COMMONDEVICE DEFINITION BLOCK 6 * P ENTRY CONVRT CONVERSION ASCII-BINARY n 2 P ENTRY GETNUM CONVERT 3 ASCII-DIGITS TO BINARY & P ENTRY MULT MULTIPLICATION ROUTINE 2 P ENTRY XMOVE
0x1e7584…1e7718 Dummy {f00=0x0093, f01=0x0190, f02=» l $ P ENTRY GETTAB FIND TTAB-ADDRESS $ P ENTRY GETTTB FIND TTAB-ADDRESS 0 0 P ENTRY MMENT FIND LAST USED ENTRY IN MM-TAB X , P ENTRY PUSH STORE REGISTERS ON A15-STACK 0 P ENTRY POB RESTORE REGISTERS FROM A15-STACK P ENTRY GETAPP P E
0x1e7718…1e78ac Dummy {f00=0x0093, f01=0x0190, f02=»RY MMTAB WORK-TABLE 1 (MMU 6 P ENTRY TABBE ABSOLUTE 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' P ENTRY MMBEG , P ENTRY LSTPAG DISPL. TO 'ENTRY POINTER'
0x1e78ac…1e7a40 Dummy {f00=0x0093, f01=0x0190, f02=»CTLAC LOGICALL ADDRESS TO COMMON PART P EXTRN SCTTCT TC:TAB ADDRESS . P EXTRN SCTSTB A15 STACK-BASE R " P EXTRN SCTEFA END OF FREE AREA v " P EXTRN SCTNOP NUMBER OF PAGES P EXTRN SCTPSZ PAGE SIZE P EXTRN SCTMMC =00002 P EXTRN S
0x1e7a40…1e7bd4 (1, 300) Dummy {f00=0x0093, f01=0x0190, f02=»G BUGGER ADDRESS , P EXTRN STKEND START OF SCRATCH-PAD AREA * P EXTRN STKCOM START OF COMMON-PAD AREA H P v P* EXTERNAL LABELS ~ $ P EXTRN PAGQUE PAGE QUEUE POINTER P P* EXTERNAL SUBROUTINES P EXTRN ACTOT QUEUE TASK P E
0x1e7bd4…1e7d68 Dummy {f00=0x0093, f01=0x0190, f02=»48 SWITCH TO LEVEL 48 P P* & , P EXTRN TTB:SA START OF SAVE AREA IN TTAB 0 8 P EXTRN TTB:CB DISPL. TO CURRENT SEGMENT BASE ADDRESS ` 8 P EXTRN TTB:MT DISPL. TO 1:ST MMU-TABLE ENTRY IN TTAB 0 P EXTRN TTB:SP DISPL TO SEGMENT TABLE ADDRESS
0x1e7d68…1e7efc Dummy {f00=0x0093, f01=0x0190, f02=»************************************* , P* CONDITIONAL ASSEMBLY * . , P*************************************** ^ P $ PDSKPAG EQU 0 0 = NO DISC PAGING PMMUPAG EQU 1 0 = NO MMU PCPU852 EQU 0 0 = NOT 852 CPU 2 P******
0x1e7efc…1e8090 Dummy {f00=0x0093, f01=0x018e, f02=» * n 2 P* ==================== * 2 P* * J 2 P********************************************* P P . PAPLADA EQU 22 APPL. REL. BASE (2 WORDS) =1 . PAPLREL EQU 18 NU
0x1e8090…1e8224 Dummy {f00=0x0093, f01=0x0190, f02=» Z 8 PAPLLAC EQU 14 APPLICATION LOAD ADDR. (LOGICAL ADDR.) & PAPLLAP EQU 12 LOGICAL PAGE ADDRESS D 8 PAPLLDA EQU 0 APPLICATION LOAD ADDR. (PHYSICAL ADDR.) n . PAPLMMC EQU 10 APPLICATION MMU START ENTRY ( PAPLMMP EQU 8 SEGMENT START MMU ENTRY . P
0x1e8224…1e83b8 Dummy {f00=0x0093, f01=0x018e, f02=»APLSTA EQU 16 APPL. PGM START ADDRESS " PAPLTYP EQU 8 APPLICATION TYPE . . PAPLPSZ EQU 20 APPLICATION SEGMENT SIZE =1 T P EJECT . P***************************************** . P* * . P* COMMON DISPLA
0x1e83b8…1e854c Dummy {f00=0x0093, f01=0x0190, f02=» 0 PAPLTAB EQU 12 ADDRESS TO APPL. CONTROL TABLE $ PAPPLNO EQU 18 APPLICATION NUMBER < ( PBUFSIZ EQU 14 TEMPORARY BUFFER SIZE d . PCONLEN EQU 0 LENGTH OF CONFIGURATION DATA , PCONSTA EQU 2 START OF CONFIGURATION DATA ( PDATEND EQU 34 END OF D
0x1e854c…1e86e0 Dummy {f00=0x0093, f01=0x018e, f02=»2 1ST FREE PAGE (PHYSICAL) , PFYSPAG EQU 24 LAST PHYSICAL PAGE NUMBER " 6 PLSTADR EQU 26 LAST ADDRESS WHEN BUILDING DATA PART R ( PMAPLEN EQU 30 LENGTH OF AREA TO MAP * PMMFROM EQU 36 2ND MMU TABLE WORK AREA ( PMMTO EQU 38 1:ST MMU TABLE WORK AR
0x1e86e0…1e8874 (1, 301) Dummy {f00=0x0093, f01=0x0190, f02=» j & PSWBFSE EQU 8 SWB-FILE END ADDRESS ( PTTAB EQU 32 WORK AREA FOR MMU TABLE 2 * PTOTSGM EQU 46 TOTAL NUMBER OF SEGMENTS ^ , PSWBFLG EQU 48 SWAPPABLE WORK BLOCK FLAG $ PCOM01 EQU 40 COMMON WORK AREA 1 $ PCOM02 EQU 42 COMMON WORK AREA 2
0x1e8874…1e8a08 Dummy {f00=0x0093, f01=0x018e, f02=» $ P******************************* $ P* SCRATCH-PAD DISPLACEMENTS * , $ P******************************* T P* | . PAPCBLK EQU 0 START OF APPL. CONTROL BLOCK P EJECT P P ***************** P *****************
0x1e8a08…1e8b9c Dummy {f00=0x0093, f01=0x0190, f02=» z P P********** P* P:MTAB * & P********** 8 PT:ATAB EQU 0 J PU:BTAB EQU 2 ^ PP:BAS EQU 6 SEGMENT BASE r . PT:AID EQU 32 ADDRESS TO 'TABLE OF T:A TID' ( PS:BTAB EQU 40 DISP TO S:BTAB ADDRESS P EJECT P
0x1e8b9c…1e8d30 Dummy {f00=0x0093, f01=0x0190, f02=»* r P P* TASK DEFINITION BLOCK: PTDBBT EQU 0 1A BLOCK TYPE 6 ( PTDBNT EQU TDBBT+1 2N NUMBER OF TASKS X , PTDBID EQU TDBNT+2 6A TASK ID START VALUE , PTDBMC EQU TDBID+6 6A MATCHING TASK CLASS $ PTDBTL EQU TDBMC+6 6A TASK LEVEL
0x1e8d30…1e8ec4 Dummy {f00=0x0093, f01=0x0190, f02=» DEVICE CLASS ~ PTLC EQU 7 LINE CONNECTION ( PTDBREC EQU TDC+TLC TDB-RECORD LENGTH 8 P* d * PSDC EQU 7 SPECIAL DEVICE CLASS-RECORD n P* P* COMMON DEVICE DEF. BLOCK: PCDBBT EQU 0 1A BLOCK TYPE 6 PCDBNC EQU CDBBT+1 2N NUMBER
0x1e8ec4…1e9058 Dummy {f00=0x0093, f01=0x0190, f02=»UDBBT EQU 0 1A BLOCK TYPE , PUDBNU EQU UDBBT+1 3A NUMBER OF UWB TYPES " P* R ( PUDBFST EQU UDBNU+3 FIRST UDB-RECORD PNAMUWB EQU 3 NAME OF UWB " PNUMUBL EQU 3 NUMBER OF BLOCKS . PUDBREC EQU NAMUWB+NUMUBL UDB RECORD-LENGTH P EJECT
0x1e9058…1e91ec Dummy {f00=0x0093, f01=0x0190, f02=»SEGMENT END (HERE: STACKSIZE) | $ PCSB EQU -12 CURRENT SEGMENT BASE & 4 PCSN EQU -10 CURRENT SEGMENT NUMBER (HERE LENGTH N 2 P OF ALL DSCB-RECORDS PT:DAD EQU -8 ADDRESS TO T:D * PCIA EQU -6 CURRENT INSTUCTION ADDRESS
0x1e91ec…1e9380 Dummy {f00=0x0093, f01=0x0190, f02=» POINTER PSTKB EQU 2 STACK BASE " PWATFST EQU 4 FIRST WAT-ELEMENT . P* T P* DSCB-RECORD: ^ PDSCBL EQU 20 RECORD LENGTH t " PBL EQU 2 LENGTH OF FIX BUFFER 2 PSB EQU 4 INDEX TO DSCB WHICH SHARE THE BUFFER PBP EQU 18 BUFFER POINT
0x1e9380…1e9514 (1, 302) Dummy {f00=0x0094, f01=0x0190, f02=»:A n , PT:DTID EQU 2 TASK IDENTIFIER (PROTOTYPE) , PDATLEN EQU 4 NUMBER OF DATASETS (DSCB'S) : 8 PDATTAB EQU 6 DISPLACEMENT TO BEGINNING OF DAT-TABLE j & PWATLEN EQU 8 NUMBER OF WATELEMENTS 0 PTWBMSK EQU 10 MASK FOR TWB'S (ONE BIT/ENTRY) * PSWBM
0x1e9514…1e96a8 Dummy {f00=0x0094, f01=0x0190, f02=»BFST EQU 18 FIRST WORD IN DBLK-TAB P * . PSTPREC EQU 4 RECORD LENGTH OF START-POINTS 2 P d P p P**************** x P* SOP-HANDLING * P**************** PSOP EQU /2E DEVICE ADDRESS P P LAMP CODE MEANING P
0x1e96a8…1e983c Dummy {f00=0x0094, f01=0x0190, f02=»P4 EQU /80 FORMAT ERROR (CONFIG) PLMP5 EQU /40 TID ERROR ( " PLMP6 EQU /20 UWB OR SWB ERROR F " PLMP7 EQU /10 MM-TABLE OVERFLOW l PLMP8 EQU 8 PLMP9 EQU 4 PLMP10 EQU 2 PLMP11 EQU 1 P EJECT " P****************************
0x1e983c…1e99d0 Dummy {f00=0x0094, f01=0x0190, f02=»AX EQU 500 DEFAULT SPL STACK-SIZE 4 PENTFIN EQU /FFFF PROGRAMMER DEFINED ENTRY POINT * & PSPLSTS EQU 4 DIAGNOSTIC,STACK-SIZE b PSPLSTB EQU 52 STACK-BASE PSPLENT EQU 54 ENTRY-FINI PSPLSTA EQU 88 STACK-AREA P P P************
0x1e99d0…1e9b64 Dummy {f00=0x0094, f01=0x0190, f02=» n , PDTLEN EQU -2 LENGTH OF DESCRIPTOR-TABLE & PSWBLEN EQU 4 DISP TO LENGTH OF SWB 8 P b $ PFCBDD1 EQU 8 DISP TO FIRST DSET n $ PFCBDD2 EQU 10 DISP TO 2:ND DSET P $ PSTKSZ EQU 128 DEFAULT STACK-SIZE P ( PSEGREC EQU
0x1e9b64…1e9cf8 Dummy {f00=0x0094, f01=0x0190, f02=»DSAV EQU 0 SAVE FOR T:D-ADDRESS IN TTAB * PTTB:PP EQU 6 SAVE AREA FOR TCL IN TTAB 0 P ^ ( PNTPA EQU 4 INTERPRETER START ADDRESS f & PIHRTC EQU 4 RTC INTERRUPT ADDRESS $ PRTCDA EQU /1B RTC DEVICE ADDRESS P > PTABLEN EQU 20 LENGTH OF
0x1e9cf8…1e9e8c Dummy {f00=0x0094, f01=0x0190, f02=»********************************* p F P* CALL-FORMAT, PERFORMS: CFR A14,A13 * * F P* DATA [REL-ADDRESS] * t F P* * F P
0x1e9e8c…1ea020 Dummy {f00=0x0094, f01=0x0190, f02=» P EJECT P LDKL A1,SYSINI P AD A1,M:REL+STKCOM * " P ABR A1 GO TO START OF SYSINI F P EJECT l P z 6 P************************************************** 6 P************************************************** 6 P**
0x1ea020…1ea1b4 (1, 303) Dummy {f00=0x0094, f01=0x0190, f02=» ** n 6 P************************************************** 6 P************************************************** R P , PREL RF SUBBA JUMP TO SUBROUTINE HANDLER & P LDR A13,P GET BASE ADDRESS TO A13 P SUKL A13,4 P*
0x1ea1b4…1ea348 Dummy {f00=0x0094, f01=0x0190, f02=»SOLUT DITO 4 P ST A3,PSW,A13 STORE ADDRESS TO 'GETPSW'-ROUTINE P* LOAD STACKBASE * J P****************** d P ~ P LDKL A14,STACKB P ADR A14,A13 RELOCATE P RTN A8 P P P* STACK * P********* P
0x1ea348…1ea4dc Dummy {f00=0x0094, f01=0x0190, f02=»************** P* PPSW EQU *-REL P DATA GETPSW 6 P J D P**************************************************************** V D P* G E T P S W * D P* LITTLE SUBROUTINE TO PUT PSW IN
0x1ea4dc…1ea670 Dummy {f00=0x0094, f01=0x0190, f02=»EL $ P STR A2,A14 SAVE A2 ON A14-STACK ! 0 P LD A2,2,A14 GET PSW FROM CALLING SUBROUTINE ! 2 . P ST A2,6,A14 REPLACE PSW FROM MAIN PROGRAM ! f P LDR* A2,A14 RESTORE A2 ! P RTN A14 ! P EJECT ! P ! & P********************************* ! & P
0x1ea670…1ea804 Dummy {f00=0x0094, f01=0x018e, f02=»*********************** ! P " PSUBSUB EQU *-REL " ( & PSUBBA ST A10,COM04+STKCOM SAVE A10 " @ . P LD* A10,4,A14 GET SUBROUTINE REL ADDRESS " j $ P IM 4,A14 ADJUST RETURN ADDRESS " P IM 4,A14 " 2 P AD A10,M:REL+STKCOM ADD FOR SYSLDM RELOCATION "
0x1ea804…1ea998 Dummy {f00=0x0094, f01=0x0190, f02=» " P* MMU TABLES * # P # P # & . PMMDDIV EQU *-REL DDIV (& SYSLDA) MM-TABLE # . P IFT MMUPAG=1 # ` P RES 16 # v P XIF # P # $ PMMTAB EQU *-REL WORK AREA MM-TAB # PTABBE EQU * # P IFT MMUPAG=1 # P DATA 0,0,0,0,0,0,0,0 #
0x1ea998…1eab2c Dummy {f00=0x0094, f01=0x0190, f02=»M BOTTOM) IN MM-TAB # t P DATA 0 $ 0 PLSTPAG EQU TTPAG-* DISPL. TO 'ENTRY-POINTER' $ , ( P DATA 0 APPL. CONTROL BLOCK ADDRESS $ ` P $ PMMBEG EQU TABBE-* $ P EJECT $ P $ 6 P*** *** $ 6 P***
0x1eab2c…1eacc0 Dummy {f00=0x0094, f01=0x018e, f02=»*********************** $ v 6 P************************************************* % P % Z P % f , P** E R R O R ** % r , P** ** % , P** ** % , P** ER
0x1eacc0…1eae54 (1, 304) Dummy {f00=0x0094, f01=0x0190, f02=» , P** OUTPUT:A2=RELATIVE CALLING ADDRESS** & , P** (REG-CONTENTS IS SAVED) ** & 4 , P**************************************** & d P & PERROR EQU * & P ST A2,COM01+STKCOM SAVE A2 & . P LD A2,4,A14 GET CALLING ABSOLUTE ADDRESS & P S
0x1eae54…1eafe8 Dummy {f00=0x0094, f01=0x018e, f02=» P U S H ** & ( P** ** ' " ( P** ** ' N ( P** STORE REGISTERS ON A15-STACK ** ' z ( P** ** ' ( P************************************ ' PPUSH EQU *
0x1eafe8…1eb17c Dummy {f00=0x0094, f01=0x0190, f02=» ' z P STR A5,A15 SAVE A5 ( P STR A6,A15 SAVE A6 ( $ P STR A7,A15 SAVE A7 ( @ P STR A8,A15 SAVE A8 ( P STR A9,A15 SAVE A9 ( x P STR A10,A15 SAVE A10 ( P STR A11,A15 SAVE A11 ( P STR A12,A15 SAVE A12 ( P STR A13,A15 SAVE A13 (
0x1eb17c…1eb310 Dummy {f00=0x0094, f01=0x0190, f02=» P EJECT ) P ) P** P O B ) P** ) 6 P** ) @ , P** RESTORE REGISTERS FROM A15-STACK ** ) J , P** ** ) z , P**************************************** ) P ) PPOB EQU * ) P IFT CPU852=1 )
0x1eb310…1eb4a4 Dummy {f00=0x0094, f01=0x0190, f02=»A10,A15 RESTORE A5 ) P LDR* A9,A15 RESTORE A6 * P LDR* A8,A15 RESTORE A7 * : P LDR* A7,A15 RESTORE A8 * Z P LDR* A6,A15 RESTORE A9 * z P LDR* A5,A15 RESTORE A10 * P LDR* A4,A15 RESTORE A11 * P LDR* A3,A15 RESTORE A12 * P LDR* A2,A15 R
0x1eb4a4…1eb638 Dummy {f00=0x0094, f01=0x0190, f02=»IF * P RTN A14 + P EJECT + P + ( & P** M O V E ** + 0 & P** ** + Z & P** ** + & P** MOVE BLOCKS INSIDE MEMORY ** + & P** ** + & P** IN
0x1eb638…1eb7cc Dummy {f00=0x0094, f01=0x0190, f02=» ** + & P** WORK-REG: A4 ** , & P********************************* , D P , n PMOVE EQU * , z $ PMOVES ADR A1,A3 END OF FROM AREA , P ADR A2,A3 END OF TO-AREA , PMOVE10 SUK A3,1 DEC LENGTH , P RF(N) MOVE20 AL
0x1eb7cc…1eb960 Dummy {f00=0x0094, f01=0x0190, f02=»VE20 RTN A14 , P IFT MMUPAG=0 - P EJECT - * P - 8 P - D 4 P** M O V I N G ** - P 4 P** ** - 4 P** ** - 4 P** USES ROUTINE
0x1eb960…1ebaf4 (1, 305) Dummy {f00=0x0094, f01=0x0190, f02=» ** - h 4 P** ADDRESS. LSTADR IS UPDATED AND CHECKED ** . 4 P** ** . H 4 P** INPUT:A3 & A1 AS IN 'MOVE' ** . 4 P** OUTPUT: A2=TO-ADDRESS (LSTADR UPDATED) ** . 4 P** WORK-REG: A4
0x1ebaf4…1ebc88 Dummy {f00=0x0094, f01=0x0190, f02=» REGISTERS ON A15-STACK . * P LD A2,LSTADR+STKCOM GET LAST ADDRESS / P LDR A9,A2 / N P LDR A11,A3 / ` & P CALL CMPADR ENOUGTH MEMORY LEFT? / t P RF(NL) MOV010 NO! / P SUR A2,A3 SUB LENGTH / $ P ANKL A2,/FFFE MAKE EVEN ADDRESS / P LDR A11,A
0x1ebc88…1ebe1c Dummy {f00=0x0094, f01=0x0190, f02=»MP3 MEMORY OVERFLOW / P CALL ERROR 0 8 PMOV020 LD A9,FSTADR+STKCOM CHECK FIRST FREE ADDRESS 0 0 P CALL CMPADR 0 l P RB(L) MOV010 0 $ P ST A2,LSTADR+STKCOM NEW ADDRESS 0 . P CALL POB RESTORE REGISTERS FROM A15-STACK 0 P LD A2,LSTADR+STKCOM 0
0x1ebe1c…1ebfb0 Dummy {f00=0x0094, f01=0x0190, f02=» ** 0 x 4 P** ** 1 4 P** MOVE BLOCK INSIDE MEMORY VIA MMU ** 1 X 4 P** TWO PHASES:-MOVE TO SYSTEM AREA (BUFBEG) ** 1 4 P** -MOVE TO USER AREA ** 1 4 P** IF '
0x1ebfb0…1ec144 Dummy {f00=0x0094, f01=0x018e, f02=» ** 1 p 4 P** INPUT :A1=FROM-ADDR(MMFROM=MM-TABLE ADDR.)** 2 4 P** A2=TO-ADDRESS (MMTO=MM-TABLE ADDR.)** 2 P 4 P** A3=LENGTH (IN BYTES) ** 2 4 P** WORK.REGS:A4,A10 ** 2 4 P****************
0x1ec144…1ec2d8 Dummy {f00=0x0094, f01=0x0190, f02=» P ST A1,COM01+STKCOM 3 P ST A2,COM02+STKCOM 3 P ST A3,COM03+STKCOM 3 < PXMOV05 EQU * 3 X P LDR A10,A3 SAVE LENGTH 3 l , P LDK A4,0 RESET 'NUMBER-OF-MOVE' COUNTER 3 * P LDR A11,A3 GET LENGTH OF AREA TO MOVE 3 2 P LD A9,BUFSIZ+STKCOM GET TEMPO
0x1ec2d8…1ec46c Dummy {f00=0x0094, f01=0x0190, f02=»NGTH 3 x ( P LD A1,COM01+STKCOM GET FROM ADDRESS 4 8 P LD A2,SYSBUF+STKCOM GET TEMP. BUFFER START-ADDRESS 4 8 & P TL* MMFROM+STKCOM LOAD FROM-TABLE 4 t , P MVUS A3 MOVE DATA-BLOCK TO TEMP. BUFFER 4 2 P ST A1,COM01+STKCOM SAVE END OF 'FROM' ADDRESS 4 P LD
0x1ec46c…1ec600 Dummy {f00=0x0094, f01=0x0190, f02=»LE 4 t ( P MVSU A3 MOVE DATA-BLOCK FROM BUFFER 5 " P SUK A4,1 MORE PARTS TO MOVE? 5 6 P RF(N) XMOV30 NO! 5 P ADR A2,A10 5 v 2 P ST A2,COM02+STKCOM SAVE START OF 'TO' ADDRESS 5 , P LD A3,COM03+STKCOM GET REQUESTED LENGTH 5 $ P SUR A3,A10 SUBTRACT MOV
0x1ec600…1ec794 (1, 306) Dummy {f00=0x0095, f01=0x0190, f02=»ALL CMPADR REMAINING LENGTH<CURRENT BUFFER LENGTH? 5 P RB(NL) XMOV10 6 : P LDR A10,A3 LAST LENGTH 6 P P RB XMOV10 6 p P EJECT 6 P 6 PSPLIT EQU * 6 P LDR A1,A3 GET DIVISOR 6 * P SRL A1,15 MOST SIGN. PART OF DIVISOR 6 P LDR A2,A3 GET D
0x1ec794…1ec928 Dummy {f00=0x0095, f01=0x0190, f02=»ENGTH 6 p P RB XMOV10 7 P 7 4 PXMOV30 CALL POB RESTORE REGISTERS FROM A15-STACK 7 ( P RTN A14 7 ` P EJECT 7 p P 7 ~ 4 P** M O V I N G ** 7 4 P** ** 7 4 P**
0x1ec928…1ecabc Dummy {f00=0x0095, f01=0x018e, f02=» ** 7 f 4 P** IS ALWAYS ASSUMED TO BE DATA PART OF ** 8 4 P** MEMORY. LSTADR & FYSPAG POINTS AT LAST ** 8 F 4 P** (HIGHEST) FREE ADDRESS. LSTADR &FYSPAG ** 8 ~ 4 P** IS UPDATED AND CHECKED. ** 8 4 P**
0x1ecabc…1ecc50 Dummy {f00=0x0095, f01=0x0190, f02=» 8 ^ 4 P** OUTPUT:A2=LOGICALL TO-ADDRESS ** 9 4 P** WORK-REGS: A4,A10 ** 9 @ 4 P*********************************************** 9 x P 9 PMOVING EQU * 9 , P CALL PUSH STORE REGISTERS ON A15-STACK 9 0 P LD A4,FYSPA
0x1ecc50…1ecde4 Dummy {f00=0x0095, f01=0x0190, f02=» " P LDR* A9,A2 GET PAGE IN TABLE : P ANKL A9,/FC00 : * * P CWR A9,A4 CORRECT PAGE IN MMU-TABLE? : @ P RF(E) MOV010 YES! : n & P ADKL A4,/400 ADJUST FOR 'SETTAB' : $ P CALL SETTAB NEW PAGE IN TABLE! : : PMOV010 LD A11,LSTADR+STKCOM GET LAST LOGICALL
0x1ecde4…1ecf78 Dummy {f00=0x0095, f01=0x0190, f02=» RF(NL) MOV020 YES! : , P SUR A11,A3 COMPUTE DISPLACEMENT IN PAGE ; PMOV015 RF(NP) MOV025 ; L * P CALL SETTAB INITIALIZE NEW PAGE ENTRY ; h * P ADKL A11,4096 PHYSICAL PAGE INCREMENT ; P RB MOV015 ; 2 PMOV020 SUR A11,A3 COMPUTE DISPLACEMENT IN PAGE ;
0x1ecf78…1ed10c Dummy {f00=0x0095, f01=0x0190, f02=»T ENOUGH. NEW PAGE! ; P < ( P* MM-TABLE CORRECT. SAVE ADDRESSES * < $ P < P P* A4=PHYSICALL PAGE NUMBER < X P* A11=DISPLACEM. WITHIN PAGE < z " P* A2=CURRENT ENTRY IN MM-TABLE < P < PMOV050 EQU * < , P ST A2,LSTPAG,A10 SAVE MMU-ENTRY IN TTAB
0x1ed10c…1ed2a0 Dummy {f00=0x0095, f01=0x0190, f02=»LUTE ENTRY ADDRESS < * P ST A4,MMTO+STKCOM SAVE TABLE ADDRESS = P SUR A2,A4 RELATIVE ADDRESS = H 2 P SLL A2,11 SHIFT TO FOUR FIRST BITS & DIV BY 2 = l * P ORR A2,A11 GET DISPLACEM. WITHIN PAGE = P ANKL A2,/FFFE EVEN ADDRESS = . P ST A2,LSTADR+STKCOM
0x1ed2a0…1ed434 (1, 307) Dummy {f00=0x0095, f01=0x018e, f02=»AVE A11 = z P LD A11,FYSPAG+STKCOM > P CALL CMPADR AND COMPARE > . P RF(G) MOV090 OK! > N P RF(L) MOV070 NOK! > h ( P LD A11,COM01+STKCOM RESTORE DISPL. > P LD A9,FSTADR+STKCOM > P CALL CMPADR > P RF(NL) MOV090 OK! > PMOV070 LDKL A1,L
0x1ed434…1ed5c8 Dummy {f00=0x0095, f01=0x0190, f02=» ( P CALL INBIMA INIT ALLOCATION BIT MAP ? 4 PMOV100 CALL POB RESTORE REGISTERS FROM A15-STACK ? 0 0 P LD A2,LSTADR+STKCOM GET LOGICAL TO-ADDRESS ? h ( P TL* MMFROM+STKCOM RESTORE MM-TABLE ? P RTN A14 ? P XIF ? P EJECT ? P ? 6 P**
0x1ed5c8…1ed75c Dummy {f00=0x0095, f01=0x0190, f02=» ** ? n 6 P** SET NEW PAGE IN MM-TABLE & CHECK IF TABLE ** @ 6 P** OVERFLOW. ** @ R 6 P** ** @ 6 P** INPUT :A2-ADDRESS TO CURRENT ENTRY ** @ 6 P**
0x1ed75c…1ed8f0 Dummy {f00=0x0095, f01=0x0190, f02=» ** @ t 6 P************************************************* A P A X PSETTAB EQU * A ` P IFT MMUPAG=1 A t P SUKL A4,/400 GET NEXT PAGE A P SUK A2,2 GET NEXT ENTRY A P A " P* CHECK IF MM-TABLE OVERFLOW * A P A ( P LDR
0x1ed8f0…1eda84 Dummy {f00=0x0095, f01=0x0190, f02=» P RF SETT05 B PSETT00 CWR A2,A9 OVERFLOW? B PSETT05 RF(NL) SETT10 NO B 8 P LDK A1,LMP7 B X P CALL ERROR B l PSETT10 EQU * B P STR A4,A2 STORE IN TABLE B P RTN A14 B P XIF B P EJECT B P B P B P B 6 P**
0x1eda84…1edc18 Dummy {f00=0x0095, f01=0x018e, f02=» ** B l 6 P** COMPARE ADDRESSES. RESULT IN PSW ON RETURN ** C 6 P** ** C P 6 P** INPUT : A11 COMPARED TO.. ** C 6 P** A9 ** C 6 P** OUTPUT
0x1edc18…1eddac Dummy {f00=0x0095, f01=0x0190, f02=» P TNM A11,A9 D P RF(NN) CMPA10 D P CWR A9,A11 D . P RF CMPA20 D B PCMPA10 CWR A11,A9 D T . PCMPA20 CFI A14,PSW,A13 PUT RESULT ON STACK D n P RTN A14 D P EJECT D P D P D 4 P** M U L T ** D
0x1eddac…1edf40 Dummy {f00=0x0095, f01=0x0190, f02=» (A2) X A3(), A2#0 ** D ~ 4 P** ** E & 4 P** INPUT : A3,A2 ** E ^ 4 P** OUTPUT:A3=RESULT ** E 4 P************************************************ E PMU
0x1edf40…1ee0d4 (1, 308) Dummy {f00=0x0095, f01=0x0190, f02=»2,1 E P RB(NZ) ADD F P LDR* A2,A14 F P RTN A14 F 4 P EJECT F D P F R 4 P** M M E N T ** F Z 4 P** ** F 4 P** ** F 4 P** FI
0x1ee0d4…1ee268 Dummy {f00=0x0095, f01=0x0190, f02=» ** F r 4 P** INPUT :A3=MM-TABLE ADDRESS ** G 4 P** OUTPUT:A3=ENTRY ADDRESS ** G R 4 P** A9=TTAB-ADDRESS ** G 4 P** LSTPAG IN TTAB=A3 ** G 4 P** A1=
0x1ee268…1ee3fc Dummy {f00=0x0095, f01=0x0190, f02=»G=1 G P LDR A9,A3 GET TABLE ADDRESS H 6 P SUKL A9,MMBEG ADJUST A9 (LOOKS LIKE TTAB POINTER) H 0 P SUK A3,2 H j & PMMEN10 ADK A3,2 INCREMENT ADDRESS H | ( P LDR* A1,A3 GET CONTENTS OF MM-TABLE H P ANKL A1,/FC00 H P CWK A1,/FC00 H P RB(Z) MME
0x1ee3fc…1ee590 Dummy {f00=0x0095, f01=0x0190, f02=»T T A B ** H | 2 P** ** I " 2 P** ** I X 2 P** FIND TTAB ADDRESS ** I 2 P** ** I 2 P** INPUT :A8=
0x1ee590…1ee724 Dummy {f00=0x0095, f01=0x0190, f02=» ** I f 2 P** WORKREGS:A3,A4,A10 ** J 2 P********************************************** J B P J x PGETTAB EQU * J P IFT MMUPAG=0 J P LDR* A3,A8 T:A ADDRESS J & P LD A1,T:ATID,A3 GET TID TO MATCH J P LD A12,T:DAD,A3 T:D
0x1ee724…1ee8b8 Dummy {f00=0x0095, f01=0x0190, f02=» XIF J & PGETTTB EQU * ENTRY. INPUT: A1=TID K " P ST A10,COM04+STKCOM SAVE A10 K 6 $ P LD A4,SCTTCT GET TC:TAB ADDRESS K P LDR* A10,A4 TCTAB LENGTH K PGETT10 ADK A4,2 K P SUKL A10,2 ALL? K P RF(NN) GETT20 NO! K * P LDR A3,A1 SAVE A1 (DEBU
0x1ee8b8…1eea4c Dummy {f00=0x0095, f01=0x0190, f02=»? K v P RB(NE) GETT10 NO! L P ST A2,TTAB+STKCOM SAVE L $ P LD A10,COM04+STKCOM L D P RTN A14 L ` P EJECT L p > P********************************************************** L ~ > P* * L > P*
0x1eea4c…1eebe0 Dummy {f00=0x0095, f01=0x0190, f02=» * L > P* REFERENCED IN: MOVING,SYSLDB PART 2 * M 8 > P* * M z > P* ENTRY: MAPLEN - LENGTH OF AREA TO BE MAPPED * M > P*
0x1eebe0…1eed74 (1, 309) Dummy {f00=0x0095, f01=0x0190, f02=» * M > P* EXIT: * N 4 > P* * N v > P* WORK REGISTERS: A1,A2,A3,A4 * N > P*
0x1eed74…1eef08 Dummy {f00=0x0095, f01=0x0190, f02=» * N ~ > P********************************************************** O 0 PINBIMA EQU * O r P IFT MMUPAG=1 O P LDKL A1,/8000 INIT BIT MASK O * P LD A2,STKCOM+LSTADR GET LAST ADDRESS O P LDR A4,A2 SAVE O . P A
0x1eef08…1ef09c Dummy {f00=0x0095, f01=0x0190, f02=»NT O n ( P AD A4,STKCOM+TTAB ADD TTAB ADDRESS P " P LDR A3,A2 GET LOGICAL ADDRESS P 6 , P ANKL A3,/3000 SELECT ENTRY IN PARTITION P . P SRL A3,12 DISPL. REL. START OF PARTITION P * PMAP:40 SUK A3,1 CORRECT NIBBLE FOUND? P P RF(N) MAP:50 YES P P S
0x1ef09c…1ef230 Dummy {f00=0x0095, f01=0x0190, f02=»E P * PMAP:60 SUK A3,1 CORRECT 1K-PARTITION? Q P RF(N) MAP:65 YES Q 8 P SRL A1,1 NEXT 1K-PARTITION Q R P RB MAP:60 Q v * PMAP:65 LD A3,STKCOM+MAPLEN GET LENGTH Q * P ANKL A2,/3FF REMANING PART OF 1K-PAGE Q P ADR A3,A2 ADJUST LENGTH Q . P LDK
0x1ef230…1ef3c4 Dummy {f00=0x0095, f01=0x0190, f02=»OCCUPIED Q h P LDR A3,A3 GET LENGTH R P RF(N) MAP:80 >32K R . " P SUKL A3,/400 DECREMENT LENGTH R H $ P RF(NP) MAP100 MAPPING FINISHED R n P RF MAP:90 R ( PMAP:80 SUKL A3,/400 DECREMENT LENGTH R & PMAP:90 SRL A1,1 NEXT 1K-PARTITION R , P RB(NZ) MA
0x1ef3c4…1ef558 Dummy {f00=0x0095, f01=0x0190, f02=»DKL A1,/8000 INIT BIT MASK R P RB MAP:70 S " PMAP100 EQU * S 4 P XIF S H P RTN A14 S T P EJECT S d P S r 2 P** M M R S T ** S z 2 P** ** S 2 P** RESET MMTAB ENTRIES FROM ADDRE
0x1ef558…1ef6ec Dummy {f00=0x0095, f01=0x0190, f02=» ** S 2 P** INPUT : A1 = LAST USED ENTRY ** T . 2 P** OUTPUT: A1 = MMTAB START ADDRESS ** T d 2 P** A2 = MMTAB START ADDRESS ** T 2 P** A12= /FC00 ** T 2 P**
0x1ef6ec…1ef880 Dummy {f00=0x0095, f01=0x0190, f02=» T n P ADR A2,A13 U P SUK A2,2 U P LDKL A12,/FC00 INDICATOR U . PMMRST1 EQU * U P P SUK A1,2 NEXT ENTRY U d P CWR A1,A2 ALL DONE ? U P RF(E) MMRST2 YES U $ P STR A12,A1 INDICATE FREE ENTRY U P RB MMRST1 NEXT ENTRY U PMMRST2 EQU
0x1ef880…1efa14 (1, 310) Dummy {f00=0x0096, f01=0x0190, f02=» * U p 0 P* GET START OF APLTAB-BLOCK AND CONFIGURA- * V 0 P* TION-DATA FOR SPECIFIED APPLICATION * V H 0 P* AND IF MMU-CASE ,LOAD HARDWARE MMU-TABLE * V | 0 P* AND MMTAB WITH MMU-TABLE FROM TTAB * V 0 P*
0x1efa14…1efba8 Dummy {f00=0x0096, f01=0x0190, f02=» APPL.TYPE 0,1,2,3... * V 0 P* CONSTA=START OF CONF.DATA * W $ 0 P* * W X 0 P* OUTPUT: A1=ADDRESS TO FIRST ENTRY IN * W 0 P* APLTAB-BLOCK * W 0 P* A2=BLOCK T
0x1efba8…1efd3c Dummy {f00=0x0096, f01=0x0190, f02=»* APPLICATION * W 0 P* APPLNO=APPLNO+1 IF APPLICATION * X 4 0 P* IS FOUND * X h 0 P* ELSE APPLNO IS UNCHANGED * X 0 P* CONSTA=START OF CONF.DATA * X 0 P*
0x1efd3c…1efed0 Dummy {f00=0x0096, f01=0x0190, f02=» * X l 0 P* WORK REGISTERS : A1-A4,A11 * Y 0 P* * Y D 0 P******************************************** Y x PGETAPP EQU * Y . P* INITIATE REGISTERS AND INCREMENT APPLNO Y ( P LD A3,APLTAB+STKCOM A
0x1efed0…1f0064 Dummy {f00=0x0096, f01=0x0190, f02=»DK A2,0 CLEAR APPL.COUNTER OF Y P ALL APPL.TYPES Z & 8 P* FIND RIGHT APLTAB-BLOCK FOR SPECIFIED APPLICATION Z @ PGTA100 EQU * Z | ( P ADK A2,1 INCREMENT APPL.COUNTER OF Z P ALL APPL.TYPES Z 0 P CW* A2,APLTAB+STKCOM ANY APPLICATION LEFT? Z
0x1f0064…1f01f8 Dummy {f00=0x0096, f01=0x0190, f02=»P,A3 RIGHT APPL.TYPE? Z P RF(E) GTA200 YES! [ . P ADK A3,ACBLEN UPDATE APLTAB-BLOCK ADDRESS [ 8 & P RB GTA100 SHECK NEXT APLTAB-BLOCK [ j PGTA200 EQU * [ . P CW A4,APPLNO+STKCOM RIGHT APPL.NUMBER OF [ P CURRENT APPL.TYPE? [ P RF(E) GTA300 YE
0x1f01f8…1f038c Dummy {f00=0x0096, f01=0x0190, f02=»GTA100 SHECK NEXT APLTAB-BLOCK [ PGTA300 EQU * & P IFT MMUPAG=1 : . P* GET MMU-TABLE FROM TTAB OF CURRENT TASK P 6 P LD* A4,APLMMC,A3 GET TCTAB-ENTRY FOR CURRENT TASK 4 P ADKL A4,TTB:MT ADDRESS TO 1:ST MMU-TABLE ENTRY P IN TTAB P T
0x1f038c…1f0520 Dummy {f00=0x0096, f01=0x0190, f02=»N ^ $ P LDK A4,0 CLEAR APPL.COUNTER OF ] P ALL APPL.TYPES ] 2 , P LDR A1,A3 LOAD APLTAB-BLOCK ADDRESS TO ] L P OUTPUT REGISTER ] | 0 P LD A11,CONSTA+STKCOM GET START OF CONF.DATA ] ( P ADK A4,1 INCREMENT APPL.COUNTER OF ] P ALL APPL.TYPES
0x1f0520…1f06b4 (1, 311) Dummy {f00=0x0096, f01=0x0190, f02=» A3,A11 GET CHAR. FROM CONF.DATA ] , P ADKL A11,1 INCREMENT CONF.DATA POINTER ^ ( * P CCK A3,/FFFF IS CONF.DATA CHAR. /FF? ^ X P RB(NE) GTA400 NO! ^ ( P ADK A4,1 INCREMENT APPL.COUNTER OF ^ P ALL APL.TYPES ^ $ P CWR A2,A4 RIGHT APPL.NUMBER OF ^
0x1f06b4…1f0848 Dummy {f00=0x0096, f01=0x018e, f02=» TO PSW OF THIS ^ x ( P* SUBRUTIN,AND RETURN FROM SUBRUTIN _ PGTA800 EQU * _ D . P IM APPLNO+STKCOM INCREMENT APPL.NUMBER OF _ X P CURRENT APPL.TYPE _ P LDK A2,0 CLEAR REGISTER _ ( P LCR A2,A11 GET CHAR FROM CONF.DATA _ 0 P LDK A4,1 MAKE COND.RE
0x1f0848…1f09dc Dummy {f00=0x0096, f01=0x0190, f02=» P ` P ` 6 P** C O N V R T ** ` 6 P** ** ` V 6 P** ** ` 6 P** CONVERSION OF TWO ASCII-DIGITS TO BINARY ** ` 6 P**
0x1f09dc…1f0b70 Dummy {f00=0x0096, f01=0x0190, f02=»SULT ** ` x 6 P** WORK.REGS: A3,A2 ** a " 6 P************************************************** a P a PCONVRT EQU * a P LDK A1,0 CLEAR RESULT REG a P LDR A3,A5 a P SRL A3,8 GET TEN'S a P S
0x1f0b70…1f0d04 Dummy {f00=0x0096, f01=0x0190, f02=»3,A5 a P ANK A3,/F GET ONE'S b P ADR A1,A3 b ( P RTN A14 b : P EJECT b J P b X 6 P** N X T B L K ** b ` 6 P** ** b 6 P** ** b
0x1f0d04…1f0e98 Dummy {f00=0x0096, f01=0x0190, f02=»=ADDRESS TO CURRENT BLOCK-START ** b 6 P** OUTPUT:A11=ADDRESS TO NEXT BLOCK ** c , 6 P** A2=BLOCK TYPE (T,C,U) IN RIGTH BYTE ** c f 6 P** WORKREGS: A1,A3-A5 ** c 6 P**********************************************
0x1f0e98…1f102c Dummy {f00=0x0096, f01=0x0190, f02=»N-BLOCK c j P LCR A5,A11 d P SLL A5,8 d $ P LC A5,1,A11 d 6 P CALL CONVRT d J P LDK A2,TDBREC d ^ P LDR A3,A1 d t P CALL MULT d P ADR A11,A3 d P ADKL A11,2 d 0 P LCR A5,A11 GET NUMBER OF SPEC, DEV. CLASSES d P SLL A5,8 d P L
0x1f102c…1f11c0 Dummy {f00=0x0096, f01=0x0190, f02=»1=NEXT BLOCK d P ADKL A11,2 e $ P LC A2,TDBBT,A11 GET BLOCK TYPE e ( P RTN A14 e P P EJECT e ` P e n P e z 8 P** G E T N U M ** e 8 P** ** e 8 P**
0x1f11c0…1f1354 (1, 312) Dummy {f00=0x0096, f01=0x018e, f02=» ** e v 8 P** INPUT : A6=ADDRESS TO FIRST ASCII-CHARACTER ** f " 8 P** OUTPUT: A5=BINARY VALUE ** f ^ 8 P** WORK.REGS: A2,A4 ** f 8 P**************************************************
0x1f1354…1f14e8 Dummy {f00=0x0096, f01=0x0190, f02=» f x PGET030 ADK A6,1 NEXT DIGIT g P LCR A2,A6 GET CHAR g * P ANK A2,/F g F PGET050 SUK A2,1 g X " P RF(N) GET100 THIS DIGIT READY g p P ADR A5,A4 ACCUMULATE g P RB GET050 g , PGET100 SUK A4,90 NEXT INCREMENT (TEN'S) g P RB(P) GET030 g
0x1f14e8…1f167c Dummy {f00=0x0096, f01=0x0190, f02=» Q U E J O B ** g 8 P** ** h 2 8 P** ** h n 8 P** QUEUE TASK VIA 'ACTOT' AND SWITCH TO LEVEL ** h 8 P** 0, ENB.
0x1f167c…1f1810 Dummy {f00=0x0096, f01=0x0190, f02=»AB-ADDRESS ** h 8 P*************************************************** i , P i h PQUEJOB EQU * i p P* QUEUE THIS TASK (THIS TID) i P i 0 P LDKL A3,RETUR GET RETURN (FROM A15) ADDRESS i P ADR A3,A13 RELOCATE i P STR A3,
0x1f1810…1f19a4 Dummy {f00=0x0096, f01=0x0190, f02=»0 CLEAR ABORT INDICATOR i P IFT MMUPAG=0 j , P LD A4,WATLEN,A12 NUMBER OF WAT-ELEMENTS j 6 P ADK A4,2 j f P ANKL A4,/FFFE j x P ADK A4,DWBFST+4 j 8 P ADR A4,A12 ADD T:A-ADDRESS => START OF START-POINTS j & P LDR* A6,A4 NUMBER OF START POINTS j
0x1f19a4…1f1b38 Dummy {f00=0x0096, f01=0x0190, f02=»ER j x P XIF k P IFT MMUPAG=1 k , P EL A4,WATLEN,A12 NUMBER OF WAT-ELEMENTS k , P ADK A4,2 k P ANKL A4,/FFFE k n P ADK A4,DWBFST+4 k 8 P ADR A4,A12 ADD T:A-ADDRESS => START OF START-POINTS k & P ELR A6,A4 NUMBER OF START-POINTS k . PGETT30
0x1f1b38…1f1ccc Dummy {f00=0x0096, f01=0x0190, f02=» XIF k P CF A15,ACTOT l $ P ADK A4,STPREC NEXT START-POINT l " P RB GETT30 l J $ PGETT40 ABL RETUR8 RELOAD 8 REGS l PRETUR EQU *-REL l P RTN A14 l P EJECT l P l 4 P** M O V M M T ** l 4 P**
0x1f1ccc…1f1e60 Dummy {f00=0x0096, f01=0x0190, f02=» ** l j 4 P** ** m 4 P** INPUT :A2=TTAB-ADDRESS ** m J 4 P** MMTAB HOLDS TABLE TO MOVE ** m 4 P** OUTPUT:A2=START OF MM-TABLE IN TTAB ** m 4 P** A9=TTAB AD
0x1f1e60…1f1ff4 (1, 313) Dummy {f00=0x0096, f01=0x0190, f02=»* m b P n PMOVMMT EQU * n P IFT MMUPAG=1 n & ( P ADKL A2,MMBEG GET TO-TABLE ADDRESS n < " P TL MMTAB,A13 LOAD FROM-TABLE n h P TSR A2 MOVE n P LDR A3,A2 n ( P CALL MMENT FILL LAST ENTRY ADDRESS n $ P TL* MMFROM+STKCOM RELOAD TABLE n P
0x1f1ff4…1f2188 Dummy {f00=0x0096, f01=0x0190, f02=»NITIATE DYNAMIC CORE FOR COBOL n P* o & " P LD A2,SCTOPT GET OPTION WORD o 0 " P ANKL A2,/2000 ANY COBOL APPL? o V P RF(Z) PBSEND NO! o | . P LD A8,DYNSTA+STKCOM GET START OF DYNTAB:S o & P LDR* A2,A8 GET NUMBER OF DYNTAB:S o ( P ADKL A8,2 INCREMENT D
0x1f2188…1f231c Dummy {f00=0x0096, f01=0x0190, f02=»POINTER o t P LDR* A7,A8 GET SPL-PBS ADR p P LDR A6,A13 p 4 * P ADKL A6,PBSTAB CONSTANT-TABLE ADDRESS p H P SUK A3,2 END OF DYNTAB p v P RF(Z) INDY50 YES! p PINDY20 EQU * p $ P LDR* A5,A6 GET NUMBER OF COPIES p P CWK A5,/FFFF END OF TABLE?
0x1f231c…1f24b0 Dummy {f00=0x0096, f01=0x0190, f02=»EMENT NBR.OF COPIES p . P RB(N) INDY20 ALL DONE FOR THIS CHARACTER q * P STR A4,A7 STORE CHARACTER IN SPL-PBS q N " P ADK A7,2 STEP SPL-PBS POINTER q | P RB INDY30 NEXT WORD q PINDY40 EQU * q P LDR* A4,A8 SPL-PBS ADR q P LDKL A5,STKMAX STACK-
0x1f24b0…1f2644 Dummy {f00=0x0096, f01=0x0190, f02=» P LDR A6,A4 SPL-PBS ADDR r & P ADK A6,SPLSTA POINT AT STACK AREA r $ P ADR A5,A6 +STACK AREA ADDR r N 0 P ST A5,SPLSTB,A4 STORE IN SPL-PBS STACK-BASE r r P RB INDY10 r PINDY50 EQU * r P SUK A2,1 ANY DYNTAB:S LEFT? r P RB(NZ) INDY05 YES! r
0x1f2644…1f27d8 Dummy {f00=0x0096, f01=0x0190, f02=» ** r j 6 P** EACH WORD IN THIS TABLE CONSISTS OF: ** s 6 P** WORD1=COUNTER,NBR OF COPIES OF NEXT WORD ** s N 6 P** WORD2=WORD ** s 6 P** ** s 6 P** BYTE1 (C
0x1f27d8…1f296c Dummy {f00=0x0096, f01=0x0190, f02=»****************** s p PPBSTAB EQU *-REL t P DATA 1 TERMINATION-CODE t 2 P DATA 0 t R P DATA 1 STACK-USED t b P DATA /6 t | P DATA 1 STACK-SIZE t P DATA 0 t P DATA 3 PROCEDURE-NAME t P DATA /2020 t & P DATA 20 PGM-DATA UNTIL STACK-BA
0x1f296c…1f2b00 Dummy {f00=0x0096, f01=0x0190, f02=»ORK-AREA t v P DATA 0 u & P DATA /FFFF E N D O F T A B L E u PPBSEND EQU * u J P XIF u ^ P IFF MMUPAG+DSKPAG=0 u j P* u 4 P* RESERVE PAGES IN MEMORY AND BUILD PAGE TABLE u P* u PPAGGEN EQU * u P LDKL A2,PAGEX EXIT ADDRESS u
0x1f2b00…1f2c94 (1, 314) Dummy {f00=0x0097, f01=0x0190, f02=»ORD u v P ANK A1,3 PAGING? v P ABR(Z) A2 NO! v & P* v < L P* RESERV SPACE FOR PAGE BLOCKS CORRESPONDING TO CORE RESIDENT SEGMENTS v F P* v * P LD A11,SCTSFA GET START OF FREE AREA v " P ST A11,SCTPAG STORE IN SYSTAB v $ P LDR A8,A13 GET RELO
0x1f2c94…1f2e28 Dummy {f00=0x0097, f01=0x0190, f02=»P EQUAL TO NUMBER OF PAGES? v P RF(E) PAG:30 YES! w $ $ P LDK A1,0 RESET NUMBER OF WORDS w > PPAG:20 EQU * w f " P ADKL A11,2 INCLUDE NEXT WORD w z 0 P RF(Z) MEMOFL MEMORY OVERFLOW (64 KB LIMIT) w $ P ADK A1,1 INCREMENT WORD COUNTER w P CWK A1,4 4
0x1f2e28…1f2fbc Dummy {f00=0x0097, f01=0x0190, f02=»PAG:20 w 0 PPAG:25 ADK A7,1 INCREMENT PAGE BLOCK COUNTER x P RB PAG:10 x B PPAG:30 EQU * x T P* x h 4 P* RESERV MEMORY PAGES IN UNUSED PART OF MEMORY x r 6 P* AND EXTEND PAGE TABLE WITH CORRESPONDING NUMBER x P* OF PAGE BLOCKS. x P* x P
0x1f2fbc…1f3150 Dummy {f00=0x0097, f01=0x0190, f02=»NKL A2,/FFF GET DISPLACEMENT x & P SRL A2,2 SKIP TWO RIGHTMOST BITS y $ , P ORR A1,A2 16 BITS PHYSICAL PAGE ADDRESS y N P LDR A3,A1 SAVE y ~ P LD A2,SCTPSZ GET PAGE SIZE y & P SRL A2,2 SKIP TWO RIGHTMOST BITS y P LDR A10,A2 SAVE y 0 P ANKL A1,/FC
0x1f3150…1f32e4 Dummy {f00=0x0097, f01=0x0190, f02=»PAGE ADDRESS LIMIT y ~ P XIF z P IFT DSKPAG-MMUPAG=1 z & 2 P LD A1,LSTADR+STKCOM GET PHYSICAL LAST ADDRESS z B P LD A10,SCTPSZ PAGE SIZE z x P XIF z P IFF MMUPAG+DSKPAG=0 z P LDR A9,A1 INIT PAGE ADDRESS z P LDR A6,A9 SAVE z PPAG:31 EQU *
0x1f32e4…1f3478 Dummy {f00=0x0097, f01=0x0190, f02=»PAG:32 CWR A6,A10 z PPAG:33 RF(NG) PAG:40 { , P SUR A6,A10 COMPUTE ADDRESS TO NEXT PAGE { 6 P LDR A1,A6 GET PAGE ADDRESS { f P IFT MMUPAG=1 { * P ANKL A1,/C000 ADDRESS IN SYSTEM AREA? { P RF(NZ) PAG:34 NO! { . P LDR A1,A6 PHYSICAL ADDRESS IN
0x1f3478…1f360c Dummy {f00=0x0097, f01=0x0190, f02=» P IFF MMUPAG+DSKPAG=0 | & PPAG:36 LDK A2,0 RESET WORD COUNTER | . PPAG:38 CWR A11,A8 CHECK PROGRAM OVERWRITE | J * P RF(E) PAG:40 NO MORE MEMORY AVALIABLE | | $ P ADKL A11,2 INCR. PAGBLK POINTER | $ P ADK A2,1 INCREMENT WORD COUNTER | P CWK A2,4 BLOC
0x1f360c…1f37a0 Dummy {f00=0x0097, f01=0x0190, f02=»T CHECK | z P RF(NN) PAG382 } P CWR A11,A1 } & P RF PAG384 } : PPAG382 CWR A1,A11 } L . PPAG384 RB(G) PAG:38 MORE MEMORY AVALIABLE } f PPAG:40 EQU * } " P ADK A7,0 ANY PAGES RESERVED? } P RF(Z) MEMOFL NO! } 6 P CW A7,SCTNOP ONLY PAGES FOR
0x1f37a0…1f3934 (1, 315) Dummy {f00=0x0097, f01=0x0190, f02=»AG:50 YES! } PMEMOFL LDKL A1,LMP3 ~ * P OTR A1,0,SOP INDICATE MEMORY OVERFLOW ~ . P HLT HALT PROGRAM ~ : PPAG:45 CW A7,STKCOM+TOTSGM ONE PAGE/SEGMENT ALLOCATED? ~ v , P CW A7,STKCOM+TOTSGM MORE PAGES WANTED? ~ P RF(E) PAG:50 YES! ~ $ P ADK A7,1
0x1f3934…1f3ac8 Dummy {f00=0x0097, f01=0x0190, f02=»ES ~ p ( P LDR A1,A9 GET ADDRESS TO FIRST PAGE P LDR A2,A1 SAVE 6 P IFT MMUPAG=1 N * P SRL A1,14 BIT 0-1 OF 18-BITS ADDRESS d P ST A1,SCTEFA SAVE . P SLL A2,2 GET BITS 2-15 OF 18-BITS ADDRESS P XIF P IFF MMUPAG+DSKPAG=0 P S
0x1f3ac8…1f3c5c Dummy {f00=0x0097, f01=0x0190, f02=»APLTAB GET START OF ACB:S * P LDR* A4,A7 GET NUMBER OF APPLICATIONS " . PINI10 LD* A3,APLMMC+2,A7 GET TTAB ADDRESS P P IFF MMUPAG+DSKPAG=0 0 P LD A11,TTB:SP,A3 GET SEGMENT TABLE ADDRESS " P RF(Z) INI40 NO SEGMENT TABLE , P LD A6,SEG:NS,A1
0x1f3c5c…1f3df0 Dummy {f00=0x0097, f01=0x0190, f02=»4K PAGE l & P SRL A1,2 SKIP TWO RIGHTMOST BITS : P OR A1,APLSEG+2,A7 MERGE WITH PHYSICL 4K PAGE ADDRESS : P XIF x P IFT DSKPAG-MMUPAG=1 4 P LD A1,APLSEG+2,A7 GET PHYSICAL 4K PAGE ADDRESS P SLL A1,2 MULTIPLY BY 4 6 P OR A1,APLNPE+2,
0x1f3df0…1f3f84 Dummy {f00=0x0097, f01=0x0190, f02=» FOR CORE RESIDENT SEGMENTS x 8 P* AND STORE PAGE BLOCK ADDRESSES IN SEGMENT BLOCKS $ P* ` " P ADKL A11,8 NEXT SEGMENT BLOCK j P LDR* A2,A11 GET STATUS , P RF(NN) INI30 SEGMENT NOT LOADED IN CORE * P ST A12,6,A11 STORE PAGE BLOCK ADDRESS
0x1f3f84…1f4118 Dummy {f00=0x0097, f01=0x0190, f02=» ST A11,6,A12 STORE SEGMENT BLOCK ADDRESS * P LD A2,APLPSZ+2,A7 GET SEGMENT SIZE =1 2 P XIF =2 ` P IFT MMUPAG=1 =2 r P SRL A2,2 =1 P XIF =2 P IFF MMUPAG+DSKPAG=0 =2 & P ADR A1,A2 ADDRESS TO NEXT PAGE =1 P ADKL A12,
0x1f4118…1f42ac Dummy {f00=0x0097, f01=0x0190, f02=»PAG+DSKPAG=0 P* 0 P* SAVE START OF DYNTAB:S IN SYSINI (STADYN) , P* BEFORE ENABLE IS SET BECAUSE INTERUPT R & P* CAN DESTROY DYNSTA IN A15-STACK P* . P LD A1,DYNSTA+STKCOM GET START OF DYNTAB:S . P ST A1,SAVDYN,A13 SAVE IN SYSINI
0x1f42ac…1f4440 Dummy {f00=0x0097, f01=0x0190, f02=»* , P LD A1,APLMMP+2,A7 GET APPLICATION TYPE ( P CWK A1,'AS' ASSEMBLER APPLICATION? : P RF(NE) INI50 NO f P* ~ " P* SWITCH TO LEVEL 0 & ENABLE P* " P LDKL A1,INI45 RETURN ADDRESS P ADR A1,A13 RELOCATE P STR A1,A15 ST
0x1f4440…1f45d4 (1, 316) Dummy {f00=0x0097, f01=0x0190, f02=»APLMMC+2,A7 GET TTAB ADDRESS ( P LD A2,APLSTA+2,A7 GET START ADDRESS $ P AD A2,APLREL+2,A7 RELOCATE P P LDK A3,0 SEGMENT NUMBER t P CF A15,ACTOT QUEUE TASK P EJECT PINI50 EQU * P IFT MMUPAG=1 0 P LD A1,APLLAP+2,A7 GET LOGIC
0x1f45d4…1f4768 Dummy {f00=0x0097, f01=0x0190, f02=»M APLMMP+2,A7 CLEAR DISPL. TO PAGE ENTRY P IFT MMUPAG=1 0 P RF INI60 F PINI55 EQU * X P SRL A1,12 PAGE ENTRY NUMBER l $ P LDK A2,16 NUMBER OF MMU ENTRIES & P SUR A2,A1 NUMBER OF PAGE ENTRIES P ST A2,APLNPE+2,A7 SAVE P SLL A
0x1f4768…1f48fc Dummy {f00=0x0097, f01=0x018e, f02=»LOGICAL ADDR. TO COMMON PART t P SRL A1,11 ENTRY NUMBER $ P ANK A1,/1E 2*ENTRY NUMBER D 4 P ADKL A1,TTB:MT DISPL TO FIRST COMMON PART ENTRY f P ST A1,APLMMC+2,A7 SAVE P XIF P ADK A7,ACBLEN NEXT ACB P SUK A4,1 MORE APPLICATIONS?
0x1f48fc…1f4a90 Dummy {f00=0x0097, f01=0x0190, f02=» P LDR A12,A12 ANY PAGES? P RF(Z) INI90 NO! ( $ P CW A12,SCTSFA ANY FREE BLOCKS? @ P RF(E) INI90 NO! h 4 P ST A12,PAGQUE POINTER TO FIRST FREE PAGE BLOCK & P LDKL A11,PAGQUE POINTER TO PAGQUE 0 P LDR A1,A12 SAVE ADDRESS TO FIRST PAGE
0x1f4a90…1f4c24 Dummy {f00=0x0097, f01=0x0190, f02=»NDICATE PAGE FREE & P ADK A1,8 ADDRESS NEXT PAGE BLOCK " P CW A1,SCTSFA LAST PAGE BLOCK? D P RF(E) INI80 YES! j , P LDR A11,A12 SAVE ADDRESS TO PAGE BLOCK & P STR A1,A12 STORE FORWARD POINTER P LDR A12,A1 NEXT PAGE BLOCK P ADR A
0x1f4c24…1f4db8 Dummy {f00=0x0097, f01=0x0190, f02=» p & P ST A12,PAGQUE+2 STORE IN PAGQUE+2 PINI90 EQU * 2 P EJECT F P XIF T P ` P h P* START BUGGER (IF ANY) p P P P* GET APPLICATION START , P LD A14,STKCOM+APLTAB GET START OF ACB:S , P LD A14,APLREL+2,A14 GET
0x1f4db8…1f4f4c Dummy {f00=0x0097, f01=0x0190, f02=»A1,SCTBUG GET BUGGER ADDRESS P ABR(NZ) A1 $ P 8 PINI100 EQU *-REL @ P LDR A13,P X PINI110 EQU *-REL j 0 P SUKL A13,INI110 RESTORE PROGRAM BASE OINTER P* P* INIT A15 STACK P* P LD A15,SCTSTB P SUKL A15,4
0x1f4f4c…1f50e0 Dummy {f00=0x0097, f01=0x0190, f02=»A1,IHRTCO LOAD TEMPORARY INTERRUPT ADDRESS P ADR A1,A13 RELOCATE 2 * P ST A1,IHRTC STORE IN INTERRUPT VECTOR N & P CF A15,PFINIT INITIALIZE DEVICES | P CF A15,SAVE8 SAVE REGISTERS $ P CF A15,SWL48 SWITCH TO LEVEL 48 P* F P* WAIT APPR
0x1f50e0…1f5274 (1, 317) Dummy {f00=0x0097, f01=0x018e, f02=»1,1 P RB(NZ) DELAY P INH " ( P LDKL A1,0 GET RTC INTERRUPT ADDRESS . PSAVRTC EQU *-REL-2 Z P ST A1,IHRTC RESTORE t $ P LDR A1,A13 GET START OF SYSINI . P ADKL A1,INISTA START OF INIT. INSTR. SEQ. . P ADKL A13,INILEN END OF INIT.
0x1f5274…1f5408 Dummy {f00=0x0097, f01=0x0190, f02=» p $ P ADK A1,2 INCREMENT FROM-ADDRESS " P ADK A2,2 INCREMENT TO-ADDRESS 0 P CWR A1,A13 ALL WORDS MOVED? V P ABL(E) STKEND YES z P RB INI150 P* * P* TEMPORARY INTERRUPT ROUTINE FOR RTC P* PIHRTCO EQU *-REL P RIT RTC
0x1f5408…1f559c Dummy {f00=0x0097, f01=0x0190, f02=»LICATIONS AND BRANCH TO DISPATCHER P* * PINDY00 EQU * 4 " P LD A2,SCTOPT GET OPTION WORD H " P ANKL A2,/2000 ANY COBOL APPL? n P RF(Z) PBSEND NO! P LDKL A2,STKEND * P LD A8,STADYN,A2 GET START OF DYNTAB:S ( P RF(Z) PBSEND NO COB
0x1f559c…1f5730 Dummy {f00=0x0097, f01=0x0190, f02=»A3,A8 GET DYNTAB LENGTH (BYTES) PINDY10 EQU * ( ( P ADKL A8,2 INCREMENT DYNTAB POINTER < P LDR* A7,A8 GET SPL-PBS ADR h , P LDKL A6,STKEND START OF INIT.INSTR.SEQ. * P ADKL A6,PBSTAB CONSTANT-TABLE ADDRESS P SUK A3,2 END OF DYNTAB
0x1f5730…1f58c4 Dummy {f00=0x0097, f01=0x0190, f02=»0 YES! P LD A4,2,A6 GET WORD TO COPY P ADK A6,4 ADJUST PBSTAB 2 PINDY30 EQU * R & P SUK A5,1 DECREMENT NBR.OF COPIES f . P RB(N) INDY20 ALL DONE FOR THIS CHARACTER * P STR A4,A7 STORE CHARACTER IN SPL-PBS " P ADK A7,2 STEP SPL-PBS P
0x1f58c4…1f5a58 Dummy {f00=0x0097, f01=0x018e, f02=»PLSTS,A4 STORE IN SPL-PBS ( P LDKL A7,ENTFIN ENTRY-FINI (ADDRESS) " & P ST A7,SPLENT,A4 STORE IN SPL-PBS N P LDR A6,A4 SPL-PBS ADDR x & P ADK A6,SPLSTA POINT AT STACK AREA P ADR A5,A6 +STACK AREA ADDR 0 P ST A5,SPLSTB,A4 STORE IN SPL-PBS
0x1f5a58…1f5bec Dummy {f00=0x0097, f01=0x0190, f02=» PSAVDYN EQU *-REL PSTADYN EQU *-INDY00 P DATA 0 SAVE AREA FOR DYNSTA < P EJECT ` 6 P************************************************** n 6 P** ** 6 P** EACH WORD IN THIS TABLE CONSISTS O
0x1f5bec…1f5d80 Dummy {f00=0x0097, f01=0x0190, f02=»** ** 6 P** BYTE1 (COUNTER)=/FF MEANS END OF TABLE ** : 6 P** ** t 6 P************************************************** PPBSTAB EQU *-INDY00 P DAT
0x1f5d80…1f5f14 (1, 318) Dummy {f00=0x0098, f01=0x018e, f02=»PROCEDURE-NAME P DATA /2020 & P DATA 20 PGM-DATA UNTIL STACK-BASE * P DATA 0 T P DATA 1 STACK-BASE d P DATA 0 ~ P DATA 1 ENTRY-FINI P DATA 0 & P DATA 16 LAST-TS,RUNTIME-WORK-AREA P DATA 0 & P DATA /FFFF E N D O F
0x1f5f14…1f60a8 Dummy {f00=0x0098, f01=0x400c, f02=» @ ME P DATA /2020 & P DATA 20 PGM-DATA UNTIL STACK-BASE * P DATA 0 T P DATA 1 STACK-BASE d P DATA 0 ~ P DATA 1 ENTRY-FINI P DATA 0 & P DATA 16 LAST-TS,RUNTIME-WORK-AREA P DATA 0 & P DATA /FFFF E N D O F
0x1f60a8…1f623c Dummy {f00=0x0098, f01=0x2008, f02=» -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
0x1f623c…1f63d0 Dummy {f00=0x0098, f01=0x0190, f02=»MON DATA AREA. PROCESS CWB'S & UWB'S. ! v F P* ! -MOVE D.T. AND W.B., COPY UWB'S ACCORDING TO ! 0 F P* ! SHADOW-TABLE. ! z F P* ! !
0x1f63d0…1f6564 Dummy {f00=0x0098, f01=0x0190, f02=», UWB'S ! X F P* ! AND DWB'S. ! F P* ! -BUILD MM-TABLE ! F P* ! -MOVE T:D ! F P* ! -MOVE D.T.
0x1f6564…1f66f8 Dummy {f00=0x0098, f01=0x0190, f02=» -SEARCH DBLK-TAB FOR DWB'S. MOVE D.T. AND UPDATE ! F P* ! W.B.-ADDRESS ! > F P* ! ! F P* ! P R O D A T
0x1f66f8…1f688c Dummy {f00=0x0098, f01=0x018e, f02=»FOR SWB'S ! f F P* ! -ALLOCATE FIXED BUFFERS AND TERMINAL STACK ! F P* ! -MOVE T:A ! j F P* ! -INCLUDE DDIV-PROTOTYPE IN FREE AREA. ! F P*
0x1f688c…1f6a20 Dummy {f00=0x0098, f01=0x0190, f02=» P P* ! R E A L T A ! PART 2.B F P* ! BUILD REAL TASK-LOCAL DATA AREAS ! X F P* ! -FILL MM-TABLE IN TTAB ! F P* ! -COPY T:A'S AC
0x1f6a20…1f6bb4 (1, 319) Opaque[0x194]
0x1f6bb4…1f6d48 # DirEnt {nam=»DSKSUB«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1308, f03=0x0000}
0x1f6bb4…1f6d48 IdxSect {
0x1f6bb4…1f6d48 f00 = 0x0098 // 0x1f6bb4 @0x0
0x1f6bb4…1f6d48 f01 = 0x000a // 0x1f6bb6 @0x2
0x1f6bb4…1f6d48 gno = [ // 0x1f6bb8 @0x4
0x1f6bb4…1f6d48 [0x00]: C0x0098.0x1.0
0x1f6bb4…1f6d48 [0x01]: C0x0098.0x2.0
0x1f6bb4…1f6d48 [0x02]: C0x0098.0x3.0
0x1f6bb4…1f6d48 [0x03]: C0x0099.0x0.0
0x1f6bb4…1f6d48 [0x04]: C0x0099.0x1.0
0x1f6bb4…1f6d48 ]
0x1f6bb4…1f6d48 }
0x1f6d48…1f6edc Dummy {f00=0x0098, f01=0x018e, f02=» 2 P IDENT DSKSUB REL 11.0 81-01-26 870105041100 P : " P =1, DM NVL BITS TAKEN AWAY B P PRR 11.0 80-11-19 CHLO h P* , P**************************************** P* , P* PHILIPS TERMINAL SYSTEM PTS * P* ,
0x1f6edc…1f7070 Dummy {f00=0x0098, f01=0x0190, f02=» P* P* ( P* DSKSUB HOLDS THE FOLLOWING DISC ( P* AND FILE MANAGEMENT SUBROUTINES: D P* p 4 P* - VOLCLR = CLEAR VOLUME NAME(S) IN DISC DWT z < P* - VOLNAM = MOVE VOLUME NAME FROM DWT TO USER BUFFER 6 P* - VOLADR = COMPUTE
0x1f7070…1f7204 Dummy {f00=0x0098, f01=0x0190, f02=»OM DISC BUFFER TO DWT n . P* - NEWVOL = SET NEW VOLUME LOADED BITS 6 P* - INXDWT = COMPUTE DWT ADDRESS + DOUBLE INDEX P 8 P* - NVLTAB = TTAB ADDRESSES FOR TASKS TO HAVE NVL P* P* P EJECT DSKSUB P* P* P****
0x1f7204…1f7398 Dummy {f00=0x0098, f01=0x0190, f02=»M MOVE VOLUME NAME FROM DWT TO USER BUFFER 4 P ENTRY VOLADR COMPUTE VOLUME NAME ADDRESS IN DWT 2 . P ENTRY NVLCHK CHECK FOR NEW VOLUME LOADED j : P ENTRY VOLGET MOVE VOLUME NAME FROM DISC BUFFER TO DWT , P ENTRY NEWVOL SET NEW VOLUME LOADED BITS 4
0x1f7398…1f752c Dummy {f00=0x0098, f01=0x0190, f02=»RY NVLEND END OF NVLTAB P ENTRY NVLBIT NVL BIT MASK P EJECT DSKSUB B P* X P* b P************* l P* EXTERNALS * P************* P* P* 4 P EXTRN IHRTN RETURN WITHOUT ENABLING INTERRUPTS P EXTRN TTABLD
0x1f752c…1f76c0 Dummy {f00=0x0098, f01=0x018e, f02=»DER l P EXTRN DWTOR INDEX AND ORDER P EXTRN DWTTAB TTAB ADDRESS 0 " P EXTRN DWTUEC USER ECB ADDRESS R P EXTRN DWTVOL VOLUME NAME x ( P EXTRN DWTNVL NEW VOLUME LOADED FLAG " P EXTRN EWTVOL VOLUME FILE CODE 2 P EXTRN FWTEW1 POINTER TO 2ND
0x1f76c0…1f7854 (1, 320) Dummy {f00=0x0098, f01=0x018e, f02=» & P EXTRN ECBRL ECB REQUESTED LENGTH & P EXTRN ECBEL ECB EFFECTIVE LENGTH . P EJECT DSKSUB X P* n P* x , P*************************************** P* P* CONDITIONAL ASSEMBLY P* , P************************************
0x1f7854…1f79e8 Dummy {f00=0x0098, f01=0x018e, f02=» PMMUPAG EQU 1 P* P* " 6 P* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION , . P* SET IS OBTAINED BY SETTING CPU852 EQU 0. f P* PCPU852 EQU 0 P* P* . P* A PROGRAM VERSION USING TOSS DISC PAGING * P* IS OBTAINE
0x1f79e8…1f7b7c Dummy {f00=0x0098, f01=0x0190, f02=» 2 P* BLOCKS IS OBTAINED BY SETTING SWPBLK EQU 1. P* > PSWPBLK EQU 0 H P* P EJECT DSKSUB f P* ~ P* 2 P* A PROGRAM VERSION SUPPORTING FILE MANAGEMENT * P* IS OBTAINED BY SETTING FILMAN EQU 1. P* PX:A EQU
0x1f7b7c…1f7d10 Dummy {f00=0x0098, f01=0x0190, f02=»N EQU 1. r P* PX:B EQU 0 PDATMAN EQU X:B , P* B P EJECT DSKSUB L P* d P* n P********** x P* VOLCLR * P********** P* P* 6 P* VOLCLR WILL CLEAR THE REQUESTED VOLUME NAME(S) " P* IN THE R
0x1f7d10…1f7ea4 Dummy {f00=0x0098, f01=0x0190, f02=»OUTPUT: A1, A2 ARE DESTROYED P* $ PVOLCLR EQU * . P LDR A2,A1 B & P CF A15,VOLADR VOLUME NAME ADDRESS T P* ~ PVCLR10 EQU * P CMR A1 CLEAR ONE WORD P ADK A1,2 INCREMENT POINTER $ P SUK A2,2 DECREMENT LOOP COUNTER P R
0x1f7ea4…1f8038 Dummy {f00=0x0098, f01=0x0190, f02=» P* P* : P* VOLNAM WILL MOVE THE VOLUME NAME OF SELECTED DISC 4 P* TO THE USER BUFFER IF REQUESTED LENGTH = 6. Z P* P* INPUT: A6 = DWT ADDRESS P* A8 = ECB ADDRESS P* $ P* OUTPUT: A1-A4 ARE DEST
0x1f8038…1f81cc Dummy {f00=0x0098, f01=0x0190, f02=»ED n * P CF A15,VOLADR GET DWT VOLUME ADDRESS ( P ST A4,ECBEL,A8 SET EFFECTIVE LENGTH 8 P* d P IFT MMUPAG=0 n ( P LD A2,ECBBA,A8 USER BUFFER ADDRESS P* P EJECT DSKSUB P* P* PVNAM10 EQU * P LDR* A3,A1 MO
0x1f81cc…1f8360 Dummy {f00=0x0098, f01=0x018e, f02=» P RB(P) VNAM10 P RF RETURN P XIF , P* 8 P IFT MMUPAG=1 B 2 P LD A2,DWTTAB,A6 TTAB ADDRESS OF CALLING TASK X P TS -30,A15 SAVE RUNNING MMU P TL TTB:MT,A2 LOAD USER MMU & P LD A2,DWTUEC,A6 USER ECB ADDRESS ( P EL A2,E
0x1f8360…1f84f4 (1, 321) Dummy {f00=0x0098, f01=0x018e, f02=» P* P EJECT DSKSUB P* $ P* . P********** 8 P* VOLADR * J P********** P* n P* x P* INPUT: A6 = DWT ADDRESS P* ( P* OUTPUT: A1 = VOLUME NAME ADDRESS P* A4 = 6 P* PVOLADR EQU *
0x1f84f4…1f8688 Dummy {f00=0x0098, f01=0x0190, f02=» PVOLA10 EQU * P ADK A1,6 UPDATE ADDRESS P SUK A4,1 8 P RB(NN) VOLA10 J P LDK A4,6 ` P RF RETURN r P* P EJECT DSKSUB P* P* P********** P* NVLCHK * P********** P* P* 8 P*
0x1f8688…1f881c Dummy {f00=0x0098, f01=0x0190, f02=»D TO THE CALLING TASK (RC=/20). | P* ( P* INPUT: A6 = DWT ADDRESS 2 P* V 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 E
0x1f881c…1f89b0 Dummy {f00=0x0098, f01=0x0190, f02=»DR A2,A6 P LD A1,DWTNVL,A2 NVL FLAG 2 P ANKL A1,/7FFF RESET BIT 0 (FIRST REQUEST BIT) 2 P ST A1,DWTNVL,A2 h , P ANKL A1,/3FFF NOT 1ST REQ. OR FIX DISK " P RF(Z) RETURN RETURN IF NO NVL " P LD A4,DWTTAB,A6 TTAB ADDRESS P LDK A1,1
0x1f89b0…1f8b44 Dummy {f00=0x0098, f01=0x0190, f02=»CK IF END OF TABLE REACHED ~ P RF(E) NVL:20 END OF NVLTAB " " P CWR* A4,A3 CHECK TTAB ADDRESS F $ P RF(E) NVL:20 NVL FOR THIS TASK l P SLL A1,1 SHIFT NVL BIT MASK * P ADK A3,2 POINT TO NEXT TTAB IN NVLTAB P RB NVL:10 P* PNVL:20
0x1f8b44…1f8cd8 Dummy {f00=0x0098, f01=0x0190, f02=»BIT t P LDK A1,/20 RETURN CODE P* , P EJECT DSKSUB 6 P* N P* X $ PRETURN EQU * COMMON RETURN LABEL b P IFT CPU852=1 2 P ABL IHRTN RETURN WITHOUT ENABLING INTERRUPTS P XIF P* P IFT CPU852=0 P RTN A
0x1f8cd8…1f8e6c Dummy {f00=0x0098, f01=0x0190, f02=» P* 6 P* VOLGET WILL READ VOLUME NAME FROM DISC BUFFER @ P* TO DISC DWT AND CHECK IF THERE IS A NEW VOLUME MOUNTED. H P* ( P* INPUT: A2 = DISC BUFFER ADDRESS 2 P* A3 = FILE CODE (FOR DRIVE WITH INDEX = 0) 0 P* BIT 0
0x1f8e6c…1f9000 Dummy {f00=0x0098, f01=0x0190, f02=» A1-A3, A7-A8 ARE DESTROYED P* , P* 6 PVOLGET EQU * @ * P CF A15,VOLADR DWT VOLUME NAME ADDRESS T P LDK A7,0 RESET NVL FLAG P* PVGET10 EQU * , P LDR* A8,A2 ONE WORD OF NEW VOLUME NAME , P CWR* A8,A1 COMPARE WITH
0x1f9000…1f9194 (1, 322) Dummy {f00=0x0099, f01=0x018e, f02=»SKSUB P* P* PVGET20 EQU * " ( P ADK A1,2 INCREMENT BUFFER POINTERS 6 P ADK A2,2 b $ P SUK A4,2 DECREMENT LOOP COUNTER t P RB(P) VGET10 P CF A15,INXDWT P ADK A7,0 CHECK NVL FLAG " P RB(Z) RETURN RETURN IF NO NVL
0x1f9194…1f9328 Dummy {f00=0x0099, f01=0x0190, f02=» j P LD A7,DWTNVL,A4 NVL FLAGS 2 P RB(N) RETURN NO REQUESTS SO FAR ON THIS DISC * P SLL A7,1 ` $ P RB(N) RETURN FIXED DISC, NO NVL r P* P EJECT DSKSUB P* P* P********** P* NEWVOL * P********** P*
0x1f9328…1f94bc Dummy {f00=0x0099, f01=0x0190, f02=» 6 P* THE NEW VOLUME LOADED FLAG IS THEN SET BY THIS 6 P* ROUTINE FOR THE CONCERNED FILE CODE AND FILES > 8 P* OPENED ON THAT VOLUME. TASKS REPRESENTED IN THE x 4 P* TABLE NVLTAB WILL GET RETURN CODE /20 AT THE ( P* NEXT REQUEST ON THAT FIL
0x1f94bc…1f9650 Dummy {f00=0x0099, f01=0x0190, f02=» A6 = DWT ADDRESS P* & P* OUTPUT: A3 = ACTUAL FILE CODE $ P* A1-A2 ARE DESTROYED N P* n PNEWVOL EQU * x 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,
0x1f9650…1f97e4 Dummy {f00=0x0099, f01=0x0190, f02=» P XIF P* P IFT FILMAN=1 * P LDKL A1,SCTFWT ADDRESS TO FWT POINTER 0 P* ^ > P* SET NEW VOLUME LOADED FOR ALL FILES ON CONCERNED VOLUME h P* PNEW:10 EQU * P LDR* A2,A1 NEXT FWT ADDRESS P RB(Z) RETURN NO MORE FWT:S
0x1f97e4…1f9978 Dummy {f00=0x0099, f01=0x0190, f02=»,A2 ADDRESS TO 2ND EWT BLOCK $ P CC A3,EWTVOL,A2 CHECK FILE CODE $ P RF(NE) NEW:30 L P LDKL A2,/8000 NVL BIT b 0 P ORS A2,FWTPAR,A1 INDICATE NEW VOLUME LOADED P RB NEW:10 P* PNEW:30 EQU * . P LDR* A2,A2 ADDRESS TO NEXT EWT STRU
0x1f9978…1f9b0c Dummy {f00=0x0099, f01=0x0190, f02=» DSKSUB P* P* P********** $ P* INXDWT * 6 P********** H P* Z P* d H P* INXDWT WILL COMPUTE THE DWT ADDRESS ADDED TO THE DOUBLED INDEX. n P* P* INPUT: A6 = DWT ADDRESS P* 0 P* OUTPUT: A4 = DWT A
0x1f9b0c…1f9ca0 Dummy {f00=0x0099, f01=0x0190, f02=» ANK A4,/3 P ADR A4,A4 DOUBLE INDEX P ADR A4,A6 2 P RB RETURN D P* V P EJECT DSKSUB ` P* x P* P********** P* NVLTAB * P********** P* P* 4 P* NVLTAB HOLDS THE TTAB ADDRESSES OF THE TASKS
0x1f9ca0…1f9e34 (1, 323) Dummy {f00=0x0099, f01=0x0190, f02=»WTNVL v PNVLTAB EQU * P IFT FILMAN=1 " $ P DATA TTABFM FMTASK TTAB 15 8 P* ` P IFF DSKPAG+SWPBLK=0 j $ P DATA TTABLD LDTASK TTAB 14 P XIF P* =1 P IFT FILMAN=1 PNVLEND EQU * P* PNVLBIT DAT
0x1f9e34…1f9fc8 Dummy {f00=0x0099, f01=0x413a, f02=» P DATA TTABLD LDTASK TTAB P* $ PNVLEND EQU * . P* B PNVLBIT DATA 3 NVL BIT MASK L P XIF n P* z P IFT FILMAN=0 P IFT DSKPAG+SWPBLK=0 P* PNVLEND EQU * P* PNVLBIT DATA 1 NVL BIT MASK P XIF
0x1f9fc8…1fa15c Dummy {f00=0x0099, f01=0x2008, f02=» NT DSKSUB PRR 10.1 79-08-09 CHLO END 2@ >
0x1fa15c…1fa2f0 Dummy {f00=0x0099, f01=0x0190, f02=» LDR* A4,A1 GET WORD p P STR A4,A2 STORE q P ADK A1,2 q 4 P ADK A2,2 q F P SUK A3,2 DEC LENGTH q X P RB(NN) MOVNXT q t P LDR A3,A9 SAVE q & P LDR A11,A2 GET START OF FREE AREA q ( P LD A9,SCTEFA+2 GET END OF FREE AREA q P CALL CMPADR q
0x1fa2f0…1fa484 Dummy {f00=0x0099, f01=0x018e, f02=» RESERVE 5 WORDS FOR DEBUGGER q P XIF r & P IFT MMUPAG=1 r 2 P CALL XMOVE r H & P* REMOVE DDIV ENTRIES IN MM-TABLE r P r " P LDR A3,A9 GET P:MTAB ADDRESS r , P SUK A3,10 RESERVE 5 WORDS FOR DEBUGGER r , P LDR A1,A3 GET P:MTAB ADDRESS-5WORDS
0x1fa484…1fa618 Dummy {f00=0x0099, f01=0x0190, f02=» r z , P ADR A1,A2 P:MTAB-5WORDS START ENTRY =3 s P LDKL A4,/FC00 s 8 PSYA206 CWR A1,A2 ALL? s N P RF(E) SYA207 YES! s l , P STR A4,A1 REPLACE ENTRY WITH PAGE ERROR s P SUK A1,2 s P RB SYA206 s PSYA207 EQU * s P* s P* CHANGE TABLE -
0x1fa618…1fa7ac Dummy {f00=0x0099, f01=0x0190, f02=» XIF s P ANKL A3,/FFFE EVEN ADDRESS t . P ST A3,LSTADR+STKCOM SAVE END OF FREE AREA t 0 P t b P t j P t r . P* RESERVE SPACE FOR REAL T:A- AND U:BTAB * t ~ P t P t P IFT MMUPAG=1 t ( P LDKL A3,MMTAB GET CURRENT MM-TABLE t P ADR A
0x1fa7ac…1fa940 Dummy {f00=0x0099, f01=0x0190, f02=» SAVE PHYSICALL PAGE t | * P LD A3,T:ANO,A10 GET LENGTH OF T:ATAB u P LDR A5,A3 SAVE u J * P CALL CALLMO RESERVE SPACE FOR T:ATAB u b & P TL* MMTO+STKCOM SET CORRECT TABLE u " P ESR A5,A2 STORE T:ATAB LENGTH u . P ST A2,T:ATNW,A10 SAVE NEW T:ATAB ADDRES
0x1fa940…1faad4 (1, 324) Opaque[0x194]
0x1faad4…1fac68 # DirEnt {nam=»DVTKB «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1330, f03=0x0000}
0x1faad4…1fac68 IdxSect {
0x1faad4…1fac68 f00 = 0x0099 // 0x1faad4 @0x0
0x1faad4…1fac68 f01 = 0x0002 // 0x1faad6 @0x2
0x1faad4…1fac68 gno = [ // 0x1faad8 @0x4
0x1faad4…1fac68 [0x00]: C0x0099.0x2.0
0x1faad4…1fac68 ]
0x1faad4…1fac68 }
0x1fac68…1fadfc Dummy {f00=0x0099, f01=0x0190, f02=» 0 P IDENT DVTKB REL 11.0 81-01-26 870105041100 P 8 P* @ " P* KEYBOARD DEVICE WORK TABLE J P* p P ENTRY DVTKB TABLE ENTRY z P EXTRN COD P EXTRN ECH P EXTRN KBAD4 PMMUPAG EQU 0 P* P* P* PDVTK
0x1fadfc…1faf90 Dummy {f00=0x0099, f01=0x0190, f02=»ATA DWTEND-DVTKB ORDER ( P DATA KBAD4 POINTER TO ADDRESS BLOCK P DATA 'KB' TTAB ADDRESS J " P DATA 0 WAIT/ACTIVE INDICATOR j P DATA 0 TERMINAL QUEUE P IFT MMUPAG=1 & P DATA 0 SAVE AREA USER ECB ADDRESS P DATA DEVECB MMU ECB ADDRE
0x1faf90…1fb124 Dummy {f00=0x0099, f01=0x018e, f02=»A FOR A5 P RES 4 DWT STACK P DATA 0 SAVE AREA FOR A7 ( P DATA 0 SAVE AREA FOR A8 H $ P DATA /2222 CHANNEL PARAMETER-2 h " P DATA 0 LINE DRIVER DEPENDENT " P DATA 0 LINE DRIVER DEPENDENT P DATA /3333 DEVICE STATUS P DATA ECH
0x1fb124…1fb2b8 Dummy {f00=0x0099, f01=0x4168, f02=» P DATA 0 TIMER , P DATA DWTSQ+DVTKB POINTER TO FIRST PLACE , P DATA DWTSQ+DVTKB POINTER TO LAST PLACE J PDWTSQ EQU *-DVTKB z P DATA 0,0,0,0,0,0,0,0 P DATA 0,0 P IFT MMUPAG=1 PDEVECB EQU * P DATA 0,0,0,0,0,0 P
0x1fb2b8…1fb44c Dummy {f00=0x0099, f01=0x2008, f02=» TRIPLE ZERO " DATA 0 POINTER TO FIRST PLACE " DATA 0 POINTER TO LAST PLACE B DWTSQ/EQU/*-DVTKB h RES 0 IFT MMUPAG=1 DATA 0 DATA 0 XIF DWTEND EQU * END @ PRESENT CONVERSI
0x1fb44c…1fb5e0 Dummy {f00=0x0099, 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
0x1fb5e0…1fb774 (1, 325) Opaque[0x194]
0x1fb774…1fb908 # DirEnt {nam=»DVTDI «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1338, f03=0x0000}
0x1fb774…1fb908 IdxSect {
0x1fb774…1fb908 f00 = 0x0099 // 0x1fb774 @0x0
0x1fb774…1fb908 f01 = 0x0002 // 0x1fb776 @0x2
0x1fb774…1fb908 gno = [ // 0x1fb778 @0x4
0x1fb774…1fb908 [0x00]: C0x0099.0x3.0
0x1fb774…1fb908 ]
0x1fb774…1fb908 }
0x1fb908…1fba9c Dummy {f00=0x0099, f01=0x018e, f02=» 0 P IDENT DVTDI REL 11.0 81-01-26 870105041100 P 8 P* @ . P* DEVICE WORK TABLE FOR DISPLAY INDICATOR J P* | P* & P ENTRY DVTDI DISPLAY INDICATOR 03 P* P* ( P EXTRN DIAD POINTER TO ADDRESS-BLOCK PMMUPAG EQU 0
0x1fba9c…1fbc30 Dummy {f00=0x0099, f01=0x018e, f02=» P DATA 0 ECB ADDRESS P DATA DWTEND-DVTDI ORDER ( P DATA DIAD POINTER TO ADDRESS-BLOCK @ P DATA 'DI' TTAB ADDRESS l P DATA 0 WAIT ACTIVATE P DATA 0 TERMINAL QUEUE IFT MMUPAG=1 & " DATA 0 SAVE AREA USER ECB ADDRESS
0x1fbc30…1fbdc4 Dummy {f00=0x0099, f01=0x018e, f02=» P DATA 0 SAVE AREA A5 =1 P RES 4 DWT STACK $ P DATA 0 SAVE AREA A7 =1 < P DATA 0 SAVE AREA A8 $ P DATA /2222 CHANNEL PARAMETER -2 x " P DATA 0 LINE DRIVER DEPENDENT " P DATA 0 LINE DRIVER DEPENDENT P DATA /3333 DEVICE STATUS
0x1fbdc4…1fbf58 Dummy {f00=0x0099, f01=0x4082, f02=» x P IFT MMUPAG=1 PDEVECB DATA 0,0,0,0,0,0 P XIF > PDWTEND EQU * J P* ^ P* h P END r@ ~2 CHANNEL PARAMETER -2 x " P DATA 0 LINE DRIVER DEPENDENT " P DATA 0 LINE DRIVER DEPENDENT P DATA /3333 DEVICE STATUS
0x1fbf58…1fc0ec Dummy {f00=0x0099, 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
0x1fc0ec…1fc280 Dummy {f00=0x0099, f01=0x0190, f02=» A1,A2 GET PRINTER STATUS $ P ANK A1,/25 TEST PRINTER STATUS " P RF(Z) WRJL70 NO ERRORS J " P ANK A1,1 TEST PRINTER STATUS j P RF(NZ) WRJL70 NOT OPERABLE " P ANK A2,4 TEST PRINTER STATUS P RF(NZ) WRJL80 REQUEST ERROR P LDKL A1,E
0x1fc280…1fc414 (1, 326) Opaque[0x194]
0x1fc414…1fc5a8 # DirEnt {nam=»DVTDY «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1340, f03=0x0000}
0x1fc414…1fc5a8 IdxSect {
0x1fc414…1fc5a8 f00 = 0x009a // 0x1fc414 @0x0
0x1fc414…1fc5a8 f01 = 0x0002 // 0x1fc416 @0x2
0x1fc414…1fc5a8 gno = [ // 0x1fc418 @0x4
0x1fc414…1fc5a8 [0x00]: C0x009a.0x0.0
0x1fc414…1fc5a8 ]
0x1fc414…1fc5a8 }
0x1fc5a8…1fc73c Dummy {f00=0x009a, f01=0x0190, f02=» 0 P IDENT DVTDY REL 11.0 81-01-26 870105041100 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
0x1fc73c…1fc8d0 Dummy {f00=0x009a, 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
0x1fc8d0…1fca64 Dummy {f00=0x009a, f01=0x0190, f02=»A FOR A5 P RES 4 DWT-STACK P DATA 0 SAVE AREA FOR A7 ( P DATA 0 SAVE AREA FOR A8 H $ P DATA /2222 CHANNEL PARAMETER 2 h $ P DATA 0 LINE DRIVER DEPENDENT 1 $ P DATA 0 LINE DRIVER DEPENDENT 2 P DATA /3333 DEVICE STATUS P DATA
0x1fca64…1fcbf8 Dummy {f00=0x009a, f01=0x407a, f02=»K v P IFT MMUPAG=1 PDEVECB DATA 0,0,0,0,0,0 P XIF @ PDWTEND EQU * L P* ` P END j@ vL PARAMETER 2 h $ P DATA 0 LINE DRIVER DEPENDENT 1 $ P DATA 0 LINE DRIVER DEPENDENT 2 P DATA /3333 DEVICE STATUS P DATA
0x1fcbf8…1fcd8c Dummy {f00=0x009a, 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
0x1fcd8c…1fcf20 Dummy {f00=0x009a, f01=0x0190, f02=» P* - PORDER EQU * - P CF A5,STABLK START OF BLOCK - " P RF(NZ) ERTP JMP IF ERROR - F * P LDK A2,RESET SEND RESET JUST IN CASE - h P CF A5,OUTPUT - P RF(NZ) ERTP JMP IF ERROR - P LDR A2,A3 - P RF OUT10 SEND PRINTER ORDER - P -
0x1fcf20…1fd0b4 (1, 327) Opaque[0x194]
0x1fd0b4…1fd248 # DirEnt {nam=»DVTG1 «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1348, f03=0x0000}
0x1fd0b4…1fd248 IdxSect {
0x1fd0b4…1fd248 f00 = 0x009a // 0x1fd0b4 @0x0
0x1fd0b4…1fd248 f01 = 0x0004 // 0x1fd0b6 @0x2
0x1fd0b4…1fd248 gno = [ // 0x1fd0b8 @0x4
0x1fd0b4…1fd248 [0x00]: C0x009a.0x1.0
0x1fd0b4…1fd248 [0x01]: C0x009a.0x2.0
0x1fd0b4…1fd248 ]
0x1fd0b4…1fd248 }
0x1fd248…1fd3dc Dummy {f00=0x009a, f01=0x0190, f02=» 0 P IDENT DVTG1 REL 11.0 81-01-26 870105041100 P 8 , P* DEVICE WORK TABLE FOR GENERAL PRINTER @ P* p P ENTRY DVTG1 TABLE ENTRY z P* P* * P EXTRN GPAD8 POINTER TO ADDRESS-BLOCK $ PMMUPAG EQU 0 MEM. MAN.UNIT COND. P*
0x1fd3dc…1fd570 Dummy {f00=0x009a, f01=0x0190, f02=»ECB ADDRESS P DATA DWTEND-DVTG1 ORDER ( P DATA GPAD8 POINTER TO ADDRESS BLOCK 4 P DATA 'GP' TTAB-ADDRESS ` $ P DATA 0 WAIT/ACTIVATE INDICATOR P DATA 0 TERMINAL QUEUE P IFT MMUPAG=1 & P DATA 0 SAVE AREA USER ECB ADDRESS P D
0x1fd570…1fd704 Dummy {f00=0x009a, f01=0x0190, f02=»0,0,0 STACK P DATA 0 SAVE AREA A7 P DATA 0 SAVE AREA A8 0 $ P DATA /2222 CHANNEL PARAMETER 2 L $ P DATA 0 LINE DRIVER DEPENDENT 1 t $ P DATA 0 LINE DRIVER DEPENDENT 2 P DATA /3333 DEVICE STATUS P DATA 0 TIMER POINTER " P DAT
0x1fd704…1fd898 Dummy {f00=0x009a, f01=0x0190, f02=»H t P DATA 0 ACTUAL LINE DOCUMENT $ P DATA 0 REQUESTED LINE DOCUMENT . P DATA 0 RETURN CODE V $ P DATA 0 CONTROL SEQUENCE ADRESS r 6 P DATA 0 DWT-DISPLACEMENT TO LINE NO,CHAR.SET,ETC. 0 P DATA 0,0,0 ACTUAL COLUMN DOCUMENT AND PAPER P
0x1fd898…1fda2c Dummy {f00=0x009a, f01=0x406e, f02=»CB EQU * P DATA 0,0,0,0,0,0 P XIF * PDWTEND EQU * 6 P* J P* T P END ^@ j $ P DATA 0 CONTROL SEQUENCE ADRESS r 6 P DATA 0 DWT-DISPLACEMENT TO LINE NO,CHAR.SET,ETC. 0 P DATA 0,0,0 ACTUAL COLUMN DOCUMENT AND PAPER P
0x1fda2c…1fdbc0 Dummy {f00=0x009a, 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
0x1fdbc0…1fdd54 (1, 328) Dummy {f00=0x009a, f01=0x0190, f02=» A2 EQ ZERO SUCCESS 5 ~ 8 P* A2 NOT EQ ZERO NO SUCCESS 6 & P* 6 b P* 6 l PREPOS EQU * 6 v $ P LDK A4,8 SET REPOSITIONING BIT 6 " P ORS A4,DWTST,A6 STORE IN DWT 6 P* 6 PREP005 EQU * 6 & P LDK A4,PSUBS SET
0x1fdd54…1fdee8 Dummy {f00=0x009a, f01=0x0190, f02=»A6 GET BLOCK COUNTER 6 P SUK A2,8 GREATER 8 ? 7 P RF(G) REPER YES 7 : . P CF A8,SBOT NO DATA; SEARCH BEGIN OF TAPE 7 R P SLL A2,5 7 P RF(NN) REPER BOT NOT FOUND 7 " P LDKL A5,-1 RESET SEQ. COUNTER 7 P RF REP020 READ SEQ. CHAR 7 P* 7
0x1fdee8…1fe07c Dummy {f00=0x009a, f01=0x0190, f02=»D SET NO OF MAX READ 7 P* 8 & PREP017 CF A8,READSQ READ SEQ. CHAR 8 & P LDKL A7,/180F SET READ MASK 8 P P TM A2,A7 8 t P RF(Z) REP020 READ OK 8 P SUK A4,1 COUNT READ 8 $ P RB(P) REP017 NOT ALL READ DONE 8 P RF REP060 GIVE UP 8 P* 8
0x1fe07c…1fe210 Dummy {f00=0x009a, f01=0x0190, f02=». 8 x P CWK A4,PINT TOO MANY BLOCKS 9 P RF(G) REPER YES 9 . P* 9 F P EJECT DRTC01 9 P P* 9 h P* 9 r " PREP030 SUK A4,1 POSITION TAPE 9 | P RF(N) REP040 READY 9 " P CF A8,READSQ READ NEXT BLOCK 9 P RB REP030 9 P* 9 ( PREP040 L
0x1fe210…1fe3a4 Dummy {f00=0x009a, f01=0x0190, f02=»UK A4,1 COUNT RETRY 9 P RF(NP) REP060 GIVE UP : P CF A8,BKSP BACKSPACE : : " P CF A8,READSQ READ SEQ NUMBER : X P RB REP042 : ~ P* : P EJECT DRTC01 : P* : P* : PREP045 SLC A2,3 : P RF(NN) REP050 NOT TAPE MARK : P ANK A
0x1fe3a4…1fe538 Dummy {f00=0x009a, f01=0x018e, f02=»,DWTBKC+1,A6 : P RF(E) REPOK EQUAL ; P* ; . PREP060 LD A7,DWTST,A6 ; 8 $ P ANK A7,8 TRY POSITIONING AGAIN? ; V P RF(Z) REPER NO ; ~ , P XRS A7,DWTST,A6 RESET REPOSITIONING BIT ; P RB REP005 YES ; P* ; P* ; 6 PREPER LDK A2,2 IND RECOV
0x1fe538…1fe6cc Dummy {f00=0x009a, f01=0x0190, f02=» ; j P RTN A8 < P* < P EJECT DRTC01 < " P* < : P* < D P* D W T C 0 2 < N P* < f 2 P* DEVICE WORK TABLE FOR CASSETTE RECORDER 02 < p P* < P* < PDWTC02 EQU * TABLE ENTRY < P IFT DBCAS=2 < P DATA DWTC01+1 DWT NO. 1 <
0x1fe6cc…1fe860 Dummy {f00=0x009a, f01=0x018e, f02=»S BLOCK < t 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 ECBTC2 MMU ECB ADDRESS = XIF = P IFT DBCAS=2 = P DATA 0 BLOCK COUN
0x1fe860…1fe9f4 (1, 329) Opaque[0x194]
0x1fe9f4…1feb88 # DirEnt {nam=»DWII01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1358, f03=0x0000}
0x1fe9f4…1feb88 IdxSect {
0x1fe9f4…1feb88 f00 = 0x009a // 0x1fe9f4 @0x0
0x1fe9f4…1feb88 f01 = 0x0002 // 0x1fe9f6 @0x2
0x1fe9f4…1feb88 gno = [ // 0x1fe9f8 @0x4
0x1fe9f4…1feb88 [0x00]: C0x009a.0x3.0
0x1fe9f4…1feb88 ]
0x1fe9f4…1feb88 }
0x1feb88…1fed1c Dummy {f00=0x009a, f01=0x0190, f02=» 2 P IDENT DWII01 REL 11.0 81-01-26 870105041100 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
0x1fed1c…1feeb0 Dummy {f00=0x009a, 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
0x1feeb0…1ff044 Dummy {f00=0x009a, 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
0x1ff044…1ff1d8 Dummy {f00=0x009a, 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
0x1ff1d8…1ff36c Dummy {f00=0x009a, f01=0x0190, f02=» P RF(Z) READ:E ASCII MODE 4 P =1 4 $ P ANK A1,X'FF' MASK CHARACTER 4 2 P SUK A1,X'30' 4 V P ABL(N) ERROR 4 l P CWK A1,X'09' 4 P RF(NG) READ:6 HEX-CHARACTER 4 P SUK A1,X'07' 4 P CWK A1,X'0A' 4 P ABL(L) ERROR 4 P CWK A1,X'
0x1ff36c…1ff500 Dummy {f00=0x009a, f01=0x0190, f02=»F-BYTE MODE 4 x P SLL A6,4 5 P RB READ GET NEXT HALF BYTE 5 & . PREAD:F SC A6,BUF1 SAVE NON ASCII CHARACTER 5 J * PREAD:E CM C:COUNT CLEAR NON ASCII MODE 5 | ( P SUR A6,A6 CLEAR HALF BYTE SAVE REG. 5 P 5 P RTN A14 5 P 5 P EJECT 5 * P****
0x1ff500…1ff694 (1, 330) Opaque[0x194]
0x1ff694…1ff828 # DirEnt {nam=»DWIO01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1360, f03=0x0000}
0x1ff694…1ff828 IdxSect {
0x1ff694…1ff828 f00 = 0x009b // 0x1ff694 @0x0
0x1ff694…1ff828 f01 = 0x0002 // 0x1ff696 @0x2
0x1ff694…1ff828 gno = [ // 0x1ff698 @0x4
0x1ff694…1ff828 [0x00]: C0x009b.0x0.0
0x1ff694…1ff828 ]
0x1ff694…1ff828 }
0x1ff828…1ff9bc Dummy {f00=0x009b, f01=0x0190, f02=» 2 P IDENT DWIO01 REL 11.0 81-01-26 870105041100 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
0x1ff9bc…1ffb50 Dummy {f00=0x009b, 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
0x1ffb50…1ffce4 Dummy {f00=0x009b, 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
0x1ffce4…1ffe78 Dummy {f00=0x009b, 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
0x1ffe78…20000c Dummy {f00=0x009b, f01=0x0190, f02=»DECR REQUESTED LENGTH k P RB ACV170 l , PACV190 LCR A4,A1 GET THE CHARACTER AGAIN l 2 P ANK A4,/FF l b * P SUK A4,/12 TRAILING UNDERLINE START? l v P RB(Z) ACV170 YES. SKIP IT l , P SUK A4,/C TRAILING LOW INTENSITY START? l P RB(Z) ACV170 YES.
0x20000c…2001a0 Dummy {f00=0x009b, f01=0x0190, f02=»EW) REQUESTED LENGTH l r P EJECT m P XIF m * PACV210 EQU * m 6 , P CF A15,GETCHR GET CHAR FROM ECB BUFFER m J " P LDR A1,A1 END OF ECB BUFFER ? m z P RF(NP) ACV380 YES m P ANK A2,/7F CLEAN m P CWK A2,SPACE < /20 ? m 4 P RF(L) ACV220 YES. THE
0x2001a0…200334 (1, 331) Opaque[0x194]
0x200334…2004c8 # DirEnt {nam=»DW1501«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1368, f03=0x0000}
0x200334…2004c8 IdxSect {
0x200334…2004c8 f00 = 0x009b // 0x200334 @0x0
0x200334…2004c8 f01 = 0x0002 // 0x200336 @0x2
0x200334…2004c8 gno = [ // 0x200338 @0x4
0x200334…2004c8 [0x00]: C0x009b.0x1.0
0x200334…2004c8 ]
0x200334…2004c8 }
0x2004c8…20065c Dummy {f00=0x009b, f01=0x0190, f02=» 0 P IDENT DW1501 REL 11.0 81-01-26 870105041100 P 8 P* @ : P* DEVICE WORK TABLE FOR DATA-COMMUNICATION DEVICE 1 J P* P ENTRY DW1501 TABLE ENTRY * P EXTRN DC15AD POINTER TO ADDRESS-BLOCK P* PMMUPAG EQU 1 P*
0x20065c…2007f0 Dummy {f00=0x009b, f01=0x0190, f02=»ESS P DATA DWTEND-DW1501 P RIGHT BYTE=ORDER ( * P DATA DC15AD POINTER TO ADDRESS-BLOCK D P DATA 'DC' TTAB-ADDRESS r $ P DATA 0 WAIT/ACTIVATE INDICATOR P DATA 0 TERMINAL QUEUE P* P IFT MMUPAG=1 P DATA 0 USER ECB
0x2007f0…200984 Dummy {f00=0x009b, f01=0x0190, f02=» LINK HEAD DWT | & P DATA 0 CONFIG CHAIN LINK NEXT DWT & P DATA 0 LOCAL SYMBOLIC DTE ADDRESS @ ( P DATA 0 REMOTE SYMBOLIC DTE ADDRESS j P DATA 0 SYMBOLIC SUBADDRESS P DATA 0 REQUEST CONTROL WORD P DATA 0 REQUEST TIMER VALUE " P DATA
0x200984…200b18 Dummy {f00=0x009b, f01=0x413e, f02=»ATA 0 I/P DATA Q LINK TO BUFFER " P DATA 0 I/P DATA TIMER POINTER ( P DATA 0 CURSOR ADDRESS N " P DATA 0 DEVICE BUFFER ADDRESS l P DATA 0 DWT STATUS P* P IFT MMUPAG=1 PDC:ECB EQU * MMU ECB P DATA 0,0,0,0,0,0,0 P XIF
0x200b18…200cac Dummy {f00=0x009b, 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
0x200cac…200e40 Dummy {f00=0x009b, f01=0x40e2, f02=» L H IDENT T:DK20 TRA 11.0 82-04-22 F1 O1111 REL 11.0 81-10-18 87015054110 T:DK20 T T:DK20D f KBVGO z * & K2 @ * * @ * &
0x200e40…200fd4 (1, 332) Opaque[0x194]
0x200fd4…201168 # DirEnt {nam=»DRKB04«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1370, f03=0x0000}
0x200fd4…201168 IdxSect {
0x200fd4…201168 f00 = 0x009b // 0x200fd4 @0x0
0x200fd4…201168 f01 = 0x0016 // 0x200fd6 @0x2
0x200fd4…201168 gno = [ // 0x200fd8 @0x4
0x200fd4…201168 [0x00]: C0x009b.0x2.0
0x200fd4…201168 [0x01]: C0x009b.0x3.0
0x200fd4…201168 [0x02]: C0x009c.0x0.0
0x200fd4…201168 [0x03]: C0x009c.0x1.0
0x200fd4…201168 [0x04]: C0x009c.0x2.0
0x200fd4…201168 [0x05]: C0x009c.0x3.0
0x200fd4…201168 [0x06]: C0x009d.0x0.0
0x200fd4…201168 [0x07]: C0x009d.0x1.0
0x200fd4…201168 [0x08]: C0x009d.0x2.0
0x200fd4…201168 [0x09]: C0x009d.0x3.0
0x200fd4…201168 [0x0a]: C0x009e.0x0.0
0x200fd4…201168 ]
0x200fd4…201168 }
0x201168…2012fc Dummy {f00=0x009b, f01=0x0190, f02=» 2 P IDENT DRKB04 REL 11.0 81-06-26 870105041100 P : 4 P =4 WRONG RETURN CODE (UNDEFINED KEY, BIT 13) B P REL 11.0 81-06-16 z 4 P =3 ODD DWT-ADDRESS WAS NOT MADE EVEN IN IHKB P REL 11.0 81-05-25 0 P =2 GREEK CHARACTER SET
0x2012fc…201490 Dummy {f00=0x009b, f01=0x0190, f02=»LAR INPUT BUFFER x P REL 11.0 81-01-26 P* 4 . P****************************************** > P* p P* z : P* P H I L I P S T E R M I N A L S Y S T E M P T S P* P* DRKB04 = DRIVER KEYBOARD P* . P**************
0x201490…201624 Dummy {f00=0x009b, f01=0x0190, f02=» n 2 P* -71, -72, 6331, 6342 AND BADGE CARD READER 4 P* PTS 6261 WITH CONNECTED PIN (PERSONAL IDEN- > & P* TIFICATION NUMBER -KEYBOARD). v P* 4 P* ONLY INPUT DATA ARE HANDLED BY THIS DRIVER. P* 0 P* AN ECHO DEVICE CAN BE AT
0x201624…2017b8 Dummy {f00=0x009b, f01=0x018e, f02=»LOWING PARTS: r " P* R C K B = RECOVERY ROUTINE " P* A C K B = ACTIVATION PART < P* M A K B = MAIN PART b $ P* I H K B = INTERRUPT HANDLER P* * P* THE FOLLOWING ORDERS ARE TREATED: P* ORDER 01: BASIC READ " P*
0x2017b8…20194c Dummy {f00=0x009b, f01=0x0190, f02=» P* NORMAL REGISTER USAGE: $ P* REGISTER A1: RETURN CODE * ( P* A2: INPUT CHARACTER R $ P* A3: BUFFER INDEX ~ & P* A4: WORK REGISTER " P* A5: STACK BASE $ P* A6:
0x20194c…201ae0 Dummy {f00=0x009b, f01=0x0190, f02=» 2 P* DWT-ADDRESS OF ECHO-OUTPUT-DEVICE MUST BE P* DEFINED IN DWT. > P* Z 2 P* IF TIMING IS WANTED, BIT 0 IN DWTDEV MUST d 8 P* BE SET UNEQUAL TO ZERO. STANDARD VALUE FOR TIME- 6 P* OUT IS 30 SECONDS SINCE LAST DEPRESSED KEY. IF
0x201ae0…201c74 (1, 333) Dummy {f00=0x009b, f01=0x0190, f02=»IN DWTDEV IS SET TO ZERO IF CHARACTERS WITHIN : P* /30-/39 AND /70-/79 ARE ACCEPTED FOR NUMERIC READ. 6 8 P* IF IT IS SET TO ONE, ONLY /30-/39 ARE ACCEPTED. t P* > P* BIT 2 IN DWTDEV IS SET TO ZERO IF /20-/5F ARE ACCEPTED < P* FOR STAN
0x201c74…201e08 Dummy {f00=0x009b, f01=0x0190, f02=» 8 P* IN DWTDEV MUST BE SET IF PTS 6236/71/72 IS USED. P* D < P* BIT 4 IN DWTDEV IS USED BY THE DRIVER TO INDICATE IF N * P* MORE CHARACTERS ARE TO BE ECHOED. P* @ P* SPACE FOR THE CIRCULAR INPUT BUFFER IS RESERVED IN DWT.
0x201e08…201f9c Dummy {f00=0x009b, f01=0x0190, f02=»ON | P* ---- TIME OUT FUNCTION . P* ---- KEYBOARD LOCKED IF NO KEYLOCK ON , 4 P* ---- COMPLETION OF READ REQUEST AT POWER-ON ^ B P* ---- SHIFT KEY ON NUMERIC PART OF 6272 USED AS NORMAL KEY P* P EJECT P* ENTRIES P
0x201f9c…202130 Dummy {f00=0x009b, f01=0x0190, f02=»SPATCH p " P EXTRN INPUT READ A CHARACTER P EXTRN ECHO ECHO 4 P EXTRN ECHEND END OF ECHO L P EXTRN LDISP DISPATCH n P EXTRN SETIME SETS TIME & P EXTRN LENDIS END I/O AND DISPATCH P EXTRN ABORT ABORT REQUESTS P EXTRN ABTADR
0x202130…2022c4 Dummy {f00=0x009b, f01=0x0190, f02=»RN DWTST P EXTRN DWTA3 P EXTRN DWTA5 $ P EXTRN DWTADR 8 P EXTRN DWTECH N P EXTRN DWTSB2 d P EXTRN DWTECB z P* P* ECB PARAMETERS P* P EXTRN ECBBA BUFFER ADDRESS " P EXTRN ECBRL REQUESTED LENGTH " P
0x2022c4…202458 Dummy {f00=0x009b, f01=0x0190, f02=» IN INPUT BUFFER z " PTIME EQU 300 TIMEOUT CONSTANT P EJECT > P* L ( P************************************ V P* P* CONDITIONAL ASSEMBLY P* ( P************************************ P* < P* TIME OUT FUNCTION MAY BE
0x202458…2025ec Dummy {f00=0x009b, f01=0x0190, f02=»TING X:B = 0 h P* PX:B EQU 1 PCECHO EQU 00 0 P* D 6 P* COMPLETION OF READ REQUEST AT POWER ON MAY BE N " P* INCLUDED BY SETTING X:C =1 P* PX:C EQU 1 PRECOV EQU X:C P* : P* THE LENGTH OF THE CIRCULAR
0x2025ec…202780 Dummy {f00=0x009b, f01=0x0190, f02=» P* CODE CONVERSION DUMMY P* * PX:E EQU 0 4 P* F P EJECT P P* ^ @ P* BY SETTING X:F=0 THE KEY A15 ON KB 71/72 GIVES THE CODE h ( P* /00 INSTEAD OF BEING A SHIFT KEY P* PX:F EQU 1 PNSHIFT EQU 1 P
0x202780…202914 (1, 334) Dummy {f00=0x009c, f01=0x0190, f02=»* P* MMU BUFFER SIZE P* & PX:H EQU 10 0 PDVBLEN EQU X:H B P* X P* MMU KEY TABLE SIZE b P* PX:I EQU 10 PDVBKTB EQU X:I P* 6 P* X:J SHOULD BE SET TO 1 IF KB 6236, 71 OR 72 =2 " P* IS INCLUDED IN
0x202914…202aa8 Dummy {f00=0x009c, f01=0x0190, f02=» * P* 71 OR 72 IS INCLUDED IN SYSTEM =2 P* 2 PX:K EQU 1 < POLDKB EQU 00 N P* b 2 P* X:L SHOULD BE SET TO 1 IF PLC IS USED =2 l P* PX:L EQU 1 PPLC EQU X:L P* , P* IF X:M = 1 IT IS POSSIBLE TO USE =2
0x202aa8…202c3c Dummy {f00=0x009c, f01=0x0190, f02=» b * P* OBTAINED BY SETTING MMUPAG EQU 1. P* 6 PMMUPAG EQU 1 @ P* T P EJECT ^ P* l P* DWT-DISPLACEMENT v P* " PDWTKEY EQU /04 KEYLOCK MEMORY $ PDWTCS EQU /06 CRTL-SHIFT MEMORY . PDWTCTB EQU /08 CONVERSION POIN
0x202c3c…202dd0 Dummy {f00=0x009c, f01=0x0190, f02=»FIRST PLACE v ( PDWTUTQ EQU /0E POINTER TO LAST PLACE " PDWTSQ EQU /10 START OF BUFFER @ ( PDWTEQ EQU DWTSQ+DWTLNG END OF BUFFER f P* P* ADDRESS BLOCK P* P DATA DVBKTB MMU KEY TABLE P DATA DVBLEN MMU BUFFER SIZE P D
0x202dd0…202f64 Dummy {f00=0x009c, f01=0x0190, f02=»DLER x P IFF RECOV=1 P DATA 0 NO RECOVERY ROUTINE P XIF D P IFT RECOV=1 P P DATA RCKB RECOVERY ROUTINE d P EJECT ( P************************************ P* P* RECOVERY ROUTINE P* * P**********************
0x202f64…2030f8 Dummy {f00=0x009c, f01=0x018e, f02=»ER OFF r P ABL LENDIS DISPATCH ! P* , PRC10 CWK A7,1 BASIC READ ? 6 P ABL(E) LDISP YES ! X P* NO ! t , P CF A15,ABORT RESET INPUT REQUESTED FLAG , P LD A3,DWTA3,A6 RELOAD EFFECTIVE LENGTH & PRC15 CM ECBCW,A8 COMPLETE REQUEST
0x2030f8…20328c Dummy {f00=0x009c, f01=0x0190, f02=» P* A C K B P* ACTIVATION PART P* 4 P* > ( P************************************ H PACKB EQU * t P ENB P* P LDK A1,0 RESET REGISTERS P LDK A3,0 P* P* CHECK ORDER P* P LDR A4,A7
0x20328c…203420 Dummy {f00=0x009c, f01=0x0190, f02=»DER 31 P* P* ILLEGAL ORDER P* 2 PAKB100 EQU * < P ABL LENDER COMPLETE REQUEST P P EJECT t P* & P* ORDER 31. RESET INPUT BUFFER. P* PAKB110 EQU * P INH $ P LD A1,DWTDEV+DWTUTQ,A6 BUF END * P
0x203420…2035b4 (1, 335) Dummy {f00=0x009c, f01=0x0190, f02=»A4,DWTDEV,A6 ( P ANKL A4,/1000 PTS 6236, -71, -72 ? P RF(Z) AKB118 NO ! @ P XIF Z P IFT NEWKB=1 =2 f P* ~ : P* SHIFT, CTRL AND KEYLOCK CHARACTERS ARE NOT REMOVED . P* FROM BUFFER WHEN KB 6236/71/72 IS USED P* " PAKB112
0x2035b4…203748 Dummy {f00=0x009c, f01=0x0190, f02=»SKIP CHARACTER | P XIF P IFT NEWKB=1 =2 " P SUK A4,/80 SKIP CHARACTER ? : P RF(Z) AKB113 YES ! ^ & P ADK A4,/10 SHIFT, CTRL, KEYLOCK ? z P RF(NN) AKB120 YES ! P* * PAKB113 CF A15,EOQUEU GET NEXT POINTER ( P CW A1,DWTDEV+DW
0x203748…2038dc Dummy {f00=0x009c, f01=0x0190, f02=»YES! x PAKB119 ENB . P ABL MKB335 SET RC=0 AND COMPLETE REQUEST P* P P IFT NEWKB=1 =2 Z $ PAKB120 ADK A4,/70 RESTORE CHAR. r P SCR A4,A2 STORE IN BUF. " P LDR A3,A1 EXCHANGE REGISTERS P LDR A1,A2 $ P CF A15,EOQUEU GET NEX
0x2038dc…203a70 Dummy {f00=0x009c, f01=0x0190, f02=» RECOV=1 P* P* POWER OFF TEST P* 4 P LD A2,DWTDEV,A6 POWER OFF ? > P ANKL A2,/400 b P RF(E) AKB205 NO ! x * P XRS A2,DWTDEV,A6 RESET POWER OFF BIT P CWK A7,1 BASIC READ ? ( P RB(NE) RC15 NO ! COMPLETE REQUEST !
0x203a70…203c04 Dummy {f00=0x009c, f01=0x0190, f02=»DEV,A6 TIMING ? P RF(NN) AKB210 NO! P* 2 @ P LD A4,DWTTP+DWTDEV,A6 YES ! IS THERE AN EXISTING POINTER ? < P RF(E) AKBTIM NO! P* & P CF A15,RESTRT YES ! RESTART TIMER P RF AKB210 P* PAKBTIM EQU * P LDR A1,A6
0x203c04…203d98 Dummy {f00=0x009c, f01=0x0190, f02=»TP+DWTDEV,A6 STORE TIMER ADDRESS IN DWT P XIF 0 P EJECT < P* J P* REQUESTED LENGTH OK ? T P* v 8 PAKB210 LD A2,ECBRL,A8 REQUESTED LENGTH IN ECB = 0 ? , P ABL(E) MKBEND YES ! COMPLETE REQUEST ! P* P* CLEAR ECB-BUFF
0x203d98…203f2c Dummy {f00=0x009c, f01=0x018e, f02=» A3,A1 CLEAR BUFFER UNTIL REQUESTED LENGTH P SUK A1,1 2 P SUK A2,1 F P RB(NE) AKB230 NOT READY YET X P EJECT | P* ( P************************************ P* P* P* M K B $ P* MAIN PART OF KEYBOARD DRIVER
0x203f2c…2040c0 Dummy {f00=0x009c, f01=0x0190, f02=» 2 P* CHARACTERS AND NO OVERFLOW HAS OCCURRED, A $ P* CHARACTER WILL BE PUT IN A2 : P* b PMKB100 EQU * l P INH 2 P LD A1,DWTDEV+DWTUTQ,A6 FETCH A CHARACTER FROM " P LCR A2,A1 CIRCULAR BUFFER END P* P LDR A4,A2 P XRK
0x2040c0…204254 (1, 336) Dummy {f00=0x009c, f01=0x018e, f02=» P ABL MKBEND COMPLETE REQUEST P* ( 6 PMKB130 CW A1,DWTDEV+DWTINQ,A6 ANYTHING IN BUFFER ? 2 P RF(E) MKB140 NO ! l & P CF A15,EOQUEU YES ! MOVE POINTER . P ST A1,DWTDEV+DWTUTQ,A6 STORE NEW POINTER P =1 P IFT PLC=1 =2 P*
0x204254…2043e8 Dummy {f00=0x009c, f01=0x0190, f02=» ^ , P CW A1,DWTDEV+DWTINQ,A6 MORE IN BUFFER ? P RF(E) MKB135 NO ! 8 P ORS A4,DWTDEV,A6 R P XIF l PMKB133 ENB x P RF MKB150 P* P IFT PLC=1 =2 PMKB135 C1R A4,A4 8 P ANS A4,DWTDEV,A6 CLEAR "MORE CHARACTERS" INDICATION
0x2043e8…20457c Dummy {f00=0x009c, f01=0x018e, f02=»F A5,INPUT READ CHARACTER P ENB " P* . & P ANK A2,/7F MASK TO GET CHARACTER 8 P* b P IFT PLC=1 =2 l 6 P* SET "MORE CHARACTERS" INDICATION BIT IF THERE P* ARE MORE CHARACTERS P* ( P ANK A1,/1 MASK NOT SIGNIFICANT BI
0x20457c…204710 Dummy {f00=0x009c, f01=0x0190, f02=» j P XIF ! P* ! PMKB150 EQU * ! P IFT NEWKB+OLDKB=2 =2 ! 2 P* ! P * P* CHECK WHICH KEYBOARD THAT IS USED ! Z P* ! " P LD A4,DWTDEV,A6 KEYBOARD WITH ! ( P ANKL A4,/1000 SPECIAL CONVERSION ? ! P RF(Z) MKB290 PERHAPS ! ! P XIF
0x204710…2048a4 Dummy {f00=0x009c, f01=0x0190, f02=» , P SUK A4,/80 SKIP CHAR. FROM CIRC. BUF.? " * P RB(Z) MKB100 YES, READ NEXT CHARACTER " 4 P ADK A4,/8 CTRL/SHIFT ? " b P RF(NN) MKB220 YES ! " " P ADK A4,/8 NORMAL CHARACTER ? " P RF(N) MKB300 YES ! " P EJECT " P* " > P* KEYLOCK IS T
0x2048a4…204a38 Dummy {f00=0x009c, f01=0x0190, f02=»BECAUSE OF POWER UP, THE CHARAC- " x P* TER SHOULD BE IGNORED. # ( P* # J P LDK A1,1 "FLAG BIT" # T " P LDR A4,A4 KEYLOCK CHAR. - /70 # p $ PMKB160 RF(Z) MKB170 KEYLOCK ON ! # P SUK A4,1 # P RF(Z) MKB180 KEYLOCK OFF ! # $ P SLC A1,1 SHIFT "FLA
0x204a38…204bcc Dummy {f00=0x009c, f01=0x0190, f02=»ST IF KEYLOCK IS CHANGED # v P TM A4,A1 $ . P RB(NE) MKB100 NO CHANGE, READ A NEW CHAR. $ 2 , P ORS A1,DWTDEV+DWTKEY,A6 SET "FLAG BIT" $ d P RF MKB190 $ PMKB180 EQU * $ 4 P LD A4,DWTDEV+DWTKEY,A6 TEST IF KEYLOCK CHANGED $ P TM A4,A1 $ P RB(
0x204bcc…204d60 Dummy {f00=0x009c, f01=0x0190, f02=» $ 0 P CF A15,STORE STORE KEYLOCK CHARACTER IN ECB % P LDR A4,A7 LOAD ORDER CODE % < P SUK A4,2 % ^ P RF(N) MKB325 ORDER 1 ! % p P EJECT % P* % 0 P* KEYLOCK IS TURNED ! MAKE A NEGATIVE CODE % 6 P* TO THE CONTROLWORD IN ECB AND COMPLETE R
0x204d60…204ef4 (1, 337) Dummy {f00=0x009c, f01=0x0190, f02=» P RF(N) MKB210 ON OR OFF ? & P ADK A4,/4 ON ! & & $ PMKB210 SLL A4,1 MAKE WORD POSI- & > P SRL A4,1 TIVE AGAIN & f , P C1R A4,A4 CHANGE 0 TO 1 AND VICE VERSA & & P ST A4,ECBCW,A8 STORE CODE IN ECB & , P RF MKB335 SET RC=0 AND COMPLETE REQUEST &
0x204ef4…205088 Dummy {f00=0x009c, f01=0x0190, f02=»DWTKEY,A6 IS KB LOCKED ? & , P RB(Z) MKB100 YES ! READ A NEW CHARACTER ' P XIF ' P P IFT NEWKB=1 =2 ' P IFT NSHIFT=0 ' t P* ' 2 P* MAKE CHARACTER /00 IF NUMERIC SHIFT KEY IS ' 2 P* DEPRESSED, AND SKIP THE INCOMING CHARACTER ' P* IF I
0x205088…20521c Dummy {f00=0x009c, f01=0x0190, f02=»F MKB300 ' P* ( " PMKB230 CCK A2,/7D00 RELEASED ? ( & P RB(E) MKB100 YES ! SKIP CHARACTER ( @ P XIF ( j P IFT NEWKB=1 =2 ( v PMKB250 LDK A1,/2 SHIFT BIT ( P LDR A4,A4 SHIFT ON ? ( P RF(Z) MKB260 YES ! ( P SUK A4,1 SHIFT OFF ? ( P
0x20521c…2053b0 Dummy {f00=0x009c, f01=0x018e, f02=»F ? ( | P RF(Z) MKB270 YES ! ) P SUK A4,1 NUMERIC SHIFT ? ) ( P RB MKB250 YES ! ) J P* ) b & PMKB260 ORS A1,DWTDEV+DWTCS,A6 SET ) l P RF MKB280 ) PMKB270 C1R A1,A1 COMPLEMENT ) " P ANS A1,DWTDEV+DWTCS,A6 CLEAR ) P* ) $ PMKB280 ABL M
0x2053b0…205544 Dummy {f00=0x009c, f01=0x0190, f02=» P* NUMERIC PART OF 6234. * P* * & PMKB290 EQU * * 0 $ P LDR A1,A6 IF THE DWT-ADDRESS IS * D , P ANK A1,1 ODD, SHOULD SPECIAL CONVERSION * l P RF(NZ) MKB295 BE USED * ( P LDR A4,A2 IF BIT 8 IN CHARACTER IS * 0 P ANK A4,/80 SET SHOULD SPECIAL CON
0x205544…2056d8 Dummy {f00=0x009c, f01=0x0190, f02=»ION ! * t P* + 2 PMKB295 ANKL A6,/FFFE MAKE THE DWT-ADDRESS EVEN + P LDK A4,/8 LOAD SPECIAL BIT + N P ST A4,DWTDEV+DWTCS,A6 + r P RF MKB310 + P XIF + P EJECT + P* + P* NORMAL CONVERSION + P* + PMKB300 EQU * + P* +
0x2056d8…20586c Dummy {f00=0x009c, f01=0x018e, f02=» + PMKB310 EQU * , , P LD A1,DWTDEV+DWTCTB,A6 GET CTAB ADDRESS , P RF(E) MKB320 NO CONVERSION , L 8 P AD A1,DWTDEV+DWTCS,A6 GET CURRENT CONVERSION TABLE , p P LDR* A1,A1 , & P RF(E) MKB320 NO CONVERSION TABLE , P LDR A4,A2 , P SRL A4,3 LI
0x20586c…205a00 Dummy {f00=0x009c, f01=0x0190, f02=» , P ADR A1,A4 ADD ROW INDEX - P LCR A2,A1 LOAD CHARACTER - ( P* - J PMKB320 EQU * - T P IFT OLDKB=1 =2 - h P LDK A4,/7 RESET SPECIAL BIT - P ANS A4,DWTDEV+DWTCS,A6 - P XIF - P EJECT - P* - , P* CHECK IF BASIC READ OR ORDER
0x205a00…205b94 (1, 338) Dummy {f00=0x009d, f01=0x018e, f02=»1, BASIC READ - P* . , P CF A5,STOECH STORE CHAR. IN ECB-BUFFER . H P* AND SEND IT TO ECHO-DEVICE . P < P* IF ECHO WANTED . P* . PMKB325 EQU * . 0 P CW A3,ECBRL,A
0x205b94…205d28 Dummy {f00=0x009d, f01=0x0190, f02=» . j P EJECT / P* / . P* ORDER 2 OR 3, STANDARD OR NUMERIC READ / P* / R PMKB330 EQU * / P* / p , P* CHECK IF IT IS AN END-OF-RECORD-KEY / z P* / & P LD A1,ECBCW,A8 KEY-TABLE ADDRESS / P RF(Z) MKB360 NO KEYTABLE ! / " P LCR A
0x205d28…205ebc Dummy {f00=0x009d, f01=0x0190, f02=»1 / , P RF(N) MKB360 KEY NOT FOUND IN KEYTABLE 0 P SUK A1,1 NEXT KEY 0 : P CCR A2,A1 EOR-CHARACTER ? 0 T 0 P RB(NE) MKB340 NO ! TRY NEXT KEY IN KEYTABLE 0 v P* 0 ( P ADK A4,1 YES ! MAKE KEYTABLE INDEX 0 PMKB350 EQU * 0 0 P ST A4,ECBCW,A8 STOR
0x205ebc…206050 Dummy {f00=0x009d, f01=0x0190, f02=»OR CHARACTER 0 z P CF A5,EORECH ECHO CHARACTER 1 P XIF 1 8 P* 1 D PMKB335 EQU * 1 N " P LDK A1,0 SET RETURN CODE = 0 1 b $ P RF MKBEND AND COMPLETE REQUEST 1 P* 1 P EJECT 1 P* 1 P* 1 P* CHARACTER CHECK 1 P* 1 PMKB360
0x206050…2061e4 Dummy {f00=0x009d, f01=0x0190, f02=» 1 | P LDK A4,/20 LOWER LIMIT 2 P SLC A1,2 /20-/7F ? 2 ( P RF(NN) MKB370 YES ! =4 2 D P LDK A1,/5F NO ! UPPER LIMIT 2 d P RF MKB400 2 P* 2 " PMKB370 LDK A1,/7F UPPER LIMIT 2 P RF MKB400 2 P* 2 ( PMKB380 SLC A1,1 /30-/39 & /70-/79
0x2061e4…206378 Dummy {f00=0x009d, f01=0x0190, f02=»R LIMIT 2 P* 3 PMKB400 SUR A1,A2 3 $ P RF(N) MKB420 NOT WITHIN LIMITS 3 2 P SUR A4,A2 3 Z $ P RF(P) MKB420 NOT WITHIN LIMITS 3 l P LDR* A1,A15 DUMMY LOAD 3 P EJECT 3 P* 3 $ P* IT IS A "NORMAL" CHARACTER ! 3 P* 3 PMKB405 EQU
0x206378…20650c Dummy {f00=0x009d, f01=0x0190, f02=»T CHARACTER 3 t P* 4 ( PMKB410 LDK A1,8 YES ! SET ERROR CODE 4 P RF MKBEND 4 J P* 4 8 P* CHECK IF IT IS BACKSPACE, CLEAR, MULTIPLE ZERO, 4 f 0 P* STANDARD EOR, SKIP OR UNKNOWN CHARACTER 4 P* 4 ( PMKB420 LDR* A2,A15 RELOAD CHARACTER 4
0x20650c…2066a0 Dummy {f00=0x009d, f01=0x018e, f02=» IN ECBCW IF STANDARD EOR 4 x P CCK A1,/0D00 STANDARD EOR ? 5 " P RB(E) MKB350 YES ! 5 F PMKB440 EQU * 5 b $ P SUK A1,/1B TRIPLE ZERO ? (/1B) 5 v P ABL(E) MZ30 YES ! 5 P* 5 " P ADK A1,/13 BACKSPACE ? (/08) 5 P ABL(E) BACKSP YES ! 5 P* 5
0x2066a0…206834 (1, 339) Dummy {f00=0x009d, f01=0x0190, f02=» 5 | P* 6 $ P SUK A1,/E5 SKIP CHARACTER (/FF) 6 P ABL(E) MKB100 YES ! 6 : P IFT GREECE=1 =2 6 V $ P LDR A1,A2 CHECK IF CHARACTER IS 6 p & P SUK A1,/B0 WITHIN LIMITS FOR THE 6 & P RF(N) MKB460 GREEK CHARACTER SET 6 P SUK A1,/9 6 P RB(NP) MK
0x206834…2069c8 Dummy {f00=0x009d, f01=0x0190, f02=»ORE STORE CHARACTER IN ECB-BUFFER 6 P LDK A1,4 7 * P* 7 < P EJECT 7 F , P**************************************** 7 T P* 7 P* 7 P* COMMON END 7 P* 7 P* 7 * P************************************* 7 PMKBEND EQU * 7 P* 7
0x2069c8…206b5c Dummy {f00=0x009d, f01=0x0190, f02=»M DWTTP+DWTDEV,A6 7 P XIF 8 P* 8 & PMKBE10 EQU * 8 0 * P ST A3,ECBEL,A8 STORE EFFECTIVE LENGTH 8 D P* 8 r P IFT CECHO=1 8 | P LDR A4,A1 SAVE A1 8 P CF A5,ECHEND END OF ECHOING 8 P LDR A1,A4 8 P XIF 8 P* 8 , P ABL LENDIS PERFOR
0x206b5c…206cf0 Dummy {f00=0x009d, f01=0x0190, f02=» P* 9 P* 9 * P************************************** 9 PIHKB EQU * 9 F & P ANK A2,/7F MASK TO GET CHARACTER 9 X P IFT CTIMUT=1 9 ( P CF A15,RESTRT RESTART TIMEOUT TIMER 9 P XIF 9 P* 9 4 P* STORE INCOMING CHARACTER IN CIRCULAR BUFFE
0x206cf0…206e84 Dummy {f00=0x009d, f01=0x0190, f02=»/80 YES INDICATE BY SETTING BIT 8 9 & P SUK A6,1 MAKE DWT-ADDRESS EVEN =3 : * P XIF : T " PIHKB02 LD A1,DWTDEV+DWTINQ,A6 : ` P LCR A4,A1 : " P XRK A4,/FF ALREADY OVERFLOW ? : P RF(E) IHKB05 YES ! : P* : P LDR A4,A1 : 4 P CF A15,EOQUEU GET
0x206e84…207018 Dummy {f00=0x009d, f01=0x0190, f02=»OW INDICATION : ~ ( P SCR A1,A4 SET OVFL. IND. IN BUFFER ; P* ; B PIHKB05 EQU * ; L P IFT NEWKB+OLDKB=2 =2 ; ` $ P LD A1,DWTDEV,A6 6236, 71, 72 ? ; ~ P ANKL A1,/1000 ; P RF(Z) EXIT NO ! ; P* ; P XIF ; P IFT NEWKB=1 =2 ; & P SUK A
0x207018…2071ac Dummy {f00=0x009d, f01=0x0190, f02=» P LD A1,DWTDEV+DWTINQ,A6 < P LDR A4,A1 < $ P CF A15,EOQUEU < 6 , P CW A1,DWTDEV+DWTUTQ,A6 BUFFER FILLED ? < L P RF(E) IHKB07 YES ! < | " P SCR A2,A4 STORE NEW CHARACTER < ( P LDK A2,/FF MOVE OVERFLOW INDICATION < P LDR A4,A1 FORWARD IN BUFFER <
0x2071ac…207340 Dummy {f00=0x009d, f01=0x0190, f02=»KB10 EQU * < * P CW A1,DWTDEV+DWTUTQ,A6 END OF QUEUE ? = P RF(E) IHKB19 YES ! = @ ( P CF A15,SOQUEU GET PREVIOUS POINTER = P* = P LCR A4,A1 GET CHARACTER = P ANK A4,/7F = P XRR A4,A2 = " P RF(Z) EXIT EQUAL CHARACTER ! = P SUK A4,
0x207340…2074d4 (1, 340) Dummy {f00=0x009d, f01=0x0190, f02=»IHKB17 EQU * = & P SUK A4,/F CTRL, SHIFT, KEYLOCK ? > P RB(N) IHKB10 YES ! > > P* > Z . PIHKB18 SCR A2,A1 NO ! STORE CHAR IN BUFFER > d P RF EXIT > P* > ( P* CHECK BUFFER AGAIN AND SORT OUT > " P* EQUAL AND INV. CHARACTERS > P* >
0x2074d4…207668 Dummy {f00=0x009d, f01=0x0190, f02=»EU > ~ P SUK A4,1 ? P RB(NN) IHKB21 ? P IM DWTDEV,A6 ? 2 ( P LCR A4,A1 GET OLD CHAR FROM BUFFER ? H " P CCK A4,/FF00 END OF BUFFER ? ? t P RF(E) EXIT YES ! ? P SCR A2,A1 STORE THE NEW ONE ? P LDR A2,A4 PUT CHAR IN A2 ? P ANK A2,/7F ?
0x207668…2077fc Dummy {f00=0x009d, f01=0x018e, f02=»ER IN INPUT BUFFER ? r P* @ PEXIT ABL LDISP DISPATCH ! @ $ P EJECT @ F P* @ T & P* STORING (&ECHOING) SUBROUTINE @ ^ . P* SKIPS OTHER CHARACTERS THAN DIGITS IF @ P* NUMERIC READ @ P* @ PSTOECH EQU * @ , P CF A15,STORE STORE CHAR
0x2077fc…207990 Dummy {f00=0x009d, f01=0x018e, f02=» @ , PECHSUB ANK A2,/7F MASK TO GET CHARACTER A PEORECH EQU * A 8 P IFT PLC=1 =2 A L : P LD A1,DWTDEV,A6 GET "MORE CHARACTERS" INDICATION BIT A b P ANKL A1,/0800 A * P XRS A1,DWTDEV,A6 RESET INDICATION BIT A P SLC A1,5 A P XIF A P IFT C
0x207990…207b24 Dummy {f00=0x009d, f01=0x0190, f02=» A $ P* THIS IS THE TIMEOUT ROUTINE B P* B 0 PAKBTUT EQU * B : P LDR A6,A1 LOAD DWT-ADDRESS B N P CM DWTTP+DWTDEV,A6 B r P LD A2,DWTST,A6 B , P ABL(N) LDISP DISPATCH IF NO REQUEST ON B P* B , P CF A15,ABORT RESET INPUT REQUESTED FLAG
0x207b24…207cb8 Dummy {f00=0x009d, f01=0x0190, f02=»D A8,DWTECB,A6 RELOAD ECB-ADDRESS B P LDK A1,/40 SET RETURN CODE C * P ABL MKBEND COMPLETE REQUEST C N P* C r P* RESTART TIMEOUT TIMER C | P* C PRESTRT EQU * C P LD A4,DWTTP+DWTDEV,A6 C P RF(E) NOTIME NO TIMING C P LDKL A4,-TIME
0x207cb8…207e4c Dummy {f00=0x009d, f01=0x0190, f02=»O STORE A CHARACTER C x 0 P* IN ECB-BUFFER AND INCREMENT BUFFER INDEX D P* D P , P* ON ENTRY: A2 = CHARACTER TO STORE D Z & P* A3 = BUFFER INDEX D P* D PSTORE EQU * D " P LD A1,ECBBA,A8 BUFFER ADDRESS D P ADR A1,A3 ADD B
0x207e4c…207fe0 Dummy {f00=0x009d, f01=0x0190, f02=»QUEU = SUBROUTINE TO GET NEXT QUEUE POINTER D P* E 4 ( P* ON ENTRY: A1 = QUEUE POINTER E > & P* A6 = DWT-ADDRESS E j P* E PEOQUEU EQU * E P ADK A1,1 E P SUR A1,A6 E ( P CWK A1,DWTDEV+DWTEQ END OF QUEUE ? E P RF(NE
0x207fe0…208174 (1, 341) Dummy {f00=0x009d, f01=0x018e, f02=»BROUTINE TO GET PREVIOUS QUEUE POINTER E P* F . ( P* ON ENTRY: A1 = QUEUE POINTER F 8 & P* A6 = DWT-ADDRESS F d P* F PSOQUEU EQU * F P SUR A1,A6 F . P CWK A1,DWTDEV+DWTSQ FIRST POS IN QUEUE ? F P RF(NE) SOQ10 NO ! F 0
0x208174…208308 Dummy {f00=0x009d, f01=0x0190, f02=» P EJECT G P* G P* BACKSPACE G P* G 2 PBACKSP EQU * G < P LDR A3,A3 G P " P RF(Z) KBBSPA ECB-BUFFER EMPTY G b P SUK A3,1 ONE STEP BACKWARDS G P SUR A2,A2 CLEAR A2 G 4 P CF A15,STORE STORE A BLANK INSTEAD OF LAST CHAR G " P SUK A3,
0x208308…20849c Dummy {f00=0x009d, f01=0x0190, f02=»BSP2 EQU * G P IFT CECHO=1 H " P CF A5,ECHSUB ECHSUB CHARACTER H & P XIF H L P ABL MKB100 NEXT CHARACTER H X P* H z P* CLEAR H P* H PCLEAR EQU * H P LDK A3,0 RESET ECB-BUFFER H P RB KBBSP2 NEXT CHARACTER H P EJECT H P*
0x20849c…208630 Dummy {f00=0x009d, f01=0x0190, f02=»ZERO H ~ P LDK A4,3 I P* I PMZ50 EQU * I ( P SUK A4,1 ANY MORE ZEROES ? I : & P ABL(L) MKB100 NO, NEXT CHARACTER I ^ P* I P EJECT I P INH I 0 P LD A1,DWTDEV+DWTUTQ,A6 GET OUTQUEUE POINTER I ( P CF A15,SOQUEU GET PREVIOUS POINTER I
0x208630…2087c4 Dummy {f00=0x009d, f01=0x0190, f02=»W OUTQUEUE POINTER I p , P LDK A2,/30 STORE ZERO IN CIRCULAR BUFF. J P SCR A2,A1 J J P RB MZ50 J P* J l PMZ80 EQU * J v ( P LDK A4,/FF INDICATE BUFFER OVERFLOW J P SCR A4,A1 J , P ST A1,DWTDEV+DWTUTQ,A6 UPPDATE POINTER J 2 P LDK A1,/A SET RET
0x2087c4…208958 Dummy {f00=0x009d, f01=0x0190, f02=» ALL ZEROES ? J P RB(E) MZ80 YES K & P LDKL A2,/FFFF NO, MOVE IN-POINTER K . P ADS A2,DWTDEV+DWTINQ,A6 K X P RB MZ75 K x P EJECT K P* K , P**************************************** K P* K P* ABORT ROUTINE K P* K , P**********
0x208958…208aec Dummy {f00=0x009d, f01=0x0190, f02=»,DWTTP+DWTDEV,A6 K P RF(Z) ABKB05 NO TIMER ! L P CM* DWTTP+DWTDEV,A6 L 8 $ P CM DWTTP+DWTDEV,A6 RESET TIMER L T PABKB05 EQU * L | P XIF L P* L $ P LD A4,DWTST,A6 GET STATUS WORD L & P CF A15,TENDIO END I/O ON KEYBOARD L * P SLC A4,2 GET EC
0x208aec…208c80 Dummy {f00=0x009d, f01=0x418e, f02=»F ECHO DEVICE L n & P LD A3,DWTADR,A4 GET ADDRESS BLOCK M 6 P LD A3,ABTADR,A3 GET ABORT-ADDRESS OF ECHO DEVICE M @ . P RB(Z) ABKB10 ABORT-ADDRESS = 0 ! NO ABORT M z P* M 2 P LDR A6,A4 RESTORE DWT-ADDRESS OF ECHO DEVICE M . P LDKL A5,DWTSB2 STACK BASE 2
0x208c80…208e14 (1, 342) Dummy {f00=0x009e, f01=0x2008, f02=» N
0x208e14…208fa8 Dummy {f00=0x009e, f01=0x0190, f02=» DATA ZERO:3 N P DATA NUMCOM O P DATA COPY O ( P DATA IDENT O : P IFT KEYLST=1 O N P DATA KEYL O d P DATA KEYL O v P DATA KEYL O P DATA KEYL O P DATA KEYL O P DATA KEYL O P DATA KEYL O P DATA KEYL O P XIF O P IFF KEY
0x208fa8…20913c Dummy {f00=0x009e, f01=0x0190, f02=»ATA RETURN O P DATA RETURN P P XIF P & 8 P DATA RETURN FREE LABEL FOR NEW KEY (NOT P. A. KEY) P 2 8 P DATA RETURN FREE LABEL FOR NEW KEY (NOT P. A. KEY) P n 8 P DATA RETURN FREE LABEL FOR NEW KEY (NOT P. A. KEY) P P*FIRST P. A. KEY P P IFT OFLIN
0x20913c…2092d0 Dummy {f00=0x009e, f01=0x0190, f02=» P P DATA SYSREQ Q P DATA CLEAR Q P DATA ATTN Q 0 P XIF Q B P IFF SNA=1 Q N P DATA RETURN Q ` P DATA CLEAR Q t P DATA RETURN Q P XIF Q P IFT NBRLIN=2 Q P DATA MFCHGE Q P XIF Q P IFF NBRLIN=2 Q P DATA RETURN Q P
0x2092d0…209464 Dummy {f00=0x009e, f01=0x018e, f02=»2 Q P DATA PA3 R $ P DATA PAALFA PA4-PA10 (ALFASKOP) R P DATA PAALFA R D P DATA PAALFA R X P DATA PAALFA R l P DATA PAALFA R P DATA PAALFA R P DATA PAALFA R P*B0 R P IFT PFX=1 R P DATA PFEX R P XIF R P IFF PFX=1 R
0x209464…2095f8 Dummy {f00=0x009e, f01=0x0190, f02=» R P DATA PF 7 S P DATA PF 8 S P DATA PF 9 S , P DATA PF 10 S > P DATA PF 11 S R P DATA PF 12 S f P DATA PF 13 S z P DATA PF 14 S P DATA PF 15 S P*C0 S P DATA PF 16 S P DATA PF 17 S P DATA PF 18 S P DATA PF 1
0x2095f8…20978c Dummy {f00=0x009e, f01=0x0190, f02=»RETURN S P XIF T P IFT TEST=1 T P DATA TESTM T . P XIF T B P EJECT T N B P************************************************************** T D P* * T B P* CHAR ALPHABETIC
0x20978c…209920 Dummy {f00=0x009e, f01=0x0190, f02=»************************************ T v P* REGISTERS U , P* U @ P* A2= KEY-CHAR U J P* A3= ATTRIBUTE MASKL U ` P* A4= RESERVED U ~ P* A5= RESERVED U P* A6= RESERVED U P* A11= RESERVED U P* A13= RESERVED U P* U B P**************
0x209920…209ab4 (1, 343) Opaque[0x194]
0x209ab4…209c48 # DirEnt {nam=»DRDI01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x13c8, f03=0x0000}
0x209ab4…209c48 IdxSect {
0x209ab4…209c48 f00 = 0x009e // 0x209ab4 @0x0
0x209ab4…209c48 f01 = 0x0008 // 0x209ab6 @0x2
0x209ab4…209c48 gno = [ // 0x209ab8 @0x4
0x209ab4…209c48 [0x00]: C0x009e.0x1.0
0x209ab4…209c48 [0x01]: C0x009e.0x2.0
0x209ab4…209c48 [0x02]: C0x009e.0x3.0
0x209ab4…209c48 [0x03]: C0x009f.0x0.0
0x209ab4…209c48 ]
0x209ab4…209c48 }
0x209c48…209ddc Dummy {f00=0x009e, f01=0x0190, f02=» 2 P IDENT DRDI01 REL 11.0 81-01-26 870105041100 P : P* B P* L < P******************************************************* V P* $ P* PHILIPS TERMINAL SYSTEM PTS P* * P* DRDI01 = DRIVER INDICATOR DISPLAY P*
0x209ddc…209f70 Dummy {f00=0x009e, 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* IT IS ALSO POSSIBLE TO OPEN CASH- P* BOXES ON FT80. P* 4 P* THE DRIV
0x209f70…20a104 Dummy {f00=0x009e, f01=0x0190, f02=» P* * P* THE FOLLOWING ORDERS ARE TREATED: P* < " P* ORDER 37: WRITE LIGHTS ON F " P* 38: WRITE LIGHTS OFF l ( P* 06: WRITE PROGRAM DISPLAY , P* 39: WRITE FLASHING LIGHTS P EJECT P* P*
0x20a104…20a298 Dummy {f00=0x009e, f01=0x0190, f02=» WORK REGISTER " P* A4: WORK REGISTER " P* A5: WORK REGISTER < P* A6: DWT-ADDRESS b P* A7: ORDER P* A8: ECB-ADDRESS P* P* P* SYSTEM ADAPTATION P* . P*
0x20a298…20a42c Dummy {f00=0x009e, f01=0x0190, f02=»1,6242,6233 t P* : P* ORDER 06, WRITE PROGRAM DISPLAY MAY BE EXCLUDED BY P* CONDITIONAL ASSEMBLY P* | P EJECT P* P* P*************** P* ENTRIES * P*************** P* ( P ENTRY DIAD AD
0x20a42c…20a5c0 Dummy {f00=0x009e, f01=0x0190, f02=»XTRN LENDIS PERFORM END I/O AND DISPATCH * P EXTRN LDISP DISPATCHER ORDINARY INT. 0 P EXTRN OUTPUT SEND ONE CHAR. ^ P EXTRN GETCHR GET CHARACTER $ P EXTRN LENDER I/O REQUEST ERROR P EXTRN DWTST STATUS WORD P EXTRN DWTDEV STATUS
0x20a5c0…20a754 (1, 344) Dummy {f00=0x009e, f01=0x0190, f02=»XTRN ENDBLK END BLOCK $ P EXTRN ECBCW CONTROL WORD OF ECB P* F P* P P EJECT Z P* h P* r P*************** | P* TABLES * P*************** P* P* " P DATA DVBLEN BUFFER SIZE (MMU) P DATA 2 DEVI
0x20a754…20a8e8 Dummy {f00=0x009e, f01=0x0190, f02=»A 0 NO INTERRUPT HANDLER P DATA RCDI RECOVERY ROUTINE P* D " PCCERR EQU /4 CODE CHECK ERROR N P* t P EJECT ~ P* P* P************************* P* CONDITIONAL ASSEMBLY * P************************* P*
0x20a8e8…20aa7c Dummy {f00=0x009e, f01=0x0190, f02=»D6 EQU 0 P* P* 8 P* ORDER 39, WRITE FLASHING LIGHTS MAY BE INCLUDED $ ( P* IN THIS DRIVER BY SETTING X:B=1 ` P* PX:B EQU 0 PFLASH EQU 1 P* P* P EJECT P* P* P* MMU BUFFER SIZE
0x20aa7c…20ac10 Dummy {f00=0x009e, f01=0x0190, f02=»********************* P* PDWTDIB EQU /02 SAVE AREA ( , PDWTFLA EQU /08 SAVE AREA FOR FLASH IMAGE H PDWTTP EQU /0A TIMER POINTER x PTIME EQU 5 FLASH TIME P* P EJECT P* P* A C D I P* > P* ACTIVATION
0x20ac10…20ada4 Dummy {f00=0x009e, f01=0x0190, f02=» CCK A7,/0606 P RF(E) ADI050 ORDER /06 P XIF 6 & P LD A4,ECBCW,A8 CONTROL WORD TO A4 B 8 P LD A3,DWTDEV,A6 TEST IF ONE OR TWO CHARACTER DEVICE l & P RF(N) ADI005 ONE CHARACTER DEVICE " P LDR A3,A4 CONTROL WORD tO A3 P ANK A4,/F
0x20ada4…20af38 Dummy {f00=0x009e, f01=0x0190, f02=» RF(E) FLA05 P XIF P SUK A7,/37 P RF(E) ADI010 ORDER 37 4 P SUK A7,1 R P RF(E) ADI007 ORDER 38 d " P ABL(NE) LENDER REQUEST ERROR P EJECT P IFT FLASH=1 P* P* FLASH ORDER /39 P* P* 2 P
0x20af38…20b0cc Dummy {f00=0x009e, f01=0x018e, f02=»ADY STARTED x P LDR A1,A6 P CF A15,SETIME & P DATA FLTUT,TIME < P ST A4,DWTTP+DWTDEV,A6 T . P LD A4,DWTFLA+DWTDEV,A6 RELOAD FLASH IMAGE r P* PFLA10 EQU * P LDKL A3,/200 ( P XRS A3,DWTDEV,A6 SWITCH 0N-OFF FLAG P*
0x20b0cc…20b260 Dummy {f00=0x009e, f01=0x0190, f02=» j P RF ADI020 TURN ON LAMPS P* ( PFLA20 C1R A4,A4 2 & P ANS A4,DWTDIB+DWTDEV,A6 ON-FLASH J P RF ADI020 TURN OFF LAMPS t P EJECT P* P* P* FLASH TIME OUT ROUTINE P* P* PFLTUT EQU * $ P LDR A
0x20b260…20b3f4 (1, 345) Dummy {f00=0x009e, f01=0x0190, f02=»BUSY v P ANS A4,DWTST,A6 P* $ P LD A4,DWTFLA+DWTDEV,A6 . * P RF(Z) FLA30 NO MORE LAMPS TO FLASHER N P* | * P LDR A5,A6 INITIATE DWT-STACK POINTER P ADKL A5,DWTSB2 P LDKL A1,-TIME RESTART TIMER P ST* A1,DWTTP+DWTDEV,A6
0x20b3f4…20b588 Dummy {f00=0x009e, f01=0x0190, f02=» P LDKL A1,-TIME RESTART TIMER P ST* A1,DWTTP+DWTDEV,A6 ( P ABL LDISP H P XIF Z P EJECT f P IFT ORD6=1 t P* P* ( P* ORDER 06: WRITE PROGRAM DISPLAY P* PADI050 LDK A3,0 & PADI060 CF A15,GETCHR GET CHARA
0x20b588…20b71c Dummy {f00=0x009e, f01=0x0190, f02=»TER ? v P RF(L) ADI100 YES P CWK A4,3 UNDEFINED ? ( P RF(G) ADI100 YES F P ADKL A4,DWTDIB+2 ` P ADR A4,A6 z , P SCR A2,A4 STORE CHARACTER IN DWT-BUFFER " P RB ADI060 GET NEXT CHARACTER < PADI070 SC A1,DWTDEV+1,A6 SET START V
0x20b71c…20b8b0 Dummy {f00=0x009e, f01=0x0190, f02=»00 SEND CHARACTERS P* P* $ P* CODE CHECK ERROR . P* L ( PADI100 LDK A1,CCERR SET RETURN CODE V P ORS A1,8,A8 IN ECB " P RB ADI060 GET NEXT CHARACTER P XIF P* P EJECT P* P* $ P* ORDER 3
0x20b8b0…20ba44 Dummy {f00=0x009e, f01=0x018e, f02=»FT FLASH=1 6 P ANS A4,DWTFLA+DWTDEV,A6 RESET BITS IN FLASH IMAGE P XIF L P RF ADI020 X P* j P* t P* ~ P* P* ORDER 37: TURN ON LAMPS P* P* P* : PADI010 ORS A4,DWTDIB+DWTDEV,A6 SET BITS IN DWT-BUFFE
0x20ba44…20bbd8 Dummy {f00=0x009e, f01=0x018e, f02=» P* SENDING SEQUENCE P* $ " PADI020 LDK A2,/2 BLOCK LENGTH . P CF A5,STABLK START OF BLOCK T P RF(NZ) DIER10 NOT OK ! x 0 P LC A2,DWTDIB+DWTDEV,A6 GET FIRST CHARACTER PADI035 LDK A1,1 6 P SC A1,DWTDEV+1,A6 SET START VALUE I
0x20bbd8…20bd6c Dummy {f00=0x009e, f01=0x0190, f02=» P ADR A2,A6 P LD A4,DWTDEV,A6 P ANK A4,/FF 0 P ADR A2,A4 D P LCR A2,A2 GET CHARACTER V P LD A8,DWTECB,A6 v < P RF(Z) SSEQ10 IF POWER FAIL NO BELL OR CASH-BOX OPENING P LD A3,ECBCW,A8 BELL? P RF(NN) SSEQ05 NO $ P O
0x20bd6c…20bf00 Dummy {f00=0x009e, f01=0x0190, f02=» OF BOX 2 n PSSEQ07 SLC A3,1 OPEN BOX 1 ? P RF(NN) SSEQ10 NO ! 6 0 P ORK A2,/10 YES ! INDICATE OPENING OF BOX 1 R P EJECT P* . PSSEQ10 IM DWTDEV,A6 INCREMENT BYTE COUNTER P* " PSSEQ20 CF A5,OUTPUT SEND CHAR. P RF(NZ)
0x20bf00…20c094 (1, 346) Dummy {f00=0x009f, f01=0x0190, f02=»BYTE COUNTER $ P SUK A4,2 TWO CHARACTERS SENT ? P EJECT < P IFT ORD6=1 J P RF(NZ) SSEQ25 NO ! ^ P LDR A7,A7 GET ORDER z P IFT ORD6=1 0 P CWK A7,06 ORDER 06, WRITE PROGRAM DISPLAY ? P RF(NE) SSEQ30 NO ! $ PSSEQ25 SUK A4,
0x20c094…20c228 Dummy {f00=0x009f, f01=0x0190, f02=»EQ00 NO ! GET NEXT CHARACTER P XIF $ P* 0 $ PSSEQ30 CF A5,ENDBLK END OF BLOCK : P RF(NZ) DIER10 b P* x PENDIO EQU * , P ABL LENDIS PERFORM END I/O AND DISPATCH P EJECT P* P* P* ERROR ROUTINE P*
0x20c228…20c3bc Dummy {f00=0x009f, f01=0x0190, f02=»(N) LDISP YES, GO TO DISPATCHER P* ( P RF RCDI PERFORM RECOVERY 2 P* T PDIER20 EQU * ^ $ P SLC A1,1 SET "NOT OPERABLE" BIT r P RB ENDIO END I/O P EJECT P* P* R C D I P* > P* RECOVERY ROUTINE: AT POWER
0x20c3bc…20c550 Dummy {f00=0x009f, f01=0x4180, f02=» RESTORED r P* P* PRCDI EQU * & " P LDKL A2,/7FFF SET DEVICE BUSY 8 P ANS A2,DWTST,A6 ^ P* v P LDK A2,/4 BLOCK LENGTH P CF A5,STABLK START OF BLOCK P RB(NZ) DIER10 P* 0 P LC A2,DWTDIB+DWTDEV,A6 GET FIRST CH
0x20c550…20c6e4 Dummy {f00=0x009f, 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
0x20c6e4…20c878 Dummy {f00=0x009f, f01=0x0190, f02=»TH IN ECB = 0 ? l , ' ABL(E) MKBEND YES ! COMPLETE REQUEST ! * H * CLEAR ECB-BUFFER R * n " P LD A1,ECBBA,A8 BUFFER ADDRESS x SUK A1,1 $ ADR A1,A2 ADD REQUESTED LENGTH * 8 4AKB230 SCR A3,A1 CLEAR BUFFER UNTIL RE
0x20c878…20ca0c Dummy {f00=0x009f, f01=0x0190, f02=»******************** * * & * M K B 0 $ * MAIN PART OF KEYBOARD DRIVER B * j * t * &************************************** ~ * 4 /* CHECK CIRCULAR INPUT BUFFER. IF IT CONTAINS 2 .* CHARACTERS AND NO OVER
0x20ca0c…20cba0 Dummy {f00=0x009f, f01=0x0190, f02=»TCH A CHARACTER FROM v " LCR A2,A1 CIRCULAR BUFFER END * B P LDR A4,A2 L XRK A4,/FF OVERFLOW ? ^ P RF(NE) MKB130 NO ! | * P SCR A4,A1 YES ! P ENB $ LDK A1,OVMASK SET OVERFLOW BIT ABL MKBEND COMPLETE REQUE
0x20cba0…20cd34 (1, 347) Opaque[0x194]
0x20cd34…20cec8 # DirEnt {nam=»DRDY02«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x13e8, f03=0x0000}
0x20cd34…20cec8 IdxSect {
0x20cd34…20cec8 f00 = 0x009f // 0x20cd34 @0x0
0x20cd34…20cec8 f01 = 0x0022 // 0x20cd36 @0x2
0x20cd34…20cec8 gno = [ // 0x20cd38 @0x4
0x20cd34…20cec8 [0x00]: C0x009f.0x1.0
0x20cd34…20cec8 [0x01]: C0x009f.0x2.0
0x20cd34…20cec8 [0x02]: C0x009f.0x3.0
0x20cd34…20cec8 [0x03]: C0x00a0.0x0.0
0x20cd34…20cec8 [0x04]: C0x00a0.0x1.0
0x20cd34…20cec8 [0x05]: C0x00a0.0x2.0
0x20cd34…20cec8 [0x06]: C0x00a0.0x3.0
0x20cd34…20cec8 [0x07]: C0x00a1.0x0.0
0x20cd34…20cec8 [0x08]: C0x00a1.0x1.0
0x20cd34…20cec8 [0x09]: C0x00a1.0x2.0
0x20cd34…20cec8 [0x0a]: C0x00a1.0x3.0
0x20cd34…20cec8 [0x0b]: C0x00a2.0x0.0
0x20cd34…20cec8 [0x0c]: C0x00a2.0x1.0
0x20cd34…20cec8 [0x0d]: C0x00a2.0x2.0
0x20cd34…20cec8 [0x0e]: C0x00a2.0x3.0
0x20cd34…20cec8 [0x0f]: C0x00a3.0x0.0
0x20cd34…20cec8 [0x10]: C0x00a3.0x1.0
0x20cd34…20cec8 ]
0x20cd34…20cec8 }
0x20cec8…20d05c Dummy {f00=0x009f, f01=0x018e, f02=» 2 P IDENT DRDY02 REL 11.1 82-12-13 870105041110 P : " P =13 HONG KONG PROBLEM ULSU B * P =POHO,ERROR WHEN ECHO AND RECOVERY h P =POHO,REL 11.1 82-02-12 4 P =12 A5 DESTROYED BY TIMER, CHANGE IN RECOVERY P REL 11.0 81-12-23
0x20d05c…20d1f0 Dummy {f00=0x009f, f01=0x0190, f02=» z 0 P =10 ECBRL DESTROYED BY ORDER 05 IF X:E=1 P REL 11.0 81-09-30 < 6 P =9 ERR. FOR 6342/51 AND EMPTY BLOCK IN ORD. /05 X : P CHAR. CHECK AT FAST OUTPUT. ULINE&LOWINT ON 6387 P REL 11.0 81-09-17 2 P = 8 ERROR FOR 6342 & 6351
0x20d1f0…20d384 Dummy {f00=0x009f, f01=0x018e, f02=»SUPPRESSION OF TRAILING BLANKS" REMOVED FROM BASIC WRITE P REL 11.0 81-06-24 @ . P = 5 SUPPRESSION OF TABULATION CORRECTED P REL 11.0 81-05-24 8 P = 4 GREEK CHARACTER SET HANDLING & NEW CONDITIONS P REL 11.0 81-04-06 8 P = 3
0x20d384…20d518 Dummy {f00=0x009f, f01=0x018e, f02=» P REL 11.0 81-02-13 0 P = 1 ECB-ADDRESS CHECKED IN ERROR-ROUTINE P REL 11.0 81-02-03 T P* p @ P************************************************************ z P* P* P* & P* PHILIPS TERMINAL SYSTEM P T S & P*
0x20d518…20d6ac Dummy {f00=0x009f, f01=0x0190, f02=» P* 0 P* THIS DRIVER HANDLES OUTPUT TO THE VIDEO 0 P* DISPLAYS PTS 6342, 6344, 6346 AND TO THE B * P* DISPLAYS PTS 6351, 6385 AND 6386. v 2 P* THE DRIVER INCLUDES DEVICE DEPENDENT ECHO- 0 P* FUNCTIONS WHICH MAKES IT POSSIBLE TO USE
0x20d6ac…20d840 Dummy {f00=0x009f, f01=0x0190, f02=» j P* P* ORDER 00 TEST STATUS P* 05 BASIC WRITE 6 " P* 06 STANDARD WRITE Z ( P* 0B SET CURSOR AND WRITE P* 31 ERASE P* P* P* NORMAL REGISTER USAGE : P*
0x20d840…20d9d4 (1, 348) Dummy {f00=0x009f, f01=0x0190, f02=» A4 = WORKING REGISTER $ P* A5 = STACK BASE * $ P* A6 = DWT-ADDRESS R P* A7 = ORDER z $ P* A8 = ECB-ADDRESS P* P* P* ENTRIES P* P* ( P ENTRY D
0x20d9d4…20db68 Dummy {f00=0x009f, f01=0x0190, f02=»XTRN LENDER I/O-REQUEST ERROR " P EXTRN LENDIS END I/O-REQUEST & P EXTRN STABLK START OF BLOCK L P EXTRN OUTPUT SEND p P EXTRN ENDBLK END OF BLOCK 2 P EXTRN GETCHR FETCH CHARACTER FROM ECB-BUFFER $ P EXTRN ECHRTN RETURN TO KEYBOARD
0x20db68…20dcfc Dummy {f00=0x009f, f01=0x0190, f02=» P* ( P EXTRN DWTDEV TERMINAL DEVICE STATUS P EXTRN DWTST DEVICE STATUS : P EXTRN DWTOR ORDER P EXTRN DWTSB2 STACK BASE v ( P EXTRN DWTA5 SAVE AREA FOR A5 =POHO P* P* ECB DISPLACEMENTS P* P EXTRN ECBBA BUFFER
0x20dcfc…20de90 Dummy {f00=0x009f, f01=0x0190, f02=» CONTROL WORD P* @ P************************************************************ P* d P* CONSTANTS n P* @ P************************************************************ P* P* DWT DISPLACEMENTS P* & PDWTA
0x20de90…20e024 Dummy {f00=0x009f, f01=0x0190, f02=»DWTBLC EQU /6 CHARACTERS IN BLOCK PDWTTP EQU /8 TIMER POINTER * , PDWTSB3 EQU /3E RECOVERY STACK BASE =POHO L 2 PDWTSA5 EQU /40 SAVE AREA FOR A5 RECOVERY =POHO | PDWTRC1 EQU /42 .=13 P* P* CHARACTERS P* PDUMMY EQU /3 DUM
0x20e024…20e1b8 Dummy {f00=0x009f, f01=0x0190, f02=»QU /0C CLEAR AND CURSOR HOME PCR EQU /0D CARRIAGE RETURN $ PCURRIG EQU /10 CURSOR RIGHT F $ PSCADD EQU /11 SET CURSOR ADDRESS j " PULSTOP EQU /13 UNDERLINE STOP PFASOUT EQU /14 FAST OUTPUT PSTILL EQU /18 CURSOR STEADY $ PCTYCOD EQU
0x20e1b8…20e34c Dummy {f00=0x009f, f01=0x0190, f02=» " PCCERR EQU /4 CODE CHECK ERROR P* . P* OTHER 8 P* J PMINBLK EQU 6 BLOCK SIZE T @ PFASTNR EQU 6 LEAST NUMBER OF CHARS TO SEND WITH FAST OUTPUT t PTIME EQU 1 P* @ P****************************************************
0x20e34c…20e4e0 Dummy {f00=0x009f, f01=0x0190, f02=»DVBLEN BUFFER LENGTH P DATA 2 DEVICE INDEX PDYAD EQU * 8 ( P DATA ACDY DRIVER ACTIVATION ADDRESS J P DATA ABDY ABORT ROUTINE v P DATA 0 NO INTERRUPT HANDLER P DATA RCDY RECOVERY ROUTINE P DATA ECHODY ECHO ROUTINE P* @
0x20e4e0…20e674 (1, 349) Dummy {f00=0x009f, f01=0x0190, f02=»********************************************** P* 6 4 P* IF THE CONSTANT X:A IS SET TO 1, FAST OUTPUT @ < P* WILL BE USED IF A NUMBER (SEE THE CONSTANT "FASTNR") x 8 P* OF CONSECUTIVE CHARACTERS IN THE ECB-BUFFER ARE P* FOUND EQUAL.
0x20e674…20e808 Dummy {f00=0x009f, f01=0x0190, f02=»6344 P P* 6346, 6385 AND 6386. P* , PX:B EQU 0 6 PWHATDY EQU 0 H P* P* f 8 P* BY SETTING X:C TO 1 LOWER CASE CHAR. GENERATOR p & P* (COLUMNS 6 AND 7) CAN BE USED PX:C EQU 1 PLOWCHA EQU 1 P* P*
0x20e808…20e99c Dummy {f00=0x009f, f01=0x0190, f02=»S IS ATTAINED BY SETTING THE CONSTANT X:G=0 P* 4 PX:D EQU 0 > PEORECH EQU 0 P P* d 0 P* BY SETTING THE CONSTANT TRASPA = 1 IT IS n T P* POSSIBLE TO SUPPRESS TRAILING BLANKS, TABULATIONS, /1E AND /1F. (NOT BASIC W P* PX:E
0x20e99c…20eb30 Dummy {f00=0x009f, f01=0x018e, f02=» PX:F EQU 1 PSTEADY EQU 1 P* * 4 P* BY MEANS OF CONDITIONAL ASSEMBLY IT IS POS- 4 . P* SIBLE TO CHOOSE BETWEEN TEN DIFFERENT l , P* CHARACTER SETS, IF PTS 6385 IS USED. P* P* CODE COUNTRY P* 0 GB/NL/B P* 1 D/
0x20eb30…20ecc4 Dummy {f00=0x009f, f01=0x0190, f02=» PX:G EQU 0 PCOUNTRY EQU 6 P* , & P* MEMORY MANAGEMENT BUFFER SIZE 6 P* ` PX:H EQU 82 j PDVBLEN EQU 162 | P* P* MAXIMUM BLOCK SIZE P* PX:J EQU 140 PMAXBLK EQU X:J P* L P* X:I SHOULD B
0x20ecc4…20ee58 Dummy {f00=0x009f, f01=0x0190, f02=» IT IS POSSIBLE TO USE GREEK =4 P* CHARACTER SET =4 ( P* F PX:K EQU 0 =4 P PGREECE EQU X:K =4 f P* 4 P* IF DISPLAY VD 87 IS USED, X:L SHOULD BE 1 =7 8 P* THE WORD DWTDEV IN THE DISPLAY-DWT SHOULD BE SET . P* TO /AE
0x20ee58…20efec Dummy {f00=0x009f, f01=0x0190, f02=»*************************************** P* 0 & P* A C T I V A T I O N P A R T : P* d 4 P* THIS PART MAKES A START OF BLOCK, CHECKS THE n 8 P* REQUESTED ORDER AND BRANCHES TO THE APPROPRIATE P* PART OF THE DRIVER. P*
0x20efec…20f180 Dummy {f00=0x009f, f01=0x0190, f02=»DWTBLC+DWTDEV,A6 CLEAR CHARACTER COUNTER $ P LDKL A2,MAXBLK MAX. BLOCK SIZE 0 P CF A5,STABLK START OF BLOCK X P RF(NZ) DYER10 | P* P* TEST ORDER P* P LDR A7,A7 GET ORDER & P RF(Z) DY100 ORDER 00, TEST STATUS P*
0x20f180…20f314 (1, 350) Dummy {f00=0x00a0, f01=0x0190, f02=»* P SUK A7,/5 0 P ABL(Z) DY600 ORDER 0B, SET CURSOR AND WRITE P* P P SUK A7,/26 Z " P ABL(Z) DY700 ORDER 31, ERASE n P IFT VD87=1 =7 P ADK A7,/A 0 P ABL(Z) ORD27 ORDER /27, TRANSFER PARAMETERS P XIF P* P
0x20f314…20f4a8 Dummy {f00=0x00a0, f01=0x0190, f02=»* @ P************************************************************ P* N P* ORDER 00, TEST STATUS. X 8 P* THIS PART SENDS A DUMMY CHARACTER TO THE DISPLAY z : P* AND SETS BIT 15 IN THE RETURN CODE IF THE DISPLAY P* IS NOT OPERABLE.
0x20f4a8…20f63c Dummy {f00=0x00a0, f01=0x0190, f02=»E RIGHT. P* @ P************************************************************ P* ^ PDY100 EQU * h P LDK A2,DUMMY | P CF A5,OUTPUT SEND DUMMY P RF(NZ) DYER10 P* . P LD A4,DWTAP+DWTDEV,A6 GET CURSOR POSITION 0 P ST
0x20f63c…20f7d0 Dummy {f00=0x00a0, f01=0x0190, f02=»************************ l P* P* ORDER 05, BASIC WRITE. * 0 P* THIS ORDER SENDS THE REQUESTED NUMBER OF L . P* CHARACTERS TO THE DISPLAY AND SETS THE 0 P* INTERNAL CURSOR POSITION COUNTER TO HOME P* POSITION. (/0101) P*
0x20f7d0…20f964 Dummy {f00=0x00a0, f01=0x0190, f02=»ROM ECB-BUFFER p 0 P LDR A1,A1 IS THERE ANY CHARACTER TO SEND ? P RF(NP) DY210 NO J P IFT GREECE=1 =4 b P CF A15,GRCHAR =4 | P XIF P* & P CF A5,OUTPUT YES ! SEND CHARACTER P RF(NZ) DYER05 P* * P CF A15,POSUPD UPD
0x20f964…20faf8 Dummy {f00=0x00a0, f01=0x018e, f02=» IM DWTBLC+DWTDEV,A6 INCREMENT CHARACTER COUNTER " P LDKL A2,MAXBLK GET BLOCKSIZE 8 * P CW A2,DWTBLC+DWTDEV,A6 BLOCK FILLED ? ^ P* $ P RB(G) DY200 NO ! NEXT CHARACTER P* $ P CF A15,GETCHR MORE TO SEND ? =9 P LDR A1,A1 =9 P R
0x20faf8…20fc8c Dummy {f00=0x00a0, f01=0x0190, f02=» " P LDKL A2,MAXBLK GET BLOCKSIZE " P CF A5,STABLK START NEW BLOCK * P RF(NZ) DYER05 P 0 P CM DWTBLC+DWTDEV,A6 RESET CHARACTER COUNTER f P RB DY200 NEXT CHARACTER P* PDY210 EQU * * P CF A15,UPDAPP RESET POSITION COUNTER P*
0x20fc8c…20fe20 Dummy {f00=0x00a0, f01=0x0190, f02=»ET CHARACTERS-IN-BLOCK COUNTER x P* & P ABL DY495 END REQUEST =10 0 P* R PDYER05 EQU * B P CM DWTBLC+DWTDEV,A6 RESET CHARACTERS-IN-BLOCK COUNTER BEFORE p ( P RF DYER10 ERROR ROUTINE IS ENTERED P EJECT P* @ P**************
0x20fe20…20ffb4 (1, 351) Dummy {f00=0x00a0, f01=0x0190, f02=»TED LENGTH IS ZERO. n > P* IF IT IS, CARRIAGE RETURN AND LINE FEED ARE SENT, AND " P* THE REQUEST IS COMPLETED. ^ F P* ELSE THIS PART LOOKS FOR A CONTROL CHARACTER IN THE FIRST WORD @ P* IN THE ECB-BUFFER AND CARRIES OUT THE DESIRED FUNCTION
0x20ffb4…210148 Dummy {f00=0x00a0, f01=0x018e, f02=»* CHARACTER ( /07, /11, /12, /13, /14, /1E, /1F, /AE ) IS RECOGNIZED. B P* IF A SPECIAL CHARACTER IS FOUND, THE APPROPRIATE FUNCTION P 6 P* IS CARRIED OUT BEFORE NEXT CHARACTER IS SENT. < P* WHEN ALL CHARACTERS ARE SENT, THE CURSOR POSITION IS
0x210148…2102dc Dummy {f00=0x00a0, f01=0x0190, f02=» PDY300 EQU * P* P* TEST REQUESTED LENGTH & P* H 6 P LD A2,ECBRL,A8 GET REQUESTED LENGTH. IS IT ZERO ? R P RF(Z) DY307 YES ! P* P* TEST CONTROL CHARACTER P* & P LD A2,ECBBA,A8 GET BUFFER ADDRESS & P L
0x2102dc…210470 Dummy {f00=0x00a0, f01=0x0190, f02=» DY335 NO MOVING OF CURSOR PDY307 EQU * ! " P* ! 6 0 P LDK A4,1 FIRST POSITION AND ONE LINE FEED. ! @ 8 P SC A4,DWTAP+DWTDEV+1,A6 RESET HEAD POSITION COUNTER ! t P* ! P SUK A2,/5 TWO LINE FEED ? ! P RF(NZ) DY310 NO ! ! * P LDK A4,2 YES ! IN
0x210470…210604 Dummy {f00=0x00a0, f01=0x0190, f02=» P* " P LDK A2,CR CARRIAGE RETURN " P* " 0 PDY320 EQU * " : P CF A5,OUTPUT SEND " N PDYER10 RF(NZ) DYER15 " h P* " P SUK A4,1 READY ? " 0 P RF(N) DY335 YES ! START WRITING ON DISPLAY " P* " < P LC A1,DWTLIN+DWTDEV,A6 MAX. NUMBE
0x210604…210798 Dummy {f00=0x00a0, f01=0x0190, f02=»NO ! INCREMENT LINE COUNTER " P ADS A2,DWTAP+DWTDEV,A6 # $ PDY325 EQU * # D " P LDK A2,LF LINE FEED CHARACTER # X " P RB DY320 SEND NEXT LINE FEED # ~ P* # PDY330 EQU * # . P SC A4,DWTAP+DWTDEV,A6 RESET LINE COUNTER # ( P LDK A2,CLEHOM CLEAR
0x210798…21092c Dummy {f00=0x00a0, f01=0x0190, f02=» WRITING PART, ORDER 06 (ALSO USED BY ORDER 0B). # P* $ : P* $ D PDY335 EQU * $ N P IFT TRASPA=1 $ b * P CF A15,TRASP SUPPRESS TRAILING SPACES $ x P XIF $ PDY340 EQU * $ 0 P CF A15,GETCHR GET CHARACTER FROM ECB-BUFFER $ P* $ & P LDR
0x21092c…210ac0 Dummy {f00=0x00a0, f01=0x0190, f02=» P LDR A4,A2 CHECK CODE LIMITS % P SUK A4,/20 % ( * P RF(N) DY380 TEST IF SPECIAL CHARACTER % < P SUK A4,/5F % j * P RF(P) DY380 TEST IF SPECIAL CHARACTER % ~ P IFT FASTO=1 % P IFT WHATDY=1 % 6 P LDK A4,0 RESET A4 BEFORE ENTERING THE OUTPUT SEQ.
0x210ac0…210c54 (1, 352) Dummy {f00=0x00a0, f01=0x0190, f02=»* % P* & 2 P* FAST OUTPUT SHOULD BE USED IF A NUMBER OF & $ P* CHARACTERS ARE FOUND EQUAL. & J P* & r P* & | & P LD A1,ECBBA,A8 GET BUFFER ADDRESS & P ADR A1,A3 ADD BUFFER INDEX & P* & P* & 4 P LC A4,DWTBC+DWTDEV,A6 GET POSIT
0x210c54…210de8 Dummy {f00=0x00a0, f01=0x0190, f02=»UNTER & p 6 P CCR A2,A1 NEXT CHAR. IN BUFFER EQUAL TO CURRENT ? ' P RF(NE) FAST40 NO ! ' H P* ' d , P CC A4,DWTPOS+DWTDEV,A6 MAX. POSITIONS ? ' n P RF(NL) FAST40 YES ! ' P* ' & P CW A3,ECBRL,A8 REQUESTED LENGTH ? ' P RF(NL) FAST40 YES ! '
0x210de8…210f7c Dummy {f00=0x00a0, f01=0x0190, f02=» LD A1,DWTAP+DWTDEV,A6 GET NUMBER OF EQUAL CHARACTERS ' P AD A1,DWTBC+DWTDEV,A6 ( > P ANK A1,/FF ( P SUR A4,A1 ( p P* ( 6 P CWK A4,FASTNR COND. FOR FAST OUTPUT FULLFILLED ? ( P RF(L) FAST80 NO ! ( P* ( . P* YES ! SEND CHARACTERS WITH
0x210f7c…211110 Dummy {f00=0x00a0, f01=0x018e, f02=»DR A4,A3 ( P* ) P IFT LOWCHA=0 ) P LDR A3,A2 ) 0 P SUK A3,/5F ) B P RF(NP) FAST30 ) V P SUK A2,/20 ) l PFAST30 EQU * ) P XIF ) P IFT FASTO=1 ) $ P LDR A3,A2 PUT CHARACTER INTO A3 ) P* ) P CF A5,FASTER ) P* ) & P L
0x211110…2112a4 Dummy {f00=0x00a0, f01=0x0190, f02=» P AD A4,DWTAP+DWTDEV,A6 * P* * " P CF A5,CURPOS SET CURSOR * , P RB DY340 NEXT CHARACTER * L PFAST80 EQU * * l P XIF * P* * $ P IFT LOWCHA=0 LOWER CASE IS USED * P LDR A1,A2 * P SUK A1,/5F * P RF(NP) DY360 * P SUK A2,/20 *
0x2112a4…211438 Dummy {f00=0x00a0, f01=0x0190, f02=»PD POSITION COUNTER UPDATE * P IFT FASTO=1 + " P IFT WHATDY=1 + 6 * P LD A1,DWTDEV,A6 6344, 6385 OR 6386 ? + L P ANKL A1,/1000 + z P RF(NZ) FAST90 NO ! + P XIF + P IFT FASTO=1 + * P SUK A4,1 DECREMENT CHARACTER COUNTER + 2 P RB(NP) DY340
0x211438…2115cc Dummy {f00=0x00a0, f01=0x0190, f02=»2,/7F MASK CHARACTER + P RB FAST80 , PFAST90 EQU * , . P XIF , B P RB DY340 NEXT CHARACTER , N P* , n " P* TEST IF SPECIAL CHARACTER , x P* , PDY380 EQU * , P LDK A4,0 RESET A4 , P LDR A1,A2 CHARACTER , P* , P SUK A1,/07
0x2115cc…211760 Dummy {f00=0x00a0, f01=0x0190, f02=»ATION ROUTINE , p P* - $ P SUK A1,/3 FAST OUTPUT ( /14 ) ? - * P RF(Z) DY390 YES ! GO TO THAT ROUTINE - H P* - v P SUK A1,/9A POINT ( /AE ) ? - $ P RF(Z) DY410 YES ! LOAD AND SEND - P IFF WHATDY+PLASM=0 =4 - 0 P LD A4,DWTDEV,A6 CHECK WHICH
0x211760…2118f4 (1, 353) Dummy {f00=0x00a0, f01=0x018e, f02=»9 - P XIF . P* . * P ADK A1,/9C UNDERLINE START ( /12 ) ? . P RF(Z) DY467 YES ! . N P* . h ( P SUK A1,/1 UNDERLINE STOP ( /13 ) ? . r P RF(Z) DY467 YES ! . P* . , P SUK A1,/B LOW INTENSITY START ( /1E) ? . P RF(Z) DY467 YES ! .
0x2118f4…211a88 Dummy {f00=0x00a0, f01=0x0190, f02=» PDY385 EQU * / " P LDK A1,CCERR CODE CHECK ERROR / , P ORS A1,ECBRC,A8 SET RETURN CODE OF ECB / > P RB DY340 NEXT CHARACTER / n P EJECT / P* / P* ROUTINE FOR FAST OUTPUT / P* / PDY390 EQU * / P IFT TRASPA=1 / * P LD A4,ECB
0x211a88…211c1c Dummy {f00=0x00a0, f01=0x0190, f02=»RL,A8 REQUESTED LENGTH / 0 P SUR A4,A3 GET NUMBER OF CHARACTERS TO SEND 0 P RF(NP) DY400 NONE ! 0 R P IFT GREECE=1 =4 0 n P CF A15,GRCHAR =4 0 P XIF 0 P* 0 $ P LDR A3,A2 LOAD CHARACTER IN A3 0 P SUK A2,/20 IS CHAR. OK ? =9 0 P RB(
0x211c1c…211db0 Dummy {f00=0x00a0, f01=0x0190, f02=» PDY400 EQU * 1 6 P LD A3,ECBRL,A8 GET REQ. LEN. TO STORE IN EFF. LEN 1 P* 1 R $ PDY405 RF DY470 GO TO COMMON END 1 P* 1 P* SEND A POINT 1 P* 1 PDY410 EQU * 1 " P LDK A2,/2E GET CODE FOR POINT 1 P RB DY370 SEND POINT 1 P*
0x211db0…211f44 Dummy {f00=0x00a0, f01=0x0190, f02=» P EJECT 2 @ P************************************************************ 2 P* 2 V P* TABULATION 2 ` P* 2 x @ P************************************************************ 2 PADY140 EQU * 2 , P CF A15,GETCHR GET FIRST ASCII CHARACTER 2
0x211f44…2120d8 Dummy {f00=0x00a0, f01=0x0190, f02=»DK A2,/A FROM DECIMAL TO HEXADECIMAL 2 P SUK A4,1 3 , P RB(NE) ADY143 3 > " PADY144 LC A4,DWTAP+DWTDEV+1,A6 3 T . P SUR A2,A4 SUBTRACT HEAD POSITION POINTER 3 z P LC A4,DWTBC+DWTDEV,A6 3 , P SUR A2,A4 AND REQUESTS POSITION COUNTER 3 & P TO GET NUMB
0x2120d8…21226c Dummy {f00=0x00a0, f01=0x0190, f02=»PUT 3 P RF(NZ) DYER20 4 , P CF A15,POSUPD POSITION COUNTER UPDATING 4 " P SUK A4,1 READY ? 4 R P RB(NE) ADY145 NO 4 l P ABL DY340 NEXT CHARACTER 4 P EJECT 4 B P************************************************************** 4 P* 4 > P*
0x21226c…212400 Dummy {f00=0x00a0, f01=0x0190, f02=»************************************************* 4 P* 5 : PDY470 EQU * 5 D " P LDK A2,ULSTOP UNDERLINE STOP 5 X P CF A5,OUTPUT SEND 5 ~ PDYER20 RF(NZ) DYER30 5 P* 5 & P LDK A2,LISTOP LOW INTENSITY STOP 5 P CF A5,OUTPUT SEND 5 P RF(NZ
0x212400…212594 (1, 354) Dummy {f00=0x00a1, f01=0x0190, f02=»T A2,ECBRL,A8 RESTORE OLD REQUESTED LENGTH 5 P XIF 6 2 PDY495 EQU * =10 6 > , P ST A3,ECBEL,A8 STORE EFF. LENGTH IN ECB 6 V 4 P LD A2,DWTAP+DWTDEV,A6 SET HEAD POSITION POINTER 6 * P ST A2,ECBCW,A8 IN CONTROL WORD OF ECB 6 PENDIO EQU * 6 P CF A5,E
0x212594…212728 Dummy {f00=0x00a1, f01=0x0190, f02=»************** 6 b P* 7 ( P* ORDER 0B, SET CURSOR AND WRITE. 7 8 P* THIS ORDER SETS CURSOR TO THE POSITION GIVEN IN 7 L 8 P* THE CONTROL WORD OF ECB AND SENDS THE CHARACTERS 7 : P* TO THE DISPLAY, CHECKING THE SAME SPECIAL CHARAC- 7 P* TE
0x212728…2128bc Dummy {f00=0x00a1, f01=0x018e, f02=» WHATDY=1 7 0 P LD A4,DWTDEV,A6 6344, 6346, 6385 OR 6386 ? 8 P ANKL A4,/1000 8 F P RF(Z) DY610 YES ! 8 P* GET LINE 8 v P LDK A4,0 =8 8 & P LC A4,ECBCW,A8 GET REQUESTED LINE 8 , P CC A4,DWTLIN+DWTDEV,A6 OUTSIDE SCREEN? 8 P RF(NG) ADY2
0x2128bc…212a50 Dummy {f00=0x00a1, f01=0x0190, f02=» 8 h PADY210 CWR A4,A3 9 . P RF(N) ADY250 REQUESTED LINE ABOVE ACTUAL 9 P RF(E) ADY300 SAME LINE 9 R P LDK A2,LF LINE FEED 9 r * P ADK A3,1 INCREMENT ACTUAL LINE NUMBER 9 PADY230 CF A5,OUTPUT SEND 9 P RF(NZ) DYER30 9 P LDR A4,A4 REQUESTED L
0x212a50…212be4 Dummy {f00=0x00a1, f01=0x0190, f02=»TUAL LINE NUMBER 9 ~ * P ST A3,DWTAP+DWTDEV,A6 RESET POSITION : P RB ADY230 : F P* : X P* : b P* GET POSITION : l P* : : PADY300 SC A4,DWTAP+DWTDEV,A6 UPDATE HEAD LINE COUNTER : , P LC A4,ECBCW+1,A8 GET REQUESTED POSITION : , P CC A4,DWT
0x212be4…212d78 Dummy {f00=0x00a1, f01=0x0190, f02=»4,1 FIRST POSITION ? : P RF(NE) ADY305 NO ; P CWR A4,A3 FIRST LINE ? ; 6 P RF(NE) ADY305 NO ; V P LDK A2,HOME CURSOR GO HOME ; p P RF ADY330 ; * PADY305 RF(NL) ADY307 REQ. POS NOT ZERO ; P LDK A4,1 ; 6 PADY307 LC A3,DWTAP+DWTDEV+1,A6 GET
0x212d78…212f0c Dummy {f00=0x00a1, f01=0x0190, f02=» BACKWARDS ; t P RF(E) ADY370 POSITION FOUND < P RF(N) ADY340 BACK < 6 P LDK A2,CURRIG CURSOR RIGHT < P & P ADK A3,1 UPDATE POSITION COUNTER < t PADY330 CF A5,OUTPUT SEND < P RF(NZ) DYER30 < P RB ADY310 < . PADY340 SUR A3,A4 ACTUAL POS. - WAN
0x212f0c…2130a0 Dummy {f00=0x00a1, f01=0x0190, f02=»DK A3,1 INDICATE FIRST POSITION < P RB ADY330 = ( " PADY345 LDK A2,BACKSP BACKSPACE = : P CF A5,OUTPUT SEND = ` P RF(NZ) DYER30 = z P SUK A3,1 LAST BACKSPACE ? = P RB(NE) ADY345 = @ PADY370 SC A4,DWTAP+DWTDEV+1,A6 UPDATE HEAD POSITION POINTER =
0x2130a0…213234 (1, 355) Dummy {f00=0x00a1, f01=0x0190, f02=»E HEAD POSITION COUNTER = t ( P CF A5,CURPOS SET CURSOR ON DISPLAY > P* > L PDY620 EQU * > V P LDK A3,2 START BUFFER INDEX > j 2 P ABL DY335 SEND CHARACTERS WITH STANDARD WRITE > P EJECT > @ P******************************************************
0x213234…2133c8 Dummy {f00=0x00a1, f01=0x0190, f02=»* > @ P************************************************************ ? PCURPOS EQU * ? N $ P LDK A2,SCADD SET CURSOR ADDRESS ? b P CF A5,OUTPUT SEND ? P RF(NZ) DYER30 ? P* ? P LDR A2,A4 GET POSITIONS ? 6 P CC A4,DWTPOS+DWTDEV,A6 MORE THAN MA
0x2133c8…21355c Dummy {f00=0x00a1, f01=0x018e, f02=»NVERT ? | P CF A5,OUTPUT SEND @ PDYER30 RF(NZ) DYER32 @ ( P* @ D P LDR A2,A4 @ N P SRL A2,8 GET LINES @ ` 2 P CC A2,DWTLIN+DWTDEV,A6 MORE THAN MAX. LINES ? @ | P RF(NG) CURR20 NO ! @ 0 P LC A2,DWTLIN+DWTDEV,A6 YES ! SET MAX LINES @ P* @
0x21355c…2136f0 Dummy {f00=0x00a1, f01=0x0190, f02=» P IFT VD87=1 =7 A < P******************************************************** A P* A ( P* ORDER /27. TRANSFER PARAMETERS. A f ( P* THIS ORDER MAKES IT POSSIBLE TO A , P* CHANGE BACKGROUND COLOUR, CHARACTER A , P* WIDTH, SCREEN INTENSIT
0x2136f0…213884 Dummy {f00=0x00a1, f01=0x0190, f02=»******************************************* A P* B 4 PORD27 EQU * B > $ P LD A3,ECBCW,A8 GET CONTROL WORD B R & P SLC A3,1 ADJUST CW FOR SUBROUTINE B z $ P CF A15,TSTBIT CHECK BITS IN CW B P LDR A2,A2 B & P RF(Z) TEST10 NO CHANGE IN COLOUR B P
0x213884…213a18 Dummy {f00=0x00a1, f01=0x0190, f02=» A4,/3000 GET CONTROL CHARACTER B P CF A5,PSEND1 AND SEND IT C ( P* C J PTEST10 EQU * C T $ P CF A15,TSTBIT CHECK BITS IN CW C h P LDR A2,A2 C $ P RF(Z) TEST20 NO CHANGE IN WITDH C P* C P SLC A4,5 CHANGE WIDTH C P CF A15,SETBIT C P
0x213a18…213bac Dummy {f00=0x00a1, f01=0x0190, f02=»O HOME POS. C r 0 P ST A4,DWTAP+DWTDEV,A6 WHEN WIDTH IS CHANGED D P* D H PTEST20 EQU * D R P CF A15,TSTBIT CHECK CW D f P LDR A2,A2 D ( P RF(Z) TEST30 NO CHANGE IN INTENSITY D P* D P SLC A4,6 CHANGE INTENSITY D P CF A15,SETBIT D P S
0x213bac…213d40 Dummy {f00=0x00a1, f01=0x0190, f02=»IT CHECK CW D P LDR A2,A2 E & P RF(Z) TEST40 NO CHANGE OF CURSOR E & P* E P P SLC A4,7 CHANGE CURSOR MODE E Z P CF A15,SETBIT E ~ P SRC A2,7 E P ST A2,DWTDEV,A6 E P LCK A4,/1500 E P CF A5,PSEND2 E P* E PTEST40 EQU * E P
0x213d40…213ed4 (1, 356) Dummy {f00=0x00a1, f01=0x0190, f02=»DER 31, ERASE. E < P* SENDS THE NUMBER OF SPACES THAT IS GIVEN IN CONTROL F . P* WORD OF ECB. THE CURSOR IS NOT MOVED. F V P* F @ P************************************************************ F P* F PDY700 EQU * F 6 P LD A4,ECBCW,A8 GET
0x213ed4…214068 Dummy {f00=0x00a1, f01=0x0190, f02=» DY750 YES ! F P* G , P LD A2,DWTPOS+DWTDEV,A6 MAX. CHARACTERS G P ANK A2,/FF G N . P LC A3,DWTAP+DWTDEV+1,A6 CURRENT POSITION G b P ANK A3,/FF G , P SUR A2,A3 NR OF CHARS. TO END OF SCREEN G P LDK A3,0 ADJUST =8 G P ADK A2,1 ADJUST LEN
0x214068…2141fc Dummy {f00=0x00a1, f01=0x0190, f02=»710 EQU * G " P ADR A3,A4 CHARACTERS TO ERASE H PDY720 EQU * =8 H 8 P LDK A2,/20 SPACE H P , P SUK A4,1 DECREMENT NUMBER OF CHARACTERS H j P RF(N) DY730 ERASE READY H P* H P CF A5,OUTPUT SEND H P RF(NZ) DYER40 H P RB DY720 H P*
0x2141fc…214390 Dummy {f00=0x00a1, f01=0x018e, f02=»T OF NEW BLOCK H ~ P RF(NZ) DYER40 I P LDR A4,A3 RESET COUNTER I , PDY740 EQU * =8 I L " P LDK A2,BACKSP CURSOR LEFT =8 I d , P SUK A4,1 CURSOR IN ORIGINAL POSITION ? I P ABL(N) ENDIO YES ! I . P CF A5,OUTPUT NO ! SEND ANOTHER BACKSPACE I P
0x214390…214524 Dummy {f00=0x00a1, f01=0x0190, f02=» I j P ABL ENDIO J P EJECT J @ P************************************************************ J ( P* J l . P* ECHODY, DEVICE-DEPENDENT ECHO-ROUTINE J v 0 P* THIS ROUTINE CHECKS IF THE ECHO-CHARCTER J . P* IS A BACKSPACE, CLEAR OR EOR-KEY ( IF J
0x214524…2146b8 Dummy {f00=0x00a1, f01=0x0190, f02=» P* K @ P************************************************************ K P* K R PECHODY EQU * K P LDR A7,A7 END OF ECHOING ? K p P RF(NN) EDY110 NO ! K P LD A4,DWTRC1,A6 . =13 K P RF(NZ) EDY105 . =13 K P* K P* K 0 P CF A15,UP
0x2146b8…21484c Dummy {f00=0x00a1, f01=0x018e, f02=»DY105 NO,END I/O AND RETURN =POHO K , P CM DWTBLC+DWTDEV,A6 RESET COUNTER =POHO L * " P CF A5,ENDBLK SEND BLOCK =POHO L Z PEDY105 EQU * . =POHO L P CF A15,TENDIO END I/O =POHO L ( P RF EDY130 RETURN TO KEYBOARD =POHO L P* L PEDY110 EQU * L
0x21484c…2149e0 Dummy {f00=0x00a1, f01=0x0190, f02=» P CF A15,GRCHAR =4 =4 M P XIF =4 M " P LDR A3,A2 SAVE CHARACTER M 4 P* M V P IFT EORECH=0 M ` P SUK A3,/80 M v $ P RF(NN) EDY130 NOT TO BE ECHOED M P ADK A3,/80 M P XIF M , P LD A1,DWTBLC+DWTDEV,A6 BLOCK RESERVED ? M P RF(Z)
0x2149e0…214b74 (1, 357) Dummy {f00=0x00a1, f01=0x0190, f02=»ER M ` P CF A5,ENDBLK FINISH BLOCK N PDYER35 RF(NZ) DYER40 N , PEDY116 EQU * N H P LDK A2,MINBLK N P CF A5,STABLK DECLARE BLOCK N r P RF(NZ) DYER40 N PEDY118 EQU * N P LDR A2,A3 RELOAD CHARACTER N P* N P SUK A3,/18 CLEAR ? N
0x214b74…214d08 Dummy {f00=0x00a1, f01=0x018e, f02=»ICE N r P* O * P IM DWTBLC+DWTDEV,A6 INCREMENT COUNTER O P CF A5,OUTPUT SEND O D PDYER40 RF(NZ) DYER45 O ^ , P CF A15,POSUPD POSITION COUNTER UPDATING O z P SUK A4,1 MORE CHARACTERS ? O P RF(Z) EDY130 YES ! O P* O PEDY120 EQU * O P
0x214d08…214e9c Dummy {f00=0x00a1, f01=0x0190, f02=» O j P EJECT P @ P************************************************************ P P* P Z P* BACKSPACE P d 6 P* CHECKS CURSOR POSITION, MOVES CURSOR ONE STEP P z 6 P* BACKWARDS, SENDS A SPACE AND MOVES CURSOR ONE P P* STEP BACKWARDS AGAIN.
0x214e9c…215030 Dummy {f00=0x00a1, f01=0x0190, f02=»A6 GET POSITION COUNTER P | P ANK A3,/FF Q P RB(Z) EDY120 FIRST POSITION Q 4 P* Q X " P CF A5,ENDBLK FINISH OLD BLOCK Q b P RF(NZ) DYER45 Q P LDK A2,MINBLK Q $ P CF A5,STABLK START A NEW BLOCK Q P RF(NZ) DYER45 Q P* Q $ P LDK A4,2 SE
0x215030…2151c4 Dummy {f00=0x00a1, f01=0x0190, f02=»SITION ON LINE Q P AD A3,DWTAP+DWTDEV,A6 R 4 P CC A3,DWTPOS+DWTDEV,A6 LAST POSITION ON LINE ? R 4 P RF(L) DY810 NO ! R l P RB(G) DY800 NO, OUTSIDE ! R P* R P* R PDY805 EQU * R P* R P LDK A2,SPACE SPACE R P CF A5,OUTPUT SEND
0x2151c4…215358 Dummy {f00=0x00a1, f01=0x0190, f02=»F(NZ) DYER45 R P* S P SUK A4,1 SEND AGAIN ? S P RB(NZ) DY805 YES ! S < P* NO, BACKSPACE FINISHED S X P RB EDY120 S z P EJECT S < P******************************************************** S P* S P* CLEAR S 6 P* CHECKS CURSOR
0x215358…2154ec Dummy {f00=0x00a1, f01=0x0190, f02=»QUEST. S h P* T @ P************************************************************ T P* T PDY850 EQU * T f " P CF A5,ENDBLK FINISH OLD BLOCK T z P RF(NZ) DYER45 T " P LDKL A2,MAXBLK GET BLOCKSIZE T P CF A5,STABLK START OF BLOCK T PDYER45 A
0x2154ec…215680 Dummy {f00=0x00a1, f01=0x0190, f02=» P IFT WHATDY=1 U . P LD A1,DWTDEV,A6 PTS 6344, 6385 OR 6386 ? U P ANKL A1,/1000 U L P RF(Z) DY860 YES ! U b ( P CF A5,BACCAN ERASE CURRENT REQUEST U | P RB EDY120 U P XIF U PDY860 EQU * U 4 P LD A4,DWTAP+DWTDEV,A6 GET HEAD POSITION COUNT
0x215680…215814 (1, 358) Dummy {f00=0x00a2, f01=0x0190, f02=»DK A3,SPACE GET SPACE TO SEND U ( P CF A5,FASTER SEND WITH FAST OUTPUT V & P* V R 2 P SC A1,DWTBC+DWTDEV,A6 RESET POSITION COUNTER V P RB EDY120 V P IFT WHATDY=1 V P EJECT V @ P************************************************************ V
0x215814…2159a8 Dummy {f00=0x00a2, f01=0x0190, f02=»R. V ~ P* W @ P************************************************************ W PBACCAN EQU * W X 0 P CM DWTBLC+DWTDEV,A6 RESET CHARACTER COUNTER W l P LDR A4,A3 W 0 P LC A2,DWTBC+DWTDEV,A6 GET POSITION COUNTER W P ANK A2,/FF W 4 P AD A2,DWTAP+D
0x2159a8…215b3c Dummy {f00=0x00a2, f01=0x0190, f02=»DK A2,SPACE DESTRUCTIVE SPACE W P RF BACA20 X & PBACA10 EQU * X 8 4 P IM DWTBLC+DWTDEV,A6 INCREMENT CHARACTER COUNTER X L ( P LDKL A2,MAXBLK-3 GET BLOCKSIZE - 3 X : P CW A2,DWTBLC+DWTDEV,A6 WILL IT BE OVERFLOW IN BLOCK ? X P RF(G) BACA30 NO ! X P
0x215b3c…215cd0 Dummy {f00=0x00a2, f01=0x0190, f02=»OCK X t P RF(NZ) DYER50 Y 0 P CM DWTBLC+DWTDEV,A6 RESET CHARACTER COUNTER Y " PBACA30 EQU * Y V P LDK A2,BACKSP BACKSPACE Y j P CF A5,OUTPUT SEND Y P RF(NZ) DYER50 Y $ P LDK A2,SPACE DESTRUCTIVE SPACE Y P CF A5,OUTPUT SEND Y P RF(NZ) DYER
0x215cd0…215e64 Dummy {f00=0x00a2, f01=0x0190, f02=» NGR A3,A3 NEGATE REGISTER Y 4 P ADS A3,DWTBC+DWTDEV,A6 UPDATE POSITION COUNTER Z " P RTN A5 Z Z P XIF Z j P EJECT Z v @ P************************************************************ Z P* Z , P* FASTER = SUBROUTINE FOR FAST OUTPUT Z 4 P*
0x215e64…215ff8 Dummy {f00=0x00a2, f01=0x018e, f02=»************************************** Z z PFASTER EQU * [ . P IFT WHATDY=1 [ B P LD A2,DWTDEV,A6 PTS [ X " P ANKL A2,/1000 6342 OR 6351 ? [ t P RF(Z) FAS005 NO ! [ P* [ 6 P* SIMULATED "FAST OUTPUT" FOR PTS 6342 AND 6351 [ P* [ P LC A2
0x215ff8…21618c Dummy {f00=0x00a2, f01=0x0190, f02=» [ . P LD A1,DWTPOS+DWTDEV,A6 GET MAX. POSITIONS P ANK A1,/FF : P SUR A1,A2 COMPARE N P RF(NN) FAS002 LENGTH OK h P ADR A4,A1 ADJUST LENGTH . P RF(N) FAS008 LAST POS. ALREADY WRITTEN =9 $ P LDR A2,A4 ONE BACKSPACE LESS =9 * P ADK A
0x21618c…216320 Dummy {f00=0x00a2, f01=0x0190, f02=» n PFAS007 EQU * =9 ] P SLL A2,8 ] P ORR A4,A2 ] 2 P* ] D PFAS004 EQU * ] N $ P LDR A2,A3 GET CHARACTER TO SEND ] b P CF A5,OUTPUT SEND ] P RF(NZ) DYER50 ] P SUK A4,1 DECREMENT COUNTER ] P LDK A2,/FF ] P ANR A2,A4 ] P RB(
0x216320…2164b4 (1, 359) Dummy {f00=0x00a2, f01=0x0190, f02=»BLK THE OLD ONE ] P CF A5,STABLK ^ P RF(NZ) DYER50 ^ . P* ^ D P SRL A4,8 GET LENGTH COUNTER ^ N * P RF(Z) FAS008 NO BACKSPACE TO SEND =9 ^ r PFAS003 EQU * ^ P LDK A2,BACKSP ^ P CF A5,OUTPUT SEND BACKSPACE ^ P RF(NZ) DYER50 ^ P SUK
0x2164b4…216648 Dummy {f00=0x00a2, f01=0x018e, f02=»,DWTPOS+DWTDEV,A6 TEST NUMBER OF CHARACTERS ^ . P RF(L) FAS010 NUMBER OF CHAR NOT TOO LONG _ 4 : P LC A4,DWTPOS+DWTDEV,A6 GET MAX. POSITIONS ON DISPLAY _ f PFAS010 EQU * _ P ADK A4,/20 ADD CONSTANT _ P LDK A2,FASOUT FAST OUTPUT _ P CF A5,OUTPUT
0x216648…2167dc Dummy {f00=0x00a2, f01=0x0190, f02=» P LDR A2,A3 ` P CF A5,OUTPUT SEND ` P RF(NZ) DYER50 ` 0 P RTN A5 ` F P EJECT ` V 8 P**************************************************** ` d P* ` 6 P* ERROR ROUTINE. ENTERED WHEN RETURN CODE IS SET ` ( P* AFTER STABLK, OUTPUT OR ENDBLK.
0x2167dc…216970 Dummy {f00=0x00a2, f01=0x0190, f02=»HO ? ` * P ABL(N) ECHRTN YES ! RETURN FROM ECHO a P* a : " P SRC A1,5 OUTPUT ERROR (HER) ? a D & P ABL(N) RCDY YES ! GO TO RECOVERY a j P SLC A1,5 NO ! RESTORE A1 a P* a * P LD A7,DWTOR,A6 GET ORDER. ORDER 00 ? a P ANK A7,/FF a P RF(Z)
0x216970…216b04 Dummy {f00=0x00a2, f01=0x0190, f02=»* a P SRC A1,2 LRC-ERROR ? b P RF(N) DYER70 YES ! b ( P SLC A1,2 b D PDYER52 SRC A1,3 LINK ERROR ? b V P RF(NN) DYER55 NO ! b z 8 P LDKL A1,/2000 YES ! SET SHIFTED "NOT OPERABLE" BIT b PDYER55 SLC A1,3 SHIFT BACK b P* b P LDR A8,A8
0x216b04…216c98 Dummy {f00=0x00a2, f01=0x0190, f02=» =1 b P ABL LENDIS COMPLETE REQUEST c P* c 0 P* LRC-ERROR c : P* c P PDYER70 EQU * c Z ( P LDKL A5,DWTSB2 INITIALIZE A5 STACK c n P ADR A5,A6 c ( P LDR A8,A8 ECB-ADDRESS = ZERO ? = 2 c , P ABL(Z) ENDIO YES, DON'T SEND AGAIN = 2 c P
0x216c98…216e2c Dummy {f00=0x00a2, f01=0x0190, f02=»A6 GET NUMBER OF POS. TO BACK c | P ANK A4,/FF d & P RF(Z) DYER80 d : . P CF A5,BACCAN SEND BACKSPACES AND RUB OUT d P P LDK A3,2 SET BUFFER INDEX d PDYER80 ABL DY335 SEND AGAIN d PDYER90 EQU * d P XIF d P* d 0 P LD A4,DWTAP+DWTDEV,A6
0x216e2c…216fc0 Dummy {f00=0x00a2, f01=0x0190, f02=» d v P ANK A7,/FF e P ABL ACDY e P EJECT e . @ P************************************************************ e < P* e , P* UPDAPP = SUBROUTINE TO UPDATE HEAD e , P* POSITION POINTER WHEN END e ( P* OF REQUEST IS RE
0x216fc0…217154 (1, 360) Dummy {f00=0x00a2, f01=0x0190, f02=»ET POSITION COUNTER e x P ANK A2,/FF f 8 P ADS A2,DWTAP+DWTDEV,A6 UPDATE HEAD POSITION POINTER f 0 P LDK A2,0 f l 2 P SC A2,DWTBC+DWTDEV,A6 RESET POSITION COUNTER f ~ P RTN A15 f @ P************************************************************ f P
0x217154…2172e8 Dummy {f00=0x00a2, f01=0x0190, f02=»CHECK THAT POINTER NOT EXCEEDS THE LIMIT IS DONE f P* g 8 @ P************************************************************ g B PPOSUPD EQU * g 0 P LC A2,DWTBC+DWTDEV,A6 GET POSITION COUNTER g 8 P AD A2,DWTAP+DWTDEV,A6 INCLUDE HEAD POSITION POINTER g
0x2172e8…21747c Dummy {f00=0x00a2, f01=0x018e, f02=»10 RTN A15 g P IFT GREECE=1 =4 h P EJECT =4 h , : P*************************************************** =4 h @ P* h ~ : P* GRCHAR = SUBROUTINE TO CONVERT GREEK CHARACTERS =4 h 8 P* BEFORE THEY ARE SENT TO THE DISPLAY =4 h P* h
0x21747c…217610 Dummy {f00=0x00a2, f01=0x0190, f02=» P SUK A1,/B9 =4 i P RF(P) GRCH10 NO =4 i P ADK A1,9 =4 i 8 P RF(N) GRCH10 NO =4 i N P* =4 i j 0 P ADKL A1,GRTAB GET THE CORRECT CODE FROM =4 i z & P LCR A2,A1 THE CHARACTER TABLE =4 i P* =4 i PGRCH10 EQU * =4 i P RTN A15
0x217610…2177a4 Dummy {f00=0x00a2, f01=0x0190, f02=» P EJECT j 6 P************************************************** j P* j L 4 P* TRASP = SUBROUTINE THAT ELIMINATES TRAILING j V 4 P* SPACES FROM ECB-BUFFER. IT ALSO DE- j 0 P* LETES LOW INTENSITY START, HIGH j 0 P* IN
0x2177a4…217938 Dummy {f00=0x00a2, f01=0x0190, f02=» LD A1,ECBBA,A8 GET BUFFER ADDRESS (BA) j , P LD A2,ECBRL,A8 GET REQUESTED LENGTH(RL) k 0 P ADR A1,A2 GET END OF BUFFER k ` PSKIP05 CWK A2,2 k P RF(NG) SKIP30 RL < 3 k P SUK A1,1 DECR. BA k P LCR A4,A1 GET CHAR k P ANK A4,/FF k P SUK
0x217938…217acc Dummy {f00=0x00a2, f01=0x0190, f02=» ? k x P RF(Z) SKIP07 YES ! l P CWK A2,4 l & " P RF(NG) SKIP30 REQ, LENGTH < 5 l 8 P LC A4,-2,A1 GET CHARACTER l ^ & P SUK A4,/11 TABULATION CHARACTER ? l P RF(NZ) SKIP30 NO ! l P SUK A2,2 =5 l P SUK A1,2 =5 l PSKIP07 SUK A2,1 DECR R
0x217acc…217c60 Dummy {f00=0x00a2, f01=0x0190, f02=» ST A2,ECBRL,A8 STORE NEW RL l P* m $ P RTN A15 m . P XIF m > P IFT VD87=1 =7 m J P EJECT m b P* m p D P**************************************************************** m z P* m . P* SUBROUTINE TO SEND PARAMETERS TO VD87 m P* m > P
0x217c60…217df4 (1, 361) Dummy {f00=0x00a2, f01=0x0190, f02=» m J < P* PSEND1 SENDS CHARACTER /1B BEFORE CONTROL CHARACTER n P* n H D P**************************************************************** n R P* n PPSEND1 EQU * n & P LDK A2,/1B SEND CONTROL CHARACTER n P CF A5,OUTPUT n P ABL(NZ) DYER50
0x217df4…217f88 Dummy {f00=0x00a2, f01=0x0190, f02=»RACTER n p PPS10 EQU * o ( P CF A5,OUTPUT SEND CONTROL CHARACTER o P ABL(NZ) DYER50 NOT OK ! o L P RTN A5 RETURN o l P* o P EJECT o F P***************************************************************** o P* o ( P* SUBROUTINE THAT TESTS
0x217f88…21811c Dummy {f00=0x00a2, f01=0x0190, f02=»A4,DWTDEV,A6 o P SRC A3,2 p P LDR A2,A3 p & P ANKL A2,/8001 p 8 P RTN A15 p N P* p ^ F P***************************************************************** p h P* p . P* SUBROUTINE THAT SETS BITS IN A2 AND A4 p L P* ON ENTRY: A4=DWTDEV, S
0x21811c…2182b0 Dummy {f00=0x00a2, f01=0x0190, f02=»TH NEW IND. BIT IN BIT ZERO p p P* q $ F P***************************************************************** q . P* q x PSETBIT EQU * q P ANK A2,/1 q & P SLL A4,1 RESET OLD INDICATION BIT q & P ORR A2,A4 SET NEW INDICATION BIT q . P SRC A2,1 SH
0x2182b0…218444 Dummy {f00=0x00a2, f01=0x0190, f02=»********************** q j P* r P* RCDY = RECOVERY ROUTINE r ( 6 P* CLEARS DISPLAY AND SETS CURSOR & HEAD POSITION r L , P* COUNTER TO HOME POSITION ( /0101 ). r P* r @ P************************************************************ r P* r
0x218444…2185d8 Dummy {f00=0x00a2, f01=0x0190, f02=» LDR A5,A6 . =POHO r ( P ADK A5,DWTSB3 RECOVERY STACK =POHO s P LDKL A2,/7FFF s F " P ANS A2,DWTST,A6 INDICATE BUSY s P* s $ P LDKL A2,MAXBLK MAX. BLOCK SIZE s P CF A5,STABLK START OF BLOCK s P IFT PLASM=1 =11 s P* s 8 P* WAIT FOR P
0x2185d8…21876c Dummy {f00=0x00a2, f01=0x0190, f02=»SPLAY =11 s t P INH . =13 t P LD A2,DWTTP+DWTDEV,A6 . =13 t & P RF(Z) STRTIM . =13 t J P LDKL A1,-TIME . =13 t f P STR A1,A2 . =13 t P RF WAIT . =13 t PSTRTIM EQU * . =13 t P LDR A1,A6 =11 t P CF A15,SETIME SET TIMER =11 t P D
0x21876c…218900 Dummy {f00=0x00a2, f01=0x018e, f02=»11 t | & P LDR A6,A1 RESTORE DWT-ADDRESS =11 u P CM DWTTP+DWTDEV,A6 . =13 u 4 . P LDR A5,A6 INITIATE DWT STACK POINTER =12 u V ( P ADK A5,DWTSB3 RECOVERY STACK =POHO u PRCDY02 EQU * =11 u P XIF =11 u " P CM DWTRC1,A6 CLEAR SOMETHING u P I
0x218900…218a94 (1, 362) Dummy {f00=0x00a3, f01=0x0190, f02=» P RF(NN) RCDY05 NOT VD87 ! v P* v & ( P SLL A4,4 GET BIT FOR BACKGR. COLOUR v 0 2 P LCK A4,/3000 CONTR. CHAR. FOR BACKGR. COLOUR v " P CF A5,RSEND1 SEND PARAMETERS v P* v P SLL A4,1 v ( P LCK A4,/3200 CONTR. CHAR. FOR WIDTH v P CF A5,R
0x218a94…218c28 Dummy {f00=0x00a3, f01=0x018e, f02=»4,1 v * P LCK A4,/1500 CONTR. CHAR. FOR CURSOR w P CF A5,RSEND2 w : PRCDY05 EQU * w P P XIF w d P IFF STEADY+VD87=0 w p & P LD A2,DWTDEV,A6 GET DEVICE STATUS w , P ANKL A2,/2000 PTS 6385, 6386 OR 6387 ? w P RF(Z) RCDY20 NO ! w P* w * P
0x218c28…218dbc Dummy {f00=0x00a3, f01=0x0190, f02=» P XIF x P IFF COUNTRY=0 x * P LDK A2,CTYCOD SEND "SET COUNTRY CODE" x & P CF A5,OUTPUT x T P IFT VD87=1 =7 x j P* x D P* SEND AN EXTRA CONTROL CHARACTER TO VD87 BEFORE COUNTRY CODE x P* x P LD A4,DWTDEV,A6 VD87 ? x P RF(NN) NO
0x218dbc…218f50 Dummy {f00=0x00a3, f01=0x0190, f02=»Y SEND "COUNTRY CODE" x P ORK A2,/30 MAKE ASCII DIGIT y P CF A5,OUTPUT y B P XIF y X PRCDY20 EQU * y d P* y x ( P LDK A2,CLEHOM CLEAR AND CURSOR HOME y P CF A5,OUTPUT SEND y P CF A5,ENDBLK =11 y P* y P LDKL A2,/0101 HOME POSITION
0x218f50…2190e4 Dummy {f00=0x00a3, f01=0x0190, f02=» y Z P* z 0 P LD A5,DWTSA5,A6 GET OLD STACK POINTER =POHO z 0 P ST A5,DWTA5,A6 SET OLD STACK POINTER =POHO z F , P LD A2,DWTST,A6 GO TO DISPATCHER IF =11 z z * P SLC A2,2 DISPLAY IS IN ECHO MODE =11 z P ABL(N) LDISP =11 z P IFT VD87=1 =12 z
0x2190e4…219278 Dummy {f00=0x00a3, f01=0x0190, f02=») ACDY YES, REPEAT IT =12 z PRCDY30 EQU * =12 { " P XIF =12 { < P ABL LENDIS =11 { N P* { f P IFT VD87=1 =11 { p P* { & P* RECOVERY SUBROUTINES FOR VD87 { P* { PRSEND1 EQU * =11 { * P LDK A2,/1B SEND CONTROL CHARACTER =11 {
0x219278…21940c Dummy {f00=0x00a3, f01=0x0190, f02=»DK A2,1 NO, CHANGE CONTROL CHARACTER =11 { PRS10 EQU * =11 | 0 , P CF A5,OUTPUT SEND CONTROL CHARACTER =11 | H P RTN A5 RETURN =11 | x P* | P XIF | P EJECT | P* | , P**************************************** | P* | P* ABORT ROUT
0x21940c…2195a0 Dummy {f00=0x00a3, f01=0x4036, f02=»R | j P ABL LENDIS END I/O } P END } &@ } 2QU * =11 | 0 , P CF A5,OUTPUT SEND CONTROL CHARACTER =11 | H P RTN A5 RETURN =11 | x P* | P XIF | P EJECT | P* | , P**************************************** | P* | P* ABORT ROUT
0x2195a0…219734 (1, 363) Dummy {f00=0x00a3, f01=0x2008, f02=» ~ E & | CF A5,STABLK START OF BLOCK ' * ' 6 ( $ LDK A2,CLEHOM CLEAR AND CURSOR HOME ' @ CF A5,OUTPUT SEND ' l * ' LDKL A2,/0101 HOME POSITION ' 4 0 ST A2,DWTAP+DWTDEV,A6 SET HEAD POSITION COUNTER ' * ' ABL ENDIO '
0x219734…2198c8 Dummy {f00=0x00a3, f01=0x0190, f02=» $ T C x > C $ ) _ X 9BV X 0 p X X D C > X H UJ H B P PL $ # Q > P _0 # T p > P p (_H _2 B U X > ? _ X T (@ ^ > >
0x2198c8…219a5c Dummy {f00=0x00a3, f01=0x0190, f02=»P 4 Y X 1 1 X P - M T $ PJ _ T " # p X L R P P P (@ ^ X P, P$ # P( T P 0 1 Y > > H _ T R L U 9C _ T M D W2 D D " T X X -
0x219a5c…219bf0 Dummy {f00=0x00a3, f01=0x0190, f02=» X $P % Y $ X " T n @C$ T AC$ AC& n B " f h ! j " ' j / 8 9 - B H x P> x ] ] ^ V ] ] h < " P H :H ! D = X B P h x ] "P( R^
0x219bf0…219d84 Dummy {f00=0x00a3, f01=0x0190, f02=» h x X 2 BL C B P Y B Y V Y Y h D Y C "T ] "W H I Y Y Y 2 Y " X P Y @CJT X 2 "P4 T F X Y 2 ] "_( T P F X U Y 2_F x B T X 2:D :D :D
0x219d84…219f18 Dummy {f00=0x00a3, f01=0x0190, f02=» X " P h F B | X X 2 x X *T W, P C X P C 0P Y * W @ W @W W W W W X > > , L Q , L X "R P A Y $ W> Y $W6 X "Z X A Y $_.
0x219f18…21a0ac Dummy {f00=0x00a3, f01=0x0190, f02=»P _ ) 1_@ CD ( (XL P _ 0 )_Z C@ &_2 C@ &_$ * (P _ ) 1 4 A A A A A W > B ] ] aCJ 4 X ACJ_< * ACB 4 ACB B !% @C&P !# ! @CBP % ACB 4 v
0x21a0ac…21a240 Dummy {f00=0x00a3, f01=0x0190, f02=»" ! AC, !% !& @CHT " !% _Z !& ] P = $ !& x !& > !& F !% AC0 P "P, !" @C&T( PV ! X ! T4 X RD X ! PBW8 @C&P ! N !# ! ! @C@P & !% ! AC& @CDT !# _ ( T n_ C6 AC$ 9N C B B AC8 A
0x21a240…21a3d4 (1, 364) Opaque[0x194]
0x21a3d4…21a568 # DirEnt {nam=»DRGP02«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1b08, f03=0x0000}
0x21a3d4…21a568 IdxSect {
0x21a3d4…21a568 f00 = 0x00d8 // 0x21a3d4 @0x0
0x21a3d4…21a568 f01 = 0x0018 // 0x21a3d6 @0x2
0x21a3d4…21a568 gno = [ // 0x21a3d8 @0x4
0x21a3d4…21a568 [0x00]: C0x00d8.0x1.0
0x21a3d4…21a568 [0x01]: C0x00da.0x0.0
0x21a3d4…21a568 [0x02]: C0x00da.0x2.0
0x21a3d4…21a568 [0x03]: C0x00df.0x0.0
0x21a3d4…21a568 [0x04]: C0x00df.0x1.0
0x21a3d4…21a568 [0x05]: C0x00df.0x2.0
0x21a3d4…21a568 [0x06]: C0x00e2.0x3.0
0x21a3d4…21a568 [0x07]: C0x00e3.0x0.0
0x21a3d4…21a568 [0x08]: C0x00e3.0x1.0
0x21a3d4…21a568 [0x09]: C0x00e3.0x3.0
0x21a3d4…21a568 [0x0a]: C0x00e4.0x2.0
0x21a3d4…21a568 [0x0b]: C0x00e4.0x3.0
0x21a3d4…21a568 ]
0x21a3d4…21a568 }
0x21a568…21a6fc Dummy {f00=0x00d8, f01=0x0190, f02=» 2 P IDENT DRGP02 REL 11.0 83-12-28 870105041100 P : $ P DK4, VARIABLE STATUS TIME-OUT B * P DK3, NO RECOVERY FOR LP100(NORCVY) j P DK2, BASIC WRITE P DK1 STR. TERM = /9C9C ( P =1,TIME OUT IF INACTIVE, 25 SEC. P PRR 1
0x21a6fc…21a890 Dummy {f00=0x00d8, f01=0x0190, f02=» * f < P* PHILIPS TERMINAL SYSTEM PTS * < P* * V 4 P* DRGP02 = DRIVER GENERAL PRINTER * < P* *
0x21a890…21aa24 Dummy {f00=0x00d8, f01=0x0190, f02=»***************************************************** P* > 4 P* THIS DRIVER HANDLES GENERAL PRINTER PTS 8081 H P* 4 P* THE DRIVER CONSISTS OF THE FOLLOWING PARTS : P* $ P* A C T P : ACTIVATION PART P* $ P* R C T
0x21aa24…21abb8 Dummy {f00=0x00d8, f01=0x0190, f02=»DER 00 : TEST STATUS P* ORDER 06 : WRITE " P* ORDER 05 : BASIC WRITE DK2 D * P* ORDER 0B : POSITION DOCUMENT h . P* ORDER 24 : SET PRINTER PARAMETERS ( P* ORDER 38 : RELEASE DOCUMENT P* , P* THE FO
0x21abb8…21ad4c Dummy {f00=0x00d8, f01=0x0190, f02=»ENT OUT b ( P* BIT 13 : CODE CHECK ERROR $ P* BIT 15 : NOT OPERABLE < P* d P* n P* NORMAL REGISTER USAGE: x P* " P* REGISTER A1: WORK REGISTER " P* A2: INPUT/OUTPUT $ P* A3: BUFFER
0x21ad4c…21aee0 Dummy {f00=0x00d8, f01=0x0190, f02=» A7: ORDER P* A8: ECB-ADDRESS P* : P* D P EJECT N P* P* f 0 P******************************************* p P* P* ENTRIES P* 0 P******************************************* P* P
0x21aee0…21b074 (1, 365) Dummy {f00=0x00da, f01=0x0190, f02=»* EXTERNALS P* 0 P******************************************* P* R P* , P EXTRN LDISP DISPATCHING FROM INTERRUPT f $ P EXTRN LENDER DISPATCH I/O ERROR & P EXTRN LENDIS END I/O AND DISPATCH & P EXTRN OUTPUT OUTPUT ONE CHARACT
0x21b074…21b208 Dummy {f00=0x00da, f01=0x0190, f02=» & P EXTRN DWTECB DWT ECB DISPLACEMENT ( P EXTRN DWTOR DWT ORDER DISPLACEMENT . P EXTRN DWTSB2 STACK BASE Z 2 P EXTRN INPUT STORE REG = GET STATUS INPUT CHAR z $ P EXTRN STABLK DEF START OF BLOCK " P EXTRN ENDBLK DEF END OF BLOCK P EXTRN DWT
0x21b208…21b39c Dummy {f00=0x00da, f01=0x0190, f02=» P* . P****************************************** P* D P* N " PSPEC EQU /2E SPECIAL CHARACTER X PLF EQU /0A LINE FEED ~ PFF EQU /0C FORM FEED PCR EQU /0D CARRIAGE RETURN PSO EQU /0E SHIFT OUT PSI EQU /0F SHIFT IN
0x21b39c…21b530 Dummy {f00=0x00da, f01=0x0190, f02=»N RELATIVE t " PINFF EQU /74 INPUT FRONT FEED . PVPFF EQU /71 VERTICAL POSITION FRONT FEED 8 " PEJFF EQU /38 EJECT FRONT FEED j ( PSNV EQU /77 SELECT NATIONAL VERSION $ PSLPL EQU /76 SELECT PAGE LENGTH & PRIS EQU /63 RESET TO INITIAL STATE
0x21b530…21b6c4 Dummy {f00=0x00da, f01=0x018e, f02=»DELETE PZERO EQU /30 ZERO PNEG EQU /FF ( PTIME EQU /FF 25 SEC TIMER =1 < $ PIMTIME EQU /20 2 SEC. TIMER DK4 ` P EJECT P* P* > P********************************************************* P* P* CONTROL SEQU
0x21b6c4…21b858 Dummy {f00=0x00da, f01=0x0190, f02=» P* PCSREP EQU * REPEAT P BYTE ESC,CSI , P BYTE ZERO,ZERO B P BYTE ZERO,REP Z P BYTE NEG,NEG p * PCSVPR EQU * VERTICAL POSITION RELATIVE P BYTE ESC,CSI P BYTE ZERO,ZERO P BYTE ZERO,VPR P BYTE NEG,NEG
0x21b858…21b9ec Dummy {f00=0x00da, f01=0x0190, f02=»SITION FRONT FEED x P BYTE ESC,CSI P BYTE ZERO,ZERO 0 P BYTE VPFF,NEG H " 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
0x21b9ec…21bb80 Dummy {f00=0x00da, f01=0x0190, f02=»E SLPL,NEG * P BYTE NEG,NEG & PCSRIS EQU * RESET TO INITIAL STATE , P BYTE ESC,RIS V P BYTE NEG,NEG l $ PCSDSR EQU * DEVICE STATUS REPORT P BYTE ESC,CSI P BYTE /35,DSR P BYTE NEG,NEG P EJECT P* P*
0x21bb80…21bd14 (1, 366) Dummy {f00=0x00da, f01=0x0190, f02=»*************************************** P* 0 P* : P* D 4 P* THE STANDARD NATIONAL CHARACTER SET IS CHOOSEN N 8 P* BY SETTING X:A TO 1-15 ACCORDING TO THE LIST BELOW P* P* 4 P* NCV=1 GERMANY,AUSTRIA,LUXEMBOURG,SWITZERLAND
0x21bd14…21bea8 Dummy {f00=0x00da, f01=0x0190, f02=»=4 SPAIN,MEXICO,ARGENTINA,VENEZUELA P =5 ITALY,SWITZERLAND , P =6 SWEDEN,FINLAND L P =7 DENMARK,NORWAY j P =8 PORTUGAL,BRAZIL P =9 YUGOSLAVIA P =10 USA,CANADA,AUSTRALIA $ P =11 SWEDEN (SPECIAL VERSION)
0x21bea8…21c03c Dummy {f00=0x00da, f01=0x0190, f02=» GREAT BRITAIN AS STANDARD PSTDNCV EQU 07 " P EJECT 8 P* F P* P , P* THE FRONT FEED DEVICE CAN BE EXCLUDED Z P* BY SETTING X:B = 0 P* P* PX:B EQU 1 " PFFDEV EQU 0 FRONT FEED DEVICE P* P* P*
0x21c03c…21c1d0 Dummy {f00=0x00da, f01=0x018e, f02=»EN EQU 48 P* P* . P* THE STANDARD NUMBER OF LINES IS DEFINED & & P* BY SETTING X:D = NUMBER OF LINES X P* P* PX:D EQU 36 * PDOCLEN EQU 48 P EJECT P* P* P* P* MMU BUFFER SIZE P
0x21c1d0…21c364 Dummy {f00=0x00da, f01=0x0190, f02=» d * P* IS OBTAINED BY SETTING MMUPAG EQU 1 P* 6 P* @ PMMUPAG EQU 1 J P* ^ P* h P* r 6 P* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION | . P* SET IS OBTAINED BY SETTING CPU852 EQU 0 P* P* PCPU852 EQU 0
0x21c364…21c4f8 Dummy {f00=0x00da, f01=0x018e, f02=» 1 P* P* P EJECT P* . P* 8 0 P******************************************* B P* v P* DWT - DISPLACEMENTS P* 0 P******************************************* P* P* P* 0 PDWTDRD EQU /10
0x21c4f8…21c68c Dummy {f00=0x00da, f01=0x0190, f02=» PSTART EQU DWTDRD+4 P XIF P* * " PDWTTP EQU /2 TIMER POINTER =1 4 ( PDWTDCS EQU /4 DOCUMENT CHARACTER SET Z ( PDWTPCS EQU /6 PRINTER CHARACTER SET & PDWTPL EQU /8 PRINTER PAPER LENGTH & PDWTDL EQU /A DOCUMENT PAPER LENGTH * PDW
0x21c68c…21c820 Dummy {f00=0x00da, f01=0x0190, f02=» * PDWTSTR EQU /12 CONTROL SEQUENCE ADRESS > PDWTDISP EQU /14 DWT-DISPLACEMENT TO LINE NO,CHAR.SET,ETC. 2 * PDWTACD EQU /16 ACTUAL COLUMN DOCUMENT t & PDWTACP EQU /19 ACTUAL COLUMN PAPER $ PDWTCO1 EQU /1C COLUMN COUNTER 1 $ PDWTCO2 EQU /1E COLUM
0x21c820…21c9b4 (1, 367) Dummy {f00=0x00df, f01=0x0190, f02=» 0 P******************************************* P* < P* ECB - DISPLACEMENTS F P* d 0 P******************************************* n P* & PECBBA EQU 2 BUFFER ADDRESS IN ECB ( PECBRL EQU 4 REQUESTED LENGTH IN ECB ( PECBEL
0x21c9b4…21cb48 Dummy {f00=0x00df, f01=0x018e, f02=» 0 P******************************************* P* 8 P* TABLES B P* R 0 P******************************************* P* P* P DATA DVBLEN MMU BUFFER SIZE P DATA 2 DEVICE INDEX PGPAD8 EQU * ADDRESS BLOCK P D
0x21cb48…21ccdc Dummy {f00=0x00df, f01=0x0190, f02=» r PTPTAB EQU * P IFT FFDEV=1 P DATA /0107,/0C25,/3939 0 P XIF P P DATA /0006,/2424,/0505 DK2 PTPLEN EQU *-TPTAB P P P EJECT P* P* P* A C T P P* 2 P* THIS IS THE ACTIVATION PAR
0x21ccdc…21ce70 Dummy {f00=0x00df, f01=0x0190, f02=»ATION ENTRY P* P* : P* GET DWT INDEX: 0=CONTINUOUS STATIONARY, 1=DOCUMENT ( P* f " P LC A2,DWTOR,A6 GET DWT INDEX p P ANK A2,1 MASK , P LC A3,DWTDEV+1,A6 GET OLD DEVICE VALUE P ANK A3,/FE P ORR A3,A2 " P SC A3
0x21ce70…21d004 Dummy {f00=0x00df, f01=0x0190, f02=»ACT003 EQU * DK2 * P SC A7,DWTOR+1,A6 STORE MODIFIED ORDER PACT005 LDK A3,TPLEN-1 H . PACT010 CC A7,TPTAB,A3 CHECK IF LEGAL ORDER f P RF(E) ACT020 VALID ORDER P SUK A3,1 P RB(NN) ACT010 TRY NEXT P* P ABL LENDER ILLEGA
0x21d004…21d198 Dummy {f00=0x00df, f01=0x0190, f02=»FUC EQU * P IFT FFDEV=1 4 P DATA TSTSTA,WRTDOC,POSDOC,DOCPAR,RELDOC,RELDOC & P XIF ^ 8 P DATA TSTSTA,WRTCON,CSTPAR,CSTPAR,BASWRT,BASWRT DK2 j P EJECT P* P* P* ORDER 00 : TEST STATUS P* P* PTSTSTA EQU
0x21d198…21d32c Dummy {f00=0x00df, f01=0x0190, f02=» P* ORDER 05 : BASIC WRITE P* ( P* 2 PBASWRT EQU * < P LDK A3,0 R PBAS10 EQU * d & P LDK A4,/90 TEST FOR END OF BLOCK x P LDR A2,A4 BLOCK LENGTH P CF A5,STABLK START OF BLOCK " P ABL(NZ) ERROUT QUIT IF ERROR
0x21d32c…21d4c0 Dummy {f00=0x00df, f01=0x0190, f02=», SEND IT " P ABL(NZ) ERROUT QUIT IF ERROR P SUK A4,1 END OF BLOCK? 8 P RF(Z) BAS20 YES X $ P RB BAS15 NO, GET ANOTHER CHAR. r PBAS20 EQU * P CF A5,ENDBLK FINISH IT. " P ABL(NZ) ERROUT QUIT IF ERROR P RB BAS10 GET NEXT
0x21d4c0…21d654 (1, 368) Dummy {f00=0x00df, f01=0x0190, f02=»T DK4 j P ABL LENDIS P EJECT " P IFT FFDEV=1 0 P* D P* N P* ORDER 06: WRITE DOCUMENT X P* | P* PWRTDOC EQU * P CF A5,GTSTAT " P LD A4,DWTDEV,A6 DEVICE STATUS ( P ANKL A4,/20 HAS POWER OFF OCCURED?
0x21d654…21d7e8 Dummy {f00=0x00df, f01=0x0190, f02=» BIT 0 (REQUEST ERROR) z . P ORS A3,ECBRC,A8 SET REQUEST ERROR IN R.C. P ABL LENDIS END REQUEST P PWRDO05 EQU * * p PWRDO06 LDK A3,1 P TM A1,A3 NOT OPERABLE? P RF(Z) WRDO10 NO P ABL LENDIS END REQUEST $ PWRDO10 LDK A2,20
0x21d7e8…21d97c Dummy {f00=0x00df, f01=0x0190, f02=» h P RF(NZ) WRDO15 ( P LDK A3,1 SET UP ECB BUFFER POINTER * P CF A15,GETCHR GET CONTROL CHARACTER J P SUK A2,/31 CTRL CHAR=/31 ? x , P ABL(NE) POSERR NO, DOC. NOT POSITIONED P LD A3,DWTDEV+DWTDL,A6 * 0 P ST A3,DWTDEV+DWTRLN,A6 FI
0x21d97c…21db10 Dummy {f00=0x00df, f01=0x0190, f02=» CF A5,SEND SEND INPUT FRONT FEED P LD A3,DWTDEV+DWTRLN,A6 ! * 4 P ST A3,DWTDEV+DWTALN,A6 SET DWTDEV+DWTALN=DWTRLN ! J P ! 0 PWRDO15 LDKL A2,CSSNV SELECT NATIONAL VERSION ! > P LDKL A3,DWTDEV+DWTDCS DOCUMENT CHARACTER SET DISPLACEMENT ! , P CF A5,S
0x21db10…21dca4 Dummy {f00=0x00df, f01=0x0190, f02=»TROL CHARACTER ! P* " $ P LDK A3,1 SET ECB BUFFER POINTER " ( P CF A15,GETCHR GET CONTROL CHARACTER " H & P LD A1,DWTDEV,A6 GET DEVICE STATUS " t ( P ANKL A1,/20 HAS POWER OFF OCCURED ? " P RF(NZ) REP1 YES " P* " * P SUK A2,/2B PRINT WITHOUT LI
0x21dca4…21de38 Dummy {f00=0x00df, f01=0x0190, f02=»IZE " z P CF A5,STABLK START OF BLOCK # P ABL(NZ) ERROUT JMP IF ERROR # 0 ( P LDR A2,A4 RESTORE CONT. CHAR. IN A2 # T 6 P CM DWTDEV+DWTCO2,A6 CLEAR DOCUMENT COLUMN COUNTER # * P SUK A2,5 PRINT AFTER TWO LINE FEED ? # P RF(Z) TWOLF1 YES # P* #
0x21de38…21dfcc Dummy {f00=0x00df, f01=0x0190, f02=» # j P* $ " P* EXECUTE CONTROL CHARACTER $ P* $ 8 2 PWRT03 LD A4,DWTDEV+DWTCO2,A6 GET ACTUAL COLUMN $ B P RF(Z) WRT05 $ x & P SUK A4,1 FOR CORRECT NO OF SPACES $ . PWRT05 CF A5,KONVER CONVERT BINARY TO ASCII $ @ P SC A2,DWTDEV+DWTACD,A6 STORE TH
0x21dfcc…21e160 Dummy {f00=0x00df, f01=0x0190, f02=»V+DWTACD+1,A6 SHIFT FOR CORRECT DIGITS $ P* % . PWRT09 LDKL A2,/8C BLOCK SIZE % 8 P CF A5,STABLK START OF BLOCK % P ABL(NZ) ERROUT JMP IF ERROR % P LD A4,DWTDEV+DWTCO2,A6 % . P ABL(Z) WRT15 JMP IF NO PRECEIDING SPACES % P LDK A2,/20 SEND S
0x21e160…21e2f4 (1, 369) Dummy {f00=0x00df, f01=0x0190, f02=» DOCUMENT DISPLACEMENT % l P CF A5,SEND SEND REPEAT & P ABL WRT15 & > P* & P 2 PTWOLF1 LD A1,DWTDEV+DWTRLN,A6 GET REQ LINE NO & Z & P CF A5,BINARY CONV ASCII TO BINARY & P SUK A3,1 INCR REQ LINE NO & P RF TWO TWO LINE FEED & 2 PONELF1 LD A1,D
0x21e2f4…21e488 Dummy {f00=0x00df, f01=0x0190, f02=» BINARY TO ASCII & ~ . P ST A4,DWTDEV+DWTRLN,A6 STORE REQ LINE NO ' 0 P LDKL A2,CSVPFF VERTICAL POSITION FRONT FEED ' J > P LDKL A3,DWTDEV+DWTRLN REQUESTED LINE NUMBER DISPLACEMENT ' ~ P CF A5,SEND ' P LD A4,DWTDEV+DWTRLN,A6 ' 8 P ST A4,DWTDEV+DWTALN
0x21e488…21e61c Dummy {f00=0x00df, f01=0x018e, f02=» CF A5,RESREC ' * P SUK A2,/2B PRINT WITHOUT LINE FEED ? ( P RB(Z) WRT09 YES ( D * P LD A1,DWTDEV+DWTLFD,A6 GET INDICATOR ( $ P RF(NZ) WRT15 JMP IF LF/FF DONE ( P RB WRT04 ( P* ( P XIF ( P EJECT ( P* ( P* ( , P* ORDER 06
0x21e61c…21e7b0 Dummy {f00=0x00df, f01=0x0190, f02=» ( | P TM A1,A3 END OF PAPER? ) P RF(Z) WRCO05 NO. ) ( P ABL ENDIO END REQUEST ) B " PWRCO05 LDK A3,1 NOT OPERABLE? ) ` P TM A1,A3 ) P RF(Z) WRCO10 NO ) P ABL ENDIO END REQUEST ) P ) PWRCO10 LDK A2,/E BLOCK SIZE ) P CF A5,STABLK
0x21e7b0…21e944 Dummy {f00=0x00df, f01=0x0190, f02=»HAR. SET DISPLACEMENT ) p , P CF A5,SEND SEND SELECT NATIONAL VERSION * P CF A5,ENDBLK END OF BLOCK * N P ABL(NZ) ERROUT JMP IF ERROR * p P* * . P* EXAMINE CONTROL CHARACTER, CONTINOUS * P* * ( P LDK A3,1 SET UP ECB BUFFER POINTER * ( P C
0x21e944…21ead8 Dummy {f00=0x00df, f01=0x0190, f02=»REP2 YES * P* + * P SUK A2,/2B PRINT WITHOUT LINE FEED ? + P RF(Z) WRC03 YES + H , PWRC04 LDR A4,A2 SAVE CONTROL CHAR. IN A4 + ` P LD A2,ECBRL,A8 + P ADK A2,/8 BLOCK LENGTH + P CF A5,STABLK START OF BLOCK + P ABL(NZ) ERROUT JMP IF ERROR
0x21ead8…21ec6c Dummy {f00=0x00df, f01=0x0190, f02=» FEED ? + r P RF(Z) TWOLF2 YES , P* , * & P SUK A2,1 PRINT AFTER FORM FEED ? , 4 P RF(Z) FORMF YES , ^ P* , v * P RF ONELF2 PRINT AFTER ONE LINE FEED ! , P* , . P* EXECUTE CONTROL CHARACTER, CONTINOUS , P* , 2 PWRC03 LD A4,DWTDEV+D
0x21ec6c…21ee00 Dummy {f00=0x00df, f01=0x0190, f02=»SCII , j D P SC A2,DWTDEV+DWTACP,A6 STORE THE VALUE IN ACTUAL COL. CONTINOUS - @ P ST A4,DWTDEV+DWTACP+2,A6 STORE THE VALUE IN ACT. COL. CONT. - T P* - " PWRC07 LDK A2,/8C BLOCK LENGTH - P CF A5,STABLK START OF BLOCK - P ABL(NZ) ERROUT JMP IF ERROR
0x21ee00…21ef94 (1, 370) Dummy {f00=0x00e2, f01=0x0190, f02=» P ABL(NZ) ERROUT JMP IF ERROR . P LDKL A2,CSREP REPEAT . ( < P LDKL A3,DWTDEV+DWTACP ACTUAL COLUMN PAPER DISPLACEMENT . F P CF A5,SEND SEND REPEAT . P RF WRT15 . P* . $ PTWOLF2 LDK A2,LF SEND LINE FEED . P CF A5,OUTPUT . P ABL(NZ)
0x21ef94…21f128 Dummy {f00=0x00e2, f01=0x018e, f02=» . P* / " PFORMF LDK A2,FF SEND FORM FEED / P CF A5,OUTPUT / 8 P ABL(NZ) ERROUT JMP IF ERROR / N P RF WRT14 / r P* / 2 P* REPEAT WRITE REQUEST AT CONTINOUS STATION / P* / PREP2 CF A5,RESREC / * P SUK A2,/2B PRINT WITHOUT LINE F
0x21f128…21f2bc Dummy {f00=0x00e2, f01=0x0190, f02=» / P EJECT 0 P* 0 2 P* ORDER 06 : THIS PART SENDS THE CHARACTERS 0 . P* TO DOCUMENT OR CONTINOUS STATIONARY. 0 V P* 0 2 PWRT14 IM DWTDEV+DWTLFD,A6 SET LF/FF INDICATOR 0 P* 0 * PWRT15 LDK A3,2 SET ECB BUFFER POINTER 0 & PWRT16 CF
0x21f2bc…21f450 Dummy {f00=0x00e2, f01=0x0190, f02=» 0 f P RF(Z) WRT18 YES. 1 ( P LDK A2,CR NO. SEND CARRIAGE RETURN 1 " P CF A5,OUTPUT 1 N P ABL(NZ) ERROUT JMP IF ERROR 1 d $ PWRT18 CF A5,ENDBLK END OF BLOCK 1 P ABL(NZ) ERROUT JMP IF ERROR 1 P CF A5,GTSTAT GET STATUS 1 P RF ENDIO END REQUES
0x21f450…21f5e4 Dummy {f00=0x00e2, f01=0x0190, f02=»* 1 P 2 P SUK A4,/20 CHAR < /20? 2 ( P RB(N) WRT16 YES GET A NEW CHARACTER 2 2 P SUK A4,/5F CHAR < /7F? 2 ^ P RF(N) WRT25 YES. 2 ~ P SUK A4,/2F NO. CHAR = /AE? 2 ( P RF(Z) WRT30 YES. CONVERT /AE TO /2E 2 4 P LDK A4,/04 ILLEGAL CHARACTER SE
0x21f5e4…21f778 Dummy {f00=0x00e2, f01=0x0190, f02=»RACTER 2 z P ABL(NZ) ERROUT JMP IF ERROR 3 $ P LC A2,DWTOR+1,A6 GET DWT INDEX 3 2 P ANK A2,1 DOCUMENT? 3 Z P RF(NZ) WRT40 YES 3 v . P IM DWTDEV+DWTCO1,A6 INC.COLUMN COUNTER 1 3 P RB WRT16 3 2 PWRT40 IM DWTDEV+DWTCO2,A6 INC.COLUMN COUNTER 2 3
0x21f778…21f90c Dummy {f00=0x00e2, f01=0x0190, f02=» IFT FFDEV=1 3 P* 4 P* 4 $ P* ORDER 0B : POSITION DOCUMENT 4 ( 0 P* CONTROL WORD CONTAINS REQUESTED LINE NO 4 P P* 4 P* 4 " PPOSDOC EQU * POSITION DOCUMENT 4 P CF A5,RESREC 4 $ P CF A5,GTSTAT GET DEVICE STATUS 4 P LDK A3,1 NO
0x21f90c…21faa0 Dummy {f00=0x00e2, f01=0x0190, f02=» ABL(NZ) ERROUT JMP IF ERROR 4 * P LDKL A2,CSSNV SELECT NATIONAL VERSION 5 $ , P LDKL A3,DWTDEV+DWTDCS DOCUMENT VERSION 5 R P CF A5,SEND SEND SNV 5 P CF A5,ENDBLK END OF BLOCK 5 P ABL(NZ) ERROUT JMP IF ERROR 5 & P LD A4,ECBCW,A8 GET REQUESTED LINE 5
0x21faa0…21fc34 (1, 371) Dummy {f00=0x00e3, f01=0x0190, f02=»TO BINARY 5 t " P CWR A4,A3 REQ. LINE>MAX. LINE 6 P RF(G) POSERR YES 6 8 P ADK A3,1 CORRECT POSITION 6 R P SUR A4,A3 INVERT LINE NO. 6 t ( P NGR A4,A4 GET PRINTER REQ. LINE NO. 6 * P CF A5,KONVER CONVERT BINARY TO ASCII 6 . P ST A4,DWTDEV+DWTRLN,A6
0x21fc34…21fdc8 Dummy {f00=0x00e3, f01=0x0190, f02=» 6 P LDK A2,/6 BLOCK LENGTH 7 P CF A5,STABLK START OF BLOCK 7 ( P ABL(NZ) ERROUT JMP IF ERROR 7 L $ P LDKL A2,CSINFF INPUT FRONT FEED 7 p > P LDKL A3,DWTDEV+DWTRLN REQUESTED LINE NUMBER DISPLACEMENT 7 & P CF A5,SEND SEND INPUT FRONT FEED 7 PPOS0
0x21fdc8…21ff5c Dummy {f00=0x00e3, f01=0x0190, f02=»URN CODE 7 ~ ( P ANKL A2,/2000 PAPER DOCUMENT OUT ? 8 8 P RB(NZ) POS005 YES WAIT FOR DOCUMENT TO BE INSERTED 8 < . P LD A4,DWTDEV+DWTRLN,A6 GET REQUESTED LINE 8 x 2 P ST A4,DWTDEV+DWTALN,A6 ACTUAL LINE = REQ LINE 8 PPOS020 ABL LENDIS 8 PPOS030 EQU * 8
0x21ff5c…2200f0 Dummy {f00=0x00e3, f01=0x0190, f02=»OSITION FRONT FEED 8 v > P LDKL A3,DWTDEV+DWTRLN REQUESTED LINE NUMBER DISPLACEMENT 9 2 P CF A5,SEND SEND VERTICAL POSITION FRONT FEED 9 P RB POS010 9 P XIF 9 PPOSERR EQU * 9 ( P ABL LENDER REQ. ERROR, END REQUEST 9 P EJECT 9 P IFT FFDEV
0x2200f0…220284 Dummy {f00=0x00e3, f01=0x0190, f02=»DK A1,0 CLEAR A1 9 P CF A5,RESREC : ( P LD A4,ECBCW,A8 GET NUMBER OF LINES : 0 P SRL A4,8 GET LINES : $ P RF(Z) DOC010 NO CHANGE OF LINES : x P CWK A4,/10 INDEX TO BIG : P RB(G) POSERR YES : * P ADR A4,A4 ADJUST INDEX TO LINE TABLE : 0 P
0x220284…220418 Dummy {f00=0x00e3, f01=0x0190, f02=»A4,ECBCW,A8 GET NATIONAL CHARACTER VARIATION : P ANK A4,/FF ; 4 6 P RF(Z) DOC020 NO CHANGE OF NATIONAL CHARACTER SET ; H P CWK A4,/F INDEX TO BIG ; P RB(G) POSERR YES ; " P ADR A4,A4 ADJUST TABLE INDEX ; 6 P LD A4,NCVTAB,A4 GET NAT. CHAR. SET AC
0x220418…2205ac Dummy {f00=0x00e3, f01=0x018e, f02=» ; P EJECT < P* < P* < 6 P* ORDER 24 : SET CONTINUOUS STATIONARY PARAMETERS < * P* < d P* < n 6 PCSTPAR EQU * SET PARAMETERS CONTINUOUS STATIONARY < x P LDK A1,0 CLEAR A1 < P CF A5,RESREC < , P LD A4,ECBCW,A8 GET NUMBER OF LINES
0x2205ac…220740 Dummy {f00=0x00e3, f01=0x0190, f02=» * P ADR A4,A4 ADJUST INDEX TO LINE TABLE = 2 P LD A4,LINNUM,A4 GET LINES ACCORDING TO INDEX = 2 : P ST A4,DWTDEV+DWTPL,A6 SET PAGE LENGTH FOR CONT.STAT. = h P LDK A2,/A BLOCK LENGTH = P CF A5,STABLK START OF BLOCK = P ABL(NZ) ERROUT JMP IF ERROR =
0x220740…2208d4 (1, 372) Dummy {f00=0x00e3, f01=0x0190, f02=»GTH = r P CF A5,ENDBLK END OF BLOCK > P ABL(NZ) ERROUT JMP IF ERROR > . PCST010 EQU * > R 4 P LD A4,ECBCW,A8 GET NATIONAL CHARACTER VARIATION > f P ANK A4,/FF > . P RF(Z) CST020 NO CHANGE OF NAT. CHAR. SET > P CWK A4,/F INDEX TO BIG > P RB(
0x2208d4…220a68 Dummy {f00=0x00e3, f01=0x0190, f02=»A4,DWTDEV+DWTPCS,A6 SET NAT. CHAR. SET FOR CONT.STAT. > PCST020 EQU * ? > P ABL ENDIO END REQUEST ? R P EJECT ? p P IFT FFDEV=1 ? ~ P* ? P* ? " P* ORDER 38 : RELEASE DOCUMENT ? P* ? P* ? PRELDOC EQU * ? P LDK A2,/4 BLOCK LEN
0x220a68…220bfc Dummy {f00=0x00e3, f01=0x0190, f02=»JECT FRONT FEED ? r P CF A5,SEND SEND SEQUENCE @ P CF A5,ENDBLK END OF BLOCK @ : P ABL(NZ) ERROUT JMP IF ERROR @ * P CF A5,GTSTAT GET STATUS FROM PRINTER @ P LDR A2,A1 GET RETURN CODE @ " P ANK A2,/20 DOCUMENT RELEASED @ " P RB(NZ) RELDOC NO
0x220bfc…220d90 Dummy {f00=0x00e3, f01=0x0190, f02=»ED LINE @ n P ABL ENDIO END REQUEST A P XIF A . P EJECT A : P* A H P* A R P* R C T P A P* A n : P* RECOVERY ROUTINE REPEATS RUNNING REQUEST AT POWER ON A x P* A P* A PRCTP EQU * A * PRCTP07 LDKL A1,/7FFF SET DEVICE BUSY A
0x220d90…220f24 Dummy {f00=0x00e3, f01=0x0190, f02=»TERS DK3 A r P XIF B P LDK A2,/F BLOCK LENGTH B P CF A5,STABLK START OF BLOCK B > P ABL(NZ) ERROUT JMP IF ERROR B b * P LDKL A2,CSRIS RESET TO INITIAL STATE B , P CF A5,SEND SEND RESET TO INITIAL STATE B 8 P LD A1,DWTDEV+DWTSYST,A6 INTERN. SYS
0x220f24…2210b8 Dummy {f00=0x00e3, f01=0x0190, f02=» * B 0 P LDKL A4,STDNCV GET STANDARD NAT. CHAR. SET C * P CF A5,KONVER CONVERT BIANARY TO ASCII C @ 2 P ST A4,DWTDEV+DWTDCS,A6 SET CHAR. SET DOCUMENT C n 4 P ST A4,DWTDEV+DWTPCS,A6 SET CHAR. SET CONT.STAT. C ( P LDKL A4,PAGLEN STANDARD PAGE LENGTH C * P
0x2210b8…22124c Dummy {f00=0x00e3, f01=0x0190, f02=»H C p 6 P LDKL A3,DWTDEV+DWTPL PRINTER PAPER LENGTH DISPL. D & P CF A5,SEND SEND SELECT PAGELENGTH D D 6 P LDKL A4,DOCLEN GET STANDARD PAGE LENGTH DOCUMENT D n * P CF A5,KONVER CONVERT BINARY TO ASCII D 4 P ST A4,DWTDEV+DWTDL,A6 SET PAGE LENGTH DOCUMENT D
0x22124c…2213e0 Dummy {f00=0x00e3, f01=0x0190, f02=»A6 RESET ACTUAL LINE D ~ , P LDKL A1,/20 INDICATE POWER OFF OCCURED E P ORS A1,DWTDEV,A6 E L $ P LD A1,DWTECB,A6 RUNNING REQUEST E f , P ABL(NZ) ACT005 YES , REPEAT THE REQUEST E P ABL LENDIS DISPATCH E P EJECT E P* E P* E P* GTSTAT E
0x2213e0…221574 (1, 373) Dummy {f00=0x00e3, f01=0x0190, f02=»STATUS SENT FROM THE PRINTER E v P* F $ P* AT EXIT A1 = RETURN CODE F . P* F P P* F Z PGTSTAT EQU * F d * P CM DWTDEV+DWTRC,A6 RESET RETURN CODE F x P LDK A2,/4 BLOCK LENGTH F P CF A5,STABLK START OF BLOCK F P ABL(NZ) ERROUT JMP IF ERROR F
0x221574…221708 Dummy {f00=0x00e3, f01=0x0190, f02=»CER F l P CF A5,OUTPUT SEND CSI G P ABL(NZ) ERROUT JMP IF ERROR G * P LDK A2,/35 G N P CF A5,OUTPUT SEND /35 G b P ABL(NZ) ERROUT JMP IF ERROR G $ P LDK A2,DSR DEVICE STATUS REPORT G P CF A5,OUTPUT SEND DSR G P ABL(NZ) ERROUT JMP IF ERROR G
0x221708…22189c Dummy {f00=0x00e3, f01=0x0190, f02=» =1 G z P ADR A4,A6 =1 H , P LC A2,DWTOR+1,A6 TEST STATUS ORDER? DK4 H " P ANK A2,/FF H R ( P RF(NZ) GTST02 NO, 25 SEC. TIMER DK4 H f , P LDK A2,IMTIME IMMEDIATE = 2 SECONDS DK4 H P ST A2,VARTIM H PGTST02 EQU * H P CF A15,SETIMP SET TIMER =
0x22189c…221a30 Dummy {f00=0x00e3, f01=0x0190, f02=»IMER DK4 H r P ST A2,VARTIM . DK4 I ( PGTST05 LDKL A4,TAB GET TABLE ADDRESS I , PGTST10 EQU * I X P LDK A3,0 RESET INDEX I l * P CF A5,INPUT READ STATUS FROM PRINTER I P ANK A2,/FF GET CHARACTER I $ P CCK A2,/9C9C STRING TERMINATOR I P RF(E)
0x221a30…221bc4 Dummy {f00=0x00e3, f01=0x0190, f02=»A3 TIMES I $ P EXR A3 EXECUT SHIFT INSTRUCTION J 8 P ORS A2,DWTDEV+DWTRC,A6 SAVE RETURN CODE TEMPORARILY J 8 P ADK A4,2 INCREMENT ADRESS J t ( P RB GTST10 GET NEXT STATUS CHARACTER J PGTSEND EQU * J * P LD A1,DWTDEV+DWTRC,A6 GET RETURN CODE J P LD
0x221bc4…221d58 Dummy {f00=0x00e3, f01=0x0190, f02=»TDEV+DWTTP,A6 RESET TIMER POINTER =1 J P RTN A5 K , P EJECT K < P* K J : P* THIS ROUTINE CONVERTS A BINARY VALUE TO ASCII CODE K T P* K P* REGISTERS : K P* A1= WORK REGISTER K P* A4= BINARY INPUT K P* A2,A4= ASCII OUTPUT K
0x221d58…221eec Dummy {f00=0x00e3, f01=0x0190, f02=»ONV05 NO K P SUKL A4,100 L & P LDKL A2,/100 LEFT BYTE OF A2=X=1 L $ * PKONV05 CWK A4,10 ARE THERE ANY TENS ? L N P RF(L) KONV04 NO L | P SUK A4,10 L 2 P ADK A2,/1 NUMBER OF TENS IN RIGHT B. OF A2=Y L P RB KONV05 NEXT L " PKONV04 ORKL A2,/3030
0x221eec…222080 Dummy {f00=0x00e3, f01=0x0190, f02=»F KEEP X IN R. BYTE OF A2. ASCII L P ORR A4,A1 YZ IN A1. ASCII M ( P RTN A5 M J P EJECT M Z P* M h P* RESET RECORVERY M r P* M PRESREC EQU * M " P LD A4,DWTDEV,A6 DEVICE STATUS M P ANKL A4,/20 RECOVERY? M P RF(E) RESRTN NO. M . P
0x222080…222214 (1, 374) Dummy {f00=0x00e4, f01=0x0190, f02=»R STABLK,OUTPUT AND ENDBLK AND TIMER M ~ P* N , P* INPUT : A1 = RETURN CODE N 6 P* N X PERROUT EQU * N b 0 P ANK A1,/1A OUTP. ERR, SOFTW T-OUT, LRC-ERR N v P ABL(NZ) RCTP RECOVERY N PERGP10 LDK A1,1 IND. NOT OP. N P ABL LENDIS N P* N
0x222214…2223a8 Dummy {f00=0x00e4, f01=0x0190, f02=»JECT N P* O P* O P* S E N D O P* O 2 , P* THIS ROUTINE SENDS AN CONTROL SEQUENCE O < P* TO THE PRINTER O l P* O P* O P* AT ENTRY : O " P* A2 = CONTROL SEQUENCE ADRESS O 4 P* A3 = DWT-DISPLACEMENT TO LINE NO,CHAR.SET,ETC O
0x2223a8…22253c Dummy {f00=0x00e4, f01=0x0190, f02=» O p 2 P ST A3,DWTDEV+DWTDISP,A6 SAVE DWT-DISPLACEMENT P 4 P ST A2,DWTDEV+DWTSTR,A6 CONTROL SEQUENCE ADRESS P > PSEND10 EQU * P v 8 P LD A3,DWTDEV+DWTSTR,A6 GET CONTROL SEQUENCE ADRESS P P LCR A2,A3 GET CHARACTER P P ANK A2,/FF MAKE CHARACTER P & P
0x22253c…2226d0 Dummy {f00=0x00e4, f01=0x018e, f02=» P ~ ( P SRL A2,8 PREPARE TO SEND CHARACTER Q P CF A5,OUTPUT SEND CHARACTER Q 4 P ABL(NZ) ERROUT JMP IF ERROR Q X PSEND20 EQU * Q | 4 P IM DWTDEV+DWTSTR,A6 INC. CONTROLSEQUENCE ADRESS Q P RB SEND10 GET NEXT Q PSEND30 EQU * Q 2 P LD A3,DWTDEV+DW
0x2226d0…222864 Dummy {f00=0x00e4, f01=0x018e, f02=» Q r P ABL(NZ) ERROUT JMP IF ERROR R 2 P IM DWTDEV+DWTDISP,A6 INC. DISPLACEMENT ADRESS R , P RB SEND20 GET NEXT R b PSENDEND EQU * R ~ P RTN A5 R P EJECT R P* R P* R P* BINARY R P* R 8 P* THIS ROUTINE CONVERTS ASCII CODE TO A
0x222864…2229f8 Dummy {f00=0x00e4, f01=0x0190, f02=» R P* S P* S PBINARY SUR A3,A3 CLEAR A3 S P LDR A2,A1 MAX. LINE ASCII S > P SRL A2,8 S ` P SUK A2,/30 S r P ADR A3,A2 S P ADR A3,A2 S P SLL A2,3 S P ADR A3,A2 S P ANK A1,/F S P ADR A3,A1 MAX. LINE BINARY S P RTN
0x2229f8…222b8c Dummy {f00=0x00e4, f01=0x0190, f02=» " P DATA /3336,/3438,/3530,/3531 T " P DATA /3630,/3636,/3730,/3732 T * P* T P P* T Z P* T d P* T n 6 PNCVTAB EQU *-2 NATIONAL CHARACTER VARIATION YABLE T x " P DATA /3031,/3032,/3033,/3034 T " P DATA /3035,/3036,/3037,/3038 T " P DATA /303
0x222b8c…222d20 Dummy {f00=0x00e4, f01=0x4078, f02=»0,/2CC * T P DATA /2CF,/4CB,/C0,/C0 * U P DATA /C0,/C0,/C0,/C0 U 4 P DATA /C0,/C0 U R P END U h@ U tNCVTAB EQU *-2 NATIONAL CHARACTER VARIATION YABLE T x " P DATA /3031,/3032,/3033,/3034 T " P DATA /3035,/3036,/3037,/3038 T " P DATA /303
0x222d20…222eb4 (1, 375) Dummy {f00=0x00e4, f01=0x4008, f02=»@ V @
0x222eb4…223048 Dummy {f00=0x00e4, f01=0x2008, f02=» W * 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
0x223048…2231dc Dummy {f00=0x00e4, f01=0x0190, f02=»
[…0x5…]
0x2239c0…223b54 (1, 376) Opaque[0x194]
0x223b54…223ce8 # DirEnt {nam=»DRPL01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1470, f03=0x0000}
0x223b54…223ce8 IdxSect {
0x223b54…223ce8 f00 = 0x00a3 // 0x223b54 @0x0
0x223b54…223ce8 f01 = 0x0062 // 0x223b56 @0x2
0x223b54…223ce8 gno = [ // 0x223b58 @0x4
0x223b54…223ce8 [0x00]: C0x00a3.0x2.0
0x223b54…223ce8 [0x01]: C0x00a3.0x3.0
0x223b54…223ce8 [0x02]: C0x00a4.0x0.0
0x223b54…223ce8 [0x03]: C0x00a4.0x1.0
0x223b54…223ce8 [0x04]: C0x00a4.0x2.0
0x223b54…223ce8 [0x05]: C0x00a4.0x3.0
0x223b54…223ce8 [0x06]: C0x00a5.0x0.0
0x223b54…223ce8 [0x07]: C0x00a5.0x1.0
0x223b54…223ce8 [0x08]: C0x00a5.0x2.0
0x223b54…223ce8 [0x09]: C0x00a5.0x3.0
0x223b54…223ce8 [0x0a]: C0x00a6.0x0.0
0x223b54…223ce8 [0x0b]: C0x00a6.0x1.0
0x223b54…223ce8 [0x0c]: C0x00a9.0x3.0
0x223b54…223ce8 [0x0d]: C0x00b2.0x1.0
0x223b54…223ce8 [0x0e]: C0x00b2.0x2.0
0x223b54…223ce8 [0x0f]: C0x00ce.0x1.0
0x223b54…223ce8 [0x10]: C0x00fb.0x2.0
0x223b54…223ce8 [0x11]: C0x00fb.0x3.0
0x223b54…223ce8 [0x12]: C0x00fc.0x0.0
0x223b54…223ce8 [0x13]: C0x00fc.0x1.0
0x223b54…223ce8 [0x14]: C0x00fc.0x2.0
0x223b54…223ce8 [0x15]: C0x00fc.0x3.0
0x223b54…223ce8 [0x16]: C0x00fd.0x0.0
0x223b54…223ce8 [0x17]: C0x00fd.0x1.0
0x223b54…223ce8 [0x18]: C0x00fd.0x2.0
0x223b54…223ce8 [0x19]: C0x00fd.0x3.0
0x223b54…223ce8 [0x1a]: C0x00fe.0x0.0
0x223b54…223ce8 [0x1b]: C0x00fe.0x1.0
0x223b54…223ce8 [0x1c]: C0x00fe.0x2.0
0x223b54…223ce8 [0x1d]: C0x0124.0x2.0
0x223b54…223ce8 [0x1e]: C0x0124.0x3.0
0x223b54…223ce8 [0x1f]: C0x0125.0x0.0
0x223b54…223ce8 [0x20]: C0x0125.0x1.0
0x223b54…223ce8 [0x21]: C0x0125.0x2.0
0x223b54…223ce8 [0x22]: C0x0125.0x3.0
0x223b54…223ce8 [0x23]: C0x0126.0x0.0
0x223b54…223ce8 [0x24]: C0x0126.0x1.0
0x223b54…223ce8 [0x25]: C0x0126.0x2.0
0x223b54…223ce8 [0x26]: C0x0126.0x3.0
0x223b54…223ce8 [0x27]: C0x0127.0x0.0
0x223b54…223ce8 [0x28]: C0x0127.0x1.0
0x223b54…223ce8 [0x29]: C0x0127.0x2.0
0x223b54…223ce8 [0x2a]: C0x0127.0x3.0
0x223b54…223ce8 [0x2b]: C0x0128.0x0.0
0x223b54…223ce8 [0x2c]: C0x0128.0x1.0
0x223b54…223ce8 [0x2d]: C0x0128.0x2.0
0x223b54…223ce8 [0x2e]: C0x012d.0x1.0
0x223b54…223ce8 [0x2f]: C0x012d.0x2.0
0x223b54…223ce8 [0x30]: C0x012d.0x3.0
0x223b54…223ce8 ]
0x223b54…223ce8 }
0x223ce8…223e7c Dummy {f00=0x00a3, f01=0x0190, f02=» 2 P IDENT DRPL01 REL 11.1 83-10-20 870105041110 P : & P DK2,WAITING LEV. 3 ACK (PE-AB) B " P DK1, PE-AB CHGE, LINE 3207 l P =17,BLOCKING IMPROVED P REL 11.1 82-08-13 & P =16,CHANGED BLOCKING OF OUTPUT P REL 11.1 82-0
0x223e7c…224010 Dummy {f00=0x00a3, f01=0x0190, f02=»,ADAPTED FOR PTS8000 P REL 11.0 81-10-14 P =12,DIAGNOSTIC FOR RWSI 8 P REL 11.0 81-08-27 Z P =11,CH. OF PARAMETERS v P REL 11.0 81-08-10 P =10,CORR. OF RWSI P REL 11.0 81-08-10 " P =9,CORR. OF INTERRUPT ENTRY
0x224010…2241a4 Dummy {f00=0x00a3, f01=0x0190, f02=» REL 11.0 81-06-11 ( P =6,LENGTH OF LONG BUFFERS CHANGED P REL 11.0 81-05-27 H P =5,CORR. OF RWSI-CWT:S , d $ P OPEN LINE PROC. & COND. ASS. P REL 11.0 81-05-22 P =4,CORR. OF CWT-DISPL. P REL 11.0 81-05-20
0x2241a4…224338 Dummy {f00=0x00a3, f01=0x0190, f02=» GENERAL UPDATE FOR RWSI P REL 11.0 81-01-26 ( P =1,OPEN LINE PARAM. AREA EXPANDED < P PRR 11.0 80-11-19 h P EJECT P* P* P* P* @ P************************************************************ P* $ P
0x224338…2244cc Dummy {f00=0x00a3, f01=0x0190, f02=»TE CONNECTIONS t P* P* P* * @ P************************************************************ 4 P* x P* 2 P* THIS PROGRAM HANDLES I/O OPERATIONS ON THE 0 P* PROCESSOR FOR LINE CONTROL (PLC). IT IS 0 P* CALLED FROM TH
0x2244cc…224660 Dummy {f00=0x00a3, f01=0x0190, f02=»N CHARACTER j 4 P* BASIS. BLOCKING AND DEBLOCKING OF CHARACTERS 4 P* IN DATA PACKETS ARE HANDLED BY THIS DRIVER. L P* P EJECT P* : P* THE PROGRAM IS DIVIDED INTO A NUMBER OF SECTIONS. 4 P* SECTIONS CONTAINING PROGRAM CODE
0x224660…2247f4 (1, 377) Dummy {f00=0x00a3, f01=0x0190, f02=»DER OF APPEARANCE IN LIST, ARE: P* ( P* NAME FUNCTION 2 P* L & P* ENTRIES DECLARE ENTRY POINTS V . P* EXTERNALS DECLARE EXTERNAL REFERENCES 6 P* CONDITION SET CONDITIONAL ASSEMBLY PARAMETERS & P* CONSTANTS SET CONSTANT V
0x2247f4…224988 Dummy {f00=0x00a3, f01=0x0190, f02=» p 8 P* RECOVERY SYSTEM START, POWER FAIL AND RECOVERY & P* DISPATCH LOCAL PLC DISPATCHER D ( P* ROUTINE COMMON SERVICE ROUTINES n , P* SUBROUTIN COMMON SERVICE SUBROUTINES * P* TBUFF BUFFER HANDLING SUBROUTINES P* P EJECT
0x224988…224b1c Dummy {f00=0x00a3, f01=0x0190, f02=»I CHARACTER INPUT . P ENTRY PLSTBL DEFINE START OF OUTPUT BLOCK " P ENTRY PLCHRO CHARACTER OUTPUT L , P ENTRY PLENBL DEFINE END OF OUTPUT BLOCK r " P ENTRY PLDISP LOCAL DISPATCHER " P ENTRY PRCHRI CHR INP REMOTE , P ENTRY PRSTBL START OUTP B
0x224b1c…224cb0 Dummy {f00=0x00a3, f01=0x018e, f02=»MOTE t P ENTRY PLTEST TEST COMMANDS P ENTRY CWTPLC CWT TABLE 2 $ P ENTRY GETDWT GET DWT SUBROUTINE R " P ENTRY PLCLOG LOGG POINTER =11 z & P ENTRY TIMACT INACTIVITY TIMER =11 2 P ENTRY POLRTL POLL FREQ. & NO OF RETRANSM =11 , P ENTRY P
0x224cb0…224e44 Dummy {f00=0x00a3, f01=0x0190, f02=» t P ENTRY IHPL02 PLC NUMBER 2 P ENTRY IHPL03 PLC NUMBER 3 * P ENTRY IHPL04 PLC NUMBER 4 L P* n & P ENTRY IHPR01 PLC NUMBER 5,REMOTE x & P ENTRY IHPR02 6,REMOTE & P ENTRY IHPR03 7,REMOTE & P ENTRY IHPR04
0x224e44…224fd8 Dummy {f00=0x00a3, f01=0x018e, f02=» EJECT P* P************* P* EXTERNALS * . P************* D P* Z P* TOSS MONITOR d P* ~ P* ROUTINES P EXTRN TDISP TOSS DISPATCHER " P EXTRN QMJOB QUEUE MONITOR JOB & P EXTRN MEXIT EXIT FROM MONITOR
0x224fd8…22516c Dummy {f00=0x00a3, f01=0x018e, f02=» P EXTRN SETIME SET TIMER P* DATA WORDS $ " P EXTRN PFPOST POWER FAIL FLAG > , P EXTRN INTSAV LATEST INTERRUPT SAVE AREA d P* P* P* DRND01 SERVICE ROUTINES P* * P EXTRN NDSAV8 SAVE A3-A5, A7-A8 IN DWT , P EXT
0x22516c…225300 Dummy {f00=0x00a3, f01=0x0190, f02=» j . P EXTRN NDGEDN GET HIGEST DWT NUMBER ON WS " P EXTRN NDGEDW GET DWT ADDRESS : P* ` P EJECT j P* x 4 P* DRND01 ROUTINES FOR RETURN TO DEVICE DRIVER P* " P EXTRN NDREPO POP, OK & RETURN P EXTRN NDRETO OK & RETURN
0x225300…225494 (1, 378) Dummy {f00=0x00a4, f01=0x0190, f02=»CHP CHANNEL PARAMETERS P EXTRN DWTST STATUS FLAGS $ P EXTRN DWTOR ORDER (RIGHT BYTE) @ . P EXTRN DWTADR DRIVER ADDRESS BLOCK ADDRESS h P EXTRN DWTOTQ QUEUE LINK 0 P EXTRN DWTCP2 SECOND CHANNEL PARAMETER WORD . P EXTRN DWTLD1 PLC INPUT/OU
0x225494…225628 Dummy {f00=0x00a4, f01=0x0190, f02=»N PLC TEST COMMANDS BUFFER LENGTH 2 P EXTRN DWTTCW PLC TEST COMMANDS SPECIAL PARAM * ( P EXTRN DWTWAT WAIT/ACT INDICATOR =16 ` P* P EJECT P* P* WORK STATION TABLES P* P EXTRN INTPL1 PLC 1 P EXTRN INTPL2 PLC 2
0x225628…2257bc Dummy {f00=0x00a4, f01=0x0190, f02=» INTPR3 REMOTE P EXTRN INTPR4 REMOTE P* 2 P* MISCELLANEOUS < P* V 6 P EXTRN INTADR INTERRUPT ADDR IN DRIVER ADDR BLOCK ` P* P EJECT P* P************************ P* CONDITIONAL ASSEMBLY * P************
0x2257bc…225950 Dummy {f00=0x00a4, f01=0x018e, f02=»U 0. j P* PCPU852 EQU 0 P* * P* 4 D P* PLCNRL DEFINES NUMBER OF LOCAL PLC:S ACTUALLY CONNECTED (0-4) > P* PX:A EQU 1 PPLCNRL EQU X:A P* D P* PLCNRR DEFINES THE NUMBER OF REMOTE PLC:S ACTUALLY CONN. (0-4)
0x225950…225ae4 Dummy {f00=0x00a4, f01=0x0190, f02=» P************* P* $ P* SYSTEM PARAMETER DEFINITION $ P* L , P* LEVEL 3 FLOW CONTROL WINDOW SIZE (1-7) V PWINDOW EQU 2 P* 4 P* MAXIMAL NUMBER OF WORK STATIONS PER PLC (1-32) PMAXWS EQU 32 P* > P* DELAY BEFORE
0x225ae4…225c78 Dummy {f00=0x00a4, f01=0x0190, f02=»FFER IN WORDS (1-128) h PSOBUFU EQU 3 P* 2 B P* LENGTH OF USER PART OF GENERAL READ BUFFER IN WORDS (1-128) < PGRBUFU EQU 70 P* ( P* INACTIVITY TIMER (MINUTES) PTIMACT EQU 3 U =8 P* J P* POLLING FREQUENCY (L
0x225c78…225e0c Dummy {f00=0x00a4, f01=0x0190, f02=»* IF PLCTST IS 1 THE PLC DIAGNOSTIC COMMANDS ARE HANDLED P* BY THIS DRIVER. @ P* Z PPLCTST EQU 0 d P* x P* D P* A TEST VERSION OF THE DRIVER IS OBTAINED BY SETTING UTTEST><0 @ P* IF UTTEST=1 THE TEST CODE IS INCLUDUD BUT TRAP IS
0x225e0c…225fa0 Dummy {f00=0x00a4, f01=0x0190, f02=»FN IS THE NUMBER OF LONG OUTPUT BUFFERS USED P* FOR EACH PLC (1-32) 4 P* R PLOBUFN EQU 3 P* p P* z 6 P* LOBUFU IS THE LENGTH OF THE USER PART OF A LONG $ P* OUTPUT BUFFER IN WORDS (1-128) P* PLOBUFU EQU 128 U =6,=16
0x225fa0…226134 (1, 379) Dummy {f00=0x00a4, f01=0x0190, f02=»CTOR IN SYSTAB P* PINTLV0 EQU 26 PLC NUMBER 1 PINTLV1 EQU 27 PLC NUMBER 2 B PINTLV2 EQU 24 PLC NUMBER 3 d PINTLV3 EQU 25 PLC NUMBER 4 & PINTRV0 EQU 18 PLC NUMBER 5, REMOTE & PINTRV1 EQU 19 6, REMOTE & PINTRV2 EQU 2
0x226134…2262c8 Dummy {f00=0x00a4, f01=0x0190, f02=»CDA0 EQU /06 PLC 1 PPLCDA1 EQU /07 PLC 2 PPLCDA2 EQU /26 PLC 3 6 PPLCDA3 EQU /27 PLC 4 R PPLCDA4 EQU /3A PLC 5 n PPLCDA5 EQU /3B PLC 6 PPLCDA6 EQU /2A PLC 7 PPLCDA7 EQU /2B PLC 8 P* P EJECT P* * P* BUF
0x2262c8…22645c Dummy {f00=0x00a4, f01=0x0190, f02=» (WORDS) j 2 PSYSTLW EQU HEADLW+FLOWLW SYSTEM PART OF BUFFER P* F P* LONG OUTPUT BUFFERS P : PLOBUF1 EQU SYSTLW+LOBUFU LENGTH OF ONE BUFFER (WORDS) r & PLOBUF2 EQU LOBUF1+LOBUF1 2 BUFFERS PLOBUF3 EQU LOBUF2+LOBUF1 PLOBUF4 EQU LOB
0x22645c…2265f0 Dummy {f00=0x00a4, f01=0x018e, f02=»7+LOBUF1 . =17 " PLOBUF9 EQU LOBUF8+LOBUF1 . =17 " PLOBU10 EQU LOBUF9+LOBUF1 . =17 < " PLOBU11 EQU LOBU10+LOBUF1 . =17 b " PLOBU12 EQU LOBU11+LOBUF1 . =17 " PLOBU13 EQU LOBU12+LOBUF1 . =17 " PLOBU14 EQU LOBU13+LOBUF1 . =17 " PLOBU15 EQU LOB
0x2265f0…226784 Dummy {f00=0x00a4, f01=0x0190, f02=» " PLOBU19 EQU LOBU18+LOBUF1 . =17 " PLOBU20 EQU LOBU19+LOBUF1 . =17 * " PLOBU21 EQU LOBU20+LOBUF1 . =17 P " PLOBU22 EQU LOBU21+LOBUF1 . =17 v " PLOBU23 EQU LOBU22+LOBUF1 . =17 " PLOBU24 EQU LOBU23+LOBUF1 . =17 " PLOBU25 EQU LOBU24+LOBUF1 . =17
0x226784…226918 Dummy {f00=0x00a4, f01=0x018e, f02=»8+LOBUF1 . =17 " PLOBU30 EQU LOBU29+LOBUF1 . =17 " PLOBU31 EQU LOBU30+LOBUF1 . =17 < " PLOBU32 EQU LOBU31+LOBUF1 . =17 b P IFT LOBUFN=1 4 PLOBUFS EQU LOBUF1 LENGTH OF BUFFER AREA (WORDS) P XIF P IFT LOBUFN=2 4 PLOBUFS EQU LOBUF
0x226918…226aac Dummy {f00=0x00a4, f01=0x0190, f02=» P IFT LOBUFN=4 4 PLOBUFS EQU LOBUF4 LENGTH OF BUFFER AREA (WORDS) P XIF V P IFT LOBUFN=5 b 4 PLOBUFS EQU LOBUF5 LENGTH OF BUFFER AREA (WORDS) x P XIF P IFT LOBUFN=6 4 PLOBUFS EQU LOBUF6 LENGTH OF BUFFER AREA (WORDS)
0x226aac…226c40 Dummy {f00=0x00a4, f01=0x0190, f02=»7 z P XIF P IFT LOBUFN=9 . =17 PLOBUFS EQU LOBUF9 . =17 2 P XIF R P IFT LOBUFN=10 . =17 ^ PLOBUFS EQU LOBU10 . =17 z P XIF P IFT LOBUFN=11 . =17 PLOBUFS EQU LOBU11 . =17 P XIF P IFT LOBUFN=12 . =17
0x226c40…226dd4 (1, 380) Dummy {f00=0x00a4, f01=0x018e, f02=»17 ~ PLOBUFS EQU LOBU14 . =17 P XIF * P IFT LOBUFN=15 . =17 6 PLOBUFS EQU LOBU15 . =17 R P XIF r P IFT LOBUFN=16 . =17 ~ PLOBUFS EQU LOBU16 . =17 P XIF P IFT LOBUFN=17 . =17 PLOBUFS EQU LOBU17 . =17 P XIF
0x226dd4…226f68 Dummy {f00=0x00a4, f01=0x018e, f02=» P XIF P IFT LOBUFN=20 . =17 PLOBUFS EQU LOBU20 . =17 , P XIF L P IFT LOBUFN=21 . =17 X PLOBUFS EQU LOBU21 . =17 t P XIF P IFT LOBUFN=22 . =17 PLOBUFS EQU LOBU22 . =17 P XIF P IFT LOBUFN=23 .17 PLOBUFS
0x226f68…2270fc Dummy {f00=0x00a4, f01=0x0190, f02=» PLOBUFS EQU LOBU25 . =17 P XIF $ P IFT LOBUFN=26 . =17 0 PLOBUFS EQU LOBU26 . =17 L P XIF l P IFT LOBUFN=27 . =17 x PLOBUFS EQU LOBU27 . =17 P XIF P IFT LOBUFN=28 . =17 PLOBUFS EQU LOBU28 . =17 P XIF P
0x2270fc…227290 Dummy {f00=0x00a4, f01=0x0190, f02=» P IFT LOBUFN=31 . =17 ! PLOBUFS EQU LOBU31 . =17 ! $ P XIF ! D P IFT LOBUFN=32 . =17 ! P PLOBUFS EQU LOBU32 . =17 ! l P XIF ! P* ! P EJECT ! P* ! P* SHORT OUTPUT BUFFERS ! : PSOBUF1 EQU SYSTLW+SOBUFU LENGTH OF ONE BUF
0x227290…227424 Dummy {f00=0x00a4, f01=0x0190, f02=» SOBUF8 LENGTH OF BUFFER AREA (WORDS) ! P* " . P* GENERAL READ BUFFERS " 8 : PGRBUF1 EQU SYSTLW+GRBUFU LENGTH OF ONE BUFFER (WORDS) " PGRBUF2 EQU GRBUF1+GRBUF1 " 4 PGRBUFS EQU GRBUF2 LENGTH OF BUFFER AREA (WORDS) " P* " 2 P* LENGT
0x227424…2275b8 Dummy {f00=0x00a4, f01=0x0190, f02=»FERS " h 2 PGRBUFL EQU GRBUFU+GRBUFU GENERAL READ BUFFERS # P* # B P EJECT # L P* # Z 0 P* CONTROLLER COMMAND RECORD (CCR) LAYOUT # d P* # ( PCCRDLS EQU 0 DATA LINK STATION INDEX # PCCRCMD EQU 1 COMMAND CODE # " PCCRSU1 EQU 2 SUBCOMMAND
0x2275b8…22774c Dummy {f00=0x00a4, f01=0x018e, f02=»NTITY, BYTE FIELD # & PCCRIDW EQU 8 IDENTITY, WORD FIELD $ ( PCCRLEN EQU 10 BUFFER LENGTH (BYTES) $ D 6 PCCRC1B EQU 12 DATA CHAINING CTRL & MSB BUFFER ADDR $ p PCCRBUF EQU 14 BUFFER ADDRESS $ P* $ P* $ P* BUFFER LAYOUT $ P* $ P*
0x22774c…2278e0 Dummy {f00=0x00a4, f01=0x0190, f02=» PBUFDWT EQU -6 DWT ADDRESS % * PBUFLEN EQU -4 LENGTH OF TEXT IN BUFFER % & PBUFBIX EQU -2 BYTE INDEX % T $ P* X25 CONTROL FIELD LAYOUT % t . PX25LGN EQU 0 LOGICAL CHANNEL GROUP NUMBER % ( PX25LCN EQU 1 LOGICAL CHANNEL NUMBER % * PX25FLW EQU 2 F
0x2278e0…227a74 (1, 381) Dummy {f00=0x00a4, f01=0x0190, f02=»* % $ PCMDTC EQU /80 TEST CHANNEL UNIT & PCMDOP EQU /86 OPEN LINE & 2 PCMDOD EQU /85 OPEN DLS & R & PCMDPS EQU /84 GET LINE STATISTICS & p $ PCMDDS EQU /83 GET DLS STATISTICS & $ PCMDRM EQU /87 READ LOCAL MEMORY & PCMDSW EQU /40 STANDARD WRITE &
0x227a74…227c08 Dummy {f00=0x00a4, f01=0x0190, f02=»* & $ PORDPS EQU 1 GET LINE STATISTICS ' " PORDDS EQU 2 GER DLS STATISTICS ' 2 " PORDRM EQU 3 READ LOCAL MEMORY ' X P* ' ~ P* ' P* MESSAGE TYPES ' P* ' & PTYERR EQU 0 ILLEGAL TYPE OR ERROR ' 2 PTYNFLO EQU 2 DATA PACKET WITH NO FLOW CO
0x227c08…227d9c Dummy {f00=0x00a4, f01=0x0190, f02=»TYRES EQU 10 RESET PACKET ' , PTYRESC EQU 12 RESET CONFIRMATION PACKET ( " P* ( R P EJECT ( P* ( j " P* DWT STATUS FLAGS (DWTST) ( t P* ( $ PDWFBSY EQU /8000 DEVICE NOT BUSY ( PDWFECH EQU /2000 ECHO MODE ( $ PDWFINP EQU /0020 INPUT REQ
0x227d9c…227f30 Dummy {f00=0x00a4, f01=0x0190, f02=» FLAGS ( t 2 PDWFTY1 EQU /0002 USE ONLY TYPE 1 DATA PACKETS ) * PDWFSAC EQU /0001 WAIT FOR LEVEL 3 ACK ) D P* ) r P* ) | " P* PLC STATUS FLAGS (CCRSTA) ) P* ) " PSTANOC EQU /0001 NO CONNECTION ) PSTALIR EQU /0004 LINK RESET ) & PSTADNO E
0x227f30…2280c4 Dummy {f00=0x00a4, f01=0x0190, f02=»STAREQ EQU /8000 REQUEST ERROR ) ( PSTANOB EQU /0800 NO BUFFERS FOR CCR * & $ PSTAPOL EQU /0100 POLLING STOPPED * R 0 PSTACOM EQU /0080 COMMUNICATION REESTABLISHED * z $ PSTASEQ EQU /0010 SEQUENCE ERROR * $ PSTAILL EQU /0008 ILLEGAL LENGTH * PSTALER EQU
0x2280c4…228258 Dummy {f00=0x00a4, f01=0x0190, f02=» ERROR * t P* + P* + & P* MASKS FOR CHANNEL PARAMETERS + " P* + L ( PMASKPL EQU /0F PLC NUMBER (0-3 USED) + V 2 PMASKWS EQU /3F WORK STATION NUMBER (1-32 USED) + . PMASKLC EQU /3F LOGICAL CHANNEL (0-7 USED) + P* + P* + P* RETUR
0x228258…2283ec Dummy {f00=0x00a4, f01=0x0190, f02=»RR EQU /0001 SOFTWARE ERROR + P* AT RECOVERY ENTRY , $ PRETCP EQU /0001 TC POWER UP , D ( PRESECP EQU /0002 SECONDARY POWER UP , h PRELINE EQU /0004 LINK ERROR , P* , P* , P* MISCELLANEOUS , P* , * PPLCERR EQU /F1 SOP ERROR
0x2283ec…228580 Dummy {f00=0x00a4, f01=0x0190, f02=»QU /80 FLAG CHANGED BLOCKING =16 , P* - ( P EJECT - 2 P* - @ P************** - J P* DATA AREAS * - ` P************** - v P* - P* CWT ADDRESS TABLE - P* - PCWTPLC EQU * - PTABCWT EQU * - P IFF PLCNRL=0 - " P DATA PL0CWT
0x228580…228714 (1, 382) Dummy {f00=0x00a5, f01=0x0190, f02=»3 - t P IFF PLCNRL=3 . " P DATA PL3CWT CWT FOR PLC NR 4 . P XIF . F P* . R P IFF PLCNRL=4 . " P DATA 0 PLC NR 4 NOT CONNECTED . r P IFF PLCNRL=3 . " P DATA 0 PLC NR 3 NOT CONNECTED . P IFF PLCNRL=2 . " P DATA 0 PLC NR 2 NOT CONNECTED
0x228714…2288a8 Dummy {f00=0x00a5, f01=0x0190, f02=» FOR PLC NR. 5, REM. . P IFF PLCNRR=1 / ( P DATA PR2CWT CWT FOR PLC NR. 6, REM. / 2 P IFF PLCNRR=2 / ^ ( P DATA PR3CWT CWT FOR PLC NR. 7, REM. / t P IFF PLCNRR=3 / ( P DATA PR4CWT CWT FOR PLC NR. 8, REM. / P XIF / P* / P IFF PLCNRR=4 /
0x2288a8…228a3c Dummy {f00=0x00a5, f01=0x0190, f02=»C NR 6 NOT CONNECTED / P IFF PLCNRR=1 0 " P DATA 0 PLC NR 5 NOT CONNECTED 0 2 P XIF 0 X P* 0 d P EJECT 0 n P* 0 | P* 0 POPARR1 EQU * 0 P IFF PLCNRR=0 U =5 0 P DATA OPNR10 LINE 0 0 P DATA OPNR11 LINE 1 0 P DATA OPNR12 LINE
0x228a3c…228bd0 Dummy {f00=0x00a5, f01=0x0190, f02=»INE 0 0 P DATA OPNR21 LINE 1 1 P DATA OPNR22 LINE 2 1 * P DATA OPNR23 LINE 3 1 F P XIF 1 b POPARR3 EQU * 1 n P IFF PLCNRR=0 U =5 1 P IFF PLCNRR=1 U =5 1 P IFF PLCNRR=2 U =5 1 P DATA OPNR30 LINE 0 1 P DATA OPNR31 LINE 1 1 P
0x228bd0…228d64 Dummy {f00=0x00a5, f01=0x018e, f02=» P IFF PLCNRR=2 U =5 2 P IFF PLCNRR=3 U =5 2 P DATA OPNR40 LINE 0 2 8 P DATA OPNR41 LINE 1 2 T P DATA OPNR42 LINE 2 2 p P DATA OPNR43 LINE 3 2 P XIF 2 P* 2 POPARL1 EQU * U =5 2 P DATA OPNL10 LOCAL PLC 1 =5 2 POPARL2 EQU *
0x228d64…228ef8 Dummy {f00=0x00a5, f01=0x018e, f02=» P DATA OPNL40 LOCAL PLC 4 =5 3 P EJECT 3 ( P* 3 6 & P* OPEN LINE PARAMETER AREAS, LOCAL 3 @ P* 3 j P* STANDARD AREAS : 3 t P* PRIMARY STATION 3 P* FULL DUPLEX 3 P* 96000 BITS/SEC 3 P* NO NRZI ENCODING 3 P* POLLING 24HZ U =8 3
0x228ef8…22908c Dummy {f00=0x00a5, f01=0x0190, f02=» 3 P IFF PLCNRL=1 4 P IFF PLCNRL=2 4 P IFF PLCNRL=3 4 4 2 P DATA /0101,/A000,POLRTL,TIMACT,/0120,0 =8,=11 4 J P XIF 4 $ POPNL30 EQU * LOCAL PLC 3, LINE 0 4 P IFF PLCNRL=0 4 P IFF PLCNRL=1 4 P IFF PLCNRL=2 4 2 P DATA /0101,/A000,
0x22908c…229220 Dummy {f00=0x00a5, f01=0x0190, f02=»A /0101,/A000,POLRTL,TIMACT,/0120,0 =8,=11 4 P XIF 5 2 $ POPNL10 EQU * LOCAL PLC 1, LINE 0 5 > P IFF PLCNRL=0 5 f 2 P DATA /0101,/A000,POLRTL,TIMACT,/0120,0 =8,=11 5 | P XIF 5 P* 5 ( P* END OF LOCAL LINE PARAMETER AREAS 5 P* 5 P EJECT 5
0x229220…2293b4 (1, 383) Dummy {f00=0x00a5, f01=0x018e, f02=» 5 P* 2400 BITS/SEC 6 P* NO NRZI ENCODING 6 P* POLLING 13HZ 6 : P* 5 RETRANSMISSIONS 6 P P* 5 MIN. TIME OUT 6 l P* 6 P* 6 P* REMOTE PLC 4 6 POPNR40 EQU * LINE 0 6 P IFF PLCNRR=0 6 P IFF PLCNRR=1 6 P IFF PLCNRR=2 6
0x2293b4…229548 Dummy {f00=0x00a5, f01=0x0190, f02=» 6 P IFF PLCNRR=1 7 P IFF PLCNRR=2 7 P IFF PLCNRR=3 7 4 0 P DATA /0103,/0400,POLRTR,TIMACT,/0908,0 =11 7 J P XIF 7 ~ POPNR42 EQU * LINE 2 7 P IFF PLCNRR=0 7 P IFF PLCNRR=1 7 P IFF PLCNRR=2 7 P IFF PLCNRR=3 7 4 P DATA /010
0x229548…2296dc Dummy {f00=0x00a5, f01=0x0190, f02=»LCNRR=2 7 P IFF PLCNRR=3 8 4 P DATA /0103,/0400,POLRTR,TIMACT,/1908,0 =10,=11 8 & P XIF 8 ^ P* REMOTE PLC 3 8 j POPNR30 EQU * LINE 0 8 P IFF PLCNRR=0 8 P IFF PLCNRR=1 8 P IFF PLCNRR=2 8 0 P DATA /0103,/0400,POLRTR,TIMACT,/0108,0 =1
0x2296dc…229870 Dummy {f00=0x00a5, f01=0x0190, f02=»LRTR,TIMACT,/0908,0 =11 8 | P XIF 9 POPNR32 EQU * LINE 2 9 , P IFF PLCNRR=0 9 H P IFF PLCNRR=1 9 ^ P IFF PLCNRR=2 9 t 4 P DATA /0103,/0400,POLRTR,TIMACT,/1108,0 =10,=11 9 P XIF 9 POPNR33 EQU * LINE 3 9 P IFF PLCNRR=0 9 P IFF PLC
0x229870…229a04 Dummy {f00=0x00a5, f01=0x0190, f02=»OPNR20 EQU * LINE 0 9 P IFF PLCNRR=0 : P IFF PLCNRR=1 : 2 0 P DATA /0103,/0400,POLRTR,TIMACT,/0108,0 =11 : H P XIF : | POPNR21 EQU * LINE 1 : P IFF PLCNRR=0 : P IFF PLCNRR=1 : 0 P DATA /0103,/0400,POLRTR,TIMACT,/0908,0 =11 : P XIF
0x229a04…229b98 Dummy {f00=0x00a5, f01=0x0190, f02=» XIF : POPNR23 EQU * LINE 3 ; P IFF PLCNRR=0 ; ( P IFF PLCNRR=1 ; > 4 P DATA /0103,/0400,POLRTR,TIMACT,/1908,0 =10,=11 ; T P XIF ; P* ; P* REMOTE PLC 1 ; POPNR10 EQU * LINE 0 ; P IFF PLCNRR=0 ; 0 P DATA /0103,/0400,POLRTR,TIMAC
0x229b98…229d2c Dummy {f00=0x00a5, f01=0x0190, f02=» XIF ; POPNR12 EQU * LINE 2 < P IFF PLCNRR=0 < ( 4 P DATA /0103,/0400,POLRTR,TIMACT,/1108,0 =10,=11 < > P XIF < v POPNR13 EQU * LINE 3 < P IFF PLCNRR=0 < 4 P DATA /0103,/0400,POLRTR,TIMACT,/1908,0 =10,=11 < P XIF < ( P* END OF REMOTE
0x229d2c…229ec0 Dummy {f00=0x00a5, f01=0x018e, f02=»DRIVER < r P* = P EJECT = P* = & ( PUTTST DATA UTTEST 1 = TRAP NOT USED = 0 P* = P* = f " P* QUEUE STATISTICS COUNTERS = p & P* EACH COUNTER HAS ONE WORD / PLC = P* = PSTATAR EQU * = PWIQSTA RES 8 WINDOW QUEUE = $ PSBQSTA R
0x229ec0…22a054 (1, 384) Dummy {f00=0x00a5, f01=0x0190, f02=» = n P* > P XIF > P EJECT > P* > , P* > 6 P* CWT DISPLACEMENTS > @ P* > ^ PCWTOPR EQU /00 CU OPERABLE > h PCWTCCB EQU /02 CCA BUSY > ( PCWTGR EQU /04 GENERAL READ ALLOWED > " PCWTPNR EQU /06 CU NUMBER (0-7) > PCWTABW EQU /
0x22a054…22a1e8 Dummy {f00=0x00a5, f01=0x0190, f02=»TER AREA > r 6 PCWTOPP EQU /10 OPEN LINE PARAMETER AREA ADDRESS =2 ? $ PCWTINT EQU /12 WS TABLE ADDRESS ? L ( PCWTBUF EQU /14 INP. BUFFER ADDRESS ? t 2 PCWTSBQ EQU /16 QUEUE FOR SHORT OUTP. BUFFERS ? 0 PCWTLBQ EQU /18 QUEUE FOR LONG OUTP. BUFFERS ? &
0x22a1e8…22a37c Dummy {f00=0x00a5, f01=0x0190, f02=»CWTCIO EQU /20 CIO START INSTR. ? PCWTST3 EQU /22 SST INSTR. @ ( . PCWTCSD EQU /24 CTRL UNIT START DESCRIPTOR @ J , PCWTCID EQU /2A CTRL UNIT INTERF. DESCR. @ | & PCWTCCA EQU /34 COMMAND CTRL AREA @ & PCWTRCA EQU /44 RESPONSE CTRL AREA @ 0 PCWTPBS E
0x22a37c…22a510 Dummy {f00=0x00a5, f01=0x0190, f02=»ERS @ h PCWTWSS EQU /72 WS STATUS A 4 PCWTSOB EQU MAXWS+MAXWS+/74 SH. OUTP. BUFFERS =4 A . " PCWTLB1 EQU CWTSOB+SOBUFS U =7 A f 2 PCWTLOB EQU CWTLB1+SOBUFS LONG OUTP. BUFFERS =7 A " PCWTGR1 EQU CWTLOB+LOBUFS U =7 A 2 PCWTGRB EQU CWTGR1+LOBUFS GEN. RE
0x22a510…22a6a4 Dummy {f00=0x00a5, f01=0x0190, f02=» A P* FLAGS B P RES 1 PLC OPERABLE FLAG B " P DATA 0 CCA BUSY FLAG (0=FREE) B < , P DATA 1 GENERAL READ ALLOWED (0=ALLOWED) B b P* B P* DATA WORDS B P DATA 0 PLC NUMBER (0-3) B . P DATA 0 WORK STATION TO ABORT (0=NO ABORT) B " P
0x22a6a4…22a838 Dummy {f00=0x00a5, f01=0x0190, f02=»D QUEUE HEADS B ~ . P DATA OPARL1 OPEN LINE PARAMETER AREA ADDR C , P DATA INTPL1 WORK STATION TABLE ADDRESS C H P DATA 0 INPUT BUFFER ADDRESS C x * P DATA 0 QUEUE FOR SHORT OUTPUT BUFFER C ( P DATA 0 QUEUE FOR LONG OUTPUT BUFFER C P DATA 0 QUEUE FOR
0x22a838…22a9cc Dummy {f00=0x00a5, f01=0x0190, f02=»UCTIONS C ( P CIO A3,1,PLCDA0 START I/O OPERATION D 2 P SST A3,PLCDA0 RELEASE RCA AND RESET INTERRUPT D < P* D r P* PLC CONTROL AREAS D | . P* CONTROL UNIT START DESCRIPTOR (3 WORDS) D P DATA 0 DUMMY & MSB ADDRESS D $ P DATA PL0CWT+CWTCID CI
0x22a9cc…22ab60 Dummy {f00=0x00a5, f01=0x0190, f02=» D t $ P DATA PL0CWT+CWTCCA CCA ADDRESS E P DATA 0 DUMMY & MSB ADDRESS E 0 $ P DATA PL0CWT+CWTRCA RCA ADDRESS E T $ P DATA 0 INTERRUPT SPECIFICATION E | P RES 8 COMMAND CONTROL AREA E P RES 8 RESPONSE CONTROL AREA E P* E P* POOLBLOCKS
0x22ab60…22acf4 (1, 385) Dummy {f00=0x00a5, f01=0x0190, f02=» DATA 'LO',0 E P DATA 0,LOBUF1+LOBUF1 F P DATA LOBUFS+LOBUFS F 2 P DATA 'GR',0 F N P DATA 0,GRBUF1+GRBUF1 F b P DATA GRBUFS+GRBUFS F P* F 2 P* WORK STATION STATUS WORDS. 1 WORD / WS F 2 P RES MAXWS+1 L BYTE = STATUS. R BYTE = FLAGS
0x22acf4…22ae88 Dummy {f00=0x00a5, f01=0x0190, f02=»UFS GENERAL READ BUFFERS F P* G P* G * P XIF G 4 P IFF PLCNRL=1 G @ P* G V P EJECT G ` P* G n P* CWT FOR PLC NUMBER 2 G x P* G PPL1CWT EQU * G P* G P* FLAGS G P RES 1 PLC OPERABLE FLAG G " P DATA 0 CCA BUSY F
0x22ae88…22b01c Dummy {f00=0x00a5, f01=0x0190, f02=» DATA 0 WORK STATION TO ABORT (0=NO ABORT) G " P DATA 0 LATEST PLC RCA STATUS H 2 P DATA 0 LINE NO INDICATOR H X $ P DATA 0 INDEX TO PARAMETER AREA H z P* H $ P* POINTERS AND QUEUE HEADS H . P DATA OPARL2 OPEN LINE PARAMETER AREA ADDR H , P D
0x22b01c…22b1b0 Dummy {f00=0x00a5, f01=0x0190, f02=»QUEUE FOR LONG OUTPUT BUFFER H P DATA 0 QUEUE FOR CCA FREE I $ . P DATA 0 QUEUE OF ALLOCATED MONITOR BLOCKS I F , P DATA 0 TIMER POINTER FOR RESTART DELAY I x P* I P* INSTRUCTIONS I ( P CIO A3,1,PLCDA1 START I/O OPERATION I 2 P SST A3,PLCDA1
0x22b1b0…22b344 Dummy {f00=0x00a5, f01=0x0190, f02=»A 0 DUMMY & MSB ADDRESS I $ P DATA PL1CWT+CWTCID CID ADDRESS J P DATA INTLV1 INTERRUPT LEVEL J H 2 P* CONTROL UNIT INTERFACE DESCRIPTOR (5 WORDS) J l P DATA 0 DUMMY & MSB ADDRESS J $ P DATA PL1CWT+CWTCCA CCA ADDRESS J P DATA 0 DUMMY & MSB ADDRES
0x22b344…22b4d8 Dummy {f00=0x00a5, f01=0x0190, f02=»PONSE CONTROL AREA J P* K ( P* POOLBLOCKS (5 WORDS / BLOCK) K $ , P DATA 'SO',0 ID = "SHORT OUTPUT" & FLAGS K P 4 P DATA 0,SOBUF1+SOBUF1 QUEUE HEAD & BUFFER LENGTH K $ P DATA SOBUFS+SOBUFS AREA LENGTH K $ P DATA 'LO',0 ID = "LONG OUTPUT" K P
0x22b4d8…22b66c Dummy {f00=0x00a5, f01=0x018e, f02=»BUFS+GRBUFS K P* L 2 P* WORK STATION STATUS WORDS. 1 WORD / WS L 2 P RES MAXWS+1 L BYTE = STATUS. R BYTE = FLAGS. L T P* L P* BUFFER AREAS L $ P RES SOBUFS SHORT OUTPUT BUFFERS L $ P RES LOBUFS LONG OUTPUT BUFFERS L $ P RES GRB
0x22b66c…22b800 Dummy {f00=0x00a5, f01=0x0190, f02=» L t P* M PPL2CWT EQU * M P* M & P* FLAGS M 0 P RES 1 PLC OPERABLE FLAG M D " P DATA 0 CCA BUSY FLAG (0=FREE) M d , P DATA 1 GENERAL READ ALLOWED (0=ALLOWED) M P* M P* DATA WORDS M P DATA 2 PLC NUMBER (0-3) M . P DATA 0 WO
0x22b800…22b994 (1, 386) Dummy {f00=0x00a6, f01=0x0190, f02=»ER AREA M x P* N $ P* POINTERS AND QUEUE HEADS N . P DATA OPARL3 OPEN LINE PARAMETER AREA ADDR N B , P DATA INTPL3 WORK STATION TABLE ADDRESS N t P DATA 0 INPUT BUFFER ADDRESS N * P DATA 0 QUEUE FOR SHORT OUTPUT BUFFER N ( P DATA 0 QUEUE FOR
0x22b994…22bb28 Dummy {f00=0x00a6, f01=0x0190, f02=»RESTART DELAY N v P* O P* INSTRUCTIONS O ( P CIO A3,1,PLCDA2 START I/O OPERATION O < 2 P SST A3,PLCDA2 RELEASE RCA AND RESET INTERRUPT O h P* O P* PLC CONTROL AREAS O . P* CONTROL UNIT START DESCRIPTOR (3 WORDS) O P DATA 0 DUMMY
0x22bb28…22bcbc Dummy {f00=0x00a6, f01=0x0190, f02=» WORDS) O j P DATA 0 DUMMY & MSB ADDRESS P $ P DATA PL2CWT+CWTCCA CCA ADDRESS P 4 P DATA 0 DUMMY & MSB ADDRESS P $ P DATA PL2CWT+CWTRCA RCA ADDRESS P $ P DATA 0 INTERRUPT SPECIFICATION P P RES 8 COMMAND CONTROL AREA P P RES 8 RESPONSE CONT
0x22bcbc…22be50 Dummy {f00=0x00a6, f01=0x018e, f02=»UF1 QUEUE HEAD & BUFFER LENGTH P ~ $ P DATA SOBUFS+SOBUFS AREA LENGTH Q & $ P DATA 'LO',0 ID = "LONG OUTPUT" Q N P DATA 0,LOBUF1+LOBUF1 Q v P DATA LOBUFS+LOBUFS Q $ P DATA 'GR',0 ID = "GENERAL READ" Q P DATA 0,GRBUF1+GRBUF1 Q P DATA GRBUFS+GRBUF
0x22be50…22bfe4 Dummy {f00=0x00a6, f01=0x0190, f02=» P* BUFFER AREAS R $ P RES SOBUFS SHORT OUTPUT BUFFERS R $ P RES LOBUFS LONG OUTPUT BUFFERS R H $ P RES GRBUFS GENERAL READ BUFFERS R p P* R P* R P IFF PLCNRL=3 R P* R P EJECT R P* R P* CWT FOR PLC NUMBER 4 R P*
0x22bfe4…22c178 Dummy {f00=0x00a6, f01=0x0190, f02=»GENERAL READ ALLOWED (0=ALLOWED) R P* S ( P* DATA WORDS S 2 P DATA 3 PLC NUMBER (0-3) S L . P DATA 0 WORK STATION TO ABORT (0=NO ABORT) S l " P DATA 0 LATEST PLC RCA STATUS S P DATA 0 LINE NO INDICATOR S $ P DATA 0 INDEX TO PARAMETER AREA S
0x22c178…22c30c Dummy {f00=0x00a6, f01=0x0190, f02=»E ADDRESS S r P DATA 0 INPUT BUFFER ADDRESS T * P DATA 0 QUEUE FOR SHORT OUTPUT BUFFER T 6 ( P DATA 0 QUEUE FOR LONG OUTPUT BUFFER T d P DATA 0 QUEUE FOR CCA FREE T . P DATA 0 QUEUE OF ALLOCATED MONITOR BLOCKS T , P DATA 0 TIMER POINTER FOR RESTART DE
0x22c30c…22c4a0 Dummy {f00=0x00a6, f01=0x0190, f02=»RUPT T f P* U P* PLC CONTROL AREAS U . P* CONTROL UNIT START DESCRIPTOR (3 WORDS) U 6 P DATA 0 DUMMY & MSB ADDRESS U h $ P DATA PL3CWT+CWTCID CID ADDRESS U P DATA INTLV3 INTERRUPT LEVEL U 2 P* CONTROL UNIT INTERFACE DESCRIPTOR (5 WORDS) U
0x22c4a0…22c634 (1, 387) Dummy {f00=0x00a6, f01=0x018e, f02=»A RCA ADDRESS U ~ $ P DATA 0 INTERRUPT SPECIFICATION V P RES 8 COMMAND CONTROL AREA V > P RES 8 RESPONSE CONTROL AREA V b P* V ( P* POOLBLOCKS (5 WORDS / BLOCK) V , P DATA 'SO',0 ID = "SHORT OUTPUT" & FLAGS V 4 P DATA 0,SOBUF1+SOBUF1 QUEUE
0x22c634…22c7c8 Dummy {f00=0x00a6, f01=0x018e, f02=» P DATA LOBUFS+LOBUFS W $ P DATA 'GR',0 ID = "GENERAL READ" W P DATA 0,GRBUF1+GRBUF1 W H P DATA GRBUFS+GRBUFS W f P* W 2 P* WORK STATION STATUS WORDS. 1 WORD / WS W 2 P RES MAXWS+1 L BYTE = STATUS. R BYTE = FLAGS. W P* W P*
0x22c7c8…22c95c Dummy {f00=0x00a6, f01=0x0190, f02=» W n P XIF X P* X P EJECT X P IFF PLCNRR=0 X , P* X B $ P* CWT FOR PLC NUMBER 5 REMOTE X L P* X t PPR1CWT EQU * X ~ P* X P* FLAGS X P RES 1 PLC OPERABLE FLAG X " P DATA 0 CCA BUSY FLAG (0=FREE) X , P DATA 1 GENERAL RE
0x22c95c…22caf0 Dummy {f00=0x00a6, f01=0x0190, f02=»O ABORT) X n " P DATA 0 LATEST PLC RCA STATUS Y P DATA 0 LINE NO INDICATOR Y 6 $ P DATA 0 INDEX TO PARAMETER AREAS Y X P* Y $ P* POINTERS AND QUEUE HEADS Y 4 P DATA OPARR1 OPEN LINE PARAMETER AREA ADDRESSES Y , P DATA INTPR1 WORK STATION TABL
0x22caf0…22cc84 Dummy {f00=0x00a6, f01=0x0190, f02=» Y l P DATA 0 QUEUE FOR CCA FREE Z . P DATA 0 QUEUE OF ALLOCATED MONITOR BLOCKS Z * , P DATA 0 TIMER POINTER FOR RESTART DELAY Z P* Z P* INSTRUCTIONS Z ( P CIO A3,1,PLCDA4 START I/O OPERATION Z 2 P SST A3,PLCDA4 RELEASE RCA AND RESET INTER
0x22cc84…22ce18 Dummy {f00=0x00a6, f01=0x0190, f02=» $ P DATA PR1CWT+CWTCID CID ADDRESS [ P DATA INTRV0 INTERRUPT LEVEL [ , 2 P* CONTROL UNIT INTERFACE DESCRIPTOR (5 WORDS) [ P P DATA 0 DUMMY & MSB ADDRESS [ $ P DATA PR1CWT+CWTCCA CCA ADDRESS [ P DATA 0 DUMMY & MSB ADDRESS [ $ P DATA PR1CWT+CWTRC
0x22ce18…22cfac Dummy {f00=0x00a6, f01=0x018e, f02=» [ ( P* POOLBLOCKS (5 WORDS / BLOCK) , P DATA 'SO',0 ID = "SHORT OUTPUT" & FLAGS 4 4 P DATA 0,SOBUF1+SOBUF1 QUEUE HEAD & BUFFER LENGTH d $ P DATA SOBUFS+SOBUFS AREA LENGTH $ P DATA 'LO',0 ID = "LONG OUTPUT" P DATA 0,LOBUF1+LOBUF1
0x22cfac…22d140 Dummy {f00=0x00a6, f01=0x018e, f02=» 2 P* WORK STATION STATUS WORDS. 1 WORD / WS ] 2 P RES MAXWS+1 L BYTE = STATUS. R BYTE = FLAGS. ] : P* ] p P* BUFFER AREAS ] z $ P RES SOBUFS SHORT OUTPUT BUFFERS ] $ P RES LOBUFS LONG OUTPUT BUFFERS ] $ P RES GRBUFS GENERAL READ BUFFERS ]
0x22d140…22d2d4 (1, 388) Dummy {f00=0x00a9, f01=0x018e, f02=» ] P* ^ P* FLAGS ^ P RES 1 PLC OPERABLE FLAG ^ & " P DATA 0 CCA BUSY FLAG (0=FREE) ^ F , P DATA 1 GENERAL READ ALLOWED (0=ALLOWED) ^ l P* ^ P* DATA WORDS ^ P DATA 5 PLC NUMBER (4-7) =5 ^ . P DATA 0 WORK STATION TO ABORT (0=NO
0x22d2d4…22d468 Dummy {f00=0x00a9, f01=0x0190, f02=» ^ $ P* POINTERS AND QUEUE HEADS _ 4 P DATA OPARR2 OPEN LINE PARAMETER AREA ADDRESSES _ 0 , P DATA INTPR2 WORK STATION TABLE ADDRESS _ h P DATA 0 INPUT BUFFER ADDRESS _ * P DATA 0 QUEUE FOR SHORT OUTPUT BUFFER _ ( P DATA 0 QUEUE FOR LONG OUTPUT
0x22d468…22d5fc Dummy {f00=0x00a9, f01=0x0190, f02=»Y _ j P* ` P* INSTRUCTIONS ` ( P CIO A3,1,PLCDA5 START I/O OPERATION ` 0 2 P SST A3,PLCDA5 RELEASE RCA AND RESET INTERRUPT ` P* ` P* PLC CONTROL AREAS ` . P* CONTROL UNIT START DESCRIPTOR (3 WORDS) ` P DATA 0 DUMMY & MSB ADDRES
0x22d5fc…22d790 Dummy {f00=0x00a9, f01=0x0190, f02=» P DATA 0 DUMMY & MSB ADDRESS a $ P DATA PR2CWT+CWTCCA CCA ADDRESS a ( P DATA 0 DUMMY & MSB ADDRESS a P $ P DATA PR2CWT+CWTRCA RCA ADDRESS a t $ P DATA 0 INTERRUPT SPECIFICATION a P RES 8 COMMAND CONTROL AREA a P RES 8 RESPONSE CONTROL AREA a
0x22d790…22d924 Dummy {f00=0x00a9, f01=0x0190, f02=»AD & BUFFER LENGTH a r $ P DATA SOBUFS+SOBUFS AREA LENGTH b $ P DATA 'LO',0 ID = "LONG OUTPUT" b B P DATA 0,LOBUF1+LOBUF1 b j P DATA LOBUFS+LOBUFS b $ P DATA 'GR',0 ID = "GENERAL READ" b P DATA 0,GRBUF1+GRBUF1 b P DATA GRBUFS+GRBUFS b P*
0x22d924…22dab8 Dummy {f00=0x00a9, f01=0x0190, f02=»FER AREAS b $ P RES SOBUFS SHORT OUTPUT BUFFERS c $ P RES LOBUFS LONG OUTPUT BUFFERS c : $ P RES GRBUFS GENERAL READ BUFFERS c b P* c P* c P EJECT c P IFF PLCNRR=2 c P* c $ P* CWT FOR PLC NUMBER 7 REMOTE c P* c PPR3CWT EQU
0x22dab8…22dc4c Dummy {f00=0x00a9, f01=0x0190, f02=»ED (0=ALLOWED) c v P* d P* DATA WORDS d P DATA 6 PLC NUMBER (4-7) =5 d : . P DATA 0 WORK STATION TO ABORT (0=NO ABORT) d ^ " P DATA 0 LATEST PLC RCA STATUS d P DATA 0 LINE NO INDICATOR d $ P DATA 0 INDEX TO PARAMETER AREAS d P* d $
0x22dc4c…22dde0 Dummy {f00=0x00a9, f01=0x0190, f02=»S d j P DATA 0 INPUT BUFFER ADDRESS e * P DATA 0 QUEUE FOR SHORT OUTPUT BUFFER e . ( P DATA 0 QUEUE FOR LONG OUTPUT BUFFER e P DATA 0 QUEUE FOR CCA FREE e . P DATA 0 QUEUE OF ALLOCATED MONITOR BLOCKS e , P DATA 0 TIMER POINTER FOR RESTART DELAY e
0x22dde0…22df74 (1, 389) Dummy {f00=0x00b2, f01=0x0190, f02=» P* f P* PLC CONTROL AREAS f . P* CONTROL UNIT START DESCRIPTOR (3 WORDS) f . P DATA 0 DUMMY & MSB ADDRESS f ` $ P DATA PR3CWT+CWTCID CID ADDRESS f P DATA INTRV2 INTERRUPT LEVEL f 2 P* CONTROL UNIT INTERFACE DESCRIPTOR (5 WORDS) f P D
0x22df74…22e108 Dummy {f00=0x00b2, f01=0x0190, f02=»DRESS f v $ P DATA 0 INTERRUPT SPECIFICATION g P RES 8 COMMAND CONTROL AREA g 6 P RES 8 RESPONSE CONTROL AREA g Z P* g ~ ( P* POOLBLOCKS (5 WORDS / BLOCK) g , P DATA 'SO',0 ID = "SHORT OUTPUT" & FLAGS g 4 P DATA 0,SOBUF1+SOBUF1 QUEUE HEAD & B
0x22e108…22e29c Dummy {f00=0x00b2, f01=0x018e, f02=»LOBUFS+LOBUFS g $ P DATA 'GR',0 ID = "GENERAL READ" h P DATA 0,GRBUF1+GRBUF1 h > P DATA GRBUFS+GRBUFS h P* h x 2 P* WORK STATION STATUS WORDS. 1 WORD / WS h 2 P RES MAXWS+1 L BYTE = STATUS. R BYTE = FLAGS. h P* h P* BUFFER AR
0x22e29c…22e430 Dummy {f00=0x00b2, f01=0x0190, f02=» h P* i P EJECT i P IFF PLCNRR=3 i P* i 6 $ P* CWT FOR PLC NUMBER 8 REMOTE i @ P* i h PPR4CWT EQU * i r P* i P* FLAGS i P RES 1 PLC OPERABLE FLAG i " P DATA 0 CCA BUSY FLAG (0=FREE) i , P DATA 1 GENERAL READ ALLOWED (
0x22e430…22e5c4 Dummy {f00=0x00b2, f01=0x0190, f02=» " P DATA 0 LATEST PLC RCA STATUS j P DATA 0 LINE NO INDICATOR j * $ P DATA 0 INDEX TO PARAMETER AREAS j L P* j t $ P* POINTERS AND QUEUE HEADS j ~ 4 P DATA OPARR4 OPEN LINE PARAMETER AREA ADDRESSES j , P DATA INTPR4 WORK STATION TABLE ADDRESS j
0x22e5c4…22e758 Dummy {f00=0x00b2, f01=0x0190, f02=»A 0 QUEUE FOR CCA FREE j . P DATA 0 QUEUE OF ALLOCATED MONITOR BLOCKS k , P DATA 0 TIMER POINTER FOR RESTART DELAY k P P* k P* INSTRUCTIONS k ( P CIO A3,1,PLCDA7 START I/O OPERATION k 2 P SST A3,PLCDA7 RELEASE RCA AND RESET INTERRUPT k P
0x22e758…22e8ec Dummy {f00=0x00b2, f01=0x0190, f02=»4CWT+CWTCID CID ADDRESS k P DATA INTRV3 INTERRUPT LEVEL l 2 P* CONTROL UNIT INTERFACE DESCRIPTOR (5 WORDS) l D P DATA 0 DUMMY & MSB ADDRESS l z $ P DATA PR4CWT+CWTCCA CCA ADDRESS l P DATA 0 DUMMY & MSB ADDRESS l $ P DATA PR4CWT+CWTRCA RCA ADDRES
0x22e8ec…22ea80 Dummy {f00=0x00b2, f01=0x0190, f02=» POOLBLOCKS (5 WORDS / BLOCK) l , P DATA 'SO',0 ID = "SHORT OUTPUT" & FLAGS m ( 4 P DATA 0,SOBUF1+SOBUF1 QUEUE HEAD & BUFFER LENGTH m X $ P DATA SOBUFS+SOBUFS AREA LENGTH m $ P DATA 'LO',0 ID = "LONG OUTPUT" m P DATA 0,LOBUF1+LOBUF1 m P DATA LOBU
0x22ea80…22ec14 (1, 390) Dummy {f00=0x00b2, f01=0x0190, f02=»K STATION STATUS WORDS. 1 WORD / WS m 2 P RES MAXWS+1 L BYTE = STATUS. R BYTE = FLAGS. n , P* n b P* BUFFER AREAS n l $ P RES SOBUFS SHORT OUTPUT BUFFERS n $ P RES LOBUFS LONG OUTPUT BUFFERS n $ P RES GRBUFS GENERAL READ BUFFERS n P* n
0x22ec14…22eda8 Dummy {f00=0x00b2, f01=0x0190, f02=»ARE PLACED n l 0 P* AT THE END OF THE TABLE, AS IT IS SCANNED o P* FROM THE END. o F P* o ^ PCMDTAB EQU * o h 0 P DATA CMDTC COMMAND CODE "TEST CHANNEL UNIT" o | 6 P DATA COMPTC START OF "TEST CU" COMPLETION ROUTINE o 0 P DATA 0 ALLOWED STATUS FOR "TE
0x22eda8…22ef3c Dummy {f00=0x00b2, f01=0x018e, f02=» DATA CMDOD OPEN DLS o P DATA COMPOD p P DATA STADNO+STANOC p 0 P IFT PLCTST=1 p L $ P DATA CMDPS GET LINE STATISTICS p b P DATA COMPPS p " PSTAE2 EQU STAREQ+STAILL DUMMY p " PSTAE3 EQU STASEQ+STANOB DUMMY p P DATA STAE2+STAE3 p " P DAT
0x22ef3c…22f0d0 Dummy {f00=0x00b2, f01=0x0190, f02=» P DATA STAE2 q P* q P EJECT q " P* q 0 P XIF q : P DATA CMDSW STANDARD WRITE q F P DATA COMPSW q h P DATA STAERR q | P DATA CMDFW FAST WRITE q P DATA COMPFW q P DATA STAERR q P DATA CMDGR GENERAL READ q P DATA COMPGR q
0x22f0d0…22f264 Dummy {f00=0x00b2, f01=0x0190, f02=»* q 2 P* THIS TABLE IS INDEXED BY THE "MESSAGE TYPE" r P* CONSTANTS DEFINED ABOVE. r @ PREAROU EQU * r b P DATA GRERR1 ERROR ROUTINE r v 6 P DATA GRERR1 DATA PACKET NO FLOW C. (NOT IMPLEM.) r * P DATA GRSTAT DEVICE STATUS DATA PACKET r $ P DATA GR
0x22f264…22f3f8 Dummy {f00=0x00b2, f01=0x0190, f02=»ET (NOT IMPLEM.) r p P* s P* s " ( P* WRITE COMPLETION DISPATCH TABLE s , P* s X 2 P* THIS TABLE IS INDEXED BY THE "MESSAGE TYPE" s b P* CONSTANTS DEFINED ABOVE. s PWRIROU EQU * s P DATA WRERR ERROR ROUTINE s 2 P DATA WRNFLO DATA PACKET
0x22f3f8…22f58c Dummy {f00=0x00b2, f01=0x0190, f02=»ECIEVE READY PACKET s . P DATA WRERR RESET PACKET (NOT IMPLEMENTED) t * P DATA WRRESC RESET CONFIRMATION PACKET t N P* t | P EJECT t P* t P******************** t P* REQUEST ROUTINES * t P******************** t P* t 8 P* THIS SEC
0x22f58c…22f720 Dummy {f00=0x00b2, f01=0x0190, f02=»RMALLY DONE THROUGH t r : P* THE TERMINAL NETWORK DISTRIBUTOR DRIVER (DRND01). u 2 P* THE DISTRIBUTOR DRIVER WILL SWITCH CALL TO u Z 6 P* CONNECTED LINE DRIVER. RETURN IS MADE DIRECTLY u 4 P* FROM THIS DRIVER TO TERMINAL DEVICE DRIVER. u 6 P* A
0x22f720…22f8b4 (1, 391) Dummy {f00=0x00ce, f01=0x0190, f02=»ICE DRIVER MAY NOT HAVE ANY u x P* DATA ON THE A15 STACK. v $ P* v F 0 P* ROUTINES IN ORDER OF APPEARANCE IN CODE: v P P* v P* NAME FUNCTION v P* v $ P* PLCHRI INPUT OF ONE CHARACTER v * P* PLSTBL DEFINE START OF OUTPUT BLOCK v $ P*
0x22f8b4…22fa48 Dummy {f00=0x00ce, f01=0x0190, f02=»JECT v P* w @ P************************************************************ w P* w Z P* ROUTINE NAME: w d P* PLCHRI w | P* w P* FUNCTION: w 2 P* THIS ROUTINE FETCHES ONE CHARACTER FROM THE w 4 P* INPUT BUFFER. IF NO BUFFER HAS ARRIVED
0x22fa48…22fbdc Dummy {f00=0x00ce, f01=0x0190, f02=»LL: w P* ABI INPTAB,A1 x P* CF A5,PLCHRI x $ P* x : P* INPUT: x D P* A6 = DWT ADDRESS x T P* x p P* OUTPUT: x z P* AT RETURN TO DEVICE DRIVER x P* A1 = BITS 0-14 CHANGED x ( P* BIT 15 1 IF MORE CHAR IN BUFFER x P* A2 = BI
0x22fbdc…22fd70 Dummy {f00=0x00ce, f01=0x0190, f02=»************ x ` P* y PPLCHRI EQU * y PPRCHRI EQU * y 2 P STR A4,A15 PUSH A4 y F ( P LD A4,DWTLD1,A6 INPUT TEXT WAITING? y b " P RF(Z) CI100 NO, WAIT FOR TEXT y P* y P EJECT y P* y , P CF A15,PLGECH GET CHARACTER FROM BUFFER y " P L
0x22fd70…22ff04 Dummy {f00=0x00ce, f01=0x0190, f02=»CE DRIVER y x P* z P* z PCI100 EQU * z & P LDR* A4,A15 POP A4 z : * P LDK A2,DWFINP FLAG "INPUT REQUESTED" z V 0 P ORS A2,DWTST,A6 SET INPUT REQUESTED IN DWT z , P CF A15,NDSAV8 SAVE A3-A5, A7-A8 IN DWT z P ABL PLDISP LOCAL DISPATCHER z
0x22ff04…230098 Dummy {f00=0x00ce, f01=0x0190, f02=»ARACTERS LEFT IN BUFFER z P* A2 = BITS 0-7 ZERO { P* BITS 8-15 CHARACTER { > P* A4 = BUFFER ADDRESS { ^ P* A6 = DWT ADDRESS { | P* { PINPRST EQU * { 2 P LDKL A3,/FFFF-DWFINP MASK FOR INPUT REQUESTED { P ANS A3,DWTST,A6 RESET FLAG
0x230098…23022c Dummy {f00=0x00ce, f01=0x0190, f02=» { PCI110 EQU * | P* RETURN TO DEVICE DRIVER | ( P LDR A1,A1 ANY CHAR LEFT IN BUFFER? | @ P RF(Z) CI120 NO, CONTINUE | l & P LDK A1,1 INDICATE MORE CHARACTERS | P RF CI130 | P* | PCI120 EQU * | P CM DWTLD1,A6 UNLINK BUFFER |
0x23022c…2303c0 Dummy {f00=0x00ce, f01=0x0190, f02=»********** | ^ P* } P* ROUTINE NAME: } P* PLSTBL } 4 P* } D P* FUNCTION: } N 4 P* THIS ROUTINE DEFINES START OF AN OUTPUT BLOCK. } b 2 P* IT ALLOCATES AN OUTPUT BUFFER, AND LINKS IT } P* TO THE DWT. } P* } P* CALL: } P* ABI ST
0x2303c0…230554 (1, 392) Dummy {f00=0x00fb, f01=0x0190, f02=»ESS } P* ~ P* OUTPUT: ~ P* AT RETURN TO DEVICE DRIVER ~ ( P* A1 = RETURN CODE ~ L P* 0 IF OK ~ h P* NOT 0 IF ERROR ~ z 0 P* A2 = DEVICE STATUS (IF RELEVANT, IE A1=0) ~ P* CR = CONTENTS OF A1 ~ P* INTERR. ENABLED ~ P* ~ @
0x230554…2306e8 Dummy {f00=0x00fb, f01=0x018e, f02=»A15,NDSAV8 SAVE A3-A5, A7-A8 IN DWT ~ $ P CF A15,GETCWT A5 := CWT ADDRESS , P* T P EJECT ^ * P LD A1,DWTST,A6 WAITING LEV. 3 ACK DK2 l P ANK A1,DWFAK3+DWFSAC . DK2 P RF(Z) SB050 . DK2 P ANK A1,DWFAK3 . DK2 P RF(NZ) SB060 . DK2
0x2306e8…23087c Dummy {f00=0x00fb, f01=0x0190, f02=» PSB060 EQU * & P CF A15,GETLCS A1 := STATUS & INH P RF(NZ) SBERR2 ERROR, RETURN B , P LD A3,DWTCHP,A6 CHANNEL PARAMETERS =16 f ( P ANK A3,CHABLO CHANGED BLOCKING? =16 P RF(Z) SB070 NO =16 . P LDKL A2,LOBUFL LOAD MAX BLOCK LENGTH =16
0x23087c…230a10 Dummy {f00=0x00fb, f01=0x0190, f02=»T STATUS ~ 0 P ANKL A1,DWFECH+DWFTY1 ECHO OR ONLY TYPE 1? * P RF(NZ) SB090 YES, DON'T CHECK WINDOW D 2 P CF A15,GETOFR A2 := NR OF OUTSTANDING FRAMES r & P LDR A2,A2 ANY FRAMES OUTSTANDING? P RF(Z) SB090 NO, CONTINUE P LD A1,DWTST,A6 DWT
0x230a10…230ba4 Dummy {f00=0x00fb, f01=0x0190, f02=»INDOW FULL? P RF(N) SB090 NO, CONTINUE 0 P* DWT WILL HAVE TO WAIT UNTIL WINDOW IS OPEN 6 2 P ST A3,DWTLD1,A6 SAVE REQUESTED BUFFER LENGTH j 2 P LDK A1,DWFAK3 FLAG "WAITING FOR LEVEL 3 ACK" , P ORS A1,DWTST,A6 SET FLAG IN DWT STATUS " P I
0x230ba4…230d38 Dummy {f00=0x00fb, f01=0x0190, f02=»TICS COUNTER l P XIF P ABL PLDSP2 LOCAL DISPATCHER P* D P* N 6 P* ENTRY IS MADE HERE WHEN WINDOW IS OPEN AGAIN X P* (AFTER A LEVEL 3 ACK) & P* REGISTER CONTENTS ON ENTRY: P* A1 = RETURN CODE P* A5 = CWT
0x230d38…230ecc Dummy {f00=0x00fb, f01=0x0190, f02=»TLD1,A6 P LDR A1,A1 RETURN CODE 2 P RF(NZ) SBERR2 ERROR, RETURN TO DEVICE DRIVER . P* d P* n PSB090 EQU * x P LDR A7,A5 ( P CWK A3,SOBUFL SHORT BUFFER ENOUGH? & P RF(G) SB100 NO, TAKE LONG BUFFER P* & P* ALLOC
0x230ecc…231060 Dummy {f00=0x00fb, f01=0x018e, f02=»MMON PART FOR SHORT/LONG 2 P LDK A7,CWTSBQ NO BUFFER LEFT. SET QUEUE HEAD " P IFF UTTEST=0 QUEUE STATISTICS V P LD A1,CWTPNR,A5 PLC NUMBER | P SLA A1,1 MAKE INDEX 4 P IM SBQSTA,A1 INCREMENT QUEUE STATISTICS COUNTER P XIF ( P RF SB11
0x231060…2311f4 (1, 393) Dummy {f00=0x00fb, f01=0x0190, f02=» $ P* ALLOCATE LONG OUTPUT BUFFER . P ADK A7,CWTPBL POOLBLOCK FOR LONG BUFFERS , " P CF A15,PLGTBU ALLOCATE BUFFER ^ , P RF(NZ) SB120 COMMON PART FOR SHORT/LONG 2 P LDK A7,CWTLBQ NO BUFFER LEFT. SET QUEUE HEAD " P IFF UTTEST=0 QUEUE STATISTICS
0x2311f4…231388 Dummy {f00=0x00fb, f01=0x0190, f02=» P* PSB110 EQU * 8 P* NO BUFFER WAS AVAILABLE. PUT REQUEST IN QUEUE. " ( P ADR A7,A5 A7 := QUEUE HEAD ADDRESS ^ P LDR A4,A6 DWT ADDRESS & P ADKL A4,DWTOTQ QUEUE LINK ADDRESS $ P CF A15,LNKLST PUT LAST IN QUEUE P ABL PLDSP2 LO
0x231388…23151c Dummy {f00=0x00fb, f01=0x0190, f02=»RETURN CODE $ P* A4 = BUFFER ADDRESS (IF A1=0) P* A5 = CWT ADDRESS < P* A6 = DWT ADDRESS X P* t PBUFRST EQU * ~ P LDR A1,A1 RETURN CODE " P RF(NZ) SBERR2 RETURN IF ERROR PSB120 EQU * ( P LDK A2,X25DAT LENGTH OF X25 H
0x23151c…2316b0 Dummy {f00=0x00fb, f01=0x018e, f02=»EPO RETURN TO DEVICE DRIVER P* RETURN CODE := OK $ P* B P* L PSBERR EQU * V ( P LDK A1,PLSERR RET CODE := SW ERROR j PSBERR2 EQU * " P LDK A2,0 RESET DEVICE STATUS & P ABL NDREP RETURN TO DEVICE DRIVER P* P EJE
0x2316b0…231844 Dummy {f00=0x00fb, f01=0x0190, f02=» P* P* FUNCTION: : P* THIS ROUTINE WRITES ONE CHARACTER TO OUTPUT BUFFER. " P* ` P* CALL: j P* ABI OUPTAB,A1 z P* CF A5,PLCHRO P* P* INPUT: P* A2 = BITS 0-7 IRRELEVANT P* BITS 8-15 CHARACTER P*
0x231844…2319d8 Dummy {f00=0x00fb, f01=0x0190, f02=»* NOT 0 IF ERROR 0 P* A2 = DEVICE STATUS (IF RELEVANT, IE A1=0) P* CR = CONTENTS OF A1 N P* INTERR. ENABLED l P* @ P************************************************************ P* PPLCHRO EQU * PPRCHRO EQU * P E
0x2319d8…231b6c Dummy {f00=0x00fb, f01=0x0190, f02=»O BUFFER x * P CF A15,PLPUCH PUT CHARACTER IN BUFFER P LDR A1,A1 CHECK RETURN CODE > ( P RF(NZ) COERR1 ERROR IF BUFFER FULL b & P LD A2,BUFBIX,A4 BUFFER INDEX =16 P* P LDR* A4,A15 POP A4 6 P* RETURN DIRECTLY INSTEAD OF THROUGH NDRET
0x231b6c…231d00 Dummy {f00=0x00fb, f01=0x018e, f02=»EL PARAMETER =16 z ( P ANK A2,CHABLO CHANGED BLOCKING? =16 & P RF(NZ) EB050 YES SEND BUFFER =16 D POP100 EQU * . =16 n P ENB P ADK A5,4 ADJUST STACK . P LDR A2,A1 DEVICE STATUS & RET CODE := OK $ P ABR* A5 RETURN TO DEVICE DRIVER
0x231d00…231e94 (1, 394) Dummy {f00=0x00fc, f01=0x018e, f02=» P LDR* A4,A15 POP A4 ( P LDK A1,PLSERR RET CODE := SW ERROR $ & P ABL NDRET RETURN TO DEVICE DRIVER P P* z P EJECT P* @ P************************************************************ P* P* ROUTINE NAME: P* PLEN
0x231e94…232028 Dummy {f00=0x00fc, f01=0x0190, f02=» d P* ACKNOWLEDGE. P* P* CALL: ( P* ABI ENBTAB,A1 8 P* CF A5,PLENBL P P* f P* INPUT: p P* A6 = DWT ADDRESS P* P* OUTPUT: P* AT RETURN TO DEVICE DRIVER P* A1 = RETURN CODE P* 0 IF OK
0x232028…2321bc Dummy {f00=0x00fc, f01=0x0190, f02=»* @ P************************************************************ P* N PPLENBL EQU * X PPRENBL EQU * l $ P LDK A1,0 SET RETURN CODE OK =16 0 P LD A2,DWTWAT,A6 GET WAIT/ACT INDICATOR =16 P SUK A2,1 . =16 P RF(Z) EB040 . =16
0x2321bc…232350 Dummy {f00=0x00fc, f01=0x0190, f02=» CHANNEL PARAMETER =16 ( P ANK A2,CHABLO CHANGED BLOCKING =16 " P RB(NZ) OP100 YES, RETURN =16 J PEB050 EQU * . =16 p P ENB , P CF A15,NDSAV8 SAVE A3-A5, A7-A8 IN DWT $ P CF A15,GETCWT A5 := CWT ADDRESS P* P EJECT P*
0x232350…2324e4 Dummy {f00=0x00fc, f01=0x0190, f02=»N =16 h & P CF A15,GETLCS A1 := STATUS & INH " P RF(NZ) EBERR1 RETURN IF ERROR 8 P* ^ P LDR A3,A6 DWT ADDRESS h " P ADKL A3,DWTOTQ QUEUE POINTER P CF A15,PLCCCS RESERVE CCA . P CM DWTOTQ,A6 RESET QUEUE ELEMENT POINTER P LDR A1,
0x2324e4…232678 Dummy {f00=0x00fc, f01=0x0190, f02=»D A4,DWTLD1,A6 BUFFER ADDRESS " P ST A4,CWTCCA+CCRBUF,A5 TO CCA & : P CM CWTCCA+CCRC1B,A5 RESET DATA CHAINING & MSB OF ADDR L $ P LDK A3,CMDFW ASSUME FAST WRITE " P LD A2,DWTST,A6 DEVICE STATUS P LDR A7,A2 SAVE P ANKL A7,DWFECH ECHO OUT
0x232678…23280c Dummy {f00=0x00fc, f01=0x0190, f02=» l P RF(Z) EB100 NO, USE TYPE 2 P* , P EJECT 6 P* D PEB090 EQU * N P* NO FLOW CONTROL b 0 P CF A15,WRADR1 WRITE LINE ADDRESS. NO FLOW C 2 P LDK A2,TYNFLO MESSAGE TYPE := NO FLOW CONTROL P RF EB110 CONTINUE P*
0x23280c…2329a0 Dummy {f00=0x00fc, f01=0x0190, f02=»E FLOW CONTROL r * P SC A2,X25FLW,A4 P(R) & P(S) TO PACKET . P LDK A2,TYDATA MESSAGE TYPE := NORMAL DATA D P* v PEB110 EQU * 0 P SC A2,CWTCCA+CCRIDB,A5 MESSAGE TYPE TO CCA * P SC A3,CWTCCA+CCRCMD,A5 COMMAND TO CCA . P ST A6,CWTCCA+CCRI
0x2329a0…232b34 (1, 395) Dummy {f00=0x00fc, f01=0x0190, f02=»5,GETLCS A1 := STATUS & INH " P RF(NZ) EBERR2 RETURN IF ERROR $ $ P CF A15,PLCCIO EXECUTE CIO START J P RF(NZ) EBERR1 HANDLE ERROR r P ABL PLDSP2 LOCAL DISPATCHER P* P EJECT P* 4 P* ENTRY TO ACKRST IS MADE WHEN I/O OPERAT
0x232b34…232cc8 Dummy {f00=0x00fc, f01=0x0190, f02=»* A6 = DWT ADDRESS P* A7 = MESSAGE TYPE P* 8 PACKRST EQU * B " P LDK A2,0 RESET DEVICE STATUS V P LDR A1,A1 ANY ERROR? | P RF(NZ) EB130 YES, RETURN P* P LD A3,DWTST,A6 DWT STATUS P LDR A4,A3 * P ANK A4,DWFRES
0x232cc8…232e5c Dummy {f00=0x00fc, f01=0x0190, f02=» PEB120 EQU * 0 P CWK A7,TYNFLO PACKET WITH NO FLOW CONTROL? P RF(E) EB130 YES, RETURN L ( P ANK A3,DWFSAC WAIT FOR LEVEL 3 ACK? l P RF(Z) EB130 NO, RETURN P* 2 P LDK A3,DWFAK3 FLAG "WAITING FOR LEVEL 3 ACK" , P ORS A3,DWTST,A6
0x232e5c…232ff0 Dummy {f00=0x00fc, f01=0x0190, f02=»N LEVEL 3 HAVE BEEN RECIEVED n & P* REGISTER CONTENTS ON ENTRY: $ P* A1 = RETURN CODE N 0 P* A2 = DEVICE STATUS (IF RELEVANT, IE A1=0) j P* A5 = CWT ADDRESS P* A6 = DWT ADDRESS P* PAK3RST EQU * P* PEB130 EQU
0x232ff0…233184 Dummy {f00=0x00fc, f01=0x0190, f02=»NEW BLOCK =16 v & P ABL NDREP RETURN TO DEVICE DRIVER P* @ P* J P* T PEBERR2 EQU * ^ P CM CWTCCB,A5 SET CCA FREE r PEBERR1 EQU * * P LD A4,DWTLD1,A6 OUTPUT BUFFER ADDRESS " P CF A15,PLRLBU RELEASE BUFFER $ P CM DWTLD1,A
0x233184…233318 Dummy {f00=0x00fc, f01=0x0190, f02=» @ P************************************************************ P* L P* ROUTINE NAME: V P* PLTEST n P* ~ P* FUNCTION: 2 P* THIS ROUTINE HANDLES TEST COMMANDS FOR PLC. 0 P* THE TEST COMMANDS ARE GENERATED BY A TEST 4 P*
0x233318…2334ac Dummy {f00=0x00fc, f01=0x0190, f02=»HE PLC DRIVER, AND t 4 P* NOT THROUGH THE TERMINAL NETWORK DISTRIBUTOR, 2 P* AS THIS FUNCTION IS NOT AVAILABLE FOR OTHER R P* LINE DRIVERS. P* P* CALL: P* CF A5,PLTEST P* P* INPUT: P* A6 = DWT ADDRESS P*
0x2334ac…233640 Dummy {f00=0x00fc, f01=0x0190, f02=»A2 = CHANGED P* CR = CONTENTS OF A1 P* INTERR. ENABLED 4 P* N @ P************************************************************ X P* P EJECT P* PPLTEST EQU * P IFT PLCTST=1 , P CF A15,NDSAV8 SAVE A3-A5, A7-A8
0x233640…2337d4 (1, 396) Dummy {f00=0x00fc, f01=0x0190, f02=»DWT ADDRESS TO CCA x < P CM CWTCCA+CCRC1B,A5 DATA CHAINING & MSB OF BUFFER ADDR 0 P LD A4,DWTTBU,A6 USER REQUEST BUFFER ADDRESS Z " P ST A4,CWTCCA+CCRBUF,A5 TO CCA 0 P LD A2,DWTTLN,A6 USER REQUEST BUFFER LENGTH * P ST A2,CWTCCA+CCRLEN,A5 LENGTH T
0x2337d4…233968 Dummy {f00=0x00fc, f01=0x0190, f02=»ER REQUEST ORDER CODE | P ANK A1,/3F CLEAN & P CWK A1,ORDPS GET LINE STATISTICS? 8 P RF(E) TE100 YES, HANDLE b & P CWK A1,ORDDS GET DLS STATISTICS? P RF(E) TE110 YES, HANDLE $ P CWK A1,ORDRM READ LOCAL MEMORY? 2 P RF(NE) TEERR2 NO, C
0x233968…233afc Dummy {f00=0x00fc, f01=0x0190, f02=» A3,CMDRM PLC COMMAND READ LOCAL MEMORY P RF TE120 TO COMMON PART 0 P* P PTE100 EQU * Z P* GET LINE STATISTICS n 8 P SC A3,CWTCCA+CCRSU1,A5 STORE LINE NUMBER (0-3) =12 2 P LDK A3,CMDPS PLC COMMAND GET LINE STATISTICS P RF TE12
0x233afc…233c90 Dummy {f00=0x00fc, f01=0x0190, f02=»MASKWS CLEAN WS NUMBER P SLL A3,8 TO LEFT BYTE 0 P ADK A3,CMDDS PLC COMMAND GET DLS STATISTICS < P* p PTE120 EQU * z 6 P ST A3,CWTCCA+CCRDLS,A5 DLS INDEX & COMMAND TO CCA P* $ P CF A15,PLCCIO EXECUTE CIO START P RF(NZ) TEERR1
0x233c90…233e24 Dummy {f00=0x00fc, f01=0x0190, f02=»ED. & P* REGISTER CONTENTS ON ENTRY: P* A1 = RETURN CODE 6 P* A5 = CWT ADDRESS R P* A6 = DWT ADDRESS n P* PTSTRST EQU * & P ABL NDREP RETURN TO DEVICE DRIVER P* P* PTEERR2 EQU * $ P CM CWTCCB,A5
0x233e24…233fb8 Dummy {f00=0x00fc, f01=0x0190, f02=» P* P EJECT P* P********************** * P* INTERRUPT ROUTINES * H P********************** f P* : P* THIS SECTION CONTAINS INTERRUPT HANDLING ROUTINES. 0 P* IT IS ENTERED IMMEDIATELY AT A RELEASE, . P* ATTE
0x233fb8…23414c Dummy {f00=0x00fc, f01=0x0190, f02=» > P* MADE EITHER TO SOME ROUTINE WAITING FOR THE INTERRUPT, : P* TO THE LOCAL PLC DISPATCHER OR TO TOSS DISPATCHER. F 8 P* ON EXIT, A15 STACK CONTAINS INTERRUPT RETURN AND P* A1-A8. P* P* 0 P* ROUTINES IN ORDER OF APPEARANC
0x23414c…2342e0 Dummy {f00=0x00fc, f01=0x0190, f02=»IHA HANDLE ATTENTION INTERRUPT , P* PLIHC HANDLE I/O COMPLETION INTERRUPT & 2 P* COMPSTA HANDLE COMPLETION OF START COMMANDS V & P* (TEST CU, OPEN LINE, OPEN DLS) 2 P* COMPTEST HANDLE COMPLETION OF TEST COMMANDS 6 P* (PLC STATISTICS, DLS STA
0x2342e0…234474 (1, 397) Dummy {f00=0x00fc, f01=0x0190, f02=» * P* GRERR HANDLE ERRORS AT GENERAL READ 6 P* GRSACK HANDLE STATUS AND RR MESSAGE FROM DEVICE 6 * P* GRDATA HANDLE DATA INPUT FROM DEVICE p 0 P* GRRES HANDLE RESET MESSAGE FROM SECONDARY P* P EJECT P* @ P********************
0x234474…234608 Dummy {f00=0x00fc, f01=0x0190, f02=»TINE CONTAINS INTERRUPT ENTRIES FOR 2 P* ALL PLC:S INCLUDED. IT SAVES A1-A8, SETS CWT , 4 P* ADDRESS AND EXITS TO RELEASE OR I/O COMPLETION b P* INTERRUPT HANDLER. P* P* CALL: P* HARDWARE INTERRUPT P* P* INPUT: P*
0x234608…23479c Dummy {f00=0x00fc, f01=0x0190, f02=» P* @ P************************************************************ P* R PIHPL01 EQU * P IFF PLCNRL=0 U =5 p P IFT CPU852=1 P CF A15,SAVE8 PUSH A1-A8 P XIF P IFF PLCNRL=0 U =5 P IFF CPU852=1 P MSR 8,A15 P
0x23479c…234930 Dummy {f00=0x00fc, f01=0x0190, f02=»C:S t P XIF P* P EJECT " P* 0 PIHPL02 EQU * : P IFF PLCNRL=0 U =5 N P IFF PLCNRL=1 h P IFT CPU852=1 ~ P CF A15,SAVE8 PUSH A1-A8 P XIF P* P IFF PLCNRL=0 U =5 P IFF PLCNRL=1 P IFF CPU852=1
0x234930…234ac4 Dummy {f00=0x00fc, f01=0x0190, f02=» PLC 1 t $ P RF IHPL COMMON PART, ALL PLC:S P XIF 6 P* B PIHPL03 EQU * L P IFF PLCNRL=0 U =5 ` P IFF PLCNRL=1 z P IFF PLCNRL=2 P IFT CPU852=1 P CF A15,SAVE8 PUSH A1-A8 P XIF P* P IFF PLCNRL=0 U =5
0x234ac4…234c58 Dummy {f00=0x00fc, f01=0x0190, f02=»U =5 P IFF PLCNRL=1 P IFF PLCNRL=2 " & P LDKL A5,PL2CWT CWT ADDRESS, PLC 2 8 $ P RF IHPL COMMON PART, ALL PLC:S b P XIF P* PIHPL04 EQU * P IFF PLCNRL=0 U =5 P IFF PLCNRL=1 P IFF PLCNRL=2 P IFF PLCNRL=3
0x234c58…234dec Dummy {f00=0x00fc, f01=0x018e, f02=» PLCNRL=2 P IFF PLCNRL=3 P IFF CPU852=1 ( P MSR 8,A15 PUSH A1-A8 > P XIF P* h P IFF PLCNRL=0 U =5 r P IFF PLCNRL=1 P IFF PLCNRL=2 P IFF PLCNRL=3 & P LDKL A5,PL3CWT CWT ADDRESS, PLC 3 $ P RF IHPL COMMON
0x234dec…234f80 Dummy {f00=0x00fc, f01=0x0190, f02=» v P XIF P IFF PLCNRR=0 P IFF CPU852=1 * P MSR 8,A15 PUSH A1-A8 @ P XIF ^ P IFF PLCNRR=0 j , P LDKL A5,PR1CWT CWTADDRESS PLC 1 REMOTE " P RF IHPL COMMON PART ALL CWT:S P XIF PIHPR02 EQU * P IFF PLCNRR=0
0x234f80…235114 (1, 398) Dummy {f00=0x00fd, f01=0x018e, f02=» IFF CPU852=1 P MSR 8,A15 PUSH A1-A8 P XIF 4 P IFF PLCNRR=0 @ P IFF PLCNRR=1 V , P LDKL A5,PR2CWT CWTADDRESS PLC 2 REMOTE l " P RF IHPL COMMON PART ALL CWT:S P XIF PIHPR03 EQU * P IFF PLCNRR=0 P IFF PLCNRR=1
0x235114…2352a8 Dummy {f00=0x00fd, f01=0x0190, f02=» P IFF PLCNRR=2 P IFF CPU852=1 P MSR 8,A15 PUSH A1-A8 0 P XIF N P IFF PLCNRR=0 Z P IFF PLCNRR=1 p P IFF PLCNRR=2 , P LDKL A5,PR3CWT CWTADDRESS PLC 3 REMOTE " P RF IHPL COMMON PART ALL PLC:S P XIF PIHPR04 EQU
0x2352a8…23543c Dummy {f00=0x00fd, f01=0x0190, f02=»SH A1-A8 P XIF P IFF PLCNRR=0 P IFF PLCNRR=1 2 P IFF PLCNRR=2 H P IFF PLCNRR=3 ^ P IFF CPU852=1 t P MSR 8,A15 PUSH A1-A8 P XIF P IFF PLCNRR=0 P IFF PLCNRR=1 P IFF PLCNRR=2 U =9 P IFF PLCNRR=3
0x23543c…2355d0 Dummy {f00=0x00fd, f01=0x0190, f02=»PL EQU * & P ST P,INTSAV SAVE LATEST INTERRUPT P LDK A1,0 RESET HIGH BYTE : , P LC A1,CWTCID+CIDINT,A5 INTERRUPT SOURCE P CWK A1,/40 RELEASE? P RF(E) PLIHR YES, HANDLE P CWK A1,/20 I/O COMPLETION? P RF(E) PLIHC YES, HANDLE
0x2355d0…235764 Dummy {f00=0x00fd, f01=0x018e, f02=»DISP EXIT P* P EJECT P* * @ P************************************************************ 4 P* x P* ROUTINE NAME: P* PLIHR P* P* FUNCTION: . P* THIS ROUTINE HANDLES RELEASE INTERRUPTS. . P* IT RESETS TH
0x235764…2358f8 Dummy {f00=0x00fd, f01=0x0190, f02=» P* CALL: P* RF PLIHR P* & P* INPUT: 0 P* A5 = CWT ADDRESS @ P* P* OUTPUT: f P* IF PROCESS WAITING x , P* A4 = BLOCK ADDRESS OF WAITING PROCESS P* A5 = CWT ADDRESS P* @ P******************************
0x2358f8…235a8c Dummy {f00=0x00fd, f01=0x0190, f02=»NG FOR CCA? r * P ABL(NZ) CCARST YES, ACTIVATE PROCESS " P CM CWTCCB,A5 NO, SET CCA FREE B P ABL TDISP EXIT h P* P EJECT P* @ P************************************************************ P* P* ROUTINE NAME: P
0x235a8c…235c20 Dummy {f00=0x00fd, f01=0x0190, f02=» STARTS ABORT n 4 P* OF ALL CALLS. IF COMMUNICATION REESTABLISHED, P* IT STARTS RECOVERY. N P* l P* CALL: v P* RF PLIHA P* P* INPUT: P* A5 = CWT ADDRESS P* P* OUTPUT: P* A5 = CWT ADDRESS P*
0x235c20…235db4 (1, 399) Dummy {f00=0x00fd, f01=0x0190, f02=»A1,CWTRCA+CCRSTA,A5 PLC STATUS & P ST A1,CWTPLS,A5 SAVE FOR TESTING & P IFF UTTEST=0 P P CF A15,LOGATT LOG RCA f P XIF & P LC A6,CWTRCA+CCRDLS,A5 WS NUMBER P ANK A6,MASKWS CLEAN P EX CWTST3,A5 RELEASE RCA P* P EJECT
0x235db4…235f48 Dummy {f00=0x00fd, f01=0x0190, f02=»O, CONTINUE ( P CF A15,PLCNOP SET PLC NOT OPERABLE P ABL TDISP EXIT @ P* X PIA100 EQU * b P LDR A2,A1 STATUS v 0 P ANK A2,STACOM COMMUNICATION REESTABLISHED? . P ABL(NZ) PLREWS YES, START RECOVERY OF WS P* P LDR A2,
0x235f48…2360dc Dummy {f00=0x00fd, f01=0x0190, f02=»******************************************************** P* @ P* ROUTINE NAME: J P* PLIHC b P* r P* FUNCTION: | 6 P* THIS ROUTINE HANDLES I/O COMPLETION INTERRUPTS. 6 P* IT CHECKS WHICH COMMAND THAT HAS BEEN COMPLETED, 2 P* AN
0x2360dc…236270 Dummy {f00=0x00fd, f01=0x0190, f02=»ESS P* P* OUTPUT: P* A1 = PLC STATUS ( P* A2 = FATAL PLC STATUS B P* A5 = CWT ADDRESS b P* A6 = USER PARAMETER ~ P* @ P************************************************************ P* PPLIHC EQU * & P
0x236270…236404 Dummy {f00=0x00fd, f01=0x0190, f02=» XIF P ANKL A1,/FFFF-STAPOL-STALER & P* RESET POLL STOP & LINK ERROR 0 < P LD A6,CWTRCA+CCRIDW,A5 USER PARAMETER (DWT, DLS OR ...) Z $ P LC A2,CWTRCA+CCRCMD,A5 COMMAND P* P EJECT P* ( P LDK A3,CMDTBL COMMAND TABLE LENGTH
0x236404…236598 Dummy {f00=0x00fd, f01=0x018e, f02=»BLE. ERROR z & P CC A2,CMDTAB+1,A3 COMMAND FOUND? P RB(NE) IC100 NO, CONTINUE < P* ^ . P C1 A2,CMDTAB+4,A3 MASK FOR ALLOWED ERRORS h P ANR A2,A1 FATAL ERROR? P RF(Z) IC110 NO, CONTINUE ( P CF A15,PLCNOP SET PLC NOT OPERABLE P
0x236598…23672c Dummy {f00=0x00fd, f01=0x0190, f02=» ( P CF A15,PLCNOP SET PLC NOT OPERABLE P ABL PLDSP2 LOCAL DISPATCHER 0 P* T P EJECT ^ P* l @ P************************************************************ v P* P* ROUTINE NAME: P* COMPSTA P* P* FUNCTION:
0x23672c…2368c0 Dummy {f00=0x00fd, f01=0x0190, f02=»T TO THE l & P* ROUTINE THAT MADE THE I/O CALL. P* : P* CALL: D P* ABI CMDROU,A3 T P* l P* INPUT: v P* A1 = PLC STATUS P* A2 = FATAL PLC STATUS P* A5 = CWT ADDRESS $ P* A6 = PARAMETER (IF RELEVANT) P*
0x2368c0…236a54 (1, 400) Dummy {f00=0x00fd, f01=0x0190, f02=» TO ODLRST) v P* @ P************************************************************ P* b PCOMPTC EQU * l P EX CWTST3,A5 RELEASE RCA 2 P ABL TCURST RETURN TO ROUTINE MAKING I/O CALL P* P EJECT P* P* P*
0x236a54…236be8 Dummy {f00=0x00fd, f01=0x0190, f02=»ALL f P* P* P* OPEN DLS, COMPLETION P* B PCOMPOD EQU * L P EX CWTST3,A5 RELEASE RCA ` P LDR A2,A2 FATAL STATUS? ( P RF(NZ) CD100 YES, SKIP STATUS CHECK P* P LDR A2,A6 WS NUMBER $ P CF A15,STAHAN HANDL
0x236be8…236d7c Dummy {f00=0x00fd, f01=0x0190, f02=»L d P* P EJECT P* " @ P************************************************************ , P* p P* ROUTINE NAME: z P* COMPTEST P* P* FUNCTION: 2 P* THIS ROUTINE HANDLES COMPLETION OF GET LINE 4 P* STATISTICS, GE
0x236d7c…236f10 Dummy {f00=0x00fd, f01=0x0190, f02=»EXITS TO THE ROUTINE THAT | P* MADE THE I/O CALL. " P* > P* CALL: H P* ABI CMDROU,A3 X P* p P* INPUT: z P* A1 = PLC STATUS P* A5 = CWT ADDRESS P* A6 = DWT ADDRESS P* P* OUTPUT: P* A1 = RETURN C
0x236f10…2370a4 Dummy {f00=0x00fd, f01=0x018e, f02=»** V P* P IFT PLCTST=1 PCOMPPS EQU * * PCOMPDS EQU * > PCOMPRM EQU * R P* f P EJECT p P* ~ P LDR A1,A1 PLC STATUS P RF(NZ) TS100 ERROR. HANDLE P* , P LD A2,CWTRCA+CCRLEN,A5 EFFECTIVE LENGTH P ST
0x2370a4…237238 Dummy {f00=0x00fd, f01=0x0190, f02=» ( P CM DWTTLN,A6 EFFECTIVE LENGTH := 0 P* 0 PTS110 EQU * : P EX CWTST3,A5 RELEASE RCA N 2 P ABL TSTRST RETURN TO ROUTINE MAKING I/O CALL p P XIF P* P EJECT P* @ P****************************************************
0x237238…2373cc Dummy {f00=0x00fd, f01=0x0190, f02=»TANDARD j P* WRITE AND FAST WRITE. 6 P* IT CHECKS THE PLC STATUS AND RELEASES THE OUTPUT 0 2 P* BUFFER, IF ANY WAS ALLOCATED. IF THE OUTPUT j 2 P* OPERATION IS FINISHED, IT THEN EXITS TO THE & P* ROUTINE THAT MADE THE I/O CALL. P*
0x2373cc…237560 Dummy {f00=0x00fd, f01=0x018e, f02=»T ADDRESS P* A6 = DWT ADDRESS P* . P* OUTPUT: 8 0 P* WHEN RETURN TO ROUTINE MAKING OUTPUT CALL J P* A1 = RETURN CODE ~ P* A2 = BITS 0-7 ZERO P* BITS 8-15 DEVICE STATUS P* A5 = CWT ADDRESS P* A6 = DWT ADDRES
0x237560…2376f4 (1, 401) Dummy {f00=0x00fd, f01=0x0190, f02=» PCOMPFW EQU * P LDR A2,A2 FATAL PLC STATUS? P RF(NZ) WRERR1 YES, HANDLE @ P* b & P LC A2,DWTCP2,A6 CHANEL PARAMETER l " P ANK A2,MASKWS CLEAN WS NUMBER $ P CF A15,STAHAN HANDLE PLC STATUS 2 P LC A7,CWTRCA+CCRIDB,A5 TYPE OF WRIT
0x2376f4…237888 Dummy {f00=0x00fd, f01=0x0190, f02=»A7 CALL CORRESPONDING ROUTINE P* & P* 0 P* IRRECOVERABLE ERROR : P* Z PWRERR1 EQU * d P EX CWTST3,A5 RELEASE RCA x PWRERR EQU * P ABL PLDSP2 EXIT P* P* * P* COMPLETION OF DATA MESSAGE OUTPUT P
0x237888…237a1c Dummy {f00=0x00fd, f01=0x0190, f02=»BL ACKRST RETURN TO REQUEST HANDLER P* , P* 6 4 P* COMPLETION OF RECIEVE READY MESSAGE OUTPUT @ P* x PWRRR EQU * $ P SUK A4,2 START OF MONITOR BLOCK P LDR A7,A5 CWT ADDRESS , P ADK A7,CWTMBQ MONITOR BLOCK QUEUE HEAD $
0x237a1c…237bb0 Dummy {f00=0x00fd, f01=0x0190, f02=» COMPLETION OF RESET CONFIRMATION MESSAGE OUTPUT P* 8 PWRRESC EQU * B $ P SUK A4,2 START OF MONITOR BLOCK V P LDR A7,A5 CWT ADDRESS ~ , P ADK A7,CWTMBQ MONITOR BLOCK QUEUE HEAD $ P CF A15,LNKOUT REMOVE FROM QUEUE P CF A15,FREBLK RETUR
0x237bb0…237d44 Dummy {f00=0x00fd, f01=0x0190, f02=»ECOVERY CAUSE := LINK RESET ( P CF A15,NDREDW CALL RECOVERY FOR DWT $ P ABL PLDSP2 LOCAL DISPATCHER P P* t P EJECT ~ P* @ P************************************************************ P* P* ROUTINE NAME: P* COMPGR
0x237d44…237ed8 Dummy {f00=0x00fd, f01=0x018e, f02=»E AND CALLS v P* CORRESPONDING ROUTINE. P* 4 P* CALL: > P* ABI CMDROU,A3 N P* f P* INPUT: p P* A1 = PLC STATUS P* A2 = FATAL PLC STATUS P* A5 = CWT ADDRESS P* P* OUTPUT: P* A1 = PLC STATUS
0x237ed8…23806c Dummy {f00=0x00fd, f01=0x0190, f02=» @ P************************************************************ P* L PCOMPGR EQU * V P LDR A2,A2 FATAL STATUS? j P RF(NZ) GRERR2 YES, EXIT P* P EJECT P* ( P CF A15,INTYPE A3 := TYPE OF MESSAGE * P LD A4,CWTRCA+CC
0x23806c…238200 Dummy {f00=0x00fd, f01=0x0190, f02=» P ANK A7,MASKLC CLEAN P* 0 P ABI REAROU,A3 ROUTINE FOR THIS MESSAGE TYPE * P* ^ P EJECT h P* v @ P************************************************************ P* P* ROUTINE NAME: P* GRERR P* P* FUNCTI
0x238200…238394 (1, 402) Dummy {f00=0x00fe, f01=0x0190, f02=»,A3 P* RB GRERR1 P* RF GRERR2 P* 4 P* INPUT: > & P* A4 = BUFFER ADDRESS (IF GRERR1) N P* A5 = CWT ADDRESS x P* P* OUTPUT: P* - P* @ P************************************************************
0x238394…238528 Dummy {f00=0x00fe, f01=0x0190, f02=»A x P* P ABL PLDSP2 EXIT P* , P EJECT 6 P* D @ P************************************************************ N P* P* ROUTINE NAME: P* GRSACK P* P* FUNCTION: 4 P* THIS ROUTINE HANDLES STATUS AND RECI
0x238528…2386bc Dummy {f00=0x00fe, f01=0x0190, f02=» P* CALL: P* ABI REAROU,A3 P* 0 P* INPUT: : P* A4 = BUFFER ADDRESS J P* A5 = CWT ADDRESS h P* A6 = DLS INDEX P* A7 = DEVICE ADDRESS P* P* OUTPUT: P* A1 = RETURN CODE P* =0 IF OK P
0x2386bc…238850 Dummy {f00=0x00fe, f01=0x0190, f02=»S ~ P* @ P************************************************************ P* X P EJECT b P* p PGRSTAT EQU * z $ P CF A15,GETDWT A6 := DWT ADDRESS P RB(Z) GRERR1 NO DWT DEFINED 0 P CF A15,FWIPSR UPDATE FLOW CONTROL COUNTERS
0x238850…2389e4 Dummy {f00=0x00fe, f01=0x0190, f02=» $ P CF A15,GETDWT A6 := DWT ADDRESS P RB(Z) GRERR1 NO DWT DEFINED 0 . P CF A15,FWIPR UPDATE FLOW CONTROL COUNTERS T & P LDK A2,0 RESET DEVICE STATUS BYTE P* P* PSR100 EQU * B P* COMMON PART FOR DEVICE STATUS AND RECIEVE R
0x2389e4…238b78 Dummy {f00=0x00fe, f01=0x0190, f02=» P LDR A4,A3 4 P ANK A4,DWFAK3 ANYONE WAITING FOR THIS MESSAGE? P ABL(Z) PLDSP2 NO, DISPATCH N P* r $ P XRS A4,DWTST,A6 RESET WAIT FLAG | P LDK A1,0 RETURN CODE := OK 0 P ANK A3,DWFSAC ALWAYS WAIT FOR LEVEL 3 ACK? * P ABL(NZ) AK3
0x238b78…238d0c Dummy {f00=0x00fe, f01=0x0190, f02=»************************************** z P* . P* ROUTINE NAME: 8 P* GRDATA P P* ` P* FUNCTION: j 0 P* THIS ROUTINE HANDLES DATA INPUT MESSAGES. ~ & P* IT LINKS THE BUFFER TO THE CWT. P* P* CALL: P* ABI REAROU,A3
0x238d0c…238ea0 Dummy {f00=0x00fe, f01=0x0190, f02=»SS | P* P* OUTPUT: P* - & P* 2 @ P************************************************************ < P* PGRDATA EQU * $ P CF A15,GETDWT A6 := DWT ADDRESS P RB(Z) GRERR1 NO DWT DEFINED P* 0 P CF A15,FWIPSR UPDAT
0x238ea0…239034 (1, 403) Dummy {f00=0x00fe, f01=0x0190, f02=» , P LD A2,CWTRCA+CCRLEN,A5 EFFECTIVE LENGTH $ P ST A2,BUFLEN,A4 SAVE IN BUFFER 4 & P LDK A2,X25DAT START OF USER DATA " P ST A2,BUFBIX,A4 TO BYTE INDEX P* P EJECT P* P EX CWTST3,A5 RELEASE RCA P ABL PLDSP2 EXIT P
0x239034…2391c8 Dummy {f00=0x00fe, f01=0x0190, f02=»* GRRES P* P* FUNCTION: 2 P* THIS ROUTINE HANDLES RESET MESSAGES FROM THE . P* SECONDARY. d 6 P* IT RESETS THE FLOW CONTROL COUNTERS IN THE DWT, x 6 P* AND SETS A RESET PACKET FLAG IN THE DWT. THEN A 0 P* RESET CONFIRMATION MESSAGE
0x2391c8…23935c Dummy {f00=0x00fe, f01=0x018e, f02=» P* ABI REAROU,A3 P* P* INPUT: & P* A4 = BUFFER ADDRESS 6 P* A5 = CWT ADDRESS T P* A6 = DLS INDEX p P* A7 = DEVICE ADDRESS P* P* OUTPUT: P* - P* @ P**********************************************
0x23935c…2394f0 Dummy {f00=0x00fe, f01=0x0190, f02=» P EJECT P* P EX CWTST3,A5 RELEASE RCA . P CF A15,PLRLBU RELEASE GENERAL READ BUFFER > . P CM DWTLD2,A6 RESET FLOW CONTROL COUNTERS p P* P LD A2,DWTST,A6 DWT STATUS * P ANK A2,DWFRES RESET ALREADY RECIEVED? P ABL(NZ) PLD
0x2394f0…239684 Dummy {f00=0x00fe, f01=0x0190, f02=» P ENB P* $ P CF A15,GETBLK GET OUTPUT BUFFER P LDR A7,A5 CWT ADDRESS B , P ADK A7,CWTMBQ MONITOR BLOCK QUEUE HEAD ` 4 P CF A15,LNKFST PUT BLOCK IN QUEUE (FOR RECOVERY) P ADK A4,2 SKIP QUEUE LINK . P ST A4,CWTCCA+CCRBUF,A5 BUFFER
0x239684…239818 Dummy {f00=0x00fe, f01=0x0190, f02=»DK A2,CMDSW COMMAND CODE "STANDARD WRITE" " P SC A2,CWTCCA+CCRCMD,A5 TO CCA 2 " P LDK A2,/1F MESSAGE TYPE FLAGS X & P SC A2,X25FLW,A4 TO OUTPUT BUFFER ~ , P LDK A2,TYRESC TYPE "RESET CONFIRMATION" . P SC A2,CWTCCA+CCRIDB,A5 TO CCA, COMMAND ID :
0x239818…2399ac Dummy {f00=0x00fe, f01=0x018e, f02=»CA LENGTH t P* P EJECT P* * P LD A2,DWTST,A6 DWT STATUS 4 & P ANK A2,DWFRES RESET STILL WANTED? V P RF(Z) REERR1 NO, EXIT & P CF A15,GETWSS A1 := STATUS & INH P RF(NZ) REERR1 EXIT IF ERROR $ P CF A15,PLCCIO EXECUTE CIO S
0x2399ac…239b40 Dummy {f00=0x00fe, f01=0x0190, f02=» P LDR A3,A2 , P ANK A2,DWFAK3 WAITING FOR LEVEL 3 ACK? P RF(Z) RE100 NO, CONTINUE F $ P XRS A2,DWTST,A6 RESET ACK3 FLAG h 0 P ANK A3,DWFSAC ALWAYS WAIT FOR LEVEL 3 ACK? * P ABL(NZ) AK3RST YES, RETURN WITH ACK 3 * P ABL WINRST NO, RETURN
0x239b40…239cd4 (1, 404) Dummy {f00=0x00fe, f01=0x0190, f02=»(NZ) BUFRST YES, RETURN WITH ERROR CODE P* 0 P ABL PLDSP2 LOCAL DISPATCHER : P* ^ P* h PREERR1 EQU * r P CM CWTCCB,A5 SET CCA FREE PREERR2 EQU * 2 P* ERROR. RETURN MONITOR BLOCK IMMEDIATELY , P SUK A4,2 START ADDRES
0x239cd4…239e68 Dummy {f00=0x00fe, f01=0x0190, f02=»2 LOCAL DISPATCHER P* P EJECT $ P* 2 P********************* < P* RECOVERY ROUTINES * Z P********************* x P* < P* THESE ROUTINES ARE USED AT SYSTEM START OR TC POWER > P* UP. IN CASE OF POWER UP, THEY FIRST
0x239e68…239ffc Dummy {f00=0x00fe, f01=0x0190, f02=» ARE ` P* CALLED FOR ALL DWT:S. 8 P* THE SECTION ALSO CONTAINS ROUTINES FOR RECOVERY . P* OF I/O ERRORS. j P* P* 0 P* ROUTINES IN ORDER OF APPEARANCE IN CODE: P* P* NAME FUNCTION P* 8 P* PLON CALL RECO
0x239ffc…23a190 Dummy {f00=0x00fe, f01=0x0190, f02=»****************************************************** P* > P* ROUTINE NAME: H P* PLON ` P* n P* FUNCTION: x . P* THIS ROUTINE WILL ACTIVATE A MONITOR JOB 2 P* FOR THE PLC RECOVERY, IF THE JOB NOT ALREADY P* IS PENDING. :
0x23a190…23a324 Dummy {f00=0x00fe, f01=0x0190, f02=» P* P* INPUT: P* - " P* . P* OUTPUT: 8 P* AT ENTRY TO PLSTRT: J P* A5 = CWT ADDRESS l P* @ P************************************************************ P* PPLON EQU * $ P LD A1,PLCPFP POWER UP
0x23a324…23a4b8 Dummy {f00=0x00fe, f01=0x0190, f02=» & P CF A15,QMJOB ACTIVATE MONITOR JOB P* . PPO100 EQU * 8 P RTN A15 L P* P EJECT f P* t PPO110 EQU * ~ P CM PLCPFP NO LONGER PENDING P* P* " P IFF UTTEST=0 QUEUE STATISTICS ( P* RESET QUEUE STATIST
0x23a4b8…23a64c Dummy {f00=0x00fe, f01=0x0190, f02=» p P CM STATAR,A1 RESET COUNTER P RB PO113 NEXT WORD , PPO116 EQU * H P XIF P* h ( P LDK A1,16 (MAX NUMBER OF PLC:S) * 2 r PPO120 EQU * 0 P* THIS LOOP IS EXECUTED ONCE FOR EACH PLC P SUK A1,2 NEXT PLC " P RF(N) P
0x23a64c…23a7e0 Dummy {f00=0x00fe, f01=0x0190, f02=» PLC x P RB PO120 NEXT PLC P* & PPO130 EQU * 0 P ABL MEXIT MONITOR JOB EXIT D P* h P EJECT r P* @ P************************************************************ P* P* ROUTINE NAME: P* PLSTRT P*
0x23a7e0…23a974 (1, 405) Dummy {f00=0x0124, f01=0x0190, f02=»E PLC, AND CALLS RECOVERY ROUTINES IN ALL P* DEVICE DRIVERS. 2 P* L P* CALL: V P* CF A15,PLSTRT f P* ~ P* INPUT: P* A5 = CWT ADDRESS P* P* OUTPUT: P* - P* @ P**********************************
0x23a974…23ab08 Dummy {f00=0x0124, f01=0x0190, f02=»PU852=1 P MSR 8,A15 PUSH A1-A8 P XIF . P* : P ENB D 2 P IM CWTGR,A5 INDICATE GENERAL READ NOT ALLOWED P " P CM CWTABW,A5 STOP ABORT OF WS * P CM CWTSBQ,A5 RESET SHORT BUFFER QUEUE * P CM CWTLBQ,A5 RESET LONG BUFFER QUEUE P
0x23ab08…23ac9c Dummy {f00=0x0124, f01=0x0190, f02=» MONITOR BLOCK QUEUE HEAD P LDR* A4,A7 FIRST BLOCK " $ P RF(Z) ST105 CONTINUE IF NO LEFT B $ P CF A15,LNKOUT REMOVE FROM QUEUE j P CF A15,FREBLK RETURN BLOCK P RB ST100 TAKE NEXT PST105 EQU * . P* RETURN MONITOR BLOCKS FROM CC
0x23ac9c…23ae30 Dummy {f00=0x0124, f01=0x018e, f02=» p $ P CF A15,LNKOUT REMOVE FROM QUEUE P CF A15,FREBLK RETURN BLOCK 0 P RB ST105 TAKE NEXT T P* p PST110 EQU * z P* INITIATE BUFFER AREAS P LDR A4,A5 CWT ADDRESS 2 P ADKL A4,CWTSOB AREA FOR SHORT OUTPUT BUFFERS P LDR
0x23ae30…23afc4 Dummy {f00=0x0124, f01=0x0190, f02=» x 0 P ADKL A4,CWTLOB AREA FOR LONG OUTPUT BUFFERS P LDR A7,A5 < 2 P ADK A7,CWTPBL POOLBLOCK, LONG OUTPUT BUFFERS N ( P CF A15,INIBUF INITIATE BUFFER AREA P LDR A4,A5 CWT ADDRESS 2 P ADKL A4,CWTGRB AREA FOR GENERAL READ BUFFERS P LDR
0x23afc4…23b158 Dummy {f00=0x0124, f01=0x0190, f02=» DWT:S AND WORK STATION STATUS 0 P LDK A3,MAXWS+1 NUMBER OF WORK STATIONS + 1 & PST120 EQU * Z P SUK A3,1 NEXT WORK STATION n $ P RF(N) ST150 END IF NO MORE LEFT " P LDR A2,A3 WORK STATION NUMBER P SLA A2,1 MAKE INDEX P ADR A2,A5 A
0x23b158…23b2ec Dummy {f00=0x0124, f01=0x0190, f02=» NOT OPERABLE 0 P LD* A1,CWTINT,A5 WORK STATION TABLE ADDRESS " P LDR A6,A3 WORK STATION NUMBER J 0 P CF A15,NDGEDN A7 := HIGEST DWT NUMBER ON WS p P ADK A7,1 PST130 EQU * P SUK A7,1 NEXT DWT ( P RF(N) ST140 NEXT WS IF NO DWT LEFT
0x23b2ec…23b480 Dummy {f00=0x0124, f01=0x0190, f02=»TROL t P LDKL A2,/FFFF-DWFBSY-DWFPLC $ P* MASK FOR BUSY AND PLC FLAGS 0 P ANS A2,DWTST,A6 RESET FLAGS X ( P CM DWTLD1,A6 RELEASE BUFFER, IF ANY | 0 P CM DWTOTQ,A6 REMOVE DWT FROM QUEUE, IF ANY P RB ST130 NEXT DWT PST140 EQU *
0x23b480…23b614 (1, 406) Dummy {f00=0x0124, f01=0x0190, f02=»ER ALREADY STARTED? | P RF(Z) ST152 NO, START TIMER " P LDKL A1,-STADLY-1 DELAY TIME @ P STR A1,A4 RESTART TIMER f P RF ST154 EXIT P* PST152 EQU * P LDR A1,A5 SAVE CWT ADDRESS P CF A15,SETIME START TIMER 4 P DATA ST
0x23b614…23b7a8 Dummy {f00=0x0124, f01=0x0190, f02=»MER EXPIRES x P* PST156 EQU * " P LDR A5,A1 RESTORE CWT ADDRESS 2 , P CM CWTTPR,A5 INDICATE NO TIMER RUNNING X P* , P* START "TEST CHANNEL UNIT" OPERATION P IM CWTCCB,A5 SET CCA BUSY " P CM CWTOPR,A5 SET PLC OPERABLE ,
0x23b7a8…23b93c Dummy {f00=0x0124, f01=0x018e, f02=»X TO CCA d , P CM CWTCCA+CCRC1B,A5 RESET DATA CHAINING P LDR A3,A5 CWT ADDRESS @ 6 P ADK A3,CWTCSD CONTROL UNIT START DESCRIPTOR ADDR ^ P INH P CF A15,PLCCIO CIO START P RF(NZ) STERR2 EXIT IF ERROR 6 P IM CWTOPR,A5 SET NOT OPERABLE U
0x23b93c…23bad0 Dummy {f00=0x0124, f01=0x0190, f02=» & P* REGISTER CONTENTS ON ENTRY: P* A1 = PLC STATUS 2 P* A5 = CWT ADDRESS L P* h PTCURST EQU * r P LDR A1,A1 OPERATION OK? P RF(NZ) STERR2 NO, EXIT P* & P* PERFORM "OPEN LINE" OPERATION P U =5 $
0x23bad0…23bc64 Dummy {f00=0x0124, f01=0x0190, f02=»,CWTLNO,A5 GET LINE NO 2 P SC A2,CWTCCA+CCRSU1,A5 SET UP LINE IN CCA =5 " P SLL A2,1 MAKE OPEN LINE PARA- T P ST A2,CWTPAR,A5 METER AREA z PST158 EQU * $ P LD A2,CWTOPP,A5 MAKE ADDRESS TO . P AD A2,CWTPAR,A5 OPEN LINE PARAMETER AREA
0x23bc64…23bdf8 Dummy {f00=0x0124, f01=0x0190, f02=»5 COMMAND AND DLS INDEX TO CCA z : P CM CWTCCA+CCRC1B,A5 RESET DATA CHAINING & MSB OF ADDR & ( P LDK A2,12 PARAMETER AREA LENGTH =1 d " P ST A2,CWTCCA+CCRLEN,A5 TO CCA P* " P CM CWTOPR,A5 SET PLC OPERABLE P CF A15,PLCCIO CIO START P R
0x23bdf8…23bf8c Dummy {f00=0x0124, f01=0x0190, f02=»N LINE b P* OPERATION IS COMPLETED. & P* REGISTER CONTENTS ON ENTRY: 2 P* A1 = PLC STATUS P* A5 = CWT ADDRESS v P* POPLRST EQU * P LDR A1,A1 OPERATION OK? P RF(NZ) STERR2 NO, EXIT P* P LD A2,CWTPNR,
0x23bf8c…23c120 Dummy {f00=0x0124, f01=0x0190, f02=»O,A5 GET LINE NO P SUK A2,4 ALL LINES OPENED ? P RB(NZ) ST157 NO, TAKE NEXT < P CM CWTLNO,A5 ` PST159 EQU * v P* . P CM CWTGR,A5 INDICATE GENERAL READ ALLOWED P* > P* PERFORM OPEN DATA LINK FOR ALL CONNECTED SECONDARIE
0x23c120…23c2b4 (1, 407) Dummy {f00=0x0125, f01=0x0190, f02=»80 EXIT IF ALL DONE ( P LD* A1,CWTINT,A5 WORK STATION TABLE 0 P CF A15,NDGEDN A7 := HIGEST DWT NUMBER ON WS H P LDR A7,A7 ANY DWT:S? | " P RB(N) ST160 NO, TAKE NEXT WS P* P CF A15,PLCCCA RESERVE CCA " P LDR A3,A6 WORK STATION NUMB
0x23c2b4…23c448 Dummy {f00=0x0125, f01=0x0190, f02=»S INDEX (WS NUMBER) TO CCA v * P ST A6,CWTCCA+CCRIDW,A5 SAVE DLS INDEX " " P LDK A2,CMDOD COMMAND OPEN DLS P " P SC A2,CWTCCA+CCRCMD,A5 TO CCA v ( P LDK A2,MAXFR MAX OUTSTANDING FRAMES , P SC A2,CWTCCA+CCRSU1,A5 TO SUBCOMMAND 1 , P CM CWTCCA+CCRC1
0x23c448…23c5dc Dummy {f00=0x0125, f01=0x0190, f02=»N l P* P* > P* ENTRY TO ODLRST IS MADE WHEN OPERATION IS COMPLETED. & P* REGISTER CONTENTS ON ENTRY: ` P* A2 = FATAL PLC STATUS P* A5 = CWT ADDRESS , P* A6 = WORK STATION NUMBER (DLS INDEX) P* PODLRST E
0x23c5dc…23c770 Dummy {f00=0x0125, f01=0x0190, f02=»RETCP FLAG "TC POWER UP" . P CF A15,NDREWS RECOVERY OF ALL DWT:S ON WS $ P RB ST160 TAKE NEXT WORK STATION R P* z P* PST180 EQU * * P* ALL DATA LINKS ARE STARTED. EXIT. P ABL PLDSP2 LOCAL DISPATCHER P* P* P
0x23c770…23c904 Dummy {f00=0x0125, f01=0x0190, f02=»************ P* LOCAL DISPATCHER * P******************** 0 P* L > P* THIS SECTION CONTAINS A DISPATCHER FOR THE PLC DRIVER. V < P* IT CAN BE CALLED EITHER FROM ANOTHER ROUTINE IN THE > P* PLC DRIVER, OR FROM A TERMINAL DEVICE DRIVER
0x23c904…23ca98 Dummy {f00=0x0125, f01=0x0190, f02=». THIS MEANS THAT SEVERAL WAITING ~ < P* PROCERSSES MAY BECOME READY FOR ACTIVATION. ONLY ONE * : P* OF THESE PROCESSES CAN BE ACTIVATED DIRECTLY. THE j > P* OTHER PROCESSES WILL BE ACTIVATED IN TURN, WHEN FIRST * P* PROCESS EXITS TO THIS DISP
0x23ca98…23cc2c Dummy {f00=0x0125, f01=0x0190, f02=»DISP ACTIVATE PROCESS OR PERFORM COMMON FUNCTION P* 8 P EJECT B P* P @ P************************************************************ Z P* P* ROUTINE NAME: P* PLDISP P* P* FUNCTION: 8 P* THIS ROUTINE LOOKS FOR W
0x23cc2c…23cdc0 Dummy {f00=0x0125, f01=0x018e, f02=» THAT b 8 P* ARE NOT EXPLICITLY REQUESTED BY USER PROCESSES, EG < P* GENERAL READ. WHEN NOTHING IS LEFT TO DO, THE ROUTINE J P* EXITS TO TOSS DISPATCHER. 8 P* TWO ENTRIES ARE PROVIDED. ONE IS USED WHEN CALLER 6 P* KNOWS OWN DWT ADDRESS, ONE W
0x23cdc0…23cf54 (1, 408) Dummy {f00=0x0125, f01=0x018e, f02=» $ P* A5 = CWT ADDRESS (IF PLDSP2) $ P* A6 = DWT ADDRESS (IF PLDISP) 0 P* A1-A8 ON A15 STACK X P* t P* OUTPUT: ~ P* - P* @ P************************************************************ P* PPLDISP EQU * P
0x23cf54…23d0e8 Dummy {f00=0x0125, f01=0x0190, f02=» PPLDSP2 EQU * P* P* " PDP100 EQU * , P ENB @ P* HANDLE CHARACTER INPUT L * P LD A4,CWTBUF,A5 INPUT BUFFER WAITING? p P RF(Z) DP200 NO, CONTINUE P LD A6,BUFDWT,A4 DWT ADDRESS P* " P CF A15,PLGECH A2 := CHARA
0x23d0e8…23d27c Dummy {f00=0x0125, f01=0x0190, f02=»NPUT REQUESTED? 0 P ABL(NZ) INPRST YES, RETURN TO DEVICE DRIVER P* L " P LD A1,DWTADR,A6 ADDRESS BLOCK V . P LD A1,INTADR,A1 INTERRUPT ENTRY DEFINED? | , P ABR(NZ) A1 YES, GO TO INTERRUPT HANDLER P* PDP110 EQU * 0 P CW A4,DWTLD
0x23d27c…23d410 Dummy {f00=0x0125, f01=0x0190, f02=»UF,A5 NO BUFFER WAITING " P CF A15,PLRLBU RELEASE BUFFER P* F 8 P* CHECK IF LEVEL 3 RECIEVE READY SHOULD BE SENT P 0 P CF A15,GETIFR A2 := NR OF FRAMES NOT ACK:ED P SUK A2,6 TIME TO SEND RR? P ABL(NN) SENDRR YES P* P
0x23d410…23d5a4 Dummy {f00=0x0125, f01=0x018e, f02=»PLC POWER UP PENDING? P ABL(NZ) TDISP YES, EXIT P* > P* H PDP300 EQU * R * P* HANDLE ABORT OF ONE WORK STATION f ( P LD A6,CWTABW,A5 WS TO ABORT, IF ANY * P ABL(NZ) ABTHAN DO ABORT, IF REQUESTED P* P* PDP400
0x23d5a4…23d738 Dummy {f00=0x0125, f01=0x0190, f02=» P LD A1,CWTCCB,A5 CCA FREE? P RF(NZ) DP500 NO, CONTINUE & P IM CWTCCB,A5 SET CCA BUSY H ( P ABL CCARST ACTIVATE WAITING PROCESS j P* P* PDP500 EQU * P* CHECK BUFFER QUEUES 4 P LD A6,CWTSBQ,A5 ANYONE IN SHORT BUFFERS Q
0x23d738…23d8cc Dummy {f00=0x0125, f01=0x0190, f02=»5,PLGTBU A4 := BUFFER ADDRESS $ P RF(Z) DP510 NO BUFFER AVAILABLE & , P LDK A7,CWTSBQ OFFSET TO CWT QUEUE HEAD N ( P RF DP520 COMMON PART FOR SHORT/LONG ~ P* PDP510 EQU * 2 P LD A6,CWTLBQ,A5 ANYONE IN LONG BUFFERS QUEUE? P RF(Z) DP6
0x23d8cc…23da60 Dummy {f00=0x0125, f01=0x0190, f02=»ESS p 0 P RF(Z) DP600 CONTINUE IF NO BUFFER AVAILABLE 4 P LDK A7,CWTLBQ OFFSET TO LONG BUFFERS QUEUE HEAD @ P* x PDP520 EQU * & P* SHORT OR LONG BUFFER FOUND " P LDR A2,A4 SAVE BUFFER ADDRESS P LDR A4,A6 DWT QUEUE LINK P
0x23da60…23dbf4 (1, 409) Dummy {f00=0x0125, f01=0x0190, f02=» BUFFER ADDRESS ~ P LDK A1,0 RET CODE := OK * P ABL BUFRST RETURN TO ROUTINE WAITING 8 P* f P* p PDP600 EQU * z 2 P* CHECK IF GENERAL READ SHOULD BE PERFORMED * P LD A1,CWTGR,A5 GENERAL READ ALLOWED? P RF(NZ) DP800 NO, EXIT
0x23dbf4…23dd88 Dummy {f00=0x0125, f01=0x0190, f02=»DRESS r . P ABL(NZ) GREAD PERFORM GR IF BUFFER FOUND P* @ P* J PDP800 EQU * T 0 P* NOTHING MORE TO DO. EXIT TO DISPATCHER h P ABL TDISP TOSS DISPATCHER P* P EJECT P* P************ P* ROUTINES * P
0x23dd88…23df1c Dummy {f00=0x0125, f01=0x0190, f02=» "NAME" INSTRUCTION. h : P* REGISTER INTERFACE IS DESCRIBED FOR EACH ROUTINE. < P* WHEN A ROUTINE HAS PERFORMED THE REQUESTED FUNCTION, . P* IT WILL EXIT TO THE LOCAL DISPATCHER. P* 0 P* ROUTINES IN ORDER OF APPEARANCE IN CODE:
0x23df1c…23e0b0 Dummy {f00=0x0125, f01=0x0190, f02=»E WORK STATION r 0 P* SENDRR SEND LEVEL 3 RECIEVE READY MESSAGE P* GREAD PERFORM GENERAL READ J P* n P EJECT x P* @ P************************************************************ P* P* ROUTINE NAME: P* ABTHAN P*
0x23e0b0…23e244 Dummy {f00=0x0125, f01=0x0190, f02=»LEVEL 3 ACK OR WAITING IN CCA OR BUFFER QUEUES 2 P* WILL BE ABORTED. ONE CALL IS NEEDED FOR EACH 6 P* REQUEST TO BE ABORTED. l P* P* CALL: P* ABL ABTHAN P* P* INPUT: P* A5 = CWT ADDRESS P* A6 = WORK STATION NUM
0x23e244…23e3d8 Dummy {f00=0x0125, f01=0x0190, f02=» = DWT ADDRESS P* @ P************************************************************ " P* f PABTHAN EQU * p " P LDR A3,A6 WORK STATION NUMBER P SLA A3,1 MAKE INDEX P ADR A3,A5 ADD CWT ADDRESS 2 P ADK A3,CWTWSS A3 := ADDRESS OF
0x23e3d8…23e56c Dummy {f00=0x0125, f01=0x0190, f02=»F A15,NDGEDN A7 := HIGEST DWT NR ON WS P LDK A1,0 . " P LCR A1,A3 WORK STATION STATUS @ P* f P ADK A7,1 PREPARE FOR SUK p PAH100 EQU * P SUK A7,1 NEXT DWT " P RF(N) AH110 EXIT IF ALL DONE P LDR A6,A8 WS NUMBER $ P CF A1
0x23e56c…23e700 Dummy {f00=0x0125, f01=0x0190, f02=»STATUS | P LDR A3,A2 , P LDKL A4,/FFFF-DWFPLC MASK FOR PLC FLAGS P ANS A4,DWTST,A6 RESET FLAGS P 2 P ANK A2,DWFAK3 IS DWT WAITING FOR LEVEL 3 ACK? t P RF(Z) AH105 NO, CONTINUE 0 P ANK A3,DWFSAC ALWAYS WAIT FOR LEVEL 3 ACK? * P ABL(NZ)
0x23e700…23e894 (1, 410) Dummy {f00=0x0125, f01=0x0190, f02=»UEUE ELEMENT POINTER z " P LDR A2,A7 SAVE DEVICE ADDRESS P LDR A3,A1 SAVE RETURN CODE B P LDR A7,A5 CWT ADDRESS f " P ADK A7,CWTCCQ CCA QUEUE HEAD 2 P CF A15,LNKOUT LINK MONITOR BLOCK OUT OF QUEUE P LDR A7,A7 FOUND? & P ABL(NZ) CCAAB
0x23e894…23ea28 Dummy {f00=0x0125, f01=0x0190, f02=»OVE FROM BUFFER QUEUE ~ P LDR A2,A2 FOUND IN QUEUE? * P ABL(NZ) BUFRST YES, TERMINATE REQUEST @ P RB AH100 NEXT DWT n P* PAH110 EQU * B P* ALL PROCESSES WAITING FOR ACK 3 OR IN QUEUES ARE ABORTED P CM CWTABW,A5 NO MORE ABORT
0x23ea28…23ebbc Dummy {f00=0x0125, f01=0x0190, f02=»** V P* P* ROUTINE NAME: P* PLREWS , P* < P* FUNCTION: F 4 P* THIS ROUTINE WILL HANDLE RECOVERY OF ONE WORK Z 4 P* STATION. ACTUAL CALL TO TERMINAL DEVICE DRIVER 0 P* RECOVERY ROUTINES ARE MADE THROUGH NDREWS. P* P
0x23ebbc…23ed50 Dummy {f00=0x0125, f01=0x0190, f02=»* OUTPUT: ( P* AT ENTRY TO DEVICE RECOVERY: P* SEE NDREWS > P* R @ P************************************************************ P* PPLREWS EQU * " P LDR A3,A6 WORK STATION NUMBER P SLA A3,1 MAKE INDEX P ADR A3,
0x23ed50…23eee4 Dummy {f00=0x0125, f01=0x018e, f02=» 0 P ANRS A2,A3 INDICATE WS WORKING AFTER ERROR P LCR A1,A3 WS STATUS 8 P LDK A2,0 T P SCR A2,A3 RESET STATUS f , P LDK A4,RESECP ASSUME SECONDARY POWER UP P ANK A1,NOTOPR WAS IT? P RF(NZ) PR110 YES " P LDK A4,RELINE NO, LINK ER
0x23eee4…23f078 Dummy {f00=0x0125, f01=0x0190, f02=» P ABL PLDSP2 LOCAL DISPATCHER P* , P EJECT 6 P* D @ P************************************************************ N P* P* ROUTINE NAME: P* SENDRR P* P* FUNCTION: 6 P* THIS ROUTINE WILL SEND ONE LEVEL 3 R
0x23f078…23f20c Dummy {f00=0x0125, f01=0x0190, f02=»A5 = CWT ADDRESS P* A6 = DWT ADDRESS P* 6 P* OUTPUT: @ P* - R P* ^ @ P************************************************************ h P* PSENDRR EQU * P CF A15,PLCCCA RESERVE CCA . P CF A15,GETBLK GET MONITOR B
0x23f20c…23f3a0 Dummy {f00=0x0125, f01=0x0190, f02=» MONITOR BLOCK IN QUEUE ~ & P ADK A4,2 A4 := START OF USER PART 6 P CF A15,WRADR2 WRITE LINE ADDRESS IN CCA & BUFFER J , P LDK A2,CMDSW COMMAND := STANDARD WRITE " P SC A2,CWTCCA+CCRCMD,A5 TO CCA . P LDK A2,TYRR MESSAGE TYPE := RECIEVE READY
0x23f3a0…23f534 (1, 411) Dummy {f00=0x0126, f01=0x0190, f02=» CCA h < P CM CWTCCA+CCRC1B,A5 RESET DATA CHAIN & MSB BUFFER ADDR 2 P ST A4,CWTCCA+CCRBUF,A5 BUFFER ADDRESS TO CCA L P* & P CF A15,GETLCS A1 := STATUS & INH P RF(Z) RR100 CONTINUE IF OK P CM CWTCCB,A5 SET CCA FREE P RF RR110 SK
0x23f534…23f6c8 Dummy {f00=0x0126, f01=0x0190, f02=»A4 TO BUFFER $ P CF A15,PLCCIO EXECUTE CIO START P RF(Z) RR120 EXIT IF OK < PRR110 EQU * , P SUK A4,2 START ADDRESS OF MONITOR BLOCK p 4 P CF A15,LNKOUT REMOVE FROM QUEUE. A7 ALREADY SET ( P CF A15,FREBLK RETURN MONITOR BLOCK P*
0x23f6c8…23f85c Dummy {f00=0x0126, f01=0x0190, f02=»******************** h P* P* ROUTINE NAME: & P* GREAD > P* N P* FUNCTION: X 0 P* THIS ROUTINE WILL PERFORM ONE GENERAL READ l P* OPERATION TO THE PLC. P* P* CALL: P* ABL GREAD P* P* INPUT: P
0x23f85c…23f9f0 Dummy {f00=0x0126, f01=0x018e, f02=»******************************** t P* ( PGREAD EQU * 2 * P LDR A6,A4 PARAMETER := BUFFER ADDRESS F " P CF A15,PLCCCA RESERVE PLC CCA t P* SET CCA PARAMETERS 8 P CM CWTCCA+CCRC1B,A5 CLEAR DATA CHAINING & MSB ADDR * P ST A6,CWTCCA+CC
0x23f9f0…23fb84 Dummy {f00=0x0126, f01=0x0190, f02=» l 0 P ST A2,CWTCCA+CCRDLS,A5 DLS INDEX & COMMAND $ P CF A15,PLCCIO EXECUTE CIO START < & P ABL PLDSP2 CHECK WHAT TO DO NEXT d P* P EJECT P* P*************** P* SUBROUTINES * P*************** P* @ P* TH
0x23fb84…23fd18 Dummy {f00=0x0126, f01=0x0190, f02=» REGISTER INTERFACE IS DESCRIBED FOR EACH < P* ROUTINE. ONLY REGISTERS A1-A8 & PSW ARE CONSIDERED. 2 < P* REGISTERS NOT MENTIONED UNDER "OUTPUT" ARE UNCHANGED r P* FROM CALL. < P* THE ROUTINES ARE OF TWO TYPES, ASYNCHRONOUS ROUTINES < P
0x23fd18…23feac Dummy {f00=0x0126, f01=0x018e, f02=»IT TO THE LOCAL DISPATCHER AND/OR TOSS DISPATCHER. : P* THIS MEANS THAT THE A15 STACK AT CALL MUST CONTAIN : > P* INTERRUPT RETURN, A1-A8 AND NOTHING ELSE. COMPUTATION x > P* ROUTINES HAVE NO SUCH LIMITATIONS, AS THEY WILL RETURN < P* IMMEDIAT
0x23feac…240040 Dummy {f00=0x0126, f01=0x0190, f02=» P* P* NAME FUNCTION P* & P* ASYNCHRONOUS ROUTINES 0 $ P* PLCCCA RESERVE CCA FOR PROCESS T P* PLCCIO EXECUTE CIO START | P* P* COMPUTATION ROUTINES 2 P* PLCNOP SET FLAG INDICATING PLC NOT OPERABLE " P* GETD
0x240040…2401d4 (1, 412) Dummy {f00=0x0126, f01=0x0190, f02=»OW CONTROL FOR INPUT ~ , P* FLWOUT HANDLE FLOW CONTROL FOR OUTPUT 2 P* WRADDR WRITE LINE ADDRESS IN CCA AND BUFFER L & P* STAHAN PLC RETURN STATUS HANDLER * P* GETSTA GET STATUS FOR I/O CONNECTION 2 P* PLGTBU ALLOCATE BUFFER AND SET TO PLC FORMAT
0x2401d4…240368 Dummy {f00=0x0126, f01=0x0190, f02=»F INPUT MESSAGE z . P* OUTBUQ REMOVE ELEMENT FROM BUFFER QUEUE ( P* LNKFST LINK ELEMENT FIRST IN QUEUE J ( P* LNKLST LINK ELEMENT LAST IN QUEUE v & P* LNKOUT LINK ELEMENT OUT OF QUEUE P* P EJECT P* @ P**************************
0x240368…2404fc Dummy {f00=0x0126, f01=0x018e, f02=» IS CALLED WHEN A PROCESS WANTS TO 4 P* USE THE PLC COMMAND COMMUNICATION AREA (CCA). * 4 P* IF THE AREA IS FREE, THE ROUTINE SETS IT BUSY b 4 P* AND RETURNS. IF THE AREA IS BUSY, THE CALLING 4 P* PROCESS IS PUT IN A QUEUE, AND EXIT IS MADE TO
0x2404fc…240690 Dummy {f00=0x0126, f01=0x0190, f02=» P* CALL: ! P* CF A15,PLCCCA ! P* CF A15,PLCCCS ! , P* ! D P* INPUT: ! N 8 P* A3 = QUEUE ELEMENT ADDRESS SAVE AREA (IF PLCCCS) ! ^ P* A5 = CWT ADDRESS ! P* A6 = PARAMETER ! P* A1-A8 ON A15 STACK ! P* ! P* OUTPUT: ! 2 P
0x240690…240824 Dummy {f00=0x0126, f01=0x0190, f02=»INHIBITED ! P* " @ P************************************************************ " P* " ` P EJECT " j P* " x PPLCCCA EQU * " . P LDK A3,0 DON'T SAVE QUEUE ELEMENT ADDRESS " P* " PPLCCCS EQU * " P INH " , P LD A1,CWTCCQ,A5 ANYON
0x240824…2409b8 Dummy {f00=0x0126, f01=0x0190, f02=» P* # P* PLC FREE # P IM CWTCCB,A5 SET PLC BUSY # $ ( P ADKL A15,4 ADJUST STACK FOR RETURN # F P LDK A1,0 RETURN CODE := OK # r $ P ABR* A15 RETURN IN INHIBIT MODE # P* # P* # PCA100 EQU * # ( P* PLC BUSY. PUT REQUEST IN QUEU
0x2409b8…240b4c Dummy {f00=0x0126, f01=0x0190, f02=»ITOR BLOCK AND SAVE A1-A2 # z P LDR A3,A3 SAVE POINTER? $ " P RF(Z) CA110 NO, CONTINUE $ B * P STR A4,A3 SAVE QUEUE ELEMENT ADDRESS $ d PCA110 EQU * $ P LDR A7,A5 CWT ADDRESS $ & P ADK A7,CWTCCQ PLC BUSY QUEUE HEAD $ * P CF A15,LNKLST PUT BLOCK L
0x240b4c…240ce0 Dummy {f00=0x0126, f01=0x0190, f02=»INCREMENT QUEUE STATISTICS COUNTER $ P XIF % * P ABL PLDSP2 LOCAL DISPATCHER % 6 P* % Z P* % d 2 P* RETURN IS MADE HERE WHEN THE CCA IS FREE. % n 6 P* (AT A RELEASE INTERRUPT OR FROM DISPATCHER.) % P* REGISTERS ON ENTRY: % " P* A4 =
0x240ce0…240e74 (1, 413) Dummy {f00=0x0126, f01=0x0190, f02=»7,CWTCCQ CCA QUEUE HEAD % , P CF A15,LNKOUT REMOVE PROCESS FROM QUEUE & P LDK A3,0 RETURN CODE := OK & P P* & t P* & ~ < P* ENTRY IS MADE HERE WHEN A REQUEST SHOULD BE ABORTED & P* DUE TO I/O ERROR. & P* REGISTERS ON ENTRY: & P
0x240e74…241008 Dummy {f00=0x0126, f01=0x0190, f02=» LDR A7,A3 SAVE RETURN CODE & 4 P CF A15,FREBLK RETURN MONITOR BLOCK. LOAD A1-A2 ' $ P LDR A6,A1 PARAMETER ' P LDR A1,A7 A1 := RETURN CODE ' x P ABR A2 RETURN ' P* ' P EJECT ' P* ' @ P****************************************************
0x241008…24119c Dummy {f00=0x0126, f01=0x0190, f02=»USED. IF IT CAN, ' h 4 P* THE ROUTINE EXECUTES A CIO START INSTRUCTION. ( 4 P* IF THE PLC IS NOT OPERABLE DUE TO TC POWER UP, ( P < P* THE ROUTINE WILL EXIT TO TOSS DISPATCHER. IN ALL OTHER ( < P* CASES, IT WILL RETURN TO CALLING PROGRAM WITH A RETURN ( P
0x24119c…241330 Dummy {f00=0x0126, f01=0x018e, f02=»TACK ( P* ) P* OUTPUT: ) P* A1 = RETURN CODE ) ( P* 0 IF OK ) D P* NOT 0 ELSE ) X P* A2 = CHANGED ) n P* CR = CONTENTS OF A1 ) P* INTERR. INHIBITED ) P* ) @ P************************************************************ )
0x241330…2414c4 Dummy {f00=0x0126, f01=0x018e, f02=» ) P* * ( P LD A1,PFPOST POWER UP TASK PENDING? * ( P OR A1,PLCPFP PLC POWER UP PENDING? * > . P ABL(NZ) TDISP YES, GO TO TOSS DISPATCHER * j " P LD A1,CWTOPR,A5 PLC OPERABLE? * P RF(NZ) CS100 NO, HANDLE * P IFF UTTEST=0 * P CF A15,LOGCOM L
0x2414c4…241658 Dummy {f00=0x0126, f01=0x0190, f02=» * t P ABR A2 + PCS090 EQU * + P* + , * P CF A15,PLCNOP ERROR. SET NOT OPERABLE + 6 PCS100 EQU * + d . P LDK A1,NOTOPR RETURN CODE := NOT OPERABLE + x P CM CWTCCB,A5 SET CCA FREE + P LDR A1,A1 SET CR + P ABR A2 RETURN + P* + P E
0x241658…2417ec Dummy {f00=0x0126, f01=0x018e, f02=» P* , P* FUNCTION: , 8 P* THIS ROUTINE SETS A FLAG TO INDICATE THAT THE PLC , " P* IS "NOT OPERABLE". , ^ P* , z P* CALL: , P* CF A15,PLCNOP , P* , P* INPUT: , P* A5 = CWT ADDRESS , P* , P* OUTPUT: , P* - ,
0x2417ec…241980 Dummy {f00=0x0126, f01=0x0190, f02=» $ P LD A1,CWTPLS,A5 GET PLC STATUS - P RF(NZ) PN100 - , $ P LDKL A1,-1 SET DUMMY ERROR CODE - B PPN100 EQU * - j * P ST A1,CWTOPR,A5 SET PLC NOT OPERABLE - ~ P* - P IFF UTTEST=0 - P* - P EJECT - P* - P LD A1,UTTST TRAP CONTROL
0x241980…241b14 (1, 414) Dummy {f00=0x0126, f01=0x018e, f02=»ATA /6300 TRAP TO BUGGER - PPN120 EQU * . P* . 4 P XIF . > P* . J P LDR* A1,A15 POP A1 . T P RTN A15 . p P EJECT . P* . @ P************************************************************ . P* . P* ROUTINE NAME: . P* GETDWT .
0x241b14…241ca8 Dummy {f00=0x0126, f01=0x0190, f02=» P* CALL: / P* CF A15,GETDWT / P* / , P* INPUT: / 6 P* A5 = CWT ADDRESS / F P* A6 = DLS INDEX / b P* A7 = DEVICE ADDRESS / | P* / P* OUTPUT: / " P* A6 = DWT ADDRESS IF FOUND, / P* ELSE 0 / P* CR = CONTENTS OF A6 /
0x241ca8…241e3c Dummy {f00=0x0126, f01=0x0190, f02=» P INH 0 P STR A1,A15 PUSH A1 0 ( P LD* A1,CWTINT,A5 WORK STATION TABLE 0 , $ P CF A15,NDGEDW A6 := DWT ADDRESS 0 X P LDR* A1,A15 POP A1 0 ( P ADKL A15,4 ADJUST STACK FOR RETURN 0 , P ANKL A6,/FFFE SET CR & SKIP ODD ADDRESS 0 P ABR* A15 RETURN
0x241e3c…241fd0 Dummy {f00=0x0126, f01=0x0190, f02=» 0 P* GETCWT 1 P* 1 P* FUNCTION: 1 " 2 P* THIS ROUTINE CALCULATES THE CWT ADDRESS FOR 1 6 * P* THE PLC CONTROLLING CALLING DEVICE. 1 l P* 1 P* CALL: 1 P* CF A15,GETCWT 1 P* 1 P* INPUT: 1 P* A6 = DWT ADDRESS 1 P* 1
0x241fd0…242164 Dummy {f00=0x0126, f01=0x018e, f02=» P* 2 @ P************************************************************ 2 P* 2 R PGETCWT EQU * 2 ( P LD A5,DWTCHP,A6 CHANNEL PARAMETERS 2 p , P ANK A5,MASKPL CLEAN CHANNEL UNIT INDEX 2 P SLL A5,1 MAKE INDEX 2 P IFF PLCNRR=0 2 P IFF PLCNR
0x242164…2422f8 Dummy {f00=0x0126, f01=0x018e, f02=» & P ADK A5,8 ADJUST INDEX FOR REMOTE 3 P XIF 3 . , PGET010 LD A5,TABCWT,A5 A5 := CWT ADDRESS 3 : P* 3 j P IFT CPU852=1 3 t P ADKL A15,2 SKIP PSW 3 P LDR* P,A15 RETURN 3 P XIF 3 P IFF CPU852=1 3 P RTN A15 3 P XIF 3 P* 3 P
0x2422f8…24248c Dummy {f00=0x0126, f01=0x0190, f02=» 3 P* 4 P* FUNCTION: 4 8 P* THIS ROUTINE CALCULATES THE NUMBER OF OUTSTANDING 4 & 6 P* FRAMES, IE FRAMES THAT HAVE BEEN TRANSFERRED BUT 4 b 0 P* NOT ACKNOWLEDGED ON LEVEL 3, FOR A LOGICAL 4 P* CHANNEL. 4 4 P* GETIFR GETS NUMBER OF FRAMES RECIEVE
0x24248c…242620 Dummy {f00=0x0126, f01=0x0190, f02=» 4 P* 5 P* INPUT: 5 P* A6 = DWT ADDRESS 5 " P* 5 > P* OUTPUT: 5 H P* A1 = CHANGED 5 Z ( P* A2 = NUMBER OF OUTSTANDING FRAMES 5 r P* CR = CHANGED 5 P* 5 @ P************************************************************ 5 P* 5
0x242620…2427b4 (1, 415) Dummy {f00=0x0127, f01=0x0190, f02=» * P SRL A1,5 BITS 13-15 := LAST SENT P(R) 6 P RF GF100 TO COMMON PART 6 2 P* 6 R P EJECT 6 P* 6 j PGETOFR EQU * 6 t * P LD A2,DWTLD2,A6 FLOW CONTROL COUNTERS 6 P LDR A1,A2 6 . P SRL A2,1 BITS 13-15 := NEXT P(S) TO SEND 6 . P SLC A1,3 BITS
0x2427b4…242948 Dummy {f00=0x0127, f01=0x0190, f02=»N & MODULO 8 6 P* 7 P IFT CPU852=1 7 P ADKL A15,2 SKIP PSW 7 4 P LDR* P,A15 RETURN 7 P P XIF 7 j P* 7 v P IFF CPU852=1 7 P RTN A15 7 P XIF 7 P* 7 P EJECT 7 P* 7 @ P****************************************************
0x242948…242adc Dummy {f00=0x0127, f01=0x0190, f02=»INPUT. IT FETCHES 7 h 8 P* FLOW CONTROL INFORMATION FROM MESSAGE AND UPDATES 8 P* COUNTERS IN DWT. 8 V 2 P* FWIPR IS FOR MESSAGES ONLY CONTAINING P(R). 8 p 6 P* FWIPSR IS FOR MESSAGES CONTAINING P(S) AND P(R). 8 P* NO ERROR CHECK IS MADE. 8 P* 8
0x242adc…242c70 Dummy {f00=0x0127, f01=0x0190, f02=»DRESS 8 P* 9 P* OUTPUT: 9 P* A1 = CHANGED 9 * P* CR = CHANGED 9 B P* 9 Z @ P************************************************************ 9 d P* 9 PFWIPR EQU * 9 P STR A2,A15 PUSH A2 9 , P LC A1,X25FLW,A4 FLOW CONTROL FROM INP
0x242c70…242e04 Dummy {f00=0x0127, f01=0x0190, f02=» ORR A1,A2 KEEP OLD P(S) 9 P LDR* A2,A15 POP A2 : P RF FI100 COMMON ENDING : < P* : P* : f PFWIPSR EQU * : p , P LC A1,X25FLW,A4 FLOW CONTROL FROM INPUT : P ANK A1,/EE CLEAN : 4 P ADK A1,/02 BITS 12-14 := NEXT EXPECTED P(S) IN : P A
0x242e04…242f98 Dummy {f00=0x0127, f01=0x0190, f02=» : P ADKL A15,2 SKIP PSW ; P LDR* P,A15 RETURN ; $ P XIF ; > P* ; J P IFF CPU852=1 ; T P RTN A15 ; j P XIF ; z P* ; P EJECT ; P* ; @ P************************************************************ ; P* ; P* ROUTINE NAME: ;
0x242f98…24312c Dummy {f00=0x0127, f01=0x0190, f02=» FETCHED FROM DWT, AND COUNTERS ; x P* IN DWT ARE UPDATED. < ( 2 P* FWOPR IS FOR MESSAGES CONTAINING ONLY P(R). < F 6 P* FWOPSR IS FOR MESSAGES CONTAINING P(S) AND P(R). < | P* < P* CALL: < P* CF A15,FWOPR < P* CF A15,FWOPSR < P* < P
0x24312c…2432c0 Dummy {f00=0x0127, f01=0x0190, f02=»10 P(R) TO SEND < P* BIT 11 ZERO = * P* BITS 12-14 P(S) TO SEND IF FWOPSR = 0 P* ELSE ZERO = ^ P* BIT 15 ZERO = P* CR = CHANGED = P* = @ P************************************************************ = P* = P
0x2432c0…243454 (1, 416) Dummy {f00=0x0127, f01=0x0190, f02=»* (= P(R) TO SEND) = P ANK A2,/E0 CLEAN > . P ANK A1,/0E BITS 12-14 = NEXT P(S) TO SEND > 8 & P ORR A1,A2 P(S) := SAME AS BEFORE > j P RF FO100 COMMON ENDING > P* > P* > PFWOPSR EQU * > * P LD A2,DWTLD2,A6 FLOW CONTROL COUNTERS >
0x243454…2435e8 Dummy {f00=0x0127, f01=0x0190, f02=»/0E BITS 12-14 = NEXT P(S) TO SEND > $ P ORR A2,A1 COUNTERS FOR MESSAGE ? * P LDR A1,A2 ? R & P ADK A1,/02 INCREMENT P(S) TO SEND ? d P ANK A1,/EE MODULO 8 ? P* ? P* ? PFO100 EQU * ? 2 P SC A1,DWTLD2+1,A6 SAVE FLOW CONTROL COUNTERS ? P
0x2435e8…24377c Dummy {f00=0x0127, f01=0x0190, f02=»15 ? P XIF @ P EJECT @ P* @ $ @ P************************************************************ @ . P* @ r P* ROUTINE NAME: @ | P* WRADDR @ P* @ P* FUNCTION: @ 0 P* THIS ROUTINE WRITES THE LINE ADDRESS IN A @ 6 P* MESSAGE. THE ADD
0x24377c…243910 Dummy {f00=0x0127, f01=0x0190, f02=»R2 SETS @ f & P* GROUP=0 INDICATING FLOW CONTROL. A P* A : P* CALL: A D P* CF A15,WRADR1 A T P* CF A15,WRADR2 A l P* A P* INPUT: A P* A4 = BUFFER ADDRESS A P* A5 = CWT ADDRESS A P* A6 = DWT ADDRESS A P* A P* OUTPUT:
0x243910…243aa4 Dummy {f00=0x0127, f01=0x0190, f02=» A PWRADR1 EQU * B P LDK A2,/11 GROUP NUMBER 1 B P RF WA100 TO COMMON PART B > P* B ^ P EJECT B h P* B v PWRADR2 EQU * B P LDK A2,/10 GROUP NUMBER 0 B P* B P* B PWA100 EQU * B , P SC A2,X25LGN,A4 GROUP NUMBER TO BUFFER B
0x243aa4…243c38 Dummy {f00=0x0127, f01=0x0190, f02=»CP2+1,A6 B ( P ANK A2,MASKLC CLEAN DEVICE ADDRESS C P SC A2,X25LCN,A4 TO BUFFER C < P* C ^ P IFT CPU852=1 C h P ADKL A15,2 SKIP PSW C ~ P LDR* P,A15 RETURN C P XIF C P* C P IFF CPU852=1 C P RTN A15 C P XIF C P* C P E
0x243c38…243dcc Dummy {f00=0x0127, f01=0x0190, f02=» P* D P* FUNCTION: D 2 P* THIS ROUTINE HANDLES PLC STATUS WORD FOR ONE D " 4 P* WORK STATION. IF "NO CONNECTION", "LINK RESET" D X 2 P* OR "DCE NOT OPERABLE" IS INDICATED, AN ERROR D P* CODE WILL BE D 4 P* SET IN THE WORK STATION STATUS WORD (CWTWS
0x243dcc…243f60 Dummy {f00=0x0127, f01=0x0190, f02=» = PLC STATUS D P* A2 = WORK STATION NUMBER E P* A5 = CWT ADDRESS E : P* E V P* OUTPUT: E ` P* A1 = DEVICE RETURN CODE E r P* CR = CHANGED E P* E @ P************************************************************ E P* E PSTAH
0x243f60…2440f4 (1, 417) Dummy {f00=0x0127, f01=0x0190, f02=» E P EJECT F P* F ( P LDK A1,NOTOPR ASSUME NO CONNECTION F " P ANKL A3,STADNO+STANOC IS IT? F L P RF(NZ) SH100 YES, CONTINUE F r " P LDK A1,LINERR NO, LINK ERROR F PSH100 EQU * F " P LDR A3,A2 WORK STATION NUMBER F P SLA A3,1 MAKE IND
0x2440f4…244288 Dummy {f00=0x0127, f01=0x0190, f02=» A4,WSFERR WORK STATION ERROR F " P ANR* A4,A3 ALREADY DETECTED? G & P RF(NZ) SH110 YES, RETURN G L P LDK A4,WSFERR G n " P ORRS A4,A3 SET ERROR DETECTED G 0 P ST A2,CWTABW,A5 INDICATE ABORT DWT:S FOR WS G P* G PSH110 EQU * G P LDR* A4,A15
0x244288…24441c Dummy {f00=0x0127, f01=0x0190, f02=»RETURN G P XIF H P IFF CPU852=1 H P RTN A15 H 0 P XIF H @ P* H L P EJECT H V P* H d @ P************************************************************ H n P* H P* ROUTINE NAME: H P* GETSTA H P* H P* FUNCTION: H 0 P* THIS
0x24441c…2445b0 Dummy {f00=0x0127, f01=0x0190, f02=»NECTION. H ~ 0 P* GETLCS WILL CHECK BOTH LOGICAL CHANNEL AND I P* WORK STATION STATUS. I D P* I b P* CALL: I l P* CF A15,GETLCS I | P* CF A15,GETWSS I P* I P* INPUT: I P* A5 = CWT ADDRESS I P* A6 = DWT ADDRESS I P* I P
0x2445b0…244744 Dummy {f00=0x0127, f01=0x0190, f02=»************************************** I z P* J . PGETLCS EQU * J 8 P INH J L P STR A3,A15 PUSH A3 J X P* J t * P LDK A1,LINERR SET RETURN CODE IN CASE J ~ P LD A3,DWTST,A6 DWT STATUS J * P ANK A3,DWFRES RESET PACKET RECIEVED? J 0 P RF(NZ) LS11
0x244744…2448d8 Dummy {f00=0x0127, f01=0x0190, f02=»3,A15 PUSH A3 J P* K P* K PLS100 EQU * K * P LC A3,DWTCP2,A6 WS NUMBER K > P ANK A3,MASKWS CLEAN K ` P SLA A3,1 MAKE INDEX K | P ADR A3,A5 CWT ADDRESS K P LC A1,CWTWSS,A3 WS STATUS K P* K P* K PLS110 EQU * K P LDR* A3
0x2448d8…244a6c Dummy {f00=0x0127, f01=0x018e, f02=»CT K P* L @ P************************************************************ L P* L X P* ROUTINE NAME: L b P* PLGTBU L z P* L P* FUNCTION: L 8 P* THIS ROUTINE WILL ALLOCATE A BUFFER AND FORMAT IT L 2 P* ACCORDING TO THE FORMAT USED BY TH
0x244a6c…244c00 Dummy {f00=0x0127, f01=0x018e, f02=» P* OUTPUT: M * P* A2 = LENGTH OF USER PART OF BUFFER M 2 P* A4 = START OF USER PART OF BUFFER (IF ANY) M D & P* CR = NOT 0 IF BUFFER ALLOCATED M z P* 0 IF NO BUFFER ALLOCATED M P* INTERR. INHIBITED M P* M @ P**************************
0x244c00…244d94 (1, 418) Dummy {f00=0x0127, f01=0x0190, f02=» M n $ P CF A15,GETBUF A4 := BUFFER. INH N " P ABR(Z) A2 RETURN IF NO BUFFER N 0 P* N V $ P ST A2,0,A15 SAVE RETURN ADDRESS N ` & P ADK A4,BUFHLN START OF USER PART N , P ST A7,BUFLNK,A4 SAVE POOLBLOCK ADDRESS N P LD A2,POBBUS,A7 BUFFER SIZE N , P S
0x244d94…244f28 Dummy {f00=0x0127, f01=0x0190, f02=»100 EQU * N ( P ST A2,BUFLEN,A4 USER BUFFER LENGTH O P ABR* A15 RETURN O > P* O V P EJECT O ` P* O n @ P************************************************************ O x P* O P* ROUTINE NAME: O P* PLRLBU O P* O P* FUNCTION: O
0x244f28…2450bc Dummy {f00=0x0127, f01=0x0190, f02=» O P* P P* INPUT: P P* A4 = BUFFER ADDRESS P " P* P @ P* OUTPUT: P J P* A4 = CHANGED P P* CR = CHANGED P t " P* INTERR. INHIBITED IF CPU 852 P P* P @ P************************************************************ P P* P
0x2450bc…245250 Dummy {f00=0x0127, f01=0x018e, f02=»R P d ( P CF A15,RELBUF RELEASE BUFFER & INH Q P LDR* A7,A15 POP A7 Q 6 P* Q R P IFT CPU852=1 Q P ADKL A15,2 SKIP PSW Q r P LDR* P,A15 RETURN Q P XIF Q P IFF CPU852=1 Q P RTN A15 Q P XIF Q P EJECT Q P* Q @ P**********
0x245250…2453e4 Dummy {f00=0x0127, f01=0x0190, f02=» 0 P* THESE ROUTINES ARE USED TO GET A CHARACTER R 4 P* FROM A BUFFER OR PUT A CHARACTER IN A BUFFER. R 8 4 P* THE BUFFER SHOULD HAVE A HEADER OF THE NORMAL R p . P* PLC FORMAT (SE "BUFFER LAYOUT" CONSTANT R P* DEFINITION). R P* R P* CALL: R
0x2453e4…245578 Dummy {f00=0x0127, f01=0x0190, f02=» BITS 8-15 CHARACTER R P* A4 = BUFFER ADDRESS S P* S : P* OUTPUT: S D P* A1 = RETURN CODE S V & P* -1 IF OVERFLOW/UNDERFLOW, ELSE S r P* AT PLPUCH: 0 S , P* AT PLGECH: NR OF CHAR LEFT IN BUFFER S P* A2 = IF PLGECH & A1>=0 : S P
0x245578…24570c Dummy {f00=0x0127, f01=0x0190, f02=»**************** S d P* T P EJECT T " P* T 0 PPLGECH EQU * T : P INH T N P* T Z . P LD A1,BUFLEN,A4 LENGTH OF TEXT IN BUFFER T d P LD A2,BUFBIX,A4 BYTE INDEX T P SUR A1,A2 T $ P SUK A1,1 A1 := NR OF CHAR LEFT T " P RF(N) CH100 EXIT IF
0x24570c…2458a0 Dummy {f00=0x0127, f01=0x0190, f02=» ANK A2,/FF CLEAN T P* U P RF CH110 NORMAL EXIT U $ P* U B P* U L PPLPUCH EQU * U V P INH U j P* U v P LD A1,BUFBIX,A4 BYTE INDEX U $ P CW A1,BUFLEN,A4 OUTSIDE BUFFER? U P RF(NL) CH100 YES, ERROR U " P IM BUFBIX,A4 INCREMENT INDE
0x2458a0…245a34 (1, 419) Dummy {f00=0x0128, f01=0x0190, f02=»0 NORMAL EXIT U P* V P* V PCH100 EQU * V * $ P LDKL A1,-1 RETURN CODE := ERROR V > PCH110 EQU * V f P ADKL A15,4 ADJUST STACK V z P ABR* A15 RETURN V P* V P EJECT V P* V @ P****************************************************
0x245a34…245bc8 Dummy {f00=0x0128, f01=0x0190, f02=»WER FROM V h , P* THE PLC TO DETERMINE TYPE OF MESSAGE. W P* W @ P* CALL: W J P* CF A15,INTYPE W Z P* W r P* INPUT: W | P* A5 = CWT ADDRESS W P* W P* OUTPUT: W P* A2 = CHANGED W P* A3 = TYPE W P* A4 = CHANGED W P
0x245bc8…245d5c Dummy {f00=0x0128, f01=0x0190, f02=» A2,X25DAT MINIMUM INPUT LENGTH W . P CW A2,CWTRCA+CCRLEN,A5 LENGTH >= MINIMUM? X ( P RF(G) ITERR NO, ERROR X Z P* X x P EJECT X P* X * P LD A3,CWTRCA+CCRBUF,A5 BUFFER ADDRESS X " P LC A2,X25LGN,A3 GROUP NUMBER X P LDR A4,A2 SAVE X P A
0x245d5c…245ef0 Dummy {f00=0x0128, f01=0x018e, f02=» FLOW CONTROL BYTE X P LDR A4,A3 SAVE Y P ANK A4,/01 FLAG Y 2 " P RF(NZ) IT100 NOT DATA PACKET Y J & P LDK A3,TYDATA ASSUME NORMAL DATA Y p P ANK A2,/80 QUALIFY BIT SET? Y ( P RF(Z) ITEXIT NO, NORMAL DATA. EXIT Y & P LDK A3,TYSTAT YES, STATUS MES
0x245ef0…246084 Dummy {f00=0x0128, f01=0x0190, f02=» Y t P RF(NZ) IT110 NO Z & P LDK A3,TYRR TYPE := RECIEVE READY Z P RF ITEXIT EXIT Z J P* Z b PIT110 EQU * Z l & P LDK A3,TYRES ASSUME TYPE = RESET Z P ANK A4,/04 IS IT RESET? Z P RF(Z) ITEXIT YES, EXIT Z 2 P LDK A3,TYRESC NO, TYPE := RES
0x246084…246218 Dummy {f00=0x0128, f01=0x0190, f02=»DK A3,TYNFLO ASSUME TYPE = NO FLOW CONTROL Z $ P SUK A4,1 IS IT NO FLOW CONTROL? [ 2 P RF(Z) ITEXIT YES, EXIT [ Z P* [ z PITERR EQU * [ & P LDK A3,TYERR IRRECOVERABLE ERROR [ P* [ PITEXIT EQU * [ P IFT CPU852=1 [ P ADKL A15,2 SKIP P
0x246218…2463ac Dummy {f00=0x0128, f01=0x0190, f02=»******************************************************** [ P* @ P* ROUTINE NAME: J P* OUTBUQ b P* r P* FUNCTION: | 8 P* THIS ROUTINE WILL REMOVE A DWT FROM THE QUEUES FOR 4 P* SHORT OR LONG OUTPUT BUFFERS, IF IT IS IN ANY P* OF
0x2463ac…246540 Dummy {f00=0x0128, f01=0x0190, f02=»ADDRESS P* ] P* OUTPUT: ] P* A2 = NOT 0 IF DWT FOUND ] , P* 0 IF DWT NOT FOUND ] N P* A4 = CHANGED ] l P* CR = CHANGED ] P* ] @ P************************************************************ ] P* ] POUTBUQ EQU * ] P
0x246540…2466d4 (1, 420) Dummy {f00=0x0128, f01=0x0190, f02=»7,A5 CWT ADDRESS ] & P ADK A7,CWTSBQ SHORT BUFFERS QUEUE ^ ( P CF A15,LNKOUT REMOVE DWT FROM QUEUE ^ B P LDR A7,A7 FOUND? ^ n P RF(NZ) OB100 YES, RETURN ^ P* ^ P LDR A7,A5 ^ & P ADKL A7,CWTLBQ LONG BUFFERS QUEUE ^ $ P CF A15,LNKOUT REMOVE FR
0x2466d4…246868 Dummy {f00=0x0128, f01=0x0190, f02=»15 POP A1 ^ P IFT CPU852=1 _ P ADKL A15,2 SKIP PSW _ ( P LDR* P,A15 RETURN _ D P XIF _ ^ P IFF CPU852=1 _ j P RTN A15 _ P XIF _ P* _ P EJECT _ P* _ @ P************************************************************ _ P* _
0x246868…2469fc Dummy {f00=0x0128, f01=0x0190, f02=»E (CLOSEST TO QUEUE HEAD). _ 2 P* ONE WORD IN EACH ELEMENT IS USED AS A LINK. ` " 2 P* END OF QUEUE IS INDICATED BY LINK=0 IN LAST ` X P* ELEMENT. ` P* ` P* CALL: ` P* CF A15,LNKFST ` P* ` P* INPUT: ` & P* A4 = QUEUE ELEMENT LINK A
0x2469fc…246b90 Dummy {f00=0x0128, f01=0x0190, f02=» @ P************************************************************ a P* a H PLNKFST EQU * a R $ P LDR* A1,A7 FIRST QUEUE ELEMENT a f ( P STR A1,A4 SET LINK FROM NEW ELEMENT a $ P STR A4,A7 SET NEW ELEMENT FIRST a P IFT CPU852=1 a P RF LNKRET RETUR
0x246b90…246d24 Dummy {f00=0x0128, f01=0x018e, f02=»****************************** a r P* b & P* ROUTINE NAME: b 0 P* LNKLST b H P* b X P* FUNCTION: b b 0 P* THIS ROUTINE LINKS A QUEUE ELEMENT LAST IN b v * P* A QUEUE (OPOSITE END TO QUEUE HEAD). b 2 P* ONE WORD IN EACH ELEMENT IS USED AS A LINK. b
0x246d24…246eb8 Dummy {f00=0x0128, f01=0x0190, f02=» P* INPUT: c & P* A4 = QUEUE ELEMENT LINK ADDRESS c $ P* A7 = QUEUE HEAD LINK ADDRESS c > P* c f P* OUTPUT: c p P* A1 = CHANGED c P* A7 = CHANGED c P* CR = CHANGED c P* c @ P****************************************************
0x246eb8…24704c Dummy {f00=0x0128, f01=0x018e, f02=»TINUE IF NOT LAST ELEMENT c ~ * P STR A4,A1 LINK NEW ELEMENT AFTER LAST d " * P CMR A4 SET END MARKER IN LAST ELEMENT d P P* d ~ P EJECT d P* d P IFT CPU852=1 d P RF LNKRET RETURN d P XIF d P IFF CPU852=1 d P RTN A15 d P XIF d
0x24704c…2471e0 Dummy {f00=0x0128, f01=0x0190, f02=» d ~ P* LNKOUT e P* e P* FUNCTION: e " 4 P* THIS ROUTINE REMOVES AN ELEMENT FROM A QUEUE. e 6 2 P* ONE WORD IN EACH ELEMENT IS USED AS A LINK. e n 2 P* END OF QUEUE IS INDICATED BY LINK=0 IN LAST e P* ELEMENT. e P* e P* CALL: e P*
0x2471e0…247374 (1, 421) Dummy {f00=0x0128, f01=0x0190, f02=» P* OUTPUT: f P* A1 = CHANGED f $ P* A7 = =0 IF ELEMENT NOT FOUND f . P* ><0 IF ELEMENT FOUND f V P* CR = CHANGED f v P* f @ P************************************************************ f P* f PLNKOUT EQU * f $ P LDR A1,A7 SAV
0x247374…247508 Dummy {f00=0x0128, f01=0x0190, f02=»B(NE) LNKOUT NO, CHECK NEXT f P* g $ P EJECT g . P* g < , P LDR* A7,A7 ELEMENT AFTER WANTED ELEMENT g F . P STR A7,A1 SET LINK FROM PREVIOUS TO NEXT g v $ P LDK A7,1 INDICATE ELEMENT FOUND g PLO100 EQU * g P* g P* g P IFT CPU852=1 g
0x247508…24769c Dummy {f00=0x0128, f01=0x0190, f02=»5,2 SKIP PSW g P LDR* P,A15 RETURN h P XIF h . P* h : P IFF CPU852=1 h D P RTN A15 h Z P XIF h j P* h v P EJECT h P* h P* h P* h P* h @ P************************************************************ h P* h $ P*
0x24769c…247830 Dummy {f00=0x0128, f01=0x0190, f02=»****************************************************** h P* i > 6 P* THIS PROGRAM CONTAINS A SET OF BUFFER HANDLING i H 6 P* SUBROUTINES. THEY OPERATE ON BUFFERS ORGANIZED i 4 P* IN BUFFER POOLS. A BUFFER POOL CONSISTS OF A i 6 P* POOLBLOCK FOR CO
0x247830…2479c4 Dummy {f00=0x0128, f01=0x0190, f02=». i f P* j 0 P* ROUTINES IN ORDER OF APPEARANCE IN CODE: j P* j H P* NAME FUNCTION j R P* j j " P* GETBUF GET BUFFER FROM POOL j t " P* RELBUF RETURN BUFFER TO POOL j & P* AREBUF DIVIDE AREA INTO BUFFERS j P* j P EJECT j P* j
0x2479c4…247b58 Dummy {f00=0x0128, f01=0x0190, f02=» " P* POOLBLOCK WORD OFFSETS k PPOBID EQU 0 POOL IDENTITY k * PPOBFLG EQU 2 BINARY FLAGS k L $ PPOBFRE EQU 4 FREE LIST LINK HEAD k n $ PPOBBUS EQU 6 BUFFER SIZE (BYTES) k " PPOBARS EQU 8 AREA SIZE (BYTES) k P* k P* POOLBLOCK LENGTH k
0x247b58…247cec Dummy {f00=0x0128, f01=0x0190, f02=» k T P* l P* ROUTINE NAME: l P* GETBUF l * P* l : P* FUNCTION: l D 4 P* THIS ROUTINE FETCHES ONE BUFFER FROM A BUFFER l X & P* POOL AND GIVES IT TO THE CALLER. l P* l P* CALL: l P* CF A15,GETBUF l P* l P* INPUT: l P*
0x247cec…247e80 Dummy {f00=0x0128, f01=0x0190, f02=» = CONTENTS OF A4 l P* INTERR.= INHIBITED m P* m 6 @ P************************************************************ m @ P* m PGETBUF EQU * m P INH m $ P LD A4,POBFRE,A7 FREE LIST START m & P RF(Z) GB100 NO BUFFER LEFT. EXIT m P* m
0x247e80…248014 (1, 422) Dummy {f00=0x012d, f01=0x0190, f02=»DR* A1,A15 POP A1 m P* n PGB100 EQU * n $ P ADKL A15,4 ADJUST STACK n 8 $ P LDR A4,A4 CR := CONTENTS OF A4 n X P ABR* A15 RETURN n P* n P EJECT n P* n @ P************************************************************ n P* n P
0x248014…2481a8 Dummy {f00=0x012d, f01=0x0190, f02=»FFER POOL. n P* o P* CALL: o P* CF A15,RELBUF o , P* o D P* INPUT: o N P* A4 = BUFFER ADDRESS o ^ P* A7 = POOLBLOCK ADDRESS o | P* o P* OUTPUT: o P* CR = CHANGED o P* INTERR.= INHIBITED o P* o @ P****************
0x2481a8…24833c Dummy {f00=0x012d, f01=0x0190, f02=»A1,POBFRE,A7 OLD FREE LIST START o $ P STR A1,A4 LINK AFTER NEW BUFFER p ( , P ST A4,POBFRE,A7 SET NEW FREE LIST START p P P* p P LDR* A1,A15 POP A1 p P ADKL A15,4 ADJUST STACK p P ABR* A15 RETURN p P* p P EJECT p P* p @ P********
0x24833c…2484d0 Dummy {f00=0x012d, f01=0x0190, f02=» 6 P* THIS ROUTINE ALLOCATES A SPECIFIED DATA AREA TO q 2 P* A BUFFER POOL. THIS CAN BE DONE IN TWO WAYS. q > 0 P* "INIBUF" IS USED WHEN A NEW BUFFER POOL IS q t 2 P* INITIATED. IT DIVIDES THE AREA INTO BUFFERS, q 6 P* LINKS THE BUFFERS IN A CHAIN FROM THE FR
0x2484d0…248664 Dummy {f00=0x012d, f01=0x0190, f02=» IS ADDED TO AN EXISTING BUFFER POOL. IT q 2 P* DIVIDES THE AREA INTO BUFFERS, AND LINKS THE r 0 & P* BUFFERS FIRST IN THE FREE LIST. r f P* r P* CALL: r P* CF A15,INIBUF r P* CF A15,LNKBUF r P* r P* INPUT: r P* A4 = AREA ADDRESS
0x248664…2487f8 Dummy {f00=0x012d, f01=0x0190, f02=»************************************** r z P* s . P EJECT s 8 P* s F PINIBUF EQU * s P P IFT CPU852=1 s d P STR A1,A15 PUSH A1 s z P XIF s P* s P IFF CPU852=1 s P MSR 4,A15 PUSH A1-A4 s P XIF s P* s $ P LDK A1,0 MARKER F
0x2487f8…24898c Dummy {f00=0x012d, f01=0x0190, f02=» A1 s P XIF t P* t P IFF CPU852=1 t " P MSR 4,A15 PUSH A1-A4 t 8 P XIF t V P* t b ( P LD A1,POBFRE,A7 LINK TO OLD BUFFERS t l P* t P* t PIL100 EQU * t P* t * P* COMMON PART FOR INIBUF AND LNKBUF t P* t P IFT C
0x24898c…248b20 Dummy {f00=0x012d, f01=0x0190, f02=» A2,A7 t " P ADK A2,POBFRE FREE LIST START u P LDR A3,A4 u 4 P AD A3,POBARS,A7 END OF AREA u F 0 P SU A3,POBBUS,A7 HIGEST BUFFER START IN AREA u j P* u PIL110 EQU * u P* BUFFER LINKING LOOP u P SRL A3,1 SHIFT ADDRESS =15 u P SRL A4,
0x248b20…248cb4 (1, 423) Dummy {f00=0x012d, f01=0x0190, f02=» STR A4,A2 SET LINK FROM PREVIOUS TO PRESENT u P LDR A2,A4 NEW PREVIOUS v 4 P AD A4,POBBUS,A7 NEW PRESENT v T P RB IL110 TAKE NEXT BUFFER v x P* v PIL120 EQU * v P SLL A3,1 . =15 v P SLL A4,1 . =15 v . P STR A1,A2 SET LINK OR END IN LA
0x248cb4…248e48 Dummy {f00=0x012d, f01=0x0190, f02=» P ADKL A15,2 ADJUST STACK w P LDR* P,A15 RETURN w $ P XIF w > P* w J P IFF CPU852=1 w T P MLR 4,A15 POP A1-A4 w j P RTN A15 w P XIF w P* w P IFF UTTEST=0 w P EJECT w P* w . P****************************************** w
0x248e48…248fdc Dummy {f00=0x012d, f01=0x0190, f02=»YPE AND CCR+BUFFER w v : P* DLSSEL SPECIFIES DLS TO BE SELECTED x & P* 0 MEANS LOG ALL x X P* x 4 P* RECORD FORMAT: BYTE 1-2 MSG TYPE (CO,RE,AT) x * P* BYTE 3 DLS INDEX x , P* BYT
0x248fdc…249170 Dummy {f00=0x012d, f01=0x0190, f02=» BYTE 8 PACKET HEADER -1 x B P* BYTE 9 PACKET HEADER -2 (LOGICAL CHANNEL) y $ > P* BYTE 10 PACKET HEADER -3 (FLOW CONTOL) y j 6 P* BYTE 11-16 6 FIRST DATA BYTES y 4 P**********************************
0x249170…249304 Dummy {f00=0x012d, f01=0x0190, f02=»TTEST=0 y 2 PLOGPTR DATA LOGARE RECORD POINTER IN LOG AREA z PLOGARE RES 960 LOG AREA z F PLOGEND EQU * z f ( P DATA 'ENDLOG' MARK END OF LOG AREA z z 2 P*-------------------------------------------- z " PLOGCOM EQU * SUBROUTINE ENTRY z P IFT C
0x249304…249498 Dummy {f00=0x012d, f01=0x0190, f02=» 3,A15 PUSH A1-A3 z P XIF { P IFF UTTEST=0 { & P LDKL A1,'CO' MSG TYPE { < P LDK A2,CWTCCA CCA OFFSET { Z P RF LOG:10 { | P { " PLOGIOC EQU * SUBROUTINE ENTRY { P IFT CPU852=1 { P STR A1,A15 { P STR A2,A15 { P STR A3,A15 {
0x249498…24962c Dummy {f00=0x012d, f01=0x0190, f02=»RE' MSG TYPE { P LDK A2,CWTRCA RCA OFFSET | P RF LOG:10 | 6 P | H " PLOGATT EQU * SUBROUTINE ENTRY | P P IFT CPU852=1 | v P STR A1,A15 | P STR A2,A15 | P STR A3,A15 | P XIF | P IFF UTTEST=0 | P IFF CPU852=1 | P MSR 3,A
0x24962c…2497c0 Dummy {f00=0x012d, f01=0x018e, f02=»--------------------------- | PLOG:10 EQU * COMMON PART } $ P LD A3,LOGPTR } D P STR A1,A3 LOG MSG TYPE } Z P ADR A2,A5 CCR PTR } z P LD A1,DLSSEL SELECTED DLS } P RF(Z) LOG:15 LOG ALL } P CC A1,CCRDLS,A2 } $ P RF(NE) LOG:20 NOT SELECTED,
0x2497c0…249954 (1, 424) Dummy {f00=0x012d, f01=0x0190, f02=» P ST A1,4,A3 LOG STATUS-1 ~ " P LD A1,CCRLEN,A2 BUFFER LENGTH ~ $ P SC A1,6,A3 INTO LOG ~ J $ P LD A2,CCRBUF,A2 BUFFER ADDRESS ~ f P LDR* A1,A2 BYTE 0-1 ~ P SC A1,8,A3 PACKET HEADER 2 ~ P SRL A1,8 ~ P SC A1,7,A3 PACKET HEADER 1 ~ ( P LD
0x249954…249ae8 Dummy {f00=0x012d, f01=0x0190, f02=»A3 ~ P SRL A1,8 P SC A1,11,A3 P LD A1,6,A2 BYTE 4-5 0 P SC A1,14,A3 L P SRL A1,8 ` P SC A1,13,A3 r P LD A1,8,A2 P SRL A1,8 P SC A1,15,A3 P ADK A3,16 * P ST A3,LOGPTR NEXT RECORD IN LOG AREA $ P CWK A3,
0x249ae8…249c7c Dummy {f00=0x012d, f01=0x410e, f02=»FT CPU852=1 P LDR* A3,A15 RESTORE P LDR* A2,A15 0 P LDR* A1,A15 D P ADKL A15,4 X P ABR* A15 RETURN l P XIF P IFF UTTEST=0 P IFF CPU852=1 P MLR 3,A15 P RTN A15 P XIF P* P* P END @
0x249c7c…249e10 Dummy {f00=0x012d, f01=0x2008, f02=» n PDRRET2 EQU * 0 & ! ADK A5,4 ADJUST STACK FOR RETURN 0 " LDR A1,A1 SET RETURN CODE 0 L INH 0 n ABR* A5 RETURN 0 z * 0 * 0 P* 0 PIHPL01 EQU * 0 PIHPL02 EQU * 0 PIHPL03 EQU * 0 PIHPL04 EQU * 0 P* 0
0x249e10…249fa4 Dummy {f00=0x012d, f01=0x0190, f02=» @ F !SST WN !AAT WB !VVT W6 !PPT W* !LLT `W !RRT hW !QQP $ ( A A A @ 0 PV @ P P 0 _ P H (&? @ #? H & D # * H D > N @ D @ @ ) I ( D #@PV D L
0x249fa4…24a138 Dummy {f00=0x012d, f01=0x0190, f02=» a : @ % PD H I H T P( H U @ ~U A ~ < + + P @ : ` P: @ @ @ D (P W H $ I 0 % E , a : @ Q A % @ B A A A A B @ @ P A @ E
0x24a138…24a2cc Dummy {f00=0x012d, f01=0x0190, f02=» $ $ $ QZ RT D (%? # ;H ;D &`>e : Q* R$ D (%? # ;H ;D &`>e : $ $ $ P< r A R R A @ _ S : 0 N N !TTP 9H N A R A & N
0x24a2cc…24a460 Dummy {f00=0x012d, f01=0x0190, f02=» & @ & P @ # _R @ 0=H A > PT N !DDPJ !SSP" A " > P, N !SST" R A $ P Y (9A &_ : @ " 9a @ $ 3 V $ : @ 9 @ 9 9@ @ " :HP @ U W
0x24a460…24a5f4 (1, 425) Opaque[0x194]
0x24a5f4…24a788 # DirEnt {nam=»DRIC01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1658, f03=0x0000}
0x24a5f4…24a788 IdxSect {
0x24a5f4…24a788 f00 = 0x00b2 // 0x24a5f4 @0x0
0x24a5f4…24a788 f01 = 0x000a // 0x24a5f6 @0x2
0x24a5f4…24a788 gno = [ // 0x24a5f8 @0x4
0x24a5f4…24a788 [0x00]: C0x00b2.0x3.0
0x24a5f4…24a788 [0x01]: C0x00b3.0x0.0
0x24a5f4…24a788 [0x02]: C0x00b3.0x1.0
0x24a5f4…24a788 [0x03]: C0x00b3.0x2.0
0x24a5f4…24a788 [0x04]: C0x00b3.0x3.0
0x24a5f4…24a788 ]
0x24a5f4…24a788 }
0x24a788…24a91c Dummy {f00=0x00b2, f01=0x018e, f02=» 2 P IDENT DRIC01 REL 11.0 81-04-02 870105041100 P : & P =1, ADDR.WR.REQ.IN WRONG QUEUE B P =1, REL 11.0 81-01-26 l P* P* 2 P********************************************** P* 2 P* PHILIPS TERMINAL SYSTEM PTS
0x24a91c…24aab0 Dummy {f00=0x00b2, f01=0x0190, f02=» 2 P********************************************** P* : 8 P* THIS MODULE HANDLES THE INTERTASK COMMUNICATION D P* P EJECT DRIC01 P* P* P*********** P* ENTRIES * P*********** P* P* P E
0x24aab0…24ac44 Dummy {f00=0x00b2, f01=0x0190, f02=»***** P* EXTERNALS * P************* $ P* : P* D P EXTRN TDISP DISPATCHER N P EXTRN TENDIO ENDIO n P EXTRN DISIOE REQUEST ERROR & P EXTRN DISEND TENDIO AND DISPATCH P EXTRN DWTST DWT STATUS P EXTRN DWTECB EC
0x24ac44…24add8 Dummy {f00=0x00b2, f01=0x0190, f02=» P EXTRN SETIMP TIMER , P EXTRN FNDTID FIND TTAB ADDRESS FROM TID & P EXTRN TTB:ID TASK IDENTIFICATION P P EXTRN TTB:ST TASK STATUS z " P EXTRN TTB:TD TERMINAL DEVICES 4 P EXTRN IHRTN RTN A15 WITHOUT ENABLING INTERRUPTS $ P EXTRN ECBBA E
0x24add8…24af6c Dummy {f00=0x00b2, f01=0x0190, f02=»ORD v P EJECT DRIC01 TOSSIO P* , P* 6 . P***************************************** @ P* r P* CONDITIONAL ASSEMBLY | P* . P***************************************** P* . P* A PROGRAM VERSION USING TOSS MMU PAGIN
0x24af6c…24b100 Dummy {f00=0x00b2, f01=0x0190, f02=»EXTENDED INSTRUCTION r . P* SET IS OBTAINED BY SETTING CPU852 EQU 0. P* N PCPU852 EQU 0 X P* l P* MMU BUFFER SIZE v P* PX:A EQU 50 PDVBLEN EQU 999 P* P* INTERTASK DEVICE INDEX P* PDEVIND EQU 8
0x24b100…24b294 (1, 426) Dummy {f00=0x00b3, f01=0x0190, f02=»* | P* P* 0 PDWTDRD EQU /10 START OF DRIVER DEFINED PART P* R P IFT MMUPAG=0 PSTART EQU DWTDRD r P XIF P* P IFT MMUPAG=1 PSTART EQU DWTDRD+4 P XIF P* & PDWTTP EQU START+/00 TIMER POINTER
0x24b294…24b428 Dummy {f00=0x00b3, f01=0x0190, f02=»DRESS l P* P EJECT DRIC01 P* 0 P* : P***************** D P* ADDRESS BLOCK * ^ P***************** x P* P* ( P DATA DVBLEN+DVBLEN MMU BUFFER SIZE ( P DATA DEVIND INTERTASK DEVICE INDEX & PITAD DATA
0x24b428…24b5bc Dummy {f00=0x00b3, f01=0x0190, f02=» ^ 8 PWR:QUE DATA 0 QUEUE ANCHOR NOT-ADDRESSED WRITE REQ. P* D $ P* INTERTASK DRIVER BUFFER (MMU) N P* v PIT:BUF EQU * P IFT MMUPAG=1 P RES DVBLEN+1 MMU BUFFER P XIF P* P EJECT DRIC01 P* P* A
0x24b5bc…24b750 Dummy {f00=0x00b3, f01=0x0190, f02=» P* ENTRY PARAMETERS: P* P* A5 = STACK BASE 2 IN DWT * P* A6 = DWT ADDRESS L P* A7 = ORDER CODE f P* A8 = ECB ADDRESS * P* A12= ADDRESS TO DRIVER ADDRESS BLOCK P* PICAD EQU * P LDR A1,A7 ORDER CODE * P LD A7
0x24b750…24b8e4 Dummy {f00=0x00b3, f01=0x0190, f02=»EQUEST | P SUK A1,/39-/06 P RF(NZ) DIS:OE REQUEST ERROR & P* J P EJECT DRIC01 T P* l P* S E T T I M E O U T v P* P ST A7,DWTIME,A6 P RF END:IO P* P* REQUEST ERROR EXIT P* $ PDIS:OE ABL D
0x24b8e4…24ba78 Dummy {f00=0x00b3, f01=0x0190, f02=»SED REQUEST OR NOT v P ADK A7,0 CHECK ADDRESS MODE . P ABL(Z) RD:NAD NOT-ADDRESSED READ REQUEST > P* p P* WRITE REQUEST ENTRY z P* 8 PWRITE EQU * CHECK IF ADDRESSED WRITE REQUEST OR NOT P ADK A7,0 CHECK ADDRESS MODE . P RF(Z)
0x24ba78…24bc0c Dummy {f00=0x00b3, f01=0x0190, f02=»W R I T E, A D D R E S S E D P* $ $ P* FIND TTAB OF ADDRESSED TASK . P* V & P CF A15,FNDTID TTAB ADDRESS TO A2 ` P ADK A2,0 SET CR P RB(Z) DIS:OE NOT FOUND 4 P ADKL A2,TTB:TD ADDRESS TO TERMINAL DEVICE TABLE P LDR* A1,A2 TA
0x24bc0c…24bda0 Dummy {f00=0x00b3, f01=0x0190, f02=»RIC01 P* $ P* FIND DWT OF ADDRESSED TASK P* @ 0 PITC:05 ADK A2,4 ADDRESS TO NEXT DWT ADDRESS J P SUK A1,4 ~ P RB(N) DIS:OE NOT FOUND P* P LDR* A4,A2 DWT ADDRESS " P CW A7,DWTADR,A4 SEARCHED DWT P RB(NE)
0x24bda0…24bf34 (1, 427) Dummy {f00=0x00b3, f01=0x0190, f02=»QUE,A2 QUEUE ANCHOR ADDRESS " P CWR A1,A6 CHECK QUEUE ANCHOR $ . P RF(E) ITC:10 REQUEST ISSUED FOR THIS TASK J P* | P ANK A7,1 P RF(Z) ITC:45 READ P CWK A1,RD:QUE 4 P RF(NE) ITC:50 NO READ REQUEST IN READ QUEUE =1 P*
0x24bf34…24c0c8 Dummy {f00=0x00b3, f01=0x0190, f02=»D:N05 READ P* P EJECT DRIC01 P* 4 P* MOVE BUFFER > P* V PITC:15 EQU * ` P LD A8,DWTECB,A6 SENDING ECB t P LDK A1,0 " P LD A9,DWTECB,A2 RECEIVING ECB , P LD A3,ECBRL,A8 SENDING REQUESTED LENGTH P RB(NP)
0x24c0c8…24c25c Dummy {f00=0x00b3, f01=0x0190, f02=»NP) DIS:OE P* PITC:20 EQU * P IFT MMUPAG=1 0 2 P LDKL A4,ITAD ADDRESS TO DRIVER ADDRESS BLOCK F * P CW A3,BUFLEN,A4 CHECK MMU BUFFER SIZE | * P RF(NG) ITC:25 MMU BUFFER LARGE ENOUGH & P LDKL A1,/8008 NO, INDICATE ERROR 0 P RF EN
0x24c25c…24c3f0 Dummy {f00=0x00b3, f01=0x0190, f02=»TH r $ P ST A3,ECBEL,A9 EFFECTIVE LENGTH P* 2 P IFT MMUPAG=0 < P ENB R * P LD A4,ECBBA,A8 SENDING BUFFER ADDRESS ^ , P LD A7,ECBBA,A9 RECEIVING BUFFER ADDRESS P* ( PITC:30 LCR A5,A4 MOVE ONE CHARACTER P SCR A5,A7 P ADK
0x24c3f0…24c584 Dummy {f00=0x00b3, f01=0x0190, f02=»ER SENDING TASK ID TO RECEIVING ECB AND VICE VERSA P* : ( P LD A3,DWTTAB,A2 TTAB RECEIVING TASK D P LD A3,TTB:ID,A3 TASK ID p 2 P ST A3,ECBCW,A8 RETURN TASK ID TO SENDING TASK & P LD A3,DWTTAB,A6 TTAB SENDING TASK P LD A3,TTB:ID,A3 TASK ID
0x24c584…24c718 Dummy {f00=0x00b3, f01=0x0190, f02=»1 8 P LD A3,ECBBA,A8 DRIVER BUFFER ADDRESS (EVEN/UNEVEN) $ P ST A3,ECBBA,A9 SET IN OTHER DWT F P XIF n P* z PEND:IO EQU * 0 P ABL DISEND END REQUEST VIA TENDIO AND TDISP P* PITC:35 EQU * P CMR A6 RESET QUEUE LINK
0x24c718…24c8ac Dummy {f00=0x00b3, f01=0x0190, f02=»ITC:45 EQU * P CWK A1,WR:QUE ( P RB(E) ITC:10 COMPLEMENTARY REQUEST * P* V . PITC:50 LDK A7,0 INDICATE ADDRESSED REQUEST ` P* 2 P* CHECK TIMER VALUE AND SET TIMER IF REQUESTED P* PITC:60 EQU * P LD A3,DWTIME,A6 TIME
0x24c8ac…24ca40 Dummy {f00=0x00b3, f01=0x0190, f02=» b P LDK A4,DWTTP P ADR A4,A6 TIMER POINTER P ST A3,TIME > P CF A15,SETIMP SET TIMER R P DATA TIMOUT TIMEOUT ADDRESS r PTIME DATA 0 P* P EJECT DRIC01 P* ( P* INSERT IN QUEUE WITHIN PRIORITY P*
0x24ca40…24cbd4 (1, 428) Dummy {f00=0x00b3, f01=0x0190, f02=» x P SUK A7,1 ( P RF(Z) ITC:80 NOT-ADDRESSED REQUEST : P ADK A2,DWTANC POINT TO ADDRESS OF FIRST DWT IN QUEUE F P* PITC:80 LDR A4,A2 SAVE P LDR* A2,A2 NEXT IN QUEUE P RF(Z) ITC:90 END FOUND " P LD A5,DWTTAB,A2 TTAB ADDR
0x24cbd4…24cd68 Dummy {f00=0x00b3, f01=0x0190, f02=» P ABL TDISP GO TO DISPATCHER P* , P EJECT DRIC01 6 P* N * P* W R I T E, N O T A D D R E S S E D X P* & PWR:NAD EQU * WRITE, NOT-ADDRESSED < P LD A2,DWTANC,A6 CHECK QUEUE OF ADDRESSED READ REQUESTS $ P RF(NZ) WR:N10
0x24cd68…24cefc Dummy {f00=0x00b3, f01=0x0190, f02=»REMOVE FROM QUEUE & P ST A3,RD:QUE UPDATE QUEUE ANCHOR P* D , PWR:N05 CF A15,ABTIM2 ABORT TIMER IF ANY N P RB ITC:15 ~ P* ( PWR:N10 LDR* A3,A2 REMOVE FROM QUEUE ( P ST A3,DWTANC,A6 UPDATE QUEUE ANCHOR P RB WR:N05 P*
0x24cefc…24d090 Dummy {f00=0x00b3, f01=0x018e, f02=»60 INSERT IN QUEUE P* P EJECT DRIC01 $ P* < ( P* R E A D, N O T A D D R E S S E D F P* r $ PRD:NAD EQU * READ, NOT-ADDRESSED | < P LD A2,DWTANC,A6 CHECK QUEUE OF ADDRESSED WRITE REQUESTS $ P RF(NZ) RD:N10 ANYTHING IN QUEUE
0x24d090…24d224 Dummy {f00=0x00b3, f01=0x0190, f02=» l & P ST A3,WR:QUE UPDATE QUEUE ANCHOR P* 2 PRD:N00 EQU * < & P CF A15,ABTIM2 ABORT TIMER IF ANY P P* z PRD:N05 EQU * " P XRR A2,A6 EXCHANGE A2 AND A6 P XRR A6,A2 P XRR A2,A6 P RB ITC:15 P* ( PRD:N10 LDR
0x24d224…24d3b8 Dummy {f00=0x00b3, f01=0x0190, f02=»DDRESS r P RB WR:N30 INSERT IN QUEUE P* 0 P EJECT DRIC01 : P* R P* T I M E O U T P* t 0 P* THIS ENTRY IS CALLED AT TIMEOUT. IT WILL ~ 4 P* RESET TIMER POINTER AND REMOVE DWT FROM QUEUE 2 P* BEFORE TERMINATING THE REQU
0x24d3b8…24d54c Dummy {f00=0x00b3, f01=0x0190, f02=» EQU * " P CM* 0,A2 RESET TIMER POINTER P LDR A2,A1 4 ( P CF A15,ABR:10 REMOVE DWT FROM QUEUE F P LDR A6,A2 DWT ADDRESS r 0 P RB ITC:40 END REQUEST VIA TENDIO AND TDISP P* P EJECT DRIC01 P* P* I T A B R T P*
0x24d54c…24d6e0 Dummy {f00=0x00b3, f01=0x0190, f02=» REQUEST VIA TENDIO. | P* P* INPUT: A6 = DWT ADDRESS & P* A8 = ECB ADDRESS J P* f PITABRT EQU * p P LDR A2,A6 8 P CF A15,ABREQ ABORT TIMER AND REMOVE DWT FROM QUEUE P LDK A1,0 RETURN CODE 0 P RB END:IO END REQUEST V
0x24d6e0…24d874 (1, 429) Dummy {f00=0x00b3, f01=0x0190, f02=» QUEUE. n P* P* INPUT: A2 = DWT ADDRESS P* > $ P* OUTPUT: A1, A3 ARE DESTROYED H P* p PABREQ EQU * z P CF A15,ABTIM ABORT TIMER P* P* REMOVE DWT FROM QUEUE P* PABR:10 EQU * " P LD A1,DWTQUE,A2
0x24d874…24da08 Dummy {f00=0x00b3, f01=0x0190, f02=»ESSED WRITE REQUEST z : P ADK A1,DWTANC POINT TO ADDRESS OF FIRST DWT IN QUEUE P* Z PABR:20 LDR A3,A1 SAVE d P LDR* A1,A1 NEXT IN QUEUE P CWR A1,A2 SEARCHED DWT P RB(NE) ABR:20 NO " P LDR* A1,A1 REMOVE FROM QUEUE " P STR
0x24da08…24db9c Dummy {f00=0x00b3, f01=0x0190, f02=»* A B T I M P* . P* SUBROUTINE FOR ABORTING TIMER (IF ANY). P* P P* INPUT: A2 = DWT ADDRESS Z P* ~ $ P* OUTPUT: A1, A3 ARE DESTROYED P* PABTIM2 EQU * P CMR A2 RESET QUEUE LINK P* PABTIM LDK A1,DWT
0x24db9c…24dd30 Dummy {f00=0x00b3, f01=0x40d0, f02=»DICATE NO TIMER SET P* ! P IFT CPU852=1 ! & PIH:RTN ABL IHRTN ! < P XIF ! T P* ! ` P IFT CPU852=0 ! j PIH:RTN RTN A15 ! P XIF ! P* ! P* ! P* ! P END ! @ ! MR A2 RESET QUEUE LINK P* PABTIM LDK A1,DWT
0x24dd30…24dec4 Dummy {f00=0x00b3, 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
0x24dec4…24e058 Dummy {f00=0x00b3, f01=0x0190, f02=» P* # PCWTPLC EQU * # PTABCWT EQU * # " P IFF PLCNRL=0 # 6 " P DATA PL0CWT CWT FOR PLC NR 1 # L P IFF PLCNRL=1 # r " P DATA PL1CWT CWT FOR PLC NR 2 # P IFF PLCNRL=2 # " P DATA PL2CWT CWT FOR PLC NR 3 # P IFF PLCNRL=3 # " P DATA PL
0x24e058…24e1ec Dummy {f00=0x00b3, f01=0x018e, f02=»ATA 0 PLC NR 3 NOT CONNECTED # P IFF PLCNRL=2 $ $ " P DATA 0 PLC NR 2 NOT CONNECTED $ : P IFF PLCNRL=1 =5 $ ` & P DATA 0 PLC NR 1 NOT CONNECTED =5 $ z P XIF $ P* $ P IFF PLCNRR=0 $ ( P DATA PR1CWT CWT FOR PLC NR. 5, REM. $ P IFF PLCNRR=
0x24e1ec…24e380 Dummy {f00=0x00b3, f01=0x0190, f02=» $ ( P DATA PR4CWT CWT FOR PLC NR. 8, REM. % P XIF % 4 P* % @ P IFF PLCNRR=4 % J " P DATA 0 PLC NR 8 NOT CONNECTED % ` P IFF PLCNRR=3 % " P DATA 0 PLC NR 7 NOT CONNECTED % P IFF PLCNRR=2 % " P DATA 0 PLC NR 6 NOT CONNECTED % P IFF PLCNR
0x24e380…24e514 (1, 430) Opaque[0x194]
0x24e514…24e6a8 # DirEnt {nam=»DRDC15«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1608, f03=0x0000}
0x24e514…24e6a8 IdxSect {
0x24e514…24e6a8 f00 = 0x00b0 // 0x24e514 @0x0
0x24e514…24e6a8 f01 = 0x0040 // 0x24e516 @0x2
0x24e514…24e6a8 gno = [ // 0x24e518 @0x4
0x24e514…24e6a8 [0x00]: C0x00b0.0x1.0
0x24e514…24e6a8 [0x01]: C0x00b0.0x2.0
0x24e514…24e6a8 [0x02]: C0x00b7.0x3.0
0x24e514…24e6a8 [0x03]: C0x00b8.0x1.0
0x24e514…24e6a8 [0x04]: C0x00b8.0x2.0
0x24e514…24e6a8 [0x05]: C0x00b8.0x3.0
0x24e514…24e6a8 [0x06]: C0x00b9.0x0.0
0x24e514…24e6a8 [0x07]: C0x00b9.0x1.0
0x24e514…24e6a8 [0x08]: C0x00b9.0x2.0
0x24e514…24e6a8 [0x09]: C0x00cf.0x2.0
0x24e514…24e6a8 [0x0a]: C0x00d3.0x0.0
0x24e514…24e6a8 [0x0b]: C0x00d3.0x3.0
0x24e514…24e6a8 [0x0c]: C0x00d4.0x0.0
0x24e514…24e6a8 [0x0d]: C0x00d4.0x1.0
0x24e514…24e6a8 [0x0e]: C0x00d4.0x2.0
0x24e514…24e6a8 [0x0f]: C0x00d4.0x3.0
0x24e514…24e6a8 [0x10]: C0x00d5.0x0.0
0x24e514…24e6a8 [0x11]: C0x00d5.0x1.0
0x24e514…24e6a8 [0x12]: C0x00d5.0x3.0
0x24e514…24e6a8 [0x13]: C0x00d6.0x0.0
0x24e514…24e6a8 [0x14]: C0x00d6.0x1.0
0x24e514…24e6a8 [0x15]: C0x00d6.0x2.0
0x24e514…24e6a8 [0x16]: C0x00d6.0x3.0
0x24e514…24e6a8 [0x17]: C0x00d7.0x0.0
0x24e514…24e6a8 [0x18]: C0x00d8.0x0.0
0x24e514…24e6a8 [0x19]: C0x00d8.0x2.0
0x24e514…24e6a8 [0x1a]: C0x00d8.0x3.0
0x24e514…24e6a8 [0x1b]: C0x00d9.0x0.0
0x24e514…24e6a8 [0x1c]: C0x00d9.0x1.0
0x24e514…24e6a8 [0x1d]: C0x00d9.0x2.0
0x24e514…24e6a8 [0x1e]: C0x00d9.0x3.0
0x24e514…24e6a8 [0x1f]: C0x00da.0x1.0
0x24e514…24e6a8 ]
0x24e514…24e6a8 }
0x24e6a8…24e83c Dummy {f00=0x00b0, f01=0x0190, f02=» 4 P IDENT DRDC15 REL 11.0 DK 83-11-21 870105041100 P < P DK3, IR IN STATUS TABLE D P DK2, NAK AT SELECT f $ P DK1, DEVICE STATUS AT CONNECT " P =17, RETURN CODE AT CONNECT ( P =16, DLOBUF DESTROYED AT CONNECT . P =15, NO
0x24e83c…24e9d0 Dummy {f00=0x00b0, f01=0x0190, f02=»ARD DWT HANDLING z 0 P =12, SUB-ADDR IN CW2 AT RECEIVE REQ COMPL P REL 11.0 81-05-12 L $ P =11, PROCEDURE TIMER PROBLEM h P =10, EOT ON SPECIFIC POLL $ P =9, REMAINING TIME IN ECBCW1 P REL 11.0 81-04-12 " P =8, ODD USER
0x24e9d0…24eb64 Dummy {f00=0x00b0, f01=0x0190, f02=» WRONG STATISTIC HANDLING P REL 11.0 81-03-27 " P =4, ERROR IN POWER UP > ( P =3, DELETE INSTRUCTIONS NOT USED ^ $ P =2, CHANGES IN STATUS HANLING ( P =1, ERROR IN OPEN/CLOSE REQUESTS P REL 11.0 81-01-26 P* P*
0x24eb64…24ecf8 Dummy {f00=0x00b0, f01=0x0190, f02=»ER DATA COMMUNICATION . P* BSC MULTIPOINT LINE PROCEDURE P* OR SIEMENS MSV1 P P* t P* ~ P* P* P* 8 P**************************************************** P EJECT P* P* P* EN
0x24ecf8…24ee8c Dummy {f00=0x00b0, f01=0x0190, f02=»TPUT INTERRUPT " P ENTRY DC15ON POWER ON ROUTINE P ENTRY DW1500 DUMMY DWT < P* P EJECT f P* t P* ~ P* EXTERNAL REFERENCES P* " P EXTRN TDISP DISPATCHER ENTRY ( P EXTRN SAVE8 SAVE A1-A8 ON A15 STACK $ P EXTRN
0x24ee8c…24f020 Dummy {f00=0x00b0, f01=0x0190, f02=»RN DWTOR DWT ORDER P EXTRN DWTECB DWT ECB P EXTRN DWTOPT OPTION CODE 8 " P EXTRN DWTUEC USER ECB IF MMU Z P EXTRN DWTMEC MMU ECB P EXTRN ECBFC FILE CODE P EXTRN ECBBA BUFFER ADDRESS " P EXTRN ECBRL REQUESTED LENGTH " P E
0x24f020…24f1b4 (1, 431) Dummy {f00=0x00b0, f01=0x0190, f02=» INTSAV SAVE AREA LAST INTERRUPT ( P EXTRN TEBCDIC ASCII TO EBCDIC TABLE ( ( P EXTRN TASCII EBCDIC TO ASCII TABLE T . P EXTRN DCSRED READ STATISTICS ENTRY POINT : P EXTRN DCSRLL RESET ALL STATISTICS BUFFERS ENTRY POINT : P EXTRN DCSUPS UPDATE STA
0x24f1b4…24f348 Dummy {f00=0x00b0, f01=0x0190, f02=»BOLIC SUB ADDR j * P EXTRN DC:MIN MOVE DATA TO USER BUFFER , P EXTRN DC:MOT MOVE DATA FROM USER BUFFER D 0 P EXTRN DISEND COMPLETE REQUEST AND DISPATCH t * P EXTRN PFPOST WAIT FOR POWER UP IF SET P EJECT J P**********************************
0x24f348…24f4dc Dummy {f00=0x00b0, f01=0x0190, f02=» P* A3 WORK (BUFFER LENGTH) P* A4 WORK (BUFFER POINTER) & P* A5 DRIVER STACK POINTER H P* A6 DWT ADDRESS j $ P* A7 ORDER CODE, DTETAB ADDRESS P* A8 ECB ADDRESS P* L P************************************************************
0x24f4dc…24f670 Dummy {f00=0x00b0, f01=0x0190, f02=» ASSEMBLY t P* P* & PX:A EQU 1000 RECEIVE BUFFER LENGTH & PRBUFL EQU 1150 P $ PX:B EQU 0 IF 1 INTERRUPT LOGGING f PLOGG EQU X:B " PX:C EQU 600 POLL TIMEOUT VALUE PTIMPOL EQU X:C * PX:D EQU 0 STATUS AND RVI HANDLING IF=1
0x24f670…24f804 Dummy {f00=0x00b0, f01=0x0190, f02=»N EQU X:F ( PX:G EQU 0 CODE , 0=ASCII , 1=EBCDIC PCODE EQU 1 > * PX:H EQU 0 IF 1 SPECIFIC POLL HANDLING P PSPECP EQU X:H ~ , PX:I EQU 0 IF = 1 LINE SPEED SET TO HIGH ( P IF = 0 LINE SPEED IS SET TO LOW PSPEED EQU 1 * PX:J
0x24f804…24f998 Dummy {f00=0x00b0, f01=0x0190, f02=»EQU 0 IF = 1 PTS 6805 ADAPTION SALCUZ PP6805 EQU X:L . PX:M EQU /02 D P IFT P6805=0 X , PLCUIN EQU X:M DEVICE ADDRESS OF RECEIVER l P XIF P IFT P6805=1 , PLCUIN EQU /0A DEVICE ADDRESS OF RECEIVER P XIF P IFT P6805=0 SA
0x24f998…24fb2c Dummy {f00=0x00b0, f01=0x0190, f02=»1 DEVICE ADDRESS OF TRANSMITTER SALCUZ ~ P XIF SALCUZ . PX:N EQU 0 D . PIBMCHR EQU X:N IF 1 IBM CHARACTER HANDLING V . PX:O EQU 0 IF 1 MESSAGE PASSING TO DC TASK PMESPAS EQU X:O 4 PX:P EQU 0 IBM-3270 EMULATION PACKAGE, IF NOT = 0 P
0x24fb2c…24fcc0 Dummy {f00=0x00b0, f01=0x0190, f02=»NCLUDED n PX:S EQU 500 $ PTBUFL EQU 1150 MMU BUFFER LENGTH $ * PBINTRM EQU 0 IF 1 BINARY TRANSMISSION L , PDMRK EQU 1 SPECIAL CONDITION FOR DENMARK z 4 PNOWACK EQU 0 WHEN WORKING WITH A MAIN-FRAME THAT 0 P DOESN'T ACCEPT WACK RESPONSE TO A S
0x24fcc0…24fe54 (1, 432) Dummy {f00=0x00b7, f01=0x0190, f02=»TIME UNTIL TIMEOUT =9 x 0 P IS DELIVERED IN ECBCW1 AT COMPLETION =9 & P OF SEND AND RECEIVE REQUESTS =9 R P* | P IFT SPEED=1 PLSPEED EQU /0200 P XIF P IFT SPEED=0 PLSPEED EQU 0 P XIF P EJECT P*
0x24fe54…24ffe8 Dummy {f00=0x00b7, f01=0x0190, f02=»***************** x P* . P* A PROGRAM VERSION USING TOSS MMU PAGING $ * P* IS OBTAINED BY SETTING MMUPAG EQU 1. V P* PMMUPAG EQU 1 P* P* 6 P* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION . P* SET IS OBTAINED BY SET
0x24ffe8…25017c Dummy {f00=0x00b7, f01=0x0190, f02=»BUFL MMU BUFFER SIZE ~ P* P EJECT & P* 4 * P************************************** > P* l 2 P* DCDEFS COMMON DEFS FOR DC DRIVERS/PACKAGES v P* * P************************************** P , P**************************
0x25017c…250310 Dummy {f00=0x00b7, f01=0x0190, f02=» P EJECT J P********************************************************************** P* d P* DWT, DEVICE WORK TABLE n P* L P************************************************************************ P* P* ................
0x250310…2504a4 Dummy {f00=0x00b7, f01=0x0190, f02=»... z P* 4 . DWTECB . P* ................... . P* 6 . DWTOPT . DWTOR . P P* ................... r P* 8 . DWTADR . P* ................... P* 10 . DWTTAB . P* ........
0x2504a4…250638 Dummy {f00=0x00b7, f01=0x0190, f02=»........... , P* (16). DWTUEC . IF MMUPAG P* ................... D , P* (18). DWTMEC . IF MMUPAG f P* ................... $ P* DWTDRD +2 . DWTSTB . $ P* ................... P
0x250638…2507cc Dummy {f00=0x00b7, f01=0x0190, f02=»* +8 . DWTLAD . P* ................... " P* +10 . DWTRAD . D P* ................... f P* +12 . DWTDR1/SUB . P* ................... P* +14 . DWTRCL . P* ...................
0x2507cc…250960 Dummy {f00=0x00b7, f01=0x0190, f02=» v P* +20 . DWTOPE . P* ................... * P* +22 . DWTOPN . L P* ................... n P* +24 . DWTIPC . P* ................... P* +26 . DWTIPT . P* ............
0x250960…250af4 (1, 433) Dummy {f00=0x00b8, f01=0x018e, f02=» / ~ P* ................... 8 P* . STATISTIC . IF STAT AND DWTSTB /=0 2 P* / BUFFER / n P* ................... P* P EJECT P* > P****************************************************
0x250af4…250c88 Dummy {f00=0x00b8, f01=0x0190, f02=» T P* PDWTTQ EQU /0E TERMINAL QUEUE P IFT MMUPAG=0 6 6 PDWTDRD EQU DWTTQ+2 START OF DRIVER DEPENDENT AREA L P XIF P IFT MMUPAG=1 6 PDWTDRD EQU DWTTQ+6 START OF DRIVER DEPENDENT AREA P XIF D PDWTSTB EQU DWTDRD OFFSET R
0x250c88…250e1c Dummy {f00=0x00b8, f01=0x0190, f02=»K NEXT DWT l 2 PDWTLAD EQU DWTDRD+6 LOCAL SYMBOLIC DTE ADDRESS 4 PDWTRAD EQU DWTDRD+8 REMOTE SYMBOLIC DTE ADDRESS H * PDWTDR1 EQU DWTDRD+10 DRIVER DEP WORD 1 * PDWTSUB EQU DWTDR1 SYMBOLIC SUBADDRESS . PDWTRCL EQU DWTDRD+12 REQUEST CONTROL WORD
0x250e1c…250fb0 Dummy {f00=0x00b8, f01=0x0190, f02=»EXPEDITED/STATUS LINK NXT DWT p 8 PDWTOPN EQU DWTDRD+20 O/P DATA Q NORMAL LINK NXT DWT & 2 PDWTIPC EQU DWTDRD+22 I/P DATA Q LINK TO BUFFER b 0 PDWTIPT EQU DWTDRD+24 I/P DATA TIMER POINTER ( PDWTCUR EQU DWTDRD+26 CURSOR ADDRESS . PDWTBUF EQU DWTDR
0x250fb0…251144 Dummy {f00=0x00b8, f01=0x0190, f02=»********************** ` P* P* DTE, DTE CONTROL TABLE ( P* H L P************************************************************************ R P* P* ................... P* 0 . DTECHP . P* ..................
0x251144…2512d8 Dummy {f00=0x00b8, f01=0x0190, f02=». x P* 6 . DTEOPT . DTEOR . P* ................... , P* 8 . DTEADR . N P* ................... p P* 10 . DTETAB . P* ................... P* 12 . DTEWAT . P* ..........
0x2512d8…25146c Dummy {f00=0x00b8, f01=0x0190, f02=» ................... , P* (18). DTEMEC . IF MMUPAG P* ................... P $ P* DTEDRD +2 . DTESTB . r $ P* ................... P* +4 . DTECHD . P* ................... P*
0x25146c…251600 Dummy {f00=0x00b8, f01=0x0190, f02=»+10 . . P* / DRIVER DEPEND / P* / / B P* / / d P* ................... 8 P* . STATISTIC . IF STAT AND DTESTB /=0 P* / BUFFER / P*
0x251600…251794 (1, 434) Dummy {f00=0x00b8, f01=0x0190, f02=»0 2 PDTEDRD EQU DTETQ+2 START OF DC DEPENDENT AREA P XIF @ P IFT MMUPAG=1 L 2 PDTEDRD EQU DTEMEC+2 START OF DC DEPENDENT AREA b P XIF D PDTESTB EQU DTEDRD OFFSET REL START DTE TO STATISTIC BUFF IF ANY 2 PDTECHD EQU DTEDRD+2 CONFIG C
0x251794…251928 Dummy {f00=0x00b8, f01=0x0190, f02=»DRIVER DEPENDENT , PDTEPLS EQU DTEDRD+8 PHYSICAL LINK STATUS * PDTEDLS EQU DTEDRD+10 DATA LINK STATUS H $ PDTESTA EQU DTEDRD+12 DTE STATUS v ( PDTEDWT EQU DTEDRD+14 CHAIN LINK DWT 0 PDTEDDT EQU DTEDRD+16 CHAIN LINK DISCARD DWT P* STATITIC
0x251928…251abc Dummy {f00=0x00b8, f01=0x0190, f02=»D+22 MAX COUNTER INDEX " PSTWCTA EQU DTEDRD+24 COUNTERS P EJECT D J P********************************************************************** R P* , P* COUNTER INDECES - PARAMETER-1 EQUATES P* P* REQUEST LEVEL COUNTERS: P*
0x251abc…251c50 Dummy {f00=0x00b8, f01=0x0190, f02=»CSRCBY EQU /02 CONNECTION NOT ESTABLISHED - BUSY $ PCSRMSR EQU /03 MESSAGES RECEIVED ! 8 & PCSRCHR EQU /C5 CHARACTERS RECEIVED ! ` ( PCSRMST EQU /06 MESSAGES TRANSMITTED ! * PCSRCHT EQU /C8 CHARACTERS TRANSMITTED ! PCSRTOP EQU /09 TIMEOUT ! PCSRABT
0x251c50…251de4 Dummy {f00=0x00b8, f01=0x0190, f02=»* ! P* LINK LEVEL COUNTERS " P " ( . PCSSRBL EQU /10 SYNCH DATA BLOCKS RECEIVED " 2 : PCSSRBY EQU /11 " DATA BLOCKS REJECTED BUFFER BUSY " d > PCSSRBO EQU /12 " DATA BLOCKS REJECTED BUFFER OVERFLOW " 6 PCSSRAB EQU /13 " DATA BLOCKS REJ
0x251de4…251f78 Dummy {f00=0x00b8, f01=0x0190, f02=»CSSTRT EQU /16 " DATA BLOCKS RETRANSMITTED " , PCSSTAB EQU /17 " DATA BLOCKS ABORTED # 6 4 PCSSXC1 EQU /18 NBR OF REPLY REQUESTS TRANSMITTED # f & PCSSXC2 EQU /19 PROCEDURE TIME OUTS # 8 PCSSXC3 EQU /1A NBR OF TIMES POLL TIMEOUT HAS OCCURED # P #
0x251f78…25210c Dummy {f00=0x00b8, f01=0x0190, f02=»GHPUT ERROR # x ( PCSCDOT EQU /2A O/P THROUGHPUT ERROR $ $ PCSCDCE EQU /2B DCE NOT OPERABLE $ @ * PCSCXC1 EQU /2C CONTROL UNIT DEPENDENT $ h PCSCXC2 EQU /2D " $ PCSCXC3 EQU /2E " $ P EJECT $ P* $ P* $ P* REQUEST HANDLING $
0x25210c…2522a0 Dummy {f00=0x00b8, f01=0x0190, f02=»ASSIVE $ x PDISCO EQU /2F DISCONNECT % PRECEIVE EQU /02 RECEIVE % . PSEND EQU /06 SEND % N PRSTAT EQU /00 READ STATUS % h PSSTAT EQU /38 SET STATUS % ( PSTATIS EQU /2D READ/RESET STATISTICS % $ PSTIMOT EQU /39 SET TIMEOUT VALUE % P* % P
0x2522a0…252434 (1, 435) Dummy {f00=0x00b8, f01=0x0190, f02=»**************************** % r P* & $ . P* S O F T W A R E R E T U R N C O D E S & . P* & ` > P********************************************************** & j P* & L P*---------------------------------------------------------------------- & " PR:
0x252434…2525c8 Dummy {f00=0x00b8, f01=0x0190, f02=»------------------------------------------------------ & PR:4 EQU /0800 ' > PR:5 EQU /0400 ' T PR:6 EQU /0200 ' j , PR:DATA EQU /0100 DATA AVAILABLE (QUEUED) ' J P*--------------------------------------------------------------------- ' PR:8 EQU /0
0x2525c8…25275c Dummy {f00=0x00b8, f01=0x0190, f02=»---------------------------------------- ' r $ PR:LGTH EQU /0008 ILLEGAL LENGTH ( 0 PR:13 EQU /0004 ( X . PR:LOGC EQU /0002 LOGICAL CONNECTION ERROR ( n . PR:PHYC EQU /0001 PHYSICAL CONNECTION ERROR ( L P*-----------------------------------------------------
0x25275c…2528f0 Dummy {f00=0x00b8, f01=0x0190, f02=»H A R D W A R E R E T U R N C O D E S ( P* ) 0 > P*********************************************************= ) : P* ) | L P*---------------------------------------------------------------------- ) PH:0 EQU /8000 ) PH:1 EQU /4000 ) PH:2 EQ
0x2528f0…252a84 Dummy {f00=0x00b8, f01=0x0190, f02=» PH:5 EQU /0400 * PH:6 EQU /0200 * PH:7 EQU /0100 * 0 L P*---------------------------------------------------------------------- * F PH:8 EQU /0080 * PH:9 EQU /0040 * PH:CARR EQU /0020 CARRIER OFF * PH:11 EQU /0010 * J P*-----------
0x252a84…252c18 Dummy {f00=0x00b8, f01=0x0190, f02=» /0002 THROUGHPUT ERROR * " PH:NOOP EQU /0001 NOT OPERABLE + L P*---------------------------------------------------------------------- + F P EJECT + > P********************************************************** + P* + P* LINE CONTROL CHAR
0x252c18…252dac Dummy {f00=0x00b8, f01=0x0190, f02=»CTER + r PSYN EQU /16 , PSTX EQU /02 , PETX EQU /03 , 4 PETB EQU /17 , H PITB EQU /1F , PSOH EQU /01 , p PENQ EQU /05 , PDLE EQU /10 , PEOT EQU /04 , PNAK EQU /15 , PESC EQU /1B , PSBA EQU /11 , PGP EQU /22 ,
0x252dac…252f40 Dummy {f00=0x00b8, f01=0x0190, f02=» , PACK1 EQU /31 - PDC1 EQU /11 - P IFT MSV1=0 - 0 PWACK EQU /3B - D P XIF - X P IFT CODE=0 - d P IFT MSV1=1 - x 0 PWACK EQU /BF =WABT - SIEMENS MSV1 PROCEDURE - P XIF - P IFT CODE=1 - PPAR EQU /00 - PWACK EQU /2C - P
0x252f40…2530d4 (1, 436) Dummy {f00=0x00b9, f01=0x0190, f02=»F DK1 - P XIF . P IFT P6805=0 . PENQPAR EQU ENQ+PAR . . PRVIPAR EQU RVI+PAR . H PACKPAR EQU ACK0+PAR . b P XIF . ~ P IFT P6805=1 . PENQPAR EQU ENQ . PRVIPAR EQU RVI . PACKPAR EQU ACK0 . P XIF . P EJECT . P* . P*
0x2530d4…253268 Dummy {f00=0x00b9, f01=0x0190, f02=» P* / P* / P DATA /4448 / P DATA /4242 / , P* / @ 2 PNOIR EQU /20 S/S 1 : NO INTERVENTION REQUIRED / J , PIR EQU /26 S/S 1 : INTERVENTION REQUIRED / P XIF / P* / ( PPENDST EQU /4000 PENDING STATUS FLAG / P* / P* TIMER VALU
0x253268…2533fc Dummy {f00=0x00b9, f01=0x0190, f02=»********************************* / t P* 0 * . P* LINE CONTROL UNIT FUNCTION CONTROL EQU:S 0 4 P* 0 f B P************************************************************* 0 p P* 0 P IFT CODE=0 0 PSYNC EQU /16 0 P XIF 0 P IFT CODE=1 0 P
0x2533fc…253590 Dummy {f00=0x00b9, f01=0x0190, f02=» IFT CODE=0 0 PPARITY EQU /0C 1 P XIF 1 * P IFT P6805=1 1 6 P IFT CODE=1 1 J PPARITY EQU /00 1 ^ P XIF 1 t P EJECT 1 8 P*************************************************** 1 P* 1 ( P* LINE CONTROL UNIT SST STATUS BITS 1 P* 1 8
0x253590…253724 Dummy {f00=0x00b9, f01=0x0190, f02=»IF 1 P IFT P6805=1 2 . PH:ERR EQU /27 H:NOOP+H:THRU+H:CARR+H:PARI 2 P XIF 2 P P EJECT 2 D P**************************************************************** 2 n P* 2 P* DRIVER ADDRESS BLOCK 2 P* 2 D P********************************
0x253724…2538b8 Dummy {f00=0x00b9, f01=0x0190, f02=»T ACTIVATION ADDRESS 2 P DATA ABORT ABORT ROUTINE 3 $ P DATA DCRBUF REC. BUFFER ANCHOR 3 > P DATA 6 HEADER LENGTH 3 f P* 3 , P RES 15 SUBROUTINE STACK FOR INTERRUPTS 3 PSTB RES 1 3 P EJECT 3 P 3 @ P**********************************
0x2538b8…253a4c Dummy {f00=0x00b9, f01=0x0190, f02=»TP,A6 TIMER POINTER 3 " P RF(Z) AB:10 NO TIMER RUNNING 4 P CMR A1 KILL TIMER 4 B P CM DWTRTP,A6 4 P 4 r $ PAB:10 LD A2,DWTOR,A6 ORDER CODE 4 z P ANK A2,/7F 4 P SUK A2,6 4 P RF(NE) AB:RTN 4 . P CF A15,REMOVW REMOVE DWT FROM WRITE QUEUE
0x253a4c…253be0 Dummy {f00=0x00b9, f01=0x0190, f02=» P CM XACK RESET ACK EXPECTED 5 P 5 ( PAB:RTN EQU * 5 0 P ABL RTABRT 5 D P EJECT 5 X J P********************************************************************** 5 f J P********************************************************************** 5 P* 5
0x253be0…253d74 (1, 437) Dummy {f00=0x00b9, f01=0x0190, f02=»**************** 5 Z J P********************************************************************** 6 P* 6 f $ P* ACTIVATION FROM TERMINAL TASKS 6 p P* 6 PDCACT EQU * 6 P LDK A1,0 PRESET RETURN CODE 6 & P LDR A2,A7 ORDER CODE AS PARAMETER 6 P LDK
0x253d74…253f08 Dummy {f00=0x00b9, f01=0x0190, f02=» DATA TREQX,RTREQ LAST ENTRY; ERROR ADDRESS 6 ( P DATA RECEIVE,RQRECE RECEIVE REQUEST 7 4 " P DATA SEND,RQSEND SEND REQUEST 7 ` " P DATA OPEN,RQOPEN OPEN REQUEST 7 $ P DATA CLOSE,RQCLOS CLOSE REQUEST 7 . P DATA CONPAS,RQCON CONNECT PASSIVE REQUEST 7 ( P D
0x253f08…25409c Dummy {f00=0x00b9, f01=0x018e, f02=»A STIMOT,RQTIME SET REQUEST TIMEOUT 7 : PTREQX DATA STATIS,RQSTAT READ/RESET STATISTICS REQUEST 8 , P EJECT 8 j P* 8 x P* 8 P* OPEN REQUEST 8 P* 8 P* ACTIVATION PARAMETERS: 8 $ P* SYMBOLIC DTE-ADDRESS (ECBCW2) 8 P* 8 P* FUNCTION
0x25409c…254230 Dummy {f00=0x00b9, f01=0x0190, f02=» 8 . P LD A1,ECBCW2,A8 GET SYMBOLIC DTE-ADDRESS 9 $ P LD A2,DTESTA,A7 GET DTE STATUS 9 : ( P ADR A2,A2 WORD ALIGNED INDEX VALUE 9 b , P ABI RQOPTB,A2 BRANCH ON INDEX IN TABLE 9 & PRQOPTB DATA RQOP20 CLOSED/INACTIVE 9 " P DATA RQOP15 OPEN IN PROGRESS 9
0x254230…2543c4 Dummy {f00=0x00b9, f01=0x0190, f02=» 9 b P RF(E) RQOP90 YES - OK : PRQOP15 EQU * : & & P ABL RTSEQ RETURN: SEQUENCE ERROR : : P* : d PRQOP20 EQU * : n & P IM DTESTA,A7 SET OPEN IN PROGRESS : . P ST A1,DTELAD,A7 SAVE SYMBOLIC DTE ADDRESS : 2 P LDR A2,A7 ADDR TO SELECT AND POLL IN DTE
0x2543c4…254558 Dummy {f00=0x00b9, f01=0x0190, f02=» : t " P CM DTESTA,A7 CLEAR DTE STATUS ; $ P ABL RTREQ RETURN: REQUEST ERROR ; . P* ; V PRQOP80 EQU * ; ` P IFT CODE=1 ; t & P LDR* A2,A7 DTE ADDRESS IN EBCDIC ; P LDR A1,A2 ; P ANK A2,/FF ; P RF(Z) RQOP30 ONLY ONE BYTE ; ( P LC A2,TASCI
0x254558…2546ec Dummy {f00=0x00b9, f01=0x0190, f02=» A2,A7 SAVE ASCII VALUE IN DTETAB ; P XIF < * P =1 < 6 P ABL DTE:ON CONNECT MODEM < D PRQOP90 EQU * < f * P LD A2,DTEPLS,A7 PHYSICAL CONNECTION ? < z P ABL(NZ) RTOK YES RETURN OK < * P ABL RTPHYC RETURN PHYSICAL CONNECTION < P EJECT < P
0x2546ec…254880 Dummy {f00=0x00b9, f01=0x0190, f02=» < z P* FUNCTIONS: = L P* 1. IF CONDITIONAL, CHECK IF ANY LOGICAL CONNECTIONS (DWTS) ARE ACTIVE = P* ACTIVE. = l 0 P* 2. IF UNCONDITIONAL, DISCONNECT ALL DWT:S = P* = PRQCLOS EQU * = ( P LD A5,DWTOR,A6 GET OPTION AND ORDER = , P LD A2,E
0x254880…254a14 (1, 438) Dummy {f00=0x00b9, f01=0x0190, f02=» = l PRQCL20 EQU * > $ P LD A2,DTESTA,A7 GET DTE STATUS > P ABL(Z) RTOK RETURN : OK > D P SUK A2,2 DTE OPENED ? > d * P ABL(NZ) RTSEQ RETURN: SEQUENCE ERROR > $ P IM DTESTA,A7 CLOSE IN PROGRESS > ( P LDR A8,A6 SAVE REQUESTING DWT-ADDR > P* >
0x254a14…254ba8 Dummy {f00=0x00b9, f01=0x0190, f02=»AL CLOSE ? > | P RF(N) RQCL95 YES ! ? , P LD A2,DWTCHN,A6 GET POINTER TO NEXT DWT ? . . P ST A2,DTEDDT,A7 DISCARD DWT ADDR REMOVED ? ^ P RF RQCL60 ? PRQCL50 EQU * ? P XIF ? " P LD A6,DTEDWT,A7 GET DWT ADDR ? " P RF(Z) RQCL90 NO DWT IN QUEUE ?
0x254ba8…254d3c Dummy {f00=0x00b9, f01=0x0190, f02=»,DTEDWT,A7 DWT FIRST IN QUEUE REMOVED ? P IFT MESPAS=1 @ . PRQCL60 EQU * @ D P XIF @ X 0 P CF A15,RELBUF REMOVE BUFFERS QUEUED ON DWT @ d " P CM DWTSTA,A6 CLEAR DWT-STATUS @ P LDK A1,0 PRESET RETURN CODE @ P CWR A8,A6 REQUESTING DWT ? @ & P R
0x254d3c…254ed0 Dummy {f00=0x00b9, f01=0x0190, f02=»COMPLETE REQUEST WITH SEQUENCE ERROR @ PRQCL80 EQU * A , ( P CF A15,TENDIO COMPLETE THE REQUEST A @ " P RB RQCL40 TAKE NEXT ON QUEUE A l PRQCL90 EQU * A P =1 A & P LDR A6,A8 GET REQUESTING DWT ADDR A ( P LD A8,DWTECB,A6 RESTORE ECB ADDRESS A
0x254ed0…255064 Dummy {f00=0x00b9, f01=0x018e, f02=» PRQCL92 EQU * =1 B P IFT P6805=0 =1 B P LDKL A5,STB =1 B 4 $ P CF A5,CHALTI HALT I/P DEVICE =1 B L $ P CF A5,CHALTO HALT O/P DEVICE =1 B t P LDK A2,0 =1 B ( P CIO A2,1,LCUIN DISCONNECT MODEM =1 B P XIF =1 B P IFT P6805=1 =1 B " P
0x255064…2551f8 Dummy {f00=0x00b9, f01=0x0190, f02=» B l " P CM DTESTA,A7 CLEAR STATUS =1 C * P LD A1,DCTPGP POLL TIMER RUNNING ? =6 C . P RF(Z) RQCL94 NO =6 C P CM* DCTPGP KILL TIMER =6 C x P CM DCTPGP CLEAR POINTER =6 C PRQCL94 EQU * =6 C , P CM DTEDLS,A7 INDICATE DATA LINK DOWN =6 C P A
0x2551f8…25538c Dummy {f00=0x00b9, f01=0x0190, f02=» P ABL RTSEQ SEQUENCE ERROR D P EJECT D & P* D 4 P* CONNECT PASSIVE REQUEST D > P* D ` P* ACTIVATION PARAMETERS: D j : P* - SYMBOLIC SUBADDRESS (RIGHTMOST BYTE IN ECBBA-BFR) D & P* - DEVICE ADDRESSES IN ECBBA-BFR D " P* - LENGTH OF BUFFER
0x25538c…255520 Dummy {f00=0x00b9, f01=0x0190, f02=» . P* 2. VERIFY & CONVERT SUBTERMINAL ADDRESS E , P* 3. VERIFY AND STORE DEVICE ADDRESSES E 6 $ P* 4. LINK CALLING DWT TO QUEUE E f P* E PRQCON EQU * E & P LD A2,DTELAD,A7 SYMBOLIC DTE-ADDR E " P CW A2,ECBCW2,A8 CORRECT DTE ? E , P ABL(NE) RTR
0x255520…2556b4 (1, 439) Dummy {f00=0x00cf, f01=0x0190, f02=»ERROR E l $ P LD A2,DWTSTA,A6 GET DWT STATUS F " P SUK A2,2 ALREADY CONNECTED ? F 6 & P ABL(Z) RTOK ALREADY CONNECTED =17 F P IFT MESPAS=1 =13 F P LDK A2,/40 OPTION CODE =13 F & P CC A2,DWTOPT,A6 DISCARD DWT ? =13 F P RF(NE) RQCN10 NO =13 F
0x2556b4…255848 Dummy {f00=0x00cf, f01=0x0190, f02=» DWT ? =13 F n 8 P ST A6,DTEDDT,A7 SAVE POINTER TO TO DISCARD DWT =13 G P RF RQCN60 =13 G N PRQCN10 EQU * =13 G f P XIF =13 G P IFF MMUPAG=0 G * P LDKL A4,SUBBUF MMU BUFFER ADDRESS =16 G P ST A4,ECBBA,A8 TO ECB G * P CF A15,DC:MOT MOVE
0x255848…2559dc Dummy {f00=0x00cf, f01=0x0190, f02=»2,A4 GET SELECT SUB-ADDRESS G ( P SC A2,DWTSUB,A6 SAVE IT IN THE DWT H $ . P LD A1,ECBCW2,A8 GET SYMBOLIC DTE-ADDRESS H P 6 P CF A15,GETSNA VALIDATE AND TRANSLATE THE SUB-ADDR H P LDR A1,A1 IS IT OK ? H P RF(NN) RQCN20 YES H $ P CM DWTSUB,A7 CLEAR
0x2559dc…255b70 Dummy {f00=0x00cf, f01=0x0190, f02=» TO ASCII H l P XIF I P IFT MSV1=1 I * P SC A1,DWTCHP,A6 SAVE NETWORK ADDRESS I 2 P XIF I ` ( P LC A2,1,A4 GET SYMBOLIC ADDRESS =8 I l * P SC A2,DWTSUB+1,A6 SAVE IT IN THE DWT I . P LD A1,ECBCW2,A8 GET SYMBOLIC DTE ADDRESS I ( P ST A1,DWTLAD,A6
0x255b70…255d04 Dummy {f00=0x00cf, f01=0x0190, f02=»ES I $ P CM DWTSUB,A6 CLEAR SUB-ADDRESS J $ P CM DWTLAD,A6 CLEAR DTE ADDRESS J 2 $ P ABL RTREQ RETURN REQUEST ERROR J Z PRQCN30 EQU * J P IFT CODE=1 J 2 P LC A1,TASCII,A1 CONVERT FROM EBCDIC TO ASCII J P XIF J , P SC A1,DWTCHP+1,A6 SAVE NETW
0x255d04…255e98 Dummy {f00=0x00cf, f01=0x0190, f02=» P* K P =13 K PRQCN40 EQU * K . P LD A1,DTEDWT,A7 GET POINTER TO DWT QUEUE K 2 P RF(NZ) RQCN50 YES K d . P ST A6,DTEDWT,A7 SAVE POINTER TO DWT QUEUE K ~ P RF RQCN60 K PRQCN50 EQU * K P LDR A2,A1 MOV ADDR TO A2 K ( P LD A1,DWTCHN,A2
0x255e98…25602c Dummy {f00=0x00cf, f01=0x0190, f02=» K & P CM DWTCHN,A6 END OF CHAIN MARKER L , P ST A7,DWTCHD,A6 BACKWARD LINK TO ANCHOR L 2 P LDK A2,2 L b * P ST A2,DWTSTA,A6 SET STATUS: CONNECTED L t P LDKL A2,/8000 L $ P ST A2,DWTRTV,A6 STORE NO TIMING L P =13 L P IFT STARVI=1 L & P L
0x25602c…2561c0 Dummy {f00=0x00cf, f01=0x018e, f02=»NZ) RQCN63 NOT DE L P LDK A1,4 DE M PRQCN63 EQU * M . & P ORS A1,DWTST,A6 PUT IT IN DWT DK1 M D , P CF A15,INSSQ INSERT DWT IN STATUS QUEUE M n PRQCN65 EQU * =13 M P XIF M P* M P* START POLL TIMER M P* M $ P LD A2,DCTPGP POLL TIM
0x2561c0…256354 (1, 440) Dummy {f00=0x00d3, f01=0x0190, f02=» M P* N P* DISCONNECT REQUEST N P* N . P* ACTIVATION PARAMETERS: N 8 P* DWT-ADDRESS (A6) N X P* N t P* FUNCTIONS: N ~ & P* 1. CHECK IF IN CONNECTED STATE N 6 P* 2. REMOVE DWT-ADDRESS FROM CONFIGURATION CHAIN N & P* 3. SET DWT STAT
0x256354…2564e8 Dummy {f00=0x00d3, f01=0x0190, f02=»A,A6 DWT STATUS = DISCONNECTED ? N P ABL(Z) RTOK YES, RETURN: OK O ( * P LD A3,DTEDWT,A7 FIRST DWT ADDR TO A3 O L P RF(Z) RQDI20 END OF CHAIN O z P CWR A3,A6 OUR DWT ? O P RF(NE) RQDI10 NO O * P CF A15,RELBUF RELEASE QUEUED BUFFERS O 2 P LD A3,D
0x2564e8…25667c Dummy {f00=0x00d3, f01=0x018e, f02=»CN70 O PRQDI10 EQU * P . P LDR A5,A3 A5 CONTAINES PREVIOUS DWT-ADDR P < P LD A3,DWTCHN,A5 A3 CONTAINES ADDR TO NEXT DWT ON CHAIN P R P RF(Z) RQDI20 END OF CHAIN P P CWR A3,A6 OUR DWT ? P ( P RB(NE) RQDI10 NO TAKE NEXT IN CHAIN P * P CF A15,RELB
0x25667c…256810 Dummy {f00=0x00d3, f01=0x0190, f02=» P ` P CM DWTSTA,A6 SET DWT FREE Q P RB RQCN70 Q * PRQDI20 EQU * Q < P IFT MESPAS=1 Q P . P LD A3,DTEDDT,A7 TAKE THE DISCARD DWT ADDR Q f P CWR A3,A6 OUR DWT ? Q " P RF(NE) RQDI30 SEQUENCE ERROR Q * P CF A15,RELBUF RELEASE BUFFERS QUEUED Q P
0x256810…2569a4 Dummy {f00=0x00d3, f01=0x0190, f02=» P EJECT R P* R P* R P* READ STATUS REQUEST R & P* R D P* ACTIVATION PARAMETERS: R N P* DWT - ADDRESS (A6) R n P* R P* FUNCTIONS: R < P* 1. TRANSFER LOGICAL CONNECTION STATUS TO APPLICATION R P* R P* COMPLETION PARAMET
0x2569a4…256b38 Dummy {f00=0x00d3, f01=0x0190, f02=»........................ R ~ . P* . DWT . DTE . DATA . PHYS . S . P* . STATE . STATE . LINK . LINK . S R . P* . . . STATUS . STATUS . S . P* ........................................ S P* S PRQRSTS EQU * S P I
0x256b38…256ccc Dummy {f00=0x00d3, f01=0x018e, f02=»TATUS S z P SLL A2,4 BITS 0-3 T P AD A2,DTESTA,A7 DTE STATUS T ( P SLL A2,4 BITS 4-7 T L & P AD A2,DTEDLS,A7 DATA LINK STATUS T f P SLL A2,4 BITS 8-11 T 8 P AD A2,DTEPLS,A7 PHYSICAL LINK STATUS (BITS 12 - 15) T 2 P ST A2,ECBCW1,A8 STATUS TO ECB C
0x256ccc…256e60 Dummy {f00=0x00d3, f01=0x0190, f02=» T d P* U PRQRS10 EQU * U $ P LD A2,DTESTA,A7 GET DTE STATUS U & P SUK A2,2 OPEN ? U N $ P ABL(NZ) RTSEQ NO,SEQUENCE ERROR U f $ P LD A2,DWTSTA,A6 GET DWT STATUS U P SUK A2,2 CONNECTED ? U $ P ABL(NZ) RTSEQ NO,SEQUENCE ERROR U 6 P LD A4,DWTIP
0x256e60…256ff4 (1, 441) Dummy {f00=0x00d3, f01=0x0190, f02=» EJECT U P* V P* SET STATUS REQUEST V P* V 4 P* V > P* ACTIVATION PARAMETERS V H P* DWT ADDRESS (A6) V h P* V P* FUNCTIONS: V . P* SET DEVICE STATUS (ONLY IF STARVI = 1) V P* V P* DE DEVICE END : X`'00' V P* V (
0x256ff4…257188 Dummy {f00=0x00d3, f01=0x018e, f02=»URN CODE (A1) V P* W PRQSST EQU * W P IFT STARVI=0 W 4 & P ABL RTREQ SET STATUS NOT INCLUDED W J P XIF W t P IFT STARVI=1 W & P LD A1,ECBCW1,A8 GET DEVICE STATUS W P ANK A1,/1 'IR' ? DK1 W P RF(Z) RQST20 NO DK1 W , P CF A15,INSSQ
0x257188…25731c Dummy {f00=0x00d3, f01=0x0190, f02=» W z P RF(NZ) RQST90 NOT DE X & P LD A1,DWTST,A6 GET DEVICE STATUS X & ( P ANK A1,/B WACK SENT, DB OR IR ? =2 X P P RF(Z) RQST90 NO =2 X | , P CF A15,INSSQ INSERT DWT IN STATUS QUEUE X P LDK A1,4 SET DE X PRQST90 EQU * X P ORS A1,DWTST,A6 SAV
0x25731c…2574b0 Dummy {f00=0x00d3, f01=0x0190, f02=»TIVATION PARAMETERS: X P* TYPE = BITS 0-7 OF ECBCW1 Y P* ECB-ADDRESS (A8) Y @ ( P* DWT-ADDRESS OF LOW-LEVEL DWT (A6) Y P* Y P* FUNCTIONS: Y & P* 1. READ STATISTICS TO USER AREA Y & P* 2. RESET ALL STATISTICS BUFFERS Y P* Y P* CO
0x2574b0…257644 Dummy {f00=0x00d3, f01=0x018e, f02=» STTSTS=0 Y 8 P ABL RTREQ RC : REQUEST ERROR NO STATISTICS INCLUDED Z P XIF Z N P IFF STTSTS=0 Z Z " P CF A15,DCSRED READ STATISTICS Z p P LDR A1,A1 OK? Z , P ABL(NZ) RTREQ NO, RETURN: REQUEST ERROR Z P LD A1,ECBCW1,A8 GET TYPE Z & P SRL A1,8
0x257644…2577d8 Dummy {f00=0x00d3, f01=0x0190, f02=» Z b P LDR A1,A1 LUCKY AGAIN? [ , P ABL(NZ) RTREQ NO, RETURN: REQUEST ERROR [ ( PRQST40 EQU * [ X P ABL RTOK RETURN: OK [ l P XIF [ P EJECT [ P* [ P* SET TIMEOUT VALUE [ P* [ P* ACTIVATION PARAMETERS: [ , P* ECBCW1 >= 0 : ACTIV
0x2577d8…25796c Dummy {f00=0x00d3, f01=0x0190, f02=»* < 0: DE-ACTIVATE TIMING CONTROL [ P* 4 P* FUNCTIONS: > , P* STORE VALUE DIRECTLY IN CALLER'S DWT R P* P* COMPLETION PARAMETERS: & P* DWTRTV = TIMEOUT VALUE = ECBCW1 P* PRQTIME EQU * 0 P LD A2,ECBCW1,A8 GET
0x25796c…257b00 Dummy {f00=0x00d3, f01=0x018e, f02=» P* ] P* ACTIVATION PARAMETERS: ] P* BUFFER ADDRESS (ECBBA) ] 2 P* BUFFER LENGTH (ECBRL) ] T P* SUBTERMINAL ADDRESS (DWT) ] t P* ECB CONTROL WORD 1 ] P* ] P* FUNCTIONS: ] < P* 1. VERIFY THAT LOGICAL & PHYSICAL CONNECTIONS EXI
0x257b00…257c94 (1, 442) Dummy {f00=0x00d4, f01=0x0190, f02=» ] PRQSEND EQU * ^ $ P LD A2,DWTSTA,A6 GET DWT STATUS ^ P SUK A2,2 CONNECTED ? ^ D . P ABL(NZ) RTSEQ NO, RETURN: SEQUENCE ERROR ^ b 2 P LD A2,DTEPLS,A7 PHYSICAL CONNECTION ACTICE ? ^ 8 P ABL(Z) RTPHYC NO, RETURN: PHYSICAL CONNECTION ERROR ^ 0 P L
0x257c94…257e28 Dummy {f00=0x00d4, f01=0x0190, f02=»N ^ v P ANK A2,/FF _ $ P RF(Z) RQSE10 THERE IS NO OPTION _ P SUK A2,/20 WHICH OPTION ? _ F . P ABL(NZ) RTREQ WRONG OPTION :REQUEST ERROR _ h * P CF A15,RELBUF RELEASE BUFFERS QUEUED _ PRQSE10 EQU * _ P IFT MMUPAG=1 _ $ P LD A2,ECBRL,A8 REQUES
0x257e28…257fbc Dummy {f00=0x00d4, f01=0x018e, f02=»TIMEWR START TIMER _ $ P CF A15,INSWQ QUEUE SEND REQUEST ` P ABL TDISP ` B P* ` T P EJECT ` ^ P* ` l P* RECEIVE REQUEST ` v P* ` P* ACTIVATION PARAMETERS: ` P* BUFFER ADDRESS (ECBBA) ` 0 P* REQUESTED BUFFER LENGTH IN CHARS. (ECBRL)
0x257fbc…258150 Dummy {f00=0x00d4, f01=0x0190, f02=» F P* 2. TRANSFER TO THE APPLICATION ANY MESSAGE QUEUED FOR THE DWT, a @ P* 3. COMPLETE WHEN MESSAGE RECEIVED OR NO MESSAGE RECEIVED a N P* WITHIN TIMEOUT PERIOD. a P* a P* COMPLETION PARAMETERS: a 0 P* ACTUAL LENGTH OF RECEIVED MESSAGE (EC
0x258150…2582e4 Dummy {f00=0x00d4, f01=0x0190, f02=» . P ABL(NZ) RTSEQ NO, RETURN: SEQUENCE ERROR b 2 P LD A2,DTEPLS,A7 PHYSICAL CONNECTION ACTIVE ? b 6 8 P ABL(Z) RTPHYC NO, RETURN: PHYSICAL CONNECTION ERROR b l * P LD A4,DWTIPC,A6 ANY BUFFER ON QUEUE ? b P RF(NZ) RQRE10 YES b 0 P LD A2,DTEDLS,A7 LOGICAL
0x2582e4…258478 Dummy {f00=0x00d4, f01=0x0190, f02=»TO DISPATCHER b PRQRE10 EQU * c P LD A3,2,A4 EFFECTIVE LENGTH c * P ST A3,ECBEL,A8 c N * P LD A1,DWTLAD,A6 SYMBOLIC DTE-ADDRESS c f $ P LD A2,4,A4 NETWORK SUB-ADDRESS c , P CF A15,GETSSA GET SYMBOLIC SUB-ADDRESS c ( P ST A1,ECBCW2,A8 AND SAVE IT
0x258478…25860c Dummy {f00=0x00d4, f01=0x0190, f02=» 1 =9 c j P XIF =9 d * P LDK A1,0 RC : ACCEPTED AND COMPLETED d ( P LDR* A2,A4 GET NEXT BUFFER IN QUEUE d N * P RF(Z) RQRE20 NO MORE BUFFERS IN QUEUE d z 0 P ORKL A1,R:DATA RC: AND MORE DATA AVAILABLE d PRQRE20 EQU * d . P ST A2,DWTIPC,A6 STORE
0x25860c…2587a0 Dummy {f00=0x00d4, f01=0x0190, f02=»HER d x P EJECT e P* e P* e $ $ P* COMPLETE APPLICATION REQUEST e . P* e V PRTREQ EQU * e ` & P LDKL A1,R:REQ RC = REQUEST ERROR e t P RF RQRTN e PRTABRT EQU * e P LDKL A1,R:ABRT RC = ABORTED e P RF RQRTN e PRTTIME EQU * e
0x2587a0…258934 (1, 443) Dummy {f00=0x00d4, f01=0x018e, f02=» PRTLGTH EQU * f & P LDK A1,R:LGTH RC = ILLEGAL LENGTH f P RF RQRTN f B PRTLOGC EQU * f T 0 P LDK A1,R:LOGC RC = LOGICAL CONNECTION ERROR f h P RF RQRTN f PRTPHYC EQU * f 2 P LDK A1,R:PHYC RC = PHYSICAL CONNECTION ERROR f P RF RQRTN f
0x258934…258ac8 Dummy {f00=0x00d4, f01=0x0190, f02=» P* g 8 P* LOOKUP - LOOK UP KEY IN TABLE & BRANCH ON ADDRESS g P* g J P* CALL: g T 8 P* CF A15,LOOKUP TABLE ADDRESS TO STACK g d < P* DATA LAST,ADDRE LAST ENTRY; ERROR ADDRESS g > P* DATA KEY1,ADDR1 KEY (A2);
0x258ac8…258c5c Dummy {f00=0x00d4, f01=0x018e, f02=» & A4 DESTROYED g P* h PLOOKUP EQU * h " < P LDR* A3,A15 POINT TO NEXT INSTRUCTION ADDRESS IN STACK h 6 . P LDR* A3,A15 GET CONTENTS = TABLE ADDRESS h v & P LDR* A4,A3 GET LAST LEGAL ADDRESS h P LD A1,2,A3 ERROR ADDRESS h P* h PLOOK50 EQU
0x258c5c…258df0 Dummy {f00=0x00d4, f01=0x0190, f02=» & P CWR* A2,A3 KEY = VALUE IN TABLE? i ( P RB(NE) LOOK50 NO - CHECK NEXT ENTRY i . & P ABI 2,A3 BRANCH TO TABLE ADDRESS i Z P* KEY NOT FOUND i PLOOK90 EQU * i " P LDR P,A1 GO TO ERROR ADDRESS i P EJECT i P* i P* i P* i " P* REQU
0x258df0…258f84 Dummy {f00=0x00d4, f01=0x0190, f02=» & P LD A2,DWTRTV,A6 GET TIMEOUT VALUE j P RF(N) TIMRTN NO TIMING j . . P RF(Z) ITOUTR TIMER=0 => IMMEDIATE TIMEOUT j N P ST A2,TIMERR j P CF A15,SETIME j P DATA TOUTRE j PTIMERR DATA 0 j ( P ST A4,DWTRTP,A6 STORE TIMER POINTER j PTIMRTN
0x258f84…259118 Dummy {f00=0x00d4, f01=0x0190, f02=» PTOUTRE EQU * k P LDR A6,A1 FETCH DWT k P CM DWTRTP,A6 k 4 * P RF TIMOUT COMPLETE REQUEST RC=TIMEOUT k J P* k x P* k " P* RETURN FROM TIMER HANDLING k P* k P EJECT k P* k P* SEND TIMER=TIMWR k P* k PTIMEWR LDR A1,A6
0x259118…2592ac Dummy {f00=0x00d4, f01=0x018e, f02=»A2,TIMWR k P CF A15,SETIME l P DATA TOUTWR l & PTIMWR DATA 0 l : P ST A4,DWTRTP,A6 l N P RB TIMRTN l f P* l x P* TIMEOUT WRITE TIMER l P* l PTOUTWR EQU * l P LDR A6,A1 FETCH DWT l P CM DWTRTP,A6 l * P CF A15,REMOVW REMOVE FR
0x2592ac…259440 Dummy {f00=0x00d4, f01=0x0190, f02=» l P CWR A2,A6 m * P RF(NE) TIMOUT THIS DWT IS NOT WRITING m ( P CM XACK INDICATE 'ACK NOT EXPECTED' m H P CM FDWTUT m t PTIMOUT EQU * m , P ABL RTTIME COMPLETE REQUEST RC=TIMEOUT m P EJECT m P* m P* m P* STOP REQUEST TIMING m
0x259440…2595d4 (1, 444) Dummy {f00=0x00d4, f01=0x0190, f02=» RF(Z) CTIM10 NOT RUNNING m P IFT REMTIM=1 =9 n " P LDR* A2,A2 =9 n < $ P NGR A2,A2 GET REMAINING TIME =9 n T P XIF =9 n | P CM* DWTRTP,A6 KILL TIMER =9 n P CM DWTRTP,A6 n P =3 n PCTIM10 EQU * n P ABL RTNA15 n P EJECT n
0x2595d4…259768 Dummy {f00=0x00d4, f01=0x0190, f02=»4 CONTAINS BUFFER ADDRESS n P* A2 AND A3 ARE DESTROYED o " P* o D P* o N ( PGRBUF LDKL A2,DCRBUF RECEIVE BUFFERS o X P INH o P LDR* A4,A2 o P RF(Z) GBUF10 NO BUFFER FREE o . P LDR* A3,A4 REMOVE BUFFER FROM FREE CHAIN o P STR A3,A2 o
0x259768…2598fc Dummy {f00=0x00d4, f01=0x0190, f02=»FFER ADDRESS o $ P* CALLING SEQUENCE: CF A15,RRBUF p P* A2 AND A3 ARE DESTROYED p < P* p ^ P* p h ( PRRBUF LDKL A2,DCRBUF RECEIVE BUFFERS p r P INH p PRBUF10 EQU * p P LDR* A3,A2 p P RF(Z) RBUF20 p P LDR A2,A3 p P RB RBUF10 p
0x2598fc…259a90 Dummy {f00=0x00d4, f01=0x0190, f02=»IVE BUFFERS QUEUED ON A DWT p ~ P* q $ P* A6 - DWT ADDR q . P* A1 AND A4 ARE DESTROYED q F ( P* CALLING SEQUENCE: CF A15,RELBUF q h P* q P* q PRELBUF EQU * q * P LDK A1,DWTIPC SET BUFFER QUEUE DISP. q P ADR A1,A6 q PRLBU10 EQU *
0x259a90…259c24 Dummy {f00=0x00d4, f01=0x0190, f02=»RRBUF RELEASE BUFFER q P RB RLBU10 r P EJECT r . P* r < P* r F & P* INSERT DWT IN SEND REQUEST QUEUE r P P* r z P* A2,A3,A4 DESTROYED r P* A6=DWT r P* r ( PINSWQ LDKL A2,DCWRQ GET QUEUE ANCHOR r P LDK A4,DWTOPN r PINSWQ2 LDR*
0x259c24…259db8 Dummy {f00=0x00d4, f01=0x0190, f02=»UEUE r z " P CMR A4 INDICATE END OF QUEUE s P RB GBUF10 RETURN s 2 P EJECT s L P* s Z P* s d ( P* REMOVE DWT FROM SEND REQUEST QUEUE s n P* s P* A2,A3,A4 DESTROYED s P* A6=DWT s P* s * PREMOVW LDKL A2,DCWRQ GET QUEUE ANCHOR s . P
0x259db8…259f4c Dummy {f00=0x00d4, f01=0x0190, f02=»UEUE: RETURN s z P CWR A3,A4 t P RF(E) REM15 t & P LDR A2,A3 GET NEXT t : P RB REM10 t V PREM15 LDR* A3,A4 REMOVE t h P STR A3,A2 t P RB GBUF10 RETURN t P EJECT t P* t P* t P* INSERT DWT IN STATUS QUEUE t P* t P IFF
0x259f4c…25a0e0 Dummy {f00=0x00d4, f01=0x0190, f02=» t d P ORS A1,DWTST,A6 PENDING DK2 u $ P LDKL A2,DCSTQ GET QUEUE ANCHOR u , P LDK A4,DWTOPE u T P RB INSWQ2 u j P* u | P* u " P* REMOVE DWT FROM STATUS QUEUE u P* u P* A2,A3,A4 DESTROYED u P* A6=DWT u P* u PREMOVS EQU * u
0x25a0e0…25a274 (1, 445) Dummy {f00=0x00d4, f01=0x0190, f02=»UEUE ANCHOR u | P LDK A4,DWTOPE v P RB REM06 v * P XIF v < P EJECT v H P* v V P* v ` $ P* QUEUE ALLOCATED RECEIVE BUFFER v j P* v P* A4=BUFFER ADDR v P* A2,A3 DESTROYED v P* v PQRBUF EQU * v P SUK A4,6 v * P LDK A2,DW
0x25a274…25a408 Dummy {f00=0x00d4, f01=0x0190, f02=»DR A2,A3 v P RB QR100 w & PQR200 STR A4,A2 INSERT INTO QUEUE w " " P CMR A4 INDICATE END OF QUEUE w L P RTN A5 w r P EJECT w P* w P* w P* STORE REGISTER A3-A8 w $ P* CALLING SEQUENSE: CF A15,STREG w P* w PSTREG ST A3,LCA3 w
0x25a408…25a59c Dummy {f00=0x00d4, f01=0x0190, f02=» P* x P* RESTORE x $ P* CALLING SEQUENCE: CF A15,LDREG x P* x H PLDREG LDKL A3,0 x R PLCA3 EQU *-2 x j P LDKL A4,0 x ~ PLCA4 EQU *-2 x P LDKL A5,0 x PLCA5 EQU *-2 x P LDKL A6,0 x PLCA6 EQU *-2 x P LDKL A7,0 x PLCA7 E
0x25a59c…25a730 Dummy {f00=0x00d4, f01=0x018e, f02=» ADKL A15,4 x P ABR* A15 y P EJECT y & P* y 4 P* POLL TIME OUT y > P* y V ( PPTOUT LDKL A5,STB LOAD A5 STACK BASE y ` " P LDR A6,A1 RELOAD DWT ADDRESS y P LDKL A7,DTETAB y P CM DTEDLS,A7 y P IFT STTSTS=1 y P* y P* y
0x25a730…25a8c4 Dummy {f00=0x00d4, f01=0x018e, f02=» P ABL TDISP z P* z 4 P* RESTART POLL TIMER WHEN POLL HAS BEEN RECEIVED z P* z X PCPTIM EQU * z b P LDK A2,1 INDICATE z v " P ST A2,DTEDLS,A7 DATA LINK UP z P LDKL A2,-TIMPOL z P ST* A2,DCTPGP RESTART TIMER z P RTN A5 z P* z
0x25a8c4…25aa58 Dummy {f00=0x00d4, f01=0x018e, f02=» z t P DATA PTOUT,TIMPOL { & P ST A4,DCTPGP STORE TIMER POINTER { " P RB RTNA15 RETURN { L P EJECT { f P* { t P* START PROCEDURE TIMER { ~ P* { PSPTIM EQU * { $ P LDR A1,A6 LOAD DWT AS PARAMETER { P CF A15,SETIME { P DATA PRTOUT,T
0x25aa58…25abec Dummy {f00=0x00d4, f01=0x0190, f02=» { ~ P LDR A6,A1 RELOAD A6 | P LDKL A5,STB LOAD STACK BASE | $ P LDKL A7,DTETAB | H P IFT STTSTS=1 | ` P* | v P* | P* COUNT PROCEDURE TIME OUT | P* | P LDK A1,CSSXC2 | P CF A15,DCSUPS | P XIF | , P CF A5,CHALTI HALT INPUT
0x25abec…25ad80 Dummy {f00=0x00d4, f01=0x0190, f02=»DURE TIMER | x PPRT10 ABL BRM } P EJECT } ( P* } 6 P* STOP PROCEDURE TIMER } @ P* } ^ ( PHPTIM LD A1,DCTPP GET TIMER POINTER } h P RF(Z) HPT10 NOT RUNNING } P CMR A1 STOP TIMER } P CM DCTPP } PHPT10 RTN A5 } P } P* } P*
0x25ad80…25af14 (1, 446) Dummy {f00=0x00d5, f01=0x0190, f02=» P DATA DTE:10,10 ~ P =1 ~ P LDKL A5,STB =1 ~ * " P CF A5,CSYNCI CONNECT MODEM =1 ~ B * P CF A5,CHALTI NO INTERRUPTS ALLOWED =1 ~ h P ABL TDISP =1 ~ P ~ P ~ P* ~ P* ~ P* MODEM-CONNECT TIMEOUT ~ P* ~ P ~ PDTE:
0x25af14…25b0a8 Dummy {f00=0x00d5, f01=0x0190, f02=»T CU IN ACTIVE MODE =1 ~ 8 P CF A5,CHALTI HALT I/P DEVICE TO GET MODEM STATUS =1 0 P IM DTEPLS,A7 PRESET PHYSICAL STATUS = OK =1 Z P ANK A2,1 MODEM OK ? =1 P RF(Z) DTE:20 YES =1 , P CM DTEPLS,A7 INDICATE PHYSICAL ERROR =1 PDTE:20 EQU *
0x25b0a8…25b23c Dummy {f00=0x00d5, f01=0x0190, f02=» ABL BRM START I/P =1 P EJECT P IFT MESPAS=1 , P* B P* L P* GET DWT ADDRESS V P* p PMESDWT EQU * z & P CWR A6,A7 IS IT DTETAB-ADDRESS ? P RF(E) MES200 YES $ P LD A2,DTEDDT,A7 GET ADDR TO DDT P CWR A6,A2 IS
0x25b23c…25b3d0 Dummy {f00=0x00d5, f01=0x0190, f02=»ORDER ? t P ANK A2,/FF P RF(Z) MES200 YES $ & P SUK A2,RECEIVE A RECEIVE ORDER ? > P RF(Z) MES200 YES h PMESD50 EQU * 0 P LD A2,DTEDDT,A7 IS THERE A DDT CONNECTED ? P RF(Z) MES100 NO P LDR A6,A2 GET DDT-ADDR P RF ME
0x25b3d0…25b564 Dummy {f00=0x00d5, f01=0x0190, f02=»CT P* P* P* BASIC RECEIVE MODE P* : " P* ENTERED EVERY TIME A MESSAGE D & P* IS EXPECTED FROM THE MASTER SIDE j P* P* PBRM EQU * P LDKL A5,STB LOAD STACKBASE P CM SYNSW CLEAR SYN-SWITCH " P CM TPM
0x25b564…25b6f8 Dummy {f00=0x00d5, f01=0x0190, f02=» t P RF(NZ) BRM120 PARITY ERROR P* , P* 6 * P* CHECK IF IT IS A CONTROL CHARACTER @ P* n P LDR A1,A2 x : P CF A15,LOOKUP BRANCH ON CODES, TABLE ADDRESS TO STACK : P DATA BRM100,BRM200 LAST ENTRY,POLL OR SELECT SEQUENCE & P D
0x25b6f8…25b88c Dummy {f00=0x00d5, f01=0x0190, f02=» RECEIVED | " P DATA DLE,DLE100 DLE RECEIVED ( PBRM100 DATA NAK,NAK100 NAK RECEIVED 8 P EJECT d P* r P* | P* THROUGHPUT ERROR P* PBRM110 EQU * ( P CM XSTA INDICATE "INVALID MESSAGE" & P LDKL A5,STB LOAD STACKBASE
0x25b88c…25ba20 Dummy {f00=0x00d5, f01=0x018e, f02=»20 EQU * P CF A5,READ READ CHARACTER 0 P LD A1,DCSTCU ANY STATUS FROM CONTROL UNIT ? 2 P RF(NZ) BRM130 YES f PBRM125 EQU * DK1 P ANK A2,/7F P SUK A2,/7F P RB(NZ) BRM120 NO PBRM130 EQU * P CF A5,CHALTI HALT INPUT
0x25ba20…25bbb4 (1, 447) Dummy {f00=0x00d5, f01=0x0190, f02=» P IFT MSV1=0 P LDR A4,A2 P CF A5,READP READ CHARACTER . P CWR A2,A4 R ( P RB(NE) BRM125 INVALID SEQUENCE DK1 d P XIF P LDK A3,0 P CC A2,1,A7 IS IT A POLL ? P RF(E) BRM210 POLLING P LDK A3,2 P CCR A2,
0x25bbb4…25bd48 Dummy {f00=0x00d5, f01=0x0190, f02=»M PARITY ERROR P LDR A4,A2 P IFT MSV1=0 ( P CF A5,READP READ 2:ND STA < P CWR A2,A4 ^ $ P RB(NE) BRM120 INVALID SEQUENCE p P XIF P CF A5,READP READ ENQ P SUK A2,ENQ $ P RB(NE) BRM120 INVALID SEQUENCE P* P
0x25bd48…25bedc Dummy {f00=0x00d5, f01=0x0190, f02=»SELECT OR A POLL ADDRESS | P* P LDK A1,1 * P ST A1,CACK LOAD ACK-COUNTER < P LDR A2,A4 ` P SUK A3,2 r P RF(Z) SELECT SELECTING P* P* P* POLLING P* P CWK A4,GP P RF(E) GPOLL GENERAL POLL 6 P
0x25bedc…25c070 Dummy {f00=0x00d5, f01=0x0190, f02=»S BEEN RECEIVED ~ P* P* " P IFF STARVI+SPECP=0 , P LD A1,XACK H P RF(NZ) POL100 ACK EXPECTED * P LDR A6,A3 LOAD DWT ADDRESS IN A6 =10 8 P RF(Z) POL150 REQ. DEV. NOT CONNECTED, SEND EOT =10 P CF A5,CPTIM CHECK POLLTIMER
0x25c070…25c204 Dummy {f00=0x00d5, f01=0x0190, f02=»TARVI+SPECP=0 P LD A1,DWTST,A6 P RF(N) POL150 NO REQUEST . P LD A1,DWTOR,A6 GET ORDER N & P ANK A1,/FF MASK AWAY OPTION PART p P SUK A1,6 P RF(Z) POL170 WRITE REQUEST P XIF P RF POL150 SEND EOT P EJECT P*
0x25c204…25c398 Dummy {f00=0x00d5, f01=0x0190, f02=»NOT EXPECTED ~ P =11 PPOL100 EQU * $ * P CF A5,HPTIM KILL PROCEDURE TIMER =11 8 P CF A5,TRENQ SEND ENQ f & P CF A5,SPTIM START PROCEDURE TIMER P ABL BRM WAIT FOR RESPONSE PPOL110 EQU * " P CF A5,CPTIM CHECK POLL TIMER
0x25c398…25c52c Dummy {f00=0x00d5, f01=0x0190, f02=»QU * P CF A5,TRSTA SEND STATUS & P CF A5,SPTIM START PROCEDURE TIMER , P IM XACK SET 'ACK EXPECTED' V P XIF z P IFF STARVI=1 P RF POL140 P XIF PPOL130 EQU * P ABL BRM PPOL140 EQU * P LD A6,DCWRQ " P R
0x25c52c…25c6c0 Dummy {f00=0x00d5, f01=0x0190, f02=»PN GET DWT ADDRESS PPOL170 EQU * $ P LD A8,DWTECB,A6 GET ECB ADDRESS . P RF(NZ) POL180 V P CF A15,REMOVW l P RB POL150 PPOL180 EQU * P ST A8,FECB SAVE ECB ADDRESS P ST A6,FDWTUT SAVE A6 P IFF MMUPAG=0 $ P LDKL A4
0x25c6c0…25c854 (1, 448) Dummy {f00=0x00d5, f01=0x0190, f02=»T BUFFER ADDRESS ~ P LD A3,ECBRL,A8 GET LENGTH PPOL190 EQU * : & P ST A4,FECBBA SAVE BUFFER ADDRESS N P . =15 x P ST A3,FECBRL SAVE LENGTH P CM FBAX RESET BUFFER INDEX PPOL200 EQU * P CM XETX RESET 'ETX SENT' P CM
0x25c854…25c9e8 Dummy {f00=0x00d5, f01=0x0190, f02=» P EJECT P* P* P* SELECT HAS BEEN RECEIVED * P* N PSELECT EQU * X P CF A5,FINTES l P LDR A6,A3 GET DWT-ADDR P RF(NZ) SEL100 P IFT MESPAS=1 " P LD A6,DTEDDT,A7 GET DDT-ADDR P RF(NZ) SEL100
0x25c9e8…25cb7c Dummy {f00=0x00d5, f01=0x0190, f02=» STARVI=0 P LD A1,DWTST,A6 GET STATUS P LDR A3,A1 4 . P ANKL A1,PENDST STAT. MESSAGE PENDING? DK2 F $ P RF(Z) SEL120 NO PENDING STATUS x P CF A5,TRRVI SEND RVI P XIF P IFF STARVI=1 P RF SEL120 P XIF PSEL110 EQU
0x25cb7c…25cd10 Dummy {f00=0x00d5, f01=0x018e, f02=»L140 YES =2 P LD A1,DWTST,A6 CHECK IR DK2 P ANK A1,1 . DK2 8 P RF(Z) SEL130 NO, OPERABLE P P CF A5,TRNAK INOPERABLE DK2 r P RB SEL110 . DK2 PSEL130 EQU * P XIF P =2 P LD A1,DCRBUF $ P RF(NZ) SEL150 BUFFE
0x25cd10…25cea4 Dummy {f00=0x00d5, f01=0x0190, f02=» PSEL140 EQU * P =2 P IFF NOWACK=1 =2 & P CF A5,TRWACK SEND WACK @ P XIF ` P RB SEL110 l PSEL150 EQU * ~ , P CF A5,PRREC PREPARE FOR TEXT RECEPTION P ADK A1,6 P ST A1,FBLST P CF A5,TRACK SEND ACK,0 P
0x25cea4…25d038 Dummy {f00=0x00d5, f01=0x0190, f02=» STOP PROCEDURE TIMER P IFT RCOM=1 P CM XRB RESET READ BUFFER 2 P XIF T P LD A1,XACK ` & P RF(Z) EOT120 ACK IS NOT EXPECTED t " P LD A6,FDWTUT GET WRITING DWT P RF(Z) EOT110 NO ONE WRITING P LDK A1,2 SET RC=2 ( P CF A5
0x25d038…25d1cc Dummy {f00=0x00d5, f01=0x0190, f02=»CTED' | P ABL BRM P EJECT P* , P* 6 P* STX HAS BEEN RECEIVED @ P* ` P* j PSTX100 EQU * t P CF A5,HPTIM P IFT TPMODE=1 P ABL BRM120 INVALID SEQENCE PSTX110 EQU * P XIF P LD A1,XSEL
0x25d1cc…25d360 Dummy {f00=0x00d5, f01=0x0190, f02=»FT STTSTS=1 P RF(NZ) STX120 P* * P* NO BUFFER AVAILABLE 4 P* R P LDK A1,CSSRBY $ P CF A15,DCSUPS INCREMENT COUNTER r P ABL BRM120 P XIF PSTX120 EQU * P CF A5,RDMESS READ MESSAGE P IFT STTSTS=1 P*
0x25d360…25d4f4 (1, 449) Dummy {f00=0x00d6, f01=0x0190, f02=» RF(NZ) STX170 MESSAGE OK PSTX130 EQU * " ( P CM XSTA INDICATE 'INVALID MESSAGE' 6 PSTX140 EQU * b P CF A5,TRNAK SEND NAK v P ABL BRM PSTX150 EQU * P IFT RCOM=1 P LD A1,XACK & P RF(Z) STX160 ACK IS NOT EXPECTED
0x25d4f4…25d688 Dummy {f00=0x00d6, f01=0x0190, f02=»ESYNCHRONIZE p P LDR* A2,A6 GET STA , P CF A5,PRREC PREPARE FOR TEXT RECEPTION 0 P LDK A1,0 SET RC=0 ` ( P CF A5,CWRITE COMPLETE WRITE REQUEST z P CM CACK PRESET ACK-1 P RB STX120 READ THE MESSAGE P XIF ( PSTX160 CF A5,READ RE
0x25d688…25d81c Dummy {f00=0x00d6, f01=0x0190, f02=» P IM XSTA INDICATE MESSAGE OK $ P LD A4,DCRBUF GET BUFFER ADDRESS ( P ADK A4,6 P P CW A4,FBLST b " P RF(NE) STX180 NOT FIRST BLOCK v P IFF RCOM=0 P LDK A1,ESC P CCR A1,A4 P RB(NE) STX130 ESC NOT FOUND P LC A1,1,A4 GE
0x25d81c…25d9b0 Dummy {f00=0x00d6, f01=0x0190, f02=»BUFFER RECEIVED ~ P XIF PSTX180 EQU * $ P SUK A3,1 8 P RF(Z) STX280 SEND ACK J P LD A6,FDWTIN GET INPUT DWT h P IFT MESPAS=1 P CF A15,MESDWT P XIF P CWR A7,A6 IS IT DTETAB ? P RF(E) STX280 SEND ACK P LD
0x25d9b0…25db44 Dummy {f00=0x00d6, f01=0x0190, f02=» ADK A4,6 P IFT RCOM=1 P LDR* A2,A6 GET ADDRESS & , P LC A2,TEBCDIC,A2 TRANSLATE IT TO EBCDIC F $ P LD A1,DCRBUF IS THERE A BUFFER v P RF(Z) STX200 NO P ST A2,+4,A1 STORE THE ADDR PSTX200 EQU * P XIF " P LD A2,DWTST,A
0x25db44…25dcd8 Dummy {f00=0x00d6, f01=0x0190, f02=»? p P XIF P CWK A2,RECEIVE A RECEIVE ? P RF(NE) STX220 NO : PSTX210 EQU * T P =12 h $ P LD A8,DWTECB,A6 GET ECB ADDRESS x P LD A3,-4,A4 GET LENGTH * P ST A3,ECBEL,A8 STORE EFFECTIVE LENGTH . P LD A1,DWTLAD,A6 SYMBOLIC
0x25dcd8…25de6c Dummy {f00=0x00d6, f01=0x018e, f02=» AND SAVE IT IN ECB =12 $ P LDK A1,0 RESET RETURN CODE =12 & P CF A15,CTIME STOP REQUEST TIMING H P IFT REMTIM=1 =9 r * P ST A2,ECBCW1,A8 STORE REMAINING TIME P XIF =9 PSTX220 EQU * P IFT STARVI=1 P LC A2,+2,A4 GET W
0x25de6c…25e000 Dummy {f00=0x00d6, f01=0x0190, f02=» P ST A2,DWTST,A6 PSTX230 EQU * P XIF 4 " P LD A2,DWTST,A6 ANY REQUEST ? @ P RF(NN) STX240 YES f P CF A5,QRBUF QUEUE BUFFER P RF STX270 PSTX240 EQU * P LD A2,DWTOR,A6 GET ORDER $ P CWK A2,RECEIVE RECEIVE ORDER
0x25e000…25e194 (1, 450) Dummy {f00=0x00d6, f01=0x0190, f02=»F(Z) STX250 NO P ORKL A1,R:DATA YES PSTX250 EQU * 2 & P CF A15,DC:MIN MOVE TO USER BUFFER F P RF STX270 p PSTX260 EQU * P CF A5,QRBUF QUEUE BUFFER P IFT EM3270=1 P LD A2,DWTOR,A6 GET ORDER ( P RF(NZ) STX270 NOT ANY M
0x25e194…25e328 Dummy {f00=0x00d6, f01=0x0190, f02=»ATUS z P ANK A1,8 MASK A1 P RF(Z) STX280 & P CF A5,TRWACK SEN WACK < P RF STX290 Z P XIF l PSTX280 EQU * x P CF A5,TRACK SEND ACK PSTX290 EQU * P ABL BRM P EJECT P* P* , P* READ MODIFIED OR READ
0x25e328…25e4bc Dummy {f00=0x00d6, f01=0x0190, f02=»ET SELECT EXPECTED 4 P LD A6,FDWTIN DWT-ADDRESS FOR ADDRESSED TERMINAL $ P LD A4,DWTBUF,A6 BUFFER ADDRESS R $ P SUK A4,2 SDJUST BUFFER ADDRESS z " P LDKL A3,1922 REQUESTED LENGTH " P IM XRB SET READ BUFFER SWITCH P CM FDWTUT P LDK A1,
0x25e4bc…25e650 Dummy {f00=0x00d6, f01=0x0190, f02=»EIVED ~ P* P* PENQ100 EQU * " & P CF A5,HPTIM STOP PROCEDURE TIMER 6 P LD A1,XACK ` , P RF(NZ) NAK110 RETRANSMISSION OF MESSAGE t P OR A1,XSEL " P RF(Z) ENQ110 IN CONTROL STATE . P CF A5,TRREP REPEAT LAST CONTROL SEQUENCE
0x25e650…25e7e4 Dummy {f00=0x00d6, f01=0x0190, f02=» EQU * & P CF A5,HPTIM STOP PROCEDURE TIMER P LD A1,XACK 8 P RF(NZ) NAK110 ACK EXPECTED L P OR A1,XSEL p " P RB(Z) ENQ110 IN CONTROL STATE P RF DLE160 PNAK110 EQU * " P LD A6,FDWTUT GET WRITING DWT P IFF STARVI=0
0x25e7e4…25e978 Dummy {f00=0x00d6, f01=0x018e, f02=» & P SU A1,FECBBA COMPUTE BUFFER INDEX P ST A1,FBAX . P IFT STTSTS=1 B P* X P* b $ P* COUNT MESSAGES RETRANSMITTED l P* P LDK A1,CSSTRT P CF A15,DCSUPS P XIF P ABL POL200 P EJECT P* P*
0x25e978…25eb0c Dummy {f00=0x00d6, f01=0x0190, f02=» P RF(NZ) DLE110 P IFT TPMODE=1 P CF A5,READ 0 P CWK A2,STX D * P ABL(Z) STX110 YES - TRANSPARENT TEXT X P XIF P RB ENQ110 PDLE110 EQU * & P CF A5,READ READ SECOND CHARACTER P CWK A2,ACKPAR IS IT ACK 0 ? P R
0x25eb0c…25eca0 Dummy {f00=0x00d6, f01=0x0190, f02=»DLE120 EQU * P CF A5,TRENQ SEND ENQ & P CF A5,SPTIM START PROCEDURE TIMER 2 P RB ENQ110 PDLE130 EQU * n P CWK A2,ACK1 P RF(NE) DLE180 P* P* ACK , 1 RECEIVED P* P LD A1,CACK GET ACK COUNTER $ P RB(Z) DLE
0x25eca0…25ee34 (1, 451) Dummy {f00=0x00d6, f01=0x0190, f02=»S BEEN RECEIVED TO AN ETX BLOCK P* ( P LDK A1,0 SET RC=0 2 PDLE150 EQU * L P IFF STARVI=0 ` P LD A2,XSTA v . P RF(NZ) DLE200 STATUS HAS BEEN TRANSMITTED P XIF ( P CF A5,CWRITE COMPLETE WRITE REQUEST PDLE160 EQU * P
0x25ee34…25efc8 Dummy {f00=0x00d6, f01=0x0190, f02=»DK A1,1 & P XRS A1,CACK INCREMENT ACK COUNTER P ABL POL200 : PDLE180 EQU * N P CWK A2,RVIPAR IS IT RVI ? b ( P RB(NE) DLE120 INVALID DLE SEQUENCE " P CM XACK RESET 'EXPECTING ACK' P LD A1,XETX $ P RF(NZ) DLE190 ETX HAS BEEN SE
0x25efc8…25f15c Dummy {f00=0x00d6, f01=0x0190, f02=» STARVI=0 P* P* " P* STATUS HAS BEEN TRANSMITTED & P* L P* V PDLE200 EQU * ` " P LD A6,FDWTUT GET DWT ADDRESS t , P CF A15,REMOVS REMOVE FROM STATUS QUEUE P CM XSTA CLEAR 'STATUS SENT' " P CM XACK CLEAR 'ACK EXPECT
0x25f15c…25f2f0 Dummy {f00=0x00d6, f01=0x018e, f02=» STATUS z P RB DLE160 P XIF " P EJECT . P* < < P* FIND DWT CONTAINING SUBTERMINAL ADDRESS AS GIVEN IN A2 F P* ( P* CALLING SEQUENCE: CF A5,FINTER(S) P* A2=SUBTERMINAL ADDRESS P* A4 DESTROYED " P* A3#0: DWT TO FOUND T
0x25f2f0…25f484 Dummy {f00=0x00d6, f01=0x0190, f02=» h , P* FINTEP - CHECK SPECIFIC POLL ADDRESS P* 8 P* B P* L PFINTES EQU * V P IFT MSV1=1 j P LDK A4,0 ~ P RF FINT05 P XIF PFINTEP EQU * P LDK A4,1 RIGTH BYTE PFINT05 EQU * " P LD A3,DTEDWT,A7 GET F
0x25f484…25f618 Dummy {f00=0x00d6, f01=0x018e, f02=»0 YES P SUR A3,A4 " P LD A3,DWTCHN,A3 GET NEXT DWT P RB FINT10 F PFINT20 EQU * X P ANKL A3,/FFFE l P RTN A5 P EJECT P* P* P* PREPARE FOR TEXT RECEPTION P* P* PPRREC EQU * P IM XSEL
0x25f618…25f7ac Dummy {f00=0x00d6, f01=0x0190, f02=» $ P ST A2,+4,A1 SAVE STA IN BUFFER P IM XSTA 0 " P ST A6,FDWTIN STORE INPUT DWT @ P RTN A5 f P EJECT v P* P* 6 P* CHECK IF THERE IS A SEND REQUEST TO BE COMPLETED P* P* A1 CONTAINS RETURN CODE P* P
0x25f7ac…25f940 Dummy {f00=0x00d6, f01=0x0190, f02=»D A2,DWTOR,A6 GET ORDER & P ANK A2,/FF MASK AWAY OPTION PART P SUK A2,6 J $ P RF(NZ) CWR900 NOT SEND REQUEST 4 P LD A2,DWTIPC,A6 ANY RECEIVED BUFFERS ON QUEU ? P RF(Z) CWR110 NO 0 P ORKL A1,R:DATA ACCEPTED AND DATA AVAILABLE P
0x25f940…25fad4 (1, 452) Dummy {f00=0x00d6, f01=0x0190, f02=» $ P CF A15,TENDIO COMPLETE REQUEST PCWR150 EQU * 0 * P CF A15,REMOVW REMOVE FROM WRITE QUEUE D PCWR900 EQU * r " P CM XACK RESET 'ACK EXPECTED' P CM FDWTUT P RTN A5 P EJECT P* P* P* READ ONE TEXT BLOCK
0x25fad4…25fc68 Dummy {f00=0x00d6, f01=0x0190, f02=»OW d ( P* 2 : IF CORRECT ETB BLOCK RECEIVED P* 6 PRDMESS EQU * @ $ P LD A4,DCRBUF GET BUFFER ADDRESS T P ADK A4,6 RESERVE HEADER | P LDK A3,0 P LD A1,XSTA $ P RF(NZ) RDM050 LAST INPUT WAS OK " P LD A1,FBLST COMPUTE NEW INDEX
0x25fc68…25fdfc Dummy {f00=0x00d6, f01=0x0190, f02=»CK n P CM XSTA P SUR A8,A8 RESET LRC P 6 P IFT IBMCHR=1 > P IFF TPMODE=1 T P LD A1,FBAX j " P RF(NZ) RDM100 NOT FIRST BLOCK ~ P CF A5,READP P RF(NZ) RDM120 PARITY ERROR P CWK A2,ESC P RF(NE) RDM110 * P C
0x25fdfc…25ff90 Dummy {f00=0x00d6, f01=0x0190, f02=»ONE CHARACTER ~ P RF(NZ) RDM120 PARITY ERROR PRDM110 EQU * : P XIF N P IFT TPMODE=1 Z & P IM TPM INDICATE TRANSPARENT TEXT p PRDM100 CF A5,READ P CWK A2,DLE CHECK IF DLE P RF(NE) RDM112 NO 0 P CF A5,READ SKIP DLE AND R
0x25ff90…260124 Dummy {f00=0x00d6, f01=0x0190, f02=»DLE CHECK IF 2:ND DLE * P RF(E) RDM115 YES - STORE DLE AS DATA P CWK A2,ETX CHECK IF ETX L P RF(E) RDM130 YES l P CWK A2,ETBEBC CHECK IF ETB P RF(E) RDM160 YES P CWK A2,ITB CHECK IF ITB P RF(E) RDM175 YES P CWK A2,EN
0x260124…2602b8 Dummy {f00=0x00d6, f01=0x0190, f02=» CF A5,READ P CWK A2,DLE P RB(NE) RDM105 ( P CF A5,READ > P CWK A2,ETX R $ P RF(E) RDM110 YES - END OF BLOCK f P CWK A2,ETBEBC $ P RB(NE) RDM105 NOT END OF BLOCK PRDM110 EQU * $ P CM TPM OUT OF TRANSPARENT TEXT P
0x2602b8…26044c Dummy {f00=0x00d6, f01=0x0190, f02=» P CWK A2,ETX P RF(E) RDM130 ETX RECEIVED P CWK A2,ETB : P RF(E) RDM160 ETB RECEIVED N P CWK A2,ITB p P RF(E) RDM170 ITB RECEIVED P CWK A2,ENQ 2 P RF(E) RDM120 SKIP IF ENQ EMBEDDED IN MESSAGE P CWK A2,/FF $ P RF(
0x26044c…2605e0 Dummy {f00=0x00d6, f01=0x0190, f02=»DC1-DC3 ~ P ADK A1,3 P RF(N) RDM115 NOT DC1-DC3 " P SLL A1,6 D P SCR A1,A4 =7 V * P CF A5,READP 8-BIT CHAR GET NEXT PART l P RF(NZ) RDM120 PARITY ERROR P LCR A1,A4 =7 * P SUK A2,/20 ASSEMBLE TO ONE CHARACTER P ORR A
0x2605e0…260774 (1, 453) Dummy {f00=0x00d7, f01=0x018e, f02=» CHARACTER P ADK A4,1 INCREMENT POINTER $ P IM FBAX INCREMENT BUFFER INDEX 6 P LD A1,FBAX ^ P CWK A1,RBUFL+RBUFL r P RB(NG) RDM100 NOT OVERFLOW P* P* BUFFER OVERFLOW P* & P LDK A3,1 INDICATE BUFFER OVERFLOW
0x260774…260908 Dummy {f00=0x00d7, f01=0x0190, f02=» P* PARITY ERROR DETECTED P* ( PRDM120 EQU * 2 P IFT STTSTS=1 F P LDK A1,CSSRPE $ P CF A15,DCSUPS INCREMENT COUNTER r P XIF & P LDK A3,1 INDICATE INVALID MESSAGE P SUK A2,/7F $ P RF(Z) RDM150 MARK HOLD RECEIVED
0x260908…260a9c Dummy {f00=0x00d7, f01=0x018e, f02=»GET BUFFER INDEX 2 P ST A2,+2,A1 STORE EFFECTIVE LENGTH IN HEADER P IFF CODE=1 N P CF A5,RDLRC b P RF(Z) RDM150 LRC WAS OK v P XIF P IFT CODE=1 & P CF A5,RDCRC READ CRC AND CHECK IT P RF(E) RDM150 CRC WAS OK P XIF
0x260a9c…260c30 Dummy {f00=0x00d7, f01=0x0190, f02=» P IFT CODE=0 P ANK A2,H:PARI P RF(Z) RDM155 . P LDK A3,1 PARITY ERROR D PRDM155 EQU * b P XIF v P IFT TPMODE=1 & P CWK A3,1 ERROR DETECTED EARLIER ? P RF(NE) RDM158 NO $ P CM TPM OUT OF TRANSPARENT TEXT PRDM1
0x260c30…260dc4 Dummy {f00=0x00d7, f01=0x018e, f02=»30 ALREADY INVALID " P LDK A3,2 INDICATE CORRECT ETB P RB RDM130 @ P* R P* ITB RECEIVED P* r PRDM170 EQU * | P IFF CODE=1 P CF A5,RDLRC " P RB(NZ) RDM120 LRC WAS NOT OK P XIF P IFT CODE=1 & P CF A5,RDC
0x260dc4…260f58 Dummy {f00=0x00d7, f01=0x0190, f02=» $ P CF A5,RDCRC READ AND CHECK CRC P IM TPM , " P RB(NE) RDM105 CRC WAS NOT OK < PRDM180 CF A5,READ b P CWK A2,SYNEBC | P RB(E) RDM180 SKIP SYN P CWK A2,DLE $ P RB(NE) RDM105 ILLEGAL CHARACTER P CF A5,READ P CWK A2,
0x260f58…2610ec Dummy {f00=0x00d7, f01=0x0190, f02=»* PTRACK LDK A2,1 P LDK A3,ACK1 PRELOAD ACK1 & P XRS A2,CACK INCREMENT ACK COUNTER B P RF(NZ) TRDLE l P LDK A3,ACK0 LOAD ACK0 P RF TRDLE P* P* TRANSMIT WACK P* PTRWACK LDK A3,WACK LOAD WACK P RF TR
0x2610ec…261280 Dummy {f00=0x00d7, f01=0x0190, f02=»ANSMIT DLE P* PTRDLE LDK A2,DLE LOAD DLE " P SC A2,RESEND PUT INSAVE AREA > P SC A3,RESEND+1 d P RF TRREP | P EJECT P* P* TRANSMIT NAK P* PTRNAK LDK A3,NAK LOAD NAK P RF TREN10 P* P* TR
0x261280…261414 (1, 454) Dummy {f00=0x00d8, f01=0x0190, f02=»NQ LOAD ENQ P* ( PTREN10 SC A3,RESEND PUT IN SAVE AREA P LDK A2,/FF J P SC A2,RESEND+1 ^ $ PTRREP CF A5,TRSYNC START OUTPUT v & P LC A2,RESEND GET FIRST CHARACTER P CF A5,WRITEP SEND IT & P LC A2,RESEND+1 GET NEXT CHARACTER
0x261414…2615a8 Dummy {f00=0x00d8, f01=0x018e, f02=» CF A5,CHALTO HALT OUTPUT P IFF LOGG=0 " ( P CF A5,LOGSST LOG TRANSMITTER STATUS 6 P XIF b P RTN A5 n P EJECT ~ P* P* P* TRANSMIT ONE TEXT BLOCK P* P* PTRTEXT EQU * P CF A5,TRSYNC START OUTPUT
0x2615a8…26173c Dummy {f00=0x00d8, f01=0x0190, f02=» P SUR A8,A8 RESET LRC $ P LD A4,FECBBA GET BUFFER ADDRESS P AD A4,FBAX ADD BUFFER INDEX H ( P ST A4,FBLST REMEMBER START OF BLOCK l P . =15 & P LDK A3,0 RESET CHARACTER COUNTER P LD A1,FBAX GET BUFFER INDEX " P RF(NZ) TRT100 NOT
0x26173c…2618d0 Dummy {f00=0x00d8, f01=0x0190, f02=»2 GET NETWORK SUB-ADDRESS P CF A5,WRITEP SEND STA " P IFT IBMCHR=1 @ P IFF RCOM=1 V " P LDK A2,/27 SEND ENTER AS AID j P CF A5,WRITEP " P LDK A2,/20 AND CURSOR ADDRESS P CF A5,WRITEP P LDK A2,/20 P CF A5,WRITEP
0x2618d0…261a64 Dummy {f00=0x00d8, f01=0x0190, f02=»******* " P LDK A2,X'2D' AID FOR DISPLAY P CF A5,WRITEP SEND AID 6 P T $ P LD* A3,DWTCUR,A6 CURSOR ADDRESS . P CF A5,LINCOL SEND LINE AND COLUMN NUMBER P LDK A3,5 SET BLOCK COUNT P RF TRT100 PTRT070 EQU * P XIF
0x261a64…261bf8 Dummy {f00=0x00d8, f01=0x0190, f02=»RACTER z P ADK A4,1 INCREMENT POINTER P ANK A2,/7F 2 P IFT RCOM=1 F & P LD A1,XRB READ BUFFER COMMAND ??? Z P RF(Z) TRT105 NO!! P @ P************************************************************ P* , P* CHECK IF ATTRIBU
0x261bf8…261d8c Dummy {f00=0x00d8, f01=0x0190, f02=» n P RF(L) TRT101 YES!!! P XIF $ P IFT DMRK=1 0 P CWK A2,/7E LINE FEED ? D " P RF(NE) TRT102 NO,GO TO TRT102 d P LDK A2,/0A PTRT102 EQU * P CWK A2,/7D END OF MESSAGE ? " P RF(NE) TRT103 NO,GO TO TRT103 P LDK A2,/19
0x261d8c…261f20 Dummy {f00=0x00d8, f01=0x0190, f02=»T105 P PTRT101 EQU * P ( P LDK A2,SF 0 " P CF A5,WRITEP SEND START FIELD B P h ( P LC A2,-1,A4 GET ATTRIBUTE CHARACTER p P ANK A2,X'7F' ( P LDR A1,A2 CONVERT TO IBM ATTRIBUTE P ANK A1,1 P ANK A2,/1E MASK P
0x261f20…2620b4 (1, 455) Dummy {f00=0x00d8, f01=0x018e, f02=»ECK SPECIAL ATTRIBUT P RF(NE) TRT104 P LDK A2,/30 2 PTRT104 EQU * F P CF A5,WRITEP SEND ATTRIBUTE Z P ADK A3,1 ~ P RF TRT110 PTRT105 EQU * P XIF P EJECT P IFF TPMODE=1 P CWK A2,/07 ( P RF(L) TRT110
0x2620b4…262248 Dummy {f00=0x00d8, f01=0x0190, f02=» & P LD A1,FECBRL GET REQUESTED LENGTH P CW A1,FBAX . " P RF(NG) TRT130 END OF MESSAGE B * P ADK A3,1 INCREMENT CHARACTER COUNTER h P CWK A3,TBLEN P IFT TPMODE=1 P RB(L) TRT105 NOT FULL BLOCK P XIF P RB(L) TRT100 NOT FULL
0x262248…2623dc Dummy {f00=0x00d8, f01=0x0190, f02=»1,A4 P RF(NE) TRT116 NO SEND ETB ( P LCR A2,A4 GET FIRST BYTE AFTER SBA . P ADK A4,1 INREMENT POINTER Z P CF A5,WRITEP SEND IT | P IM FBAX INCREMENT INDEX . PTRT115 LCR A2,A4 GET SECOND BYTE AFTER SBA P CF A5,WRITEP SEND IT
0x2623dc…262570 Dummy {f00=0x00d8, f01=0x0190, f02=»DLE t P XIF P LDK A2,ETB LOAD ETB PTRT120 EQU * 4 P IFT TPMODE=1 H P CM TPM ^ P XIF n P CF A5,WRITEP SEND IT z P IFF CODE=1 P LDR A2,A8 GET LRC P CF A5,WRITEP SEND LRC P XIF P IFT CODE=1 P LDR
0x262570…262704 Dummy {f00=0x00d8, f01=0x0190, f02=» " P CF A5,WRIT05 SEND CRC BYTE 2 P XIF * P IFT STTSTS=1 6 P* L P* V " P* COUNT MESSAGES TRANSMITTED ` P* P LDK A1,CSSTBL P CF A15,DCSUPS P XIF P ABL TRRE10 HALT OUTPUT PTRT130 EQU * P IM XETX IND
0x262704…262898 Dummy {f00=0x00d8, f01=0x0190, f02=»TX ~ P RB TRT120 SEND ETX AND LRC P EJECT . P* < P* F P* TRANSMIT STATUS MESSAGE P P* r P* | P IFF STARVI=0 PTRSTA EQU * $ P IM XSTA INDICATE 'STATUS SENT' P ST A6,FDWTUT SAVE A6 P CF A5,TRSYNC STAR
0x262898…262a2c Dummy {f00=0x00d8, f01=0x0190, f02=» z P LDK A2,'R' P CF A5,WRITEP SEND 'R' P LDK A2,STX : P CF A5,WRITE SEND STX N P LDR* A2,A7 l P CF A5,WRITEP SEND TCA " P LD A4,FDWTUT GET DWT-ADDRESS ( P LDR* A2,A4 GET NETWORK SUB-ADDRESS P CF A5,WRITEP SEND STA
0x262a2c…262bc0 Dummy {f00=0x00d8, f01=0x0190, f02=»A5,WRITEP SEND S/S 0 P LDK A2,NOIR PRELOAD S/S 1 P LD A1,DWTST,A4 GET STATUS > P ANK A1,5 ` P RF(Z) TRST10 NOT 'IR' r P ANK A1,4 P RF(NZ) TRST10 NO IR IF DE P LDK A2,IR PTRST10 EQU * P CF A5,WRITEP SEND S/S 1
0x262bc0…262d54 (1, 456) Dummy {f00=0x00d8, f01=0x0190, f02=»TRSYNC EQU * ( P CF A5,CHALTI HALT INPUT IF NOT DONE , P CF A5,CSYNCO START OUTPUT WITH SYNC DEF @ * P CF A5,READ WAIT FOR OUTPUT INTERRUPT p P* P* P* SEND 4 SYN-CHARACTERS P* P LDK A3,4 PTRS100 EQU * P LDK A
0x262d54…262ee8 Dummy {f00=0x00d8, f01=0x0190, f02=»* P* 0 P* CSYNCI :SEND SYNC-PATTERN FOR INPUT DATA P* H PCSYNCI EQU * R P LD A2,PFPOST f $ 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 . P LDK A
0x262ee8…26307c Dummy {f00=0x00d8, f01=0x0190, f02=»UT SYNC-PATTERN TO LC x P XIF P IFT P6805=0 * * P LDKL A2,CBCARR+SYNC DEF SYNC-PATTERN > 2 P CIO A2,1,LCUIN SEND INPUT SYNC-PATTERN TO LC l P =1 P XIF PCSYN:I EQU * P RTN A5 RETURN TO CALLER P* P* " P* C
0x26307c…263210 Dummy {f00=0x00d8, f01=0x0190, f02=» CIO A2,0,LCUIN HALT INPUT & P CM DCLCI CLEAR INPUT ACTIVE FLAG " P SST A2,LCUIN READ STATUS L " P RF(A) CHALTR SST ACCEPTED =1 n : P LDK A2,1 INSTRUCTION NOT ACCEPTED, SET MODEM ERR. =1 PCHALTR EQU * =1 P IFF LOGG=0 $ P CF A5,LOG
0x263210…2633a4 Dummy {f00=0x00d8, f01=0x0190, f02=»R WITH SYNC DEF t P* PCSYNCO EQU * " P LD A2,PFPOST 6 $ P RF(NZ) CSYN:O WAIT FOR POWER UP L P IFT P6805=1 t * P LDK A2,PARITY CHAR PARITY CHECK BY CU P CIO A2,1,LCUUT CIO START P RF(A) CSYNC1 ACCEPTED $ P SST A2,LCUUT TRY
0x2633a4…263538 Dummy {f00=0x00d8, f01=0x0190, f02=»LCUUT SEND SYNC PATTERN P XIF P IFT P6805=0 , & P CIO A2,1,LCUUT START TRANSMITTER @ P XIF j PCSYN:O EQU * v P RTN A5 RETURN TO CALLER P* P* $ P* CHALTO : HALT OUTPUT CHANNEL P* PCHALTO EQU * P IFT
0x263538…2636cc Dummy {f00=0x00d8, f01=0x0190, f02=» STATUS = MODEM ERROR =1 . P RF(NA) CHLT00 INSTRUCTION NOT ACCEPTED =1 " P CF A5,READ WAIT FOR INTERRUPT R P XIF x P SST A2,LCUUT GET STATUS PCHLT00 EQU * P IFT STTSTS=1 P ANK A2,H:NOOP+H:THRU P RF(Z) CHLTO2 $ P LDK A
0x2636cc…263860 Dummy {f00=0x00d8, f01=0x0190, f02=»QU * $ P CF A15,DCSUPS INCREMENT COUNTER PCHLTO2 EQU * 4 P XIF H P RTN A5 RETURN TO CALLER T P EJECT t P* P* P* RECEIVER INTERRUPT P* P* PIH1501 EQU * P ST P,INTSAV P IFT CPU852=1 P C
0x263860…2639f4 (1, 457) Dummy {f00=0x00d9, f01=0x018e, f02=»DC REGS A3 - A8 z P INR A2,0,LCUIN READ CHAR , P RF(NA) IHIN20 NOT ACCEPTED,CHECK STATUS : P IFF LOGG=0 j ( P CF A5,LOGIN LOG RECEIVED CHARACTER ~ P XIF P IFT TPMODE=1 P C2 TPM 8 P RF(NZ) IHLC10 DO NOT SKIP SYNC IN TRANSPARE
0x2639f4…263b88 Dummy {f00=0x00d9, f01=0x0190, f02=» PIHLC05 EQU * P IFT CODE=0 P XRR A8,A2 CALCULATE LRC , P XIF L P IFT CODE=1 X $ P LD A1,XSEL SEE IF SELECTED DK1 l " P RF(Z) IHLC07 NO, SKIP IT DK1 P CF A5,CRCCAL CALCULATE CRC PIHLC07 EQU * DK1 ( P LC A2,TASCII,A2
0x263b88…263d1c Dummy {f00=0x00d9, f01=0x0190, f02=» SET INPUT ACTIV FLAG P CM DCSTCU CLEAR SST SAVE P LDK A1,1 @ P ST A1,DTEPLS,A7 CU OPERABLE R P RTN A5 RETURN TO CALLER v PIHIN20 EQU * P CF A5,SST PERFORM SST P ABL BRM P EJECT P* P* P* TRANSMITTE
0x263d1c…263eb0 Dummy {f00=0x00d9, f01=0x0190, f02=» XIF P P IFF CPU852=1 P MSR 8,A15 SAVE A1-A8 * P XIF H * P CF A15,LDREG RESTORE DC REGS A3 - A8 T P RTN A5 P EJECT P* P* & P* SST INSTRUCTION AND STATUS CHECK P* ( P* LCU STATUS : BIT 10=CARRIER
0x263eb0…264044 Dummy {f00=0x00d9, f01=0x0190, f02=»DEM NOT READY v P* PSST EQU * P SST A2,LCUIN GET STATUS 2 P LDR A1,A2 R P IFT LOGG=1 d & P CF A5,LOGSST LOGG SST INFORMATION x P XIF P ANK A2,H:ERR ERROR BIT SET P RF(NZ) SST050 YES P IFT P6805=0 P LD A2,D
0x264044…2641d8 Dummy {f00=0x00d9, f01=0x0190, f02=» DEF SYNC PATTERN | & P CIO A2,1,LCUIN START INPUT AGAIN $ P RF SST125 RETURN TO DISPATCHER D P XIF l P IFT P6805=1 x P RF SST100 P XIF PSST050 EQU * P ANK A2,H:CARR CARRIR OFF P RF(Z) SST075 NO P LD A2,DCLCI INP
0x2641d8…26436c Dummy {f00=0x00d9, f01=0x018e, f02=»PHYS. LINK STATUS DK | P LDR A2,A1 $ P ANK A2,H:THRU THROUGHPUT ERROR . P RF(Z) SST100 NO V P IFT STTSTS=1 n P* P* $ P* COUNT INPUT THROUGHPUT ERROR P* P LDK A1,CSCDIT P CF A15,DCSUPS P XIF P ABL B
0x26436c…264500 Dummy {f00=0x00d9, f01=0x0190, f02=» P* P* P* COUNT DCE NOT OPERABLE P* > P LDK A1,CSCDCE H P CF A15,DCSUPS ^ P XIF t P CF A15,STREG SAVE REGISTERS P CF A15,SETIME DELAY 1 SEC P DATA SST150,10 PSST125 EQU * $ P ABL TDISP RETURN TO D
0x264500…264694 (1, 458) Dummy {f00=0x00d9, f01=0x0190, f02=» CHECK STATUS IF CARRIER OFF P RF(Z) SST225 NO $ 4 P XRK A1,H:CARR CHECK STATUS IF ONLY CARRIER OFF < P RF(Z) SST250 YES t PSST225 EQU * 0 P ST A1,DCSTCU STORE STATUS AS CURRENT STATUS PSST250 EQU * P RTN A5 RETURN TO CALLER
0x264694…264828 Dummy {f00=0x00d9, f01=0x0190, f02=» P C2 TPM & P RF(Z) WRIT02 NOT TRANSPARENT MODE P CWK A2,DLE CHECK IF DLE B P RF(NZ) WRIT05 NO b P CF A5,WRIDLE SEND EXTRA DLE | P LDK A2,DLE P RF WRIT05 PWRIT02 EQU * P ANK A2,/FF P CWK A2,/FF 0 P RF(E)
0x264828…2649bc Dummy {f00=0x00d9, f01=0x0190, f02=»UUT SEND CHARACTER P RF(A) WRIT10 P IFF CODE=1 0 $ PWRIT10 XRR A8,A2 ACCUMULATE BCC D P XIF l P IFT CODE=1 x & PWRIT10 CF A5,CRCCAL CALCULATE CRC P XIF PWRIT15 EQU * P IFF LOGG=0 & P CF A5,LOGOUT LOG OUTPUT CHARA
0x2649bc…264b50 Dummy {f00=0x00d9, f01=0x018e, f02=» SEND AN EXTRA DLE j * P* WHEN TRANSPARENT MODE IS CONFIGURED P* H PWRIDLE EQU * R " P OTR A2,0,LCUUT SEND CHARACTER f P RB(A) WRIT15 ACCEPTED $ P RB READ OUTPUT THROUGHPUT ERROR P EJECT P* P* P*** WRITEP P*
0x264b50…264ce4 Dummy {f00=0x00d9, f01=0x018e, f02=» P ORK A2,/80 PWRI100 SLL A1,1 P RB(P) WRI100 0 P RB(Z) WRITE WRITE F P XRK A2,/80 ` P RB WRI100 t P XIF P IFF CODE+P6805=0 SALCUZ PWRITEP RB WRITE P XIF P* P* P* P*** READP P
0x264ce4…264e78 Dummy {f00=0x00d9, f01=0x018e, f02=» P ECR A1,A2 PRE100 SLL A1,1 P RF(Z) RE110 , P RB(NN) RE100 @ P XRK A2,/80 V P RB RE100 j PRE110 LDR A1,A2 | P ANK A2,/7F P XIF P IFF CODE+P6805=0 SALCUZ P LDK A1,/80 P XIF P ADK A5,4 P
0x264e78…26500c Dummy {f00=0x00d9, f01=0x0190, f02=» P* P* PDC15ON EQU * P IFT CPU852=1 , P CF A15,SAVE8 SAVE A1-A8 B P XIF b P n P IFF CPU852=1 v P MSR 8,A15 SAVE A1-A8 P XIF " P LDKL A7,DTETAB DTETAB ADDRESS P IFT STARVI=1 P LDK A5,4 SET DEVICE E
0x26500c…2651a0 Dummy {f00=0x00d9, f01=0x0190, f02=»E END t , P CF A15,INSSQ INSERT DWT IN STAUS QUEUE * P LD A6,DWTCHN,A6 GET NEXT DWT IN CHAIN > P RB DC1510 l PDC1520 EQU * ~ P =4 P =13 P XIF P LD A2,DTESTA,A7 DTE STATUS P SUK A2,2 $ P ABL(NZ) TDISP OPEN NO
0x2651a0…265334 (1, 459) Dummy {f00=0x00d9, f01=0x0190, f02=»ED t $ P CF A15,SPOTIM START POLL TIMER PDC1540 EQU * 2 P ABL BRM F P EJECT V P IFT CODE=1 d P* x P* P* CALCULATION OF CRC P* P* A2 = CHARACTER P* A8 = ACCUMULATED CRC P* P* PCRCCAL EQU *
0x265334…2654c8 Dummy {f00=0x00d9, f01=0x0190, f02=» OLD CRC PCRC100 LDR A3,A4 P SRL A4,1 ( P XRR A3,A2 : P SRL A2,1 L P ANK A3,1 ^ P RF(Z) CRC110 p P XRKL A4,/A001 PCRC110 SUK A1,1 P RB(NZ) CRC100 P LDR A8,A4 SAVE NEW CRC PCRCSAV EQU * P LDKL A1,0
0x2654c8…26565c Dummy {f00=0x00d9, f01=0x0190, f02=»D CHECK THEM x P* CR = (E) IF CRC WAS OK P* 4 P* > PRDCRC EQU * H P STR A8,A5 SAVE CURRENT CRC " P SUK A5,2 ADJUST STACK POINTER $ P IM SYNSW DO NOT SKIP SYNCS NOW P CF A5,READ READ BYTE 1 P LD A4,CRCSAV+6 SAVE IT
0x26565c…2657f0 Dummy {f00=0x00d9, f01=0x0190, f02=» A2,A4 P ADK A5,6 P CW A2,-4,A5 P ABR* A5 4 P XIF D P IFT CODE=0 P P* d & P* RDLRC READ LRC CHARACTER n " P* CR=0 IF LRC OK P* PRDLRC IM SYNSW P CF A5,READP P ADK A5,4 P LDR
0x2657f0…265984 Dummy {f00=0x00d9, f01=0x0190, f02=»CT , P**************************************** P* : P* DRIVER WORK AREAS D P* ` , P**************************************** j P* P* P* DC RECEIVE BUFFER POOL P* PRLINK EQU RBUFL+RBUFL+8 P* PDCRBUF
0x265984…265b18 Dummy {f00=0x00d9, f01=0x0190, f02=» DATA *+RLINK P RES RBUFL+3 P IFF RBUFNR=4 * P DATA *+RLINK @ P RES RBUFL+3 V P XIF j P DATA *+RLINK v P RES RBUFL+3 P DATA 0 END OF CHAIN P RES RBUFL+3 P P IFF MMUPAG=0 & PMMUBUF RES TBUFL+1 MMU WOR
0x265b18…265cac Dummy {f00=0x00d9, f01=0x0190, f02=»G ROUTINE ~ P* P* P IFF LOGG=0 & PLOGSST ST A2,SAVE2 : P ORKL A2,/F000 T P RF LOG10 j PLOGOUT ST A2,SAVE2 | P ORKL A2,/0F00 P RF LOG10 PLOGIN CWK A2,/FF P RF(E) LOGE10 P ST A2,SAVE2 PLOG10 ST
0x265cac…265e40 Dummy {f00=0x00d9, f01=0x018e, f02=» PLOGEXI ST A3,LOGPNT P LD A2,SAVE2 $ P LD A3,SAVE3 8 PLOGE10 RTN A5 L P EJECT b P* p P* z PLOGPNT DATA LOGSTA PLOGSTA EQU * P RES 300 PLOGEND EQU *-4 PSAVE2 DATA 0 PSAVE3 DATA 0 P XIF
0x265e40…265fd4 (1, 460) Dummy {f00=0x00d9, f01=0x0190, f02=» P* L I N C O L P* " : P* CONVERT CURSOR ADDRESS TO LINE AND COLUMN NUMBER , P* j > P********************************************************** t P PLINCOL EQU * " P LDR A2,A3 COPY CURSOR ADDRESS P SRL A2,6
0x265fd4…266168 Dummy {f00=0x00d9, f01=0x0190, f02=»2,X'3F' ( P LC A2,LICO:T,A2 ASCII COLUMN NUMBER $ P CF A5,WRITEP SEND COLUMN NUMBER < P RTN A5 RETURN d P* z P* P* P EJECT P P PLICO:T EQU * * P DATA /2041,/4243,/4445,/4647 /00-/07 * P DATA /4849,/5B2
0x266168…2662fc Dummy {f00=0x00d9, f01=0x0190, f02=»354,/5556,/5758 /20-/27 * P DATA /595A,/7C2C,/255F,/3E3F /28-/2F ( P DATA /3031,/3233,/3435,/3637 /30-37 N ( P DATA /3839,/3A23,/4027,/3D22 /38-3F z P XIF P EJECT P* P* DTETAB P* P* FIXED PART P* PDW1500
0x2662fc…266490 Dummy {f00=0x00d9, f01=0x0190, f02=»ART | 2 P DATA DTESBU-DTETAB START OF STATISTIC BUFFER P DATA 0,0,0,0,0,0 B P DATA 0,0,0,0,0,0 * PDTESBU EQU * x P DATA 0 SYMBOLIC ID P DATA 0 COUNTER STATUS WORD $ P DATA /20 MAX NUMBER OF COUNTERS P RES /20 STATISTIC B
0x266490…266624 Dummy {f00=0x00d9, f01=0x0190, f02=» j . PFDWTUT RES 1 CURRENT DWT FOR TRANSMISSION PXACK DATA 0 ACK EXPECTED : PXSEL DATA 0 SELECTED Z PXETX DATA 0 ETX SENT v 2 PXSTA DATA 0 STATUS SENT / MESSAGE INPUT RESULT " PXRB DATA 0 READ BUFFER SWITCH PCACK DATA 0 ACK COUNTER
0x266624…2667b8 Dummy {f00=0x00d9, f01=0x0190, f02=»CBBA RES 1 WRITING BUFFER ADDRESS & PFECBRL RES 1 WRITING BUFFER LENGTH * PFBAX DATA 0 BUFFER INDEX T 0 PFBLST DATA 0 START OF LAST TRANSMITTED BLOCK t $ PDCSTQ DATA 0 STATUS QUEUE ANCHOR . PDCTPP DATA 0 POINTER FOR PROCEDURE TIMING $ PDCWRQ
0x2667b8…26694c Dummy {f00=0x00d9, f01=0x40ba, f02=»S AND WORK AREAS P* P* " PDCSTCU DATA 0 CURRENT STATUS , , PDCTPGP DATA 0 TIMER POINTER GENERAL POLL P & PDCLCI DATA 0 DC UNIT INPUT STATUS P END @ S QUEUE ANCHOR . PDCTPP DATA 0 POINTER FOR PROCEDURE TIMING $ PDCWRQ
0x26694c…266ae0 Dummy {f00=0x00d9, f01=0x2008, f02=» H P X ` h p x
0x266ae0…266c74 (1, 461) Dummy {f00=0x00da, f01=0x0190, f02=»UEUE ANCHOR u | P LDK A4,DWTOPE v P RB REM06 v * P XIF v < P EJECT v H P* v V P* v ` $ P* QUEUE ALLOCATED RECEIVE BUFFER v j P* v P* A4=BUFFER ADDR v P* A2,A3 DESTROYED v P* v PQRBUF EQU * v P SUK A4,6 v * P LDK A2,DW
0x266c74…266e08 Dummy {f00=0x00da, f01=0x0190, f02=»DR A2,A3 v P RB QR100 w & PQR200 STR A4,A2 INSERT INTO QUEUE w " " P CMR A4 INDICATE END OF QUEUE w L P RTN A5 w r P EJECT w P* w P* w P* STORE REGISTER A3-A8 w $ P* CALLING SEQUENSE: CF A15,STREG w P* w PSTREG ST A3,LCA3 w
0x266e08…266f9c Dummy {f00=0x00da, f01=0x0190, f02=» P* x P* RESTORE x $ P* CALLING SEQUENCE: CF A15,LDREG x P* x H PLDREG LDKL A3,0 x R PLCA3 EQU *-2 x j P LDKL A4,0 x ~ PLCA4 EQU *-2 x P LDKL A5,0 x PLCA5 EQU *-2 x P LDKL A6,0 x PLCA6 EQU *-2 x P LDKL A7,0 x PLCA7 E
0x266f9c…267130 Dummy {f00=0x00da, f01=0x018e, f02=» ADKL A15,4 x P ABR* A15 y P EJECT y & P* y 4 P* POLL TIME OUT y > P* y V ( PPTOUT LDKL A5,STB LOAD A5 STACK BASE y ` " P LDR A6,A1 RELOAD DWT ADDRESS y P LDKL A7,DTETAB y P CM DTEDLS,A7 y P IFT STTSTS=1 y P* y P* y
0x267130…2672c4 Dummy {f00=0x00da, f01=0x018e, f02=» P ABL TDISP z P* z 4 P* RESTART POLL TIMER WHEN POLL HAS BEEN RECEIVED z P* z X PCPTIM EQU * z b P LDK A2,1 INDICATE z v " P ST A2,DTEDLS,A7 DATA LINK UP z P LDKL A2,-TIMPOL z P ST* A2,DCTPGP RESTART TIMER z P RTN A5 z P* z
0x2672c4…267458 Dummy {f00=0x00da, f01=0x018e, f02=» z t P DATA PTOUT,TIMPOL { & P ST A4,DCTPGP STORE TIMER POINTER { " P RB RTNA15 RETURN { L P EJECT { f P* { t P* START PROCEDURE TIMER { ~ P* { PSPTIM EQU * { $ P LDR A1,A6 LOAD DWT AS PARAMETER { P CF A15,SETIME { P DATA PRTOUT,T
0x267458…2675ec Dummy {f00=0x00da, f01=0x0190, f02=» { ~ P LDR A6,A1 RELOAD A6 | P LDKL A5,STB LOAD STACK BASE | $ P LDKL A7,DTETAB | H P IFT STTSTS=1 | ` P* | v P* | P* COUNT PROCEDURE TIME OUT | P* | P LDK A1,CSSXC2 | P CF A15,DCSUPS | P XIF | , P CF A5,CHALTI HALT INPUT
0x2675ec…267780 Dummy {f00=0x00da, f01=0x0190, f02=»DURE TIMER | x PPRT10 ABL BRM } P EJECT } ( P* } 6 P* STOP PROCEDURE TIMER } @ P* } ^ ( PHPTIM LD A1,DCTPP GET TIMER POINTER } h P RF(Z) HPT10 NOT RUNNING } P CMR A1 STOP TIMER } P CM DCTPP } PHPT10 RTN A5 } P } P* } P*
0x267780…267914 (1, 462) Opaque[0x194]
0x267914…267aa8 # DirEnt {nam=»EBCDIC«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1778, f03=0x0000}
0x267914…267aa8 IdxSect {
0x267914…267aa8 f00 = 0x00bb // 0x267914 @0x0
0x267914…267aa8 f01 = 0x0004 // 0x267916 @0x2
0x267914…267aa8 gno = [ // 0x267918 @0x4
0x267914…267aa8 [0x00]: C0x00bb.0x3.0
0x267914…267aa8 [0x01]: C0x00bc.0x0.0
0x267914…267aa8 ]
0x267914…267aa8 }
0x267aa8…267c3c Dummy {f00=0x00bb, f01=0x018e, f02=» 0 P IDENT EBCDIC 9.2DK 1 79-11-16 870105040920 P 8 P* @ 4 P************************************************ J P* $ P* PHILIPS TERMINAL SYSTEM PTS P* $ P* EBCDIC = EBCDIC/ASCII TABLE P* P* P* P*
0x267c3c…267dd0 Dummy {f00=0x00bb, f01=0x018e, f02=» P* P* . P* CONDITIONAL ASSEMBLY (SEE ALSO DRDC15) P* J 2 PX:A EQU 1 CODE , 0=ASCII , 1=EBCDIC (DRDC15) T PCODE EQU X:A 4 PX:B EQU 1 READ COMMAND HANDLING IF = 1 (DRDC15) PRCOM EQU X:B P* : P* VERSION FOR SCAND
0x267dd0…267f64 Dummy {f00=0x00bb, f01=0x0190, f02=» P* 7C 5C P* 00 7C P* 5A 24 $ P* 6A 40 4 P EJECT D P* R P* 2 P* TABLE FOR CONVERSION OF EBCDIC CODE TO ASCII f P* P* PTASCII EQU * P IFT CODE=1 ( P DATA /0001,/0203,/0009,/0000 00-07 ( P DAT
0x267f64…2680f8 Dummy {f00=0x00bb, f01=0x0190, f02=»000,/0000,/0000,/171B 20-27 ( P DATA /0000,/0000,/0005,/0000 28-2F $ ( P DATA /0000,/1600,/0000,/0004 30-37 P ( P DATA /0000,/0000,/1415,/001A 38-3F | ( P DATA /2041,/4243,/4445,/4647 40-47 ( P DATA /4849,/232E,/3C28,/2B21 48-4F ( P DATA /2
0x2680f8…26828c Dummy {f00=0x00bb, f01=0x0190, f02=»/402C,/255F,/3E3F 68-6F ( P DATA /1831,/3233,/3435,/3637 70-77 ( P DATA /3839,/3A5B,/5C27,/3D22 78-7F L ( P DATA /2061,/6263,/6465,/6667 80-87 x ( P DATA /6869,/5B2E,/3C28,/2B21 88-8F ( P DATA /266A,/6B6C,/6D6E,/6F70 90-97 ( P DATA /7172,
0x26828c…268420 Dummy {f00=0x00bb, f01=0x0190, f02=»3,/3435,/3637 B0-B7 ( P DATA /3839,/3A23,/4027,/3D22 B8-BF ( P DATA /2041,/4243,/4445,/4647 C0-C7 H ( P DATA /4849,/5B2E,/3C28,/2B21 C8-CF t ( P DATA /264A,/4B4C,/4D4E,/4F50 D0-D7 ( P DATA /5152,/5D24,/2A29,/3B5E D8-DF ( P DATA /7F2F,/535
0x268420…2685b4 (1, 463) Dummy {f00=0x00bc, f01=0x0190, f02=»027,/3DFF F8-FF | P XIF P EJECT $ P* 2 P* < 2 P* TABLE FOR CONVERSION OF ASCII CODE TO EBCDIC F P* | P* PTEBCDIC EQU * P IFF CODE+RCOM=0 ( P DATA /0001,/0203,/372D,/0000 00-07 ( P DATA /0005,/1500,/0C00,/0000
0x2685b4…268748 Dummy {f00=0x00bc, f01=0x018e, f02=»7 n ( P DATA /4D5D,/5C4E,/6B60,/4B61 28-2F ( P DATA /F0F1,/F2F3,/F4F5,/F6F7 30-37 6 ( P DATA /F8F9,/7A5E,/4C7E,/6E6F 38-3F b ( P DATA /6AC1,/C2C3,/C4C5,/C6C7 40-47 ( P DATA /C8C9,/D1D2,/D3D4,/D5D6 48-4F ( P DATA /D7D8,/D9E2,/E3E4,/E5E6 50-5
0x268748…2688dc Dummy {f00=0x00bc, f01=0x40b4, f02=» j ( P DATA /9798,/99A2,/A3A4,/A5A6 70-77 ( P DATA /A7A8,/A91C,/0000,/0000 78-7F 4 4 P DATA /544F,/5353 SPEC. FLEX CHAR. 'TOSS' 80-84 ` P XIF P END @ ( P DATA /C8C9,/D1D2,/D3D4,/D5D6 48-4F ( P DATA /D7D8,/D9E2,/E3E4,/E5E6 50-5
0x2688dc…268a70 Dummy {f00=0x00bc, f01=0x2008, f02=» 68-6F z ( P DATA /9798,/99A2,/A3A4,/A5A6 70-77 ( P DATA /A7A8,/A91C,/0000,/00E0 78-7F B 4 P DATA /544F,/5353 SPEC. FLEX CHAR. 'TOSS' 80-84 n P XIF P END @ ( P DATA /C8C9,/D1D2,/D3D4,/D5D6 48-4F ( P DATA /D7D8,/D9E2,
0x268a70…268c04 Dummy {f00=0x00bc, f01=0x0190, f02=» P A A x , ( . , + - ; # , ( $ : X " H W X " H TTB:AP x ACBRELA , ( * 9 H H A W W L , ( W@ H A A _p @ P A 1+ , ( !T u X A
0x268c04…268d98 Dummy {f00=0x00bc, f01=0x0190, f02=»NDTID , ( ! ? > " @ , ( D @ T " ( ^ @ P > , ( R A A " @ T @ n , ( 3 W @ A W W 0 , ( $ S _, W W , ( s
0x268d98…268f2c Dummy {f00=0x00bc, f01=0x0190, f02=» _` A , ( @ T @ W @ T @ W @ @ . , ( >a @ A ^ , ( 3 A , ( S ;a ]@ 1 _L W @ , ( s $ 0
0x268f2c…2690c0 Dummy {f00=0x00bc, f01=0x0190, f02=» @ Q A @ ~ , ( BT A " T @ W @ A , ( ! A P @ _2 N , ( 3 T 0 P P ~ , ( S _ @ @ , ( P s @ @ P
0x2690c0…269254 (1, 464) Opaque[0x194]
0x269254…2693e8 # DirEnt {nam=»TIMER «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1788, f03=0x0000}
0x269254…2693e8 IdxSect {
0x269254…2693e8 f00 = 0x00bc // 0x269254 @0x0
0x269254…2693e8 f01 = 0x0006 // 0x269256 @0x2
0x269254…2693e8 gno = [ // 0x269258 @0x4
0x269254…2693e8 [0x00]: C0x00bc.0x1.0
0x269254…2693e8 [0x01]: C0x00bc.0x2.0
0x269254…2693e8 [0x02]: C0x00bc.0x3.0
0x269254…2693e8 ]
0x269254…2693e8 }
0x2693e8…26957c Dummy {f00=0x00bc, f01=0x0190, f02=» 0 P IDENT TIMER REL 11.0 81-01-26 870105041100 P 8 P* @ P* J 8 P*************************************************** T P* $ P* PHILIPS TERMINAL SYSTEM PTS P* P* TIMER = TIMER FUNCTIONS P* P* P*
0x26957c…269710 Dummy {f00=0x00bc, 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
0x269710…2698a4 Dummy {f00=0x00bc, 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
0x2698a4…269a38 Dummy {f00=0x00bc, 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**
0x269a38…269bcc Dummy {f00=0x00bc, 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 0 P* P EJECT TIMER P* P* P* T I M E R P* ( P* THIS IS THE TIME
0x269bcc…269d60 Dummy {f00=0x00bc, 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
0x269d60…269ef4 (1, 465) Dummy {f00=0x00bc, 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
0x269ef4…26a088 Dummy {f00=0x00bc, 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
0x26a088…26a21c Dummy {f00=0x00bc, 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
0x26a21c…26a3b0 Dummy {f00=0x00bc, 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
0x26a3b0…26a544 Dummy {f00=0x00bc, 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*
0x26a544…26a6d8 Dummy {f00=0x00bc, 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
0x26a6d8…26a86c Dummy {f00=0x00bc, 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
0x26a86c…26aa00 Dummy {f00=0x00bc, 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*
0x26aa00…26ab94 (1, 466) Dummy {f00=0x00bc, 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
0x26ab94…26ad28 Dummy {f00=0x00bc, f01=0x0190, f02=»ET END OF CONFIGURATION DATA t 0 P LD A2,ESYSTA+STKEND GET END OF SYSTEM AREA $ * P CM -2,A2 MAKE SURE CONFIGURATION FILE X " P SUK A2,1 IS FOLLOWED BY X'00' , P SUR A3,A1 LENGTH OF CONFIGURATION DATA 2 P ST A3,CONLEN+STKCOM SAVE LENGTH OF CONF. DA
0x26ad28…26aebc Dummy {f00=0x00bc, f01=0x0190, f02=» SAVE START OF CONFIGURATION DATA | 2 P LD A1,CONLEN+STKCOM GET LENGTH OF CONF. DATA * 0 P ADK A1,2 INCLUDE TRAILING ZEROES IN LENGTH ` P ANKL A1,/FFFE AND MAKE EVEN P ST A1,CONLEN+STKCOM & P LDR A1,A9 GET START OF FREE AREA P LDR A12,A
0x26aebc…26b050 Dummy {f00=0x00bc, f01=0x0190, f02=»T MXSTAB ADDRESS $ P RF(Z) CMOV20 NO MXSTAB PRESENT P* @ 0 P AD A2,M:REL+STKCOM RELOCATE MXSTAB ADDRESS J * P ST A2,SCTMXS AND SAVE AS NEW ADDRESS ~ PCMOV20 EQU * , P LD A2,CONSTA+STKCOM GET START OF CONFF P* < P* MOVE SYSLDA
0x26b050…26b1e4 Dummy {f00=0x00bc, f01=0x018e, f02=» P LDR* A4,A1 P STR A4,A2 P CWR A1,A13 * P RB(NE) MOPRO > ( P ABR A2 CONTINUE EXECUTION IN SYSLDM T P EJECT D P*************************************************************** D P* SUROUTINES USED TO TEST THE SYNTAX OF THE CONFI
0x26b1e4…26b378 Dummy {f00=0x00bc, f01=0x018e, f02=» 2 P* COMPUTE NUMBER OF CHARACTERS IN THIS RECORD P* : 6 P LD A1,EINPBF+STKEND GET CURRENT POINTER IN BUFFER D P LDR A2,A1 SAVE ~ & P LDK A3,0 RESET CHARACTER COUNTER P LDR A4,A8 START OF RECORD PCOR:30 EQU * P LCR A5,A4 GET CHA
0x26b378…26b50c Dummy {f00=0x00bc, f01=0x018e, f02=» h PCOR:38 EQU *-2 P RF(E) COR:40 YES! * P CW A1,ESYSTA+STKEND MEMORY OVERFLOW? 8 P RF(E) MEMOFL YES! f & P ADK A1,1 INCREMENT BUFFER POINTER * P ADK A3,1 INCREMENT CHARACTER COUNTER & P ADK A4,1 INCREMENT RECORD POINTER P RB CO
0x26b50c…26b6a0 Dummy {f00=0x00bc, f01=0x0190, f02=» * P CWK A3,NCHTID CHECK IF END OF RECORD 4 P RB(E) COR:35 NO: SEMICOLON CHARACTER IN RECORD 2 PCOR:45 EQU * j 2 P ST A1,EINPBF+STKEND SAVE CURRENT DESTINATION ~ P LDR A1,A8 START OF RECORD P CALL MOVE PCOR:48 EQU * ( P ADKL A10,1
0x26b6a0…26b834 (1, 467) Opaque[0x194]
0x26b834…26b9c8 # DirEnt {nam=»TMMLKM«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x17f8, f03=0x0000}
0x26b834…26b9c8 IdxSect {
0x26b834…26b9c8 f00 = 0x00bf // 0x26b834 @0x0
0x26b834…26b9c8 f01 = 0x0006 // 0x26b836 @0x2
0x26b834…26b9c8 gno = [ // 0x26b838 @0x4
0x26b834…26b9c8 [0x00]: C0x00bf.0x3.0
0x26b834…26b9c8 [0x01]: C0x00c0.0x0.0
0x26b834…26b9c8 [0x02]: C0x00c0.0x1.0
0x26b834…26b9c8 ]
0x26b834…26b9c8 }
0x26b9c8…26bb5c Dummy {f00=0x00bf, f01=0x0190, f02=» 2 P IDENT TMMLKM REL 11.0 81-01-26 870105041100 P : P* B P* L 6 P************************************************** V P* $ P* PHILIPS TERMINAL SYSTEM PTS P* ( P* TMMLKM = TOSS MMU LKM PROCESSORS P* P*
0x26bb5c…26bcf0 Dummy {f00=0x00bf, 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**
0x26bcf0…26be84 Dummy {f00=0x00bf, 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
0x26be84…26c018 Dummy {f00=0x00bf, 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.
0x26c018…26c1ac Dummy {f00=0x00bf, 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
0x26c1ac…26c340 Dummy {f00=0x00bf, 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
0x26c340…26c4d4 (1, 468) Dummy {f00=0x00c0, 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*
0x26c4d4…26c668 Dummy {f00=0x00c0, 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
0x26c668…26c7fc Dummy {f00=0x00c0, 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
0x26c7fc…26c990 Dummy {f00=0x00c0, 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 &
0x26c990…26cb24 Dummy {f00=0x00c0, 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,
0x26cb24…26ccb8 Dummy {f00=0x00c0, 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
0x26ccb8…26ce4c Dummy {f00=0x00c0, 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 *
0x26ce4c…26cfe0 Dummy {f00=0x00c0, f01=0x4036, f02=» P* 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 *
0x26cfe0…26d174 (1, 469) Dummy {f00=0x00c0, f01=0x2008, f02=» NT TCHPAG PRR 9.1 78-10-16 870105040910 END <@ H
0x26d174…26d308 Dummy {f00=0x00c0, f01=0x0190, f02=»UK A1,1 & P RB(P) TMW:10 MORE ECB:S IN ECBBLK : P ST A3,DWTWAT,A9 NO, SET FIRST DWT ADDRESS IN THE LAST : P RB T:DISP GO TO DISPATCHER x P* PTMW:30 EQU * 4 P ST A8,TTB:SA+16,A5 UPDATE A8 IN TTAB SAVE AREA 2 P ADK A3,0 CHECK FLAG I
0x26d308…26d49c Dummy {f00=0x00c0, f01=0x4184, f02=»OR $ P LDR* A2,A3 GET NEXT DWT ADDRESS P RF(Z) TP:QDI NO MORE DWT:S 2 P CMR A3 SET TO NO WAIT AGAIN V P LDR A3,A2 z P RB TMW:40 P* P EJECT TPROC P* P* PTP:RQE EQU * " P ABL LKMRQE LKM REQUEST ERROR
0x26d49c…26d630 Dummy {f00=0x00c0, 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
0x26d630…26d7c4 Dummy {f00=0x00c0, f01=0x0190, f02=» A x , ( A A A A A A A , ( *T A _ P A A H , ( . , + - ; # x , ( + $ : X " H W X " ACBREL , ( * K H H A W W
0x26d7c4…26d958 Dummy {f00=0x00c0, f01=0x0190, f02=» P " W U z , ( :U A " FNDTID@ J , ( ! ? > " @ , ( D @ T " ( ^ @ P , ( R % A A " @ ,T @ , ( E W @ A W
0x26d958…26daec Dummy {f00=0x00c0, f01=0x0190, f02=»P V | , ( W _x , ( _` A L , ( @ ,T @ W @ T @ W @ @ | , ( % >a @ A , ( E A ,
0x26daec…26dc80 Dummy {f00=0x00c0, f01=0x0190, f02=» l , ( P 3P C @ P @ , ( @ P @ Q A , @ < , ( BT A " T @ W @ A l , ( ! % A ,P @ _2 , ( E ,T 2 0 P nP , ( e _
0x26dc80…26de14 (1, 470) Opaque[0x194]
0x26de14…26dfa8 # DirEnt {nam=»TLDSEG«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1810, f03=0x0000}
0x26de14…26dfa8 IdxSect {
0x26de14…26dfa8 f00 = 0x00c0 // 0x26de14 @0x0
0x26de14…26dfa8 f01 = 0x0008 // 0x26de16 @0x2
0x26de14…26dfa8 gno = [ // 0x26de18 @0x4
0x26de14…26dfa8 [0x00]: C0x00c0.0x2.0
0x26de14…26dfa8 [0x01]: C0x00c0.0x3.0
0x26de14…26dfa8 [0x02]: C0x00c1.0x0.0
0x26de14…26dfa8 [0x03]: C0x00c1.0x1.0
0x26de14…26dfa8 ]
0x26de14…26dfa8 }
0x26dfa8…26e13c Dummy {f00=0x00c0, f01=0x0190, f02=» 2 P IDENT TLDSEG REL 11.0 81-01-26 870105041100 P : P* B P* L 6 P************************************************** V P* $ P* PHILIPS TERMINAL SYSTEM PTS P* P* TLDSEG = LOAD SEGMENT P* P* P*
0x26e13c…26e2d0 Dummy {f00=0x00c0, 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 TLSEG1
0x26e2d0…26e464 Dummy {f00=0x00c0, f01=0x0190, f02=» P* EXTERNALS * P************* P* 0 P* : 0 P EXTRN PRUN TTAB ADDRESS OF RUNNING PROGRAM D P EXTRN TDISP DISPATCHER x P EXTRN RELPAG RELEASE PAGE $ P EXTRN LKM030 LKM REQUEST ERROR & P EXTRN PAG:QB QUEUE LINK BACKWARDS
0x26e464…26e5f8 Dummy {f00=0x00c0, f01=0x0190, f02=»GE BLOCK ADDRESS P EXTRN TTB:AP ACB ADDRESS & P EXTRN TTB:PW PROGRAM STATUS WORD : P EXTRN TTB:SA TTAB SAVE AREA d P EXTRN TTB:MT MMU TABLE & P EXTRN TTB:CB CURRENT SEGMENT BASE ( P EXTRN TTB:SP SEGMENT TABLE ADDRESS ( P EXTRN TTB
0x26e5f8…26e78c Dummy {f00=0x00c0, f01=0x0190, f02=» ACBNPE NUMBER OF PAGE ENTRIES * P EXTRN ACBLAP LOGICAL ADDRESS OF PAGES & P EJECT TLDSEG T P* l P* v . P***************************************** P* P* CONDITIONAL ASSEMBLY P* . P************************************
0x26e78c…26e920 Dummy {f00=0x00c0, f01=0x0190, f02=» EQU 1 P* P* 6 P* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION " . P* SET IS OBTAINED BY SETTING CPU852 EQU 0. P* PCPU852 EQU 0 P* P* . P* A PROGRAM VERSION USING TOSS DISC PAGING * P* IS OBTAINED BY SETTI
0x26e920…26eab4 (1, 471) Dummy {f00=0x00c0, f01=0x0190, f02=» P********** P* P* $ 0 P* THIS IS THE LOAD SEGMENT LKM PROCESSOR. . P* b * P* IT IS ENTERED FROM THE LKM HANDLER l & P* WITH THE FOLLOWING PARAMETERS: P* P* A2 = DISPATCH ADDRESS P* A5 = TTAB ADDRESS
0x26eab4…26ec48 Dummy {f00=0x00c0, f01=0x0190, f02=» > P* A7 = UNCHANGED IF SEGMENT LOADING IS SUCCESSFUL, ELSE & P* A7 = -1 IF REQUEST ERROR, ELSE F ( P* A7 = -2 IF DISC I/O ERROR, ELSE p $ P* A7 = -3 IF DISC NOT OPERABLE P* 2 P* WHEN REQUESTED SEGMENT IS ALREADY IN CORE: < P*
0x26ec48…26eddc Dummy {f00=0x00c0, f01=0x0190, f02=»POSE TO MAKE THE REQUEST AS FAST AS POSSIBLE. P* 6 : P* WHEN REQUESTED SEGMENT IS NOT IN CORE TLDSEG WILL @ : P* ACTIVATE LDTASK WHICH WILL LOAD SEGMENT INTO CORE. ~ P* P* P EJECT TLDSEG P* P* PTLDSEG EQU *
0x26eddc…26ef70 Dummy {f00=0x00c0, f01=0x0190, f02=»MENT STATUS , P ANK A4,/1E CHECK IF CORE RESIDENT OR... 2 P RF(NZ) TLDS00 ...USED BY AN INTERRUPTED TASK D P* z ( P* INSERT PAGE BLOCK IN PAGE QUEUE P* P CF A15,RELPAG RELEASE PAGE P LD A4,TTB:PW,A5 PSW & P ST A4,-2,A15
0x26ef70…26f104 Dummy {f00=0x00c0, f01=0x0190, f02=»A5 SEGTAB ADDRESS * P LDR A1,A7 CHECK IF SEGMENT NUMBER < 0 P RF(N) TLDERR REQUEST ERROR H 4 P CW A1,SEG:NS,A3 CHECK IF SEGMENT NUMBER TOO BIG l P RF(NG) TLDS03 OK P* $ PTLDERR LDK A6,/FF INDICATE ERROR , P ABL LKM030 BRANCH TO LK
0x26f104…26f298 Dummy {f00=0x00c0, f01=0x0190, f02=»LL A1,3 ADJUST FOR INDEXING IN SEGTAB " P ADR A1,A3 ADD SEGTAB ADDRESS . P LDR A3,A5 GET TTAB ADDRESS T P* x P IFT DSKPAG=0 $ P SUKL A15,4 ADJUST STACKPOINTER . P ST A2,4,A15 SET DISPATCH ADDRESS ON STACK P XIF P* " P
0x26f298…26f42c Dummy {f00=0x00c0, f01=0x0190, f02=»:DS,A1 GET LOGICAL ADDRESS OF SEGMENT 0 P* 0 P IFT DSKPAG=1 : $ P SUKL A15,4 ADJUST STACKPOINTER P . P ST A2,4,A15 SET DISPATCH ADDRESS ON STACK x P XIF P RF TLDS40 P* P EJECT TLDSEG P* P* PTLDS05 EQU
0x26f42c…26f5c0 Dummy {f00=0x00c0, f01=0x018e, f02=»0 SEGMENT LOADED IN CORE P ST A2,TTB:SA,A3 P CM PRUN 8 P* H P* ACTIVATE LOAD TASK R P* n 6 P CF A15,QLTDSK ACTIVATE LOAD TASK AT ENTRY LT:DSK x P ABL TDISP GO TO DISPATCHER P* PTLDS10 EQU * $ P SUKL A15,4 ADJUST S
0x26f5c0…26f754 (1, 472) Dummy {f00=0x00c1, f01=0x0190, f02=» P* TLSEG1 * P* TLSEG2 * P********** , P* > P* H > P* ENTRIES USED BY LDTASK IN PURPOSE TO REMOVE PAGE BLOCK R @ P* FROM PAGQUE, UPDATE CURRENT SEGMENT BASE AND MMU TABLE. P* P* INPUT: $ P* TLSEG1: A1 = SEG
0x26f754…26f8e8 Dummy {f00=0x00c1, f01=0x0190, f02=»G2: A1 = PAGBLK ADDRESS ( P* A3 = TTAB ADDRESS LDTASK & P* A5 = " " " L P* v . P* OUTPUT: A1-A6 FROM TTAB SAVE AREA (A5) P* P XIF P* & PTLSEG1 EQU * ENTRY USED BY LDTASK ( P LD A1,SEG:P
0x26f8e8…26fa7c Dummy {f00=0x00c1, f01=0x0190, f02=»N QUEUE r , P LD A4,PAG:QB,A1 GET QUEUE LINK BACKWARD 4 P CMR A1 RESET QUEUE LINK FORWARD OF REMOVED BLK @ " P STR A2,A4 UPDATE QUEUE LINKS x P ST A4,PAG:QB,A2 P XIF P* P EJECT TLDSEG P* , P* GET PAGE ADDRESS OF REQU
0x26fa7c…26fc10 Dummy {f00=0x00c1, f01=0x0190, f02=»G=1 P ECR A2,A1 P ANK A2,/FC P* 2 4 P* GET PAGE ENTRY/ENTRIES TO UPDATE IN MMU TABLE < P* t P LD A6,TTB:AP,A5 ACB ADDRESS ~ 4 P AD A3,ACBMMP,A6 POINT TO FIRST USED PAGE ENTRY 0 P LD A4,ACBNPE,A6 GET NUMBER OF PAGE ENTRIES
0x26fc10…26fda4 Dummy {f00=0x00c1, f01=0x0190, f02=» RF(NP) TLDS30 NO MORE PAGE ENTRIES & P ADK A3,2 POINT TO NEXT PAGE ENTRY , " P ADK A2,4 UPDATE PAGE ADDRESS V P RB TLDS25 | P* P EJECT TLDSEG P* P* 4 PTLDS30 ANKL A1,/300 COMPUTE CURRENT SEGMENT BASE P SLL A1,2
0x26fda4…26ff38 Dummy {f00=0x00c1, f01=0x0190, f02=»MENT BASE l P XIF P* P IFT MMUPAG=0 ( PTLDS40 EQU * > 2 P ST* A1,TTB:CB,A5 UPDATE CURRENT SEGMENT BASE R P XIF P* P IFT CPU852=0 P LDR A6,A5 $ P ML 6,TTB:SA+2,A6 RESTORE A1-A6 $ P RTN A15 RETURN TO CALLING
0x26ff38…2700cc Dummy {f00=0x00c1, f01=0x40c2, f02=»A+6,A5 P LD A4,TTB:SA+8,A5 P LD A6,TTB:SA+12,A5 ( P LD A5,TTB:SA+10,A5 D $ P RTN A15 RETURN TO CALLING TASK ` P XIF P* P* P* P END @ $ P ML 6,TTB:SA+2,A6 RESTORE A1-A6 $ P RTN A15 RETURN TO CALLING
0x2700cc…270260 Dummy {f00=0x00c1, f01=0x2008, f02=» NT TLDSEG PREREL.9.1 780907 BOFE END 6@ B
0x270260…2703f4 (1, 473) Dummy {f00=0x00c1, f01=0x0190, f02=» POINTER n & P CW A8,PLDADR+STKEND END OF BUFFER P RF(NE) COR:10 NO! : P CALL READC READ SECTOR T $ PCOR:10 LDR A4,A8 START OF RECORD t P RTN A14 P XIF P IFT CFTEST+CASS=2 PCON:40 EQU * " P CF A14,RDBLK READ NEXT BLOCK
0x2703f4…270588 Dummy {f00=0x00c1, f01=0x0002, f02=»
0x270588…27071c Dummy {f00=0x00c1, f01=0x0190, f02=» J F IDENT TMMLKM REL 11.0 81-01-26 870105041100 TCHPAGK TCHMMU TLUSEG R TCHPAGK t TTB:MT LKMQDI TCHMMU FNDTID , ( $' "?:B ] TLU
0x27071c…2708b0 Dummy {f00=0x00c1, f01=0x407a, f02=» ,$ T -_> | RELPAG Q - _H . P -U 3U IT H X d@ vPAGK t TTB:MT LKMQDI TCHMMU FNDTID , ( $' "?:B ] TLU
0x2708b0…270a44 Dummy {f00=0x00c1, f01=0x2008, f02=»
0x270a44…270bd8 Dummy {f00=0x00c1, f01=0x0190, f02=»EGAL DIGITS z $ P ST A5,NDEVCL+STKEND SAVE NUMBER " PNN:50 LCR A5,A4 GET CHARACTER < P CCK A5,';;' END OF RECORD? b P RF(NE) CONERR NO! P RTN A14 P EJECT PAA EQU * P LDK A3,2 PAA:10 EQU * P LCR A5,A4 GET CHARA
0x270bd8…270d6c Dummy {f00=0x00c1, f01=0x0190, f02=» P RF(NG) AA:20 NO! 0 P CCK A5,/4141 ALPHA-NUMERIC CHARACTER < 41? P RF(L) CONERR R 0 P CCK A5,/5A5A ALPHA-NUMERIC CHARACTER > 5A? h P RF(G) CONERR PAA:20 EQU * & P ADK A4,1 INCREMENT BUFFER POINTER P SUK A3,1 P RB(NZ
0x270d6c…270f00 Dummy {f00=0x00c1, f01=0x0190, f02=»CT PTID EQU * " P LDKL A2,SEQ1 SELECT SEQUENCE & P LDK A3,4 GET NUMBER OF CHARACTERS B P RTN A14 l PTCL EQU * | " P LDKL A2,SEQ2 SELECT SEQUENCE & P LDK A3,4 GET NUMBER OF CHARACTERS P RTN A14 PLEV EQU * " P LDKL A2
0x270f00…271094 (1, 474) Opaque[0x194]
0x271094…271228 # DirEnt {nam=»TABORT«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1830, f03=0x0000}
0x271094…271228 IdxSect {
0x271094…271228 f00 = 0x00c1 // 0x271094 @0x0
0x271094…271228 f01 = 0x0004 // 0x271096 @0x2
0x271094…271228 gno = [ // 0x271098 @0x4
0x271094…271228 [0x00]: C0x00c1.0x2.0
0x271094…271228 [0x01]: C0x00c1.0x3.0
0x271094…271228 ]
0x271094…271228 }
0x271228…2713bc Dummy {f00=0x00c1, f01=0x0190, f02=» 2 P IDENT TABORT REL 11.0 81-01-26 870105041100 P : P* B P* L 6 P************************************************* V P* $ P* PHILIPS TERMINAL SYSTEM PTS P* " P* TABORT = ABORT I/O REQUEST P* P* P*
0x2713bc…271550 Dummy {f00=0x00c1, 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*
0x271550…2716e4 Dummy {f00=0x00c1, 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 DWTECB ECB ADDRESS ( P EXTRN DWTSB2 2ND STACK BASE IN DWT * P EXTRN DWTECH ECHO DEVIC
0x2716e4…271878 Dummy {f00=0x00c1, f01=0x0190, f02=»XTRN LKMRQE LKM REQUEST ERROR P EXTRN FREBLK FREE ONE BLOCK & P EXTRN ECBRC ECN RETURN CODE J P EJECT TABORT n P* P* . P***************************************** P* P* CONDITIONAL ASSEMBLY P* . P**********
0x271878…271a0c Dummy {f00=0x00c1, f01=0x0190, f02=»1. l P* PMMUPAG EQU 1 P* ( P EJECT TABORT 2 P* J P* T P********** ^ P* TABORT * p P********** P* P* 4 P* THIS IS THE ABORT I/O REQUEST LKM PROCESSOR. P* * P* IT IS ENTERED FROM THE LKM
0x271a0c…271ba0 Dummy {f00=0x00c1, f01=0x018e, f02=»* A PENDING I/O REQUEST IS ABORTED. < P* THE ABORT REQUEST MUST BE ISSUED FROM THE SAME TASK . : P* THAT MADE THE I/O REQUEST. THUS I/O WITH WAIT CAN n P* NOT BE ABORTED. P* P* PTABORT EQU * P IFT MMUPAG=0 " P L
0x271ba0…271d34 (1, 475) Dummy {f00=0x00c1, f01=0x0190, f02=» , P RF(N) TABRQE REQUEST ALREADY COMPLETED ( P CF A15,FNDDWT LOOK FOR DWT ADDRESS 4 P LDR A7,A6 SAVE DWT ADDRESS ` P RF(Z) TABRQE DWT UNKNOWN P* P EJECT TABORT P* P* P CW A5,DWTTAB,A6 P RF(NE) TABRQE ILLEG
0x271d34…271ec8 Dummy {f00=0x00c1, f01=0x018e, f02=» RF(E) TABRQE ABORT NOT ALLOWED P LD A4,DWTST,A6 ( " P RF(N) TABRQE DEVICE NOT BUSY @ P SLC A4,2 f $ P RF(NN) TAB:20 NOT ECHO REQUEST x & P LD A6,DWTECH,A6 ECHO DWT ADDRESS : P LD A3,DWTADR,A6 ADDRESS TO ECHO DRIVER ADDRESS BLOCK * P
0x271ec8…27205c Dummy {f00=0x00c1, f01=0x0190, f02=» P SUK A3,1 2 P RF(Z) TABRQE ABORT NOT ALLOWED ON ECHO DEVICE " P LDR A6,A7 RESTORE DWT ADDRESS P P* v PTAB:20 EQU * P LD A4,DWTWAT,A6 " P RF(Z) TAB:30 I/O WITH NO WAIT : P CF A15,FREBLK I/O AND ACTIVATE. FREE DISPATCHER BLOCK
0x27205c…2721f0 Dummy {f00=0x00c1, f01=0x0190, f02=» " P ST A1,DWTWAT,A6 INDICATE WAIT P SRC A1,2 A1 := /4000 . 0 P ORS A1,ECBRC,A8 SET RETURN CODE TO ABORTED L 6 P LDKL A5,DWTSB2 2ND STACK BASE DISPLACEMENT IN DWT P ADR A5,A6 ADD DWT ADDRESS P* , P* EXIT IS MADE TO DRIVER ABORT R
0x2721f0…272384 Dummy {f00=0x00c1, f01=0x4124, f02=»A8 = ECB ADDRESS (IN SYSTEM AREA IF MMU) P* 0 $ P LDR A9,A9 ABORT ROUTINE ADDRESS : . P ABR(NZ) A9 PERFORM ABORT ROUTINE (IF ANY) b P ABL DISEND TENDIO AND TDISP P* 0 PTABRQE ABL LKMRQE GO AND INDICATE LKM ERROR P* P*
0x272384…272518 Dummy {f00=0x00c1, f01=0x2008, f02=»
0x272518…2726ac Dummy {f00=0x00c1, f01=0x0190, f02=»:DS,A1 GET LOGICAL ADDRESS OF SEGMENT 0 P* 0 P IFT DSKPAG=1 : $ P SUKL A15,4 ADJUST STACKPOINTER P . P ST A2,4,A15 SET DISPATCH ADDRESS ON STACK x P XIF P RF TLDS40 P* P EJECT TLDSEG P* P* PTLDS05 EQU
0x2726ac…272840 Dummy {f00=0x00c1, f01=0x018e, f02=»0 SEGMENT LOADED IN CORE P ST A2,TTB:SA,A3 P CM PRUN 8 P* H P* ACTIVATE LOAD TASK R P* n 6 P CF A15,QLTDSK ACTIVATE LOAD TASK AT ENTRY LT:DSK x P ABL TDISP GO TO DISPATCHER P* PTLDS10 EQU * $ P SUKL A15,4 ADJUST S
0x272840…2729d4 (1, 476) Opaque[0x194]
0x2729d4…272b68 # DirEnt {nam=»MONTIM«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1840, f03=0x0000}
0x2729d4…272b68 IdxSect {
0x2729d4…272b68 f00 = 0x00c2 // 0x2729d4 @0x0
0x2729d4…272b68 f01 = 0x0006 // 0x2729d6 @0x2
0x2729d4…272b68 gno = [ // 0x2729d8 @0x4
0x2729d4…272b68 [0x00]: C0x00c2.0x0.0
0x2729d4…272b68 [0x01]: C0x00c2.0x1.0
0x2729d4…272b68 [0x02]: C0x00c2.0x2.0
0x2729d4…272b68 ]
0x2729d4…272b68 }
0x272b68…272cfc Dummy {f00=0x00c2, f01=0x0190, f02=» 2 P IDENT MONTIM REL 11.0 81-01-26 870105041100 P : P* B P* L < P******************************************************* V P* $ P* PHILIPS TERMINAL SYSTEM PTS P* . P* MONTIM = MONITOR CLOCK/DATE PROCESSORS P*
0x272cfc…272e90 Dummy {f00=0x00c2, f01=0x0190, f02=» @ P* THIS MODULE CONTAINS TOSS MONITOR CLOCK/DATE PROCESSORS P* H 0 P* -GETTIM GET TIME FROM MONITOR CLOCK R P* . P* -SETTIM SET TIME IN MONITOR CLOCK P* 0 P* -GETDAT GET DATE FROM MONITOR CLOCK P* .
0x272e90…273024 Dummy {f00=0x00c2, f01=0x0190, f02=»* P*********** P* P* ( . P ENTRY GETTIM GET TIME FROM MONITOR CLOCK 2 , P ENTRY SETTIM SET TIME IN MONITOR CLOCK d . P ENTRY TDATE GET/SET DATE IN MONITOR CLOCK P EJECT MONTIM P* P* P************* P
0x273024…2731b8 Dummy {f00=0x00c2, f01=0x0190, f02=»H l P EXTRN TTB:SA TTAB SAVE AREA P EJECT MONTIM . P* F P* P . P***************************************** Z P* P* CONDITIONAL ASSEMBLY P* . P***************************************** P* . P* A PROGRAM VE
0x2731b8…27334c Dummy {f00=0x00c2, f01=0x0190, f02=»M P* P* P********** P* GETTIM * 0 P********** B P* T P* ^ , P* THIS IS THE GET TIME LKM PROCESSOR. h P* , P* IT IS ENTERED FROM THE LKM HANDLER 0 P* WITH ADDRESS TO THE USER TIMER CONTROL 2 P*
0x27334c…2734e0 Dummy {f00=0x00c2, f01=0x0190, f02=»ONCLO+6 ADDRESS TO MONITOR CLOCK SECOND P* 0 $ PGETDAT EQU * ENTRY USED BY TDATE : P LDK A3,6 COUNTER b P LDR* A6,A7 SECONDS | P STR A6,A15 SAVE ON STACK P SUK A7,2 P LDR* A6,A7 MINUTES P STR A6,A15 SAVE ON STACK
0x2734e0…273674 (1, 477) Dummy {f00=0x00c2, f01=0x0190, f02=» SC A6,1,A8 STORE RIGHTHAND CHARACTER P ECR A6,A6 . ( P SCR A6,A8 STORE LEFTHAND CHARACTER @ P XIF l P* x P EJECT MONTIM P* P* P IFT MMUPAG=1 . P LDR A4,A8 GET TIMER CONTROL BLOCK ADDRESS P ANK A4,1 " P
0x273674…273808 Dummy {f00=0x00c2, f01=0x0190, f02=»A1,1,A8 P ELR A4,A8 P SRL A6,8 " P ANKL A4,/FF00 4 P ORR A6,A4 J P* 6 PGETT15 ESR A6,A8 SET VALUE IN TIMER CONTROL BLOCK f P XIF P* P SUK A3,2 P RF(E) GETT20 P ADKL A8,2 , P LDR* A6,A15 GET ACTUAL
0x273808…27399c Dummy {f00=0x00c2, f01=0x0190, f02=»ACCUMULATED 24 HOUR CARRY 2 P ST A6,TTB:SA+14,A5 STORE IN TTAB SAVE AREA A7 " P* X PTPDIS EQU * b P CMR A7 CLEAR MIDNIGTH CARRY v P ABL LKMQDI P* P EJECT MONTIM P* P* P********** P* SETTIM * P
0x27399c…273b30 Dummy {f00=0x00c2, f01=0x0190, f02=»WITH h 0 P* ADDRESS TO THE USER TIMER CONTROL BLOCK 0 P* IN A8. VALUE IN TIMER CONTROL BLOCK IS @ $ P* COPIED INTO MONITOR CLOCK. t P* P* PSETTIM EQU * 6 P LDKL A7,MONCLO+6 ADDRESS TO MONITOR CLOCK SECOND P* $ P
0x273b30…273cc4 Dummy {f00=0x00c2, f01=0x0190, f02=»6,A8 GET LEFTHAND CHARACTER P ECR A6,A6 $ ( P LC A6,1,A8 GET RIGHTHAND CHARACTER 6 P XIF b P* n P EJECT MONTIM x P* P* P IFT MMUPAG=1 2 P ELR A6,A8 GET VALUE FROM TIMER CONTROL BLOCK . P LDR A4,A8 GET TIMER CON
0x273cc4…273e58 Dummy {f00=0x00c2, f01=0x0190, f02=» SLL A6,8 P SRL A4,8 P ORR A6,A4 $ P* 6 PSETT15 EQU * @ P XIF T P* ` $ P CF A15,ASCTBY CONVERT TO BINARY j P SUK A3,2 END P RF(E) SETT20 P ADKL A8,2 0 P STR A6,A15 SAVE ON STACK (HOURS AND MINUTES P RB
0x273e58…273fec Dummy {f00=0x00c2, f01=0x0190, f02=» l P SUK A7,2 P LDR* A6,A15 ( P STR A6,A7 MINUTES TO MONITOR CLOCK . P SUK A7,2 Z P LDR* A6,A15 l & P STR A6,A7 HOURS TO MONITOR CLOCK P SUK A7,2 P RB TPDIS P* P EJECT MONTIM P* P* P****
0x273fec…274180 Dummy {f00=0x00c2, f01=0x0190, f02=» IT IS ENTERED FROM THE LKM HANDLER ( P* WITH THE FOLLOWING PARAMETERS: , P* X $ P* A7 = GET/SET DATE PARAMETER b < P* (A7 = 0 MEANS GET DATE, A7 = 1 MEANS SET DATE) & P* A8 = DATE CONTROL BLOCK (DCB) P* P* 0 P
0x274180…274314 (1, 478) Dummy {f00=0x00c2, f01=0x0190, f02=»DK A1,0 SET CR P RB(Z) GETDAT GET DATE P RB SETDAT SET DATE 4 P* P P EJECT MONTIM Z P* r P* | P********** P* BYTASC * P********** P* P* 2 P* BYTASC = SUBROUTINE TO CONVERT A6-CONTENT ( P*
0x274314…2744a8 Dummy {f00=0x00c2, f01=0x0190, f02=»* PBYTA10 SUK A6,/A P RF(N) BYTA20 " P ADKL A4,/100 8 P RB BYTA10 N P* ` PBYTA20 ADK A6,/A j P ADR A6,A4 P ORKL A6,/3030 P RTN A15 P* P EJECT MONTIM P* P* P********** P* ASCT
0x2744a8…27463c Dummy {f00=0x00c2, f01=0x414e, f02=»RY. p P* RESULT IN A6. P* 0 P* : PASCTBY EQU * D P LDR A4,A6 X P ANK A6,/F j P SRL A4,8 | P ANK A4,/F P RF(E) ASCT20 P* PASCT10 ADK A6,/A P SUK A4,1 P RB(NE) ASCT10 P*
0x27463c…2747d0 Dummy {f00=0x00c2, 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
0x2747d0…274964 Dummy {f00=0x00c2, f01=0x4124, f02=»A8 = ECB ADDRESS (IN SYSTEM AREA IF MMU) P* 0 $ P LDR A9,A9 ABORT ROUTINE ADDRESS : . P ABR(NZ) A9 PERFORM ABORT ROUTINE (IF ANY) b P ABL DISEND TENDIO AND TDISP P* 0 PTABRQE ABL LKMRQE GO AND INDICATE LKM ERROR P* P*
0x274964…274af8 Dummy {f00=0x00c2, f01=0x2008, f02=»
0x274af8…274c8c Dummy {f00=0x00c2, f01=0x0190, f02=»=2 + j P RF(E) AP2345 =2 , 6 P AN A4,OPTION+STKEND LOOK IF THIS TYPE ALLOWED =2 , $ P RF(NZ) AP2345 YES =2 , ^ , P LDK A1,LMP9 NO, WRONG MONITOR OPTION =2 , | P CALL ERROR =2 , PAP2345 EQU * =2 , & P ORR A2,A4 SET BIT IN OPTION WORD , P
0x274c8c…274e20 Dummy {f00=0x00c2, f01=0x018e, f02=»PAGE SIZE , r 6 P CW A3,SCTPSZ COMPARE WITH PREVIOUSLY DEFINED SIZE - . P RF(NG) AP2350 IF LESS, DON'T UPDATE SIZE - L P* - ~ 0 P ST A3,SCTPSZ SAVE LARGEST DEFINED PAGE SIZE - PAP2350 EQU * - P IFT MMUPAG=1 - P EJECT - P* - 2 P* EXECUTI
0x274e20…274fb4 (1, 479) Opaque[0x194]
0x274fb4…275148 # DirEnt {nam=»CTAB01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1858, f03=0x0000}
0x274fb4…275148 IdxSect {
0x274fb4…275148 f00 = 0x00c2 // 0x274fb4 @0x0
0x274fb4…275148 f01 = 0x0004 // 0x274fb6 @0x2
0x274fb4…275148 gno = [ // 0x274fb8 @0x4
0x274fb4…275148 [0x00]: C0x00c2.0x3.0
0x274fb4…275148 [0x01]: C0x00c3.0x0.0
0x274fb4…275148 ]
0x274fb4…275148 }
0x275148…2752dc Dummy {f00=0x00c2, f01=0x0190, f02=» $ P IDENT CTAB01 REL. 11.0 81/10/28 P , 8 P*************************************************** 4 8 P* * p 8 P* CTAB01, CTAB02, CTAB03, KEY CONVERSION FOR * 8 P* 6271, 6272 KEYBOARDS FOR DAN
0x2752dc…275470 Dummy {f00=0x00c2, f01=0x0190, f02=»*** ` P EJECT P********************* P* ENTRIES * 8 P********************* V P ENTRY CTAB01,CTAB02,CTAB03 t P EJECT PCTAB01 EQU * PCTAB02 EQU * PCTAB03 EQU * P " P DATA UNSH,SHIFT,UNSH,SHIFT,0
0x275470…275604 Dummy {f00=0x00c2, f01=0x0190, f02=»3,SHIFT4,SHIFT5,SHIFT6,0 p PUNSH0 EQU * : P DATA /BAB1,/B2B3,/B4B5,/B6B7,/B8B9,/B0A2,/8489,/88A0 4 PUNSH1 EQU * r : P DATA /3031,/3233,/3435,/3637,/3839,/8F90,/852D,/8C8D PUNSH2 EQU * : P DATA /207F,/7F7F,/7F7F,/7F27,/A43C,/7F2B,/2C2D,
0x275604…275798 Dummy {f00=0x00c2, f01=0x0190, f02=»445,/4647,/4849,/4A4B,/4C4D,/4E4F | PUNSH5 EQU * * : P DATA /5051,/5253,/5455,/5657,/5859,/5A5C,/5B5D,/5E7F > PUNSH6 EQU * | : P DATA /7F92,/7FA5,/7F8A,/8B7F,/7F7F,/7F7F,/7F7F,/7F7F P EJECT PSHIFT0 EQU * : P DATA /C6B1,/B2B3,/B4B5,
0x275798…27592c Dummy {f00=0x00c2, f01=0x018e, f02=» : P DATA /207F,/7F7F,/7F7F,/7F2A,/A43E,/7F3F,/3B5F,/3A7F PSHIFT3 EQU * B : P DATA /3D21,/2223,/2425,/262F,/2829,/8682,/8780,/8183 V PSHIFT4 EQU * : P DATA /4041,/4243,/4445,/4647,/4849,/4A4B,/4C4D,/4E4F PSHIFT5 EQU * : P DATA /5051,/5
0x27592c…275ac0 Dummy {f00=0x00c2, f01=0x400c, f02=» @ 07F,/7F7F,/7F7F,/7F2A,/A43E,/7F3F,/3B5F,/3A7F PSHIFT3 EQU * B : P DATA /3D21,/2223,/2425,/262F,/2829,/8682,/8780,/8183 V PSHIFT4 EQU * : P DATA /4041,/4243,/4445,/4647,/4849,/4A4B,/4C4D,/4E4F PSHIFT5 EQU * : P DATA /5051,/5
0x275ac0…275c54 (1, 480) Dummy {f00=0x00c3, f01=0x2008, f02=»
0x275c54…275de8 Dummy {f00=0x00c3, f01=0x0010, f02=» h H P X
0x275de8…275f7c Dummy {f00=0x00c3, f01=0x0190, f02=»4T >X~ RCR @ D = ( @ B P Q a ! K1 > d T K1 @ * *
0x275f7c…276110 Dummy {f00=0x00c3, f01=0x0190, f02=» @ B P Q a b ! K2 > d T K2 @ * * 0 P Q a p P1 > d T P1 @
0x276110…2762a4 Dummy {f00=0x00c3, f01=0x0190, f02=» 0 P Q a b " P2 > d T P2 @ * * d
0x2762a4…276438 Dummy {f00=0x00c3, f01=0x0190, f02=»
[…0x2…]
0x276760…2768f4 (1, 481) Opaque[0x194]
0x2768f4…276a88 # DirEnt {nam=»DVKB00«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1868, f03=0x0000}
0x2768f4…276a88 IdxSect {
0x2768f4…276a88 f00 = 0x00c3 // 0x2768f4 @0x0
0x2768f4…276a88 f01 = 0x0002 // 0x2768f6 @0x2
0x2768f4…276a88 gno = [ // 0x2768f8 @0x4
0x2768f4…276a88 [0x00]: C0x00c3.0x1.0
0x2768f4…276a88 ]
0x2768f4…276a88 }
0x276a88…276c1c Dummy {f00=0x00c3, f01=0x0190, f02=» 2 P IDENT DVKB00 REL 11.0 81-01-26 870105041100 P : P* B " P* KEYBOARD DEVICE WORK TABLE L P* r P ENTRY DVKB00 TABLE ENTRY | P EXTRN CTAB01 P EXTRN KBAD4 PMMUPAG EQU 1 P* P* P* PDVKB00 EQU *
0x276c1c…276db0 Dummy {f00=0x00c3, f01=0x0190, f02=»-DVKB00 ORDER ( P DATA KBAD4 POINTER TO ADDRESS BLOCK P DATA 'KB' TTAB ADDRESS B " P DATA 0 WAIT/ACTIVE INDICATOR b P DATA 0 TERMINAL QUEUE P IFT MMUPAG=1 & P DATA 0 SAVE AREA USER ECB ADDRESS P DATA DEVECB MMU ECB ADDRESS
0x276db0…276f44 Dummy {f00=0x00c3, f01=0x0190, f02=» x P RES 4 DWT STACK P DATA 0 SAVE AREA FOR A7 P DATA 0 SAVE AREA FOR A8 @ $ P DATA /0001 CHANNEL PARAMETER-2 ` " P DATA 0 LINE DRIVER DEPENDENT " P DATA 0 LINE DRIVER DEPENDENT P DATA /3000 DEVICE STATUS P DATA
0x276f44…2770d8 Dummy {f00=0x00c3, f01=0x4164, f02=»ATA 0 TIMER . P DATA DWTSQ+DVKB00 POINTER TO FIRST PLACE , P DATA DWTSQ+DVKB00 POINTER TO LAST PLACE F PDWTSQ EQU *-DVKB00 v P DATA 0,0,0,0,0,0,0,0 P DATA 0,0 P IFT MMUPAG=1 PDEVECB EQU * P DATA 0,0,0,0,0,0 P DAT
0x2770d8…27726c Dummy {f00=0x00c3, f01=0x2008, f02=» TRIPLE ZERO " DATA 0 POINTER TO FIRST PLACE " DATA 0 POINTER TO LAST PLACE B DWTSQ/EQU/*-DVTKB h RES 0 IFT MMUPAG=1 DATA 0 DATA 0 XIF DWTEND EQU * END @ PRESENT CONVERSI
0x27726c…277400 Dummy {f00=0x00c3, f01=0x0190, f02=»
0x277400…277594 (1, 482) Opaque[0x194]
0x277594…277728 # DirEnt {nam=»DVDI00«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1870, f03=0x0000}
0x277594…277728 IdxSect {
0x277594…277728 f00 = 0x00c3 // 0x277594 @0x0
0x277594…277728 f01 = 0x0002 // 0x277596 @0x2
0x277594…277728 gno = [ // 0x277598 @0x4
0x277594…277728 [0x00]: C0x00c3.0x2.0
0x277594…277728 ]
0x277594…277728 }
0x277728…2778bc Dummy {f00=0x00c3, f01=0x0190, f02=» 2 P IDENT DVDI00 REL 11.0 81-01-26 870105041100 P : P* B . P* DEVICE WORK TABLE FOR DISPLAY INDICATOR L P* ~ P* & P ENTRY DVDI00 DISPLAY INDICATOR 03 P* P* ( P EXTRN DIAD POINTER TO ADDRESS-BLOCK PMMUPAG EQU 1
0x2778bc…277a50 Dummy {f00=0x00c3, f01=0x0190, f02=» P DATA 0 ECB ADDRESS P DATA DWTEND-DVDI00 ORDER ( P DATA DIAD POINTER TO ADDRESS-BLOCK B P DATA 'DI' TTAB ADDRESS n P DATA 0 WAIT ACTIVATE P DATA 0 TERMINAL QUEUE P IFT MMUPAG=1 & P DATA 0 SAVE AREA USER ECB ADDRESS
0x277a50…277be4 Dummy {f00=0x00c3, f01=0x018e, f02=» P DATA 0 SAVE AREA A5 =1 P RES 4 DWT STACK $ P DATA 0 SAVE AREA A7 =1 < P DATA 0 SAVE AREA A8 $ P DATA /0001 CHANNEL PARAMETER -2 x " P DATA 0 LINE DRIVER DEPENDENT " P DATA 0 LINE DRIVER DEPENDENT P DATA /8000 DEVICE STATUS
0x277be4…277d78 Dummy {f00=0x00c3, f01=0x4082, f02=» x P IFT MMUPAG=1 PDEVECB DATA 0,0,0,0,0,0 P XIF > PDWTEND EQU * J P* ^ P* h P END r@ ~1 CHANNEL PARAMETER -2 x " P DATA 0 LINE DRIVER DEPENDENT " P DATA 0 LINE DRIVER DEPENDENT P DATA /8000 DEVICE STATUS
0x277d78…277f0c Dummy {f00=0x00c3, 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
0x277f0c…2780a0 Dummy {f00=0x00c3, f01=0x018e, f02=» P DATA ILLINT 53 P DATA ILLINT 54 P DATA ILLINT 55 < P DATA ILLINT 56 X P DATA ILLINT 57 t P DATA ILLINT 58 P DATA ILLINT 59 P DATA ILLINT 60 P DATA ILLINT 61 P DATA IL
0x2780a0…278234 (1, 483) Opaque[0x194]
0x278234…2783c8 # DirEnt {nam=»DVDY00«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1878, f03=0x0000}
0x278234…2783c8 IdxSect {
0x278234…2783c8 f00 = 0x00c3 // 0x278234 @0x0
0x278234…2783c8 f01 = 0x0002 // 0x278236 @0x2
0x278234…2783c8 gno = [ // 0x278238 @0x4
0x278234…2783c8 [0x00]: C0x00c3.0x3.0
0x278234…2783c8 ]
0x278234…2783c8 }
0x2783c8…27855c Dummy {f00=0x00c3, f01=0x0190, f02=» 2 P IDENT DVDY00 REL 11.0 83-05-05 870105041100 P : * P* DEVICE WORK TABLE FOR VIDEO DISPLAY B P* p P ENTRY DVDY00 TABLE ENTRY z P* P* ( P EXTRN DYAD POINTER TO ADDRESS BLOCK PMMUPAG EQU 1 P* PDVDY00 EQU * T
0x27855c…2786f0 Dummy {f00=0x00c3, f01=0x0190, f02=» DATA DWTEND-DVDY00 ORDER ( P DATA DYAD POINTER TO ADDRESS-BLOCK " P DATA /C459 TTAB-ADDRESS N $ P DATA 0 WAIT/ACTIVATE INDICATOR n P DATA 0 TERMINAL QUEUE P IFT MMUPAG=1 & P DATA 0 SAVE AREA USER ECB ADDRESS P DATA DEVECB MMU ECB
0x2786f0…278884 Dummy {f00=0x00c3, f01=0x0190, f02=»VE AREA FOR A5 P RES 4 DWT-STACK P DATA 0 SAVE AREA FOR A7 . P DATA 0 SAVE AREA FOR A8 N $ P DATA /0004 CHANNEL PARAMETER 2 n $ P DATA 0 LINE DRIVER DEPENDENT 1 $ P DATA 0 LINE DRIVER DEPENDENT 2 P DATA /0000 DEVICE STATUS P
0x278884…278a18 Dummy {f00=0x00c3, f01=0x40a4, f02=» IN BLOCK ~ P DATA 0,0,0,0,0,0 REL 11+ P IFT MMUPAG=1 4 PDEVECB DATA 0,0,0,0,0,0 J P XIF j PDWTEND EQU * v P* P END @ RIVER DEPENDENT 1 $ P DATA 0 LINE DRIVER DEPENDENT 2 P DATA /0000 DEVICE STATUS P
0x278a18…278bac Dummy {f00=0x00c3, 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
0x278bac…278d40 Dummy {f00=0x00c3, f01=0x0190, f02=» l , ( ! R X ! T " ! T DWTST < , ( ! ! T 4 X ? 9 L DWTOR | , ( 9 X ' P P +P 9 R 9 9 V DWTSB2 , ( 9 P C " , ( F
0x278d40…278ed4 (1, 484) Opaque[0x194]
0x278ed4…279068 # DirEnt {nam=»DVG100«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1880, f03=0x0000}
0x278ed4…279068 IdxSect {
0x278ed4…279068 f00 = 0x00c4 // 0x278ed4 @0x0
0x278ed4…279068 f01 = 0x0004 // 0x278ed6 @0x2
0x278ed4…279068 gno = [ // 0x278ed8 @0x4
0x278ed4…279068 [0x00]: C0x00c4.0x0.0
0x278ed4…279068 [0x01]: C0x00c4.0x1.0
0x278ed4…279068 ]
0x278ed4…279068 }
0x279068…2791fc Dummy {f00=0x00c4, f01=0x0190, f02=» 2 P IDENT DVG100 REL 11.0 81-01-26 870105041100 P : , P* DEVICE WORK TABLE FOR GENERAL PRINTER B P* r P ENTRY DVG100 TABLE ENTRY | P* P* * P EXTRN GPAD8 POINTER TO ADDRESS-BLOCK $ PMMUPAG EQU 1 MEM. MAN.UNIT COND. P
0x2791fc…279390 Dummy {f00=0x00c4, f01=0x0190, f02=»A 0 ECB ADDRESS P DATA DWTEND-DVG100 ORDER ( P DATA GPAD8 POINTER TO ADDRESS BLOCK : P DATA 'GP' TTAB-ADDRESS f $ P DATA 0 WAIT/ACTIVATE INDICATOR P DATA 0 TERMINAL QUEUE P IFT MMUPAG=1 & P DATA 0 SAVE AREA USER ECB ADDRESS
0x279390…279524 Dummy {f00=0x00c4, f01=0x0190, f02=»ATA 0,0,0,0 STACK P DATA 0 SAVE AREA A7 P DATA 0 SAVE AREA A8 6 $ P DATA /0003 CHANNEL PARAMETER 2 R $ P DATA 0 LINE DRIVER DEPENDENT 1 z $ P DATA 0 LINE DRIVER DEPENDENT 2 P DATA /0000 DEVICE STATUS P DATA 0 TIMER POINTER "
0x279524…2796b8 Dummy {f00=0x00c4, f01=0x018e, f02=» LENGTH z P DATA 0 ACTUAL LINE DOCUMENT $ P DATA 0 REQUESTED LINE DOCUMENT 4 P DATA 0 RETURN CODE $ P DATA 0 CONTROL SEQUENCE ADRESS x 6 P DATA 0 DWT-DISPLACEMENT TO LINE NO,CHAR.SET,ETC. 0 P DATA 0,0,0 ACTUAL COLUMN DOCUMENT AND PAPER
0x2796b8…27984c Dummy {f00=0x00c4, f01=0x4076, f02=» PDEVECB EQU * P DATA 0,0,0,0,0,0 P XIF 2 PDWTEND EQU * > P* R P* P END f@ r P DATA 0 CONTROL SEQUENCE ADRESS x 6 P DATA 0 DWT-DISPLACEMENT TO LINE NO,CHAR.SET,ETC. 0 P DATA 0,0,0 ACTUAL COLUMN DOCUMENT AND PAPER
0x27984c…2799e0 Dummy {f00=0x00c4, 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
0x2799e0…279b74 (1, 485) Dummy {f00=0x00c4, f01=0x018e, f02=» PCIOPA2 EQU * P DATA /4000+128 PCIOAD2 EQU * 0 P DATA 0 ADDRESS 2 D PCIOPA3 EQU * ^ P DATA 128 r PCIOAD3 EQU * P DATA 0 ADDRESS 3 P XIF P IFT CDDI16=1 =9 P EJECT ( P**********************************
0x279b74…279d08 Dummy {f00=0x00c4, f01=0x0190, f02=» j ( P* * ( P* REFERENCED IN: SYSLOD,GETFIL * 4 ( P* * ` ( P* ENTRY: A1 - DEVICE ADDRESS * ( P* * ( P* EXIT: *
0x279d08…279e9c Dummy {f00=0x00c4, f01=0x0190, f02=» ( P* SUBROUTINES: * ( P* * 0 ( P*********************************** P PCDINIT EQU * P* ( P* INIT 16M OR 80M CDC DISC COMMANDS P* P LDR A2,A1 =9 & P ANK A1,/3F MA
0x279e9c…27a030 Dummy {f00=0x00c4, f01=0x0190, f02=»ARTRIDGE INDICATOR =9 n , P ORKL A1,CIO CONFIG CIO A1,1,XX INSTR. P ST A1,READC1 N ( P ORKL A1,/800 FORM SST A1,XX INSTR. d P ST A1,READC2 * P XRKL A1,/B00 FORM CIO A2,1,XX INSTR. P ST A1,SEEKC1 ( P ORKL A1,/800 FORM SST A2,XX
0x27a030…27a1c4 Dummy {f00=0x00c4, f01=0x0190, f02=»DC DISC v P ST A2,SAVCON SAVE LENGTH 4 P LDKL A2,CRDSEC GET READ SECTOR SUBROUTINE ADDR. 2 P ST A2,READ j P ST A2,READS ~ & P CF A14,GETVLB GET VOLUME LABEL =9 $ P LC A2,FORDEV+1,A9 GET FORMAT =9 P ANK A2,1 FORMAT 4 OR 5 =9 ( P L
0x27a1c4…27a358 Dummy {f00=0x00c4, f01=0x0190, f02=» ( P ST A2,DIVCON SET DIVIDE CONSTANT =9 P RTN A14 4 P EJECT D 4 P*********************************************** R 4 P* * 4 P* CRDSEC- READ ONE SECTOR FROM DISC * 4 P* ===========
0x27a358…27a4ec Dummy {f00=0x00c4, f01=0x0190, f02=» * j 4 P* * 4 P* ENTRY: A9 = BUFFER ADDRESS * J 4 P* * 4 P* A11 - SECTOR NBR LEAST SIGNIFICANT * 4 P* A12 - SECTOR
0x27a4ec…27a680 Dummy {f00=0x00c4, f01=0x0190, f02=»* b 4 P* * 4 P* WORK REGISTERS: A1,A2,A3,A6 * B 4 P* * z 4 P* SUBROUTINES: ERROR * 4 P*
0x27a680…27a814 (1, 486) Opaque[0x194]
0x27a814…27a9a8 # DirEnt {nam=»DVKB01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1890, f03=0x0000}
0x27a814…27a9a8 IdxSect {
0x27a814…27a9a8 f00 = 0x00c4 // 0x27a814 @0x0
0x27a814…27a9a8 f01 = 0x0002 // 0x27a816 @0x2
0x27a814…27a9a8 gno = [ // 0x27a818 @0x4
0x27a814…27a9a8 [0x00]: C0x00c4.0x2.0
0x27a814…27a9a8 ]
0x27a814…27a9a8 }
0x27a9a8…27ab3c Dummy {f00=0x00c4, f01=0x0190, f02=» 2 P IDENT DVKB01 REL 11.0 81-01-26 870105041100 P : P* B " P* KEYBOARD DEVICE WORK TABLE L P* r P ENTRY DVKB01 TABLE ENTRY | P EXTRN CTAB02 P EXTRN KBAD4 PMMUPAG EQU 1 P* P* P* PDVKB01 EQU *
0x27ab3c…27acd0 Dummy {f00=0x00c4, f01=0x0190, f02=»-DVKB01 ORDER ( P DATA KBAD4 POINTER TO ADDRESS BLOCK P DATA 'KB' TTAB ADDRESS B " P DATA 0 WAIT/ACTIVE INDICATOR b P DATA 0 TERMINAL QUEUE P IFT MMUPAG=1 & P DATA 0 SAVE AREA USER ECB ADDRESS P DATA DEVECB MMU ECB ADDRESS
0x27acd0…27ae64 Dummy {f00=0x00c4, f01=0x0190, f02=» x P RES 4 DWT STACK P DATA 0 SAVE AREA FOR A7 P DATA 0 SAVE AREA FOR A8 @ $ P DATA /0005 CHANNEL PARAMETER-2 ` " P DATA 0 LINE DRIVER DEPENDENT " P DATA 0 LINE DRIVER DEPENDENT P DATA /3000 DEVICE STATUS P DATA
0x27ae64…27aff8 Dummy {f00=0x00c4, f01=0x4164, f02=»ATA 0 TIMER . P DATA DWTSQ+DVKB01 POINTER TO FIRST PLACE , P DATA DWTSQ+DVKB01 POINTER TO LAST PLACE F PDWTSQ EQU *-DVKB01 v P DATA 0,0,0,0,0,0,0,0 P DATA 0,0 P IFT MMUPAG=1 PDEVECB EQU * P DATA 0,0,0,0,0,0 P DAT
0x27aff8…27b18c Dummy {f00=0x00c4, f01=0x2008, f02=» TRIPLE ZERO " DATA 0 POINTER TO FIRST PLACE " DATA 0 POINTER TO LAST PLACE B DWTSQ/EQU/*-DVTKB h RES 0 IFT MMUPAG=1 DATA 0 DATA 0 XIF DWTEND EQU * END @ PRESENT CONVERSI
0x27b18c…27b320 Dummy {f00=0x00c4, f01=0x414a, f02=» L H D ! P W VP Rt P P W Rh R )W~ /P 3P 9P =P H D ! @ GW WP _P iP wV { W" P R Wv T V W W R T H D !' R Q W8 T 5P ; ATt IRr [ aP D @ !@ iWL sP w P< T W
0x27b320…27b4b4 (1, 487) Opaque[0x194]
0x27b4b4…27b648 # DirEnt {nam=»DVDI01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1898, f03=0x0000}
0x27b4b4…27b648 IdxSect {
0x27b4b4…27b648 f00 = 0x00c4 // 0x27b4b4 @0x0
0x27b4b4…27b648 f01 = 0x0002 // 0x27b4b6 @0x2
0x27b4b4…27b648 gno = [ // 0x27b4b8 @0x4
0x27b4b4…27b648 [0x00]: C0x00c4.0x3.0
0x27b4b4…27b648 ]
0x27b4b4…27b648 }
0x27b648…27b7dc Dummy {f00=0x00c4, f01=0x0190, f02=» 2 P IDENT DVDI01 REL 11.0 81-01-26 870105041100 P : P* B . P* DEVICE WORK TABLE FOR DISPLAY INDICATOR L P* ~ P* & P ENTRY DVDI01 DISPLAY INDICATOR 03 P* P* ( P EXTRN DIAD POINTER TO ADDRESS-BLOCK PMMUPAG EQU 1
0x27b7dc…27b970 Dummy {f00=0x00c4, f01=0x0190, f02=» P DATA 0 ECB ADDRESS P DATA DWTEND-DVDI01 ORDER ( P DATA DIAD POINTER TO ADDRESS-BLOCK B P DATA 'DI' TTAB ADDRESS n P DATA 0 WAIT ACTIVATE P DATA 0 TERMINAL QUEUE P IFT MMUPAG=1 & P DATA 0 SAVE AREA USER ECB ADDRESS
0x27b970…27bb04 Dummy {f00=0x00c4, f01=0x018e, f02=» P DATA 0 SAVE AREA A5 =1 P RES 4 DWT STACK $ P DATA 0 SAVE AREA A7 =1 < P DATA 0 SAVE AREA A8 $ P DATA /0005 CHANNEL PARAMETER -2 x " P DATA 0 LINE DRIVER DEPENDENT " P DATA 0 LINE DRIVER DEPENDENT P DATA /8000 DEVICE STATUS
0x27bb04…27bc98 Dummy {f00=0x00c4, f01=0x4082, f02=» x P IFT MMUPAG=1 PDEVECB DATA 0,0,0,0,0,0 P XIF > PDWTEND EQU * J P* ^ P* h P END r@ ~5 CHANNEL PARAMETER -2 x " P DATA 0 LINE DRIVER DEPENDENT " P DATA 0 LINE DRIVER DEPENDENT P DATA /8000 DEVICE STATUS
0x27bc98…27be2c Dummy {f00=0x00c4, 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
0x27be2c…27bfc0 Dummy {f00=0x00c4, f01=0x0190, f02=» ( P* ENTRY: A1 - DEVICE ADDRESS * ( P* * 0 ( P* EXIT: * ( P* * ( P* WORK REGISTERS: A1,A2 * ( P* *
0x27bfc0…27c154 (1, 488) Opaque[0x194]
0x27c154…27c2e8 # DirEnt {nam=»SYSPRO«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x18a0, f03=0x0000}
0x27c154…27c2e8 IdxSect {
0x27c154…27c2e8 f00 = 0x00c5 // 0x27c154 @0x0
0x27c154…27c2e8 f01 = 0x0006 // 0x27c156 @0x2
0x27c154…27c2e8 gno = [ // 0x27c158 @0x4
0x27c154…27c2e8 [0x00]: C0x00c5.0x0.0
0x27c154…27c2e8 [0x01]: C0x00c5.0x1.0
0x27c154…27c2e8 [0x02]: C0x00c5.0x2.0
0x27c154…27c2e8 ]
0x27c154…27c2e8 }
0x27c2e8…27c47c Dummy {f00=0x00c5, f01=0x018e, f02=» 4 P IDENT SYSPRO REL 11.0 DK 83-09-08 870105041100 " P** SYSTEM WITH TWO MAIN-FRAMES < " P DK1, =SYSTEM STACK EXTENDED b P P* P* 8 P*************************************************** P* $ P* PHILIPS TERMINAL SYSTEM PT
0x27c47c…27c610 Dummy {f00=0x00c5, f01=0x0190, f02=» P* P* P* P* " 8 P*************************************************** , P* h P* r P EJECT SYSTAB | P* P* P*********** P* ENTRIES * P*********** P* P* & P ENTRY SCTMSZ,SC
0x27c610…27c7a4 Dummy {f00=0x00c5, f01=0x0190, f02=»I,SCTFWT v & P ENTRY SCTNOF,SCTNFT,SCTFWL,SCTBLK & P ENTRY SCTDCT,SCTNOS,SCTMXS,SCTMOX : P ENTRY SEG:FC,SEG:NS d & P ENTRY SEG:ST,SEG:DS,SEG:EL,SEG:PB & P ENTRY PAG:QF,PAG:QB,PAG:PA,PAG:SB & P ENTRY SWB:NC,SWB:DS,SWB:EL,SWB:NS P ENTRY STK
0x27c7a4…27c938 Dummy {f00=0x00c5, f01=0x0190, f02=»A v P EJECT SYSTAB P* " P* , P************* 6 P* EXTERNALS * L P************* b P* x P* P EXTRN TDISP , P EXTRN IHPFAR POWER FAIL / AUTO RESTART P EXTRN IHLKM LKM INTERRUPT P EXTRN IHRTC REAL TIME
0x27c938…27cacc Dummy {f00=0x00c5, f01=0x0190, f02=»EMOTE CHANNEL UNIT NO. 1 P EXTRN IH1501 P EXTRN IH1502 @ P EXTRN IH2501 ` P EXTRN IH2502 v * P EXTRN CHRT2 REMOTE CHANNEL UNIT NO. 2 P EXTRN CHRT3 P EXTRN CHRT4 ( P EXTRN IHCC1 CASSETTE CHANGER NO. 1
0x27cacc…27cc60 Dummy {f00=0x00c5, f01=0x0190, f02=»HSVU5 LOCAL CHANNEL UNIT NO. 1 f > P EXTRN CHLT2,IHSVU6,IHSVU7,IHSVU8 LOCAL CHANNEL UNIT NO. 2 & 4 P EXTRN IHPL01,IHPVU1,IHPVU2,IHPVU3,IHPVU4,IHPVU5 h & P EXTRN IHPL02,IHPVU6,IHPVU7,IHPVU8 0 P EXTRN IHFD,IHCD FLOPPY DISC,CDC (80 M) DISC * P EXTRN IHL
0x27cc60…27cdf4 (1, 489) Dummy {f00=0x00c5, f01=0x0190, f02=»IASCUZ,ISLCI,ISLCO MINI FIX DISC P EXTRN IHMT MAG. TAPE ( $ P EXTRN ILLINT ILLEGAL INTERRUPT F P EXTRN HALT HALT ROUTINE n P EXTRN BUG DEBUGGER P EXTRN IHPR01 RWSI CARD P EJECT SYSTAB P* F P* DISPLACEMENTS IN SEGTAB, P
0x27cdf4…27cf88 Dummy {f00=0x00c5, f01=0x0190, f02=»QU 0 STATUS $ PSEG:DS EQU 2 DISC SECTOR ADDRESS " PSEG:EL EQU 4 EFFECTIVE LENGTH < $ PSEG:PB EQU 6 PAGE BLOCK ADDRESS b & PPAG:QF EQU 0 QUEUE POINTER FORWARD ( PPAG:QB EQU 2 QUEUE POINTER BACKWARD PPAG:PA EQU 4 PAGE ADDRESS & PPAG:SB
0x27cf88…27d11c Dummy {f00=0x00c5, f01=0x0190, f02=»FIRST COPY l $ PSWB:EL EQU 4 SWB LENGTH (BYTES) & PSWB:NS EQU 6 SWB LENGTH (SECTORS) : P* d , PACBIOE EQU 0 APPLICATION RESTART ADDRESS n PACBSWB EQU 2 SWBTAB ADDRESS $ PACBSEG EQU 4 SEGMENT TABLE POOL ( PACBNPE EQU 6 NUMBER OF PAGE EN
0x27d11c…27d2b0 Dummy {f00=0x00c5, f01=0x018e, f02=»TO PAGE r 0 PACBLAC EQU 14 LOGICAL ADDRESS TO COMMON PART 4 PACBSTA EQU 16 APPLICATION PROGRAM START ADDRESS D . PACBREL EQU 18 APPLICATION RELOCATION BASE | 0 PACBADA EQU 20 APPLICATION DISC FILE ADDRESS P P P PSTART EQU *
0x27d2b0…27d444 Dummy {f00=0x00c5, f01=0x0190, f02=» P DATA ILLINT P DATA ILLINT P DATA ILLINT , P DATA ILLINT @ P DATA ILLINT T P DATA ILLINT h P DATA ILLINT | P DATA ILLINT P DATA ILLINT P DATA IH1501 P DATA IH1502 P DATA IH2501 P DATA IH2502 P
0x27d444…27d5d8 Dummy {f00=0x00c5, f01=0x018e, f02=» P DATA ILLINT P DATA ILLINT P DATA ILLINT , P DATA IHPL01 @ P DATA IHPL02 T P DATA ILLINT h P DATA ILLINT | P DATA ILLINT P DATA ILLINT P DATA ILLINT P DATA ILLINT P DATA IHLP P DATA ILLINT P D
0x27d5d8…27d76c Dummy {f00=0x00c5, f01=0x0190, f02=» P DATA ILLINT P DATA ILLINT P DATA ILLINT , P DATA ILLINT @ P DATA ILLINT T P DATA ILLINT h P DATA ILLINT | P DATA ILLINT P DATA ILLINT P DATA ILLINT P DATA ILLINT P DATA ILLINT P DATA ILLINT P
0x27d76c…27d900 Dummy {f00=0x00c5, f01=0x0190, f02=» P DATA TRAP TRAP ROUTINE P EJECT SYSTAB $ P < P* D " P* SYSTEM CONTROL TABLE POINTER N P* t P DATA SCT ~ P P P* P* SYSTEM TRAP P* PTRAP LDK A1,/D P CF A15,HALT P RES 4 P HLT
0x27d900…27da94 (1, 490) Dummy {f00=0x00c5, f01=0x0190, f02=»1 P HLT P* P EJECT SYSTAB P* 8 P* B PX:A EQU 0 MONITOR OPTION L ( PX:B EQU 0 DATA MAN .TASKS IN SYSTEM l * PX:C EQU 0 DM INDEX RECORD BUFFER SIZE $ PX:D EQU 0 DM/FM NUMBER OF FILES ( PX:E EQU 0 DM/FM NUMBER OF
0x27da94…27dc28 Dummy {f00=0x00c5, f01=0x0190, f02=» ONLY) f P* P EJECT SYSTAB P* 0 P* SYSTEM CONTROL TABLE : P* X PSCT EQU * b P t * PSCTMSZ DATA 0 MEMORY SIZE MOD K BYTES | & PSCTSFA DATA 0,0 START OF FREE AREA $ PSCTEFA DATA 0,0 END OF FREE AREA ( PSCTIPL DATA
0x27dc28…27ddbc Dummy {f00=0x00c5, f01=0x0190, f02=»B ADDRESS ~ PSCTCDT DATA 0 CDTAB ADDRESS PSCTPAG DATA 0 PAGTAB ADDRESS 6 " PSCTNOP DATA 0 NUMBER OF PAGES Z PSCTPSZ DATA 0 PAGE SIZE & PSCTSTB DATA STB SYSTEM STACK BASE & PSCTOPT DATA 04097 MONITOR OPTION: " P BIT 10:MPO,11:EMM
0x27ddbc…27df50 Dummy {f00=0x00c5, f01=0x0190, f02=» 12:#G, 13:#F, 14:#E, 15:#D 2 PSCTDMI DATA 00000 DM INDEX RECORD BUFFER SIZE $ * PSCTFWT DATA 0 FWT CHAIN START ADDRESS Z & PSCTNOF DATA 00000 NUMBER OF FILES * PSCTNFT DATA 00000 NUMBER OF FILES/TASK , PSCTFWL DATA 00000 FILE WORK TABLE LENGTH
0x27df50…27e0e4 Dummy {f00=0x00c5, f01=0x018e, f02=»TABLES n $ PSCTMXS DATA 0 ADDRESS TO MXSTAB 0 PSCTMOX DATA 0 ADDRESS TO START-ADDRESS TABLE 6 P EJECT SYSTAB j P P* P* SYSTEM STACK P* $ PSTKEND EQU * END OF SYSTEM STACK P RES 68 PSTKMOV LDR* A4,A1 P S
0x27e0e4…27e278 Dummy {f00=0x00c5, f01=0x40e0, f02=» P RORG START+/2FC P DATA /FCC0 AND PSW & PSTB DATA LOOP AND PC FOR IDLE LOOP < P f P n P* v P* IDLE LOOP P* P PLOOP RB * P P P P END @ 68 PSTKMOV LDR* A4,A1 P S
0x27e278…27e40c Dummy {f00=0x00c5, 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
0x27e40c…27e5a0 Dummy {f00=0x00c5, f01=0x0190, f02=» z^L~no| { [_my O ZJ 7- <=2&p ?' @O JZlP}M] Nk`Ka z^L~noj {|[_m ABCDEFGHI#.<(+!&JKLMNOPQR$]*);^-/STUVWXYZ@,%_>?0123456789
0x27e5a0…27e734 (1, 491) Opaque[0x194]
0x27e734…27e8c8 # DirEnt {nam=»PROGEN«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x18b8, f03=0x0000}
0x27e734…27e8c8 IdxSect {
0x27e734…27e8c8 f00 = 0x00c5 // 0x27e734 @0x0
0x27e734…27e8c8 f01 = 0x0002 // 0x27e736 @0x2
0x27e734…27e8c8 gno = [ // 0x27e738 @0x4
0x27e734…27e8c8 [0x00]: C0x00c5.0x3.0
0x27e734…27e8c8 ]
0x27e734…27e8c8 }
0x27e8c8…27ea5c Dummy {f00=0x00c5, f01=0x00d2, f02=» PASG 2,LP0F PSCR PINC SYSPRO " PNOD AM 4 PINC SYSLOD B PINC SYSLDM T PINC SYSLCR f PINC SYSINI x PLKE M PKPF /L,PTMON P$PDISC M=PTMON PASG /E0,TY10
0x27ea5c…27ebf0 Dummy {f00=0x00c5, f01=0x2008, f02=» 2,LP0F PSCR PINC SYSPRO " PNOD AM 4 PINC SYSLOD B PINC SYSLDM T PINC SYSLCR f PINC SYSINI x PLKE M PKPF /L,PTMON P$PDISC M=PTMON PASG /E0,TY10
0x27ebf0…27ed84 Dummy {f00=0x00c5, f01=0x0190, f02=» APLSEG APLNPE APLSWB 0 APLSTA D APLTYPL X NUMSEG l PRGLG1 SYSLODK STKEND SCTIPL SCTANOB , ( I$ A 0 A A " A A
0x27ed84…27ef18 Dummy {f00=0x00c5, f01=0x0190, f02=» @ " A. bREL & TABBE 4 , ( O UU @>B @ A D , ( k @ D E D E P t MMDDIV , ( $_( W V W V P ERROR SCTMSZW
0x27ef18…27f0ac Dummy {f00=0x00c5, f01=0x0190, f02=» @ @ A , ( ! P A @ , , ( ! @ $ A A @ , ( H @ @ E E E E E , ( 9A A & E @ F CRP , ( U <A COP <A BAP AS
0x27f0ac…27f240 Dummy {f00=0x00c5, f01=0x0190, f02=» MMEND , ( F ;j , ( Y P F P > , ( @ P - P _ n , ( :L E A W , ( F D AST =l R , ( ?
0x27f240…27f3d4 (1, 492) Opaque[0x194]
0x27f3d4…27f568 # DirEnt {nam=»SYS2DC«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2420, f03=0x0000}
0x27f3d4…27f568 IdxSect {
0x27f3d4…27f568 f00 = 0x0121 // 0x27f3d4 @0x0
0x27f3d4…27f568 f01 = 0x0006 // 0x27f3d6 @0x2
0x27f3d4…27f568 gno = [ // 0x27f3d8 @0x4
0x27f3d4…27f568 [0x00]: C0x0121.0x0.0
0x27f3d4…27f568 [0x01]: C0x0121.0x1.0
0x27f3d4…27f568 [0x02]: C0x0121.0x2.0
0x27f3d4…27f568 ]
0x27f3d4…27f568 }
0x27f568…27f6fc Dummy {f00=0x0121, f01=0x018e, f02=» 4 P IDENT SYS2DC REL 11.0 DK 83-09-08 870105041100 " P** SYSTEM WITH TWO MAIN-FRAMES < " P DK1,= SYSTEM STACK EXTENDED b P P* P* 8 P*************************************************** P* $ P* PHILIPS TERMINAL SYSTEM PT
0x27f6fc…27f890 Dummy {f00=0x0121, f01=0x0190, f02=» P* P* P* P* " 8 P*************************************************** , P* h P* r P EJECT SYSTAB | P* P* P*********** P* ENTRIES * P*********** P* P* & P ENTRY SCTMSZ,SC
0x27f890…27fa24 Dummy {f00=0x0121, f01=0x0190, f02=»I,SCTFWT v & P ENTRY SCTNOF,SCTNFT,SCTFWL,SCTBLK & P ENTRY SCTDCT,SCTNOS,SCTMXS,SCTMOX : P ENTRY SEG:FC,SEG:NS d & P ENTRY SEG:ST,SEG:DS,SEG:EL,SEG:PB & P ENTRY PAG:QF,PAG:QB,PAG:PA,PAG:SB & P ENTRY SWB:NC,SWB:DS,SWB:EL,SWB:NS P ENTRY STK
0x27fa24…27fbb8 Dummy {f00=0x0121, f01=0x0190, f02=»A v P EJECT SYSTAB P* " P* , P************* 6 P* EXTERNALS * L P************* b P* x P* P EXTRN TDISP , P EXTRN IHPFAR POWER FAIL / AUTO RESTART P EXTRN IHLKM LKM INTERRUPT P EXTRN IHRTC REAL TIME
0x27fbb8…27fd4c Dummy {f00=0x0121, f01=0x0190, f02=»EMOTE CHANNEL UNIT NO. 1 P EXTRN IH1501 P EXTRN IH1502 @ P EXTRN IH2501 ` P EXTRN IH2502 v * P EXTRN CHRT2 REMOTE CHANNEL UNIT NO. 2 P EXTRN CHRT3 P EXTRN CHRT4 ( P EXTRN IHCC1 CASSETTE CHANGER NO. 1
0x27fd4c…27fee0 Dummy {f00=0x0121, f01=0x0190, f02=»HSVU5 LOCAL CHANNEL UNIT NO. 1 f > P EXTRN CHLT2,IHSVU6,IHSVU7,IHSVU8 LOCAL CHANNEL UNIT NO. 2 & 4 P EXTRN IHPL01,IHPVU1,IHPVU2,IHPVU3,IHPVU4,IHPVU5 h & P EXTRN IHPL02,IHPVU6,IHPVU7,IHPVU8 0 P EXTRN IHFD,IHCD FLOPPY DISC,CDC (80 M) DISC * P EXTRN IHL
0x27fee0…280074 (1, 493) Dummy {f00=0x0121, f01=0x0190, f02=»IASCUZ,ISLCI,ISLCO MINI FIX DISC P EXTRN IHMT MAG. TAPE ( $ P EXTRN ILLINT ILLEGAL INTERRUPT F P EXTRN HALT HALT ROUTINE n P EXTRN BUG DEBUGGER P EXTRN IHPR01 RWSI CARD P EJECT SYSTAB P* F P* DISPLACEMENTS IN SEGTAB, P
0x280074…280208 Dummy {f00=0x0121, f01=0x0190, f02=»QU 0 STATUS $ PSEG:DS EQU 2 DISC SECTOR ADDRESS " PSEG:EL EQU 4 EFFECTIVE LENGTH < $ PSEG:PB EQU 6 PAGE BLOCK ADDRESS b & PPAG:QF EQU 0 QUEUE POINTER FORWARD ( PPAG:QB EQU 2 QUEUE POINTER BACKWARD PPAG:PA EQU 4 PAGE ADDRESS & PPAG:SB
0x280208…28039c Dummy {f00=0x0121, f01=0x0190, f02=»FIRST COPY l $ PSWB:EL EQU 4 SWB LENGTH (BYTES) & PSWB:NS EQU 6 SWB LENGTH (SECTORS) : P* d , PACBIOE EQU 0 APPLICATION RESTART ADDRESS n PACBSWB EQU 2 SWBTAB ADDRESS $ PACBSEG EQU 4 SEGMENT TABLE POOL ( PACBNPE EQU 6 NUMBER OF PAGE EN
0x28039c…280530 Dummy {f00=0x0121, f01=0x018e, f02=»TO PAGE r 0 PACBLAC EQU 14 LOGICAL ADDRESS TO COMMON PART 4 PACBSTA EQU 16 APPLICATION PROGRAM START ADDRESS D . PACBREL EQU 18 APPLICATION RELOCATION BASE | 0 PACBADA EQU 20 APPLICATION DISC FILE ADDRESS P P P PSTART EQU *
0x280530…2806c4 Dummy {f00=0x0121, f01=0x0190, f02=» P DATA ILLINT P DATA ILLINT P DATA ILLINT , P DATA ILLINT @ P DATA ILLINT T P DATA ILLINT h P DATA ILLINT | P DATA ILLINT P DATA ILLINT P DATA IH1501 P DATA IH1502 P DATA IH2501 P DATA IH2502 P
0x2806c4…280858 Dummy {f00=0x0121, f01=0x018e, f02=» P DATA ILLINT P DATA ILLINT P DATA ILLINT , P DATA IHPL01 @ P DATA IHPL02 T P DATA ILLINT h P DATA ILLINT | P DATA ILLINT P DATA ILLINT P DATA ILLINT P DATA ILLINT P DATA IHLP P DATA ILLINT P D
0x280858…2809ec Dummy {f00=0x0121, f01=0x0190, f02=» P DATA ILLINT P DATA ILLINT P DATA ILLINT , P DATA ILLINT @ P DATA ILLINT T P DATA ILLINT h P DATA ILLINT | P DATA ILLINT P DATA ILLINT P DATA ILLINT P DATA ILLINT P DATA ILLINT P DATA ILLINT P
0x2809ec…280b80 Dummy {f00=0x0121, f01=0x0190, f02=» P DATA TRAP TRAP ROUTINE P EJECT SYSTAB $ P < P* D " P* SYSTEM CONTROL TABLE POINTER N P* t P DATA SCT ~ P P P* P* SYSTEM TRAP P* PTRAP LDK A1,/D P CF A15,HALT P RES 4 P HLT
0x280b80…280d14 (1, 494) Dummy {f00=0x0121, f01=0x0190, f02=»1 P HLT P* P EJECT SYSTAB P* 8 P* B PX:A EQU 0 MONITOR OPTION L ( PX:B EQU 0 DATA MAN .TASKS IN SYSTEM l * PX:C EQU 0 DM INDEX RECORD BUFFER SIZE $ PX:D EQU 0 DM/FM NUMBER OF FILES ( PX:E EQU 0 DM/FM NUMBER OF
0x280d14…280ea8 Dummy {f00=0x0121, f01=0x0190, f02=» ONLY) f P* P EJECT SYSTAB P* 0 P* SYSTEM CONTROL TABLE : P* X PSCT EQU * b P t * PSCTMSZ DATA 0 MEMORY SIZE MOD K BYTES | & PSCTSFA DATA 0,0 START OF FREE AREA $ PSCTEFA DATA 0,0 END OF FREE AREA ( PSCTIPL DATA
0x280ea8…28103c Dummy {f00=0x0121, f01=0x0190, f02=»B ADDRESS ~ PSCTCDT DATA 0 CDTAB ADDRESS PSCTPAG DATA 0 PAGTAB ADDRESS 6 " PSCTNOP DATA 0 NUMBER OF PAGES Z PSCTPSZ DATA 0 PAGE SIZE & PSCTSTB DATA STB SYSTEM STACK BASE & PSCTOPT DATA 04097 MONITOR OPTION: " P BIT 10:MPO,11:EMM
0x28103c…2811d0 Dummy {f00=0x0121, f01=0x0190, f02=» BIT 12:#G, 13:#F, 14:#E, 15:#D 2 PSCTDMI DATA 00000 DM INDEX RECORD BUFFER SIZE ( * PSCTFWT DATA 0 FWT CHAIN START ADDRESS ^ & PSCTNOF DATA 00000 NUMBER OF FILES * PSCTNFT DATA 00000 NUMBER OF FILES/TASK , PSCTFWL DATA 00000 FILE WORK TABLE LE
0x2811d0…281364 Dummy {f00=0x0121, f01=0x0190, f02=»ENT TABLES r $ PSCTMXS DATA 0 ADDRESS TO MXSTAB 0 PSCTMOX DATA 0 ADDRESS TO START-ADDRESS TABLE : P EJECT SYSTAB n P P* P* SYSTEM STACK P* $ PSTKEND EQU * END OF SYSTEM STACK P RES 68 PSTKMOV LDR* A4,A1
0x281364…2814f8 Dummy {f00=0x0121, f01=0x40e2, f02=»1 P RORG START+/2FC P DATA /FCC0 AND PSW " & PSTB DATA LOOP AND PC FOR IDLE LOOP > P h P p P* x P* IDLE LOOP P* P PLOOP RB * P P P P END @ ES 68 PSTKMOV LDR* A4,A1
0x2814f8…28168c Dummy {f00=0x0121, 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
0x28168c…281820 Dummy {f00=0x0121, f01=0x0190, f02=» Y*j ]*l a*Z X H D ! g iT8 oP: uPN {PP P P4 *j *j P r *j J P J H D ! *^ T W W *t *u W W W *t *u *t *u ` H D ! ! ' + 1 7 =*f A*j E*l K*j MT* S W*R ] a* cP i H D ! S q) uW *
0x281820…2819b4 (1, 495) Opaque[0x194]
0x2819b4…281b48 # DirEnt {nam=»S2CLAS«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x19d0, f03=0x0000}
0x2819b4…281b48 IdxSect {
0x2819b4…281b48 f00 = 0x00ce // 0x2819b4 @0x0
0x2819b4…281b48 f01 = 0x0002 // 0x2819b6 @0x2
0x2819b4…281b48 gno = [ // 0x2819b8 @0x4
0x2819b4…281b48 [0x00]: C0x00ce.0x2.0
0x2819b4…281b48 ]
0x2819b4…281b48 }
0x281b48…281cdc Dummy {f00=0x00ce, f01=0x0190, f02=» 4 P IDENT S2CLAS REL 11.0 DK 82-04-14 870105041100 P < P* D P* N P ENTRY SCLASS X P* n P* x P EXTRN DWII01 P EXTRN DWIO01 P EXTRN DW1501 P EXTRN DW2501 P* P*
0x281cdc…281e70 Dummy {f00=0x00ce, f01=0x4172, f02=» DATA TC00E-* P DATA /0050 P DATA DWII01 > P DATA /0051 ^ P DATA DWIO01 ~ P DATA /0061 P DATA DW1501 P DATA /0062 P DATA DW2501 P
0x281e70…282004 Dummy {f00=0x00ce, f01=0x2008, f02=» NT TCLASS * * $ * . ENTRY TCLASS 8 * N * X * b * l * v * * TCLASS DATALTCLASE-* TCLASE EQU * END @ 1 INTLT2 INTRT1
0x282004…282198 Dummy {f00=0x00ce, f01=0x0190, f02=» P DATA ILLINT P DATA IHPL01 P DATA IHPL02 , P DATA ILLINT @ P DATA ILLINT T P DATA ILLINT h P DATA ILLINT | P DATA ILLINT P DATA ILLINT P DATA ILLINT P DATA ILLINT P DATA ILLINT P DATA ILLINT P
0x282198…28232c Dummy {f00=0x00ce, f01=0x0190, f02=» P DATA ILLINT P DATA ILLINT P DATA ILLINT , P DATA ILLINT @ P DATA ILLINT T P DATA ILLINT h P DATA ILLINT | P DATA ILLINT P DATA ILLINT P DATA ILLINT P DATA ILLINT P DATA ILLINT P DATA ILLINT P
0x28232c…2824c0 Dummy {f00=0x00ce, f01=0x0190, f02=»CT SYSTAB P P* " P* SYSTEM CONTROL TABLE POINTER & P* L P DATA SCT V P h P p P* x P* SYSTEM TRAP P* PTRAP LDK A1,/D P CF A15,HALT P RES 4 P HLT P P* P* DEBUG RESTART
0x2824c0…282654 (1, 496) Opaque[0x194]
0x282654…2827e8 # DirEnt {nam=»P2TAB «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x19d8, f03=0x0000}
0x282654…2827e8 IdxSect {
0x282654…2827e8 f00 = 0x00ce // 0x282654 @0x0
0x282654…2827e8 f01 = 0x0002 // 0x282656 @0x2
0x282654…2827e8 gno = [ // 0x282658 @0x4
0x282654…2827e8 [0x00]: C0x00ce.0x3.0
0x282654…2827e8 ]
0x282654…2827e8 }
0x2827e8…28297c Dummy {f00=0x00ce, f01=0x0190, f02=» 4 P IDENT P2TAB REL 11.0 DK 82-04-14 870105041100 P < P* D P* N P* POWER FAIL TABLE X P* r D P* THIS TABLE HOLDS ADDRESSES TO MODULES THAT SHOULD BE EXECUTED | P* AFTER MASTER CLEAR P* P* P ENTRY PFTAB TABLE E
0x28297c…282b10 Dummy {f00=0x00ce, f01=0x0190, f02=» TWON TYPEWRITER P EXTRN TCDRON TAPE CASSETTE P EXTRN SOPR SOP. PANEL < ( P EXTRN CHLTON LOCAL/REMOTE TERMINALS Z P EXTRN FDON FLEXIBLE DISC P EXTRN LPON LINE PRINTER P EXTRN CRON CARD READER P EXTRN DUON DISC UNIT P E
0x282b10…282ca4 Dummy {f00=0x00ce, f01=0x418e, f02=»UON SALCUZ P EXTRN ASCUON ASCU4Z P EXTRN CDON CDC DISC . P EXTRN PLON LINE CONTROLLER J P EXTRN VUON VIDEO n P EXTRN X25:ON X25 LEVEL 3 P P P P P $ PPFTAB DATA PFTABE-* TABLE LENGTH P DATA
0x282ca4…282e38 Dummy {f00=0x00ce, 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
0x282e38…282fcc Dummy {f00=0x00ce, f01=0x0190, f02=» HALT & 6 SCTMSZ N SCTSFA b SCTEFA v SCTIPL SCTANO SCTTCT SCTCDT , ( @
0x282fcc…283160 Dummy {f00=0x00ce, f01=0x0190, f02=» SCTDMT SCTDMI SCTFWT ( SCTNOF < SCTNFT P SCTFWL d SCTBLK x SCTDCT SCTNOS , ( SCTMXS SCTMOX
0x283160…2832f4 (1, 497) Opaque[0x194]
0x2832f4…283488 # DirEnt {nam=»DW2501«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x19e0, f03=0x0000}
0x2832f4…283488 IdxSect {
0x2832f4…283488 f00 = 0x00cf // 0x2832f4 @0x0
0x2832f4…283488 f01 = 0x0002 // 0x2832f6 @0x2
0x2832f4…283488 gno = [ // 0x2832f8 @0x4
0x2832f4…283488 [0x00]: C0x00cf.0x0.0
0x2832f4…283488 ]
0x2832f4…283488 }
0x283488…28361c Dummy {f00=0x00cf, f01=0x0190, f02=» 4 P IDENT DW2501 REL 11.0 DK 82-04-14 870105041100 P < P* D : P* DEVICE WORK TABLE FOR DATA-COMMUNICATION DEVICE 1 N P* P ENTRY DW2501 TABLE ENTRY * P EXTRN DC25AD POINTER TO ADDRESS-BLOCK P* PMMUPAG EQU 1 P*
0x28361c…2837b0 Dummy {f00=0x00cf, f01=0x0190, f02=»ADDRESS P DATA DWTEND-DW2501 P RIGHT BYTE=ORDER , * P DATA DC25AD POINTER TO ADDRESS-BLOCK H P DATA 'DC' TTAB-ADDRESS v $ P DATA 0 WAIT/ACTIVATE INDICATOR P DATA 0 TERMINAL QUEUE P* P IFT MMUPAG=1 P DATA 0 USER
0x2837b0…283944 Dummy {f00=0x00cf, f01=0x018e, f02=»HAIN LINK HEAD DWT & P DATA 0 CONFIG CHAIN LINK NEXT DWT & P DATA 0 LOCAL SYMBOLIC DTE ADDRESS D ( P DATA 0 REMOTE SYMBOLIC DTE ADDRESS n P DATA 0 SYMBOLIC SUBADDRESS P DATA 0 REQUEST CONTROL WORD P DATA 0 REQUEST TIMER VALUE " P D
0x283944…283ad8 Dummy {f00=0x00cf, f01=0x4144, f02=» & P DATA 0 I/P DATA Q LINK TO BUFFER " P DATA 0 I/P DATA TIMER POINTER . P DATA 0 CURSOR ADDRESS T " P DATA 0 DEVICE BUFFER ADDRESS r P DATA 0 DWT STATUS P* P IFT MMUPAG=1 PDC:ECB EQU * MMU ECB P DATA 0,0,0,0,0,0,0
0x283ad8…283c6c Dummy {f00=0x00cf, 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
0x283c6c…283e00 Dummy {f00=0x00cf, f01=0x0190, f02=»T Wj , ! V _ P W , ! Z P6 ! " - X ) Y , ! ^( - X ) Y _ G : P2 T PZ " P , PD ! Z P W P , ! ^* - _( : U O ! R*
0x283e00…283f94 (1, 498) Opaque[0x194]
0x283f94…284128 # DirEnt {nam=»FILLER«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x14f0, f03=0x0000}
0x283f94…284128 IdxSect {
0x283f94…284128 f00 = 0x00a7 // 0x283f94 @0x0
0x283f94…284128 f01 = 0x0002 // 0x283f96 @0x2
0x283f94…284128 gno = [ // 0x283f98 @0x4
0x283f94…284128 [0x00]: C0x00a7.0x2.0
0x283f94…284128 ]
0x283f94…284128 }
0x284128…2842bc Dummy {f00=0x00a7, f01=0x4064, f02=» IDENT FILLER DUMMY 84-01-05 ENTRY FILLER ( FILLER EQU * > END R@ `
0x2842bc…284450 Dummy {f00=0x00a7, f01=0x2008, f02=» NT FILLER DUMMY 84-01-05 ENTRY FILLER ( FILLER EQU * > END R@ `
0x284450…2845e4 Dummy {f00=0x00a7, f01=0x40c6, f02=» J H D ! R T W( @ ) @ +W R W" W W W W W H D !P W PL T T P T$ 5 < oR> wP6 T. P W T P T V @ < R$ U R Q + < / 9 < E f I h H D ! M Q
0x2845e4…284778 Dummy {f00=0x00a7, f01=0x0190, f02=» > @ IDENT SYSLOD REL 11.0 83-08-24 870105041100 F B SYSLOD SYSBAS NUMSEG PRGLG1 APLADA APLLAC APLLAP APLLDA F F B APLMMC APLMMP APLNPE APLREL APLSTA APLTYP APLIOE APLSEG APLSWB APLADA APLRE
0x284778…28490c Dummy {f00=0x00a7, f01=0x0190, f02=»PLSEG APLNPE APLSWB $ APLSTA 8 APLTYP L NUMSEG ` PRGLG1 t SYSLOD STKEND SCTIPL SCTANO , ( I$ A 0 A A " A A STK
0x28490c…284aa0 Dummy {f00=0x00a7, f01=0x0190, f02=» A. z bREL TABBE ( , ( O UU @>B @ A 8 , ( k @ D E D E P h MMDDIV , ( $_( W V W V P ERROR SCTMSZ SCTEFA
0x284aa0…284c34 (1, 499) Opaque[0x194]
0x284c34…284dc8 # DirEnt {nam=»PTMON «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x1910, f03=0x0000}
0x284c34…284dc8 IdxSect {
0x284c34…284dc8 f00 = 0x00c8 // 0x284c34 @0x0
0x284c34…284dc8 f01 = 0x0026 // 0x284c36 @0x2
0x284c34…284dc8 gno = [ // 0x284c38 @0x4
0x284c34…284dc8 [0x00]: C0x00c8.0x2.0
0x284c34…284dc8 [0x01]: C0x00c8.0x3.0
0x284c34…284dc8 [0x02]: C0x00c9.0x0.0
0x284c34…284dc8 [0x03]: C0x00c9.0x1.0
0x284c34…284dc8 [0x04]: C0x00c9.0x2.0
0x284c34…284dc8 [0x05]: C0x00c9.0x3.0
0x284c34…284dc8 [0x06]: C0x00ca.0x0.0
0x284c34…284dc8 [0x07]: C0x00ca.0x1.0
0x284c34…284dc8 [0x08]: C0x00ca.0x2.0
0x284c34…284dc8 [0x09]: C0x00ca.0x3.0
0x284c34…284dc8 [0x0a]: C0x00cb.0x0.0
0x284c34…284dc8 [0x0b]: C0x00cb.0x1.0
0x284c34…284dc8 [0x0c]: C0x00cb.0x2.0
0x284c34…284dc8 [0x0d]: C0x00cb.0x3.0
0x284c34…284dc8 [0x0e]: C0x00cc.0x0.0
0x284c34…284dc8 [0x0f]: C0x00cc.0x1.0
0x284c34…284dc8 [0x10]: C0x00cc.0x2.0
0x284c34…284dc8 [0x11]: C0x00cc.0x3.0
0x284c34…284dc8 [0x12]: C0x00cd.0x0.0
0x284c34…284dc8 ]
0x284c34…284dc8 }
0x284dc8…284f5c Dummy {f00=0x00c8, f01=0x0190, f02=» $ H H H H H H H H H0 0 ^ ^L H H H H H H H H H H H H H H HO H H H H H H H H H H H H H H H H H H H H H H H H H H H H N @
0x284f5c…2850f0 Dummy {f00=0x00c8, f01=0x0190, f02=»
0x2850f0…285284 Dummy {f00=0x00c8, f01=0x0190, f02=» _ A D " { _ @{ > > U # T @ H ( ( P c P W6 z A{ V ( U P @ V L N U { #P A D A Q ? > ? @{ XB ) A{ A _N A A A{ _` A D A
0x285284…285418 Dummy {f00=0x00c8, f01=0x0190, f02=» 9 _ _, ? _ P H H ? ? ? ? ? ^ A _ _ ^ { $P T I R $ 5 % > ? W ? W ? T T U T U U > > ` ` 4 T - 1_( U T P 0 U _h ? @{ T N
0x285418…2855ac Dummy {f00=0x00c8, f01=0x0190, f02=» @ @ P $ H W W > > > > > > @ V ? > _ > ? _ > > ? ^ ! Y ^ _ N ? FA. ~ $ ( , 0 4 8 < #M 1
0x2855ac…285740 Dummy {f00=0x00c8, f01=0x0190, f02=» R T X 0P Xh I Y T # C C W4 O " # X Y ) C C x # P Y '? Y Y T # P W ` Y P R R P T 6P (@ (@ " 2 @ _ > X $? P H$ > >
0x285740…2858d4 (1, 500) Dummy {f00=0x00c8, f01=0x0190, f02=»9D # C > B R Q~ P0 B P* 0$ T # R QL 4 > X B U( H Q2 X D B $ T C x > C $ ) _ X 9BV X 0 { X D C > X H UJ H B P PL $ # Q > P
0x2858d4…285a68 Dummy {f00=0x00c8, f01=0x0190, f02=» > > ? _ X T (@ X L U L Q4 M X L P ( L ) 1_f _& ?(@ X P 4 Y X 1 1 X P - M T $ PJ _ T " # p X L R P P 0P (@ ^ X P, P$ # P( T
0x285a68…285bfc Dummy {f00=0x00c8, f01=0x0190, f02=» - U _ 9B X T u X > & 0|R{ |f{ | z R 1 r @ L X d 4 4 4 4 , ` C K SO
0x285bfc…285d90 Dummy {f00=0x00c8, f01=0x0190, f02=»
[…0x2…]
0x2860b8…28624c Dummy {f00=0x00c8, f01=0x0190, f02=» $ h C K 4 > N SO LO $GR 0
0x28624c…2863e0 Dummy {f00=0x00c8, f01=0x0190, f02=»
0x2863e0…286574 (1, 501) Dummy {f00=0x00c9, f01=0x0190, f02=»
[…0x1…]
0x286708…28689c Dummy {f00=0x00c9, f01=0x0190, f02=» @ A N j j v j . ? X *P "< R >W > Y r Y Y * 0 P W Y *(@ 4(@ ! X ! P ! T X * ! T X # P X T. !. P& X ! Td R Y * Y | X *
0x28689c…286a30 Dummy {f00=0x00c9, f01=0x0190, f02=» T X " T2(@ 4 ", Y * > X P Y X " 2(@ ! X * ! T X Y T (@ X * U B U @ A X T @" P ! W ! !r Q U ; U 5 U < P U > ! T@ T> | T" X $ P W P # P Y | X " < U X * ",
0x286a30…286bc4 Dummy {f00=0x00c9, f01=0x0190, f02=» { " ! | T H U T L T E $ R M L P L U " | U " U " U " T ! Z T X ("? ! T K' T R U " U " | ", Y * " | " Y | T "z T R T D&? P '? L ", U " |
0x286bc4…286d58 Dummy {f00=0x00c9, f01=0x0190, f02=» " ", Y , X " | Y V(@ ` " U B U @ ! @ U 5 Q U ; U < U > X " P4 ! T. T, X " P Y # " | U " | @ pT A p > A p R D X _ { ?(@ U U U U <P " _ <P "
0x286d58…286eec Dummy {f00=0x00c9, f01=0x0190, f02=» T P 1W L d U { U U U U 6 U 4 U @ $ T U { T U V T U 6:A U T T ( U B U 4 U @ U > U Tz | Tr T U U T V U U ! RL t Z V ; M r U 4 U < U 5 U 6 U @ T | T t F
0x286eec…287080 Dummy {f00=0x00c9, f01=0x0190, f02=» P T T U T P T " P W T P" ^ " P " T T h " 2 { ; r t , RN X Y , X Y " P # X " " _R U | ; r - , - ! T t F | V `(@
0x287080…287214 (1, 502) Dummy {f00=0x00c9, f01=0x0190, f02=» | T T T T U > > > ` P - " | " > > @ @ p { T T U S U ? T T U > > ? t > > X % =A 8 P T > X , :i9eW X , :a9 " > ? P ! X ," >W P !
0x287214…2873a8 Dummy {f00=0x00c9, f01=0x0190, f02=» ,T - U > > > ? X # T W ? X (#?; L r > ! > > > # _ Q Q " Q > ? P #* > > P P R$ Q (" W P P V Q % W > T NQ< T R L $ T( L $ T " P W # T W $ P W P > ? ?
0x2873a8…28753c Dummy {f00=0x00c9, f01=0x0190, f02=» ? W ? ;a<a Q ;A<A ) _ ;A<A ) > >DHBB # # 2" X $P % Y $ X " T (* @N T AN AN '* M " 'J$ '$ & & !$ "$x '% /% & 8&N 9&~ -&z B H$ $2$.$($. P> '4 ] ] }r V ]
0x28753c…2876d0 Dummy {f00=0x00c9, f01=0x0190, f02=» P X Z& _. P # !0t !0 B = ] @N(P aN( AN( ] { ] '4 B '$ '4 X 2 'D M* C $ B P Y B Y } V Y Y '$ D Y C "T ] "W H I Y Y Y 2 Y " X P B T Y (D @N(T (
0x2876d0…287864 Dummy {f00=0x00c9, f01=0x0190, f02=» '4 X 2 '4 X * 'D { B ! P (DW B ! T X ! P (D Y 'D '$ B Y " 'D X 2 '4 '@ '< X " P '$ ( B '8 ' ( { X 2 '4 '@ X *T '< 'dW, P C X P } C 0P Y * L { W @ W @W W
0x287864…2879f8 Dummy {f00=0x00c9, f01=0x0190, f02=» $_. Y $ (* @N T AN AN '0 X $P y $ Y $ ( 2" (P 0 ) ( 2" (P _ ) 1_ * $X 0 % ' _ N" ( (P _ ) 1_@ N" ( (XL P _ 0 )_Z @ Y N &_: @ Y N &_6 * (P _ ) 1 4 A( A( A( A( A( ( W
0x2879f8…287b8c Dummy {f00=0x00c9, f01=0x0190, f02=»P % AN 4 L)D # !0^ !0t { M ] # !0^ !0t ] " P ] ( )t # AN AN !0^ !1xT. 'J) ) ) +D + , , , AN # !0^ !1h @N&T " !0t_Z !1x ] P = $ !1x x !1x > !1x F !0t AN P "P, !-~ @N T( PV !( X
0x287b8c…287d20 Dummy {f00=0x00c9, f01=0x0190, f02=» C $ B B AN AN AN AN AN !. !( AN _ !-~ T M @N X @ P !. )t# T X ! P !. _ @2"T !. _" !- AN !. _2 !) AN @N P @N P !- AN AN )t !) @N P @2" ) !- T> AN !. )t @N P @2"P @N ) 8 !- !- AN _: !1h X8_` AN
0x287d20…287eb4 (1, 503) Dummy {f00=0x00c9, f01=0x0190, f02=» } C ' P " H " P X * Y X V !(fW* X T X *P LW !(f X T X ! P !. W !. )t AN @N X 0 AN AN AN * !) @N T @N P !. )t !) @N T @N X W` @N @N *b @N @N AN * !) @N T _> !1h T @N P !. !( _X /T,
0x287eb4…288048 Dummy {f00=0x00c9, f01=0x0190, f02=» -P L _ 4 AN AN H E AN AN 4 @N P* X R$ X " T X *P ' (* AN AN 4 @2" @N T @N AN @N AN AN !1xT8 P: PN PP P P4 ( 1 AN @N ]: _> P _F @2" @N E !1 P !0t 4 _" !1 0_p / AN T
0x288048…2881dc Dummy {f00=0x00c9, f01=0x0190, f02=» !1v @N ( !1v @N P - !1v x . !M0 W 0 " @N PL R ~T }T T0 W, !1v P " ! " :A *@ H T 0 !1v W R !1v AN @N @N UH Zx Q P Q T 0 !1v AN 0 !1v AN !1v " !1` " !1` . AN _" AN AN !0D !1@ % !1v R !1v
0x2881dc…288370 Dummy {f00=0x00c9, f01=0x0190, f02=»N*J P 4 @ T B 4B J 4 A D ? ( J T0 AN T 2P @N P !1 H AN* AN& ] 4 !0 )t A D ? ( 4J "#T @N*P6R" 2B W," P @N*P"W ] " P ) " P (z L1, { ( " P 1 P AN& 4 AN P T !1p W " P H B P !1 (z { B X _ _8 !1h
0x288370…288504 Dummy {f00=0x00c9, f01=0x0190, f02=» 4 AN !1h @1 !1h AN @1 :H T 42$;(
0x288504…288698 Dummy {f00=0x00c9, f01=0x0190, f02=»
[…0xa…]
0x289660…2897f4 (1, 505) Dummy {f00=0x00ca, f01=0x0190, f02=»
[…0x5…]
0x289fd8…28a16c Dummy {f00=0x00ca, f01=0x0190, f02=» :f"? HML !1v "? HML !1v 4 ABCDEFGHI[.<(+!&JKLMNOPQR]$
0x28a16c…28a300 Dummy {f00=0x00ca, f01=0x0190, f02=» N4 T 1 Wd B B PX P P { Y O< AO W< V - 0 P AN # +T W Q P P 1 !N T V C B Q 1 { Y Y Y
0x28a300…28a494 (1, 506) Dummy {f00=0x00ca, f01=0x0190, f02=»]]T8 "W % AO On AO B T$_8 O AO @O B T _J O< AO _r_t O AO > > ?I O X ' B C X 4 N0 O O
0x28a494…28a628 Dummy {f00=0x00ca, f01=0x0190, f02=» DHBB QLQ _ X $P % Y $ X " T U @{v T A{v A{x T { " T Q T TB S !Q "Q 'R /S8 S~ 8S 9S -S B HQ Q Q Q Q P> T ] ] }r V ] ] T < " P H
0x28a628…28a7bc Dummy {f00=0x00ca, f01=0x0190, f02=» P Q !] !^ B = ] @{ P a{ A{ ] { ] T B T T X 2 T z C $ B P Y B Y } V Y Y T D Y C "T ] "W H I Y Y Y 2 Y " X P B T Y U @{ T VL Q X 2 T "P4
0x28a7bc…28a950 Dummy {f00=0x00ca, f01=0x0190, f02=» * T { B ! P U W B ! T X ! P U Y T T B Y " T X 2 T T T X " P T Uv B T U U { X 2 T T X *T T T W, P C X P } C 0P Y * L { W @ W @W W W W W { >
0x28a950…28aae4 Dummy {f00=0x00ca, f01=0x0190, f02=»T A{x A{v T X $P y $ Y $ V _ (P 0 ) V _ (P _ ) 1_ * $X 0 % Ub_ { ( (P _ ) 1_@ { ( (XL P _ 0 )_Z @ Y { &_: @ Y { &_6 * (P _ ) 1 4 AV AV AV AV AV V W > Q { ] VL
0x28aae4…28ac78 Dummy {f00=0x00ca, f01=0x0190, f02=» Q !] !] { { ] Q !] !] ] " P ] VL V Q A{ A{ !] !^ T. T W WB W< X X Z Z` Z2 A{~ Q !] !^ @{ T " !] _Z !^ ] P = $ !^ x !^ > !^ F !] A{ P "P, !Z @{xT( PV !V< X ! T4 X RD X !
0x28ac78…28ae0c Dummy {f00=0x00ca, f01=0x0190, f02=» A{ A{ A{| A{~ ! R !V A{x_ !Z T { @{x X @ P ! V # T X ! P ! _ @_ T ! _" ![ A{ ![ _2 !V A{ @{xP @{vP ![( A{x A{z V !V @{zP @_ W, ![b T> A{~ ! V @{xP @_ P @{v W, 8 ![ ![( A{ _: !^ X8_` A{~ @_ @{ T 1 T P
0x28ae0c…28afa0 Dummy {f00=0x00ca, f01=0x0190, f02=» H " P X * Y X V !U W* X T X *P LW !U X T X ! P ! W ![ V A{z @{t X 0 A{ A{v A{ X !V @{xT @{zP ! , V !V @{xT @{zX W` @{v @{~ W @{ @{ A{ X( !V @{xT _> !^ T @{ P ! !V _X /T, @{ X @{|P @{~T0
0x28afa0…28b134 (1, 507) Dummy {f00=0x00ca, f01=0x0190, f02=»{z A{ H E A{~ A{t 4 @{vP* X R$ X " T X *P U> U A{x A{v 4 @_ @{~T @{ A{ @{ A{ A{~ !^ T8 P: PN PP P P4 ( 1 A{ @{ ]: _> P _F @_ @{ E !_nP !] 4 _" !_n 0_p / A{ T W ,W A{ A{ W
0x28b134…28b2c8 Dummy {f00=0x00ca, f01=0x0190, f02=» - !^ x . !z W 0 " @{ PL R ~T }T T0 W, !^ P " ! " :A *@ H T 0 !^ W R !^ A{ @{ @{ UH Zx Q P Q T 0 !^ A{ 0 !^ A{ !^ " !^ " !^ @ A{| _" A{~ A{v !] !^ % !^ R !^ !^ < !^ @{v 0 !
0x28b2c8…28b45c Dummy {f00=0x00ca, f01=0x0190, f02=»B J 4 A D ? V J"T0 A{ T 2P @{zP !_2 H A{ A{ ] 4 !^X V A D ? V 4J "#T @{ P6R" 2B W," P @{ P"W ] " P W " P U L^ { V " P 1 P A{ 4 A{ P T !^ W " P H B2P !_2 U { B2X _ _8 !^ ! 1 4 ? { "P
0x28b45c…28b5f0 Dummy {f00=0x00ca, f01=0x0190, f02=»^ @_b !^ A{ @_b:H T 4_ h
0x28b5f0…28b784 Dummy {f00=0x00ca, f01=0x0190, f02=»
[…0xb…]
0x28c8e0…28ca74 (1, 509) Dummy {f00=0x00cb, f01=0x0190, f02=»
[…0x4…]
0x28d0c4…28d258 Dummy {f00=0x00cb, f01=0x0190, f02=» :f"? Hz !^ "? Hz !^ 4 ABCDEFGHI[.<(+!&JKLMNOPQR]$*);^-/STUVWXYZ|,%_>?
0x28d258…28d3ec Dummy {f00=0x00cb, f01=0x0190, f02=» *} : & > > @{ A{ @W W ^ ! Z2 { (X: @{ P T M ]J , ) A{ P* P Y U ( ) 5 & > > [ [ { Z Z Z ? Z > P "R Y {
0x28d3ec…28d580 Dummy {f00=0x00cb, f01=0x0190, f02=» - _ ? W ? P P B Tn C 9 ! R& 8 )X T R $ (! P B _V B P _ _ { ? W ? W ?W ? _ B B ? ' V& T _ _P Z 8 ) _ ?W ? _ 8 T 0 9Xz Y _~ ?W ?
0x28d580…28d714 (1, 510) Dummy {f00=0x00cb, f01=0x0190, f02=» Y 0WV Y 0WN X V$ Y X 6P " y 8_B Y 8W y 8 Y 0 Y 6W Y 0 Y 6 ! T X 0 Y / X .V. 0 X .$ ( P B V *@; V * ; V * Y . ! T X .R $ P _B ! T 9 R 9 W 9 _ Y ! X 0_~ D x Y 4 ! T P
0x28d714…28d8a8 Dummy {f00=0x00cb, f01=0x0190, f02=» P Y 0 Y 4 p Y 4W, B P B H " +P< Y 1 T P" ! T R X 2 Y 0U Y 0 _ Y 0 _* R _Q| B X / X 0$ %T Y 3V B V _ X 0 X /! R" Y /; ! ;h X /$ X 0 ! _p ! b b ] B H " _ _ PJ
0x28d8a8…28da3c Dummy {f00=0x00cb, f01=0x0190, f02=» 4 ! T b 4 ! TN ! TF P C X 0 C ! T0 B Y 0 ! 4 ! T Y 3U X 3 ! T :h Y 2U X 2 ! " 4 B ! | V X BT P X 4P Y 4 ! WT X BTN VF X 4P R Y 4 ! T ! T Pf P Y 4 ! Tf b P
0x28da3c…28dbd0 Dummy {f00=0x00cb, f01=0x0190, f02=» ! Y /_ Y 3R X 3 ! T " ! T ! T 4 X ? 9 x9 X ' P P +P 9 R 9 9 V 9 P C " | X 0 ! X ' D X /" Y 0 Y / > X / X 0" Y 3Q Y / > Y B X Y @ > Y ! Y B X . P ! ! *0 ! !
0x28dbd0…28dd64 Dummy {f00=0x00cb, f01=0x0190, f02=»
[…0x4…]
0x28e3b4…28e548 Dummy {f00=0x00cb, f01=0x0190, f02=» B P P 3T Y W { P X ( ( 7 Z& ( P H R H P ' Pt Tt T' P B ]` F U F ]n P U W. C G H L C X L G B G
0x28e548…28e6dc Dummy {f00=0x00cb, f01=0x0190, f02=» ( Y _ _l X T @ P ( A z _ ( Y _ _0 i X _ T _ | H P P $ $ - )W ) $P e % > ABCDEFGHI#.<(+!&JKLMNOPQR$]*);^-/STUVWXYZ@,%_>? 123456789:[
0x28e6dc…28e870 Dummy {f00=0x00cb, f01=0x0190, f02=»%_>?0123456789:#@'= 7- <=2&p ?' @O JZlP}M] Nk`Ka z^L~noj {|[_m TOSS & & { { { { { r r{ X ! 9 D
0x28e870…28ea04 Dummy {f00=0x00cb, f01=0x0190, f02=»! 9 D P { W 0 W 0(@ 4 Y Y Y Y $ & > X X X X $ & > ? R* X X P X( _. { ?(@ " X '? X D X T { { ? P >A D V 8P X ?!W > >?A P >A D V 8P X V
0x28ea04…28eb98 Dummy {f00=0x00cb, f01=0x0190, f02=» ` ` @ 1 A _ P 9 > >' "?:B ] P H U _ T U P U ;C ,$ T -_> - X_H "Rf P^ X TX X PJ X RD< V X 0 X L T P* X P Y 9 C " { L < ? < ? <(@ $
0x28eb98…28ed2c Dummy {f00=0x00cb, f01=0x0190, f02=» = _D D X _F R _ 00 > & <h$ P > $ 4 $ 4 D T d t 0123456789 - ' < +,-. 0123456789 'ABCDEFGHIJKLMNOPQRSTUVWXYZ []^ 0123456789 - * > ?;_: =!"#
0x28ed2c…28eec0 Dummy {f00=0x00cb, f01=0x0190, f02=» (@ U RL -P X < X :P $$ P V B X : % Y :(@ p ) B _* X . P Y . v B B % X < $ 4 T %(@ X :P" B Y < X :P Y .(@W Y ._ ! p(@" ! 9 Y . XV VP Rz P P 9 _ X 2 v Y 2W X
0x28eec0…28f054 (1, 512) Dummy {f00=0x00cb, f01=0x0190, f02=» <c $P $ $ V ! 0 B W" B P $$ R % C 6 Wv ? X . T 9 V _W W 9 R "? 9 0 R Q > ! 0 B W8 > ! B T ! X^ f x | 6 C " X : $4 P B X <Tt 1 pRr p Y / X : B X <P 1
0x28f054…28f1e8 Dummy {f00=0x00cb, f01=0x0190, f02=» HT > > >T H > P 6 _ W X < T X :P Y < 0 %_ % Y < (@ X Y :_( X < X 0 P L X " [000b [000e [00t [00q 8 [00w [00v c [5n 4 $$ X " X /# Y / P Y
0x28f1e8…28f37c Dummy {f00=0x00cb, f01=0x0190, f02=» P P ! 4 ! ! X . T +P B ! Y J PB PTWF X JP ! z Y G Y I ! X JPN ! G ! W6 ! ! W ! W ! +XR X RT _ Y R Q P ! ! ! W6 Z*
0x28f37c…28f510 Dummy {f00=0x00cb, f01=0x0190, f02=» ! B $ P YN P D Y 4 Y " WX ! ! X PP8 Y P ! z Y 2 Y 4 0 ! z Y 6 6 ! 0 ! z Y 8 ! Y : Y . X R Y ? ! ! [ ! 5 ! n ! ! 0 X " T A 6 N A 6
0x28f510…28f6a4 Dummy {f00=0x00cb, f01=0x0190, f02=» P Y . 4! Y 0_ Y B Y @ X @ ," :HR, 0 P :h ! Y @_" X B , ! Y B_ 4 :h 0 :C ! 412151824253033353648505160667072010203040506070809101111131415 A A A A A A | - M @
0x28f6a4…28f838 Dummy {f00=0x00cb, f01=0x0190, f02=» L A >b>J A A @ A A r @ @ p A P A @ | @ | $ A A @ @ @ E E E E E A & E @ F CRP <A COP <A BAP AS<A E ASP @ T t A ASP F @ U A AS P t
0x28f838…28f9cc Dummy {f00=0x00cb, f01=0x0190, f02=» D AST =l R W$ R Q R< 9 WJ P R* 9 P4:l P R R 9_ t t P :L AST A A E E A A 8 P W 89B @ V W Zb A @ L @ A A L B @ D AS
0x28f9cc…28fb60 Dummy {f00=0x00cb, f01=0x0190, f02=» S W Y* @ @ A @ L P :l l 9b ) V l_ @ A A A A E @ < V4 @ R, U 8 !RRT A " @ Pf A A @
0x28fb60…28fcf4 (1, 513) Dummy {f00=0x00cc, f01=0x0190, f02=» : @ < 9B A : " A @ A @ | E A @ V @ P A @ p A A r j t F F & F @ 00P& V . F 6 F _0 @
0x28fcf4…28fe88 Dummy {f00=0x00cc, f01=0x0190, f02=» ; # @ @ @ r I A P T j TT A A x @ ! P S A } A @ Z @ P " T z @ R @ ! T @ zA @ r @ @ I A p A r @ p A p @ P @ A @ r $ ) @ 0
0x28fe88…29001c Dummy {f00=0x00cc, f01=0x0190, f02=» 0 !;; : f 0 !LLP& !RRP !AAP !SSP !PPP !VVP !QQP W W f P W f A 0 !;;T : 0 !00R !ZZU !AAR !ZZQ 0 !;;T : : : : : : : 0 )TV : !00T A : 0 !99Q0 !00R*P P =H_ :TI
0x29001c…2901b0 Dummy {f00=0x00cc, f01=0x0190, f02=» t t @ : t A v " Z0X X._D! A A A A ! T W A A & A A A l N F 0 A : * A A : @ @ ! P V :AW 9E R _ <e @ $ T 9A $ < :B 9A) @ vP A v A I Td W 9D @ @
0x2901b0…290344 Dummy {f00=0x00cc, f01=0x0190, f02=» Y TD $ 1T> C !CCTp : 1P P(_ P =H P Z @ T X A : Y h C !CCTr B. X B.9 H z A _ !SSTF 0 U J X X A t A v X X S W A x A z A : r V W, Q( T W& @ T
0x290344…2904d8 Dummy {f00=0x00cc, f01=0x0190, f02=»X 9A_ : @ ! P (W ( : Z @ | j 0 A;T t P T j _* @ @ | ` | P A : T j 0 !;;P 0 !;; - a | =! 0 - Y : N j 8 0 ! P
0x2904d8…29066c Dummy {f00=0x00cc, f01=0x0190, f02=» . : l : 7 ( W $SWAP @ P A A WL , P@ , - 4 ] 4 Y 5 X * _6 : @ % 2 @ @ R6 r . !TTP t Y
0x29066c…290800 Dummy {f00=0x00cc, f01=0x0190, f02=» : P( T t S S _* : A A A A N =H N A @ T CRT N =H N A N =H N Z A , @ %!5!T W @ = V W = V P0 " U t
0x290800…290994 (1, 514) Dummy {f00=0x00cc, f01=0x0190, f02=» t S ( @ S =J @ " S b @ S A @ S T CRT @ S A A _ t !TTT @ P @ @ a : T ` @ W H A h J AS BAT :a A K @ ;C W @ " P " J
0x290994…290b28 Dummy {f00=0x00cc, f01=0x0190, f02=» @ 3 3 J S J Rh # 9h !RRP @ ! T W* J S W J U t 3 S S S _p P " I _ @ P : A A H A * P
0x290b28…290cbc Dummy {f00=0x00cc, f01=0x0190, f02=» _f @ Y t !TTX Y % @ : A @ T @ A A H A A P~ A ( A @ @ < F !AAT T B YP 2 G 9h G G : @ P A _l . @ A @ Y t !TTX
0x290cbc…290e50 Dummy {f00=0x00cc, f01=0x0190, f02=» 4 U t $ $ _. Y t !TTX @ @ @ ! P @ 8 8 8 3 U t . !TTT t_ !CCP W Y W P0 A A @ @ < : @ _2 . ]X @ 8 8 8
0x290e50…290fe4 Dummy {f00=0x00cc, f01=0x0190, f02=» _r : A @ F !SST 0WN !AAT 8WB !VVT @W6 !PPT HW* !LLT W !RRT W !QQP t x A A A @ 0 PV @ P P 0 _ P H (&? @ #? H & D # * H D > @ 0 D @ @ ) I
0x290fe4…291178 Dummy {f00=0x00cc, f01=0x0190, f02=»T @ 1 Q a : @ % PD H I H T P( H U @ ~U A ~ < + + P F @ : ` P: @ @ @ D (P W H $ I 0 % E , a : @ Q A % @ B A A A A @ @
0x291178…29130c Dummy {f00=0x00cc, f01=0x0190, f02=» Q _8 : t t t QZ RT D (%? # ;H ;D &`>e : Q* R$ D (%? # ;H ;D &`>e : t t t P< r A R A @ _ S : 0 N N !TTP 9H N A
0x29130c…2914a0 Dummy {f00=0x00cc, f01=0x0190, f02=» t P (9A > v @ & P @ # _R @ 0=H A PT N !DDPJ !SSP" : A " P, N !SST" A $ P Y (9A > v_ : @ " 9a @ $ 3 V t : @ 9 @ 9 9@ @ " :HP @
0x2914a0…291634 (1, 515) Dummy {f00=0x00cc, f01=0x0190, f02=» _* :! )R @R P FQ ! : t N PD ! P8 !==P( !NNP2 !SSP, U t - _> _H : P AAT : N =H N Z : N =H N Z : &=H F Z : F =H F Z : ? ? > > : P N =H N T
0x291634…2917c8 Dummy {f00=0x00cc, f01=0x0190, f02=» 1 a : @ * PF J # P _ :d Y @ Z A P T _: @ 2T P _ / : .P W P A .X @ P T :D * J TT J & P T .& >aW T (&
0x2917c8…29195c Dummy {f00=0x00cc, f01=0x0190, f02=»_ 3 _ : @ @ T t : dR d R _ 00)0= % : @ H ;l H :lT ;A P 5 _ ` R - _ : @ A A r : @ A P @ A @ @ : . ! T t ! . :
0x29195c…291af0 Dummy {f00=0x00cc, f01=0x0190, f02=» CR T @ T W @ $ @ A 6 @ A 8 d H d H K 2 ;A @ R V R t - @ R - $ N !TTP t N :H N TBT K W8 2 " T @ t X 2 N =H N Z @ R ) t !TTXX !CCT x !UUT
0x291af0…291c84 Dummy {f00=0x00cc, f01=0x0190, f02=» R S YT : @ R @ A > A ::b l / A R A D A F @ p A & A X @ CR @ D G " F * E H K @ & " A ( J (P6 " 4X 1 R
0x291c84…291e18 Dummy {f00=0x00cc, f01=0x0190, f02=» @ @ F @ > A b @ r @ p A r b A CR T @ 6 A @ 8 A @ A < D J @ & >k l 8 A A 6 Q R 8 V t ;k , @ 6T A , @ 8P( U U A ,
0x291e18…291fac Dummy {f00=0x00cc, f01=0x0190, f02=» A J ` ) K @ < G ` ) - J ` 4 K ` ) G ` " A ( A N (P0 | R "P *_ A N R "X4 *_ J PJ > I H I $ @ < D ` E , D H C ` J j
0x291fac…292140 Dummy {f00=0x00cc, f01=0x0190, f02=»P l R Xv l_|W "T : . A J V *_ A L (P 4 H - V l I " R E R R T E D E @ < H ` H ` E x #_ A * @ & 9k l $ A A J ` ( ` A ( J $ K
0x292140…2922d4 (1, 516) Dummy {f00=0x00cc, f01=0x0190, f02=» D 4 Q :_l > 1 x = G $ @ A $ @ E " L M _V P* & &X ' $ @ < H T H _4 A L A * @ ,T2 @ A 6 @ A 8 @ @ :B A @ 9n A @ @ ,P J V @ 8 A @ 6 A A
0x2922d4…292468 Dummy {f00=0x00cc, f01=0x0190, f02=» M : 4 A 0 @ " R RV > R W > <B @ J @ *P ` 1 ` A P @ L ` 4 ._j @ 0 4 : A . R R "P A J V *_ @ . : " D PH A . @ .P. D X D P H E _( E
0x292468…2925fc Dummy {f00=0x00cc, f01=0x0190, f02=» @ @ B B ` 4 : @ "P 9a _ " ( ) 8 ( ) : " $ @ "P 9A _ @ : A " W A "?AP ^ @ : 4P: " D > , H H $ M j - I Y0 : @ : R 2 A B @ (T : N @ @ A Z H @ "]" T 2
0x2925fc…292790 Dummy {f00=0x00cc, f01=0x0190, f02=» J J ` G G ` U ` G ` : "P V * : . @ NP A J V_$ 8 @ T @ J % @ H % : $ @ WN B W @ > " B ; Z [ : : [ [ :
0x292790…292924 Dummy {f00=0x00cc, f01=0x0190, f02=» ~ QF @ @ ` x A @ @ ` p R0 A @ A ^B _F 9o @ ~ ~_X : @ J P V U _ V Z K A A :K A Q R V t
0x292924…292ab8 Dummy {f00=0x00cc, f01=0x0190, f02=» X G : " L @ V @ t 0 H A : @ <m @ 0 ;l R 9d_ ;b# R 9a_ @ @ 1 R U W 9a P _" : P _ : @ | ` |U WP L P _ @ P _" l 0 W r
0x292ab8…292c4c Dummy {f00=0x00cc, f01=0x0190, f02=» N : d 8" R _ ZY QY : L ? ? R 0 R P P _ { : V ) ` : R @ @ ! @ P P P P _ _ @ @ :b @ :b V W U4
0x292c4c…292de0 Dummy {f00=0x00cc, f01=0x0190, f02=» | < | P: N P4 9b .V 3 S S :b Y* AST" ? ? > | T ] ] W 9l ] 9A ] 9k! ] Y P: P4 { { S @ P 3 _ { 3 { | Z A. @
0x292de0…292f74 (1, 517) Dummy {f00=0x00cd, f01=0x0190, f02=» a b O @ 6 B | 0 1 ! * A @ 6 B ! * N : Y P , J , v B# DC
0x292f74…293108 Dummy {f00=0x00cd, f01=0x0190, f02=» F} DI p ?O_o N : Y P ` &GP
0x293108…29329c Dummy {f00=0x00cd, f01=0x0190, f02=» F} DI ?O_o BP DC
0x29329c…293430 Dummy {f00=0x00cd, f01=0x0190, f02=» P RB(NN) RE100 P XRK A2,/80 P RB RE100 . PRE110 LDR A1,A2 @ P ANK A2,/7F X P XIF l P IFF CODE+P6805=0 SALCUZ x P LDK A1,/80 P XIF P ADK A5,4 P ANK A1,/80 P XRK A1,/80 P ABR* A5 P*
0x293430…2935c4 Dummy {f00=0x00cd, f01=0x0190, f02=» P CF A15,SAVE8 SAVE A1-A8 P XIF $ P 0 P IFF CPU852=1 8 P MSR 8,A15 SAVE A1-A8 N P XIF l " P LDKL A7,DTETAB DTETAB ADDRESS x P IFT STARVI=1 P LDK A5,4 SET DEVICE END ( P LD A6,DTEDWT,A7 GET FIRST DWT ADDR PDC1510 E
0x2935c4…293758 Dummy {f00=0x00cd, f01=0x0190, f02=» LD A6,DWTCHN,A6 GET NEXT DWT IN CHAIN P RB DC1510 . PDC1520 EQU * @ P =4 T P =13 b P XIF r P LD A2,DTESTA,A7 DTE STATUS ~ P SUK A2,2 $ P ABL(NZ) TDISP OPEN NOT EXECUTED * P CM DCLCI INIT LINE CONTROL UNIT INFO (
0x293758…2938ec Dummy {f00=0x00cd, f01=0x0190, f02=» P ABL BRM P EJECT P IFT CODE=1 & P* : P* D P* CALCULATION OF CRC N P* j P* A2 = CHARACTER t P* A8 = ACCUMULATED CRC P* P* PCRCCAL EQU * P ST A1,CRCSAV+2 P ST A2,CRCSAV+6 P ST A3
0x2938ec…293a80 Dummy {f00=0x00cd, f01=0x0190, f02=» A3,A2 P SRL A2,1 P ANK A3,1 P RF(Z) CRC110 2 P XRKL A4,/A001 H PCRC110 SUK A1,1 ^ P RB(NZ) CRC100 v P LDR A8,A4 SAVE NEW CRC PCRCSAV EQU * P LDKL A1,0 P LDKL A2,0 P LDKL A3,0 P LDKL A4,0 P
0x293a80…293c14 (1, 518) Opaque[0x194]
0x293c14…293da8 # DirEnt {nam=»GNDC25«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x16e0, f03=0x0000}
0x293c14…293da8 IdxSect {
0x293c14…293da8 f00 = 0x00b7 // 0x293c14 @0x0
0x293c14…293da8 f01 = 0x0002 // 0x293c16 @0x2
0x293c14…293da8 gno = [ // 0x293c18 @0x4
0x293c14…293da8 [0x00]: C0x00b7.0x0.0
0x293c14…293da8 ]
0x293c14…293da8 }
0x293da8…293f3c Dummy {f00=0x00b7, f01=0x016e, f02=» PASG 2,NO PLED DRDC15 P!!CH $$DRDC15$$DRDC25$$,C & P!!CH $$IH1501$$IH2501$$,C H P!!CH $$IH1502$$IH2502$$,C j P!!CH $$DC15ON$$DC25ON$$,C P!!CH $$DC15AD$$DC25AD$$,C P!!CH $$DW1500$$DW2500$$,C ( P!!CH $$X:M EQU /02$$X:
0x293f3c…2940d0 Dummy {f00=0x00b7, f01=0x2008, f02=» 2,NO PLED DRDC15 P!!CH $$DRDC15$$DRDC25$$,C & P!!CH $$IH1501$$IH2501$$,C H P!!CH $$IH1502$$IH2502$$,C j P!!CH $$DC15ON$$DC25ON$$,C P!!CH $$DC15AD$$DC25AD$$,C P!!CH $$DW1500$$DW2500$$,C ( P!!CH $$X:M EQU /02$$X:
0x2940d0…294264 Dummy {f00=0x00b7, f01=0x0190, f02=» WRONG STATISTIC HANDLING P REL 11.0 81-03-27 " P =4, ERROR IN POWER UP > ( P =3, DELETE INSTRUCTIONS NOT USED ^ $ P =2, CHANGES IN STATUS HANLING ( P =1, ERROR IN OPEN/CLOSE REQUESTS P REL 11.0 81-01-26 P* P*
0x294264…2943f8 Dummy {f00=0x00b7, f01=0x0190, f02=»ER DATA COMMUNICATION . P* BSC MULTIPOINT LINE PROCEDURE P* OR SIEMENS MSV1 P P* t P* ~ P* P* P* 8 P**************************************************** P EJECT P* P* P* EN
0x2943f8…29458c Dummy {f00=0x00b7, f01=0x0190, f02=»TPUT INTERRUPT " P ENTRY DC25ON POWER ON ROUTINE P ENTRY DW2500 DUMMY DWT < P* P EJECT f P* t P* ~ P* EXTERNAL REFERENCES P* " P EXTRN TDISP DISPATCHER ENTRY ( P EXTRN SAVE8 SAVE A1-A8 ON A15 STACK $ P EXTRN
0x29458c…294720 Dummy {f00=0x00b7, f01=0x0190, f02=»RN DWTOR DWT ORDER P EXTRN DWTECB DWT ECB P EXTRN DWTOPT OPTION CODE 8 " P EXTRN DWTUEC USER ECB IF MMU Z P EXTRN DWTMEC MMU ECB P EXTRN ECBFC FILE CODE P EXTRN ECBBA BUFFER ADDRESS " P EXTRN ECBRL REQUESTED LENGTH " P E
0x294720…2948b4 (1, 519) Opaque[0x194]
0x2948b4…294a48 # DirEnt {nam=»DRLP01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1630, f03=0x0000}
0x2948b4…294a48 IdxSect {
0x2948b4…294a48 f00 = 0x00b1 // 0x2948b4 @0x0
0x2948b4…294a48 f01 = 0x000a // 0x2948b6 @0x2
0x2948b4…294a48 gno = [ // 0x2948b8 @0x4
0x2948b4…294a48 [0x00]: C0x00b1.0x2.0
0x2948b4…294a48 [0x01]: C0x00b1.0x3.0
0x2948b4…294a48 [0x02]: C0x00b2.0x0.0
0x2948b4…294a48 [0x03]: C0x00b6.0x1.0
0x2948b4…294a48 [0x04]: C0x00b6.0x2.0
0x2948b4…294a48 ]
0x2948b4…294a48 }
0x294a48…294bdc Dummy {f00=0x00b1, f01=0x0190, f02=» 2 P IDENT DRLP01 REL 11.0 83-11-17 870105041100 P : " P =DK1, CHAR. CONV. FOR 6883 B , P DK1= MMU BUFFER =256 FOR BASIC WRITE h 8 P =1,WHEN CHAN=1 DRIVER WILL SERVE BOTH MUX AND PC P REL 10.0 80-03-14 P* P* > P****
0x294bdc…294d70 Dummy {f00=0x00b1, f01=0x0190, f02=»RIVER LINE PRINTER P* P* $ P* . P* 8 P* B P* L > P********************************************************** V P* P* @ P* THIS DRIVER HANDLES ONE LINE PRINTER PTS 6881 CONNECTED < P* TO CPU VIA CHLP ON
0x294d70…294f04 Dummy {f00=0x00b1, f01=0x0190, f02=»** z P* ENTRIES * P************************ * P* J P* T P ENTRY LPADR ADDRESS BLOCK ^ " P ENTRY ACLP ACTIVATION DRIVER " P ENTRY IHLP INTERRUPT HANDLER P ENTRY LPON RECOVERY ROUTINE & P ENTRY DWLP01 DWT FOR LI
0x294f04…295098 Dummy {f00=0x00b1, f01=0x0190, f02=»ENTRIES * v , P**************************************** P* F P* P P EXTRN TDISP DISPATCHER Z P EXTRN TENDIO END I/O z & P EXTRN SAVE8 SAVE 8 REGS ON STACK P EXTRN DISIOE REQUEST ERROR P EXTRN DWTST STATUS P EXTRN
0x295098…29522c Dummy {f00=0x00b1, f01=0x018e, f02=» EXTRN DWTA4 SAVE AREA A4 P EXTRN DWTA5 SAVE AREA A5 " & P EXTRN DWTSB2 STACK BASE 2 IN DWT D * P EXTRN INTSAV SAVE AREA LAST INTERRUPT n * P EXTRN PFPOST PWF POST PROCESSING FLAG P EJECT DRLP01 P* P* " P******************
0x29522c…2953c0 Dummy {f00=0x00b1, f01=0x0190, f02=» & PMUXLP EQU DWALP+DWALP MUX ADDRESS P* . P EJECT DRLP01 8 P* P P* Z . P***************************************** d P* P* CONDITIONAL ASSEMBLY P* . P***************************************** P* 0 P* IF
0x2953c0…295554 (1, 520) Dummy {f00=0x00b1, f01=0x0190, f02=»CHAN EQU 1 P* . P* A PROGRAM VERSION USING TOSS MMU PAGING * P* IS OBTAINED BY SETTING MMUPAG EQU 1. N P* | PMMUPAG EQU 1 P* P* 6 P* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION . P* SET IS OBTAINED BY SETTING CPU
0x295554…2956e8 Dummy {f00=0x00b1, f01=0x0190, f02=»* P* MMU DEVICE INDEX P* & PX:C EQU 2 0 , PDEVIND EQU X:C LINE PRINTER DEVICE INDEX B P* r P EJECT DRLP01 | P* P* P*********************** P* ORDERS * P*********************** P
0x2956e8…29587c Dummy {f00=0x00b1, f01=0x0190, f02=»R IS OPERABLE. r P* P* ORDER /05: BASIC WRITE. P* D 6 P* ORDER /07: BASIC WRITE WITH CHARACTER CONVERSION N $ P* FOR 6883 PRINTER.. : P* THE REQUESTED NUMBER OF CHARACTERS ARE @ P* SENT TO TH
0x29587c…295a10 Dummy {f00=0x00b1, f01=0x0190, f02=»TAINS A CONTROL d P* CHARACTER. < P* /2B: PRINT LINE WITHOUT ADVANCING PAPER : : P* /30: ADVANCE TWO LINES BEFORE PRINTING z < P* /31: SKIP TO TOP OF FORM BEFORE PRINTING > P*
0x295a10…295ba4 Dummy {f00=0x00b1, f01=0x0190, f02=»FFER SHOULD BE WITHIN THE p > P* INTERVAL /20-/5F. NO CHECK IS CARRIED OUT " B P* BY DRIVER. AT THE END OF ECB BUFFER ONE BYTE d > P* MUST BE RESERVED FOR THE DRIVER TO STORE A $ P* PRINT CHARAC
0x295ba4…295d38 Dummy {f00=0x00b1, f01=0x0190, f02=» * v ( P************************************ P* > P* H P* A1 = RETURN CODE R P* A2 = WORK REGISTER p P* A3 = WORK REGISTER P* A4 = BUFFER ADDRESS P* A5 = STACK BASE P* A6 = DWT ADDRESS
0x295d38…295ecc Dummy {f00=0x00b1, f01=0x0190, f02=» * | $ P******************************** P* < P* F * P DATA DVBLEN+DVBLEN MMU BUFFER LENGTH P P DATA DEVIND DEVICE INDEX ~ & PLPADR DATA ACLP ACTIVATION DRIVER " P DATA 0 ABORT ROUTINE ADDRESS P* P EJECT DRLP0
0x295ecc…296060 Dummy {f00=0x00b1, f01=0x0190, f02=» LDR A7,A7 ORDER 0 ? P RF(NE) ACLP05 NO P LDKL A4,DWTBC BYTE COUNTER 6 P ADR A4,A6 ADD DWT ADDRESS Z $ P SCR A1,A4 STORE CARRIAGE RETURN | P LDK A2,1 P RF ACLP30 P* $ PACLP05 LD A4,2,A8 BUFFER ADDRESS P LD A2,4,A8 RE
0x296060…2961f4 (1, 521) Dummy {f00=0x00b2, f01=0x0190, f02=»1 ORDER = 07 P RF(E) ACLP07 YES PACERR ABL DISIOE . P* F PACLP07 EQU * P $ P LDK A1,/05 REPLACE ORDER IN DWT f P SC A1,DWTOR+1,A6 ( P LDKL A1,IHLP50 CHANGE BRANCH ADDR. & P ST A1,IHLPXX IN INTERRUPT HANDLER " P RF ACLP30
0x2961f4…296388 Dummy {f00=0x00b2, f01=0x0190, f02=»ACLP12 NO 6 P LDK A2,2 YES , SAME ACTIONS AS FOR REQ. LENGTH=2 P* L PACLP12 EQU * V P LDR A3,A4 BUFFER ADDRESS j & P ADR A3,A2 ADDED WITH REQ. LENGTH $ P SCR A1,A3 STORE PRINT CHARACTER P ADK A2,1 P LCR A3,A4 P ECR A
0x296388…29651c Dummy {f00=0x00b2, f01=0x0190, f02=» RF(NE) ACLP15 NO $ P SUK A2,2 DECREMENT REQ. LENGTH & P ADK A4,2 INCREMENT BUFFER ADDRESS B P RF ACLP30 l P* ~ PACLP15 LDK A1,/0A LINE FEED * P SC A1,1,A4 SECOND CHARACTER IN BUFFER P SUK A3,5 TWO LINE FEEDS ? P RF(E) ACLP2
0x29651c…2966b0 Dummy {f00=0x00b2, f01=0x0190, f02=» P EJECT DRLP01 P* P* * 4 PACLP20 SCR A1,A4 STORE FIRST CHARACTER IN BUFFER 4 $ PACLP30 CF A5,CIOSTA SEND BUFFER l P SUK A7,6 ORDER 6 ? P RF(NE) ENDIO P LDR A2,A2 P RF(NN) ACLP35 4 P IM 6,A8 ADD FOR EXTRA CHA
0x2966b0…296844 Dummy {f00=0x00b2, f01=0x0190, f02=»C A3,1,A4 RESET CONTROL CHARACTER IN BUFFER P ECR A3,A3 4 $ P SCR A3,A4 ALSO RESET FIRST BYTE F P* n $ PENDIO CF A15,TENDIO END REQUEST x PEXIT ABL TDISP P* P EJECT DRLP01 P* P* P* CIOSTA " P* SUB
0x296844…2969d8 Dummy {f00=0x00b2, f01=0x018e, f02=» NEGATE BUFFER LENGTH =1 . P ST A1,DWTA3,A6 END OF BUFFER INDICATOR =1 & P ST A4,DWTA4,A6 BUFFER POINTER =1 R P XIF =1 | 6 P ORKL A2,/4000 INDICATE CHARACTER MODE, OUTPUT AND P IN RIGHT BYTE NUMBER OF P CHARACTERS TO SEND 0 P
0x2969d8…296b6c Dummy {f00=0x00b2, f01=0x0190, f02=» P RB(NZ) EXIT PFINIT PENDING P CIO A2,1,DWALP CIO START ( P RB(Z) EXIT J P LDK A1,1 ERROR ^ P RB ENDIO v P* P EJECT DRLP01 P* P* P* RECOVERY ROUTINE P* P* PLPON EQU * P IFT C
0x296b6c…296d00 Dummy {f00=0x00b2, f01=0x0190, f02=» P XIF P* P LDK A1,1 NOT OPERABLE P LDKL A6,DWLP01 DWT ADDRESS 8 P LD A2,DWTST,A6 DWT STATUS P RB(N) EXIT LP FREE ~ P RF IHLP30 P* P EJECT DRLP01 P* P* P* I N T E R R U P T P*
0x296d00…296e94 (1, 522) Dummy {f00=0x00b6, f01=0x0190, f02=» " P LDKL A1,DWLP01 DWT ADDRESS =1 * P LC* A2,DWTA4,A1 NEXT BYTE TO PRINT =1 * 0 P ABL IHLP05 VARIABLE BRANCH FOR CHAR. CONV. X PIHLPXX EQU *-2 PIHLP05 EQU * " P OTR A2,0,DWALP WRITE ONE BYTE P RF(NA) IHLP20 NOT ACCEPTED ( P LDK
0x296e94…297028 Dummy {f00=0x00b6, f01=0x0190, f02=»1 ` " P RF(N) IHLP10 NOT LAST BYTE =1 . P LDKL A1,IHLP05 RESTORE BRANCH ADDRESS DK2 0 P ST A1,IHLPXX b P CIO A2,0,DWALP CIO HALT x PIHLP10 EQU * P LDR* A2,A15 P LDR* A1,A15 P RTN A15 P EJECT P* , P* CHARACTE
0x297028…2971bc Dummy {f00=0x00b6, f01=0x0190, f02=» RF(E) IHLP70 CONVERT IT P CCK A2,/5C5C CONVERT? P RF(NE) IHLP60 NO, YET > P LDK A2,/26 CONVERSION P RF IHLP80 z PIHLP60 EQU * P CCK A2,/5D5D CONVERT? P RF(NE) IHLP90 NO, SKIP IT P LDK A2,/22 CONVERT IT P RF IH
0x2971bc…297350 Dummy {f00=0x00b6, f01=0x018e, f02=»,IHLP82 SET NEXT JUMP ADDRESS P ST A1,IHLPXX & P LDK A2,/0E SEND SHIFT OUT < P OTR A2,0,DWALP ` " P RF(NA) IHLP20 QUIT ON STATUS x " P RB IHLP10 WAIT FOR INTERRUPT PIHLP82 EQU * * P LDKL A1,IHLP84 SET NEXT JUMP ADDRESS P
0x297350…2974e4 Dummy {f00=0x00b6, f01=0x0190, f02=» " P RB IHLP10 WAIT FOR INTERRUPT PIHLP84 EQU * * . P LDKL A1,IHLP50 INSERT ORIG. JUMP ADDRESS @ P ST A1,IHLPXX r P LDK A2,/0F SHIFT IN & P RB IHLP05 SEND + UPDATE POINTERS PIHLP90 EQU * P RB IHLP05 P* P* SAVE
0x2974e4…297678 Dummy {f00=0x00b6, f01=0x0190, f02=» * P LDKL A1,IHLP05 RESTORE BRANCH ADDRESS P ST A1,IHLPXX 6 P LDR* A2,A15 =1 L P LDR* A1,A15 =1 d P XIF | P* P IFT CPU852=1 =1 ( P CF A15,SAVE8 SAVE A1-A8 ON STACK =1 P XIF =1 P* P IFT CPU852=0 =1
0x297678…29780c Dummy {f00=0x00b6, f01=0x0190, f02=» t P* PIHLP30 EQU * P LD A7,DWTOR,A6 ORDER & P ANK A7,/FF D P LD A8,DWTECB,A6 ECB ADDRESS X P* | P LD A2,4,A8 =1 " P ST A2,6,A8 STORE EFF. LENGTH $ P LD A5,DWTA5,A6 GET STACK VALUE P RTN A5 P* P E
0x29780c…2979a0 Dummy {f00=0x00b6, 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 P IFT
0x2979a0…297b34 (1, 523) Dummy {f00=0x00b6, 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
0x297b34…297cc8 Dummy {f00=0x00b6, 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
0x297cc8…297e5c Dummy {f00=0x00b6, f01=0x0190, f02=» m U 8 !RRT A SCTNOP 0 , ( $ " @ P A A " @ > B , ( V T P T r , ( ;a=a?j V Y R W , ( ?J E =A;A E PUS
0x297e5c…297ff0 Dummy {f00=0x00b6, f01=0x0190, f02=»" A @ A @ * & M E A @ V @ * & e @ P , . A N , ( } @ @ A A | , ( , (
0x297ff0…298184 Dummy {f00=0x00b6, f01=0x0190, f02=» l , ( 3 _ 0 !TTX A 8 !CCT CC A , ( S _ 0 !;; !AAP !DDT < , ( sI @ @ A 6 0_ ; # l , ( H @ @ @ I A , ( P T , ( TT
0x298184…298318 Dummy {f00=0x00b6, f01=0x0190, f02=» T @ " A @ @ @ MOVE , , ( / I A ( A < SCTMXS l , ( IA @ A @ ~ SYSLDM , ( c $ *P @ A * @ , , ( y $ ) @
0x298318…2984ac Dummy {f00=0x00b6, f01=0x0190, f02=» T : , ( : 0 !TT 0 !;; , ( : 0 !LLP !RRP !AA P , ( + P !SSP !PPP !VVP !QQP W W , ( K P W A 0 !;;T , ( i : 0 !00R !ZZU !AAR !ZZQ
0x2984ac…298640 Dummy {f00=0x00b6, f01=0x0190, f02=» A : p , ( 0 !99Q !00R P P =H_ : , ( TID=TCL=LEV=TDC=T0LC=0SDC=S0 @ , ( '@ A I. : A A p , ( E " Q :d @ 1 # R P R W , ( cD * A $ W , ( }"
0x298640…2987d4 (1, 524) Opaque[0x194]
0x2987d4…298968 # DirEnt {nam=»DVDY01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1c38, f03=0x0000}
0x2987d4…298968 IdxSect {
0x2987d4…298968 f00 = 0x00e1 // 0x2987d4 @0x0
0x2987d4…298968 f01 = 0x0002 // 0x2987d6 @0x2
0x2987d4…298968 gno = [ // 0x2987d8 @0x4
0x2987d4…298968 [0x00]: C0x00e1.0x3.0
0x2987d4…298968 ]
0x2987d4…298968 }
0x298968…298afc Dummy {f00=0x00e1, f01=0x0190, f02=» 2 P IDENT DVDY01 REL 11.0 83-05-05 870105041100 P : * P* DEVICE WORK TABLE FOR VIDEO DISPLAY B P* p P ENTRY DVDY01 TABLE ENTRY z P* P* ( P EXTRN DYAD POINTER TO ADDRESS BLOCK PMMUPAG EQU 1 P* PDVDY01 EQU * T
0x298afc…298c90 Dummy {f00=0x00e1, f01=0x0190, f02=» DATA DWTEND-DVDY01 ORDER ( P DATA DYAD POINTER TO ADDRESS-BLOCK " P DATA /C459 TTAB-ADDRESS N $ P DATA 0 WAIT/ACTIVATE INDICATOR n P DATA 0 TERMINAL QUEUE P IFT MMUPAG=1 & P DATA 0 SAVE AREA USER ECB ADDRESS P DATA DEVECB MMU ECB
0x298c90…298e24 Dummy {f00=0x00e1, f01=0x0190, f02=»VE AREA FOR A5 P RES 4 DWT-STACK P DATA 0 SAVE AREA FOR A7 . P DATA 0 SAVE AREA FOR A8 N $ P DATA /0003 CHANNEL PARAMETER 2 n $ P DATA 0 LINE DRIVER DEPENDENT 1 $ P DATA 0 LINE DRIVER DEPENDENT 2 P DATA /0000 DEVICE STATUS P
0x298e24…298fb8 Dummy {f00=0x00e1, f01=0x40a4, f02=» IN BLOCK ~ P DATA 0,0,0,0,0,0 REL 11+ P IFT MMUPAG=1 4 PDEVECB DATA 0,0,0,0,0,0 J P XIF j PDWTEND EQU * v P* P END @ RIVER DEPENDENT 1 $ P DATA 0 LINE DRIVER DEPENDENT 2 P DATA /0000 DEVICE STATUS P
0x298fb8…29914c 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
0x29914c…2992e0 Dummy {f00=0x00e1, f01=0x0190, f02=» * $ z 8 P*************************************************** % & PGETFIL EQU * % b P CF A14,GETVLB % v PGET:10 EQU * % " P CF A14,RDSEC GET VOLUME LABEL % ( P LDK A7,QBLFAC VTOC BLOCKING FACTOR % " P LDR A6,A9 GET START O
0x2992e0…299474 (1, 525) Opaque[0x194]
0x299474…299608 # DirEnt {nam=»DVG101«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1c40, f03=0x0000}
0x299474…299608 IdxSect {
0x299474…299608 f00 = 0x00e2 // 0x299474 @0x0
0x299474…299608 f01 = 0x0004 // 0x299476 @0x2
0x299474…299608 gno = [ // 0x299478 @0x4
0x299474…299608 [0x00]: C0x00e2.0x0.0
0x299474…299608 [0x01]: C0x00e2.0x1.0
0x299474…299608 ]
0x299474…299608 }
0x299608…29979c Dummy {f00=0x00e2, f01=0x0190, f02=» 2 P IDENT DVG101 REL 11.0 81-01-26 870105041100 P : , P* DEVICE WORK TABLE FOR GENERAL PRINTER B P* r P ENTRY DVG101 TABLE ENTRY | P* P* * P EXTRN GPAD8 POINTER TO ADDRESS-BLOCK $ PMMUPAG EQU 1 MEM. MAN.UNIT COND. P
0x29979c…299930 Dummy {f00=0x00e2, f01=0x0190, f02=»A 0 ECB ADDRESS P DATA DWTEND-DVG101 ORDER ( P DATA GPAD8 POINTER TO ADDRESS BLOCK : P DATA 'GP' TTAB-ADDRESS f $ P DATA 0 WAIT/ACTIVATE INDICATOR P DATA 0 TERMINAL QUEUE P IFT MMUPAG=1 & P DATA 0 SAVE AREA USER ECB ADDRESS
0x299930…299ac4 Dummy {f00=0x00e2, f01=0x0190, f02=»ATA 0,0,0,0 STACK P DATA 0 SAVE AREA A7 P DATA 0 SAVE AREA A8 6 $ P DATA /0004 CHANNEL PARAMETER 2 R $ P DATA 0 LINE DRIVER DEPENDENT 1 z $ P DATA 0 LINE DRIVER DEPENDENT 2 P DATA /0000 DEVICE STATUS P DATA 0 TIMER POINTER "
0x299ac4…299c58 Dummy {f00=0x00e2, f01=0x018e, f02=» LENGTH z P DATA 0 ACTUAL LINE DOCUMENT $ P DATA 0 REQUESTED LINE DOCUMENT 4 P DATA 0 RETURN CODE $ P DATA 0 CONTROL SEQUENCE ADRESS x 6 P DATA 0 DWT-DISPLACEMENT TO LINE NO,CHAR.SET,ETC. 0 P DATA 0,0,0 ACTUAL COLUMN DOCUMENT AND PAPER
0x299c58…299dec Dummy {f00=0x00e2, f01=0x4076, f02=» PDEVECB EQU * P DATA 0,0,0,0,0,0 P XIF 2 PDWTEND EQU * > P* R P* P END f@ r P DATA 0 CONTROL SEQUENCE ADRESS x 6 P DATA 0 DWT-DISPLACEMENT TO LINE NO,CHAR.SET,ETC. 0 P DATA 0,0,0 ACTUAL COLUMN DOCUMENT AND PAPER
0x299dec…299f80 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
0x299f80…29a114 (1, 526) Dummy {f00=0x00e2, f01=0x0190, f02=»
[…0x1…]
0x29a2a8…29a43c Dummy {f00=0x00e2, f01=0x0190, f02=» > H/ J/ 0 0 _ 0 0 / L. 0 @ B P Q a b !
0x29a43c…29a5d0 Dummy {f00=0x00e2, f01=0x0190, f02=» O ?DW T O GNW O @ : V M P W , !VV , : G ( z G H& R &! X !VVX 9H F O N P @ W @ I6 : 2 . V ! 09B O E :h % : V H @ X =P
0x29a5d0…29a764 Dummy {f00=0x00e2, f01=0x0190, f02=» O N T O T RtT B W PR v_* , ! V& X" X( X. X4 Y _> O ! P " P W W 9 _f PR v_ , ! ^< _ ( : P R C B ( B ! P C W. B ! QP$ B + Y
0x29a764…29a8f8 Dummy {f00=0x00e2, f01=0x0190, f02=» P P C C W^ T " U N P$ O N ! P " T W 9 W : P : ! T W P <! P W P . O O P 2 P0 P 2
0x29a8f8…29aa8c Dummy {f00=0x00e2, f01=0x0190, f02=» U O : : <' : # : N N N : O O O : B + E E C ( B : R : Q 2 : Q, ! P X ) Y Q P _$ P QR P _> : Q& X ) Y Q PW
0x29aa8c…29ac20 Dummy {f00=0x00e2, f01=0x0190, f02=» !VVT 1 B E C ( : O T Wj , ! V _ P 2W ( , ! Z P6 ! " - X ) Y ( , ! ^( - X ) Y _ C : P2 T P` " P PP , ! Z P 2 W ( P" ,
0x29ac20…29adb4 (1, 527) Opaque[0x194]
0x29adb4…29af48 # DirEnt {nam=»BUGGEN«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1c50, f03=0x0000}
0x29adb4…29af48 IdxSect {
0x29adb4…29af48 f00 = 0x00e2 // 0x29adb4 @0x0
0x29adb4…29af48 f01 = 0x0002 // 0x29adb6 @0x2
0x29adb4…29af48 gno = [ // 0x29adb8 @0x4
0x29adb4…29af48 [0x00]: C0x00e2.0x2.0
0x29adb4…29af48 ]
0x29adb4…29af48 }
0x29af48…29b0dc Dummy {f00=0x00e2, f01=0x010c, f02=» PASG 2,LP0F PSCR PINC SYS2DC " PINC DEBUGM 4 PNOD AM F PINC SYSLOD T PINC SYSLDM f PINC SYSLCR x PINC SYSINI PINC TCLASS PINC SCLASS PLKE M PKPF /L,BUGMON P$PDISC M=BUGMON PASG /E0,TY10
0x29b0dc…29b270 Dummy {f00=0x00e2, f01=0x2008, f02=» 2,LP0F PSCR PINC SYS2DC " PINC DEBUGM 4 PNOD AM F PINC SYSLOD T PINC SYSLDM f PINC SYSLCR x PINC SYSINI PINC TCLASS PINC SCLASS PLKE M PKPF /L,BUGMON P$PDISC M=BUGMON PASG /E0,TY10
0x29b270…29b404 Dummy {f00=0x00e2, f01=0x0190, f02=» SWB:EL SWB:NS ACBIOE ( ACBSWB < ACBSEG P ACBNPE d ACBMMP x ACBMMC ACBLAP ACBLAC ACBSTA ACBREL ACBADA I
0x29b404…29b598 Dummy {f00=0x00e2, f01=0x018e, f02=»502 IH2501 IH2502 , ( 0 IHPR01 ` , ( ! r IHPL01 IHPL02 , ( 1 IHLP , (
0x29b598…29b72c Dummy {f00=0x00e2, f01=0x0190, f02=» f , ( q HALT 8 H SCTMSZ ` SCTSFA t SCTEFA SCTIPL SCTANO SCTTCT SCTCDT , ( @
0x29b72c…29b8c0 Dummy {f00=0x00e2, f01=0x0190, f02=» SCTBUG SCTDMT SCTDMI & SCTFWT : SCTNOF N SCTNFT b SCTFWL v SCTBLK SCTDCT SCTNOS , ( SCTMXS
0x29b8c0…29ba54 (1, 528) Opaque[0x194]
0x29ba54…29bbe8 # DirEnt {nam=»BUGMON«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x2210, f03=0x0000}
0x29ba54…29bbe8 IdxSect {
0x29ba54…29bbe8 f00 = 0x0110 // 0x29ba54 @0x0
0x29ba54…29bbe8 f01 = 0x0028 // 0x29ba56 @0x2
0x29ba54…29bbe8 gno = [ // 0x29ba58 @0x4
0x29ba54…29bbe8 [0x00]: C0x0110.0x2.0
0x29ba54…29bbe8 [0x01]: C0x0110.0x3.0
0x29ba54…29bbe8 [0x02]: C0x0111.0x0.0
0x29ba54…29bbe8 [0x03]: C0x0111.0x1.0
0x29ba54…29bbe8 [0x04]: C0x0111.0x2.0
0x29ba54…29bbe8 [0x05]: C0x0111.0x3.0
0x29ba54…29bbe8 [0x06]: C0x0112.0x0.0
0x29ba54…29bbe8 [0x07]: C0x0112.0x1.0
0x29ba54…29bbe8 [0x08]: C0x0119.0x2.0
0x29ba54…29bbe8 [0x09]: C0x011a.0x1.0
0x29ba54…29bbe8 [0x0a]: C0x011b.0x0.0
0x29ba54…29bbe8 [0x0b]: C0x011b.0x1.0
0x29ba54…29bbe8 [0x0c]: C0x011b.0x2.0
0x29ba54…29bbe8 [0x0d]: C0x011b.0x3.0
0x29ba54…29bbe8 [0x0e]: C0x011c.0x0.0
0x29ba54…29bbe8 [0x0f]: C0x011c.0x2.0
0x29ba54…29bbe8 [0x10]: C0x011c.0x3.0
0x29ba54…29bbe8 [0x11]: C0x011d.0x0.0
0x29ba54…29bbe8 [0x12]: C0x011d.0x1.0
0x29ba54…29bbe8 [0x13]: C0x011d.0x2.0
0x29ba54…29bbe8 ]
0x29ba54…29bbe8 }
0x29bbe8…29bd7c Dummy {f00=0x0110, f01=0x0190, f02=» D j P = >8kfk 't 'l't f @
0x29bd7c…29bf10 Dummy {f00=0x0110, f01=0x0190, f02=»
0x29bf10…29c0a4 Dummy {f00=0x0110, f01=0x0190, f02=» _ A :U A A " @ ~ A h A ~ @ A < A @ A L A @ A X A @ A A
0x29c0a4…29c238 Dummy {f00=0x0110, f01=0x0190, f02=» 2 _ j S A _ @ T :a R T <a Z _ = :A , >a @ A P UW B P @ = & / 6 M Q t R n S v T 8
0x29c238…29c3cc Dummy {f00=0x0110, f01=0x0190, f02=» *T A _ P A A . * , : + n - n ; # R $ X : X " H W* X " H H A W W L H A A _p @ P A 1+X A _ @ A @ A _ :P W P " W U :U A " ? <
0x29c3cc…29c560 Dummy {f00=0x0110, f01=0x0190, f02=» 0 _, W W Pf @ & 0 T* A P P V W _x _` A H $T @ t W @ T @ W @ @ >a @ A H t A r $ ;a
0x29c560…29c6f4 (1, 529) Dummy {f00=0x0110, f01=0x0190, f02=» @ P @ @ P @ Q A $ @ A " T @ W @ A F A $P l @ _2 l $T * 0 P fP _ @ $ & @ @ @ P & @ A 9 Y *>a Y j c A A " & A
0x29c6f4…29c888 Dummy {f00=0x0110, f01=0x0190, f02=» @ ! T A @ A # A $ RE bRN cME nMN o W R, ( T ( W P T $ ; V ; W~&~ P &`P 6 P @ $ P $W $ TR PJ#~ > V . >A P Y X W ^ ? ? @ ' P Y Y W
0x29c888…29ca1c Dummy {f00=0x0110, f01=0x0190, f02=» @ 9J A T _ 1@ _ ^ 9 V >! D A A > > > > > > > > ^ _ ^ _ ? ? ? ? ? A D ^ @ ? ? | > > > > > > > @ " > ? ? ? ? ? ? ? A > A > A A
0x29ca1c…29cbb0 Dummy {f00=0x0110, f01=0x0190, f02=» _* A F " A p A r T A r A p " R _U . " A : A " A A $ T ! " A @ T 0W 0W A @ T 1W 1 @ j " A F A j P6R :UT @ W( 9D) 9 I J9 ^ @ JW ? < H
0x29cbb0…29cd44 Dummy {f00=0x0110, f01=0x0190, f02=» ?W /W : A W ! A A PL _ " @ _ I T " T A P I T$! A A A A A A A A A F A @ A @ > " @ _ $ I &R> M A P6 T @ T. @ P A W ` @ @ P @ T
0x29cd44…29ced8 Dummy {f00=0x0110, f01=0x0190, f02=» P Y U ( ) 5 & > > [ [ Z Z Z ? Z > A _ @ > > U # T @ 8 H ( ( P c P W6 A V ( U P @ HV L H U " #P > A A Q ? > ? @
0x29ced8…29d06c Dummy {f00=0x0110, f01=0x0190, f02=» A _0 8 Q Z P 0 9 _ _, ? _ P H H ? ? ? ? ? ^ A _ _ ^ $P T I R $ 5 % > ? W ? W ? T T U T U U " > > 4 T - 1_( U T
0x29d06c…29d200 Dummy {f00=0x0110, f01=0x0190, f02=» ? @ 8 R Y P _ W0 8 X W( ? ` @ @ P $ H W W > > > > > > @ nV ? n > _ > ? _ > > ? ^ ! Y ^ _ ? A. $ ( , 0 4 8 < #M 1 :
0x29d200…29d394 (1, 530) Dummy {f00=0x0111, f01=0x0190, f02=» XJ XF Y @ P R T X 0P Xh I Y T # C C W4 O " # X Y ) C C x # P Y '? Y Y T # P W " Y P R R P T P (@ (@ " 2 @ _ > X $?
0x29d394…29d528 Dummy {f00=0x0111, f01=0x0190, f02=»! P C > C > F 8D D ! 9b8d9D # C > B R Q~ P0 B P* 0$ T # R QL > X B U( H Q2 X D B $ T C x > C $ ) _ X 9BV X 0 X D C > X H UJ H B P PL $
0x29d528…29d6bc Dummy {f00=0x0111, f01=0x0190, f02=» > ? _ X T (@ ^ > > ? _ X T (@ X L U L Q4 M X L P ( L ) 1_f _& ?(@ X P 4 Y " X 1 1 X P - M T $ PJ _ T " # p X L R P P P (@
0x29d6bc…29d850 Dummy {f00=0x0111, f01=0x0190, f02=» _ T M D W2 D D " T X X - U _ 9B X T u X > & * J v l P d > ) j $ C K
0x29d850…29d9e4 Dummy {f00=0x0111, f01=0x0190, f02=»
[…0x2…]
0x29dd0c…29dea0 Dummy {f00=0x0111, f01=0x0190, f02=» , C K SO LO $GR 0
0x29dea0…29e034 (1, 531) Dummy {f00=0x0111, f01=0x0190, f02=»
[…0x2…]
0x29e35c…29e4f0 Dummy {f00=0x0111, f01=0x0190, f02=» ($ (, (4 @(H A(H ( ( ( ( ) ( )@( (l(p(l(p(|(l( ? X *P / R >W > Y + Y Y * P W Y *(@ 4(@ .f X ! P ! T X * /<T X # P X
0x29e4f0…29e684 Dummy {f00=0x0111, f01=0x0190, f02=» * (@ ? X *P, / T P > T X " T2(@ 4 / Y * > X P Y X " 2(@ .f X * /<T - Y T (@ X * U B U @ A X T @" P . W . . Q U ; U 5 U < P U > /<T@ . T> + T" X $ P W P
0x29e684…29e818 Dummy {f00=0x0111, f01=0x0190, f02=» - U T H U T D&? U " z P .: " - / + T H U T L T E $ R M% L% P .: L% U " .: + U " + U " +X U " T / + T X ("? / T K' T R U " %4 U " + / Y * ' 0^ + 0^ Y H +
0x29e818…29e9ac Dummy {f00=0x0111, f01=0x0190, f02=». U Q T N Q Q U " + .NX| U " / Y , X " + Y - (@ 0J U B U @ . @ U 5 Q U ; U < U > X " P4 /LT. . T, X " P Y # 'F % 0" &$ + U 0^ + @ T A * F > A R D tX * _ ?(@ U U U
0x29e9ac…29eb40 Dummy {f00=0x0111, f01=0x0190, f02=» z R .NX Y , Y Y * Y _"_B T P 1W * d U U U U U 6 U 4 U @ $ . T U T U - T U 6:A U T T ( U B U 4 U @ U > U . Tz + Tr T U U T V U U ! RL t z Z - ; M r U 4 U <
0x29eb40…29ecd4 (1, 532) Dummy {f00=0x0111, f01=0x0190, f02=» / . -6(@ @ @ T , T P T T U - T P T /hP W T P" ^ /hP 0^ &$ T T h /h - ; r t z , RN .NX Y , X Y " P # 'F % X 0^ - 0" &$_R U + ; r
0x29ecd4…29ee68 Dummy {f00=0x0111, f01=0x0190, f02=»0^ + - U @ U B X U > U 4 . + T T T T U > > > P - 0R + 0^ > > @ @ T T U S .: U ? T T U > > ? t > > X % =A 8 P T t > X , :i9eW X
0x29ee68…29effc Dummy {f00=0x0111, f01=0x0190, f02=» X )"? Q > ? P& ? T ; r - ,T - U > > > ? X # T W ? X (#?; L r > ! > > > 0p _ Q Q " Q > ? P 0 > > P P R$ Q (" W P P V Q % W > T NQ< T R L $ T( L $ T " P W #
0x29effc…29f190 Dummy {f00=0x0111, f01=0x0190, f02=» ? 0 ] > > ? 1 ] > > ? W ? ;a<a Q ;A<A ) _ ;A<A ) > >DHBB 181 ? X $P % Y $ X " T 5 @[b T A[b A[d 4 Z " 4 1n4 4. 3 !1r "1 '2r /3$ 3j 83 93 -3 B H1
0x29f190…29f324 Dummy {f00=0x0111, f01=0x0190, f02=»4 4 ] "P( R^ X ] " 5b Y 2 P X Z& _. P 1 != != B = ] @[ P a[ A[ ] ] 4 B 4 4 X 2 4 Z C B P Y B Y V Y Y 4 D P Y C "T ] "W H I Y Y Y 2
0x29f324…29f4b8 Dummy {f00=0x0111, f01=0x0190, f02=»4 B T X 2:D :D :D C 4 4 X 2 4 X * 4 B ! P 5 W B ! T X ! P 5 Y 4 4 B Y " 4 X 2 4 4 4 X " P 4 5b B 4 4 5t X 2 4 4 X *T 4 4 W, P C X P x C 0
0x29f4b8…29f64c Dummy {f00=0x0111, f01=0x0190, f02=»6 W> Y $W6 X "Z X A5 5 Y $_. Y $ 5 @[b T A[d A[b 4 X $P y $ Y $ 6 ? (P 0 ) 6 ? (P _ ) 1_ * $X 0 % 5N_ [ ( (P _ ) 1_@ [ ( (XL P _ 0 )_Z @ Y [~ &_: @ Y [~ &_6 * (P _ ) 1 4 A5 A5 A5 A
0x29f64c…29f7e0 Dummy {f00=0x0111, f01=0x0190, f02=» A[ 1 Z != @[dP !< !6H 6 @[ P % A[ 4 6 1 != != Z ] 1 != != ] " P ] 68 6 1 A[p A[r != !> T. 4 7 7. 7( 8 8~ : :L : A[j 1 != !> @[ T " != _Z !> ] P = $ !> x !> > !> F !
0x29f7e0…29f974 (1, 533) Dummy {f00=0x0111, f01=0x0190, f02=»6 @[ T !< _ ( T 5 _ [t A[b Q C B B A[v A[x A[z A[h A[j !<> !6H A[d_ !: T Z @[d X @ P !; 6 # T X ! P !< _ @? T !; _" !: A[| !; _2 !6| A[l @[dP @[bP !; A[d A[f 6 !6| @[fP @? 7 !;N T> A[j !< 6 @[dP @? P @
0x29f974…29fb08 Dummy {f00=0x0111, f01=0x0190, f02=» X R. X P T" P C X P x C 5* P " H P" P X * Y X V !5 W* X T X *P W !5 X T X ! P !; W !; 6 A[f @[` X 0 A[l A[b A[n 8 !6| @[dT @[fP !< 6 !6| @[dT @[fX W` @[b @[j 7 @[| @[v A[z 8 !6|
0x29fb08…29fc9c Dummy {f00=0x0111, f01=0x0190, f02=» 5 A[j A[d X ! XD Y _N "P -P L _ 4 A[f A[z H P E A[j A[` 4 @[bP* X R$ X " T X *P 5* 5 A[d A[b 4 @? @[jT @[| A[z @[z A[| A[j !> T8 P: PN PP P P4 ( 1 A[z @[z ]: _> P _F @? @[z E !
0x29fc9c…29fe30 Dummy {f00=0x0111, f01=0x0190, f02=» != 4 != !> @[v @[z A[| @[zT* < !> @[b ( !> @[lP - !> x . !Z W 0 " @[lPL R ~T }T T0 W, !> P " ! " :A *@ H P T 0 !> W R !> A[z @[x @[zUH Zx Q P Q T 0 !> A[z 0 !> A[z !> " !> " !> <,
0x29fe30…29ffc4 Dummy {f00=0x0111, f01=0x0190, f02=» !> 4 @ T != A[ 2B 4B A[ J P 4 @ T B 4B J 4 A ? 5 J T0 A[pT 2P @[fP !? H P A[ A[ ] 4 !>D 6 A ? 5 4J "#T @[ P6R" 2B W," P @[ P"W ] " P 7 " P 5 > 5 " P 1 P A[ 4 A[rP T !> W "
0x29ffc4…2a0158 Dummy {f00=0x0111, f01=0x0190, f02=»?R A?V <a :a# P 4 A[p !> @?N !> A[p @?N:H T 4? H
0x2a0158…2a02ec Dummy {f00=0x0111, f01=0x0190, f02=»
[…0x1…]
0x2a0480…2a0614 (1, 534) Dummy {f00=0x0112, f01=0x0190, f02=»
[…0xe…]
0x2a1c2c…2a1dc0 Dummy {f00=0x0112, f01=0x0190, f02=» :f"? HZ !>
0x2a1dc0…2a1f54 (1, 536) Dummy {f00=0x0119, f01=0x0190, f02=» [ T 1 Wd B B PX P P Y A xW< V - 0 P A # +T W Q P P 1 ! 2 T V C
0x2a1f54…2a20e8 Dummy {f00=0x0119, f01=0x0190, f02=» R z A xB > > > ![[RJP ! T &W !]]T8 "W % A A x B T$_8 A x @ B T _J A x _r_t z A x > > ?I ] X ' B C X 4 [ ]@ ]L
0x2a20e8…2a227c Dummy {f00=0x0119, f01=0x0190, f02=» DHBB ^ ^~l X $P % Y $ X " T b @ T A A a `" b ^ a a a^ !^ "_L '_ /` ` 8a" 9aR -aN B H^ _ _ ^ _ P> b ]
0x2a227c…2a2410 Dummy {f00=0x0119, f01=0x0190, f02=» R^ X ] " b Y 2 P X Z& _. P ^| !kH !k` B = ] @ P a A ] ] b B a b X 2 b C B P Y B Y V Y Y a D P Y C "T ] "W H I Y Y Y 2 Y " X P B T
0x2a2410…2a25a4 Dummy {f00=0x0119, f01=0x0190, f02=» :D C b b X 2 b X * b B ! P c W B ! T X ! P c Y b a B Y " b X 2 b b b X " P a b B b bd b X 2 b b X *T b b8W, P C X P x C 0P Y *
0x2a25a4…2a2738 Dummy {f00=0x0119, f01=0x0190, f02=» "Z X Abx b Y $_. Y $ b @ T A A b X $P y $ Y $ c l (P 0 ) c l (P _ ) 1_ * $X 0 % b _ ( (P _ ) 1_@ ( (XL P _ 0 )_Z @ Y &_: @ Y &_6 * (P _ ) 1 4 Acj Acn Acr Acv Acz c~W
0x2a2738…2a28cc Dummy {f00=0x0119, f01=0x0190, f02=» P !i !c dH @ P % A 4 d ^| !k2 !kH ` ] ^| !k2 !kH ] " P ] c dH ^| A A !k2 !lLT. b d|d d f e gz g g A ^| !k2 !l< @ T " !kH_Z !lL ] P = $ !lL x !lL > !lL F !kH A P "P,
0x2a28cc…2a2a60 Dummy {f00=0x0119, f01=0x0190, f02=»T b _ A C B B A A A A A !i !c A _ !hR T ` @ X @ P !ij dH# T X ! P !ix_ @l T !if_" !hn A !iX_2 !c A @ P @ P !h A A dH !c @ P @l d !h T> A !ix dH @ P @l P @ d 8 !hn !h A
0x2a2a60…2a2bf4 (1, 537) Dummy {f00=0x011a, f01=0x0190, f02=» P C X P x C b P " H P" P X * Y X V !c:W* X T X *P W !c: X T X ! P !ifW !iX dH A @ X 0 A A A e| !c @ T @ P !i dH !c @ T @ X W` @ @ e6 @ @ A e !c @ T _> !l< T @
0x2a2bf4…2a2d88 Dummy {f00=0x011a, f01=0x0190, f02=» Y _N "P -P L _ 4 A A H P E A A 4 @ P* X R$ X " T X *P b b A A 4 @l @ T @ A @ A A !lLT8 P: PN PP P P4 ( 1 A @ ]: _> P _F @l @ E !l P !kH 4 _"
0x2a2d88…2a2f1c Dummy {f00=0x011a, f01=0x0190, f02=» @ A @ T* < !lJ @ ( !lJ @ P - !lJ x . ! W 0 " @ PL R ~T }T T0 W, !lJ P " ! " :A *@ H P T 0 !lJ W R !lJ A @ @ UH Zx Q P Q T 0 !lJ A 0 !lJ A !lJ " !l4 " !l4 i A _" A A !k
0x2a2f1c…2a30b0 Dummy {f00=0x011a, f01=0x0190, f02=» !kH A 2B 4B A J P 4 @ T B 4B J 4 A ? chJ"T0 A T 2P @ P !l H P A A ] 4 !k dH A ? ch 4J "#T @ P6R" 2B W," P @ P"W ] " P d " P cN l ch " P 1 P A 4 A P T !lD W " P H PB2P !l cN
0x2a30b0…2a3244 Dummy {f00=0x011a, f01=0x0190, f02=»P 4 A !l< @l !l< A @l :H T 4l u
0x2a3244…2a33d8 Dummy {f00=0x011a, f01=0x0190, f02=»
[…0x2…]
0x2a3700…2a3894 (1, 538) Dummy {f00=0x011b, f01=0x0190, f02=»
[…0xd…]
0x2a4d18…2a4eac Dummy {f00=0x011b, f01=0x0190, f02=» :f"? H !lJ "? H !lJ 4 ABCDEFG
0x2a4eac…2a5040 Dummy {f00=0x011b, f01=0x0190, f02=» P "R Y < Pp " T T Pb <UR "R4 PB X R< X T6 X T0. T G Y6 G _f P ,P -
0x2a5040…2a51d4 (1, 540) Dummy {f00=0x011b, f01=0x0190, f02=»_V B P _ _ ? W ? W ?W ? _ B B ? ' V& T _ _P Z 8 ) _ ?W ? _ 8 T 0 9Xz Y _~ ?W ? _*" /] Z 8_ B X .R $ # ;D !99P 7P Pt Y 6 X 8T " Y 8 X 6 Y . X .P Y 0
0x2a51d4…2a5368 Dummy {f00=0x011b, f01=0x0190, f02=» 0 X .$ ( P B V *@; V * ; V * Y . ! XT X .R $ P _B ! jT 9 R 9 W 9 _ Y ! F X 0_~ < Y 4 ! FT P P, P J & ! j ! XT X 0 C @ | U8 ! XTF & Y 4 X 4Y | U ! jT$ ! FT Y 4_@
0x2a5368…2a54fc Dummy {f00=0x011b, f01=0x0190, f02=» R _Q| B X / X 0$ %T Y 3V B V _ X 0 X /! R" Y /; ! ;h X /$ X 0 ! _p ! X & & ] B H " _ _ PJ P P8 P8 P4 P0 P, C _ | B U Z _Y ! B WJ ._r ! XTF | |" $ P X 1 X /
0x2a54fc…2a5690 Dummy {f00=0x011b, f01=0x0190, f02=» :h Y 2U X 2 ! X 4 B ! @ V X BT X 4P Y 4 ! j WT X BTN VF X 4P R Y 4 ! jT ! FT Pf P Y 4 ! XTf & P ! jTX Y 4 | X /# X ! jTB ! FT: Y / X 0 Y 3R Y, ! XT ! XT _P ! jT ! F X /# Xj X 0 !
0x2a5690…2a5824 Dummy {f00=0x011b, f01=0x0190, f02=» " @ X 0 ! X ' X /" Y 0 Y / > X / X 0" Y 3Q Y / > Y B X Y @ > Y ! F Y B X . P ! X ! X *0 ! X ! X ! j Y 0 Y / X @ Y X :
0x2a5824…2a59b8 Dummy {f00=0x011b, f01=0x0190, f02=»
[…0x4…]
0x2a6008…2a619c Dummy {f00=0x011b, f01=0x0190, f02=» ( ( 7 Z& ( P H R H P ' Pt Tt ' P B ]` F U F ]n P U W. C G H L C X L G B G 9 @_ Xt X X R A Y X T P (P H U ^ 9 1 X T @ P ( A >_ ( Y
0x2a619c…2a6330 Dummy {f00=0x011b, f01=0x0190, f02=» - )W ) $P e % > ABCDEFGHI#.<(+!&JKLMNOPQR$]*);^-/STUVWXYZ@,%_>? 123456789:[ '=" abcdefghi[.<(+!&jklmnopqr]$*);^-/stuvwxyz|,%_>?0123456789:#@'=" ABCDEFGHI[.<(+!&JKLMNOPQR]$*);^ /STUVWXYZ|,%_>?
0x2a6330…2a64c4 Dummy {f00=0x011b, f01=0x0190, f02=» TOSS %B%B % % &>&> &|&| + + X ! 9 D W~ X ! 9 D Wl X ! 9 D WZ X ! 9 D WH B U B (" W C (@ > Y > X ! 9
0x2a64c4…2a6658 Dummy {f00=0x011b, f01=0x0190, f02=» X P X( H_. ?(@ " X '? X D X T ? P >A D V 8P X ?!W > >?A P >A D V 8P X V 8W ?a > T < _ ? ^ 4 _
0x2a6658…2a67ec Dummy {f00=0x011b, f01=0x0190, f02=» - _H "Rf P^ X TX X PJ X RD< V X 0 X L T P* X P Y 9 C " < ? < ? <(@ $ P B $ 9H C ">h # P >_2 < U = (@ " $ P B >H<h P ?_" = > = > =
0x2a67ec…2a6980 Dummy {f00=0x011b, f01=0x0190, f02=»0123456789 - ' < +,-. 0123456789 'ABCDEFGHIJKLMNOPQRSTUVWXYZ []^ 0123456789 - * > ?;_: =!"#$%&/() @ABCDEFGHIJKLMNOPQRSTUVWXYZ []^ ^ T Y . X C
0x2a6980…2a6b14 (1, 542) Dummy {f00=0x011c, f01=0x0190, f02=» V B % X < $ 4 T %(@ V X :P" Y < X :P Y .(@W Y ._ ! 4(@" ! 9 Y . XV VP Rz P P 9 _ X 2 v Y 2W X 2 X Y 2 Rv p< R <A<a C W X 2X P P P P _ Y 4W Y 4 X 2 X 6P X 4 $P <c
0x2a6b14…2a6ca8 Dummy {f00=0x011c, f01=0x0190, f02=» Q > ! B W8 > ! B T ! X^ D * < @ C " X : $4 P X <Tt 1 pRr p Y / X : X <P 1 WL X : X <P $$ P< T W Z %W, X /$ X : ^ Y . $ ! P % " _L Y : 1 4 B % > HT
0x2a6ca8…2a6e3c Dummy {f00=0x011c, f01=0x0190, f02=» :_( X < X 0 P L X " [000b [000e [00t [00q 8 [00w [00v c [5n $$ X " X /# Y / P Y M P ^ L , 8 D D ! n ! ! F ~ | P ! X ~ P _ ! j ~_, ! j ~ ! !
0x2a6e3c…2a6fd0 Dummy {f00=0x011c, f01=0x0190, f02=» > Y G Y I ! F ~ X JPN ! X ~ G ! W6 ! X ~ ! X ~W ! X ~W ! n +XR X RT _ Y R | Q P ! X ~ ! j ~ ! W6 Z* _R /P C _: . ! X ~ X " T Y J_T Y L_Z Y R ! n B <hP. Y P Y 6 ! F ~ 6 ! ! j
0x2a6fd0…2a7164 Dummy {f00=0x011c, f01=0x0190, f02=» ! 0 ! > Y 8 ! j ~ Y : Y . X Y ? ! F ~ ! X ~ [ ! X ~ 5 ! X ~ n ! X ~ ! j ~ 0 X " T A A ( ! 4" ! P 0 : P Y ? _$ X ? X 0P y 0 Y 0 4 dR d R _ 00,0: " 4 X . P
0x2a7164…2a72f8 Dummy {f00=0x011c, f01=0x0190, f02=» 412151824253033353648505160667072010203040506070809101111131415 A A A A A A | - M D @ " A. UU @>B @ A @ D E D E P _( W l V l W l V lP 8 A A
0x2a72f8…2a748c Dummy {f00=0x011c, f01=0x0190, f02=» @ @ E E E E E A & E @ F CRP <A COP <A BAP AS<A E ASP @ T 8 A ASP F @ U A AS V P 8 F V ;j 0 Y P F P @ P - 0P _ :L E A W 0 F D
0x2a748c…2a7620 Dummy {f00=0x011c, f01=0x0190, f02=» 8 P :L AST A A E E A A 8 P W 89B @ V W Zb A @ @ A A @ D AS l @ l A W l @ L @ P _ @ ! P0 9h !RRP @ @ l A _H 8
0x2a7620…2a77b4 (1, 543) Dummy {f00=0x011c, f01=0x0190, f02=» l 9b ) V l_ @ A l A A A E @ < V4 @ R, U L 8 !RRT A " @ Pf A A @ > V T P T ;a=a?j V Y R W ?J E =A;A E L : H
0x2a77b4…2a7948 Dummy {f00=0x011c, f01=0x0190, f02=» A A r . 8 @ 00P& P _0 @ 00P _ 0 !TTX A | !CCT CC A < 8_ 0 !;; f !AAP !DDT @ @ r A 0_ ; #
0x2a7948…2a7adc Dummy {f00=0x011c, f01=0x0190, f02=»T > @ R d @ ! T @ >A @ r @ @ I A p P A r @ p A p @ P @ A @ r T $ ) @ 0 !;;P P @ P@ _ P !;;T X$ A P T . : 8 . : 0 !TT f 0 !
0x2a7adc…2a7c70 Dummy {f00=0x011c, f01=0x0190, f02=» !ZZU !AAR !ZZQ 0 !;;T : J : N : R : V : : ` : 0 )TV : !00T A : 0 !99Q0 !00R*P P =H_ :TID=TCL=LEV=TDC=T0LC=0SDC=S0 8A I. : A 4 A : " Q :d @ # R$P R.W 8* A W 8
0x2a7c70…2a7e04 Dummy {f00=0x011c, f01=0x0190, f02=» F 0 A : A A : @ @ ! P V :AW 9E R _ <e @ $ T 9A $ < :B 9A) @ :P A : A I Td W 9D @ @ 6r s @ 4A I T - A _ I N T( P W A W A @ V S : 8 . 9PN S Y
0x2a7e04…2a7f98 Dummy {f00=0x011c, f01=0x0190, f02=»9 H > A _ !SSTF 0 U H J X X A t A v X X S W A x A z A : 6 V W, Q( T W& @ T R P @ T A F R U @ A p T : A _ 0V , - P X 9A
0x2a7f98…2a812c Dummy {f00=0x011c, f01=0x0190, f02=» | ` | P A : f T . 0 !;;P 0 !;; f f - a | =! 0 - Y : . 8 0 ! P P Y f_0 L Q f P Y P Y A V : , %T 8 P , ! P : .
0x2a812c…2a82c0 Dummy {f00=0x011c, f01=0x0190, f02=» ] 4 Y 5 X * _6 : @ % @ @ D F R6 r . !TTP 8 f Y 8 !TTX _: : ` @ A P _ @ @ 3 S S @ ~ V A ~
0x2a82c0…2a8454 (1, 544) Dummy {f00=0x011c, f01=0x0190, f02=»T N =H N A N =H N A , @ %!5!T W @ = V W = V v P0 " U 8 _2 P0 " U 8 _2 @ P V 8
0x2a8454…2a85e8 Dummy {f00=0x011c, f01=0x0190, f02=» !TTT @ P @ @ a : H l T ` @ W H A h J AS BAT :a A K @ ;C W @ " P " J ;C U 8 BAT8 @ @ A @ ) @ P S _ S A @
0x2a85e8…2a877c Dummy {f00=0x011c, f01=0x0190, f02=» U 8 3 S S S _p P " I _ @ P L : l A A H f A * v P _ Pd A @ 8 8 4 D P$ @ # P H I K T + Y@ @
0x2a877c…2a8910 Dummy {f00=0x011c, f01=0x0190, f02=» A @ @ < F !AAT T B YP G 9h G G @ P A _l @ A @ Y 8 !TTX Y : l 8 !TTX !CCTr f P, @ 4 U 8 $ $ _. P, @ 4
0x2a8910…2a8aa4 Dummy {f00=0x011c, f01=0x0190, f02=» U 8 . !TTT 8_ !CCP W Y W f P0 A A @ @ < @ _2 ]X @ 8 8 8 4 D P$ @ # P H I K T K YB _b @ @ @ % P @ 4 4 4 _r
0x2a8aa4…2a8c38 Dummy {f00=0x011c, f01=0x0190, f02=» 8 < A A A @ 0 PV @ P P 0 _ P H (&? @ #? H & D # * H D > b @ D @ @ ) I ( D #@PV D L Tp D 0P @ ` T @ 1 Q a > I : I < D .# P6 W( bW" D V ` T
0x2a8c38…2a8dcc Dummy {f00=0x011c, f01=0x0190, f02=» P @ : ` P: @ @ @ D (P W H $ I 0 % E , a : @ Q A % @ B A A A A V @ @ P A @ E $ A Q _8 B A A A A V @ @ P A @ E , A
0x2a8dcc…2a8f60 Dummy {f00=0x011c, f01=0x0190, f02=» ;D &`>e : 8 8 8 P< r A f R A @ _ S : 0 N N !TTP 9H N A f A & N 9H N A R P N !AAT N A " R P !SST f A $ U 8
0x2a8f60…2a90f4 (1, 545) Dummy {f00=0x011d, f01=0x0190, f02=»T" f A $ P Y (9A :_ : @ " 9a @ $ 3 V 8 : @ 9 @ 9 9@ @ " :HP @ U W 9 9@ @ $P$ @ ( ;A 9@T 9 9@ 9 : P P 9@T 9 9@ _*
0x2a90f4…2a9288 Dummy {f00=0x011d, f01=0x0190, f02=»_H : P AAT : N =H N : N =H N : &=H F : F =H F : ? ? v > > : P N =H N T f 8_ : @ ! P (W ( : @ 0 P 0 _ @ Q @ P P$_ @ A P A P _ 8 Q @ Q 1
0x2a9288…2a941c Dummy {f00=0x011d, f01=0x0190, f02=» @ 2T P _ / : .P W P A .X @ P T :D * J TT J & P T .& >aW T (& P T &@P @ 9 A J ] W @ 9 A P _d @ 8P 0P _ 1 _ @ 8P 9 _ (T P _ 3
0x2a941c…2a95b0 Dummy {f00=0x011d, f01=0x0190, f02=» ;A P 5 _ ` R - _ : @ D A F A r : @ A P @ A @ @ : . ! T 8 ! . : R 8 Y P : H H 4 4 b ) @ A R A V A
0x2a95b0…2a9744 Dummy {f00=0x011d, f01=0x0190, f02=» 8 - @ R - $ N !TTP 8 N :H N TBT K W8 2 " T @ 8 X 2 N =H N @ R ) 8 !TTXX !CCT < !UUT j @ R K (9A A R > @ v 2 .:H N R P V 8 _ N R :h$ v
0x2a9744…2a98d8 Dummy {f00=0x011d, f01=0x0190, f02=» p A & A @ CR @ D G " F * E H K @ & " A ( J (P6 " 4X 1 R Z0 . . _ k k :A K J 4 P . . _ K K 8 @ @ R @ : @ D D
0x2a98d8…2a9a6c Dummy {f00=0x011d, f01=0x0190, f02=» @ & >k l 8 A A 6 Q R 8 V 8 ;k , @ 6T A , @ 8P( U U A , K l A A J @ & A @ d 9k! P % _ @ @ A A A
0x2a9a6c…2a9c00 Dummy {f00=0x011d, f01=0x0190, f02=» (P0 @ R P L _ A N R X4 L _ J PJ | I H I $ @ < D ` E , D H C ` J j A X A N (Pn @ X A X % @ R , | " E R 0 A N R 0 R P
0x2a9c00…2a9d94 (1, 546) Dummy {f00=0x011d, f01=0x0190, f02=» E R R T E D E @ < H ` H ` E < #_ A * @ & 9k l $ A A J ` ( ` A ( J $ K d J J V V (P V j $ $ A 1 I $ I H ) P _ " = D
0x2a9d94…2a9f28 Dummy {f00=0x011d, f01=0x0190, f02=» &X ' $ @ < H T H _4 A L A * @ ,T2 @ A 6 @ A 8 @ @ :B A @ 9n A f @ @ ,P J V @ 8 A @ 6 A A , K : @ "<B A T *P ` P ` : $ | @ *P ` a P ` : @ P $ @ @ $ | @ P
0x2a9f28…2aa0bc Dummy {f00=0x011d, f01=0x0190, f02=» L ` 4 _j @ 0 4 : A . R R P A J _ @ . : " D PH A . @ .P. D X D P H E _( | E _6 " D T E | E D E % : 4 " R ;B 4 | " R P< *P `
0x2aa0bc…2aa250 Dummy {f00=0x011d, f01=0x0190, f02=» @ : 4P: " D , H H $ M j - I Y0 : @ : R 2 A B @ (T : N @ @ A Z H @ "]" T 2 . BT" A H A B @ NP A J d . Z ._v J , V 8 P _ N L % J
0x2aa250…2aa3e4 Dummy {f00=0x011d, f01=0x0190, f02=» @ H % : @ WN B W @ > " B ; Z [ : : [ [ : A Z A. c ? : > : R $ )_ : H A A A
0x2aa3e4…2aa578 Dummy {f00=0x011d, f01=0x0190, f02=» J P V U _ V Z K A A :K A Q R V 8 d @ P . L @ ` : V W V 8 ) : V W @ : A ; @ : : ,
0x2aa578…2aa70c Dummy {f00=0x011d, f01=0x0190, f02=»9a_ @ @ 1 R U W 9a P _" : P _ : @ | ` |U WP L P _ @ P _" l 0 W r P . ! A . @ : ;h 0 :C # : .=H N .=H N
0x2aa70c…2aa8a0 Dummy {f00=0x011d, f01=0x0190, f02=» ) ` : R @ @ ! @ P P P P _ _ @ @ :b @ :b V W U4 T 9BW P P( X V W Y P @ Q @ P A. @ @ P _l A 9n A :B A @ | <
0x2aa8a0…2aaa34 (1, 547) Dummy {f00=0x011d, f01=0x0190, f02=» T ] ] W 9l ] 9A ] 9k! ] Y P: P4 S @ P 3 _ 3 | Z A. @ @ W A h : A $ ) _ > N d n | : @
0x2aaa34…2aabc8 Dummy {f00=0x011d, f01=0x0190, f02=» , B0 DC , @ r KB 0 x x F DI
0x2aabc8…2aad5c Dummy {f00=0x011d, f01=0x0190, f02=» ` GP @ r KB 0 F DI L ?O_o
0x2aad5c…2aaef0 Dummy {f00=0x011d, f01=0x0190, f02=» P
0x2aaef0…2ab084 Dummy {f00=0x011d, f01=0x2008, f02=» j
0x2ab084…2ab218 Dummy {f00=0x011d, f01=0x0190, f02=» PTOUTRE EQU * k P LDR A6,A1 FETCH DWT k P CM DWTRTP,A6 k 4 * P RF TIMOUT COMPLETE REQUEST RC=TIMEOUT k J P* k x P* k " P* RETURN FROM TIMER HANDLING k P* k P EJECT k P* k P* SEND TIMER=TIMWR k P* k PTIMEWR LDR A1,A6
0x2ab218…2ab3ac Dummy {f00=0x011d, f01=0x018e, f02=»A2,TIMWR k P CF A15,SETIME l P DATA TOUTWR l & PTIMWR DATA 0 l : P ST A4,DWTRTP,A6 l N P RB TIMRTN l f P* l x P* TIMEOUT WRITE TIMER l P* l PTOUTWR EQU * l P LDR A6,A1 FETCH DWT l P CM DWTRTP,A6 l * P CF A15,REMOVW REMOVE FR
0x2ab3ac…2ab540 Dummy {f00=0x011d, f01=0x0190, f02=» l P CWR A2,A6 m * P RF(NE) TIMOUT THIS DWT IS NOT WRITING m ( P CM XACK INDICATE 'ACK NOT EXPECTED' m H P CM FDWTUT m t PTIMOUT EQU * m , P ABL RTTIME COMPLETE REQUEST RC=TIMEOUT m P EJECT m P* m P* m P* STOP REQUEST TIMING m
0x2ab540…2ab6d4 (1, 548) Opaque[0x194]
0x2ab6d4…2ab868 # DirEnt {nam=»XCLASS«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x19c0, f03=0x0000}
0x2ab6d4…2ab868 IdxSect {
0x2ab6d4…2ab868 f00 = 0x00ce // 0x2ab6d4 @0x0
0x2ab6d4…2ab868 f01 = 0x0002 // 0x2ab6d6 @0x2
0x2ab6d4…2ab868 gno = [ // 0x2ab6d8 @0x4
0x2ab6d4…2ab868 [0x00]: C0x00ce.0x0.0
0x2ab6d4…2ab868 ]
0x2ab6d4…2ab868 }
0x2ab868…2ab9fc Dummy {f00=0x00ce, f01=0x0190, f02=» 4 P IDENT SCLASS REL 11.0 DK 82-04-14 870105041100 P < P* D P* N P ENTRY SCLASS X P* n P* x P EXTRN DWII01 P EXTRN DWIO01 P EXTRN DW1501 P EXTRN DW2501 P EXTRN DWLP01
0x2ab9fc…2abb90 Dummy {f00=0x00ce, f01=0x0190, f02=»LASE EQU * PTC00 DATA TC00E-* P DATA /0050 4 P DATA DWII01 T P DATA /0051 t P DATA DWIO01 P DATA /0061 P DATA DW1501 P DATA /0062 P
0x2abb90…2abd24 Dummy {f00=0x00ce, f01=0x4022, f02=»QU * P END @ TC00E-* P DATA /0050 4 P DATA DWII01 T P DATA /0051 t P DATA DWIO01 P DATA /0061 P DATA DW1501 P DATA /0062 P
0x2abd24…2abeb8 Dummy {f00=0x00ce, f01=0x2008, f02=» NT TCLASS * * $ * . ENTRY TCLASS 8 * N * X * b * l * v * * TCLASS DATALTCLASE-* TCLASE EQU * END @ 1 INTLT2 INTRT1
0x2abeb8…2ac04c Dummy {f00=0x00ce, f01=0x018e, f02=»K BASE 2 IN DWT ~ * P EXTRN INTSAV SAVE AREA LAST INTERRUPT * P EXTRN PFPOST PWF POST PROCESSING FLAG F P EJECT DRLP01 t P* P* " P***************************** " P* CONSTANTS * " P****************************
0x2ac04c…2ac1e0 Dummy {f00=0x00ce, f01=0x0190, f02=» P* . P***************************************** P* @ P* CONDITIONAL ASSEMBLY J P* h . P***************************************** r P* 0 P* IF X:A=0 THE DRIVER WILL ONLY SERVE MUX =1 8 P* IF X:A=1 THE DRIVER WILL SERVE BOTH
0x2ac1e0…2ac374 (1, 549) Opaque[0x194]
0x2ac374…2ac508 # DirEnt {nam=»UPD «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x21d0, f03=0x0000}
0x2ac374…2ac508 IdxSect {
0x2ac374…2ac508 f00 = 0x010e // 0x2ac374 @0x0
0x2ac374…2ac508 f01 = 0x0002 // 0x2ac376 @0x2
0x2ac374…2ac508 gno = [ // 0x2ac378 @0x4
0x2ac374…2ac508 [0x00]: C0x010e.0x2.0
0x2ac374…2ac508 ]
0x2ac374…2ac508 }
0x2ac508…2ac69c Dummy {f00=0x010e, f01=0x0078, f02=» BEA DRGP02 KPF /O SCR $ BEA DRDC15 0 KPF /O B SCR P ASG /E0,TY10 END p
0x2ac69c…2ac830 Dummy {f00=0x010e, f01=0x2008, f02=» DRGP02 KPF /O SCR $ BEA DRDC15 0 KPF /O B SCR P ASG /E0,TY10 END p
0x2ac830…2ac9c4 Dummy {f00=0x010e, f01=0x0190, f02=» PICIN20 EQU * : P XIF : P IFT COPCMD=1 : $ P LD A2,ECBCW,A8 GET TO WHOM : : P LD A8,ECBICW,A11 : ^ P CF A14,ICSET SET TIMEOUT : x P LDR A1,A2 : P LDKL A2,LBVDU+/20 LENGTH : P CF A14,ICWRT SEND IT AWAY : ( P LDKL A1,HCPMOD HARDCOPY
0x2ac9c4…2acb58 Dummy {f00=0x010e, f01=0x0190, f02=»NG : h P IFT SNA=1 ; P XRS A1,SNAMOD,A11 ; P XIF ; 6 P IFF SNA=1 ; B P XRS A1,BSCMOD,A11 ; T P XIF ; n P ANK A2,1 PRINTER OK? ; z P RF(Z) ICIN90 YES ; PICIN90 EQU * ; P RTN A14 ; P EJECT ; @ P************************************
0x2acb58…2accec Dummy {f00=0x010e, f01=0x0190, f02=»OUT * ; j > P* * < @ P*********************************************************** < ` P* REGISTERS < P* < P* A2= RESERVED < P* A8= INTERTASK ECB < P* A11= R
0x2accec…2ace80 Dummy {f00=0x010e, f01=0x0190, f02=» LDKL A1,-1 NO TIMEOUT < P ST A1,ECBCW,A8 = P LDK A7,/B9 SET TIMEOUT = 6 P LKM = V P DATA 1 = b P RTN A14 = r P EJECT = B P************************************************************* = B P*
0x2ace80…2adb20 (2, 0) DirGranule ((2, 0)) {
0x2ace80…2adb20 DirEnt {nam=»INT:PR«, typ=»OD«, f00=0x0000, f01=0x0000, f02=0x17a8, f03=0x0000}
0x2ace80…2adb20 DirEnt {nam=»/OBJCT«, typ=»OB«, f00=0x0000, f01=0x0000, f02=0x1b58, f03=0x0000}
0x2ace80…2adb20 }
0x2adb20…2adcb4 (2, 1) Opaque[0x194]
0x2adcb4…2ade48 # DirEnt {nam=»/OBJCT«, typ=»OB«, f00=0x0000, f01=0x0000, f02=0x1b58, f03=0x0000}
0x2adcb4…2ade48 IdxSect {
0x2adcb4…2ade48 f00 = 0x00da // 0x2adcb4 @0x0
0x2adcb4…2ade48 f01 = 0x0032 // 0x2adcb6 @0x2
0x2adcb4…2ade48 gno = [ // 0x2adcb8 @0x4
0x2adcb4…2ade48 [0x00]: C0x00da.0x3.0
0x2adcb4…2ade48 [0x01]: C0x00db.0x0.0
0x2adcb4…2ade48 [0x02]: C0x00db.0x1.0
0x2adcb4…2ade48 [0x03]: C0x00db.0x2.0
0x2adcb4…2ade48 [0x04]: C0x00db.0x3.0
0x2adcb4…2ade48 [0x05]: C0x00dc.0x0.0
0x2adcb4…2ade48 [0x06]: C0x00dc.0x1.0
0x2adcb4…2ade48 [0x07]: C0x00dc.0x2.0
0x2adcb4…2ade48 [0x08]: C0x00dc.0x3.0
0x2adcb4…2ade48 [0x09]: C0x00dd.0x0.0
0x2adcb4…2ade48 [0x0a]: C0x00dd.0x1.0
0x2adcb4…2ade48 [0x0b]: C0x00dd.0x2.0
0x2adcb4…2ade48 [0x0c]: C0x00dd.0x3.0
0x2adcb4…2ade48 [0x0d]: C0x00de.0x0.0
0x2adcb4…2ade48 [0x0e]: C0x00de.0x1.0
0x2adcb4…2ade48 [0x0f]: C0x00de.0x2.0
0x2adcb4…2ade48 [0x10]: C0x00de.0x3.0
0x2adcb4…2ade48 [0x11]: C0x00df.0x3.0
0x2adcb4…2ade48 [0x12]: C0x00e0.0x0.0
0x2adcb4…2ade48 [0x13]: C0x00e0.0x1.0
0x2adcb4…2ade48 [0x14]: C0x00e0.0x2.0
0x2adcb4…2ade48 [0x15]: C0x00e0.0x3.0
0x2adcb4…2ade48 [0x16]: C0x00e1.0x0.0
0x2adcb4…2ade48 [0x17]: C0x00e1.0x1.0
0x2adcb4…2ade48 [0x18]: C0x00e1.0x2.0
0x2adcb4…2ade48 ]
0x2adcb4…2ade48 }
0x2ade48…2adfdc Dummy {f00=0x00da, f01=0x4110, f02=» > @ IDENT FMOVE P,REL=11.0,810128,870136941100 FMOVE F FMOVE V I:EVA0 h I:EVA5 z , ( B & + P I:RT1 _ P (
0x2adfdc…2ae170 Dummy {f00=0x00da, f01=0x40cc, f02=» > @ IDENT TYPET P,REL=11.0,810128,870136941100 TYPET F TYPET V I:EVA0 h I:RT1 z ( $ D ;d # + @ :RT1 RETURN TO INTERPRETER P END @
0x2ae170…2ae304 Dummy {f00=0x00da, f01=0x40fc, f02=» > @ IDENT ICLEAR P,REL=11.0,810128,870136941100 ICLEAR F ICLEAR X I:EVA0 l I:RT1 ~ , ( @ #0 0T ' ' _ T $ @
0x2ae304…2ae498 Dummy {f00=0x00da, f01=0x411c, f02=» > @ IDENT EMPTYT P,REL=11.0,810128,870136941100 EMPTYT F EMPTYT X I:EVA0 l , ( @ #0 0T & ! T ~ I:RT1 , ( P & ! X T C T T !P
0x2ae498…2ae62c Dummy {f00=0x00da, f01=0x0190, f02=» > @ IDENT T:STIN P,REL=11.0,810128,870136941100 STRIN1 F STRIN1 X T:STEV l , ( @ X x & Y " X R ~ T:RNOK , ( W R P _ Y $ T:LOFS I:E
0x2ae62c…2ae7c0 Dummy {f00=0x00da, f01=0x0190, f02=» h , ( u [ z [ }T 0W 3R V : , ( %W X $ X " R W V 8 , ( R W V % _ [ h I:MOV , ( " D $ D Z P Z T:GRFC , ( @ % z " * {
0x2ae7c0…2ae954 (2, 2) Dummy {f00=0x00db, f01=0x402e, f02=» V P @ *
0x2ae954…2aeae8 Dummy {f00=0x00db, f01=0x0190, f02=» > @ IDENT T:STOU P,REL=11.0,810128,870136941100 STROU1 F STROU1 X T:STEV l T:LOFS ~ * & @ X x & Y " I:EVA0 T:LOPS , ( !0P <
0x2aeae8…2aec7c Dummy {f00=0x00db, 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 <
0x2aec7c…2aee10 Dummy {f00=0x00db, f01=0x40f4, f02=» > @ IDENT T:STEV P,REL=11.0,810128,870136941100 T:STEV F T:STEV X T:GRFC l I:EVA0 ~ , ( H Y Y & ( : & @ P RTN PS P I
0x2aee10…2aefa4 Dummy {f00=0x00db, f01=0x0190, f02=» > @ IDENT T:EDFL P,REL=11.0,810128,870136941100 T:EDFL F T:EDFL X T:PRKB l T:PRDY ~ T:PM1 T:PM2 T:CASP , ( I$ Y , ( ( x P Y *
0x2aefa4…2af138 Dummy {f00=0x00db, f01=0x0190, f02=» X 0 v , ( s P X T 5 ! Y * T:SCUW F T:CLRD X , ( y X V X X ( j , ( x C ( Y * , ( X Y , X X C & , ( C
0x2af138…2af2cc Dummy {f00=0x00db, f01=0x018e, f02=» X l , ( I *YrP y X " x Y X " T T:BELL < , ( i Y _ _ B U C Q N T:CLR1 ~ T:CLR2 , ( P C D X , ( X * $" ~_> @ Y X * _R X , (
0x2af2cc…2af460 Dummy {f00=0x00db, f01=0x0190, f02=» , ( ! @ " X # X * y _< X , ( ? # X * y X 1 1 4 , ( ] X !@T X $ " P y d T:CLIT T:EKEY , ( } @ _ x T X H , ( X X * , )$ P
0x2af460…2af5f4 (2, 3) Dummy {f00=0x00db, f01=0x405c, f02=»T {U Q < V P eT uP T P F@ X
0x2af5f4…2af788 Dummy {f00=0x00db, f01=0x0190, f02=» > @ IDENT T:DYKI P,REL=11.0,810128,870136941100 J F " T:DYKI T:PM1 T:PM2 T:CLR1 T:CLIT T:CLR2 T:IOER T:EKEY T:BELL F T:DYKI T:PRKB T:PRDY I:EVA7 * & H ' Y
0x2af788…2af91c Dummy {f00=0x00db, f01=0x0190, f02=» X l T:CASP * & y ! T _ y C Q " T T:CLRD L , ( X ! X ^ , ( X ! x Y~ Y _ X "@P B , ( R y C B P 9 V _F9 , ( V X ! T X !@X
0x2af91c…2afab0 Dummy {f00=0x00db, f01=0x0190, f02=» B y " y $ c C T:CLR1 X & T:CLR2 f : T:SCUW N , ( Q _$ _ y _6 ( x X@ X ` , ( qA X # C _. B , ( ]d P C Q X8_H x XD @ Y , ( c C y
0x2afab0…2afc44 Dummy {f00=0x00db, f01=0x0190, f02=» T:IOWR , ( # B P B C : T:CLIT : F , ( ' + X Z T:LOFS I:EVA0 T:LOPS T:CLMI , ( A ( ( T:P
0x2afc44…2afdd8 Dummy {f00=0x00db, f01=0x4104, f02=» , ( B Y Y . : & " " $ : 8 H D ! ! n # aTf i mR s J }T Q T Z P R P V b < 8 ` VV T 'P +Q( [ * P Q8 Z P & a j {V P @ T:P
0x2afdd8…2aff6c Dummy {f00=0x00db, f01=0x0190, f02=» > @ IDENT T:UPDF P,REL=11.0,810128,870136941100 T:UPDF F T:UPDF X T:GRFC l T:LOFS ~ I:EVA0 , ( @ 2! Y " T:LOPS I:MOV , ( A
0x2aff6c…2b0100 Dummy {f00=0x00db, f01=0x4032, f02=» =T P @ .870136941100 T:UPDF F T:UPDF X T:GRFC l T:LOFS ~ I:EVA0 , ( @ 2! Y " T:LOPS I:MOV , ( A
0x2b0100…2b0294 (2, 4) Dummy {f00=0x00db, f01=0x018e, f02=» > @ IDENT T:DUPL P,REL=11.0,810128,870136941100 T:DUPL T:DUPX F T:DUPL ` T:GRFC t I:EVA0 T:RNOK T:ROK T:DUPX , ( HB X T:LOFS
0x2b0294…2b0428 Dummy {f00=0x00db, 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
0x2b0428…2b05bc Dummy {f00=0x00db, f01=0x4140, f02=» > @ IDENT T:GETC P,REL=11.0,810128,870136941100 T:GETC F T:GETC X T:GRFC l I:EVA0 ~ , ( @ 2' R P P X I:RT1 , ( ' ' X _ X ' _ X '? ;
0x2b05bc…2b0750 Dummy {f00=0x00db, f01=0x4124, f02=» > @ IDENT T:GETA P,REL=11.0,810128,870136941100 T:GETA F T:GETA X T:GRFC l I:EVA0 ~ T:RNOK T:ROK , ( H X ' X ! T:RCR H
0x2b0750…2b08e4 Dummy {f00=0x00db, f01=0x410e, f02=» > @ IDENT T:TSTC P,REL=11.0,810128,870136941100 T:TSTC F T:TSTC X T:GRFC l , ( @ X " 9b! X :c 2" ~ T:RTES $ H @ % , 4 @
0x2b08e4…2b0a78 Dummy {f00=0x00db, f01=0x0190, f02=» > @ IDENT T:TFWD P,REL=11.0,810128,870136941100 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
0x2b0a78…2b0c0c Dummy {f00=0x00db, f01=0x4132, f02=» Y ( Y 09H Y * T:TABE * & = Y 4 Y 2 Y 69h Q X :h Y 0 2 T:SCR2 ` T:TABC r , ( [ W U X Q W Y 0 T:TABN w 8 4 W W W W W W !W MQ ]W
0x2b0c0c…2b0da0 Dummy {f00=0x00db, f01=0x0190, f02=» > @ IDENT T:DISP P,REL=11.0,810827,870136941100 T:PRIN T:DISP T:ERAS F T:PRIN h T:GDSP | T:DSM T:EDWI T:GRFC , ( D 9H Y T:GTIP T
0x2b0da0…2b0f34 (2, 5) Dummy {f00=0x00db, f01=0x0190, f02=» 0 X +" X *9h P R , ( Q Y ?_ P P Y +W T:TABD P , ( q Y + W T W b , ( Q W Y + U T:TABC , ( Q P W W Y ( C T
0x2b0f34…2b10c8 Dummy {f00=0x00db, f01=0x4134, f02=» h , ( 0 X 0 X 2] X 8 Y 0 : , ( # X 0 :H* : X 2T Y 2 : 8 T:EDIO h $ C @ C 1 B ] : z H D ! !W %W KP2 OR YP _P gW^ k < w . }WL T . W> Q W , ( U Q P W W
0x2b10c8…2b125c Dummy {f00=0x00db, f01=0x0190, f02=» > @ IDENT T:GETF P,REL=11.0,810128,870136941100 T:GETF T:GTIT T:GTIP F T:GETF h T:PRDY | , ( @ X +! U 9K Y ( Y T:TABC T:TABN T:GTIT ( T:GRFC
0x2b125c…2b13f0 Dummy {f00=0x00db, f01=0x405a, f02=» 0 p W 6 2 : ! ( U ! 0 d ! D@ ! V:GTIP F T:GETF h T:PRDY | , ( @ X +! U 9K Y ( Y T:TABC T:TABN T:GTIT ( T:GRFC
0x2b13f0…2b1584 Dummy {f00=0x00db, f01=0x0190, f02=» > @ IDENT T:REWR P,REL=11.0,810827,870136941100 4 0 T:REWR T:SCUW T:CLRD T:IOWR T:CASP T:SCW F T:IOWR ~ T:SCW T:CHBU , ( C ( C : T:SCUW $ T:CLRD 6
0x2b1584…2b1718 Dummy {f00=0x00db, f01=0x018e, f02=» T:CASP ^ T:LOFS , ( ] @_^ ( X D * I:EVA3 Z , ( { D : K + Q 2 P P l I:EPIC T:LOPS , ( H ( B I:EVA0 I:E
0x2b1718…2b18ac Dummy {f00=0x00db, f01=0x401a, f02=» @ T:LOFS , ( ] @_^ ( X D * I:EVA3 Z , ( { D : K + Q 2 P P l I:EPIC T:LOPS , ( H ( B I:EVA0 I:E
0x2b18ac…2b1a40 Dummy {f00=0x00db, f01=0x0190, f02=» > @ IDENT T:EINP P,REL=11.0,810827,870136941100 " T:PKI T:PINP T:TKI T:TINP F T:PKI l T:PINP ~ T:GRFC I:ETAB I:EVIN , ( I P & , ( Y *T
0x2b1a40…2b1bd4 (2, 6) Dummy {f00=0x00dc, f01=0x0190, f02=»Q X &P V D ! P | T:TINP T:TKI 0 * & u $ ! P %_ : B , ( V Y " X .9H $ p , ( P & X ( " Q Y +Q R , ( " P W " U Y , " Q X . , (
0x2b1bd4…2b1d68 Dummy {f00=0x00dc, f01=0x0190, f02=» M X (# P X # :! R W T:ENIN 0 T:ENI B * & m T @ Y (W Y , W R I:EXIT , ( Y ( : X *:h X (! , ( # P X & V L T W X , X 0 , ( P T X *
0x2b1d68…2b1efc Dummy {f00=0x00dc, f01=0x0190, f02=» , ( @ % P Y 8 & X 8 X $ , ( E@ W _ " P X ( T X & V 4 , ( c H "@T P V Y d , ( X (P X ( T:CLMI , ( P 8 Y 0 X 2P X , (
0x2b1efc…2b2090 Dummy {f00=0x00dc, f01=0x0190, f02=» P : : x , ( "0P $ T W %T , ( ; : : Y ( X $ Y X " Y X & H , ( [ Y X < Y > : Y : X : x , ( y X ( T X & V H " V T:SPAC X $ : H D !
0x2b2090…2b2224 Dummy {f00=0x00dc, f01=0x4100, f02=» 3P< R H D ! 7 @ 9WZ IP< KQ SP2 aR$ cW g @ k oT$ wW W P Tb W P@ H D ! T, T @ P !P* ) -P| IWh QP [T kTF o sP6 P h Z @ < A P P V T P P #P )T -W 1T T V @ H D !
0x2b2224…2b23b8 Dummy {f00=0x00dc, f01=0x0190, f02=» > @ IDENT T:ENIN P,REL=11.0,810128,870136941100 1 T:ENIN T:ENI T:EVOU 1 F T:ENIN 1 f T:ENI 1 z , ( X Y " X Y $ X Y & X >W X 1 T:LOFS 1 , ( ! < Y = " 1 I:EGTB
0x2b23b8…2b254c Dummy {f00=0x00dc, f01=0x0190, f02=» X (P 1 n T:WRDY 2 , ( W X & V D ! P @ W X 2 , ( W Y ( : X , Y X $ Y 2 P , ( X &T Y Y Y W V $ 2 , ( :H D Y D :H Y ! P V 2 I:EVA0 2 I:EVA1 2 , (
0x2b254c…2b26e0 Dummy {f00=0x00dc, f01=0x411a, f02=» 2 , ( Q : 2' " P T 3 I:EVA3 3 8 I:EPIC 3 J , ( mD W : N : 3 H D ! W CT IW SP a mT" }T W4 W, P W" P W W T WD 3 ( $ P W )P /W A X aP gT qW 3
0x2b26e0…2b2874 (2, 7) Dummy {f00=0x00dc, f01=0x415c, f02=» > @ IDENT T:SETC P,REL=11.0,810128,870136941100 4 T:SETC T:SCUR 4 F T:SETC 4 ` T:PRDY 4 t T:GRFC 4 T:EDWI 4 T:RCTS 4 , ( H C 4 T:SCUR 4 T:WRD
0x2b2874…2b2a08 Dummy {f00=0x00dc, f01=0x40e2, f02=» > @ IDENT T:CLMI P,REL=11.0,810128,870136941100 5 T:CLMI 5 F T:CLMI 5 X , ( "0P ' Q W ' 5 l ! Y : 5 P Q W 5 ( 5 @ 5 A2,0 PCLRM20 EQU * P SCR
0x2b2a08…2b2b9c Dummy {f00=0x00dc, f01=0x0190, f02=» > @ IDENT T:ATTF P,REL=11.0,810827,870136941100 J F " T:ATTF T:DETF T:ROK T:RNOK T:RCR T:RCTS T:RTES T:GRFC T:WRDY F . * T:PRKB T:PRDY T:ADDY T:SPAC T:CHBU T:DETF T:ATTF I:EVA6 I:FFS
0x2b2b9c…2b2d30 Dummy {f00=0x00dc, f01=0x0190, f02=»TES : , ( Y Y Y < V E B T:RNOK < > T:GRFC @ R T:WRDY H f T:EDIO z * & ; X _ v : C C T:SPAC T:CHBU n , ( Y : H C : +
0x2b2d30…2b2ec4 Dummy {f00=0x00dc, f01=0x4080, f02=» W @ X B ; [ Z : : . ` W @ _ n W N j@ |DIO z * & ; X _ v : C C T:SPAC T:CHBU n , ( Y : H C : +
0x2b2ec4…2b3058 Dummy {f00=0x00dc, f01=0x0190, f02=» > @ IDENT T:LSEG P,REL=11.0,810128,870136941100 9 & " T:LOFS T:LOPS T:LSEG T:CSEG 9 F T:LSEG 9 p T:CSEG 9 , ( ( R : V E V D ' 9 , ( ! $ T ( W P 9 I:RT1 9
0x2b3058…2b31ec Dummy {f00=0x00dc, f01=0x401a, f02=» f : @ : G P,REL=11.0,810128,870136941100 9 & " T:LOFS T:LOPS T:LSEG T:CSEG 9 F T:LSEG 9 p T:CSEG 9 , ( ( R : V E V D ' 9 , ( ! $ T ( W P 9 I:RT1 9
0x2b31ec…2b3380 Dummy {f00=0x00dc, f01=0x4146, f02=» > @ IDENT T:DC00 P,REL=11.0,810128,870136941100 ; DCREAD DCWRTE DCEXCH ; F T:FDS0 ; h DCREAD ; z T:DCR1 ; DCWRTE ; T:DCW1 ; DCEXCH ; T:DCE1 ; , ( I$
0x2b3380…2b3514 (2, 8) Dummy {f00=0x00dc, f01=0x40aa, f02=» > @ IDENT T:SWI0 P,REL=11.0,810128,870136941100 < SWITCH < F T:SWIT < X SWITCH < j @ < ~ < @ < ~ . P* CREDIT ASSEMBLER SUBROUTINE ENTRIES * . P*
0x2b3514…2b36a8 Dummy {f00=0x00dc, f01=0x40da, f02=» > @ IDENT T:TEI0 P,REL=11.0,810128,870136941100 = TESTIO ABORT = F T:TEST = ^ TESTIO = p T:ABOR = ABORT = H = = @ = . P*
0x2b36a8…2b383c Dummy {f00=0x00dc, f01=0x40de, f02=» > @ IDENT T:CLO0 P,REL=11.0,810128,870136941100 > SETTIM GETTIM > F T:SETT > ` SETTIM > r T:GETT > GETTIM > H > > @ > . P*
0x2b383c…2b39d0 Dummy {f00=0x00dc, f01=0x40a6, f02=» > @ IDENT T:DEL0 P,REL=11.0,810128,870136941100 ? DELAY ? F T:DELA ? V DELAY ? h @ ? z ? @ ? * ~ . P* CREDIT ASSEMBLER SUBROUTINE ENTRIES * . P*
0x2b39d0…2b3b64 Dummy {f00=0x00dc, f01=0x40aa, f02=» > @ IDENT T:GTI0 P,REL=11.0,810128,870136941100 @ GETTID @ F T:GETI @ X GETTID @ j @ @ ~ @ @ @ ~ . P* CREDIT ASSEMBLER SUBROUTINE ENTRIES * . P*
0x2b3b64…2b3cf8 Dummy {f00=0x00dc, f01=0x0190, f02=» > @ IDENT T:DC P,REL=11.0,810128,870136941100 A 6 2 T:DCRE T:DCR1 T:DCWR T:DCW1 T:DCEX T:DCE1 A F T:DCRE A T:GDSP A T:DCR1 A T:DCWR A T:DCW1 A T:EDIO A , ( @@ /
0x2b3cf8…2b3e8c Dummy {f00=0x00dc, f01=0x40ca, f02=»:EVA0 A , ( 7 ' / C B , ( Q$ C B > & " k &P C & C : B n V W V 1 V B B @ B T:DCW1 A T:EDIO A , ( @@ /
0x2b3e8c…2b4020 Dummy {f00=0x00dc, f01=0x40b6, f02=» > @ IDENT T:SWI P,REL=11.0,810128,870136941100 C T:SWIT C F T:SWIT C X I:RT1 C l ( C | C @ C E LEVEL P* PT:SWIT EQU * P LDK A7,0 " P SU PP,CSB,TCA GET
0x2b4020…2b41b4 (2, 9) Dummy {f00=0x00dc, f01=0x4174, f02=» > @ IDENT T:TEI P,REL=11.0,810128,870136941100 D T:TEST T:ABOR D F T:TEST D ` T:GDSP D t I:RT1 D T:ABOR D * & @ "Q V I D T:KIAA D , ( ( T
0x2b41b4…2b4348 Dummy {f00=0x00dc, f01=0x4178, f02=» > @ IDENT T:CLO P,REL=11.0,810128,870136941100 E & " T:SETT T:GETT T:SETD T:GETD E F T:SETT E p I:EVA0 E I:RT1 E T:GETT E * & @ ( E T:SETD . E , (
0x2b4348…2b44dc Dummy {f00=0x00dc, f01=0x40d0, f02=» > @ IDENT T:DEL P,REL=11.0,810128,870136941100 F T:DELA F F T:DELA F X I:EVA0 F l I:RT1 F ~ ( $ @ ( F F @ F RY * P LDK WK1,2 NOT BINARY; SET ERROR CODE P
0x2b44dc…2b4670 Dummy {f00=0x00dc, f01=0x40cc, f02=» > @ IDENT T:MSK0 P,REL=11.0,810128,870136941100 G MASK G F MASK G V I:EVA0 G h I:RT1 G z ( $ D V G G @ G TYPE? P RF(NZ) MSK010 NOT BINARY P XIF P
0x2b4670…2b4804 Dummy {f00=0x00dc, f01=0x0190, f02=» > @ IDENT T:SCD P,REL=11.0,810224,870136941100 T:ACTV T:PAUS T:RSTR F T:ACTV h , ( 2 ;B P J | P:BAS I:NTPB , ( ! T ( T:BAT
0x2b4804…2b4998 Dummy {f00=0x00dc, f01=0x408e, f02=» ( W V x I:RT1 y V I ( ( $ ( P0 #T + X ?W6 I X WW uW V L x@ P J | P:BAS I:NTPB , ( ! T ( T:BAT
0x2b4998…2b4b2c Dummy {f00=0x00dc, f01=0x0190, f02=» > @ IDENT T:UNUS P,REL=11.0,810224,870136941100 T:UNUS F T:UNUS X , ( 2 ' >A >A 2 $ l P:MTAB , ( ! V L ;a ; R @ ( 8 , ( ? ? X Q ( V )<B
0x2b4b2c…2b4cc0 Dummy {f00=0x00dc, f01=0x402a, f02=» 5RF OQ0 @ &,810224,870136941100 T:UNUS F T:UNUS X , ( 2 ' >A >A 2 $ l P:MTAB , ( ! V L ;a ; R @ ( 8 , ( ? ? X Q ( V )<B
0x2b4cc0…2b4e54 (2, 10) Dummy {f00=0x00dd, f01=0x4096, f02=» > @ IDENT T:EXIT P,REL=11.0,810128,870136941100 N T:EXIT N F T:EXIT N X ( N l N @ N KM P DATA 3 P* P END @ LDKL A6,-1 P ABL T:UERR END @ P ADR
0x2b4e54…2b4fe8 Dummy {f00=0x00dd, f01=0x413a, f02=» > @ IDENT T:GTCW P,REL=11.0,810128,870136941100 O GETCW O F T:GDSP O V GETCW O h I:EVA0 O z T:BINB O * & H V 0V B B O T:GTCW O I:RT1 O W
0x2b4fe8…2b517c Dummy {f00=0x00dd, f01=0x40cc, f02=» > @ IDENT T:GTID P,REL=11.0,810128,870136941100 P T:GETI P F T:GETI P X I:EVA0 P l I:RT1 P ~ $ @ V G 9h ' P P @ P VALUE " P SC WK1,1,OP2A STORE FOR USER P SRL WK1
0x2b517c…2b5310 Dummy {f00=0x00dd, f01=0x4184, f02=» > @ IDENT T:DMR P,REL=11.0,810128,870136941100 & " T:DREA T:IREA T:XREA T:IXID F T:DREA p T:REAX T:SCW2 T:IO2 T:IREA , ( $ T:XREA
0x2b5310…2b54a4 Dummy {f00=0x00dd, f01=0x0190, f02=» > @ IDENT T:DMW P,REL=11.0,810128,870136941100 > : T:SWRI T:DWRI T:IWRI T:XWRI T:DREW T:CREW T:IREW F T:SWRI T:WRIX T:IO1 T:XWRI T:DWRI , ( / W
0x2b54a4…2b5638 Dummy {f00=0x00dd, f01=0x40a2, f02=» T:CREW > T:IREW L , ( 5D" / / ( M X W | @ RIX T:IO1 T:XWRI T:DWRI , ( / W
0x2b5638…2b57cc Dummy {f00=0x00dd, f01=0x416a, f02=» > @ IDENT T:DMDI P,REL=11.0,810128,870136941100 T:DDIS T:CDIS T:IDIS F T:DDIS h T:DSB | T:SCW2 T:IO2 T:CDIS , ( $ C <H / T:IDIS
0x2b57cc…2b5960 Dummy {f00=0x00dd, f01=0x4162, f02=» > @ IDENT T:DMPO P,REL=11.0,810128,870136941100 T:DPOS T:IPOS F T:DPOS ` T:DSB t T:SCW2 T:GTBY T:IO2 , ( H@ C <H / T:IPOS T:WRIX
0x2b5960…2b5af4 (2, 11) Dummy {f00=0x00dd, f01=0x0190, f02=» > @ IDENT T:DCC P,REL=11.0,810128,870136941100 X F B T:COPE T:COP1 T:CCLO T:CCL1 T:CCL2 T:ACON T:ACO1 T:ACO2 X F F B T:ACO3 T:PCON T:PCO1 T:PCO2 T:DISC T:DIS1 T:DIS2 T:DIS3 X T:DIS4 T:OPT X T:COPE X
0x2b5af4…2b5c88 Dummy {f00=0x00dd, f01=0x018e, f02=» T:CCLO " X T:CCL1 & Y T:CCL2 * Y & , ( W W /" C Y : T:ACON P Y j T:ACO1 T Y ~ , ( 7 C C P P _2 W Y T:ACO2 X Y T:ACO3 Y T:PCON f Y T:PCO1
0x2b5c88…2b5e1c Dummy {f00=0x00dd, f01=0x0190, f02=» T:DIS3 Z T:DIS4 Z , ( s /'W W W W W Z , T:STCW Z , ( // C C C P P Z n * & C P P Z T:OPT Z I:EVA0 Z &<H
0x2b5e1c…2b5fb0 Dummy {f00=0x00dd, f01=0x400c, f02=» Z @ [ 3 Z T:DIS4 Z , ( s /'W W W W W Z , T:STCW Z , ( // C C C P P Z n * & C P P Z T:OPT Z I:EVA0 Z &<H
0x2b5fb0…2b6144 Dummy {f00=0x00dd, f01=0x0190, f02=» > @ IDENT T:DCR P,REL=11.0,810128,870136941100 & " T:RECE T:REC1 T:AREC T:ARE1 F T:RECE p T:REC1 T:REAX T:OPT T:IO2 , ( W C C P T:AREC
0x2b6144…2b62d8 Dummy {f00=0x00dd, f01=0x403a, f02=» v W P #W 3P ] D ] $@ ] 61100 & " T:RECE T:REC1 T:AREC T:ARE1 F T:RECE p T:REC1 T:REAX T:OPT T:IO2 , ( W C C P T:AREC
0x2b62d8…2b646c Dummy {f00=0x00dd, f01=0x0190, f02=» > @ IDENT T:DCS P,REL=11.0,810128,870136941100 ^ & " T:SEND T:SEN1 T:ASEN T:ASE1 ^ F T:SEND ^ p T:SEN1 ^ T:WRIX ^ T:OPT ^ * & W / C C P ^ T:IO1 ^ T:ASEN " ^
0x2b646c…2b6600 Dummy {f00=0x00dd, f01=0x403e, f02=» _* ^ t W P %W 7P _ H _ (@ _ : ^ & " T:SEND T:SEN1 T:ASEN T:ASE1 ^ F T:SEND ^ p T:SEN1 ^ T:WRIX ^ T:OPT ^ * & W / C C P ^ T:IO1 ^ T:ASEN " ^
0x2b6600…2b6794 (2, 12) Dummy {f00=0x00dd, f01=0x018e, f02=» > @ IDENT T:IO P,REL=11.0,810803,870136941100 J F " T:WRIT T:READ T:SREA T:KI T:NKI T:EDWR T:DSC0 T:DSC1 T:DSC2 F H D ! T:EDWE T:EDWF T:EDWI T:EDIO T:XSTA T:WAIT T:IO1 T:IO2 T:IO3 D @ T:IO5 T:FDS0 T:FDSP T:GDSP T:KIPR
0x2b6794…2b6928 Dummy {f00=0x00dd, f01=0x0190, f02=» p T:KI T:NKI T:WRIT , T:WRIL @ T:LWRI T , ( W / h T:WRIX " T:WRIO & I:EVA0 , ( ! _ C P <H T:S
0x2b6928…2b6abc Dummy {f00=0x00dd, f01=0x0190, f02=» V C / <H : C T:DSC1 " , ( } C W C 9HR 6 T:DSC2 f , ( ' W 781"&$ 39#$;< '()*+,-! z T:XSTA , ( P _J T:WAIT T:M
0x2b6abc…2b6c50 Dummy {f00=0x00dd, f01=0x0190, f02=» ( v , ( 7 0 W T:IO1 F T:IO2 ` X T:IO3 d j T:IO5 p | T:IORE t , ( W : 1W C C ( ' P T:GCW2 , ( w @ P V ,V W B
0x2b6c50…2b6de4 Dummy {f00=0x00dd, f01=0x0190, f02=» I:EDW , ( B P B P B 5 : T:EDWE > T:EDWF R , ( @ C C C B f T:EDWI , ( B P C : V I C T:EDIO , ( B : (
0x2b6de4…2b6f78 Dummy {f00=0x00dd, f01=0x018e, f02=» & R r , ( i V C : B T:FDS0 B , ( T T T V : 2 V T:GDSP P:MTAB I:EVTO * & ' W 2 6 2 @ & " T # ' ?D I:FML , ( @
0x2b6f78…2b710c Dummy {f00=0x00dd, f01=0x0190, f02=» , ( : _: L C L C T:DSB , 8 T:FDSP 6 J , ( B C : : ^ T:GTBY P , ( ? : C : : T:SCW2 T:DSCX n I:EVA2 ,
0x2b710c…2b72a0 Dummy {f00=0x00dd, f01=0x414e, f02=» : H D !~ W 6 d " % , - @ 1P G L K ` O , S @ _P eV u , y P H D !V W R W @ P W W| P [W sP0 H D ! w }P& V W P z P P P )P - z @ < 9 , = @ cR iV
0x2b72a0…2b7434 (2, 13) Dummy {f00=0x00dd, f01=0x0190, f02=» > @ IDENT T:CW P,REL=11.0,810615,870136941100 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
0x2b7434…2b75c8 Dummy {f00=0x00dd, f01=0x0190, f02=» X R _ S W T:GTCW , ( 4 _T :#0 T B 'W B B 4 T:BINB d , ( " : x , ( P P L R R , ( _ R _ # Q R , (
0x2b75c8…2b775c Dummy {f00=0x00dd, f01=0x0190, f02=» h , ( _ B@ ' d w5 1 T:KIAA 8 T:KIAC L T:GCW2 ` , ( #0 T t T:SCW2 , ( @ B ' : B B : V C , ( @ P C #0 T &
0x2b775c…2b78f0 Dummy {f00=0x00dd, f01=0x404e, f02=» X R R Q P 'P 7P GR T P T 8@ J T:KIAC L T:GCW2 ` , ( #0 T t T:SCW2 , ( @ B ' : B B : V C , ( @ P C #0 T &
0x2b78f0…2b7a84 Dummy {f00=0x00dd, f01=0x40d0, f02=» > @ IDENT T:LEN P,REL=11.0,810128,870136941100 l GETLEN l F GETLEN l X I:EVA0 l l I:RT1 l ~ ( $ A #03 1 l l @ l XIF * % LDR A4,OP2A SAVE ADDR. TO RETURNITEM
0x2b7a84…2b7c18 Dummy {f00=0x00dd, f01=0x0190, f02=» > @ IDENT T:ADIT P,REL=11.0,810128,870136941100 m & " T:RREA T:RRE1 T:RWRI T:RWR1 m F T:RREA m p T:DSB m T:RRE1 m I:EVA0 m T:STCW m , ( A &P C m T:IO2 m
0x2b7c18…2b7dac Dummy {f00=0x00dd, f01=0x4034, f02=» : m t 6 + 6 n F n @ n 0
0x2b7dac…2b7f40 Dummy {f00=0x00dd, f01=0x0190, f02=» > @ IDENT T:KIA P,REL=11.0,810128,870136941100 o T:KIA T:NKIA o F T:KIA o ^ T:NKIA o p T:ABUF o T:KIPR o , ( W 6 V :a o , ( ' ( ( o
0x2b7f40…2b80d4 (2, 14) Dummy {f00=0x00de, f01=0x0190, f02=» y K V K V 6V ( - o , ( _ : J 7 J V W J p , , ( :A V 6V $ - _ * p , ( + : D T E D :A D p , ( ;A 9A Q 5 U _ 5 p T:KIAA p T:KIAC
0x2b80d4…2b8268 Dummy {f00=0x00de, f01=0x40c8, f02=» D V p p , ( @ m D V ( 2 C C q _, q @ H D !r W ^ - 2 IT MP Y V V T> Q U ! R /P 7P ?W q R [R ]P q q @ q 9A Q 5 U _ 5 p T:KIAA p T:KIAC
0x2b8268…2b83fc Dummy {f00=0x00de, f01=0x4098, f02=» > @ IDENT T:ABUF P,REL=11.0,810128,870136941100 r T:ABUF r F M r X T:ABUF r n r @ r IN T:ABUF f & !T:ABUF RES SIZE KIA/NKIA SAVEAREA P EJECT T:ABUF END @
0x2b83fc…2b8590 Dummy {f00=0x00de, f01=0x414a, f02=» > @ IDENT WRITEL P,REL=11.0,810128,870136941100 s WRITEL s F WRITEL s X T:FDS0 s l T:DSM s ~ I:EVA0 s , ( H / C s T:IO2 s , ( @ &P C & C
0x2b8590…2b8724 Dummy {f00=0x00de, f01=0x0190, f02=» > @ IDENT I:NTP P,REL=11.0,810803,870136941100 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
0x2b8724…2b88b8 Dummy {f00=0x00de, f01=0x0190, f02=»:DLT I:MCH I:XCP I:EDS , , ( / < I:TRC l I:RST D ~ T:CSEG I:NTPA H I:NTPB H P:MTAB , ( A V 7 @ " ! P
0x2b88b8…2b8a4c Dummy {f00=0x00de, f01=0x0190, f02=» 9c D 9a1 P I:EVA2 $ * & $ & Q W 6 I:RT2 d I:RT1 v I:RT0 , ( :aW _J( 2 P T:BAT , ( V W _ 2 # ;B V T ,
0x2b8a4c…2b8be0 Dummy {f00=0x00de, f01=0x0190, f02=» 8 j T:PAT , ( M ^n D . V @ 2 ! 9B V T , ( m@ *W V P D $ V 6 V J , ( % V E W 2 % z T:CAT , ( ^ 6 E 7_ 2 # L , ( , $ 2#
0x2b8be0…2b8d74 (2, 15) Dummy {f00=0x00de, f01=0x4170, f02=» W F z I:EVB , ( P E . V & * c H L 'W 'W '_8 Z H D ! H L D ! # % ' ) + - = l ~ H D ! ? h A r C t [P eP q r T P Q W W P W8 T
0x2b8d74…2b8f08 Dummy {f00=0x00de, f01=0x0190, f02=» > @ IDENT I:EVA P,REL=11.0,810910,870136941100 J F " I:EVA0 I:EVA1 I:EVA2 I:EVA3 I:EVA5 I:EVA6 I:EVA7 I:EVB I:EVI F I:FML I:FML2 I:EVTO P:MTAB , ( :l:d:h I:EVA2
0x2b8f08…2b909c Dummy {f00=0x00de, f01=0x018e, f02=» 6 2 n , ( 9 # W @ $ E " T ; [ , ( W # :H 2 T Z L > , ( @ w L D V W # n , ( L D V $ W D V I:EVA0 , ( @ L , W 6 2 W "
0x2b909c…2b9230 Dummy {f00=0x00de, f01=0x0190, f02=» , ( Z Z , ( 3 : R ; 8 , ( S 6 : F _v :B , h , ( s (V ; H [ [ [ , ( z ;AV Z H # , ( ;
0x2b9230…2b93c4 Dummy {f00=0x00de, f01=0x0190, f02=» & @ $ ! P , ( 1 [ 6 [ Z 7 . Z ( I:FML ^ X I:FML2 n j , ( Q 7 : T # ( ~ I:EVTO , ( H q : " T # :A ( , ( @ @ & " P !
0x2b93c4…2b9558 Dummy {f00=0x00de, f01=0x4110, f02=» : 6 2 W v , ( " # ^;b ; : ;f" #?_" F H D ! #W 'W -P 1W = ?W4 KT> [ ^ kT V, W ^ V W W f D @ W$ P& Pd ^ Wv yVv V$ P P P R W&
0x2b9558…2b96ec Dummy {f00=0x00de, f01=0x0190, f02=» > @ IDENT I:ADS P,REL=11.0,810128,870136941100 ~ I:ADD I:SUB ~ F I:ADD ~ I:SUB ~ n , ( W " T & T + : ~ I:CPA ~ , ( ! * & !@P `1` P Q ~ " ? [
0x2b96ec…2b9880 Dummy {f00=0x00de, f01=0x0190, f02=» $ P T ~ v , ( R R ` ; <( , ( Q P # W " <! =# T W = Z F , ( P _ V ^< `_@ v , ( R Q <# =_ P :" P * U , ( 5 P 1`! T "# 9e! # K
0x2b9880…2b9a14 (2, 16) Dummy {f00=0x00de, f01=0x4008, f02=»@ T ~ v , ( R R ` ; <( , ( Q P # W " <! =# T W = Z F , ( P _ V ^< `_@ v , ( R Q <# =_ P :" P * U , ( 5 P 1`! T "# 9e! # K
0x2b9a14…2b9ba8 Dummy {f00=0x00de, f01=0x4166, f02=» > @ IDENT I:CMP P,REL=11.0,810128,870136941100 I:CMP F I:CMP V , ( P " T * & : * & h I:CPA , ( ! !`P :J +_ +Q , ( A _0 , T T XD W 1
0x2b9ba8…2b9d3c Dummy {f00=0x00de, f01=0x4172, f02=» > @ IDENT I:CPA P,REL=11.0,810128,870136941100 I:CPA F I:CPA V * & R W h , ( ( V W Q P W ! W V , ( ? P , V W Q P W $ W V * & _ P
0x2b9d3c…2b9ed0 Dummy {f00=0x00de, f01=0x0190, f02=» > @ IDENT I:MOV P,REL=11.0,810910,870136941100 " I:MOV I:MVC I:MBTD I:MDTB F I:MOV l I:MVC ~ , ( $0#0;b P P P , ( ! 0 - P _ 4 , ( A V W Q P )
0x2b9ed0…2ba064 Dummy {f00=0x00de, f01=0x0190, f02=» , ( # ; [ I:MDTB 4 , ( _ ' d V W V H , ( 4! P < X 4 x , ( 9d $ & ! R + : , ( ! V W R 4 0R Y 7 Y& , (
0x2ba064…2ba1f8 Dummy {f00=0x00de, f01=0x414a, f02=» h , ( Y " W , ( Q V V 7 Y P _& & Q 8 , ( 9d! )0 + P 7 Y Z $ h _ : H D ! t P Pd P /PN IQ KP SP YP _P qP wT P Q 4 0 R
0x2ba1f8…2ba38c Dummy {f00=0x00de, f01=0x4140, f02=» > @ IDENT I:MMOV P,REL=11.0,810128,870136941100 I:MMOV F I:MMOV X I:EVA2 l , ( 2' ~ I:EVA0 , ( [ [ Z I:MOV & " =
0x2ba38c…2ba520 Dummy {f00=0x00de, f01=0x0190, f02=» > @ IDENT I:MUL P,REL=11.0,810128,870136941100 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
0x2ba520…2ba6b4 (2, 17) Dummy {f00=0x00de, 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
0x2ba6b4…2ba848 Dummy {f00=0x00de, 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
0x2ba848…2ba9dc Dummy {f00=0x00de, f01=0x0190, f02=» > @ IDENT I:DIV P,REL=11.0,810128,870136941100 I:DIV I:SH1R F I:DIV ^ , ( " T *V &V p ! P = , ( ' ;@ R P W ;a , ( G =a P " R & R
0x2ba9dc…2bab70 Dummy {f00=0x00de, f01=0x0190, f02=» [ [ x I:MOV I:NTFA , ( &! P 0 I:SUB ` , ( z " ! ! p , ( R 2` { z " P ! R 2` { 1 I:CPA , ( ! { [ Z
0x2bab70…2bad04 Dummy {f00=0x00de, f01=0x0190, f02=» { R [ _ , ( Z ! Z $ & * & P Z %_N [ Q V * & R [ Z { , ( z 9e! W Z I:SH1R , ( : V I
0x2bad04…2bae98 Dummy {f00=0x00de, 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
0x2bae98…2bb02c Dummy {f00=0x00de, f01=0x40da, f02=» > @ IDENT I:NTF P,REL=11.0,810128,870136941100 I:NTFA F I:NTFA X , ( Z H D & H l $ ! D % [ ( 8 @ P ABR* WK2 P P END ,PS
0x2bb02c…2bb1c0 Dummy {f00=0x00de, f01=0x0190, f02=» > @ IDENT I:EPIC P,REL=11.0,810625,870136941100 I:EPIC F I:EPIC X I:EVA0 l : + ~ [ [ < , ( ! !AAP !TTT W !**T * [ !FF A
0x2bb1c0…2bb354 (2, 18) Dummy {f00=0x00df, 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
0x2bb354…2bb4e8 Dummy {f00=0x00df, f01=0x4120, f02=» } !++P !-- z ;$# + ^$ _* $ T tX. PT*AXYZ9 . H D ! ` %P +T /W 5T AP GT KW OR S P Wn W8 Wf V H D ! T& W, P T W F W@ P U T P W R( R P U ; ?U kP
0x2bb4e8…2bb67c Dummy {f00=0x00df, f01=0x0190, f02=» > @ IDENT I:EDTE P,REL=11.0,810128,870136941100 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 , ( @
0x2bb67c…2bb810 Dummy {f00=0x00df, 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
0x2bb810…2bb9a4 Dummy {f00=0x00df, f01=0x40ea, f02=» > @ IDENT I:EDS P,REL=11.0,810128,870136941100 I:EDS F I:EDS V I:EVS2 h I:ED1 z , ( : { : & @ P2E,OP1E END OF MAIN STRING
0x2bb9a4…2bbb38 Dummy {f00=0x00df, f01=0x0190, f02=» > @ IDENT I:STR P,REL=11.0,810128,870136941100 $ I:INS I:DLT I:MCH I:CPY I:XCP F I:DLT n I:EVS1 I:MCH , ( @ P 9 _ , ( @ [ , (
0x2bbb38…2bbccc Dummy {f00=0x00df, 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 _. :
0x2bbccc…2bbe60 Dummy {f00=0x00df, 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 _. :
0x2bbe60…2bbff4 (2, 19) Dummy {f00=0x00e0, f01=0x4152, f02=» > @ IDENT I:EVS P,REL=11.0,810128,870136941100 I:EVS1 I:EVS2 F I:EVA0 ` , ( A jP kT r I:EVS1 8 , ( T : & 9! " : $ : I:EVA2 I:EVS2
0x2bbff4…2bc188 Dummy {f00=0x00e0, f01=0x0190, f02=» > @ IDENT STRIX P,REL=11.0,810128,870136941100 STRIX STROUX USRFMT F I:EVNO f I:ESKI x I:EVA0 I:EBRI I:EBRB I:EBR , ( I:ECW
0x2bc188…2bc31c Dummy {f00=0x00e0, f01=0x0190, f02=» STRIN2 USRFLD STROUX . , STRIX 2 @ USRFMT 6 R , ( # W W f T:GRFC T:STEV , ( 7! Y * & Y + , ( Q 8 & Y 0 4 y 4
0x2bc31c…2bc4b0 Dummy {f00=0x00e0, f01=0x0190, f02=»VT I:EDSK * & " $ X <' X X I:RT1 J I:EVIN Z , ( & x 4 X 2P y 6 ( l T:EVOU , ( HH * , , , , ( X +! Q P P P y 4 x 4 X
0x2bc4b0…2bc644 Dummy {f00=0x00e0, f01=0x4022, f02=» R$ ` B @ " $ X <' X X I:RT1 J I:EVIN Z , ( & x 4 X 2P y 6 ( l T:EVOU , ( HH * , , , , ( X +! Q P P P y 4 x 4 X
0x2bc644…2bc7d8 Dummy {f00=0x00e0, f01=0x018e, f02=» > @ IDENT STRIN2 P,REL=11.0,810128,870136941100 STRIN2 F STRIN2 X , ( X x & Y " X R W l I:EXIT , ( ! V P _ y 6 : Y I:EVA0 T:CLMI , ( ?
0x2bc7d8…2bc96c Dummy {f00=0x00e0, f01=0x4150, f02=» , ( W V R W V % _ I:MOV 4 * & [ " D $ D D T:GRFC r * & Z P Z % z " * { $ X $ X y & : H D ! R W !V %P SP ]P* uT yW }R< V8
0x2bc96c…2bcb00 Dummy {f00=0x00e0, f01=0x0190, f02=» > @ IDENT STROU2 P,REL=11.0,810128,870136941100 STROU2 F STROU2 X I:EVA0 l , ( X x & Y " !0P <! ~ , ( T T W < X ! P , ( ? ?A W ?AW <! P
0x2bcb00…2bcc94 (2, 20) Dummy {f00=0x00e0, f01=0x408a, f02=» I:EXIT " @ y $ : y 6 : 8 4 P6 !T$ 'T +W ;P EW MW WP mR qW uV* P 8 t@
0x2bcc94…2bce28 Dummy {f00=0x00e0, f01=0x4094, f02=» > @ IDENT USRFLD P,REL=11.0,810128,870136941100 USRFLD F USRFLD X : l ~@ E P=IDIOT4 * HMES ILLEGAL PARAMETER COMBINATION !!! * HMES FOLLOWING COMBINATIONS ARE VALID: " HMES 1
0x2bce28…2bcfbc Dummy {f00=0x00e0, f01=0x0190, f02=» > @ IDENT T:DM P,REL=11.0,810827,870136941100 F B T:OPEN T:CLOS T:DCLO T:COMM T:PCOM T:ROLL T:RSTA T:OPCH F T:IXCH T:STCH T:OPEN T:DSB , ( @ 2 2 ! <e T:WRIO
0x2bcfbc…2bd150 Dummy {f00=0x00e0, f01=0x0190, f02=» T:DCLO Z T:COMM f I:EVA0 , , ( Y <H _ ( > I:RT1 n T:PCOM ~ T:GTBY * & u@ R ' T:GDSP , ( &
0x2bd150…2bd2e4 Dummy {f00=0x00e0, f01=0x40bc, f02=» l T:SCW2 T:IO3 T:OPCH , T:STCH @ T:IXCH T " @ C / h ;T {R R @ T:GDSP , ( &
0x2bd2e4…2bd478 Dummy {f00=0x00e0, f01=0x0190, f02=» > @ IDENT T:USE P,REL=11.0,810224,870136941100 T:USE T:UERR T:UER F T:USE d I:EVA0 v * & 2 & >A >A 2 $ P:MTAB , ( & V D 9a 9 V , ( =D @ W
0x2bd478…2bd60c Dummy {f00=0x00e0, f01=0x0190, f02=»_ X @ 9 X ( R , ( 9 8 ? X ( , ( Q , V ( X , ( R - 4T V 5 , ( ( R W V P W U V T:UERR T I:RT0
0x2bd60c…2bd7a0 Dummy {f00=0x00e0, f01=0x4058, f02=»R R< V R Q" Rf T #R< %W, n +P& /W$ IT * f B@ T Q , V ( X , ( R - 4T V 5 , ( ( R W V P W U V T:UERR T I:RT0
0x2bd7a0…2bd934 (2, 21) Dummy {f00=0x00e0, f01=0x0190, f02=» > @ IDENT T:DEDT P,REL=11.0,810827,870136941100 . * T:TABC T:TABD T:TABE T:TABN T:SCR2 F I:EVNO x I:ESKI I:EVA0 I:EBRI I:EBRB I:EBR , (
0x2bd934…2bdac8 Dummy {f00=0x00e0, f01=0x0190, f02=» z T:DSL I:RET * T:TABC , : T:TABD 0 N T:TABE 4 b , ( ! W W v , ( 5 X 0Q Y ( Y *P T:EDWI I:EVT I:EDSK ,
0x2bdac8…2bdc5c Dummy {f00=0x00e0, f01=0x0190, f02=» P X 0P V _` " P T T:LOPS , , ( & (W " P Y 0] > T:EOR n * & Y (_t " X _. X *# T ~ T:EDWF , ( *W , B 1 ,W T:SCR2 , (
0x2bdc5c…2bddf0 Dummy {f00=0x00e0, f01=0x40d4, f02=» , ( ; (T W X y 6 Y ( : X (;n [@ 0 8 H D ! /W 3W ;Q ? C OP Qv P P: Vv P4 T WZ P T W N W P !P 5W =T AW ^ @ 1 ,W T:SCR2 , (
0x2bddf0…2bdf84 Dummy {f00=0x00e0, f01=0x0190, f02=» > @ IDENT T:ENLI P,REL=11.0,810827,870136941100 T:DNL T:DSL T:ECW T:EOR F I:EVNO h I:ECPY z I:EPIC I:ETXT I:ETAB I:EBRI I:EBRB I:EBR * &
0x2bdf84…2be118 Dummy {f00=0x00e0, f01=0x0190, f02=» T I:EXPY . I:RET @ I:ATTR P T:DSL , b T:GRFC t T:DNL : , ( % @ " $ Y . Y ,W , ( ;@ $ Y . X ( X ." P X 0R T , ( @ Y K
0x2be118…2be2ac Dummy {f00=0x00e0, f01=0x0190, f02=»:ENL I:ESL , ( *_ ,W . X . X 2Q I:ECTR L , ( Y *T 0 : " P X 0U X * ^ , ( # P P T " T : T:ENIN T:ECW T:EOR , ( @ Y . 2
0x2be2ac…2be440 Dummy {f00=0x00e0, f01=0x4086, f02=» : # , 9W OPj UR WT eT6 mP( }Q W W QH T2 , ( P$ U P P T T %T -T 3W @ > p@ ^ , ( # P P T " T : T:ENIN T:ECW T:EOR , ( @ Y . 2
0x2be440…2be5d4 (2, 22) Dummy {f00=0x00e0, f01=0x0190, f02=» > @ IDENT I:EDT P,REL=11.0,810827,870136941100 F B I:EDT I:EDW I:ED1 I:EDSK I:EVT I:ETAB I:EXIT I:ETXT I:ECPY F F B I:ECTR I:ESL I:ENL I:ENL1 I:EOR I:ECW I:ECWC I:EFIL I:EFLA * & I:SCB I:FFSN I:EXPY I:RET I:ATTR , (
0x2be5d4…2be768 Dummy {f00=0x00e0, f01=0x0190, f02=»:EVA2 I:EVA5 I:EVB I:EGTB 0 I:EVI B I:EVA3 R I:EVA0 d * & AUT v I:EVNO I:EPIC I:ESKI I:EBRI I:EBRB I:EBR
0x2be768…2be8fc Dummy {f00=0x00e0, f01=0x0190, f02=» I:EDSK ~ , ( { 6 K K I:EDT D I:ED1 V I:EDW h , ( K K V K : z I:EVA6 , ( R B " V , ( V Z P
0x2be8fc…2bea90 Dummy {f00=0x00e0, f01=0x0190, f02=» T:LSEG , ( 7 _Z Z [ Z P I:RET r B , ( W@ $ [ V 7_ T I:EXIT x P:MTAB * & u W Z @ " &! P , ( $ Z 7 Z Z P $
0x2bea90…2bec24 Dummy {f00=0x00e0, f01=0x0190, f02=»:ETAB , ( J P v I < : J I:ECPY @ I:ETXT ( T I:EXPY ( h , ( Q : P 4 ! T _ | I:ATTR : I:ECTR < I:ESL F , ( ) P 4 W K
0x2bec24…2bedb8 Dummy {f00=0x00e0, f01=0x0190, f02=» I:ECW p T:EDWE I:ECWC z $ I:EFIL 8 , ( i @X *W X & , J K : L I:SCB | V : 1 H D ! U Y ( [ e f g x i p k 8 m P s u F y ( { r } : @ H D ! @
0x2bedb8…2bef4c Dummy {f00=0x00e0, f01=0x4012, f02=» @
0x2bef4c…2bf0e0 Dummy {f00=0x00e0, f01=0x4146, f02=» > @ IDENT T:DCOM P,REL=11.0,810910,870136941100 DCREAD DCWRTE DCEXCH F T:FDS0 h DCREAD z T:DCR1 DCWRTE T:DCW1 DCEXCH T:DCE1 , ( I$
0x2bf0e0…2bf274 (2, 23) Dummy {f00=0x00e1, f01=0x2008, f02=» L = KMD25 DATE = 81 09 23 1216PACK NBR = 0025 `
0x2bf274…2bf408 Dummy {f00=0x00e1, f01=0x018e, f02=»2= RESERVED & P* A13= RESERVED ' P* ' , L P************************************************************************ ' 6 ( PUNPCOM EQU * ENTRY LABEL FROM RETTAB ' P IFF SNA=1 ' $ P LDK A1,ICOMN1 WHERE TO CONTINUE ' P ST A1,UNPMOD,A11 ' P L
0x2bf408…2bf59c Dummy {f00=0x00e1, f01=0x0190, f02=» P XIF ( PUNC100 EQU * ( P CWK A2,/31 WRITE? ( $ P RF(E) UNC500 YES ( > P CWK A2,/35 ERASE AND WITE? ( X P RF(E) UNC200 YES ( | & P CWK A2,/3F ERASE ALL UNPROTECTED? ( P RF(E) UNC300 YES ( P IFT COPCMD=1 ( P CWK A2,/37 COPY COMMAND
0x2bf59c…2bf730 Dummy {f00=0x00e1, f01=0x0190, f02=»F A14,MATCH GET TASKID ( P LDR A1,A1 OK? ) P RF(NZ) UNC175 NO ) 4 6 P LDKL A1,/8000 RETURN CODE TO INDICATE COPY COMND. ) N P ST A1,REGI,A11 ) P LD A8,ECBICW,A11 ) P CF A14,ICSET SET TIMEOUT ) P LDR A1,A2 TASK TO CALL ) P LDK A2,2 LE
0x2bf730…2bf8c4 Dummy {f00=0x00e1, f01=0x018e, f02=»WB THROW THE REST ) P LDK A1,1 INDICATE ERROR * P RF UNC900 INVALID COMMAND * : PUNC200 EQU * * P ST A8,REGI,A11 * p & P CF A14,ERASE ERASE ENTIRE SCREEN * P LD A8,REGI,A11 * P LDR A6,A11 * P LDK A5,LLINE * & P LDK A4,0 INITIATE B
0x2bf8c4…2bfa58 Dummy {f00=0x00e1, f01=0x0190, f02=» * p P LDK A1,1 INDICATE ERROR + P RF UNC900 + ( PUNC500 EQU * + : P LDK A1,ICOWCC GET INDEX + N P ST A1,UNPMOD,A11 + n P LDK A1,0 + P RF UNC900 + ( PUNC600 EQU * ENTRY LABEL FROM RETTAB + , P CF A14,P1WCC PROCESS WCC BEFORE UPDATE + P
0x2bfa58…2bfbec Dummy {f00=0x00e1, f01=0x018e, f02=»ICATE NEXT CALL + ~ PUNC800 EQU * , P ST A1,UNPMOD,A11 , , P LDK A1,0 , F PUNC900 EQU * , X P RTN A14 , l P EJECT , | > P********************************************************** , > P* * ,
0x2bfbec…2bfd80 Dummy {f00=0x00e1, f01=0x0190, f02=» > P********************************************************** - P* REGISTERS - F P* - Z P* A2= CHAR. - d P* A3= POINTER IN VDU BUFFER - x P* A4= REL. CURSOR POS. - P* A5= LAST IN ROW REL POS - $ P* A6= INTERNAL LINE FLAG ADDRESS - P* A8
0x2bfd80…2bff14 (2, 24) Dummy {f00=0x00e1, f01=0x0190, f02=»* - > P********************************************************** . ( PUNPORD EQU * ENTRY LABEL FROM RETTAB . L P CWK A2,/20 ORDER? . x P RF(L) UNO100 YES . * P XRKL A10,PTORD INDICATE FOR PT ORDER . P CWR A5,A4 NEW LINE? . P RF(G) UNO050 NO .
0x2bff14…2c00a8 Dummy {f00=0x00e1, f01=0x0190, f02=» . P SC A1,LINFLG,A6 / P ADK A4,1 / P ADK A3,1 / 2 P LDK A1,0 / D P RF UNO200 / V PUNO100 EQU * / h $ P LC A1,CONORD,A2 GET ORDER INDEX / | * P CFI A14,ORDTAB,A1 TAKE CARE OF ORDER / PUNO200 EQU * / P RTN A14 / P EJECT / B P****
0x2c00a8…2c023c Dummy {f00=0x00e1, f01=0x0190, f02=»* ORDTAB ORDER TABLE * / B P* * 0 F B P************************************************************* 0 PORDTAB EQU * 0 P DATA INVAL INVALID CHAR. 0 P
0x2c023c…2c03d0 Dummy {f00=0x00e1, f01=0x0190, f02=»ADRESS 0 | * P DATA EUA ERASE UNPROTECTED TO ADDRESS 1 P DATA ESC ESCAPE 1 < P DATA NULCHA NULL CHAR. 1 T P DATA NL NEW LINE 1 t P DATA FF FORM FEED 1 P DATA EM END MESSAGE 1 P DATA CR CARRIAGE RETURN 1 P EJECT 1 @ P**********************
0x2c03d0…2c0564 Dummy {f00=0x00e1, f01=0x0190, f02=»T FIELD * 1 z @ P* * 2 . @ P*********************************************************** 2 r P* REGISTERS 2 P* 2 P* A1= RETURN CODE 2 P* A2= RESERVED 2 P* A3
0x2c0564…2c06f8 Dummy {f00=0x00e1, f01=0x0190, f02=»-BUFFER INDEX 2 P* A10= INDICATOR 3 P* A11= CREDIT WORK AREA 3 . P* A12= RESERVED 3 N P* A13= RESERVED 3 f P* 3 ~ @ P************************************************************ 3 PSF EQU * 3 & P LDK A1,IOSFAT INDICATE NEXT CALL 3 P S
0x2c06f8…2c088c Dummy {f00=0x00e1, f01=0x018e, f02=»,UNPMOD,A11 3 P LC A2,CONATT,A2 IN EBCDIC 4 P ORK A2,/80 ATTR. BIT 4 6 P CM CURATT,A11 4 T P ORKL A10,ATTREC+PTORD 4 j P CF A14,LINWRP CHECK WRAP 4 P LC A1,LINFLG,A6 4 P ANK A1,2 LINE IN FIELD? 4 P RF(Z) SF600 NO 4 . P CF A14,LINATT
0x2c088c…2c0a20 Dummy {f00=0x00e1, f01=0x0190, f02=» P ADK A3,1 5 P ADK A4,1 5 PSF900 EQU * 5 ( P LDK A1,0 5 < P RTN A14 5 N P EJECT 5 ^ @ P*********************************************************** 5 l @ P* * 5 @ P* SBA S
0x2c0a20…2c0bb4 (2, 25) Dummy {f00=0x00e1, f01=0x0190, f02=»*************************************** 5 | P* REGISTERS 6 0 P* 6 D P* A1= RETURN CODE 6 N P* A2= CHAR. 6 h P* A3= RESERVED 6 | P* A4= RESERVED 6 P* A5= RESERVED 6 P* A6= RESERVED 6 P* A8= RESERVED 6 P* A9= RESERVED 6 P* A10= I
0x2c0bb4…2c0d48 Dummy {f00=0x00e1, f01=0x0190, f02=»***************************** 6 r PSBA EQU * 7 & P LDK A1,IOSBA1 NEXT LABEL 7 8 P ST A1,UNPMOD,A11 7 Z P LDK A1,0 7 t P RF SBA900 FIRST BYTE 7 ( PSBA100 EQU * ENTRY LABEL FROM RETTAB 7 P LC A7,CONATT,A2 CONVERT 7 P ANK A7,/3F 7 P SLL
0x2c0d48…2c0edc Dummy {f00=0x00e1, f01=0x0190, f02=»M RETTAB 7 t P LC A2,CONATT,A2 8 P ANK A2,/3F 8 ( P ORR A7,A2 8 < P LDK A1,IORDER NEXT LABEL 8 N P ST A1,UNPMOD,A11 8 p " P CWK A7,LBVDU ILLEGAL ADDRESS? 8 P RF(NL) SBA800 YES 8 P LDR A3,A7 8 P LDR A4,A3 8 P ADKL A3,BVDU 8 P ADR
0x2c0edc…2c1070 Dummy {f00=0x00e1, f01=0x0190, f02=»SBA900 8 PSBA800 EQU * 9 " P ORKL A10,THROWB DON'T SAVE IT 9 " P LDK A1,1 RETURN CODE 9 H PSBA900 EQU * 9 f P RTN A14 9 z P EJECT 9 > P********************************************************** 9 > P*
0x2c1070…2c1204 Dummy {f00=0x00e1, f01=0x0190, f02=» * 9 ^ > P********************************************************** : P* REGISTERS : R P* : f P* A1= RETURN CODE : p P* A2= RESERVED : P* A3= RESERVED : P* A4= REL. CURSOR POS. : P* A5= RESERVED : P* A6= RESERVED : P* A9= RE
0x2c1204…2c1398 Dummy {f00=0x00e1, f01=0x0190, f02=»*************************************** : PIC EQU * ; 0 P ST A4,PCURS,A11 ; @ P ORKL A10,PTORD INDICATE ; X P LDK A1,0 RETURN CODE ; x P RTN A14 ; P EJECT ; @ P*********************************************************** ; @ P*
0x2c1398…2c152c Dummy {f00=0x00e1, f01=0x018e, f02=» * ; @ P*********************************************************** < 4 P* REGISTERS < x P* < P* A1= RETURN CODE < P* A2= CHAR. < P* A3= ADDRESS IN VDU-BUFFER < P* A4= REL. CURSOR POS. < P*
0x2c152c…2c16c0 Dummy {f00=0x00e1, f01=0x0190, f02=» < ~ P* A12= RESERVED = P* A13= RESERVED = P* = 8 @ P************************************************************ = B PPT EQU * = P LDR A1,A10 = . P ANK A1,PTORD FOLLOWING ORDER OR COMMAND? = P RF(NZ) PT400 YES = 0 P LDK A7,NULL FILL
0x2c16c0…2c2360 (3, 0) DirGranule ((3, 0)) {
0x2c16c0…2c2360 DirEnt {nam=»PT3272«, typ=» «, f00=0x0000, f01=0x0000, f02=0x01d8, f03=0x0000}
0x2c16c0…2c2360 DirEnt {nam=»DATBSC«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1cf8, f03=0x0000}
0x2c16c0…2c2360 DirEnt {nam=»APPGEN«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x1d10, f03=0x0000}
0x2c16c0…2c2360 DirEnt {nam=»APPGEN«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1d20, f03=0x0000}
0x2c16c0…2c2360 DirEnt {nam=»DCBSC «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1738, f03=0x0000}
0x2c16c0…2c2360 DirEnt {nam=»DSPBSC«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1548, f03=0x0000}
0x2c16c0…2c2360 DirEnt {nam=»KEYB «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1da0, f03=0x0000}
0x2c16c0…2c2360 DirEnt {nam=»VDU «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1e58, f03=0x0000}
0x2c16c0…2c2360 DirEnt {nam=»PAD «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1ee0, f03=0x0000}
0x2c16c0…2c2360 DirEnt {nam=»PRINT «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1550, f03=0x0000}
0x2c16c0…2c2360 DirEnt {nam=»CONVER«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1fd8, f03=0x0000}
0x2c16c0…2c2360 DirEnt {nam=»/OBJCT«, typ=»OB«, f00=0x0000, f01=0x0000, f02=0x1ff0, f03=0x0000}
0x2c16c0…2c2360 DirEnt {nam=»OBDIR «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1508, f03=0x0000}
0x2c16c0…2c2360 DirEnt {nam=»KEYB1 «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2540, f03=0x0000}
0x2c16c0…2c2360 DirEnt {nam=»APLNK1«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x2250, f03=0x0000}
0x2c16c0…2c2360 DirEnt {nam=»CTAB01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2258, f03=0x0000}
0x2c16c0…2c2360 DirEnt {nam=»AARCON«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x2268, f03=0x0000}
0x2c16c0…2c2360 DirEnt {nam=»APLNK2«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1ca0, f03=0x0000}
0x2c16c0…2c2360 DirEnt {nam=»KEYB2 «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2278, f03=0x0000}
0x2c16c0…2c2360 DirEnt {nam=»PROD1 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x14f8, f03=0x0000}
0x2c16c0…2c2360 DirEnt {nam=»TSTCON«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x2338, f03=0x0000}
0x2c16c0…2c2360 DirEnt {nam=»PROD2 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x2340, f03=0x0000}
0x2c16c0…2c2360 DirEnt {nam=»PT3270«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x1618, f03=0x0000}
0x2c16c0…2c2360 DirEnt {nam=»RODCON«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x2388, f03=0x0000}
0x2c16c0…2c2360 DirEnt {nam=»PT3272«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x1500, f03=0x0000}
0x2c16c0…2c2360 DirEnt {nam=»M:PROC«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x14e8, f03=0x0000}
0x2c16c0…2c2360 DirEnt {nam=»AABCON«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x23d8, f03=0x0000}
0x2c16c0…2c2360 DirEnt {nam=»FARCON«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x23e8, f03=0x0000}
0x2c16c0…2c2360 DirEnt {nam=»HVDCON«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x23f0, f03=0x0000}
0x2c16c0…2c2360 DirEnt {nam=»ANHCON«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x23f8, f03=0x0000}
0x2c16c0…2c2360 DirEnt {nam=»TIECON«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x2400, f03=0x0000}
0x2c16c0…2c2360 DirEnt {nam=»AMFCON«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x2410, f03=0x0000}
0x2c16c0…2c2360 DirEnt {nam=»XXXCON«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1a00, f03=0x0000}
0x2c16c0…2c2360 DirEnt {nam=»NN «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x2630, f03=0x0000}
0x2c16c0…2c2360 DirEnt {nam=»DO «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x16b0, f03=0x0000}
0x2c16c0…2c2360 DirEnt {nam=»ARHCON«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1ab0, f03=0x0000}
0x2c16c0…2c2360 DirEnt {nam=»RDVCON«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x0b68, f03=0x0000}
0x2c16c0…2c2360 DirEnt {nam=»PRINT2«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x23b8, f03=0x0000}
0x2c16c0…2c2360 }
0x2c2360…2c24f4 (3, 1) Opaque[0x194]
0x2c24f4…2c2688 # DirEnt {nam=»DATBSC«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1cf8, f03=0x0000}
0x2c24f4…2c2688 IdxSect {
0x2c24f4…2c2688 f00 = 0x00e7 // 0x2c24f4 @0x0
0x2c24f4…2c2688 f01 = 0x0006 // 0x2c24f6 @0x2
0x2c24f4…2c2688 gno = [ // 0x2c24f8 @0x4
0x2c24f4…2c2688 [0x00]: C0x00e7.0x3.0
0x2c24f4…2c2688 [0x01]: C0x00e8.0x0.0
0x2c24f4…2c2688 [0x02]: C0x00e8.0x1.0
0x2c24f4…2c2688 ]
0x2c24f4…2c2688 }
0x2c2688…2c281c Dummy {f00=0x00e7, f01=0x0190, f02=» 0 P IDENT DATBSC REL 11.0 82-07-07 870150541100 P 8 L P************************************************************************ @ L P* * L P* DATBSC DATA DIVISION FOR
0x2c281c…2c29b0 Dummy {f00=0x00e7, f01=0x0190, f02=» CREDIT CODED START-UP ROUTINES. * | L P* * < L P************************************************************************ P EJECT P DDIV 8 P****************
0x2c29b0…2c2b44 Dummy {f00=0x00e7, f01=0x0190, f02=»****************************** z P TERM K1 & P* 6 P CWB CB1 @ P TWB TB1 P P* ` P START KBVGO j P* ~ & PDSKBAN DSET FC=X'20',DEV=KA,BUFL=2 & PDSKBSD DSET FC=X'40',DEV=KI,BUFL=2 ( PDSVDU DSET FC=X'42',DEV=DY,BUFL=162 P
0x2c2b44…2c2cd8 Dummy {f00=0x00e7, f01=0x0190, f02=»IC FOR P&T h P EJECT 8 P*************************************************** P* . P* KB/VDU TERMINAL WITH TWO DC-LINES f P* 8 P*************************************************** P TERM K2 P* P CWB CB1 P
0x2c2cd8…2c2e6c Dummy {f00=0x00e7, f01=0x0190, f02=» ( PDSVDU DSET FC=X'42',DEV=DY,BUFL=162 PDSICR DSET FC=X'50',DEV=II 0 PDSICW DSET FC=X'51',DEV=IO R PDSDC1 DSET FC=X'61' t PDSDC2 DSET FC=X'62' ( PDSKBN2 DSET FC=X'21',DEV=KBN,BUFL=2 P P EJECT 8 P**************************
0x2c2e6c…2c3000 Dummy {f00=0x00e7, f01=0x0190, f02=»******************** p P TERM P1 P* , P CWB CB1 6 P TWB TB1 F P* V P START PRTGO ` P* t @ PPDSPRT DSET FC=X'30',BUFL=256 GENERAL DATA SET FOR PRINTERS ~ PPDSICR DSET FC=X'50',DEV=II PPDSICW DSET FC=X'51',DEV=IO
0x2c3000…2c3194 (3, 2) Dummy {f00=0x00e8, f01=0x0190, f02=»MINAL WITH TWO DC-LINES | P* : P****************************************************** * P TERM P2 h P* x P CWB CB1 P TWB TB1 P* P START PRTGO P* @ PPDSPRT DSET FC=X'30',BUFL=256 GENERAL DATA SET FOR PRINTERS
0x2c3194…2c3328 Dummy {f00=0x00e8, f01=0x0190, f02=»JECT L P************************************************************************ L P* * L P* WORK AREA FOR KB/VDU TASKS * L P*
0x2c3328…2c34bc Dummy {f00=0x00e8, f01=0x0190, f02=»**** L PTB1 BLK P* & PTCT01 BIN 4X'0' TID AND STACKBASE & ( PBVDU STRG 3840X'0' VDU SCREEN BUFFER P * PLINFLG STRG 48X'0' INTERNAL LINE FLAGS | ( PPCURS STRG 4X'0' REL. CURSOR ADDRESS . PATTRIB STRG 4X'0' LAST ATTRIBUTE CHARACTER , P
0x2c34bc…2c3650 Dummy {f00=0x00e8, f01=0x0190, f02=»TRG 4X'0' . PDCLENG STRG 4X'0' DC READ EFFECTIVE LENGTH * PINTATT STRG 4X'0' INTENSITY ATTRIBUTE D " POFFFLG STRG 4X'0' OFFLINE FLAG r ( PPRTID STRG 4X'0' TASKID FOR HARDCOPY PBRAGE STRG 192X'0' LEKSAND P* " P* FORMATION OF BRAGE - L
0x2c3650…2c37e4 Dummy {f00=0x00e8, f01=0x018e, f02=»ATOR t $ P* KEYS 4X KEY LOCK STATUS 0 P* ECBBLK 20X ECB BLOCK FOR MULTIPLE WAIT 4 2 P* RDMORE 4X NEXT ADDRESS OF READ MORE KEYS h $ P* CURPOS 4X CURSOR POSITION " P* BUFPNT 4X BUFFER POINTER P* REGI 4X SAVE AREA
0x2c37e4…2c3978 Dummy {f00=0x00e8, f01=0x0190, f02=» v P* ECBTAB ECB TABLE P* ECBKB 4X ECB KB * P* ECBPRT 4X ECB PRINTER H & P* ECBSD 4X ECB SIGNAL DISPLAY l P* ECBVDU 4X ECB VDU & P* ECBICR 4X ECB INTERTASK READ ( P* ECBICW 4X ECB INTERTASK WRITE
0x2c3978…2c3b0c Dummy {f00=0x00e8, f01=0x018e, f02=» ( P* PRBA 4X PRINTER BUFFER ADDRESS =24 , P* PRLMAR 4X LEFT MARGIN FOR PRINTER =24 0 P EJECT ` F P****************************************************************** n F P* * F P*
0x2c3b0c…2c3ca0 Dummy {f00=0x00e8, f01=0x018e, f02=» L F P****************************************************************** PCB1 BLK R P* b 0 PMF1CU STRG X'4142' SYMBOLIC CLUSTER ADDRESS l . PMF2CU STRG X'4344' SYMBOLIC CLUSTER ADDR. : PIDTEXT STRG 22'IDENT NOT OPERABLE ' IDENT KEY TEXT
0x2c3ca0…2c3e34 (3, 3) Dummy {f00=0x00e8, f01=0x0190, f02=» " P***SC STRG 15'PRO REC REJ-BSY' " P***SD STRG 15'PRO REC REJ-OVF' * " P***SE STRG 15'PRO REC REJ-PAR' P " P***SF STRG 15'PRO SND BLOCKS ' v " P***SG STRG 15'PRO SND RESND ' " P***SH STRG 15'PRO PROC-TIMOUT' " P***SI STRG 15'PRO POLL-TIMOUT'
0x2c3e34…2c3fc8 Dummy {f00=0x00e8, f01=0x0190, f02=»ATUS j " PENDTAB STRG 4X'FFFF' END MARK P PDIV 2 P* @ 2 P* ENTRY POINTS AND EXTERNAL REFERENCES J P* P ENTRY KBVGO P ENTRY PRTGO P EXT VDUKB P EXT PRINT " P EXT GETTID GET TASK IDENTITY 2 P* EXT OFFLNE
0x2c3fc8…2c415c Dummy {f00=0x00e8, f01=0x0190, f02=»VDU TASK z P* , P**************************************** P J PKBVGO R P CALL GETTID,TCT01 ` PKB050 | P CALL VDUKB,TCT01 ( P* PERF OFFLNE BRANCH TO CREDIT CODE * P B KB050 RETURN TO IBM-3270 EMULATION P EJECT
0x2c415c…2c42f0 Dummy {f00=0x00e8, f01=0x4084, f02=»******************************* P ( PPRTGO 0 P CALL GETTID,TCT01 > P CALL PRINT,TCT01 Z P END t@ | P CALL VDUKB,TCT01 ( P* PERF OFFLNE BRANCH TO CREDIT CODE * P B KB050 RETURN TO IBM-3270 EMULATION P EJECT
0x2c42f0…2c4484 Dummy {f00=0x00e8, 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
0x2c4484…2c4618 Dummy {f00=0x00e8, f01=0x0190, f02=» 2 P ANKL A10,/FFFF-NXTCHA RESET TAKE NEXT CHAR =3 3 P ADK A3,1 3 : P ADK A4,1 3 L P RB COP200 3 ^ PCOP850 EQU * 3 p P IFF BASWRI=1 . =24 3 ( P LDR A9,A9 SOMETHING LEFT TO PRINT? 3 P RF(Z) COP950 NO! =19 3 " P CF A14,PRLINE PRINT LAST LINE
0x2c4618…2c47ac Dummy {f00=0x00e8, f01=0x0190, f02=»XTRA LINE FEED 3 P XIF . =24 4 P IFT BASWRI=1 . =24 4 * , P LDR A9,A9 SOME TEXT LEFT TO PRINT? =24 4 F P RF(Z) COP860 NO! =24 4 v " P CF A14,PRLINE PRINT TEXT =24 4 PCOP860 EQU * . =24 4 P IFF SCS=1 . =26 4 $ P ANKL A10,ENDPRT END MESS.?
0x2c47ac…2c4940 Dummy {f00=0x00e8, f01=0x0190, f02=» . =26 4 P IFT BASWRI=1 . =26 5 PCOP870 EQU * . =24 5 , . P CF A14,PRCCH CONTROL CH:S TO PRINTER =24 5 F P XIF . =24 5 x PCOP900 EQU * 5 P LDR A1,A1 PRINTER FAILED? 5 P RF(Z) COP950 NO 5 P LD A2,WCC,A11 . =32 5 $ P CWK A2,/38 LOCAL
0x2c4940…2c4ad4 (3, 4) Opaque[0x194]
0x2c4ad4…2c4c68 # DirEnt {nam=»APPGEN«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x1d10, f03=0x0000}
0x2c4ad4…2c4c68 IdxSect {
0x2c4ad4…2c4c68 f00 = 0x00e8 // 0x2c4ad4 @0x0
0x2c4ad4…2c4c68 f01 = 0x0004 // 0x2c4ad6 @0x2
0x2c4ad4…2c4c68 gno = [ // 0x2c4ad8 @0x4
0x2c4ad4…2c4c68 [0x00]: C0x00e8.0x2.0
0x2c4ad4…2c4c68 [0x01]: C0x00e8.0x3.0
0x2c4ad4…2c4c68 ]
0x2c4ad4…2c4c68 }
0x2c4c68…2c4dfc Dummy {f00=0x00e8, f01=0x0190, f02=» h B b B b * F ` SNA/SDLC COMMUNICATION? (Y/N): MAXIMAL NUMBER OF WORKSTATIONS?: OFFLINE KEY HANDLING? (Y/N): $ENTRY NAME OF OFFLINE APPLICATION? : NUMBER OF DC-LINES? (1-2): REQUEST TIMEOUT? (100MS): KEYLOC
0x2c4dfc…2c4f90 Dummy {f00=0x00e8, f01=0x0190, f02=»NDLING? (Y/N): : KEYBOARD 6272?(Y/N): NUMBER OF DC-BUFFERS?(1-32): SIZE OF DC-BUFFERS? (WORDS): COPY COMMAND INCLUDED?(Y/N): EBCDIC CODE?(Y/N): TEST MODE HANDLING? (Y/N): COPY LOCK FUNCTION? (Y/N): ASSEMBLY LISTING? (Y/N): NAME OF PACKAGE? : MOV DATBSC
0x2c4f90…2c5124 Dummy {f00=0x00e8, f01=0x0190, f02=»F /S MOV DCSNA,/S,IBM3270 KPF /S MOV DSPSNA,/S,IBM3270 KPF /S SCR MOV KEYB,/S,IBM3270 KPF /S MOV VDU,/S,IBM3270 KPF /S MOV PAD,/S,IBM3270 KPF /S MOV PRINT,/S,IBM3270 KPF /S MOV CONVER,/S,IBM3270 KPF /S SCR !!CH $$ X:A$$ 0$$ !!CH $$ X:B$
0x2c5124…2c52b8 Dummy {f00=0x00e8, f01=0x0190, f02=»!!CH $$ X:H$$ 0$$ !!CH $$ X:I$$ 1$$ !!CH $$ X:J$$ 1$$ !!CH $$ X:K$$ 00$$ !!CH $$ X:L$$ 0000$$ !!CH $$ X:M$$ 0$$ !!CH $$ X:N$$ 1$$ !!CH $$ X:O$$ 0$$ !!CH $$ X:P$$ 0$$ !!EN KPF /S BEA /S KPF /O SCR !!CH $$***S$$S$$ !!CH $$** $$ $$ !!CH $
0x2c52b8…2c544c Dummy {f00=0x00e8, f01=0x0190, f02=»LED DATBSC LED DATSNA LED DSPBSC LED DSPSNA LED DCBSC LED DCSNA LED KEYB LED VDU LED PAD LED PRINT MOV CONVER,/S KPF /S SCR SCR TRA DATBSC TRA DATSNA TLK U,M LKE M KPF /L, ASG /E0,TY10 APPGEN R
0x2c544c…2c55e0 Dummy {f00=0x00e8, f01=0x0190, f02=» ~ 9H L d 9A F_" @ W @ 2 2 F C C < (^ * X P W( F 9A D , C C < C < * F b C C 4 b 9h !##P B B * l " 6 6
0x2c55e0…2c5774 (3, 5) Dummy {f00=0x00e8, f01=0x0190, f02=» A * Q :h !YYT 1 A W !NNT A A * Q P y 0 5 A * Q :h A " A * Q P : P 5 A * Q :h !YYT 1 A NW !NNT A * Q :h !YYT 1 A bW !NNT A * Q :h !YYT 1 A vW !NNT A * Q :h !NNT 0
0x2c5774…2c5908 Dummy {f00=0x00e8, f01=0x0190, f02=» 5 A * Q :h !YYT 1 A W !NNT A A * Q :h !NNT 0 A W !YYT A * Q :h !YYT 1 A W !NNT A * Q :h !YYT 1 A W !NNT A * Q :h !YYT A W !NNT A * Q P 0 5 A * ( * ( * @
0x2c5908…2c5a9c Dummy {f00=0x00e8, f01=0x0190, f02=» @ "! T @ @ @ v v * @ P @ @ ! T( @ @ T4 @ _ @ @ T @ $ $ _ @ 2 2 @ @ > > @ @ J J @ @ V V @ @ d d
0x2c5a9c…2c5c30 Dummy {f00=0x00e8, f01=0x0190, f02=» * T ( ( * . D | : (
0x2c5c30…2c5dc4 Dummy {f00=0x00e8, f01=0x0190, f02=» a P RB DISI10 b PDISI20 EQU * b P LD A6,ECBBA,A8 b . . P ST A1,ECBBA+52,A6 SAVE TASK ID IN BUFFER b F & P LC A2,X'1F' HIGH INTENSITY CHAR. b x P SC A2,ECBBA+45,A6 b ( P LDKL A10,1 INDICATE NOT ONLY SPACES b P LDKL A9,1 1 INTENSITY CHAR. b
0x2c5dc4…2c5f58 Dummy {f00=0x00e8, f01=0x0190, f02=» b B P************************************************************** c P* c N P* DISSTA DISPLAY STATISTICS c X P* c | D P*************************************************************** c P* REGISTERS c P* c P* c D P************
0x2c5f58…2c60ec Dummy {f00=0x00e8, f01=0x0190, f02=»ALIN WHERE TO START c P SLL A1,8 d P LDK A2,1 d . & P ORR A2,A1 FIRST POS. ON THAT LINE d @ P ST A2,ECBCW,A8 d j $ P CF A14,SPACES CLEAN THE BUFFER d P LDK A5,0 RESET INDEX d P LD A3,6,A13 d P ADK A3,STATXT POINT TO TEXT d PDISS10 E
0x2c60ec…2c6280 Dummy {f00=0x00e8, f01=0x018e, f02=»LINE d l ( P CF A14,MOVTXT MOVE IT IN TO BUFFER e $ P ADK A6,5+STAPOS MAKE SOME ROOM e 8 P LC A1,INDEX,A5 e ` P SLL A1,1 e x $ P ADR A1,A12 POINT OUT STAT VALUE e P LCR A2,A1 e " P CF A14,CONASC MAKE IT VISABLE e P LDR A4,A2 e P SLL A4,8 e
0x2c6280…2c6414 (3, 6) Opaque[0x194]
0x2c6414…2c65a8 # DirEnt {nam=»APPGEN«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1d20, f03=0x0000}
0x2c6414…2c65a8 IdxSect {
0x2c6414…2c65a8 f00 = 0x00e9 // 0x2c6414 @0x0
0x2c6414…2c65a8 f01 = 0x0004 // 0x2c6416 @0x2
0x2c6414…2c65a8 gno = [ // 0x2c6418 @0x4
0x2c6414…2c65a8 [0x00]: C0x00e9.0x0.0
0x2c6414…2c65a8 [0x01]: C0x00e9.0x1.0
0x2c6414…2c65a8 ]
0x2c6414…2c65a8 }
0x2c65a8…2c673c Dummy {f00=0x00e9, f01=0x0190, f02=» ASG 2,NO MOV DATBSC,/S,IBM3270 KPF /S 2 MOV DCBSC,/S,IBM3270 @ KPF /S MOV DSPBSC,/S,IBM3270 j KPF /S SCR MOV KEYB,/S,IBM3270 KPF /S MOV VDU,/S,IBM3270 KPF /S MOV PAD,/S,IBM3270
0x2c673c…2c68d0 Dummy {f00=0x00e9, f01=0x0190, f02=»!!EN KPF /S SCR ASG 2,LP0F & LED DSPBSC 8 !!CH $$ X:A$$ 0$$ J !!CH $$ X:B$$ 08$$ d !!CH $$ X:C$$ 0$$ ~ !!CH $$ X:D$$ 1$$ !!CH $$ X:E$$ 00300$$ !!CH $$ X:F$$ 0$$ !!CH $$ X:G$$ 0$$ !!CH
0x2c68d0…2c6a64 Dummy {f00=0x00e9, f01=0x0190, f02=»X:M$$ 1$$ !!CH $$ X:N$$ 1$$ !!CH $$ X:O$$ 0$$ , !!CH $$ X:P$$ 0$$ F !!EN ` KPF /S l BEA /S z KPF /O SCR LED DCBSC !!CH $$ X:A$$ 0$$ !!CH $$ X:B$$ 08$$ !!CH $$ X:C$$ 0$$ !!CH $
0x2c6a64…2c6bf8 Dummy {f00=0x00e9, f01=0x0190, f02=»X:I$$ 1$$ !!CH $$ X:J$$ 1$$ !!CH $$ X:K$$ 02$$ , !!CH $$ X:L$$ 1150$$ F !!CH $$ X:M$$ 1$$ b !!CH $$ X:N$$ 1$$ | !!CH $$ X:O$$ 0$$ !!CH $$ X:P$$ 0$$ !!EN KPF /S BEA /S KPF /O SCR
0x2c6bf8…2c6d8c Dummy {f00=0x00e9, f01=0x0190, f02=»$ 00300$$ !!CH $$ X:F$$ 0$$ !!CH $$ X:G$$ 0$$ , !!CH $$ X:H$$ 0$$ F !!CH $$ X:I$$ 1$$ ` !!CH $$ X:J$$ 1$$ z !!CH $$ X:K$$ 02$$ !!CH $$ X:L$$ 1150$$ !!CH $$ X:M$$ 1$$ !!CH $$ X:N$$ 1$$ !!CH $$ X:
0x2c6d8c…2c6f20 Dummy {f00=0x00e9, f01=0x0190, f02=»$ 0$$ !!CH $$ X:B$$ 08$$ !!CH $$ X:C$$ 0$$ ( !!CH $$ X:D$$ 1$$ B !!CH $$ X:E$$ 00300$$ !!CH $$ X:F$$ 0$$ z !!CH $$ X:G$$ 0$$ !!CH $$ X:H$$ 0$$ !!CH $$ X:I$$ 1$$ !!CH $$ X:J$$ 1$$ !!CH $$ X:K$
0x2c6f20…2c70b4 (3, 7) Dummy {f00=0x00e9, f01=0x0190, f02=»$ !!EN KPF /S BEA /S $ KPF /O 2 SCR @ LED PAD L !!CH $$ X:A$$ 0$$ !!CH $$ X:B$$ 08$$ v !!CH $$ X:C$$ 0$$ !!CH $$ X:D$$ 1$$ !!CH $$ X:E$$ 00300$$ !!CH $$ X:F$$ 0$$ !!CH $$ X:G$
0x2c70b4…2c7248 Dummy {f00=0x00e9, f01=0x0190, f02=»$$ ~ !!CH $$ X:M$$ 1$$ !!CH $$ X:N$$ 1$$ $ !!CH $$ X:O$$ 0$$ > !!CH $$ X:P$$ 0$$ X !!EN r KPF /S ~ BEA /S KPF /O SCR LED PRINT !!CH $$ X:A$$ 0$$ !!CH $$ X:B$$ 08$$ !!CH $$ X:C$$
0x2c7248…2c73dc Dummy {f00=0x00e9, f01=0x0190, f02=»$ !!CH $$ X:I$$ 1$$ !!CH $$ X:J$$ 1$$ $ !!CH $$ X:K$$ 02$$ > !!CH $$ X:L$$ 1150$$ X !!CH $$ X:M$$ 1$$ t !!CH $$ X:N$$ 1$$ !!CH $$ X:O$$ 0$$ !!CH $$ X:P$$ 0$$ !!EN KPF /S BEA /S KPF
0x2c73dc…2c7570 Dummy {f00=0x00e9, f01=0x003c, f02=» LKE M KPF /L,PT3270 ASG /E0,TY10 , !!CH $$ X:K$$ 02$$ > !!CH $$ X:L$$ 1150$$ X !!CH $$ X:M$$ 1$$ t !!CH $$ X:N$$ 1$$ !!CH $$ X:O$$ 0$$ !!CH $$ X:P$$ 0$$ !!EN KPF /S BEA /S KPF
0x2c7570…2c7704 Dummy {f00=0x00e9, f01=0x2008, f02=» LKE M KPF /L,PT3270 ASG /E0,TY10 , !!CH $$ X:K$$ 02$$ > !!CH $$ X:L$$ 1150$$ X !!CH $$ X:M$$ 1$$ t !!CH $$ X:N$$ 1$$ !!CH $$ X:O$$ 0$$ !!CH $$ X:P$$ 0$$ !!EN KPF /S BEA /S KPF
0x2c7704…2c7898 Dummy {f00=0x00e9, f01=0x0190, f02=»IT INITIALIZE THE TASK * * P* COMINI COMMON INIT ROUTINE @ $ P* ECBINI INIT OF ECB:S n D P* TSTDEV TEST KEYBOARD AND DISPLAY * D P*
0x2c7898…2c7a2c Dummy {f00=0x00e9, f01=0x0190, f02=»************************************** | > P* * . > P* ENTRY POINTS * p > P* * > P********************
0x2c7a2c…2c7bc0 Dummy {f00=0x00e9, f01=0x0190, f02=»INE r P ENTRY ECBINI INIT OF ECB:S . P ENTRY MATCH MATCH TASID AND PHYS. ADDRESS 0 P b > P********************************************************** j > P* * > P* EXTERNAL REFERENC
0x2c7bc0…2c7d54 (3, 8) Opaque[0x194]
0x2c7d54…2c7ee8 # DirEnt {nam=»DCBSC «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1738, f03=0x0000}
0x2c7d54…2c7ee8 IdxSect {
0x2c7d54…2c7ee8 f00 = 0x00b9 // 0x2c7d54 @0x0
0x2c7d54…2c7ee8 f01 = 0x0010 // 0x2c7d56 @0x2
0x2c7d54…2c7ee8 gno = [ // 0x2c7d58 @0x4
0x2c7d54…2c7ee8 [0x00]: C0x00b9.0x3.0
0x2c7d54…2c7ee8 [0x01]: C0x00ba.0x0.0
0x2c7d54…2c7ee8 [0x02]: C0x00ba.0x1.0
0x2c7d54…2c7ee8 [0x03]: C0x00ba.0x2.0
0x2c7d54…2c7ee8 [0x04]: C0x00ba.0x3.0
0x2c7d54…2c7ee8 [0x05]: C0x00bb.0x0.0
0x2c7d54…2c7ee8 [0x06]: C0x00bb.0x1.0
0x2c7d54…2c7ee8 [0x07]: C0x00bb.0x2.0
0x2c7d54…2c7ee8 ]
0x2c7d54…2c7ee8 }
0x2c7ee8…2c807c Dummy {f00=0x00b9, f01=0x0190, f02=» 0 P IDENT DCBSC REL 11.0 83-11-15 870150541100 P 8 " P DK1, DEV. STATUS AT CONNECT @ P =2 TWO DC-LINES f P =1, CHARAC. ADDR. P 81-01-26 D P**************************************************************** D P*
0x2c807c…2c8210 Dummy {f00=0x00b9, f01=0x0190, f02=» MODULE HANDLING THE COMMUNICATION * D P* BETWEEN THE SLU AND CLUSTER CONTROLLER * @ @ P* (EMULATION 3270 BSC) * D P*
0x2c8210…2c83a4 Dummy {f00=0x00b9, f01=0x0190, f02=»********************* j @ P* * @ P* ROUTINES * b @ P* * @ P* DCINP DC-INPUT MAI
0x2c83a4…2c8538 Dummy {f00=0x00b9, f01=0x0190, f02=»FER * r @ P* TSTMES TEST MESSAGE * & @ P* SETSTA SET STATUS * j @ P* TSTSTA TEST STATUS * @ P* DCABOR ABOR
0x2c8538…2c86cc Dummy {f00=0x00b9, f01=0x0190, f02=»CATE OFFLINE TO CLUSTER * z @ P* TRPA TRANSMIT SHORT READ * . @ P* TRPF TRANSMIT READ MODIFIED * r @ P* * @ P**************
0x2c86cc…2c8860 Dummy {f00=0x00b9, f01=0x0190, f02=» D P* * D P* ENTRY POINTS * L D P* * D P********************************************
0x2c8860…2c89f4 (3, 9) Dummy {f00=0x00ba, f01=0x0190, f02=» x P ENTRY OPEN OPEN P ENTRY CONCT CONNECT PASSIVE P ENTRY DISCON DISCONNECT =2 D $ P ENTRY SETTYM SET REQUEST TIMER h P ENTRY TSTMES TEST MESSAGE. " P ENTRY DCABOR ABORT DC REQUEST $ P ENTRY TRPA TRANSMIT SHORT READ & P ENTRY
0x2c89f4…2c8b88 Dummy {f00=0x00ba, f01=0x0190, f02=»T WRITE DC BUFFER " P ENTRY READW READ DC WITH WAIT " P ENTRY RDSTAT READ STATISTICS @ P f B P************************************************************* n B P* * B P*
0x2c8b88…2c8d1c Dummy {f00=0x00ba, f01=0x018e, f02=»*************************************************** P < " P EXTRN GETBUF GET BUFFER (PAD) D & P EXTRN RELBUF RELEASE BUFFER (PAD) j 2 P EXTRN PAID STORE AID-CODE IN DC BUFFER (PAD) . P EXTRN SCRINF GET SCREEN INFORMATION (VDU) : P EXTRN BUFAD
0x2c8d1c…2c8eb0 Dummy {f00=0x00ba, f01=0x0190, f02=» h 0 P EXTRN DISMOD DISPLAY MODIFIED FIELDS (VDU) ( P EXTRN UNPACK UNPACK DC BUFFER (PAD) < & P EXTRN ERROR INDICATE ERROR (KEYB) h . P EXTRN RESKB RESET KEYBOARD BUFFER (KEYB) & P EXTRN LMP1ON SYSTEM AVAILABLE DK ( P EXTRN LMP3ON
0x2c8eb0…2c9044 Dummy {f00=0x00ba, f01=0x0190, f02=» > P* * > P* CONDITIONAL ASSEMBLY PARAMETERS * F > P* * > P*********************************************************
0x2c9044…2c91d8 Dummy {f00=0x00ba, f01=0x0190, f02=»0 REQUEST TIMEOUT IN 100 MS PREQTIM EQU 00300 $ * PX:L EQU 1000 MAX BUFFER SIZE IN WORDS < PBUFFL EQU 1150 j " PX:O EQU 0 TEST INCLUDED IF:=1 PTEST EQU 0 P EJECT D P***************************************************************
0x2c91d8…2c936c Dummy {f00=0x00ba, f01=0x018e, f02=» * D P*************************************************************** 8 P P* $ P* EQUATES FOR ECB HANDLING P* PECBBA EQU 2 BUFFER ADDRESS PECBRL EQU 4 REQUESTED LENGTH
0x2c936c…2c9500 Dummy {f00=0x00ba, f01=0x0190, f02=» r P* P* RELATIVE POS. IN ECBBLK P* 4 PDC EQU 4 > P EJECT N P* P* RELATIVE ADDRESSES IN f P* TERMINAL WORKBLOCK P* PWCC EQU 1952 WCC CHAR. ( PKBINH EQU WCC+2 KB INHIBIT INDICATOR 0 PDCLENG EQU KBINH+4
0x2c9500…2c9694 (3, 10) Dummy {f00=0x00ba, f01=0x0190, f02=» ECBBLK+14 BUFFER TO RELEASE PREGI EQU BUFPNT+2 SAVE AREA $ $ PECBDC1 EQU REGI+46 ECB DC LINE 1 H & PECBDC2 EQU ECBDC1+2 ECB DC LINE 2 p P* P* RELATIVE ADDRESSES IN P* COMMON WORKBLOCK P* PMF1CU EQU 0 SYMBOLIC ADDRESS
0x2c9694…2c9828 Dummy {f00=0x00ba, f01=0x0190, f02=» * @ P* DCINP DC INPUT MAIN ROUTINE * > @ P* * @ P************************************************************
0x2c9828…2c99bc Dummy {f00=0x00ba, f01=0x0190, f02=»****** j PDCINP EQU * P CF A14,GETBUF GET BUFFER " P LDR A3,A8 D " P CF A14,READW READ ONE BUFFER V P ANK A1,8 OK? | P RF(Z) DCIN10 YES P LDR A8,A12 " P CF A14,RELBUF RELEASE BUFFER P RF DCIN15 PDCIN10 EQU *
0x2c99bc…2c9b50 Dummy {f00=0x00ba, f01=0x0190, f02=»A14,DISMOD DISPLAY THE NEWS PDCIN15 EQU * $ P LD A1,KBINH,A11 8 P LDR A2,A1 P ( P ANK A1,1 KEYBOARD TOTALLY INHIBIT? b P RF(Z) DCIN20 NO , P ANK A2,/E KEYBOARD NOT TOTALLY INHIBIT P LD A1,WCC,A11 P ANK A1,2 RESTORE KEYBOARD?
0x2c9b50…2c9ce4 Dummy {f00=0x00ba, f01=0x0190, f02=» EQU * P ST A2,KBINH,A11 P LDK A1,0 & " P CF A14,SETSTA SET DEVICE END 8 P RTN A14 ^ P EJECT n B P************************************************************** | B P* * P
0x2c9ce4…2c9e78 Dummy {f00=0x00ba, f01=0x0190, f02=»**************** b P* REGISTERS P* , P* A8= DC ECB 6 P* A11= CREDIT WORK AREA J P* A13= RESERVED j P* B P************************************************************** POPEN EQU * & P LD A8,ECBDC1,A11 GET ECB ADDRESS
0x2c9e78…2ca00c Dummy {f00=0x00ba, f01=0x0190, f02=»2,A8 . =1 P LDK A7,/A1 OPEN P LKM * P DATA 1 6 P LD A1,ECBRC,A8 F P RF(N) OPEN20 ^ P IFT NBRLIN=2 t $ P LDR A4,A4 ANOTHER LINE TO OPEN P RF(NZ) OPEN20 NO P LD A8,ECBDC2,A11 GET LINE 2 , P LD A2,MF2CU,A3 GET SECO
0x2ca00c…2ca1a0 Dummy {f00=0x00ba, f01=0x0190, f02=»******************************************* > P* * 4 P* CONCT CONNECT PASSIVE v > P* * > P************************************************
0x2ca1a0…2ca334 (3, 11) Dummy {f00=0x00ba, f01=0x0190, f02=»ESERVED P* 6 P************************************************** PCONCT EQU * T P CF A14,GETBUF GET BUFFER h P LD A8,ECBDC1,A11 GET LINE 1 P LD A3,6,A13 GET BASE =2 P . =2 P IFT NBRLIN=2 . =2 $ P LD A1,MAIN,A11
0x2ca334…2ca4c8 Dummy {f00=0x00ba, f01=0x0190, f02=»NC10 EQU * P ST A12,ECBBA,A8 P LDR* A1,A11 GET TASKID * P ANK A1,/FF J ( P SC A1,+1,A12 SAVE ADDRESS IN BUFFER ^ P LDK A1,2 LENGTH P ST A1,ECBRL,A8 * P ST A4,ECBCW1,A8 SET DEVICE STATUS DK1 P . =2 P LD A1,MF1CU,A3
0x2ca4c8…2ca65c Dummy {f00=0x00ba, f01=0x0190, f02=»PHYS. ADDRESS n P LD A2,ECBCW2,A8 GET ADDRESS * P SC A2,+2,A1 SAVE IT FOR COPY COMMAND : P . =2 h P LDR A8,A12 x " P CF A14,RELBUF RELEASE BUFFER P RTN A14 P EJECT . =2 B P**************************************************
0x2ca65c…2ca7f0 Dummy {f00=0x00ba, f01=0x0190, f02=»**** V P* $ P* INPUT: A11 = CREDIT WORK AREA P* > P* USED* A1,A7,A8 H P* b D P*************************************************************** l P* PDISCON EQU * . =2 ( P CF A14,DCABOR ABORT TEST MESSAGE =2 P LDK
0x2ca7f0…2ca984 Dummy {f00=0x00ba, f01=0x0190, f02=»********************************* p P* * P* SETTYM SET REQUEST TIMEOUT 4 P* X F P***************************************************************** b P* REGISTERS P* P* F P****************************************
0x2ca984…2cab18 Dummy {f00=0x00ba, f01=0x0190, f02=»M GET TIMEOUT VALUE PSETT10 EQU * P ST A1,ECBCW1,A8 0 P LDK A7,/B9 SET TIMEOUT H P LKM h P DATA 1 t P IFT NBRLIN=2 P LDR A4,A4 MORE TO TIME? P RF(NZ) SETT20 NO P LD A8,ECBDC2,A11 GET LINE 2 P LDK A4,1 NO MOR
0x2cab18…2cacac Dummy {f00=0x00ba, f01=0x0190, f02=»************* d > P* * P* READW RECEIVE X > P* * p > P********************************************************* P* REGISTERS P
0x2cacac…2cae40 Dummy {f00=0x00ba, f01=0x0190, f02=»********************************************* PREADW EQU * 6 P LD A8,ECBDC1,A11 LINE 1 J P IFT NBRLIN=2 j P LD A1,MAIN,A11 MORE LINES P RF(Z) REDW10 NO P LD A8,ECBDC2,A11 LINE 2 PREDW10 EQU * P XIF $ P LDKL A1,BUFFL
0x2cae40…2cafd4 (3, 12) Dummy {f00=0x00ba, f01=0x0190, f02=»,ECBRC,A8 P ANK A1,/5B OK? P RF(Z) REDW20 YES * P CF A14,CHKSTA CHECK STATUS D P LDK A1,8 INDICATE ERROR h P RF REDW30 PREDW20 EQU * P LDK A1,2 PREDW30 EQU * P RTN A14 P EJECT > P**********************
0x2cafd4…2cb168 Dummy {f00=0x00ba, f01=0x0190, f02=» * > P********************************************************* > P* REGISTERS P* 0 P* A1= AT ENTRY CHAIN INDICATOR, RETURN CODE P* A8= DC ECB P* A9= DC BUFFER LENGTH P* A1
0x2cb168…2cb2fc Dummy {f00=0x00ba, f01=0x0190, f02=» P LD A8,ECBDC1,A11 LINE P IFT NBRLIN=2 & P LD A1,MAIN,A11 LINE 2? < P RF(Z) DCWR10 NO P LD A8,ECBDC2,A11 LINE 2 t PDCWR10 EQU * P XIF , P LDK A2,2 KEYBOARD INHIBIT BUT RESETABLE P ORS A2,KBINH,A11 P LDK A7,/8
0x2cb2fc…2cb490 Dummy {f00=0x00ba, f01=0x0190, f02=»ROR? z P ANK A1,/5B ! P RF(Z) DCWR90 NO ! P CF A14,ERROR ! 8 " P CF A14,CHKSTA CHECK DC STATUS ! N P LD A1,KBINH,A11 ! t $ P ANK A1,/D RESET KEYBOARD PARTLY ! P ST A1,KBINH,A11 ! $ P CF A14,LMP3OF INHIBIT LAMP OFF ! " P CF A14,RESKB RESET
0x2cb490…2cb624 Dummy {f00=0x00ba, f01=0x0190, f02=»******************* ! j > P* * " > P* TSTMES TEST IF ANY MESSAGE, NO WAIT * " ^ > P* * " > P**************************************
0x2cb624…2cb7b8 Dummy {f00=0x00ba, f01=0x018e, f02=»RESS TO ECB AREA " P* # > P********************************************************* # " PTSTMES EQU * # d P LD A8,ECBDC1,A11 LINE 1 # x P IFT NBRLIN=2 # P LD A1,MAIN,A11 LINE 2 # P RF(Z) TSTM10 NO # P LD A8,ECBDC2,A11 LINE 2 # PTSTM
0x2cb7b8…2cb94c Dummy {f00=0x00ba, f01=0x0190, f02=» # P DATA 1 $ P RTN A14 $ P EJECT $ ( B P************************************************************* $ 6 B P* * $ | B P* SETSTA SET STATUS * $ B P
0x2cb94c…2cbae0 Dummy {f00=0x00ba, f01=0x0190, f02=» P* REGISTERS % P* % P* A1= AT ENTRY STATUS % " P* A8= DC ECB % @ P* A11= RESERVED % T P* A13= ADDRESS TO ECB AREA % l P* % @ P************************************************************ % PSETSTA EQU * % P LD A8,ECBDC1,A11 %
0x2cbae0…2cbc74 (3, 13) Dummy {f00=0x00bb, f01=0x0190, f02=»/B8 % P ST A1,ECBCW1,A8 & P LKM & $ P DATA 1 & 0 P RTN A14 & @ P EJECT & P : P****************************************************** & ^ : P* * & : P* TSTSTA TEST STATUS
0x2cbc74…2cbe08 Dummy {f00=0x00bb, f01=0x0190, f02=» P* REGISTERS ' P* ' P* A1= RETURN CODE ' " P* A8= DC ECB ' < P* A11= RESERVED ' P P* A13= ADDRESS TO ECB AREA ' h P* ' : P***************************************************** ' PTSTSTA EQU * ' P LD A8,ECBDC1,A11 LINE 1 ' P I
0x2cbe08…2cbf9c Dummy {f00=0x00bb, f01=0x0190, f02=» & P CM ECBCW1,A8 INDICATE TEST STATUS ( P LDK A7,/80 ( . P LKM ( B P DATA 1 ( N P LD A1,ECBCW1,A8 ( ^ P RTN A14 ( v P EJECT ( J P********************************************************************* ( P* ( P* RDSTAT READ STATISTICS (
0x2cbf9c…2cc130 Dummy {f00=0x00bb, f01=0x0190, f02=» J P********************************************************************* ) PRDSTAT EQU * ) R P IFT TEST=1 ) f P LD A8,ECBDC1,A11 ) z P IFT NBRLIN=2 ) " P LD A1,MAIN,A11 THE OTHER LINE ) P RF(Z) RDST10 NO ) P LD A8,ECBDC2,A11 ) PRDST10
0x2cc130…2cc2c4 Dummy {f00=0x00bb, f01=0x0190, f02=»NO RESET AFTERWARDS ) P LDK A7,/AD * P LKM * 0 P DATA 1 * < P RTN A14 * L P XIF * P EJECT * h > P********************************************************** * v > P* * * > P* DCABO
0x2cc2c4…2cc458 Dummy {f00=0x00bb, f01=0x0190, f02=»**************************************** * ~ P* REGISTERS + 0 P* + D P* A8= DC ECB + N ( P* A11= ADDRESS TO CREDIT WORK AREA + b P* A13= ADDRESS TO ECB AREA + P* + > P********************************************************* + PDCABOR EQU *
0x2cc458…2cc5ec Dummy {f00=0x00bb, f01=0x0190, f02=»LINE 2 + ~ PDCAB10 EQU * . =2 , P XIF , ( P LDK A7,0 , 4 P LKM , F P DATA 10 , R P LDR A7,A7 OK? , b , P RF(NZ) DCAB20 NO, ALREADY COMPLETED =2 , x P CM ECBBLK+DC,A11 , PDCAB20 EQU * . =2 , P RTN A14 , P EJECT , P* , P* ,
0x2cc5ec…2cc780 Dummy {f00=0x00bb, f01=0x018e, f02=»ERVED , | P* 2 RESERVED - P* - 0 $ P* 9 REQUEST TIMEOUT - : $ P* 11 SEQUENCE ERROR - b & P* 12 INCORRECT LENGTH - P* 13 RESERVED - ( P* 14 TRANSMISSION ERROR - " P*
0x2cc780…2cc914 (3, 14) Dummy {f00=0x00bb, f01=0x0190, f02=» : P* * . : P* CHKSTA CHECK DC STATUS * . B : P* * . : P****************************************************** . P* REGISTERS
0x2cc914…2ccaa8 Dummy {f00=0x00bb, f01=0x0190, f02=»***************************************************** . PCHKSTA EQU * / > P CF A14,TSTSTA TEST STATUS / R P ANKL A1,/2211 LINE OK? / t P XRKL A1,/2211 / P RF(NZ) CHKS10 NO / P CF A14,LMP1ON SYSTEM AVAIL. / P RF CHKS20 / PCHKS10 EQU * /
0x2ccaa8…2ccc3c Dummy {f00=0x00bb, f01=0x0190, f02=»*********************** / n > P* * 0 > P* DCOFLN INDICATE OFFLINE TO CLUSTER * 0 b > P* * 0 > P**********************************
0x2ccc3c…2ccdd0 Dummy {f00=0x00bb, f01=0x018e, f02=»****************************************** 0 PDCOFLN EQU * 1 2 P IFT OFLIN=1 1 F P CF A14,DCABOR 1 Z P XIF 1 p P RTN A14 1 | P EJECT 1 : P***************************************************** 1 : P*
0x2ccdd0…2ccf64 Dummy {f00=0x00bb, f01=0x0190, f02=» : P***************************************************** 2 P* REGISTERS 2 B P* 2 V P* A2= AID CODE 2 ` P* A11= CREDIT WORK AREA 2 v P* A13= RESERVED 2 P* 2 : P***************************************************** 2 PTRPA EQU * 2 & P
0x2ccf64…2cd0f8 Dummy {f00=0x00bb, f01=0x0190, f02=»RELEASE 2 z " P CF A14,RELBUF RELEASE BUFFER 3 P RTN A14 3 6 P EJECT 3 F : P****************************************************** 3 T : P* * 3 : P* TRPF TRANSMIT MODIFIED READ AT PF-KEY * 3
0x2cd0f8…2cd28c Dummy {f00=0x00bb, f01=0x0190, f02=»ISTERS 3 P* 4 P* A2= AID CODE 4 P* A4= REL CURSOR POS. 4 . P* A5= RESERVED 4 L P* A6= RESERVED 4 b P* A11= CREDIT WORK AREA 4 x P* A13= RESERVED 4 P* 4 : P****************************************************** 4 PTRPF EQU * 4 &
0x2cd28c…2cd420 Dummy {f00=0x00bb, f01=0x40b6, f02=»URSOR ADDRESS 4 2 P CF A14,BUFADR STORE CURSOR ADDRESS IN BUFFER 5 > P CF A14,PACK PACK BUFFER WITH MODIFIED FIELDS AND TRANSMIT 5 L P RTN A14 5 P 5 P END 5 @ 5 : P****************************************************** 4 PTRPF EQU * 4 &
0x2cd420…2cd5b4 (3, 15) Dummy {f00=0x00bb, f01=0x2008, f02=» 6 FIED FIELDS v CF A14,DCWRTE TRANSMIT RTN A14 < L END T@ `RANSMIT BUFFER P & ! LD A1,SNAMOD,TCABAS GET SNA MODE z CWK A1,2 SYSTEM MODE? RF(E) TRPF10 YES * % CF A14,SCRINF GET SCREEN INFORMATION
0x2cd5b4…2cd748 Dummy {f00=0x00bb, f01=0x0190, f02=»AST LINE 6 z P ANKL A10,ENDPRT END MESS.? 7 P RF(Z) COP900 NO STOP IT 7 4 ( P ORKL A10,NTONLY INDICATE PRINTABLE 7 T " P CF A14,PRLINE EXTRA LINE FEED 7 P XIF . =24 7 P IFT BASWRI=1 . =24 7 , P LDR A9,A9 SOME TEXT LEFT TO PRINT? =24 7 P R
0x2cd748…2cd8dc Dummy {f00=0x00bb, f01=0x018e, f02=» MESS. DK38 7 | P ANKL A1,ENDPRT DK38 8 P RF(Z) COP870 DK38 8 2 2 P ANKL A10,NOEMLF TEST IF EXTRA LF NECESS. DK38 8 N $ P RF(NZ) COP870 NO, SKIP IT DK38 8 , P ORKL A10,NTONLY INDICATE PRINTABLE =24 8 & P CF A14,PRLINE EXTRA LINEFEED =24 8 P X
0x2cd8dc…2cda70 Dummy {f00=0x00bb, f01=0x018e, f02=» 8 PCOP900 EQU * 9 P LDR A1,A1 PRINTER FAILED? 9 P RF(Z) COP950 NO 9 > P LD A2,WCC,A11 . =32 9 V $ P CWK A2,/38 LOCAL HARDCOPY? =32 9 r ( P RF(E) COP910 YES. SKIP PRINTING =32 9 PCOP902 EQU * 9 2 P CF A14,TSTPRT WAIT UNTIL PRINTER OPERABLE =
0x2cda70…2cdc04 Dummy {f00=0x00bb, f01=0x0190, f02=» P DATA 6 : P RB COP902 : PCOP905 EQU * : ( " P ABL COPP RESUME PRINTING =34 : > PCOP910 EQU * . =32 : d " P LDKL A2,PRTERR INDICATE ERROR : ~ P ORS A2,PRTMOD,A11 : PCOP950 EQU * : P RTN A14 : P EJECT : P IFT P6883=1 : P
0x2cdc04…2cdd98 Dummy {f00=0x00bb, f01=0x0190, f02=»O INSERTS 'OF' AND '0E' CHARS. : P* TO SELECT OPTIONAL ROM.... ; & P* ; J PDKEDIT EQU * ; T " P LDR* A1,A11 GET TASK ID DK43 ; j P CWK A1,'L1' 6883 PRINTER? ; P RF(NE) DKED90 NO, SKIP IT ; P CCK A2,/5D SPECIAL ? ; P RF(NE) DKED10 NOT Y
0x2cdd98…2cdf2c Dummy {f00=0x00bb, f01=0x0190, f02=»DKED20 NOT YET ; P LDK A2,/25 REPLACE < P RF DKED80 < 4 PDKED20 EQU * < H P CCK A2,/5C SPECIAL? < ^ P RF(NE) DKED30 NOT YET < z P LDK A2,/26 REPLACE < P RF DKED80 < PDKED30 EQU * < P RF DKED90 NOTHING SPECIAL < P* <
0x2cdf2c…2ce0c0 Dummy {f00=0x00bb, f01=0x0190, f02=»ERT CORRECTED CODE < P ADKL A8,1 UPDATE POINTER = " P LDK A2,SI SHIFT IN TO BUFFER = > * P* LET OLD CODING INSERT IT IN BUFFER = d & P LDK A1,2 ACCUMULATE EXTRA CHARS. = P ADS A1,REGI,A11 = PDKED90 EQU * = P RTN A14 = P XIF =
0x2ce0c0…2ce254 (3, 16) Opaque[0x194]
0x2ce254…2ce3e8 # DirEnt {nam=»DSPBSC«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1548, f03=0x0000}
0x2ce254…2ce3e8 IdxSect {
0x2ce254…2ce3e8 f00 = 0x00aa // 0x2ce254 @0x0
0x2ce254…2ce3e8 f01 = 0x000c // 0x2ce256 @0x2
0x2ce254…2ce3e8 gno = [ // 0x2ce258 @0x4
0x2ce254…2ce3e8 [0x00]: C0x00aa.0x1.0
0x2ce254…2ce3e8 [0x01]: C0x00ac.0x1.0
0x2ce254…2ce3e8 [0x02]: C0x00b4.0x2.0
0x2ce254…2ce3e8 [0x03]: C0x00b4.0x3.0
0x2ce254…2ce3e8 [0x04]: C0x00b5.0x0.0
0x2ce254…2ce3e8 [0x05]: C0x00b5.0x1.0
0x2ce254…2ce3e8 ]
0x2ce254…2ce3e8 }
0x2ce3e8…2ce57c Dummy {f00=0x00aa, f01=0x0190, f02=» 2 P IDENT DSPBSC REL 11.0 83-11-16DK 870150541100 P : " P DK2, DEV. STATUS AT CONNECT B P #1 HARDCOPY PROBLEM h P 82-06-25 P DK1, POWER OFF ON TERM.. B P************************************************************* B P*
0x2ce57c…2ce710 Dummy {f00=0x00aa, f01=0x0190, f02=»* MODULE HANDLING THE START UP OF THE * B P* VDUKB TASK, CONTROLLING SNA MODES * F B P* AND MULTIPLE WAIT FOR KB AND DC. * < P* (EMULATION 3270 BSC)
0x2ce710…2ce8a4 Dummy {f00=0x00aa, f01=0x0190, f02=»***** X P EJECT D P**************************************************************** D P* * d D P* LIST OF ROUTINES * D P*
0x2ce8a4…2cea38 Dummy {f00=0x00aa, f01=0x0190, f02=» I/O ACTIVATION $ P* IOCPL I/O COMPLETION . P* MATCH MATCH ADDRESS AND TASKID D D P* INIT INITIALIZE THE TASK * v * P* COMINI COMMON INIT ROUTINE $ P* ECBINI INIT OF EC
0x2cea38…2cebcc Dummy {f00=0x00aa, f01=0x0190, f02=» * D P**************************************************************** P EJECT > P********************************************************** j > P* * > P* ENTRY POINTS
0x2cebcc…2ced60 Dummy {f00=0x00aa, f01=0x0190, f02=»**************************** r P $ 0 P ENTRY VDUKB START LABEL FROM DATSNA(CREDIT) , & P ENTRY COMINI COMMON INIT ROUTINE ` P ENTRY ECBINI INIT OF ECB:S . P ENTRY MATCH MATCH TASID AND PHYS. ADDRESS P > P********************************
0x2ced60…2ceef4 (3, 17) Dummy {f00=0x00ac, f01=0x0190, f02=» * l > P* * > P********************************************************** ` P , P EXTRN I:EVA0 CREDIT EVALUATION ROUTINE P EXTRN OPEN OPEN DC (DCBSC) $ P EXTRN CON
0x2ceef4…2cf088 Dummy {f00=0x00ac, f01=0x0190, f02=»XTRN TSTMES TEST IF ANY MESSAGE (DCSNA) 4 P EXTRN READKB READ KEYBOARD WITH NO WAIT (KEYB) 0 4 P EXTRN KBINP MAIN ROUTINE IN KEYB-MODULE (KEYB) h 6 P EXTRN DCINP MAIN ROUTINE IN DCSNA-MODULE (DCSNA) * P EXTRN LMP6OF OFFLINE LAMP OFF (KEYB) " P
0x2cf088…2cf21c Dummy {f00=0x00ac, f01=0x0190, f02=»5ON ERROR LAMP ON (KEYB) ( P EXTRN LMP5OF ERROR LAMP OFF (KEYB) . P EXTRN RESKB RESET KEYBOARD BUFFER (KEYB) L 0 P EXTRN STOINF SAVE SCREEN INFORMATION (VDU) ~ ( P EXTRN ICVRED INTERTASK READ (KEYB) ( P EXTRN ICINP INTERTASK INPUT (KEYB) *
0x2cf21c…2cf3b0 Dummy {f00=0x00ac, f01=0x0190, f02=» KEYBOARD r P EJECT B P************************************************************* B P* * f B P* CONDITIONAL ASSEMBLY PARAMETERS * B P*
0x2cf3b0…2cf544 Dummy {f00=0x00ac, f01=0x0190, f02=» NUMBER OF TASKS (1- ) PNBRTSK EQU 16 & PX:C EQU 0 OFFLINE HANDLING IF :=1 4 POFLIN EQU 0 ^ $ PX:D EQU 1 NUMBER OF LINES (1-2) r PNBRLIN EQU 2 * PX:M EQU 0 COPY COMMNAND INCLUDED IF:=1 PCOPCMD EQU 1 " PX:O EQU 0 TEST INCLUDED
0x2cf544…2cf6d8 Dummy {f00=0x00ac, f01=0x0190, f02=» * z & P* DECLARATIONS OF DATA AND EQUATES . @ P* * X @ P*********************************************************** P P* P* ECB INDEX TABLE
0x2cf6d8…2cf86c Dummy {f00=0x00ac, f01=0x0190, f02=»X'4004' ECB SIGNAL DISPLAY P DATA X'4206' ECB VDU " $ P DATA X'5008' ECB INTERTASK READ @ & P DATA X'510A' ECB INTERTASK WRITE h P DATA X'610C' ECB DC LINE1 " P DATA X'620E' ECB DC LINE2 DK ( P DATA X'2110' ECB FOR NUMERIC KB DK P*
0x2cf86c…2cfa00 Dummy {f00=0x00ac, f01=0x0190, f02=»DCOPY OUTSTANDING | P* P* TASK IDENTIFICATION CODE $ P* F PVDUCOD EQU 'VV' KB/VDU P P EJECT n P* | P* RELATIVE ADDRESSES IN P* TERMINAL WORKBLOCK TB1 P* POFFFLG EQU 1962 OFFLINE FLAG * PPRTID EQU OFFFLG+2 T
0x2cfa00…2cfb94 (3, 18) Dummy {f00=0x00b4, f01=0x0190, f02=»E AREA z PBSCMOD EQU REGI+32 BSC MODE " PECBTAB EQU BSCMOD+2 ECB TABLE 2 P* X P* RELATIVE ADDRESSES IN b P* COMMON WORKBLOCK CB1 P* * PMF1CU EQU 0 SYMBOLIC CLUSTER ADDDRESS P IFF TEST=1 " PTSKTAB EQU MF1CU+26 TASK TAB
0x2cfb94…2cfd28 Dummy {f00=0x00b4, f01=0x0190, f02=»***************************** t > P* * & > P* VDUKB MAIN ROUTINE * h > P* * > P****************************
0x2cfd28…2cfebc Dummy {f00=0x00b4, f01=0x0190, f02=»************************************** PVDUKB EQU * . $ P CF A14,INIT INITIALIZE THE TASK B PVDU200 EQU * j " P CF A14,IOACT PREPARE ECB-BLK ~ P LDKL A7,ECBBLK P ADR A7,A11 P LKM P DATA 7 MULTIPLE WAIT & P CF A14,IOCPL
0x2cfebc…2d0050 Dummy {f00=0x00b4, f01=0x0190, f02=»* P* P* P* P* MODE /0000 /4000 ( P* L P* V P* BLK 2 3 ` P* KB KB P* DC DC P* IC P* P* P*
0x2d0050…2d01e4 Dummy {f00=0x00b4, f01=0x0190, f02=» * ^ ( P* IOACT I/O ACTIVATION @ P* * > @ P************************************************************ P* REGISTERS P* ( P* A4= NUMBER OF ENTRIES
0x2d01e4…2d0378 Dummy {f00=0x00b4, f01=0x018e, f02=»******** ^ PIOACT EQU * $ P LDK A4,1 COUNT NUMBER OF I-O'S $ P . #1 L , P LD A2,ECBBLK+4,A11 REQ. ALREADY OUTST.? P RF(NZ) IOAC10 YES P CF A14,TSTMES TEST MESSAGE P ST A8,ECBBLK+4,A11 PIOAC10 EQU * P IFT COPCMD=1
0x2d0378…2d050c Dummy {f00=0x00b4, f01=0x0190, f02=» P LD A2,ECBBLK+8,A11 0 P RF(NZ) IOAC30 INTERTASK ALREDY OUTSTANDING " P CF A14,ICVRED READ INTERATSK T P ST A8,ECBBLK+8,A11 z PIOAC30 EQU * P ADK A4,1 ( P LD A2,ECBBLK+2,A11 KB OUTSTANDING? P RF(NZ) IOAC35 YES P CF A1
0x2d050c…2d06a0 Dummy {f00=0x00b4, f01=0x0190, f02=»4,1 ( P LD A2,ECBBLK+6,A11 KB2 OUTSTANDING P RF(NZ) IOAC40 YES 8 ( P CF A14,READK2 READ SECOND KEYBOARD T P ST A8,ECBBLK+6,A11 P** END DK ** PIOAC40 EQU * * P ST A4,ECBBLK,A11 SAVE NUMBER OF WAITS P RTN A14
0x2d06a0…2d0834 (3, 19) Dummy {f00=0x00b4, f01=0x0190, f02=» * ^ ( P* IOCPL I/O COMPLETION @ P* * > @ P************************************************************ P* REGISTERS P* P* A11= CREDIT WORK AREA P* A1
0x2d0834…2d09c8 Dummy {f00=0x00b4, f01=0x018e, f02=»1 KB INPUT ~ P RF(NE) IOCP05 NO P CM ECBBLK+2,A11 , " P CF A14,KBINP TAKE CARE OF KB D P RF IOCP90 j 6 P** SECOND KEYBOARD HANDLING P & T,81-10-19 DK ** | PIOCP05 EQU * $ P CW A8,ECBBLK+6,A11 KB2 INPUT ? P RF(NE) IOCP10 NO
0x2d09c8…2d0b5c Dummy {f00=0x00b4, f01=0x0190, f02=» P CW A8,ECBBLK+4,A11 DC? P RF(NE) IOCP20 NO ( P CM ECBBLK+4,A11 B " P CF A14,DCINP TAKE CARE OF DC Z P RF IOCP90 PIOCP20 EQU * P CM ECBBLK+8,A11 ( P CF A14,ICINP TAKE CARE OF INTERTASK PIOCP90 EQU * P RTN A14
0x2d0b5c…2d0cf0 Dummy {f00=0x00b4, f01=0x0190, f02=»RESS n P* D P*************************************************************** P* REGISTERS ^ P* z P* D P**************************************************************** PMATCH EQU * P IFT COPCMD=1 ( P LDK A1,
0x2d0cf0…2d0e84 Dummy {f00=0x00b4, f01=0x018e, f02=»ESS? z P RF(E) MATC30 YES P ADK A3,4 NEXT & P SUK A1,1 ALL CHECKED? < P RB(NZ) MATC10 NO Z PMATC20 EQU * t P LDK A1,1 INDICATE NOT FOUND P RF MATC90 PMATC30 EQU * P LCR A1,A3 , P CCK A1,VDUCOD COPY IN RIGHT DIRECTI
0x2d0e84…2d1018 Dummy {f00=0x00b4, f01=0x018e, f02=» @ P************************************************************ @ P* * H @ P* INIT INITIALIZE THE TASK * @ P*
0x2d1018…2d11ac Dummy {f00=0x00b4, f01=0x0190, f02=» v P* A13= RESERVED P* 6 P************************************************* * PINIT EQU * d P CF A14,COMINI COMMON INIT v P CF A14,ECBINI INIT OF ECB:S P CF A14,OPEN OPEN DC P LDKL A8,20 P LKM P DATA 6 . P
0x2d11ac…2d1340 Dummy {f00=0x00b4, f01=0x018e, f02=»YM SET REQUEST TIMEOUT * P LDK A2,NBRTSK NUMBER OF TASK ENTRIES , P LD A9,REGI,A11 RESTORE TASKTAB ADDRESS L PINIT10 EQU * | P SUK A2,1 P RF(N) INIT20 P ADKL A9,4 P LCR A1,A9 P ANK A1,/FF ANY TASK AT ALL? P RB(Z) I
0x2d1340…2d14d4 (3, 20) Dummy {f00=0x00b5, f01=0x0190, f02=» PINIT20 EQU * P IFT OFLIN=1 P LD A1,2,A14 , P LD A2,4,A14 @ P ST A12,4,A14 T P ST A13,2,A14 j P STR A2,A14 P ST A1,-2,A14 $ P SUKL A14,4 UPDATE STACK POINTER P CM OFFFLG,A11 ( P CF A14,LMP6OF TURN OFF OFFLINE
0x2d14d4…2d1668 Dummy {f00=0x00b5, f01=0x0190, f02=»MATION p ( P CF A14,ERASE ERASE THE WHOLE SCREEN P IFT NBRLIN=2 : P LD A1,MAIN,A11 DC LINE 1? P P RF(Z) INIT30 YES r & P CF A14,LMP2ON INDICATE DC LINE 2 P RF INIT40 PINIT30 EQU * P XIF & P CF A14,LMP1ON INDICATE DC LINE
0x2d1668…2d17fc Dummy {f00=0x00b5, f01=0x0190, f02=»********************** l > P* * > P* COMINI COMMON INIT ROUTINE * ` > P* * > P************************************
0x2d17fc…2d1990 Dummy {f00=0x00b5, f01=0x0190, f02=» > P********************************************************** ! PCOMINI EQU * ! F P CF A14,I:EVA0 ! Z $ P LDR A11,A9 LOAD TASK AREA BASE ! p P LDR* A2,A11 GET TASKID ! " P LD A3,6,A13 COMMON BLOCK BASE ! P LDR A1,A2 ! P ANK A1,X'FF' ! * P S
0x2d1990…2d1b24 Dummy {f00=0x00b5, f01=0x0190, f02=»NT TO YOUR LABLE ! ( P ST A1,REGI,A11 SAVE TASKTAB ADDRESS " P SC A2,+1,A1 SAVE TASKID " D P SRL A2,8 " d P SCR A2,A1 " v P RTN A14 " P EJECT " P* " P* " P* ECB TABLE LAYOUT " P* " P* " P* " 4 P* DISPLACEMENT
0x2d1b24…2d1cb8 Dummy {f00=0x00b5, f01=0x0190, f02=» /30 " j 2 P* 4 SIGNAL/DISP. /40 # 2 P* 6 VDU /42 # F 2 P* 8 INTERTASK R. /50 # | 2 P* 10 INTERTASK W. /51 # 2 P* 12 DC LI
0x2d1cb8…2d1e4c Dummy {f00=0x00b5, f01=0x0190, f02=»******************************************************* # B P* * $ @ B P* ECBINI INIT OF ECB:S * $ B P*
0x2d1e4c…2d1fe0 Dummy {f00=0x00b5, f01=0x0190, f02=»NTRIES $ ~ P* A5 = NUMBER OF FC ALLOWED % P* A6 = DAT POINTER % 2 P* A7 = ECB FC POINTER % L P* A8 = DATA SET POINTER % j P* A11= CREDIT WORK AREA % P* A13= RESERVED % P* % @ P************************************************************
0x2d1fe0…2d2174 (3, 21) Dummy {f00=0x00b5, f01=0x0190, f02=»A13 % P LDR A6,A8 DAT POINTER & P SUKL A8,20 DATA SET POINTER & * PECBI10 EQU * & N P LD A5,ECBIND NUMBER OF FC:S & b & P LDKL A7,ECBIND+2 FIRST FILE CODE & P LC A2,+1,A6 DATA SET FC & PECBI20 EQU * & * P CCR A2,A7 FC IN DAT = FC CONFIGURED
0x2d2174…2d2308 Dummy {f00=0x00b5, f01=0x0190, f02=»C & | P ST A1,REGI,A11 ' P LKM ' " P DATA 3 WRONG GENERATION ' . PECBI30 EQU * ' N $ P SC A2,+1,A8 SAVE FC IN DATA SET ' b ( P LD A2,+2,A6 GET FIXED LENGTH IF ANY ' " P ST A2,+4,A8 SAVE IN DATA SET ' * P LD A2,+18,A8 GET FIXED BUFFER IF ANY ' "
0x2d2308…2d249c Dummy {f00=0x00b5, f01=0x0190, f02=»B,A2 SAVE ECB ADDRESS ' P ADK A6,4 ( P SUKL A8,20 ( 0 P SUK A4,1 ALL DONE? ( D P RB(NZ) ECBI10 NO ( ` P RTN A14 ( z P EJECT ( B P************************************************************* ( B P*
0x2d249c…2d2630 Dummy {f00=0x00b5, f01=0x018e, f02=» * ( j B P************************************************************* ) P* REGISTERS ) f P* ) z P* A11= CREDIT WORK AREA ) P* A13= RESERVED ) P* ) 6 P************************************************* ) PTSTDEV E
0x2d2630…2d27c4 Dummy {f00=0x00b5, f01=0x4090, f02=» P LKM * P DATA 0 SWITCH TASKS * P RB TSTDEV TRY AGAIN DK1 * . PTSTD90 EQU * DK1 * N P RTN A14 * h P * x P END * @ * T WORK AREA ) P* A13= RESERVED ) P* ) 6 P************************************************* ) PTSTDEV E
0x2d27c4…2d2958 Dummy {f00=0x00b5, f01=0x2008, f02=» + * ! j @ <************************************************************ " I/OACT EQU * " b * & DATA VDU400 ACT. ONLY KB IN OPEN MODE " v . * DATA VDU300 ACT. KB AND DC IN SYSTEM MODE " . * DATA VDU300 ACT. KB AND DC IN MY JOB MODE "
0x2d2958…2d2aec Dummy {f00=0x00b5, f01=0x0190, f02=»
[…0x1…]
0x2d2c80…2d2e14 (3, 22) Opaque[0x194]
0x2d2e14…2d2fa8 # DirEnt {nam=»KEYB «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1da0, f03=0x0000}
0x2d2e14…2d2fa8 IdxSect {
0x2d2e14…2d2fa8 f00 = 0x00ed // 0x2d2e14 @0x0
0x2d2e14…2d2fa8 f01 = 0x002e // 0x2d2e16 @0x2
0x2d2e14…2d2fa8 gno = [ // 0x2d2e18 @0x4
0x2d2e14…2d2fa8 [0x00]: C0x00ed.0x0.0
0x2d2e14…2d2fa8 [0x01]: C0x00ed.0x1.0
0x2d2e14…2d2fa8 [0x02]: C0x00ed.0x2.0
0x2d2e14…2d2fa8 [0x03]: C0x00ed.0x3.0
0x2d2e14…2d2fa8 [0x04]: C0x00ee.0x0.0
0x2d2e14…2d2fa8 [0x05]: C0x00ee.0x1.0
0x2d2e14…2d2fa8 [0x06]: C0x00ee.0x2.0
0x2d2e14…2d2fa8 [0x07]: C0x00ee.0x3.0
0x2d2e14…2d2fa8 [0x08]: C0x00ef.0x0.0
0x2d2e14…2d2fa8 [0x09]: C0x00ef.0x1.0
0x2d2e14…2d2fa8 [0x0a]: C0x00ef.0x2.0
0x2d2e14…2d2fa8 [0x0b]: C0x00ef.0x3.0
0x2d2e14…2d2fa8 [0x0c]: C0x00f0.0x0.0
0x2d2e14…2d2fa8 [0x0d]: C0x00f0.0x1.0
0x2d2e14…2d2fa8 [0x0e]: C0x00f0.0x2.0
0x2d2e14…2d2fa8 [0x0f]: C0x00f0.0x3.0
0x2d2e14…2d2fa8 [0x10]: C0x00f1.0x0.0
0x2d2e14…2d2fa8 [0x11]: C0x00f1.0x1.0
0x2d2e14…2d2fa8 [0x12]: C0x00f1.0x2.0
0x2d2e14…2d2fa8 [0x13]: C0x00f1.0x3.0
0x2d2e14…2d2fa8 [0x14]: C0x00f2.0x0.0
0x2d2e14…2d2fa8 [0x15]: C0x00f2.0x1.0
0x2d2e14…2d2fa8 [0x16]: C0x00f2.0x2.0
0x2d2e14…2d2fa8 ]
0x2d2e14…2d2fa8 }
0x2d2fa8…2d313c Dummy {f00=0x00ed, f01=0x0190, f02=» 2 P IDENT KEYB REL 11.0 DK 830113 NJ 870150541100 P DK3 PA 4-9 830113 NJ : $ P DK2 RESTORE A1 AFTER DC ABRT Z P DK1,ERASE ONE LINE 'EOF' P =3 ERASE TO END OF FIELD P =2 TWO DC-LINES P 82-02-28 P =1, SYSTEM
0x2d313c…2d32d0 Dummy {f00=0x00ed, f01=0x0190, f02=» * x D P* MODULE KEYB * 0 D P* MODULE HANDLING THE KEYBOARD DEVICE * x D P* (EMULATION 3270 SNA/SDLC, BSC) * D P
0x2d32d0…2d3464 Dummy {f00=0x00ed, f01=0x0190, f02=» P P EJECT D P*************************************************************** D P* * ^ D P* LIST OF ROUTINES * D P*
0x2d3464…2d35f8 Dummy {f00=0x00ed, f01=0x018e, f02=» KB-COMPLETION TABLE FOR DIFF. MODES * ~ < P* KBCPLO KB-COMPLETION ROUTINE IN LOCAL MODE 6 D P* KBCPSY KB-COMPLETION ROUTINE IN SYSTEM MODE * v D P* KBCPJO KB-COMPLETION ROUTINE IN MY JOB MODE * D P*
0x2d35f8…2d378c Dummy {f00=0x00ed, f01=0x0190, f02=» N . P* ICVRED KB/VDU INTERTASK READ ( P* ICINP INTERTASK INPUT : . P* ICSET SET INTERTASK TIMEOUT f ( P* ICREAD READ INTERTASK ( P* ICWRT WRITE INTERTASK D P* ERROR ILL
0x2d378c…2d3920 Dummy {f00=0x00ed, f01=0x0190, f02=» SIGNAL ROUTINE * D P* KEYTAB KEY-TABLE, FIXED ENTRY FOR EACH FUNC. * 8 D P* CHAR ALPHA. CHAR HANDLING * D P* NUM NUM. CHAR HANDLING *
0x2d3920…2d3ab4 (3, 23) Dummy {f00=0x00ed, f01=0x0190, f02=» * X D P* BAKTAB TAB. UNPROT. BACKWARDS * D P* TAB TAB. UNPROT. FORWARDS * d D P* CRNL TAB. UNPROT. NEXT LINE * D P* RDHOME
0x2d3ab4…2d3c48 Dummy {f00=0x00ed, f01=0x0190, f02=»RINPT ERASE UNPROT. ENTIRE SCREEN * D P* INSERT INSERT HANDLING * < D P* DELETE DELETE HANDLING * D P* RESET RESET HANDLING
0x2d3c48…2d3ddc Dummy {f00=0x00ed, f01=0x0190, f02=» * D P* ZERO:2,3 DOUBLE & TRIPLE ZERO HANDLING * D P* OFLINE OFFLINE HANDLING * D P* MFCHGE MAIN FRAME CHANGE * D P* COPY LOCAL H
0x2d3ddc…2d3f70 Dummy {f00=0x00ed, f01=0x0190, f02=» KEYLOCK STATUS HANDLING * | " P* TESTM TEST MODE 4 D P* ENTER ENTER HANDLING * Z D P* CLEAR CLEAR HANDLING * D P* SYSREQ SYSTEM RE
0x2d3f70…2d4104 Dummy {f00=0x00ed, f01=0x0190, f02=»ROGRAM ACCESS HANDLING * z D P* PF PROGRAM FUNCTION HANDLING * 2 D P* RETURN RETURN * z D P* * D
0x2d4104…2d4298 Dummy {f00=0x00ed, f01=0x0190, f02=»*** ` 8 P* * 8 P* ENTRY POINTS * H 8 P* * 8 P**************************************************** P . P ENT
0x2d4298…2d442c Dummy {f00=0x00ed, f01=0x0190, f02=» LMP1ON LAMPROUTINES P ENTRY LMP1OF . P ENTRY LMP2ON . 4 P ENTRY LMP2OF . L P ENTRY LMP3ON . d P ENTRY LMP3OF . | P ENTRY LMP4ON . P ENTRY LMP4OF . P ENTRY LMP5ON . P ENTRY LMP5OF . P ENTRY LMP6ON .
0x2d442c…2d45c0 Dummy {f00=0x00ed, f01=0x0190, f02=»NDICATION | ( P ENTRY TAB TAB FOREWARD UNPROTECTED , P ENTRY CRDOWN MOVE CURSOR DOWN ONE LINE > $ P ENTRY ICVRED VDU INTERTASK READ n P ENTRY ICINP INTERTASK INPUT & P ENTRY ICSET SET INTERTASK TIMEOUT P ENTRY ICWRT WRITE INTERTASK P
0x2d45c0…2d4754 (3, 24) Dummy {f00=0x00ed, f01=0x0190, f02=» * : P* EXTERNAL REFERENCES * . : P* * l : P****************************************************** P & P EXTRN I:RT1 RETURN TO C
0x2d4754…2d48e8 Dummy {f00=0x00ed, f01=0x018e, f02=»R ABORT DC-REQUEST (DCSNA,DCBSC) * P EXTRN ERASE ERASE ENTIRE SCREEN (VDU) ( 8 P EXTRN ERASUA ERASE ALL UNPROTECTED TO ADDRESS (VDU) V . P EXTRN ERASUP ERASE ALL UNPROTECTED (VDU) 2 P EXTRN TRPA TRANSMIT SHORT READ (DCSNA,DCBSC) 4 P EXTRN TRPF TR
0x2d48e8…2d4a7c Dummy {f00=0x00ed, f01=0x0190, f02=» b . P EXTRN SOUND SOUND ALARM ON DISPLAY (VDU) . P EXTRN SCRINF GET SCREEN INFORMATION (VDU) : 0 P EXTRN STOINF SAVE SCREEN INFORMATION (VDU) l 0 P EXTRN GETVDU GET CHAR. IN VDU BUFFER (VDU) 2 P EXTRN STOVDU STORE CHAR. IN VDU BUFFER (VDU) &
0x2d4a7c…2d4c10 Dummy {f00=0x00ed, f01=0x0190, f02=»(VDU) n 6 P EXTRN DCOFLN INDICATE OFFLINE TO DC (DCSNA,DCBSC) 0 P EXTRN DISMOD DISPLAY MODIFIED FIELDS (VDU) H . P EXTRN CONPF CONVERT PF-KEY TABLE (CONVER) | * P EXTRN OPSYS OPEN SYSTEM (DCSNA,DCBSC) $ P EXTRN LINE GET LINE FLAG (VDU) & P EXT
0x2d4c10…2d4da4 Dummy {f00=0x00ed, f01=0x0190, f02=»BUF GET BUFFER (PAD) & P EXTRN RELBUF RELEASE BUFFER (PAD) * P EXTRN DISSTA DISPLAY STATISTICS (VDU) F * P EXTRN RDSTAT READ STATISTICS (DCBSC) t 2 P EXTRN CHKSTA CHECK LINE STATUS (DCBSC,DCSNA) $ P EXTRN SETSTA SET STATUS (DCSNA) $ P EXTRN C
0x2d4da4…2d4f38 Dummy {f00=0x00ed, f01=0x0190, f02=»*************** b B P* * B P* CONDITIONAL ASSEMBLY PARAMETERS * ^ B P* * B P******************************
0x2d4f38…2d50cc Dummy {f00=0x00ed, f01=0x018e, f02=»NG IF :=1 x POFLIN EQU 0 $ PX:D EQU 1 NUMBER OF LINES (1-2) & PNBRLIN EQU 2 N $ PX:F EQU 0 KEY-LOCK STATUS IF:=1 b PKEYLST EQU 0 $ PX:G EQU 0 PF KEY HANDLING IF:=1 PPFX EQU 1 $ PX:H EQU 0 PA KEY HANDLING IF :=1 PPAX EQU
0x2d50cc…2d5260 Dummy {f00=0x00ed, f01=0x0190, f02=» * PX:M EQU 0 COPY COMMAND INCLUDED IF:=1 PCOPCMD EQU 1 2 & PX:O EQU 0 TEST MODE INCLUDED IF:=1 F PTEST EQU 0 p 0 PX:P EQU 0 COPY LOCK FUNCTION INCLUDED IF:=1 PCOPL EQU 0 P EJECT D P**************************************************
0x2d5260…2d53f4 (3, 25) Dummy {f00=0x00ed, f01=0x0190, f02=»* * D P*************************************************************** H P P* P* PREDEFINED KEYS P* * PCRUP EQU /80 FIRST "MOVE CURSOR " KEY , PERFKEY EQU /88
0x2d53f4…2d5588 Dummy {f00=0x00ed, f01=0x0190, f02=»FKLKEY EQU /94 FIRST KEYLOCK VALUE & PLKLKEY EQU /9C LAST KEYLOCK VALUE * ( PFIPA EQU /9F FIRST PROGRAM ATTN. KEY T PENTKEY EQU /A0 ENTER KEY & PSYSKEY EQU /A1 SYSTEM REQUEST KEY PCLRKEY EQU /A2 CLEAR KEY & PPFKEY EQU /B1 PROGRAM FUNTION
0x2d5588…2d571c Dummy {f00=0x00ed, f01=0x0190, f02=»DDRESS | PECBRL EQU 4 REQUESTED LENGTH PECBEL EQU 6 EFFECTIVE LENGTH 2 PECBRC EQU 8 RETURN CODE V PECBCW EQU 10 CONTROL WORD v & PECBCW2 EQU 12 CONTROL WORD TWO DK P* P* SPECIAL CHARACTERS P* PNULL EQU 0 NULL CHAR.
0x2d571c…2d58b0 Dummy {f00=0x00ed, f01=0x0190, f02=»N EQU /B7 PLOF EQU /B8 PLFL EQU /B9 FLASH & P IFT KB6272=1 @ PLAMP1 EQU /20 V PLAMP2 EQU /10 l PLAMP3 EQU 8 PLAMP4 EQU 4 PLAMP5 EQU 2 PLAMP6 EQU 1 P XIF P IFF KB6272=1 PLAMP1 EQU 0 P
0x2d58b0…2d5a44 Dummy {f00=0x00ed, f01=0x0190, f02=»IZE P* PLLINE EQU 80 LINE LENGTH PLBVDU EQU 1920 TOTAL SIZE 6 P* X P* MODES b P* r PNEWMOD EQU /8000 NEW MODE | * PHCPMOD EQU /4000 HARDCOPY OUTSTANDING PMYJOB EQU /0004 MY JOB MODE ( PSYSOP EQU /0002 SYSTEM O
0x2d5a44…2d5bd8 Dummy {f00=0x00ed, f01=0x0190, f02=»K v P EJECT P* P* RELATIVE ADDRESSES IN " P* TERMINAL WORKBLOCK B P* ^ PBVDU EQU 2 VDU SCREEN BUFFER h $ PLINFLG EQU BVDU+1920 LINE FLAGS PWCC EQU LINFLG+30 WCC CHAR. . PKBINH EQU WCC+2 KEYBOARD INHIBIT INDICATOR $
0x2d5bd8…2d5d6c Dummy {f00=0x00ed, f01=0x0190, f02=»2 INSERT MODE SWITCH $ PKEYS EQU MODE+2 KEY LOCK STATUS 4 PRDMORE EQU KEYS+12 BRANCH ADDRESS TO NEXT KB-KEY D 2 PCURPOS EQU RDMORE+2 CURSOR POS. IN SYSTEM MODE | PREGI EQU CURPOS+4 SAVE AREA PSNAMOD EQU REGI+32 SNA MODE PBSCMOD EQU SNA
0x2d5d6c…2d5f00 Dummy {f00=0x00ed, f01=0x0190, f02=» j * PECBICW EQU ECBICR+2 ECB INTERTAS WRITE , PECBKB2 EQU ECBICW+6 ECB 2ND KEYBOARD DK 6 P* f P* RELATIVE ADDRESSES IN p P* COMMON WORKBLOCK P* P IFF TEST=1 PTSKTAB EQU 26 TASK TABLE P XIF P IFT TEST=1 P
0x2d5f00…2d6094 (3, 26) Dummy {f00=0x00ee, f01=0x0190, f02=» * D P* KBINP MAIN ROUTINE * D D P* * D P****************************************************
0x2d6094…2d6228 Dummy {f00=0x00ee, f01=0x0190, f02=»RVED P* A6= RESERVED P* A7= KEY-HANDLING INDICATOR " P* A11= CREDIT WORK AREA F P* A13= RESERVED f P* ~ @ P*********************************************************** PKBINP2 EQU * . P LDK A1,1 INDICATE 2ND KEYBOARD PRESEN
0x2d6228…2d63bc Dummy {f00=0x00ee, f01=0x0190, f02=»D A1,ECBCW,A8 SEE IF KEYLOCK ? DK P RF(N) KBIN80 SKIP IT DK * P XIF J P IFT KEYLST=1 V & P LC* A2,ECBBA,A8 GET KEYLOCK VALUE l * P ADKL A2,FKLKEY-/70 PREPARE FOR TABLE P SC* A2,ECBBA,A8 RESTORE P XIF P LD A1,ECBRC,A8 ERROR?
0x2d63bc…2d6550 Dummy {f00=0x00ee, f01=0x0190, f02=» $ P LC* A2,ECBBA,A8 GET INPUT CHAR. ! P ANK A2,/FF ! , P LD A1,KBINH,A11 ! @ " P ANK A1,6 MUST BE A RESET KEY? ! X P RF(Z) KBIN30 NO ! ~ P CWK A2,RSET RESET KEY? ! P IFT SNA=1 ! P RF(E) KBIN30 YES ! & P CWK A2,SYSKEY SYSTEM REQUEST KEY? !
0x2d6550…2d66e4 Dummy {f00=0x00ee, f01=0x0190, f02=»GAL CHAR ! ~ P CWK A2,LAKEY " P RF(G) KBIN80 ILLEGAL CHAR " & P IFT SNA=1 " H " P LD A1,SNAMOD,A11 GET SNA MODE " Z P ANK A1,/FF " 2 P CFI A14,CPLKB,A1 COMPLETE KB IN CURRENT MODE " P XIF " P IFF SNA=1 " P LDK A7,0 " " P CWK A2,FIPA P
0x2d66e4…2d6878 Dummy {f00=0x00ee, f01=0x0190, f02=» EQU * " P XIF # P LDR A7,A7 ANY KEY-HANDLING # P RF(NZ) KBIN80 NO # > $ P ADR A3,A3 PREPARE FOR KEY-TABLE # X & P LD A1,RDMORE,A11 KEY IN SEQUENCE? # P RF(Z) KBIN50 NO # $ P CF A14,DCABOR KILL DC AGAIN DK # $ P LD A1,RDMORE,A11 RESTORE A1 D
0x2d6878…2d6a0c Dummy {f00=0x00ee, f01=0x0190, f02=»ER # d P RF KBIN90 $ PKBIN80 EQU * $ " P CF A14,RESKB RESET KB BUFFER $ 0 PKBIN90 EQU * $ V P RTN A14 $ j P EJECT $ z P IFT SNA=1 $ J P********************************************************************* $ J P*
0x2d6a0c…2d6ba0 Dummy {f00=0x00ee, f01=0x0190, f02=» * $ J P********************************************************************* % B PCPLKB EQU * % ( P DATA KBCPLO KB-COMPL. IN LOCAL MODE % * P DATA KBCPSY KB-COMPL. IN SYSTEM MODE % * P DATA KBCP
0x2d6ba0…2d6d34 (3, 27) Dummy {f00=0x00ee, f01=0x0190, f02=» * % J P* KBCLO KB-COMPLETION IN LOCAL MODE * & F J P* * & J P**************************************
0x2d6d34…2d6ec8 Dummy {f00=0x00ee, f01=0x0190, f02=» & P* A5= RESERVED ' P* A6= RESERVED ' P* A7= KEY-HANDLING INDICATOR ' 4 P* A11= CREDIT WORK AREA ' X P* A13= RESERVED ' x P* ' @ P*********************************************************** ' PKBCPLO EQU * ' $ P LDK A7,0 INDICATE KEY
0x2d6ec8…2d705c Dummy {f00=0x00ee, f01=0x0190, f02=»TEM REQUEST? ' ~ P RF(NE) KBCL80 NO ( & P CF A14,OPSYS START COMMUNICATION ( . P CF A14,TSTSTA TEST STATUS ( X P ANKL A1,/101 ACTIVE? ( z P RF(NZ) KBCL90 NO ( & P LDK A1,SYSOP INDICATE SYSTEM MODE ( , P ORKL A1,/8000 INDICATE MODE ACTIVATION (
0x2d705c…2d71f0 Dummy {f00=0x00ee, f01=0x0190, f02=»DMORE,A11 INSIDE IDENT ROUTINE? ( P RF(Z) KBCL85 NO ) ( $ P LDK A7,0 INDICATE KEY-HANDLING ) @ P RF KBCL90 ) h PKBCL85 EQU * ) z P CF A14,ERROR ILLEGAL KEY ) PKBCL90 EQU * ) P RTN A14 ) P EJECT ) H P**************************************
0x2d71f0…2d7384 Dummy {f00=0x00ee, f01=0x0190, f02=»B-COMPLETION IN SYSTEM MODE * ) z H P* * * 6 H P******************************************************************** * P* REGISTERS * P* * P* A2= KEY-CHAR * P* A3=
0x2d7384…2d7518 Dummy {f00=0x00ee, f01=0x0190, f02=»DIT WORK AREA * P* A13= RESERVED + P* + . @ P*********************************************************** + 8 PKBCPSY EQU * + | $ P LDK A7,0 INDICATE KEY-HANDLING + $ P CWK A2,FIPA PROGRAM ATTN. KEY? + P RF(L) KBCS20 NO + 0 P CWK A2,CLRKEY U
0x2d7518…2d76ac Dummy {f00=0x00ee, f01=0x0190, f02=»TIRE SCREEN + z P RF KBCS80 , PKBCS10 EQU * , & P RF(G) KBCS70 YES , : P CM MODE,A11 , T $ P CF A14,LMP6OF CLEAR INSERT MODE , h P CF A14,DCABOR ABORT DC , P RF KBCS80 , PKBCS20 EQU * , $ P CWK A2,ERIKEY ERASE INPUT KEY? , P RF(E) KBC
0x2d76ac…2d7840 Dummy {f00=0x00ee, f01=0x0190, f02=»KBCS90 NO =1 , P LD A1,CURPOS,A11 - " P CWK A1,/800 CURSOR INITIATED? - . P RF(NE) KBCS90 YES - T $ P CF A14,SCRINF GET SCREEN INFO. - n & P ST A4,CURPOS,A11 INITIATE CURSOR - P RF KBCS90 - PKBCS70 EQU * - P CF A14,ERROR INDICATE ERROR -
0x2d7840…2d79d4 (3, 28) Dummy {f00=0x00ee, f01=0x0190, f02=»,A11 - PKBCS90 EQU * . P RTN A14 . P EJECT . 0 F P****************************************************************** . > F P* * . F P* KBCPJO KB-COMPLETION IN MY JOB MODE
0x2d79d4…2d7b68 Dummy {f00=0x00ee, f01=0x0190, f02=»************************ . f P* REGISTERS / P* / 4 P* A2= KEY-CHAR / > P* A3= KEY-TABLE INDEX / T P* A4= RESERVED / r P* A5= RESRVED / P* A6= RESRVED / P* A7= KEY-HANDLING INDICATOR / P* A11= CREDIT WORK AREA / P* A13= RESERVED
0x2d7b68…2d7cfc Dummy {f00=0x00ee, f01=0x0190, f02=»G / r $ P CWK A2,FIPA PROGRAM ATTN. KEY? 0 P RF(L) KBCJ90 NO 0 2 P IFT OFLIN=1 0 J P RF(E) KBCJ80 0 ^ P XIF 0 t P IFT SNA=1 0 P CM MODE,A11 0 ( P CF A14,LMP6OF TURN OFF INSERT LAMP 0 P CF A14,DCABOR ABORT DC 0 P IFT OFLIN=1 0 P R
0x2d7cfc…2d7e90 Dummy {f00=0x00ee, f01=0x0190, f02=»KBCJ90 EQU * 0 P RTN A14 1 P XIF 1 $ P EJECT 1 0 D P*************************************************************** 1 > D P* * 1 D P* READKB READ KEYBOARD WITH NO WAIT
0x2d7e90…2d8024 Dummy {f00=0x00ee, f01=0x0190, f02=»************* 1 ^ P* REGISTERS 2 P* 2 2 P* A8= KB-ECB 2 < P* A11= CREDIT WORK AREA 2 P P* A13= RESERVED 2 p P* 2 : P***************************************************** 2 PREADKB EQU * 2 P LD A8,ECBKB,A11 2 P LDK A7,0 CL
0x2d8024…2d81b8 Dummy {f00=0x00ee, f01=0x0190, f02=» P LDK A7,2 STANDARD READ 3 P LKM 3 $ P DATA 1 3 0 P RTN A14 3 @ 0 P** READ FROM SECOND KEYBOARD, P & T, DK ** 3 P PREADK2 EQU * 3 P LD A8,ECBKB2,A11 GET ECB 3 P LDK A7,0 CLEAR ECBCW 3 P ST A7,ECBCW,A8 3 P LDK A7,1 3 P S
0x2d81b8…2d834c Dummy {f00=0x00ee, f01=0x018e, f02=» EJECT 3 D P*************************************************************** 4 D P* * 4 V D P* RESKB RESET KEYBOARD BUFFER * 4 D P*
0x2d834c…2d84e0 Dummy {f00=0x00ee, f01=0x0190, f02=» 4 v P* 5 P* A11= CREDIT WORK AREA 5 P* A13= RESERVED 5 2 P* 5 J : P****************************************************** 5 T PRESKB EQU * 5 2 P* REMOVED UNTIL NEEDED......DK, 811028....** 5 P RTN A14 5 P EJECT 5 @ P**************
0x2d84e0…2d8674 (3, 29) Dummy {f00=0x00ee, f01=0x018e, f02=»U INTERTASK READ 5 @ P* * 6 @ P*********************************************************** 6 P* REGISTERS 6 P* 6 P* A2= RESERVED 6 P* A11= CREDIT WORK AREA 6 P* A13= RES
0x2d8674…2d8808 Dummy {f00=0x00ee, f01=0x0190, f02=» P CF A14,ICSET SET NO TIMEOUT 7 P IFF COPCMD=1 7 ( P LD A1,PRTID,A11 7 > P XIF 7 V P IFT COPCMD=1 7 b P LDK A1,0 UNADDRESSED 7 x P XIF 7 P LDKL A3,REGI 7 P ADR A3,A11 7 P LDK A2,2 LENGTH 7 " P CF A14,ICREAD READ INTERTASK 7
0x2d8808…2d899c Dummy {f00=0x00ee, f01=0x0190, f02=» * 7 p D P* ICINP INTERTASK INPUT * 8 ( D P* * 8 p D P**************************************************************** 8 P*
0x2d899c…2d8b30 Dummy {f00=0x00ee, f01=0x0190, f02=»**************************** 8 l PICINP EQU * 9 $ P LD* A2,ECBBA,A8 9 8 P IFT COPCMD=1 9 P P LDR A1,A2 COPY COMMAND? 9 f P RF(NN) ICIN80 NO 9 P LDKL A3,BVDU BUFFER TO SEND 9 P ADR A3,A11 9 P IFT COPL=1 9 ( P LCR A2,A3 CHECK IF ALLOWED
0x2d8b30…2d8cc4 Dummy {f00=0x00ee, f01=0x0190, f02=» PICIN20 EQU * : P XIF : P IFT COPCMD=1 : $ P LD A2,ECBCW,A8 GET TO WHOM : : P LD A8,ECBICW,A11 : ^ P CF A14,ICSET SET TIMEOUT : x P LDR A1,A2 : P LDKL A2,LBVDU+/20 LENGTH : P CF A14,ICWRT SEND IT AWAY : ( P LDKL A1,HCPMOD HARDCOPY
0x2d8cc4…2d8e58 Dummy {f00=0x00ee, f01=0x0190, f02=»NG : h P IFT SNA=1 ; P XRS A1,SNAMOD,A11 ; P XIF ; 6 P IFF SNA=1 ; B P XRS A1,BSCMOD,A11 ; T P XIF ; n P ANK A2,1 PRINTER OK? ; z P RF(Z) ICIN90 YES ; PICIN90 EQU * ; P RTN A14 ; P EJECT ; @ P************************************
0x2d8e58…2d8fec Dummy {f00=0x00ee, f01=0x0190, f02=»OUT * ; j > P* * < @ P*********************************************************** < ` P* REGISTERS < P* < P* A2= RESERVED < P* A8= INTERTASK ECB < P* A11= R
0x2d8fec…2d9180 Dummy {f00=0x00ee, f01=0x0190, f02=» LDKL A1,-1 NO TIMEOUT < P ST A1,ECBCW,A8 = P LDK A7,/B9 SET TIMEOUT = 6 P LKM = V P DATA 1 = b P RTN A14 = r P EJECT = B P************************************************************* = B P*
0x2d9180…2d9314 (3, 30) Dummy {f00=0x00ef, f01=0x0190, f02=» * = b B P************************************************************** > P* REGISTERS > ^ P* > P* A1= TASK ID > P* A2= LENGTH > P* A3= BUFFER ADDRESS > P* A8= INTETASK READ ECB > P* A11= RESERVED > P
0x2d9314…2d94a8 Dummy {f00=0x00ef, f01=0x0190, f02=»,A8 TASK ID > P ST A2,ECBRL,A8 LENGTH ? " P ST A3,ECBBA,A8 BUFFER ADDRESS ? 2 P LDK A7,/02 READ ? X P LKM ? p P DATA 1 ? | P RTN A14 ? P EJECT ? D P*************************************************************** ? D P*
0x2d94a8…2d963c Dummy {f00=0x00ef, f01=0x0190, f02=» * ? D P*************************************************************** @ : P* REGISTERS @ P* @ P* A1= TASK ID @ P* A2= LENGTH @ P* A3= BUFFER ADDRESS @ P* A8= INTERTASK WRIT
0x2d963c…2d97d0 Dummy {f00=0x00ef, f01=0x0190, f02=» @ P PICWRT EQU * A P ST A1,ECBCW,A8 TASK ID A P ST A2,ECBRL,A8 LENGTH A < " P ST A3,ECBBA,A8 BUFFER ADDRESS A Z P LDK A7,/86 WRITE A P LKM A P DATA 1 A P RTN A14 A P EJECT A H P****************************************************
0x2d97d0…2d9964 Dummy {f00=0x00ef, f01=0x0190, f02=»DLING * A l H P* * B ( H P******************************************************************* B t P* REGISTERS B P* B P* A11= CREDIT WORK AREA B P*
0x2d9964…2d9af8 Dummy {f00=0x00ef, f01=0x0190, f02=»ON 'ERROR' LAMP B | P LDK A1,4 RESET ALLOWED C P ORS A1,KBINH,A11 C 8 & P CF A14,SOUND TURN ON SOUND ALARM C R P RTN A14 C | P C P EJECT C B P************************************************************* C B P*
0x2d9af8…2d9c8c Dummy {f00=0x00ef, f01=0x0190, f02=» * C t B P************************************************************* D * PLMP1ON LDK A1,LAMP1 D p P RF LMPON D PLMP1OF LDK A1,LAMP1 D P RF LMPOF D PLMP2ON LDK A1,LAMP2 D P RF LMPON D PLMP2OF LDK A1,
0x2d9c8c…2d9e20 Dummy {f00=0x00ef, f01=0x0190, f02=»1,LAMP4 D P RF LMPON E PLMP4OF LDK A1,LAMP4 E " P RF LMPOF E > PLMP5ON LDK A1,LAMP5 E P P RF LMPON E l PLMP5OF LDK A1,LAMP5 E ~ P RF LMPOF E PLMP5FL LDK A1,LAMP5 E P RF LMPFL E PLMP6ON LDK A1,LAMP6 E P RF LMPON E P
0x2d9e20…2d9fb4 (3, 31) Dummy {f00=0x00ef, f01=0x0190, f02=» PLMPFL LDK A7,LFL F P RF SDISP F P EJECT F . B P************************************************************* F < B P* * F B P* SDISP SIGNAL ROUTINE * F
0x2d9fb4…2da148 Dummy {f00=0x00ef, f01=0x0190, f02=»* F T P* REGISTERS G P* G & P* A8= SIGNAL ECB G 0 P* A11= CREDIT WORK AREA G H P* A13= RESERVED G h P* G < P******************************************************* G PSDISP EQU * G P LD A8,ECBSD,A11 G P ST A1,ECBCW,A8 G
0x2da148…2da2dc Dummy {f00=0x00ef, f01=0x0190, f02=»,1,A8 G P LKM H $ P DATA 1 LAMPS ON SECOND KEYB'RD H PSDISP1 EQU * H D P LD A8,ECBSD,A11 H Z * P LDK A1,/40 RESTORE FILE CODE 1ST KB H t P SC A1,1,A8 H P** END OF DK MODS ** H P LKM H P DATA 1 H P RTN A14 H P EJECT H
0x2da2dc…2da470 Dummy {f00=0x00ef, f01=0x0190, f02=» * H V D P* KEYTAB KEY-TABLE, FIXED ENTRY FOR EACH FUNC. * I D P* * I V D P**************************************************************** I PKEYTAB EQU * I P*20 I P D
0x2da470…2da604 Dummy {f00=0x00ef, f01=0x0190, f02=» P DATA CHAR ' J P DATA CHAR ( J P DATA CHAR ) J , P DATA CHAR * J @ P DATA NUM + J T P DATA NUM , J h P DATA NUM - J | P DATA NUM . J P DATA CHAR / J P*30 J P DATA NUM 0 J P DATA NUM 1 J P DATA NUM 2 J P DATA NU
0x2da604…2da798 Dummy {f00=0x00ef, f01=0x018e, f02=»A CHAR : J P DATA CHAR ; K P DATA CHAR < K $ P DATA CHAR = K 8 P DATA CHAR > K L P DATA CHAR ? K ` P*40 K t P DATA CHAR K P DATA CHAR A K P DATA CHAR B K P DATA CHAR C K P DATA CHAR D K P DATA CHAR E K P DATA CHAR F K
0x2da798…2da92c Dummy {f00=0x00ef, f01=0x0190, f02=» K P DATA CHAR N L P DATA CHAR O L P*50 L 0 P DATA CHAR P L < P DATA CHAR Q L P P DATA CHAR R L d P DATA CHAR S L x P DATA CHAR T L P DATA CHAR U L P DATA CHAR V L P DATA CHAR W L P DATA CHAR X L P DATA CHAR Y L P DAT
0x2da92c…2daac0 Dummy {f00=0x00ef, f01=0x0190, f02=»CHAR L P DATA CHAR a LOWER CASE A-Z M P DATA CHAR b M 0 P DATA CHAR c M D P DATA CHAR d M X P DATA CHAR e M l P DATA CHAR f M P DATA CHAR g M P DATA CHAR h M P DATA CHAR i M P DATA CHAR j M P DATA CHAR k M P DATA CHAR l M
0x2daac0…2dac54 (3, 32) Dummy {f00=0x00ef, f01=0x0190, f02=» DATA CHAR s M P DATA CHAR t N P DATA CHAR u N ( P DATA CHAR v N < P DATA CHAR w N P P DATA CHAR x N d P DATA CHAR y N x P DATA CHAR z N P DATA CHAR N P DATA CHAR N P DATA CHAR N P DATA CHAR N P DATA RETURN N P*80 N P
0x2dac54…2dade8 Dummy {f00=0x00ef, f01=0x0190, f02=» DATA RDHOME N P DATA EREOF O P DATA ERINPT O ( P IFT IN:DL=1 O < P DATA INSERT O P P DATA DELETE O d P XIF O x P IFF IN:DL=1 O P DATA RETURN O P DATA RETURN O P XIF O P DATA RESET O P DATA DUP O P DATA FLDMRK O P D
0x2dade8…2daf7c Dummy {f00=0x00ef, f01=0x0190, f02=»KEYL O P DATA KEYL P P DATA KEYL P P DATA KEYL P 0 P DATA KEYL P B P DATA KEYL P T P DATA KEYL P f P DATA KEYL P x P XIF P P IFF KEYLST=1 P P DATA RETURN P P DATA RETURN P P DATA RETURN P P DATA RETURN P P DATA RETURN
0x2daf7c…2db110 Dummy {f00=0x00ef, f01=0x0190, f02=» 8 P DATA RETURN FREE LABEL FOR NEW KEY (NOT P. A. KEY) Q 8 P DATA RETURN FREE LABEL FOR NEW KEY (NOT P. A. KEY) Q @ P*FIRST P. A. KEY Q | P IFT OFLIN=1 Q P DATA OFLINE Q P XIF Q P IFF OFLIN=1 Q P DATA RETURN Q P XIF Q P*A0 Q P
0x2db110…2db2a4 Dummy {f00=0x00ef, f01=0x018e, f02=»RN Q P DATA CLEAR R P DATA RETURN R P XIF R 2 P IFT NBRLIN=2 R > P DATA MFCHGE R T P XIF R h P IFF NBRLIN=2 R t P DATA RETURN R P XIF R P IFT PAX=1 R P DATA PAEX R P XIF R P IFF PAX=1 R P DATA RETURN R P XIF R
0x2db2a4…2db438 Dummy {f00=0x00ef, f01=0x0190, f02=» P DATA PAALFA S P DATA PAALFA S P DATA PAALFA S , P DATA PAALFA S @ P*B0 S T P IFT PFX=1 S ` P DATA PFEX S r P XIF S P IFF PFX=1 S P DATA RETURN S P XIF S P DATA PF 1 S P DATA PF 2 S P DATA PF 3 S P DATA PF 4 S
0x2db438…2db5cc Dummy {f00=0x00ef, f01=0x0190, f02=»A PF 12 S P DATA PF 13 T P DATA PF 14 T $ P DATA PF 15 T 8 P*C0 T L P DATA PF 16 T X P DATA PF 17 T l P DATA PF 18 T P DATA PF 19 T P DATA PF 20 T P DATA PF 21 T P DATA PF 22 T P DATA PF 23 T P DATA PF 24 T
0x2db5cc…2db760 Dummy {f00=0x00ef, f01=0x0190, f02=»************************************************ T D P* * U 8 B P* CHAR ALPHABETIC AND SPEC. CHAR UPDAT. DISPL. * U B P* * U
0x2db760…2db8f4 (3, 33) Dummy {f00=0x00ef, f01=0x0190, f02=»IBUTE MASKL U P* A4= RESERVED V P* A5= RESERVED V * P* A6= RESERVED V @ P* A11= RESERVED V V P* A13= RESERVED V n P* V B P************************************************************** V PCHAR EQU * V $ P LDK A3,/30 LOAD ATTRIBUTE MASK
0x2db8f4…2dba88 Dummy {f00=0x00ef, f01=0x0190, f02=»****** V X B P* * W B P* NUM NUMERIC UPDAT. DISPL. * W T B P* NUMCOM NUMERIC COMMA * W D P*
0x2dba88…2dbc1c Dummy {f00=0x00ef, f01=0x0190, f02=»= KEY-CHAR W P* A3= ATTRIBUTE MASK X P* A4= RESERVED X . P* A5= RESERVED X D P* A6= RESERVED X Z P* A11= RESERVED X p P* A13= RESERVED X P* X B P************************************************************* X PNUMCOM EQU * X P LDK
0x2dbc1c…2dbdb0 Dummy {f00=0x00ef, f01=0x018e, f02=» X P EJECT Y D P*************************************************************** Y D P* * Y ^ D P* ANCOMM COMMON ROUTINE FOR ALPHANUM. CHAR. * Y D P*
0x2dbdb0…2dbf44 Dummy {f00=0x00ef, f01=0x0190, f02=» P* Z P* A2= KEY-CHAR Z " P* A3= AT ENTRY ATTRIBUTE MASK Z $ P* A4= REL. CURSOR POS. Z J P* A5= REL. ATTRIBUTE POS. Z h P* A6= ATTRIBUTE CHAR. Z P* A11= CREDIT WORK AREA Z P* A13= RESERVED Z P* Z D P******************************
0x2dbf44…2dc0d8 Dummy {f00=0x00ef, f01=0x0190, f02=»TE Z t P RF(E) ANC800 YES [ P LDR A1,A6 [ $ P ANR A1,A3 ALLOWED POS. ? [ 6 P RF(NZ) ANC800 NO [ X P IFT IN:DL=1 [ r P LD A1,MODE,A11 INSERT MODE? [ P RF(Z) ANC100 NO [ P CF A14,INSMOD [ P LDR A7,A1 [ P ANK A7,1 INSRETED NORMAL? [
0x2dc0d8…2dc26c Dummy {f00=0x00ef, f01=0x0190, f02=» [ P LDR A7,A2 0 P CF A14,STOVDU STORE KEY-CHAR IN VDU BUFFER * P CF A14,WCHAR DISPLAY CHAR AND CURSOR N 8 P CF A14,POSUNP MOVE CURSOR TO NEXT UNPROTECTED POS. | P RF ANC900 PANC800 EQU * P CF A14,ERROR INDICATE ERROR PANC900
0x2dc26c…2dc400 Dummy {f00=0x00ef, f01=0x0190, f02=» * x @ P* CURMOV MOVE CURSOR ON SCREEN * ] , @ P* * ] p @ P************************************************************ ] P* REGISTERS ]
0x2dc400…2dc594 (3, 34) Dummy {f00=0x00f0, f01=0x018e, f02=»ESERVED ] P* A13= RESERVED ^ P* ^ ( @ P************************************************************ ^ 2 PCURMOV EQU * ^ v $ P CF A14,SCRINF GET SCREEN INFO. ^ P SUK A2,CRUP GET INDEX ^ P ADR A2,A2 ^ , P CFI A14,CURTAB,A2 JUMP IN CURSOR TABL
0x2dc594…2dc728 Dummy {f00=0x00f0, f01=0x0190, f02=» ^ $ P CF A14,ATMASB UPDATE ATTRIBUTE _ PCURM10 EQU * _ 0 P LDK A1,2 REQ. LENGTH _ D P CF A14,DISCHA SET CURSOR _ b P RTN A14 _ P EJECT _ $ P* CURTAB CURSOR JUMP TABLE _ PCURTAB EQU * _ $ P DATA CRLEFT MOVE CURSOR TO LEFT _ & P D
0x2dc728…2dc8bc Dummy {f00=0x00f0, f01=0x0190, f02=»OR TO LEFT _ x PCRLEFT EQU * ` P SUK A4,1 ` & $ P RF(NN) CRRET NOT LEFTMOST POS. ` 8 ( P LDKL A4,LBVDU-1 LAST POS. ON SCREEN ` ` P RF CRRET ` ( P* CRRIGT MOVE CURSOR TO RIGHT ` PCRRIGT EQU * ` P ADK A4,1 ` P CWK A4,LBVDU END OF BUF
0x2dc8bc…2dca50 Dummy {f00=0x00f0, f01=0x0190, f02=»L A4,LLINE ` P CWK A4,LBVDU LAST LINE? a P RF(L) CRRET NO a 2 P SUKL A4,LBVDU a J P RF CRRET a ` P* CURUP MOVE CURSOR UP a r PCURUP EQU * a P SUKL A4,LLINE a P RF(NN) CRRET UPMOST LINE a P ADKL A4,LBVDU a PCRRET EQU * a
0x2dca50…2dcbe4 Dummy {f00=0x00f0, f01=0x0190, f02=» * a p B P* BAKTAB TAB. UNPROTECTED BACKWARDS * b & B P* * b l B P************************************************************** b P* REGISTERS b
0x2dcbe4…2dcd78 Dummy {f00=0x00f0, f01=0x0190, f02=»OS. b t P* A11= RESERVED c P* A13= RESERVED c $ P* c < D P*************************************************************** c F PBAKTAB EQU * c * P CF A14,SCRINF GET SCREEN INFORMATION c P LDR A9,A5 c ( P CWK A5,LBVDU+1 UNFORMATTED SCREEN? c
0x2dcd78…2dcf0c Dummy {f00=0x00f0, f01=0x0190, f02=» FIRST POS. ON SCREEN c ~ ( P LDKL A4,LBVDU-1 LAST POS. ON SCREEN d PBAK100 EQU * d J 0 P CWR A4,A5 STANDING ON POS. AFTER ATTRIBUTE? d ^ P RF(E) BAK300 YES d P LDR A4,A5 d P LDR A7,A6 d P ANK A7,/20 PROTECTED FIELD? d P RF(Z) BAK500 NO d
0x2dcf0c…2dd0a0 Dummy {f00=0x00f0, f01=0x0190, f02=»MASB SEARCH ATTRIBUTE BACKWARDS AND MASK IT d P LDR A7,A6 e 4 P ANK A7,/20 PROTECTED FIELD? e F P RF(Z) BAK500 NO e j P LDR A4,A5 e & P CWR A5,A9 WHOLE SCREEN SEARCHED? e P RB(NE) BAK300 NO e P LDK A1,0 FIRST SCREEN POS. e , P CF A14,ATMA
0x2dd0a0…2dd234 (3, 35) Dummy {f00=0x00f0, f01=0x0190, f02=»D? e v P RF(NG) BAK700 NO f PBAK600 EQU * f $ P LDK A4,0 FIRST SCREEN POS. f 8 PBAK700 EQU * f * P CF A14,STOINF SAVE SCREEN INFORMATION f p P LDK A1,2 REQ. LENGTH f P CF A14,DISCHA SET CURSOR f P RTN A14 f P EJECT f B P************
0x2dd234…2dd3c8 Dummy {f00=0x00f0, f01=0x0190, f02=» TAB TAB. UNPROTECTED FORWARD * f B P* * g > B P************************************************************* g P* REGISTERS g P* g P* A4= REL. CURSOR POS. g P*
0x2dd3c8…2dd55c Dummy {f00=0x00f0, f01=0x0190, f02=»ERVED g P* h B P************************************************************** h PTAB EQU * h ^ * P CF A14,SCRINF GET SCREEN INFORMATION h p P LDR A9,A5 h ( P CWK A5,LBVDU+1 UNFORMATTED SCREEN? h P RF(E) TAB200 YES h PTAB100 EQU * h
0x2dd55c…2dd6f0 Dummy {f00=0x00f0, f01=0x0190, f02=»ECTED FIELD? h P RF(Z) TAB150 NO i & P CWR A5,A9 WHOLE SCREEN SEARCHED? i , P RB(NE) TAB100 NO i V " P LDK A1,0 FIRST POS. ON SCREEN i p , P CF A14,ATMASB UPDATE FIELD INFORMATION i P RF TAB200 i PTAB150 EQU * i P ADK A4,1 i & P CWK A4,LB
0x2dd6f0…2dd884 Dummy {f00=0x00f0, f01=0x0190, f02=»F A14,STOINF SAVE SCREEN INFORMATION i P LDK A1,2 REQ. LENGTH j , P CF A14,DISCHA SET CURSOR j J P RTN A14 j l P EJECT j | H P******************************************************************* j H P*
0x2dd884…2dda18 Dummy {f00=0x00f0, f01=0x0190, f02=» * j n H P******************************************************************* k * P* REGISTERS k v P* k P* A4= REL. CURSOR POS. k P* A5= REL. ATTRIBUTE POS. k P* A6= ATTRIBUTE CHAR. k P* A11= RESERVED k
0x2dda18…2ddbac Dummy {f00=0x00f0, f01=0x018e, f02=»SCRINF GET SCREEN INFORMATION k $ P CF A14,CRDOWN MOVE CURSOR DOWN l & $ P LDK A1,0 COMPUTE LEFTMOST POS. l N PCRN100 EQU * l v P SUK A4,LLINE l P RF(N) CRN200 l P ADK A1,LLINE l P RB CRN100 l PCRN200 EQU * l P LDR A4,A1 l ( P CWK
0x2ddbac…2ddd40 Dummy {f00=0x00f0, f01=0x0190, f02=» l x P RF(NL) CRN400 YES m P LDR A1,A4 m " , P CF A14,ATMASB SEARCH ATTRIBUTE BACKWARD m 4 P LDR A7,A6 m d P ANK A7,/20 PROTECTED? m v P RF(Z) CRN800 NO m P RF CRN500 m PCRN400 EQU * m P SUK A4,1 m " P RF(NN) CRN500 NOT WRAP AROUND m &
0x2ddd40…2dded4 (3, 36) Dummy {f00=0x00f0, f01=0x0190, f02=»ED FORWARD m v P RF CRN900 n PCRN800 EQU * n $ * P CF A14,STOINF SAVE SCREEN INFORMATION n 8 P LDK A1,2 REQ. LENGTH n f P CF A14,DISCHA SET CURSOR n PCRN900 EQU * n P RTN A14 n P EJECT n J P************************************************
0x2dded4…2de068 Dummy {f00=0x00f0, f01=0x0190, f02=»NPROTECTED FIRST ON SCREEN * n t J P* * o 2 J P********************************************************************* o P* REGISTERS o P* o P* A4= REL. CURSOR POS. o
0x2de068…2de1fc Dummy {f00=0x00f0, f01=0x0190, f02=»********************************************************* o PRDHOME EQU * p B * P CF A14,SCRINF GET SCREEN INFORMATION p V " P LDK A4,0 FIRST POS. ON SCREEN p P CF A14,STOINF p ( P CWK A5,LBVDU+1 UNFORMATTED SCREEN? p P RF(E) RDH800 YES p P L
0x2de1fc…2de390 Dummy {f00=0x00f0, f01=0x0190, f02=»AST SCREEN POS. p ~ * P CF A14,STOINF SAVE SCREEN INFORMATION q P RF RDH300 q F PRDH100 EQU * q X P LDR A1,A4 q l * P CF A14,ATMASB GET ATTRIBUTE BACKWARD q ~ P LDR A7,A6 q P ANK A7,/20 PROTECTED? q P RF(Z) RDH800 NO q PRDH300 EQU * q ( P
0x2de390…2de524 Dummy {f00=0x00f0, f01=0x0190, f02=»2 REQ. LENGTH q P CF A14,DISCHA SET CURSOR r PRDH900 EQU * r 8 P RTN A14 r L P EJECT r B P************************************************************* r j B P* * r B P* EREOF
0x2de524…2de6b8 Dummy {f00=0x00f0, f01=0x0190, f02=»********************************************* r P* REGISTERS s 6 P* s J P* A4= REL. CURSOR POS. s T P* A5= REL. ATTRIBUTE POS. s r P* A6= ATTRIBUTE CHAR. s P* A11= RESERVED s P* A13= RESERVED s P* s H P****************************
0x2de6b8…2de84c Dummy {f00=0x00f0, f01=0x0190, f02=»ATTED SCREEN? s z P RF(E) ERE700 YES t P LDR A7,A6 t 0 P ANK A7,/20 PROTECTED FIELD? t B P RF(NZ) ERE600 YES t f & P CWR A5,A4 STANDING ON ATTRIBUTE? t P RF(E) ERE600 YES t P LDR A1,A4 t P LDR A8,A6 SAVE OLD t P LDR A9,A5 SAVE OLD t
0x2de84c…2de9e0 Dummy {f00=0x00f0, f01=0x0190, f02=»RIBUTE t t P LDR A7,A6 u P LDR A1,A5 u 4 P CF A14,STOVDU STORE NEW ATTRIBUTE IN VDU BUFFER u 2 . P CF A14,STOINF SAVE NEW SCREEN INFORMATION u j P LDR A1,A3 STOP ADDRESS u P RF ERE800 u PERE600 EQU * u P CF A14,ERROR INDICATE ERROR u P R
0x2de9e0…2deb74 (3, 37) Dummy {f00=0x00f0, f01=0x0190, f02=»710 DK1 u P LDK A1,0 STOP ADDRESS =3 v PERE710 EQU * DK1 v 2 P CF A14,SCRINF DK1 v L PERE800 EQU * v h P SUR A10,A10 v | 0 P CF A14,ERASUA ERASE UNPROTECTED TO ADDRESS v * P CF A14,DISMOD DISPLAY MODIFIED FIELD v PERE900 EQU * v P R
0x2deb74…2ded08 Dummy {f00=0x00f0, f01=0x0190, f02=» * v p H P* ERINPT ERASE UNPROTECTED ENTIRE SCREEN * w , H P* * w x H P*******************************************************************
0x2ded08…2dee9c Dummy {f00=0x00f0, f01=0x0190, f02=»1= RESERVED w P* A13= RESERVED x P* x , H P******************************************************************* x 6 PERINPT EQU * x * P CF A14,SCRINF GET SCREEN INFORMATION x ( P CWK A5,LBVDU+1 UNFORMATTED SCREEN? x P RF(NE) ERI100 NO x &
0x2dee9c…2df030 Dummy {f00=0x00f0, f01=0x0190, f02=»SMOD DISPLAY ERASED FIELDS x 4 P CF A14,RDHOME TAB. UNPROTECTED FIRST ON SCREEN y " PERI900 EQU * y Z P RTN A14 y n P EJECT y ~ P IFT IN:DL=1 y < P******************************************************** y < P*
0x2df030…2df1c4 Dummy {f00=0x00f0, f01=0x0190, f02=» * y ` < P******************************************************** z P* REGISTERS z P P* z d P* A11= CREDIT WORK AREA z n P* A13= RESERVED z P* z 8 P*************************************************** z PINSERT EQU * z P IM MODE
0x2df1c4…2df358 Dummy {f00=0x00f0, f01=0x0190, f02=» * z : P* DELETE DELETE CHAR. HANDLING * { . : P* * { l < P******************************************************* { P* REGISTERS { P* { P
0x2df358…2df4ec Dummy {f00=0x00f0, f01=0x0190, f02=»ERVED { P* | < P******************************************************* | PDELETE EQU * | X * P CF A14,SCRINF GET SCREEN INFORMATION | l P LDKL A3,-1 | PDEL025 EQU * | P ADK A3,LLINE | * P CWR A3,A4 LAST POS. ON CURRENT LINE? | P R
0x2df4ec…2df680 Dummy {f00=0x00f0, f01=0x0190, f02=»F(E) DEL700 YES | P LDR A7,A6 } P ANK A7,/20 PROTECTED? } * P RF(NZ) DEL700 YES } H P ORK A6,1 SET MDT-BIT } b P LDR A7,A6 } P LDR A1,A5 } & P CF A14,STOVDU SAVE NEW ATTRIBUTE } P LDR A8,A6 SAVE OLD } P LDR A9,A5 SAVE OLD } , P C
0x2df680…2df814 (3, 38) Dummy {f00=0x00f1, f01=0x0190, f02=»ON } l , P CWR A3,A1 ATTRIBUTE BEFOR END OF LINE? ~ P RF(NG) DEL200 NO ~ : P LDR A3,A1 ~ T PDEL200 EQU * ~ f P LDR A1,A4 ~ z PDEL300 EQU * ~ P ADK A1,1 ~ , P CF A14,GETVDU GET CHAR. IN VDU BUFFER ~ P SUK A1,1 ~ , P CF A14,STOVDU STORE
0x2df814…2df9a8 Dummy {f00=0x00f1, f01=0x0190, f02=» 0 P CF A14,STOVDU STORE NULL CHAR IN VDU BUFFER P CF A14,SAVE1 8 P LDK A5,LLINE N P LDR A6,A11 d P SUR A10,A10 x P CF A14,LINE GET LINE FLAG P LC A1,LINFLG,A6 P ORK A1,1 P SC A1,LINFLG,A6 P CF A14,REST1 ( P C
0x2df9a8…2dfb3c Dummy {f00=0x00f1, f01=0x0190, f02=» RTN A14 P XIF P EJECT < P******************************************************** * < P* * j < P* RESET RESET KEY HANDLING * < P*
0x2dfb3c…2dfcd0 Dummy {f00=0x00f1, f01=0x0190, f02=»REDIT WORK AREA P* A13= RESERVED P* 0 8 P**************************************************** : PRESET EQU * v " P CM MODE,A11 RESET INSERT MODE * P CF A14,LMP6OF TURN OFF "INSERT" LAMP $ P CM KBINH,A11 RESSTORE KEYBOARD ( P C
0x2dfcd0…2dfe64 Dummy {f00=0x00f1, f01=0x0190, f02=»*************************************************** @ P* * < @ P* DUP DUPLICATE KEY * @ P* * @ P
0x2dfe64…2dfff8 Dummy {f00=0x00f1, f01=0x0190, f02=» P* A13= RESERVED P* @ P************************************************************ * PDUP EQU * n P LDK A2,DUPCH GET DUP CHAR. P CF A14,NUM P CF A14,TAB P RTN A14 P EJECT @ P******************************
0x2dfff8…2e018c Dummy {f00=0x00f1, f01=0x0190, f02=»RK KEY * r @ P* * & @ P*********************************************************** j P* REGISTERS P* P* A2= KEY-CHAR P* A11= RESERVED P* A13= RESERVE
0x2e018c…2e0320 Dummy {f00=0x00f1, f01=0x0190, f02=»CHAR. t P CF A14,NUM P RTN A14 " P EJECT 2 D P*************************************************************** @ P* & P* Z E R O : 3 TRIPLE ZERO KEY ( P* Z E R O : 2 DOUBLE ZERO KEY P* 6 P**********************
0x2e0320…2e04b4 (3, 39) Dummy {f00=0x00f1, f01=0x0190, f02=»* > P********************************************************* P L PZERO:3 EQU * T P LDK A2,/30 ZERO CHAR. h " P CF A14,NUM DISPLAY CHARACTER PZERO:2 EQU * P LDK A2,/30 ZERO CHAR. " P CF A14,NUM DISPLAY CHARACTER P LDK
0x2e04b4…2e0648 Dummy {f00=0x00f1, f01=0x0190, f02=»******************************** x < P* * ( < P* OFLINE OFFLINE KEY HANDLING * h < P* * < P********************************
0x2e0648…2e07dc Dummy {f00=0x00f1, f01=0x0190, f02=»*********************************************** POFLINE EQU * 8 P CF A14,CLEAR L P CF A14,RESET b * P CF A14,DCOFLN INDICATE OFFLINE TO DC x ( P CF A14,LMP6ON TURN ON OFFLINE LAMP $ P IM OFFFLG,A11 SET OFFLINE FLAG $ P ADKL A14,4 SK
0x2e07dc…2e0970 Dummy {f00=0x00f1, f01=0x0190, f02=»BL I:RT1 RETURN TO "OFFLINE" PROGRAM P XIF , P EJECT 8 > P********************************************************* F > P* * > P* MFCHGE MAIN FRAME CHANGE *
0x2e0970…2e0b04 Dummy {f00=0x00f1, f01=0x0190, f02=»* REGISTERS P* P* A11= CREDIT WORK AREA P* A13= RESERVED > P* V < P******************************************************* ` P IFT NBRLIN=2 PMFCHGE EQU * P CF A14,CLEAR P CF A14,RESET P CF A14,LMP1OF
0x2e0b04…2e0c98 Dummy {f00=0x00f1, f01=0x0190, f02=»ND MAIN FRAME CHANGE =2 ~ P RF(NZ) MFCH10 P CF A14,LMP1ON 6 P RF MFCH90 L PMFCH10 EQU * ^ P CF A14,LMP2ON r PMFCH90 EQU * P . =2 ( P CF A14,CONCT CONNECT ON NEW LINE =2 $ P CF A14,CHKSTA CHECK LINE STATUS P RTN A14
0x2e0c98…2e0e2c Dummy {f00=0x00f1, f01=0x0190, f02=» * n @ P* COPY LOCAL HARDCOPY * " @ P* * f @ P*********************************************************** P* REGISTERS
0x2e0e2c…2e0fc0 Dummy {f00=0x00f1, f01=0x0190, f02=»******* Z PCOPY EQU * P LD A1,SNAMOD,A11 " 2 P ANKL A1,HCPMOD HARDCOPY ALREADY OUTSTANDING? < $ P RF(NZ) COPY80 YES,WAIT A WHILE r P LD A1,PRTID,A11 & P RF(Z) COPY80 PRINTER NOT ASSIGNED 2 P ANK A1,/FF CHECK IF PRINTER OK IN TASK TABL
0x2e0fc0…2e1154 (3, 40) Dummy {f00=0x00f1, f01=0x0190, f02=» PRINTER ASSIGNED FOUND P LC A1,+3,A3 P ANK A1,/FF PRINTER OK? 4 P RF(Z) COPY10 YES T P RF COPY90 n PCOPY10 EQU * ( P LDK A1,/38 INDICATE HARDCOPY IN WCC P ST A1,WCC,A11 P LDKL A3,BVDU BUFFER P ADR A3,A11 ADDRESSS
0x2e1154…2e12e8 Dummy {f00=0x00f1, f01=0x0190, f02=»R LENGTH x " P CF A14,ICWRT WRITE INTERTASK P IFT SNA=1 6 2 P LDKL A1,HCPMOD INDICATE HARDCOPY OUTSTANDING H P ORS A1,SNAMOD,A11 ~ P XIF P IFF SNA=1 2 P LDKL A1,HCPMOD INDICATE HARDCOPY OUTSTANDING P ORS A1,BSCMOD,A11 P X
0x2e12e8…2e147c Dummy {f00=0x00f1, f01=0x018e, f02=»*********************************************** D P* * 8 0 P* IDENT PRINTER IDENT. HANDLING D P* * D P************
0x2e147c…2e1610 Dummy {f00=0x00f1, f01=0x0190, f02=» P* A11= CREDIT WORK AREA P* A13= T:A ADDRESS $ P* > B P************************************************************* H PIDENT EQU * ( P LD A1,PRTID,A11 GET CURRENT TASKID $ P LD A4,+6,A13 COMMON BLOCK BASE P ANK A1,X'FF' GET
0x2e1610…2e17a4 Dummy {f00=0x00f1, f01=0x0190, f02=» A5,A3 GET ID P SLL A5,8 P LC A5,+1,A3 ( P LC A4,+3,A3 GET STATUS < P CF A14,SAVE1 SAVE REGISTERS P CF A14,DISID DISPLAY TASKID " P LDKL A1,IDEN40 NEXT KEY ENTRY P ST A1,RDMORE,A11 P RF IDEN90 NEXT KEY PIDEN40 E
0x2e17a4…2e1938 Dummy {f00=0x00f1, f01=0x018e, f02=»F(E) IDEN80 YES " P CWK A9,IDKEY GET NEXT TASKID? ( P RF(NE) IDEN90 NO KEEP THE FIRST ONE > PIDEN50 EQU * j & P ADK A3,4 SEARCH FOR NEXT PRINTER ~ P LCR A2,A3 P ANK A2,/FF P LDR A1,A2 P RB(Z) IDEN50 P SLL A1,8 P
0x2e1938…2e1acc Dummy {f00=0x00f1, f01=0x0190, f02=» ~ P LD A3,6,A13 P ADR A3,A2 P SUK A3,4 . P RB IDEN50 @ PIDEN80 EQU * R " P LCR A1,A3 GET PRINTER TO SAVE f P SLL A1,8 P LC A1,+1,A3 ( P ST A1,PRTID,A11 NEW HARDCOPY TASKID PIDEN90 EQU * P RTN A14 P EJECT
0x2e1acc…2e1c60 Dummy {f00=0x00f1, f01=0x0190, f02=» * V B P* KEYL KEYLOCK STATUS * B P* * R B P************************************************************* P* REGISTERS P* P* A2= KEYLOC
0x2e1c60…2e1df4 (3, 41) Dummy {f00=0x00f1, f01=0x0190, f02=»******** Z P IFT KEYLST=1 P IFT KB6272=1 & PKEYL EQU * < * P SUK A2,LKLKEY GET NEG KEY LOCK VALUE N P LD A3,KEYS,A11 OLD STATUS | P LDK A4,/10 PKEYL10 EQU * P SRL A4,1 P ADK A2,2 1 = OFF,0 = ON P RB(N) KEYL10
0x2e1df4…2e1f88 Dummy {f00=0x00f1, f01=0x018e, f02=» P RF KEYL30 NOW ON PKEYL20 EQU * WAS ON P LDR A2,A2 : $ P RF(Z) KEYL99 NOW ON, NO CHANGE L PKEYL30 EQU * CHANGE t P LD A3,KEYS,A11 P XRR A3,A4 CHANGE STATUS $ P ST A3,KEYS,A11 STORE NEW STATUS P* P* KEYLOCK STAT
0x2e1f88…2e211c Dummy {f00=0x00f1, f01=0x0190, f02=» h ( P* A2 = 1, IF CHANGED TO OFF ELSE 0 P* 4 * P* INSERT USER ROUTINE BELOW THIS LINE > P* l PKEYL99 EQU * v P RTN A14 P XIF P EJECT > P********************************************************** P* P* TESTM
0x2e211c…2e22b0 Dummy {f00=0x00f1, f01=0x0190, f02=» RESERVED P* A13= RESERVED P* * > P********************************************************* 4 P IFT TEST=1 v PTESTM EQU * P CF A14,ERASE P CF A14,GETBUF P CF A14,RDSTAT P CF A14,DISSTA P LDR A8,A12
0x2e22b0…2e2444 Dummy {f00=0x00f1, f01=0x0190, f02=» * > P* ENTER ENTER KEY HANDLING * > > P* * > P********************************************************* P* R
0x2e2444…2e25d8 Dummy {f00=0x00f1, f01=0x0190, f02=»*************************** r PENTER EQU * $ P LDK A2,/27 AID-CODE 8 . P CF A14,LMP3ON TURN ON "KEYBOARD INHIBIT" T . P CF A14,TRPF AID+MODIFIED FIELDS+TRANSMIT P RTN A14 P EJECT B P**************************************************
0x2e25d8…2e276c Dummy {f00=0x00f1, f01=0x0190, f02=» * b B P* * B P************************************************************** ^ P* REGISTERS P* P* A2= AID-CODE P* A11= RESERVED P* A13= RESERVED P
0x2e276c…2e2900 Dummy {f00=0x00f1, f01=0x0190, f02=» CF A14,LMP3ON TURN ON "KEYBOARD INHIBIT" ( P CF A14,TRPA UPDATE AID AND TRANSMIT 2 & P CF A14,ERASE ERASE ENTIRE SCREEN ^ P RTN A14 P EJECT D P*************************************************************** D P*
0x2e2900…2e2a94 (3, 42) Dummy {f00=0x00f2, f01=0x0190, f02=» * ~ D P*************************************************************** 6 P* REGISTERS ~ P* P* A11= CREDIT WORK AREA P* A13= RESERVED P* 8 P******************************************
0x2e2a94…2e2c28 Dummy {f00=0x00f2, f01=0x0190, f02=»TIVE? P RF(Z) SYS100 YES & P LDK A1,LOCMOD INDICATE LOCAL MODE ( P RF SYS500 R PSYS100 EQU * d P LDR A2,A1 GET STATUS x P ANKL A2,/C00 MY JOB MODE? P RF(NZ) SYS200 NO & P CF A14,CLEAR CLEAR SCREEN AND DC ( P CF A14,RESK
0x2e2c28…2e2dbc Dummy {f00=0x00f2, f01=0x0190, f02=» NOT LU-LU? x P RF(NE) SYS300 NO & P LDK A1,SYSOP INDICATE SYSTEM MODE . P RF SYS500 X PSYS300 EQU * j $ P ANKL A2,/800 SSCP-LU AND LU-LU? ~ P RF(NZ) SYS400 YES & P LDK A1,SYSOP INDICATE SYSTEM MODE P RF SYS500 PSYS400 EQU *
0x2e2dbc…2e2f50 Dummy {f00=0x00f2, f01=0x0190, f02=»A11 P RTN A14 P XIF P EJECT ( D P*************************************************************** 6 D P* * ~ D P* ATTN ATTENTION KEY HANDLING *
0x2e2f50…2e30e4 Dummy {f00=0x00f2, f01=0x0190, f02=»***** V P* REGISTERS P* , P* A11= RESERVED 6 P* A13= RESERVED N P* f > P********************************************************** p P IFT SNA=1 PATTN EQU * $ P LDK A1,/4B SIGNAL ATTENTION KEY P CF A14,SE
0x2e30e4…2e3278 Dummy {f00=0x00f2, f01=0x0190, f02=»* * @ P* PA PROGRAM ACCESS KEY HANDLING * F B P* * B P********************************************************
0x2e3278…2e340c Dummy {f00=0x00f2, f01=0x0190, f02=»************************************************** PPA1 EQU * : P LDK A2,/25 AID-CODE L P RF PA500 h PPA2 EQU * z P LDK A2,/3E AID-CODE P RF PA500 PPA3 EQU * P LDK A2,/2C AID-CODE PPA500 EQU * , P CF A14,LMP3
0x2e340c…2e35a0 Dummy {f00=0x00f2, f01=0x0190, f02=»14 P EJECT H P******************************************************************* H P* * d H P* PAEX PAEX KEY FOLLOWED BY NUMBER * H P*
0x2e35a0…2e3734 (3, 43) Dummy {f00=0x00f2, f01=0x0190, f02=» P* REGISTERS P* P* A11= CREDIT WORK AREA " P* A13= RESERVED B P* Z 8 P*************************************************** d P IFT PAX=1 PPAEX EQU * P LDKL A1,PAEXA P ST A1,RDMORE,A11 P RTN A14 PPAEX
0x2e3734…2e38c8 Dummy {f00=0x00f2, f01=0x018e, f02=» t P RF(G) PAEXB ILLEGAL CHAR. P RF(NZ) PAEX10 * P CF A14,PA3 PA3 KEY @ P RF PARET PPAEX10 EQU * n P ADK A2,1 P RF(NZ) PAEX20 P CF A14,PA2 PA2 KEY P RF PARET PPAEX20 EQU * P CF A14,PA1 PA1 KEY P
0x2e38c8…2e3a5c Dummy {f00=0x00f2, f01=0x0190, f02=» | P RF PARET DK3 PPAERR EQU * P CF A14,ERROR INDICATE ERROR 2 PPARET EQU * V P RTN A14 j P XIF z P EJECT F P****************************************************************** F P*
0x2e3a5c…2e3bf0 Dummy {f00=0x00f2, f01=0x0190, f02=» * r F P****************************************************************** , P* REGISTERS v P* P* A2= AID-CODE P* A11= RESERVED P* A13= RESERVED P* F P************************************
0x2e3bf0…2e3d84 Dummy {f00=0x00f2, f01=0x0190, f02=»LMP3ON TURN ON KEYBOARD INHIBIT 2 P CF A14,TRPF TRANSMIT AID AND MODIFIED FIELDS ( P RTN A14 ^ P EJECT n F P***************************************************************** | F P* *
0x2e3d84…2e3f18 Dummy {f00=0x00f2, f01=0x0190, f02=» * Z F P***************************************************************** P* REGISTERS ^ P* r P* A11= CREDIT WORK AREA | P* A13= RESERVED P* 6 P************************************************* P IFT PFX=1
0x2e3f18…2e40ac Dummy {f00=0x00f2, f01=0x0190, f02=»F(L) PFERR ILLEGAL,GO TO ERR.HANDLING P RF(NZ) PFEX10 . P LDKL A1,PF0A FIRST NUM 0 D P RF PFNXT NEXT NUMBER f PPFEX10 EQU * P SUK A2,1 P RF(NZ) PFEX20 P LDKL A1,PF1A FIRST NUM 1 P RF PFNXT NEXT NUMBER PPFEX20 E
0x2e40ac…2e4240 Dummy {f00=0x00f2, f01=0x0190, f02=» * P CM RDMORE,A11 P SUK A2,/31 ILLEGAL NUM? P RF(N) PFERR YES @ P SUK A2,9 ILLEGAL NUM? X P RF(NN) PFERR YES v P ADK A2,/9+PFKEY PF1-PF9 P RF PFHAND PPF1A EQU * P CM RDMORE,A11 P SUK A2,/30 ILLEGAL NUM?
0x2e4240…2e43d4 (3, 44) Dummy {f00=0x00f2, f01=0x018e, f02=» PPF2A EQU * P CM RDMORE,A11 P SUK A2,/30 ILLEGAL NUM? , P RF(N) PFERR YES L P SUK A2,5 ILLEGAL NUM? d P RF(NN) PFERR YES " P ADK A2,/5+PFKEY+/13 PF20-PF24 PPFHAND EQU * , P CF A14,PF PROGRAM FUNCTION KEY HANDLING P R
0x2e43d4…2e4568 Dummy {f00=0x00f2, f01=0x0190, f02=» P RTN A14 P XIF P EJECT $ P 2 > P********************************************************** : > P* * | > P* RETURN RETURN * > P*
0x2e4568…2e46fc Dummy {f00=0x00f2, f01=0x40d2, f02=»REGISTERS P* P* A11= RESERVED P* A13= RESERVED 4 P* L < P******************************************************** V PRETURN EQU * P RTN A14 P P END @ RETURN * > P*
0x2e46fc…2e4890 Dummy {f00=0x00f2, f01=0x2008, f02=» ) DATA PF 24 * * $ END * ,@ * 8 6 ) 4 DATA PF 7 ) F DATA PF 8 ) X DATA PF 9 ) j DATA PF 10 ) | DATA PF 11 ) DATA PF 12 ) DATA PF 13 ) DATA PF 14 ) DATA PF 15 ) *C0 ) DATA PF
0x2e4890…2e4a24 Dummy {f00=0x00f2, f01=0x018e, f02=»LAKEY ! P RF(G) KBIN80 ILLEGAL CHAR " P IFT SNA=1 " 0 " P LD A1,SNAMOD,A11 GET SNA MODE " B P ANK A1,/FF " h 2 P CFI A14,CPLKB,A1 COMPLETE KB IN CURRENT MODE " | P XIF " P IFF SNA=1 " P LDK A7,0 " " P CWK A2,FIPA PROGRAM ATTN KEY? " P
0x2e4a24…2e4bb8 Dummy {f00=0x00f2, f01=0x018e, f02=» P LDR A7,A7 ANY KEY-HANDLING # P RF(NZ) KBIN80 NO # ( $ P ADR A3,A3 PREPARE FOR KEY-TABLE # B & P LD A1,RDMORE,A11 KEY IN SEQUENCE? # j P RF(Z) KBIN50 NO # $ P CF A14,DCABOR KILL DC AGAIN DK # $ P LD A1,RDMORE,A11 RESTORE A1 DK2 # ( P CFR A14,A1
0x2e4bb8…2e4d4c Dummy {f00=0x00f2, f01=0x0190, f02=» # PKBIN80 EQU * $ " P CF A14,RESKB RESET KB BUFFER $ PKBIN90 EQU * $ B P RTN A14 $ V P EJECT $ f P IFT SNA=1 $ t J P********************************************************************* $ J P*
0x2e4d4c…2e4ee0 Dummy {f00=0x00f2, f01=0x0190, f02=» * $ p J P********************************************************************* % . PCPLKB EQU * % | ( P DATA KBCPLO KB-COMPL. IN LOCAL MODE % * P DATA KBCPSY KB-COMPL. IN SYSTEM MODE % * P DATA KBCPJO KB-COMPL. IN MY J
0x2e4ee0…2e5074 (3, 45) Opaque[0x194]
0x2e5074…2e5208 # DirEnt {nam=»VDU «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1e58, f03=0x0000}
0x2e5074…2e5208 IdxSect {
0x2e5074…2e5208 f00 = 0x00f2 // 0x2e5074 @0x0
0x2e5074…2e5208 f01 = 0x0022 // 0x2e5076 @0x2
0x2e5074…2e5208 gno = [ // 0x2e5078 @0x4
0x2e5074…2e5208 [0x00]: C0x00f2.0x3.0
0x2e5074…2e5208 [0x01]: C0x00f3.0x0.0
0x2e5074…2e5208 [0x02]: C0x00f3.0x1.0
0x2e5074…2e5208 [0x03]: C0x00f3.0x2.0
0x2e5074…2e5208 [0x04]: C0x00f3.0x3.0
0x2e5074…2e5208 [0x05]: C0x00f4.0x0.0
0x2e5074…2e5208 [0x06]: C0x00f4.0x1.0
0x2e5074…2e5208 [0x07]: C0x00f4.0x2.0
0x2e5074…2e5208 [0x08]: C0x00f4.0x3.0
0x2e5074…2e5208 [0x09]: C0x00f5.0x0.0
0x2e5074…2e5208 [0x0a]: C0x00f5.0x1.0
0x2e5074…2e5208 [0x0b]: C0x00f5.0x2.0
0x2e5074…2e5208 [0x0c]: C0x00f5.0x3.0
0x2e5074…2e5208 [0x0d]: C0x00f6.0x0.0
0x2e5074…2e5208 [0x0e]: C0x00f6.0x1.0
0x2e5074…2e5208 [0x0f]: C0x00f6.0x2.0
0x2e5074…2e5208 [0x10]: C0x00f6.0x3.0
0x2e5074…2e5208 ]
0x2e5074…2e5208 }
0x2e5208…2e539c Dummy {f00=0x00f2, f01=0x0190, f02=» . P IDENT VDU REL 11.0 82-09-28 870150541100 P 6 P =22, BLOCK OUTPUT > $ P MOVE TO UNPROT, ONLY FOR P&T Z P $ P =37 DUP OR FM CHAR ON PRINTER & P =21 LOOP WHEN VDU NOT OPERABLE P 82-05-17 P =2 LOOP IN ERASUA
0x2e539c…2e5530 Dummy {f00=0x00f2, f01=0x0190, f02=»-26 D P**************************************************************** D P* * T D P* MODULE VDU * D P* MODULE HANDLING T
0x2e5530…2e56c4 Dummy {f00=0x00f2, f01=0x0190, f02=»N 3270 SNA/SDLC, BSC) * t D P* * , D P**************************************************************** t P EJECT @ P***********************************************************
0x2e56c4…2e5858 Dummy {f00=0x00f2, f01=0x0190, f02=»LINE r 6 P* SPACES MOVE SPACES INTO ECB BUFFER . P* INTCHK GET INTENSITY CHAR. F 0 P* SETIND SET DISPLAY INDICATOR x & P* INSMOD INSERT CHAR. * P* UPDCNT UPDATE COUNTERS 2 P*
0x2e5858…2e59ec Dummy {f00=0x00f2, f01=0x0190, f02=» INFORMATION p 2 P* STOINF STORE SCREEN INFORMATION & P* SOUND SOUND ALARM J . P* WRAP CHECK IF WRAP AROUND t , P* LINWRP CHECK IF LINE WRAP * P* LINE UPDATE LINE FLAG < P*
0x2e59ec…2e5b80 Dummy {f00=0x00f2, f01=0x0190, f02=»TIRE SCREEN r 0 P* ERASUP ERASE ALL UNPROTECTED 6 P* ERASUA ERASE UNPROTECTED TO ADDRESS H 8 P* POSUNP MOVE CURSOR TO NEXT UNPRO. POS 2 P* DISID DISPLAY HARDCOPY TASKID , P* DISSTA
0x2e5b80…2e5d14 (3, 46) Dummy {f00=0x00f3, f01=0x0190, f02=»SEARCH ATTRIBUTE FORWARD z 4 P* ATMASB SEARCH ATTRIBUTE BACKWARD 2 P* SNULL SEARCH FIRST NULL CHAR. X 2 P* WCHAR DISPLAY CHAR. AND CURSOR 8 P* RFMDUP REPLACE FM OR DUP CHAR. IF ANY ( P*
0x2e5d14…2e5ea8 Dummy {f00=0x00f3, f01=0x0190, f02=»****************************************************************** H P* * J H P* ENTRY POINTS * H P*
0x2e5ea8…2e603c Dummy {f00=0x00f3, f01=0x0190, f02=»INSERT CHARACTER , P ENTRY GETVDU GET CHAR. FROM VDU BUFFER , P ENTRY STOVDU STORE CHAR. IN VDU BUFFER H ( P ENTRY SCRINF GET SCREEN INFORMATION x * P ENTRY STOINF SAVE SCREEN INFORMATION 0 P ENTRY POSUNP MOVE TO NEXT UNPROTECTED POS. , P E
0x2e603c…2e61d0 Dummy {f00=0x00f3, f01=0x0190, f02=» WCHAR DISPLAY CHAR. AND CURSOR * P ENTRY DISMOD DISPLAY MODIFIED FIELDS ( ( P ENTRY DISID DISPLAY HARDCOPY TASKID V . P ENTRY ERASUA ERASE UNPROTECTED TO ADDRESS $ P ENTRY ERASE ERASE ENTIRE SCREEN $ P ENTRY SOUND SOUND ALARM ON VDU ( P ENT
0x2e61d0…2e6364 Dummy {f00=0x00f3, f01=0x0190, f02=»K LINE WRAP ~ P ENTRY LINE UPDATE LINE FLAG P ENTRY LINATT UPADTE 8 $ P ENTRY DISSTA DISPLAY STATISTICS T , P ENTRY RFMDUP REPLACE FM OR DUP CHAR =37 | P P EJECT H P********************************************************************
0x2e6364…2e64f8 Dummy {f00=0x00f3, f01=0x0190, f02=» * Z H P* * H P******************************************************************** b P 0 P EXTRN TAB TAB UNPROCTECTED FOREWARD (KEYB) : P EXTRN CRDOWN MOVE CURSOR UNPR
0x2e64f8…2e668c Dummy {f00=0x00f3, f01=0x0190, f02=» REST1 RESTORE REGISTERS (PAD) P EJECT & P 4 P < J P********************************************************************* D J P* * J P* CONDITIONAL ASSEMBLY PARAMETERS
0x2e668c…2e6820 Dummy {f00=0x00f3, f01=0x0190, f02=»************************************************* | P : $ PX:I EQU 1 INSERT/DELETE HANDLING B PIN:DL EQU 1 j " PX:O EQU 0 TEST INCLUDED IF:=1 ~ PTEST EQU 0 P EJECT D P***************************************************************
0x2e6820…2e69b4 (3, 47) Dummy {f00=0x00f3, f01=0x0190, f02=» * ~ D P*************************************************************** 6 P ~ P* $ P* EQUATES FOR ECB HANDLING P* PECBBA EQU 2 BUFFER ADDRESS PECBRL EQU 4 REQUESTED LENGTH P
0x2e69b4…2e6b48 Dummy {f00=0x00f3, f01=0x0190, f02=» P* PNULL EQU 0 NULL CHAR. " PNEWLIN EQU /0A NEW LINE CHAR. , " PFORMFD EQU /0C FORM FEED CHAR. R $ PENDMES EQU /19 END MESSAGE CHAR. x " PDUPCH EQU /1C DUPLICATE CHAR. " PFMCH EQU /1E FIELD MARK CHAR. P* P* TASK IDENTIFICAT
0x2e6b48…2e6cdc Dummy {f00=0x00f3, f01=0x0190, f02=»D t ( PATTREC EQU /0002 ATTRIBUTE RECEIVED P* 6 P* VDU SCREEN SIZE @ P* Z PLLINE EQU 80 LINE LENGTH d PLBVDU EQU 1920 TOTAL SIZE P IFT TEST=1 P* P* STAT. LAYOUT P* , PNUMLIN EQU 13 NUMBER OF LINES YO DIS
0x2e6cdc…2e6e70 Dummy {f00=0x00f3, f01=0x0190, f02=» l 8 PINDEX DATA /0102,/0405,/0608,/090A,/0C0E,/1D1E,/1F00 P XIF D P EJECT P P* ^ P* RELATIVE ADDRESSES IN h P* TERMINAL WORKBLOCK P* $ PTCT01 EQU 0 TASK IDENTIFICATION " PBVDU EQU TCT01+2 SCREEN BUFFER , PLINFLG EQU B
0x2e6e70…2e7004 Dummy {f00=0x00f3, f01=0x0190, f02=»TTRIB+2 & PWCC EQU CURATT+2 WCC/CCC CHARACTER ( PINTATT EQU WCC+8 INTENSITY ATTRIBUTE : $ PREGI EQU INTATT+32 WORK REGISTER f PECBVDU EQU REGI+40 P* P* RELATIVE ADDRESSES IN P* COMMON WORKBLOCK P* " PIDTEXT EQU 2 IDENT
0x2e7004…2e7198 Dummy {f00=0x00f3, f01=0x0190, f02=»************************************* | > P* * . > P* DISMOD DISPLAY MODIFIED FIELDS * p > P* * > P********************
0x2e7198…2e732c Dummy {f00=0x00f3, f01=0x018e, f02=»= REL. CURSOR POS. P* A5= REL. ATTRIBUTE POS. P* A6= ADDRESS IN ECB < P* A7= INDEX IN ECB X P* A8= VDU ECB r P* A9= INTENSITY COUNTER P* A10= INDICATOR P* A11= CREDIT WORK AREA P* A13= RESERVED P* : P******
0x2e732c…2e74c0 Dummy {f00=0x00f3, f01=0x018e, f02=» P LKM =22 P DATA 1 =22 P LDKL A1,/101 LINE 1 POS. 1 * P ST A1,ECBCW,A8 N & P SUR A9,A9 RESET INTENSITY COUNTER f P SUR A10,A10 P LDKL A3,BVDU P ADR A3,A11 P CF A14,SCRINF " P LDK A4,0 FIRST SCREEN POS. DK (
0x2e74c0…2e7654 (3, 48) Dummy {f00=0x00f3, f01=0x0190, f02=» P RF(NE) DIS100 NO P LDK A2,0 LOW INTENSITY P ST A2,INTATT,A11 > PDIS100 EQU * X P LDR A10,A10 l P RF(NZ) DIS900 ( P CF A14,INTCHK CHECK INTENSITY CHAR. P LDR A1,A10 P SUR A10,A10 P LDR A1,A1 P RF(N) DIS80
0x2e7654…2e77e8 Dummy {f00=0x00f3, f01=0x018e, f02=») DIS100 NO P RF DIS900 PDIS400 EQU * & " P CWK A7,LLINE LINE COMPLETED? : P RF(L) DIS500 NO ` P CF A14,DISLIN DISPLAY LINE x P RB DIS100 PDIS500 EQU * & P LCR A2,A3 GET CHAR. IN VDU-BUFFER & P CF A14,SETIND SET SPACE IND
0x2e77e8…2e797c Dummy {f00=0x00f3, f01=0x0190, f02=» v P RB(E) DIS400 YES " P CWK A2,NEWLIN NEW LINE CHAR.? " P RB(E) DIS400 YES H & P CWK A2,ENDMES END MESSAGE CHAR.? b P RB(E) DIS400 YES $ P CWK A2,FORMFD FORM FEED CHAR.? P RB(E) DIS400 YES , P CF A14,RFMDUP REPLACE DUP AND F
0x2e797c…2e7b10 Dummy {f00=0x00f3, f01=0x0190, f02=» P ANK A1,8 LOW INTENSITY? P RF(Z) DIS725 YES ( P ANK A2,4 HIGH INTENSITY? B P RF(Z) DIS715 YES d " P CF A14,UPDCNT UPDATE COUNTERS ~ P RF DIS800 NONDISPLAY PDIS715 EQU * P LDK A2,/1F HIGH P RF DIS750 PDIS725 E
0x2e7b10…2e7ca4 Dummy {f00=0x00f3, f01=0x0190, f02=»ATE COUNTERS ~ P ADK A6,1 P RB DIS400 & PDIS800 EQU * 8 " P CWK A7,LLINE LINE COMPLETED? L P RF(L) DIS850 NO r P CF A14,DISLIN DISPLAY LINE P RB DIS100 PDIS850 EQU * & P LCR A2,A3 GET CHAR. IN VDU-BUFFER P CCK A2,/8
0x2e7ca4…2e7e38 Dummy {f00=0x00f3, f01=0x018e, f02=»NF GET SCREEN INFORMATION P LDK A1,2 REQ. LENGTH " P CF A14,DISCHA SET CURSOR @ P LDK A7,/BE END OF BLOCK =22 b P LKM =22 P DATA 1 =22 P RTN A14 P EJECT @ P***********************************************************
0x2e7e38…2e7fcc Dummy {f00=0x00f3, f01=0x0190, f02=» R @ P* * @ P*********************************************************** L P* REGISTERS P* P* A3= RESERVED P* A4= RESERVED P* A5= RESERVED P* A6= RESERVED P*
0x2e7fcc…2e8160 Dummy {f00=0x00f3, f01=0x0190, f02=»********************************************************* PDISLIN EQU * B P LDK A7,2 REQ. LENGTH V P LDR A1,A10 t P ANKL A1,1 ONLY SPACES? P RF(Z) DISL10 YES P LDKL A7,LLINE+2 REQ. LENGTH , P ADR A7,A9 ADD NUMBER OF INTENSITY
0x2e8160…2e82f4 (3, 49) Dummy {f00=0x00f3, f01=0x0190, f02=» n P LKM P DATA 1 P LD A1,ECBRC,A8 . =21 $ P ANK A1,1 NOT OPERABLE? =21 B " P RF(Z) DISL20 VDU OPERABLE =21 f 0 P ST A2,ECBCW,A8 NOT OP. REST CURSOR POS =21 & P RF DISL90 TERMINATE VDU LINE =21 PDISL20 EQU * . =21 $ P LD
0x2e82f4…2e8488 Dummy {f00=0x00f3, f01=0x0190, f02=»,ECBBA,A8 P LDK A2,/2B P SC A2,1,A6 & P LDKL A2,/1420 : P SC A2,3,A6 P P SRL A2,8 d P SC A2,2,A6 v P LDK A2,84 P ST A2,ECBRL,A8 P LDK A7,/86 WRITE P LKM P DATA 1 PDISL90 EQU * P ADK A5,1
0x2e8488…2e861c Dummy {f00=0x00f3, f01=0x0190, f02=»UR A10,A10 P LD A2,ECBCW,A8 P CWK A2,/1901 END OF SCREEN * P RF(NE) DISL95 NO N P LDKL A10,1 h PDISL95 EQU * | , P CF A14,SPACES MOVE SPACES TO ECB BUFFER P RTN A14 P EJECT @ P******************************************
0x2e861c…2e87b0 Dummy {f00=0x00f3, f01=0x0190, f02=»UFFER * f @ P* * ! @ P************************************************************ ! ^ P* REGISTERS ! P* ! P* A2= CHAR. ! P* A3= RESERVED ! P* A4= RESERVED ! P* A5= RE
0x2e87b0…2e8944 Dummy {f00=0x00f3, f01=0x0190, f02=» INDICATOR ! P* A11= RESERVED " P* A13= RESERVED " * P* " B @ P************************************************************ " L PSPACES EQU * " & P LD A6,ECBBA,A8 GET BUFFER ADDRESS " P ADK A6,2 " P LDK A7,LLINE LINE LENGTH " P ADR A
0x2e8944…2e8ad8 Dummy {f00=0x00f3, f01=0x018e, f02=»7,2 WHOLE BUFFER SPACED? " P RB(P) SPAC10 NO # P LDK A2,0 CHAR. # 8 " P LD A6,ECBBA,A8 BUFFER ADDRESS # P P ADK A6,2 # v " P LDK A7,0 RESET CHAR. COUNTER # P RTN A14 # P EJECT # > P********************************************************* #
0x2e8ad8…2e8c6c Dummy {f00=0x00f3, f01=0x0190, f02=» > P* * $ > P********************************************************* $ F P* REGISTERS $ P* $ P* A2= CHAR. $ P* A3= RESERVED $ P* A4= RESERVED $ P* A5= RESERVED $ P* A6= ADDRES
0x2e8c6c…2e8e00 Dummy {f00=0x00f3, f01=0x0190, f02=»T WORK AREA $ P* A13= RESERVED % P* % , 4 P************************************************ % 6 PINTCHK EQU * % n & P SUR A9,A9 RESET INTENSITY COUNTER % $ P LC A2,LINFLG,A5 GET LINE FLAG % P ANK A2,1 MODIFIED? % P RF(NZ) INT100 YES %
0x2e8e00…2e8f94 (3, 50) Dummy {f00=0x00f4, f01=0x0190, f02=» P ADS A2,ECBCW,A8 & P LDKL A10,0 & P RF INT900 & 0 PINT100 EQU * & B P LC A2,LINFLG,A5 & V P ANK A2,2 & n P SC A2,LINFLG,A5 & P LDKL A10,1 & P LD A2,REGI,A11 & ( P CWK A2,LBVDU+1 UNFORMATTED SCREEN? & P RF(E) INT200 YES &
0x2e8f94…2e9128 Dummy {f00=0x00f4, f01=0x0190, f02=» & l P ST A6,INTATT,A11 ' P LDR A5,A2 ' " P LDR A6,A3 ' 4 P CF A14,STOINF ' F P CF A14,REST1 ' P LDK A7,0 ' r PINT200 EQU * ' P LD A2,INTATT,A11 ' P LDR A1,A2 ' P ANK A1,8 LOW INTENSITY? ' P RF(Z) INT300 YES ' P ANK A2,4
0x2e9128…2e92bc Dummy {f00=0x00f4, f01=0x0190, f02=»LOW ' PINT400 EQU * ( " P SCR A2,A6 SAVE IN ECB BUFFER ( P ADK A6,1 ( F P ADKL A9,1 ( X P RF INT900 ( j PINT800 EQU * ( | P LDKL A10,/8000 ( PINT900 EQU * ( P RTN A14 ( P EJECT ( 4 P**********************************************
0x2e92bc…2e9450 Dummy {f00=0x00f4, f01=0x0190, f02=» * ( 4 P************************************************ ) * P* REGISTERS ) b P* ) v P* A2= CHAR ) P* A3= RESERVED ) P* A4= RESERVED ) P* A5= RESERVED ) P* A6= RESERVED ) P* A7= RESERVED ) P* A8= RE
0x2e9450…2e95e4 Dummy {f00=0x00f4, f01=0x0190, f02=»************************ ) PSETIND EQU * * P CWK A2,NULL NULL CHAR? * 4 P RF(E) SETI90 YES * T ( P ORKL A10,1 INDICATE NOT ONLY SPACES * n PSETI90 EQU * * P RTN A14 * P EJECT * D P************************************************************
0x2e95e4…2e9778 Dummy {f00=0x00f4, f01=0x0190, f02=» * * D P* * + D P**************************************************************** + P* REGISTERS + P* + D P* A1= AT RETURN 0=NULL IN POS., 1=NORMAL INSERT, 2=NOT ALLOWED +
0x2e9778…2e990c Dummy {f00=0x00f4, f01=0x0190, f02=» AREA + ~ P* A13= RESERVED , P* , & D P*************************************************************** , 0 PINSMOD EQU * , x P IFT IN:DL=1 , P LDR A1,A4 , * P CF A14,GETVDU GET CHAR. IN VDU BUFFER , P CCK A7,NULL NULL CHAR.? , P RF(NE)
0x2e990c…2e9aa0 Dummy {f00=0x00f4, f01=0x0190, f02=»UNFORMATTED SCREEN? , P RF(E) INS200 YES - P LDR A8,A6 SAVE OLD - 6 P LDR A9,A5 SAVE OLD - R , P CF A14,ATMASF SEARCH ATTRIBUTE FORWARD - n P LDR A3,A5 - P ST A8,ATTRIB,A11 RESTORE - P ST A9,CURATT,A11 RESTORE - P LDR A6,A8 - P L
0x2e9aa0…2e9c34 (3, 51) Dummy {f00=0x00f4, f01=0x018e, f02=» A1,2 INDICATE ERROR - P RF INS900 . PINS300 EQU * . . ( P CWK A5,LBVDU+1 UNFORMATTED SCREEN? . B P RF(E) INS350 YES . n * P ORK A6,1 SET MDT-BIT ON IN ATTRIBUTE . P ST A6,ATTRIB,A11 . P LDR A1,A5 . P LDR A7,A6 . 4 P CF A14,STOVDU SAVE
0x2e9c34…2e9dc8 Dummy {f00=0x00f4, f01=0x0190, f02=» P LDR A6,A11 / P SUR A10,A10 / P LDR A9,A1 / , " P CF A14,LINE UPDATE LINE FLAG / > P LDR A1,A9 / d PINS400 EQU * / v . P CWK A1,0 CHAR TO MOVE IN LAST SCREEN POS? / P RF(E) INS500 YES / P SUK A1,1 / * P CF A14,GETVDU GET CHAR IN VDU B
0x2e9dc8…2e9f5c Dummy {f00=0x00f4, f01=0x018e, f02=»,LINFLG,A6 / P ORKL A9,1 0 P SC A9,LINFLG,A6 0 $ , P CF A14,STOVDU STORE CHAR IN VDU BUFFER 0 < P SUK A1,1 0 l P SUK A4,1 0 ~ PINS450 EQU * 0 P CW A1,REGI,A11 ALL SHIFTED? 0 P RF(E) INS600 YES 0 P RB INS400 0 PINS500 EQU * 0 " P
0x2e9f5c…2ea0f0 Dummy {f00=0x00f4, f01=0x0190, f02=» P LDK A5,LLINE 1 P LDR A6,A11 1 P CF A14,LINE 1 . P LDR A1,A9 1 B P LC A9,LINFLG,A6 1 T P ORKL A9,1 1 l P SC A9,LINFLG,A6 1 ~ , P CF A14,STOVDU STORE CHAR IN VDU BUFFER 1 & P LDKL A1,LBVDU-1 LAST SCREEN POS. 1 P LDKL A4,LBVDU-1 1 P
0x2ea0f0…2ea284 Dummy {f00=0x00f4, f01=0x0190, f02=» P LDR A6,A11 2 P CF A14,LINE 2 P LC A9,LINFLG,A6 2 , P ORKL A9,1 2 D P SC A9,LINFLG,A6 2 V P IM PCURS,A11 MOVE CURSOR 2 n P LD A4,REGI,A11 2 P ADK A4,1 2 P CWK A4,LBVDU-1 WRAP AROUND? 2 P RF(NG) INS700 NO 2 " P LDK A4,0 FIRST
0x2ea284…2ea418 Dummy {f00=0x00f4, f01=0x018e, f02=»INSERT 2 v PINS900 EQU * 3 P RTN A14 3 " P XIF 3 2 P EJECT 3 > > P********************************************************* 3 L > P* * 3 > P* UPDCNT UPDATE COUNTERS
0x2ea418…2ea5ac Dummy {f00=0x00f4, f01=0x0190, f02=» 3 T P* REGISTERS 4 P* 4 $ P* A3= ADDRESS IN VDU BUFFER 4 . P* A4= REL CURSOR POS 4 R P* A5= RESERVED 4 n P* A6= ADDRESS IN ECB 4 P* A7= INDEX IN ECB 4 P* A8= RESERVED 4 P* A9= RESERVED 4 P* A10= RESERVED 4 P* A11= RES
0x2ea5ac…2ea740 Dummy {f00=0x00f4, f01=0x0190, f02=»DK A3,1 4 P ADK A4,1 5 P ADK A6,1 5 " P ADK A7,1 5 4 P RTN A14 5 F P EJECT 5 V D P**************************************************************** 5 d D P* * 5 D P* GETVDU
0x2ea740…2ea8d4 (3, 52) Dummy {f00=0x00f4, f01=0x018e, f02=»**************************************************** 5 P* REGISTERS 6 < P* 6 P P* A1= REL. POS IN VDU BUFFER 6 Z P* A2= RESERVED 6 ~ P* A3= RESERVED 6 P* A4= RESERVED 6 P* A5= RESERVED 6 P* A6= RESERVED 6 P* A7= CHAR. FROM VDU BUFFER
0x2ea8d4…2eaa68 Dummy {f00=0x00f4, f01=0x0190, f02=» 6 < P******************************************************** 7 PGETVDU EQU * 7 H P LDKL A7,BVDU 7 P ADR A7,A11 7 r P ADR A7,A1 7 P LCR A7,A7 7 P ANK A7,/FF 7 P RTN A14 7 P EJECT 7 B P********************************************
0x2eaa68…2eabfc Dummy {f00=0x00f4, f01=0x0190, f02=» BUFFER * 7 h B P* * 8 B P************************************************************** 8 d P* REGISTERS 8 P* 8 " P* A1= REL. POS. IN VDU BUFFER 8 P* A2= RESERVED 8 P* A3
0x2eabfc…2ead90 Dummy {f00=0x00f4, f01=0x0190, f02=»RVED 8 P* A10= RESERVED 9 P* A11= CREDIT WORK AREA 9 $ P* A13= RESERVED 9 D P* 9 < P******************************************************** 9 f PSTOVDU EQU * 9 P LDKL A8,BVDU 9 P ADR A8,A11 9 P ADR A8,A1 9 P SCR A7,A8 9 P
0x2ead90…2eaf24 Dummy {f00=0x00f4, f01=0x0190, f02=» * 9 f < P* SCRINF GET SCREEN INFORMATION * : < P* * : V < P******************************************************** : P* REGISTERS : P* : P* A2= RESERVED :
0x2eaf24…2eb0b8 Dummy {f00=0x00f4, f01=0x0190, f02=»ESERVED : P* ; < P******************************************************* ; PSCRINF EQU * ; Z $ P LD A4,PCURS,A11 GET CURSOR POS. ; n ( P LD A5,CURATT,A11 GET ATTRIBUTE POS. ; * P LD A6,ATTRIB,A11 GET ATTRIBUTE CHAR. ; P RTN A14 ; P EJECT ;
0x2eb0b8…2eb24c Dummy {f00=0x00f4, f01=0x0190, f02=» STOINF STORE SCREEN INFORMATION * ; < P* * < > < P******************************************************** < ~ P* REGISTERS < P* < P* A4= REL. CURSOR POS. < P* A5= REL. ATT
0x2eb24c…2eb3e0 Dummy {f00=0x00f4, f01=0x0190, f02=»************************************ < | PSTOINF EQU * = , P ST A4,PCURS,A11 = @ P ST A5,CURATT,A11 = X P ST A6,ATTRIB,A11 = r P RTN A14 = P EJECT = < P******************************************************* = < P*
0x2eb3e0…2eb574 (3, 53) Dummy {f00=0x00f4, f01=0x0190, f02=» * = j < P******************************************************* > P* REGISTERS > Z P* > n P* A1= RETURN CODE > x P* A8= ECBVDU > P* A11= CREDIT WORK AREA > P* A13= RESERVED > P* > < P********************************
0x2eb574…2eb708 Dummy {f00=0x00f4, f01=0x0190, f02=» SC A2,1,A1 > P LDK A2,/07 BELL CHAR. ? P SC A2,2,A1 ? 2 P LDK A2,3 REQ. LENGTH ? F P ST A2,ECBRL,A8 ? d P LDK A7,/86 ? | P LKM ? P DATA 1 ? $ P LD A1,ECBRC,A8 GET RETURN CODE ? P RTN A14 ? P EJECT ? : P**********************
0x2eb708…2eb89c Dummy {f00=0x00f4, f01=0x0190, f02=»AROUND * ? n : P* * @ : P***************************************************** @ Z P* REGISTERS @ P* @ P* A2= RESERVED @ P* A3= ADDRESS IN VDU BUFFER @ P* A4= REL. CURSOR POS. @
0x2eb89c…2eba30 Dummy {f00=0x00f4, f01=0x0190, f02=» P* A11= CREDIT WORK AREA A P* A13= RESERVED A $ P* A < : P***************************************************** A F PWRAP EQU * A P CWK A4,LBVDU WRAP AROUND A P RF(L) WRAP90 NO A P LDK A4,0 FIRST SCREEN POS. A P LDKL A3,BVDU A
0x2eba30…2ebbc4 Dummy {f00=0x00f4, f01=0x0190, f02=» @ P* * B B P* LINWRP CHECK LINE WRAP * B H @ P* * B @ P******************************************************
0x2ebbc4…2ebd58 Dummy {f00=0x00f4, f01=0x0190, f02=»SERVED B P* A8= RESERVED C P* A9= RESERVED C $ P* A10= RESERVED C : P* A11= RESERVED C R P* A13= RESERVED C j P* C @ P*********************************************************** C PLINWRP EQU * C P CWR A5,A4 END OF LINE? C P RF(
0x2ebd58…2ebeec Dummy {f00=0x00f4, f01=0x0190, f02=»******************************** C t @ P* * D ( @ P* LINE UPDATE LINE FLAG * D l @ P* * D B P********************
0x2ebeec…2ec080 Dummy {f00=0x00f4, f01=0x0190, f02=» D | P* A5= LAST IN ROW REL POS E $ P* A6= INTERNAL LINE FLAG ADDRESS E * P* A8= RESERVED E R P* A9= RESERVED E h P* A10= RESERFED E ~ P* A11= CREDIT WORK AREA E P* A13= RESERVED E P* E @ P************************************************
0x2ec080…2ec214 (3, 54) Dummy {f00=0x00f5, f01=0x018e, f02=»TTRIBUTE RECEIVED? E P RF(Z) LIN100 NO F P LC A1,LINFLG,A6 F 2 P ORK A1,2 F J P SC A1,LINFLG,A6 F PLIN100 EQU * F t P SUR A6,A11 F P ADK A6,1 UPDATE ADDRESS F P CWK A6,23 WRAP SCREEN? F P RF(G) LIN300 YES F P ADK A5,LLINE F
0x2ec214…2ec3a8 Dummy {f00=0x00f5, f01=0x0190, f02=» P LDR A6,A11 G P LDK A5,LLINE G PLIN400 EQU * G . P SUR A5,A4 G B P CWK A5,81 G V P RF(L) LIN500 THIS LINE G h P LDK A5,LLINE G P LDR A6,A11 G P RB LINE G PLIN500 EQU * G P ADR A5,A4 RESTORE G P RTN A14 G P EJECT G
0x2ec3a8…2ec53c Dummy {f00=0x00f5, f01=0x0190, f02=»* G T B P* LINATT UPADTE LINFLG AT ATTRIBUTE CHANGE * H B P* * H P B P************************************************************* H P* REGISTERS H P* H P* A3= ADDRESS
0x2ec53c…2ec6d0 Dummy {f00=0x00f5, f01=0x0190, f02=»ED H P* A9= RESERVED I P* A10= RESERVED I P* A11= CREDIT WORK AREA I 8 P* A13= RESERVED I X P* I p B P************************************************************** I z PLINATT EQU * I P CF A14,SAVE1 I P SUR A6,A11 I P LDK A2,0
0x2ec6d0…2ec864 Dummy {f00=0x00f5, f01=0x018e, f02=» I P ADR A6,A11 J P LC A1,LINFLG,A6 J P ORK A1,1 J 4 P SC A1,LINFLG,A6 J F P SUR A6,A11 J ^ P ADK A6,1 J r P CWK A6,23 WRAP AROUND? J P RF(G) LINA20 YES J P ADK A5,LLINE J P RF LINA30 J PLINA20 EQU * J P LDK A6,0 J
0x2ec864…2ec9f8 Dummy {f00=0x00f5, f01=0x0190, f02=» J r P RF(E) LINA40 YES =1 K P LCR A2,A3 K $ P CWK A2,/80 ATTRIBUTE K 6 P RB(NG) LINA10 YES K T PLINA40 EQU * . =1 K n P CF A14,REST1 K P RTN A14 K P EJECT K @ P*********************************************************** K @ P*
0x2ec9f8…2ecb8c Dummy {f00=0x00f5, f01=0x0190, f02=» * K @ P*********************************************************** L < P* REGISTERS L P* L P* A3= ADDRES IN VDU BUFFER L P* A4= REL CURSOR POS L P* A5= RESERVED L P* A6= RESERVED L P
0x2ecb8c…2ecd20 Dummy {f00=0x00f5, f01=0x0190, f02=»************************************************* L PNLROUT EQU * M : P LDR A1,A4 SAVE CURSOR POS. M N . P CF A14,CRDOWN MOVE CURSOR ON E LINE DOWN M r P LDK A7,0 M PNLR100 EQU * M ( P SUK A4,LLINE COMPUTE LEFTMOST POS. M P RF(N) NLR200 M
0x2ecd20…2eceb4 (3, 55) Dummy {f00=0x00f5, f01=0x0190, f02=» NULLED? M P RF(E) NLR900 YES N " P SCR A2,A3 NULL IN VDU BUFFER N * P LC A1,LINFLG,A6 N P P ORKL A1,1 N h P SC A1,LINFLG,A6 N z P ADK A3,1 N P ADK A4,1 N P CF A14,LINWRP N P RB NLR300 N PNLR900 EQU * N P RTN A14 N P EJECT
0x2eceb4…2ed048 Dummy {f00=0x00f5, f01=0x0190, f02=» * N H P* ERASE ERASE ENTIRE SCREEN * O H P* * O d H P******************************************************************* O P* REGISTERS
0x2ed048…2ed1dc Dummy {f00=0x00f5, f01=0x0190, f02=» P* A6= ATTRIBUTE CHAR P P* A11= CREDIT WORK AREA P P* A13= RESERVED P @ P* P X > P********************************************************* P b PERASE EQU * P P LDK A4,0 FIRST SCREEN POS. P P LDKL A3,BVDU P P ADR A3,A11 P " P L
0x2ed1dc…2ed370 Dummy {f00=0x00f5, f01=0x0190, f02=»A3 STORE CHAR. P P ADK A3,1 Q P ADK A4,1 Q ( P RB ERAS10 Q : PERAS20 EQU * Q L P LDK A4,0 FIRST SCREEN POS. Q ` ( P LDKL A5,LBVDU+1 UNFORMATTED SCREEN Q P LDK A6,0 Q * P CF A14,STOINF SAVE SCREEN INFORMATION Q P LC A1,TCT01,A11 Q " P
0x2ed370…2ed504 Dummy {f00=0x00f5, f01=0x0190, f02=»8 Q P SC A2,1,A1 R P LDK A1,2 REQ. LENGTH R P ST A1,ECBRL,A8 R < P LDK A7,/86 WRITE R T P LKM R n P DATA 1 R z PERAS30 EQU * R P RTN A14 R P EJECT R > P********************************************************* R > P*
0x2ed504…2ed698 Dummy {f00=0x00f5, f01=0x0190, f02=» * R > P********************************************************* S 4 P* REGISTERS S v P* S P* A2= CHAR. S P* A3= ADDRESS IN VDU-BUFFER S P* A4= REL. CURSOR POS. S P* A5= REL. ATTRIBUTE POS. S
0x2ed698…2ed82c Dummy {f00=0x00f5, f01=0x0190, f02=»******************************* S v PERASUP EQU * T ( " P LDK A1,2 RESTORE KEYBOARD-BIT T < P ST A1,WCC,A11 T b P LDK A4,0 FIRST SCREEN POS. T x P LDKL A3,BVDU T P ADR A3,A11 T " P LDK A7,NULL STORE NULL CHAR. T ( P CWK A5,LBVDU+1 UNFORMATTED
0x2ed82c…2ed9c0 Dummy {f00=0x00f5, f01=0x0190, f02=»2,/8000 ATTRIBUTE? T P RF(NL) ERUP20 YES U P ADK A3,1 U 4 P ADK A4,1 U F P RB ERUP10 U X PERUP20 EQU * U j $ P LDR A9,A4 FIRST ATTRIBUTE POS. U ~ P LDK A5,LLINE U P LDR A6,A11 U P SUR A10,A10 U P CF A14,LINE U P RF ERUP47 U
0x2ed9c0…2edb54 (3, 56) Dummy {f00=0x00f5, f01=0x0190, f02=» A2,/8000 ATTRIBUTE? U P RB(L) ERUP30 NO V PERUP45 EQU * V 4 P CWR A9,A4 ALL SCANNED? V H P RF(E) ERUP70 YES V h PERUP47 EQU * V P LDR A1,A2 V P ANK A1,/20 PROTECTED? V P RB(NZ) ERUP30 YES V P ANK A2,/FE RESET MDT-BIT V P SCR A
0x2edb54…2edce8 Dummy {f00=0x00f5, f01=0x0190, f02=» EQU * V * P CF A14,LINWRP CHECK IF LINWRP AROUND W P LCR A2,A3 GET CHAR. W < P CCK A2,/8000 ATTRIBUTE? W X P RB(NL) ERUP45 YES W x . P SCR A7,A3 STORE NULL CHAR. IN VDU BUFFER W P LC A1,LINFLG,A6 W P ORK A1,1 W P SC A1,LINFLG,A6 W P A
0x2edce8…2ede7c Dummy {f00=0x00f5, f01=0x0190, f02=»QU * W P RTN A14 X P EJECT X D P**************************************************************** X * P* X r D P* ERASUA ERASE UNPROTECTED TO ADDRESS * X | D P* * X
0x2ede7c…2ee010 Dummy {f00=0x00f5, f01=0x018e, f02=»= CHAR. X P* A3= ADDRESS IN VDU-BUFFER Y P* A4= REL. CURSOR POS. Y 4 P* A5= REL ATTRIBUTE POS. Y R P* A6= ATTRIBUTE CHAR. Y r P* A7= NULL CHAR. Y P* A11= CREDIT WORK AREA Y P* A13= RESERVED Y P* Y D P******************************
0x2ee010…2ee1a4 Dummy {f00=0x00f5, f01=0x018e, f02=» Y P ADR A3,A4 BUFFER POS. Z ( P CWK A5,LBVDU+1 UNFORMATTED SCREEN? Z & P RF(E) ERUA47 YES Z R $ P LDR A2,A6 GET CURRENT ATTRIBUTE Z l & P CWR A5,A4 STANDING ON ATTRIBUTE? Z P RF(NE) ERUA10 NO Z P ADK A3,1 Z P ADK A4,1 Z P CWR A1,A4 A
0x2ee1a4…2ee338 Dummy {f00=0x00f5, f01=0x0190, f02=» Z r P RF(Z) ERUA47 NO [ PERUA30 EQU * [ & P CF A14,WRAP CHECK IF WRAP AROUND [ 4 P CWR A1,A4 ALL NULLED? =2 [ ^ P RF(E) ERUA70 YES =2 [ P LCR A2,A3 GET CHAR. [ P ADK A3,1 [ P ADK A4,1 [ P . =2 [ P CCK A2,/8000 ATTRIBUTE? [
0x2ee338…2ee4cc Dummy {f00=0x00f5, f01=0x0190, f02=» [ P LDR A6,A11 P LDK A5,LLINE P LDR A8,A1 2 P CF A14,LINE D P LDR A1,A8 X P RF ERUA60 j PERUA50 EQU * | P LDR A8,A1 P CF A14,LINWRP P LDR A1,A8 P CWR A1,A4 ALL NULLED? P RF(E) ERUA70 YES PERUA60
0x2ee4cc…2ee660 Dummy {f00=0x00f5, f01=0x0190, f02=» RB(NZ) ERUA30 YES =3 P RF ERUA64 =3 ] PERUA62 EQU * =3 ] 4 . P SCR A7,A3 STORE NULL CHAR, IN VDU-BUFFER ] L P LC A8,LINFLG,A6 ] ~ P ORKL A8,1 ] P SC A8,LINFLG,A6 ] PERUA64 EQU * =3 ] P ADK A3,1 ] P ADK A4,1 ] P RB ERUA50 ]
0x2ee660…2ee7f4 (3, 57) Dummy {f00=0x00f5, f01=0x0190, f02=» * ] > P* POSUNP MOVE CURSOR TO NEXT UNPR. POS. * ^ 4 > P* * ^ v > P********************************************************** ^ P* REGISTERS ^
0x2ee7f4…2ee988 Dummy {f00=0x00f5, f01=0x0190, f02=» CREDIT WORK AREA ^ P* A13= RESERVED _ P* _ 2 @ P*********************************************************** _ < PPOSUNP EQU * _ P CWK A4,LBVDU-1 WRAP AROUND? _ P RF(NG) POSU20 NO _ " P LDK A4,0 FIRST POS. ON SCREEN _ P ST A4,PCURS,A11
0x2ee988…2eeb1c Dummy {f00=0x00f5, f01=0x0190, f02=»0 NO _ P LDR A6,A7 ` P ANK A7,/20 ` P CWK A7,/20 PROTECTED? DKPT ` 2 P RF(E) POSU25 YES ` V P LDR A5,A1 ` p P IM PCURS,A11 MOVE CURSOR ` P ADK A4,1 ` P CWK A4,LBVDU-1 WRAP AROUND? ` P RF(NG) POSU23 NO ` P LDK A4,0 ` PPO
0x2eeb1c…2eecb0 Dummy {f00=0x00f5, f01=0x0190, f02=»30 ` PPOSU25 EQU * a * P CF A14,TAB TAB NEXT UNPROTECTED FIELD a PPOSU30 EQU * a L P LD A8,ECBVDU,A11 a ` P LD A1,ECBCW,A8 a z P ANK A1,/FF LINE POS. a " P SUK A1,81 LAST POS. ON LINE? a P RF(NZ) POSU90 NO a P LDK A1,2 REQ. LENGTH a
0x2eecb0…2eee44 Dummy {f00=0x00f5, f01=0x0190, f02=»************** a b @ P* * b @ P* DISID DISPLAY HARDCOPY TASKID * b Z @ P* * b @ P**************************************
0x2eee44…2eefd8 Dummy {f00=0x00f5, f01=0x0190, f02=»****** b Z PDISID EQU * c P LD A8,ECBVDU,A11 c " & P CF A14,SPACES SPACE IN ECB BUFFER c < & P LD A3,6,A13 GET COMMON BLOCK BASE c f P LDR A1,A5 SAVE TASK ID c P LDK A5,IDTEXT c P ADR A5,A3 POINT ON IDBUFFER c P ADK A6,46 c P LDK A3,6 c
0x2eefd8…2ef16c Dummy {f00=0x00f5, f01=0x0190, f02=» c r P RF(N) DISI20 COMPLETED d P LDR* A2,A5 d ( P STR A2,A6 d < P ADK A5,2 d N P ADK A6,2 d ` P RB DISI10 d r PDISI20 EQU * d P LD A6,ECBBA,A8 d . P ST A1,ECBBA+52,A6 SAVE TASK ID IN BUFFER d & P LC A2,X'1F' HIGH INTENSITY CHAR. d
0x2ef16c…2ef300 Dummy {f00=0x00f5, f01=0x0190, f02=»N LAST ROW d v P ST A2,ECBCW,A8 e & P CF A14,DISLIN DISPLAY IDENT TEXT e * P RTN A14 e T P EJECT e d B P************************************************************** e r P* e P* DISSTA DISPLAY STATISTICS e P* e D P************************
0x2ef300…2ef494 (3, 58) Dummy {f00=0x00f6, f01=0x0190, f02=»********************* e f PDISSTA EQU * f P IFT TEST=1 f 2 P LD A8,ECBVDU,A11 f F " P LDK A1,STALIN WHERE TO START f ` P SLL A1,8 f P LDK A2,1 f & P ORR A2,A1 FIRST POS. ON THAT LINE f P ST A2,ECBCW,A8 f $ P CF A14,SPACES CLEAN THE BUF
0x2ef494…2ef628 Dummy {f00=0x00f6, f01=0x0190, f02=»NTENSITY f ~ P SCR A2,A6 g P ADK A6,1 g " P LDKL A9,1 g 4 , P LDK A1,TXTSIZ GET SIZE OF TEXT PER LINE g F ( P CF A14,MOVTXT MOVE IT IN TO BUFFER g v $ P ADK A6,5+STAPOS MAKE SOME ROOM g P LC A1,INDEX,A5 g P SLL A1,1 g $ P ADR A1,A12 POINT OU
0x2ef628…2ef7bc Dummy {f00=0x00f6, f01=0x0190, f02=»4,CONASC g P SLL A2,8 h P ORR A2,A4 h " P SC A2,+1,A6 h 4 P SRL A2,8 h H P SCR A2,A6 h Z P ADK A6,2 h l P LC A2,+1,A1 h ~ P CF A14,CONASC AS ABOVE h P LDR A4,A2 h P LC A2,+1,A1 h P SRL A2,4 h P CF A14,CONASC h P SLL A2,
0x2ef7bc…2ef950 Dummy {f00=0x00f6, f01=0x0190, f02=»ISPLAY STAT. h " P CWK A5,NUMLIN LIMIT REACHED? i P RB(NE) DISS10 NO i : P XIF i T P RTN A14 i ` P IFT TEST=1 i p P EJECT i @ P*********************************************************** i P* i P* MOVTXT MOVE TEXT i P* i @ P****
0x2ef950…2efae4 Dummy {f00=0x00f6, f01=0x0190, f02=»******************************** i v P j ( PMOVTXT EQU * j 0 P LCR A2,A3 j D P ADK A3,1 j V P SC A2,STAPOS,A6 j h P ADK A6,1 j P SUK A1,1 j P RB(NZ) MOVTXT j P RTN A14 j P EJECT j > P************************************************
0x2efae4…2efc78 Dummy {f00=0x00f6, f01=0x0190, f02=»* REGISTERS j P* k P* k < P******************************************************** k * PCONASC EQU * k j P ANK A2,/0F k ~ P CCK A2,/0909 k P RF(G) CONA10 k P ORK A2,/30 k P RF CONA90 k PCONA10 EQU * k P ADK A2,/37 k
0x2efc78…2efe0c Dummy {f00=0x00f6, f01=0x0190, f02=» * k > P* ATMASF SEARCH ATTRIBUTE FORWARD * l > > P* * l > P********************************************************* l P* R
0x2efe0c…2effa0 Dummy {f00=0x00f6, f01=0x0190, f02=» l z P* A5= REL. ATTRIBUTE POS. m P* A6= ATTRIBUTE CHAR. m * P* A8= RESERVED m H P* A9= RESERVED m ^ P* A10= RESERVED m t P* A11= CREDIT WORK AREA m P* A13= RESERVED m P* m > P*********************************************************
0x2effa0…2f0134 (3, 59) Dummy {f00=0x00f6, f01=0x0190, f02=»F200 NO m " P LDK A1,0 FIRST POS. ON SCREEN n PASF200 EQU * n 6 * P CW A1,REGI,A11 WHOLE SCREEN SEARCHED? n J P RF(E) ASF900 YES n x * P CF A14,GETVDU GET CHAR. IN VDU BUFFER n P CCK A7,/8000 ATTRIBUTE? n P RB(L) ASF100 NO n P LDR A6,A7 n
0x2f0134…2f02c8 Dummy {f00=0x00f6, f01=0x0190, f02=»******************************************************* n L P* * o @ L P* ATMASB SEARCH ATTRIBUTE BACKWARD * o L P*
0x2f02c8…2f045c Dummy {f00=0x00f6, f01=0x018e, f02=» P* p $ P* A1= ATENTRY START SEARCH ADDR. p P* A2= RESERVED p 6 P* A3= RESERVED p L P* A4= REL. CURSOR POS. p b P* A5= REL. ATTRIBUTE POS. p P* A6= ATTRIBUTE CHAR. p P* A8= RESERVED p P* A9= RESERVED p P* A10= RESERVED p P* A1
0x2f045c…2f05f0 Dummy {f00=0x00f6, f01=0x018e, f02=» p F PATMASB EQU * q P ST A1,REGI,A11 q PASB100 EQU * q 4 * P CF A14,GETVDU GET CHAR. IN VDU BUFFER q H P CCK A7,/8000 ATTRIBUTE? q v P RF(NL) ASB300 YES q P SUK A1,1 q " P RF(NN) ASB200 NOT WRAP AROUND q ( P LDKL A1,LBVDU-1 LAST POS. ON SC
0x2f05f0…2f0784 Dummy {f00=0x00f6, f01=0x0190, f02=» q P LDR A6,A7 r P LDR A5,A1 r * P CF A14,STOINF SAVE SCREEN INFORMATION r , PASB900 EQU * r Z P RTN A14 r n P EJECT r ~ D P*************************************************************** r D P*
0x2f0784…2f0918 Dummy {f00=0x00f6, f01=0x018e, f02=» * r d D P*************************************************************** s P* REGISTERS s d P* s x 2 P* A1= AT RETURN 1=NULL FOUND, 2=NO NULL FOUND s P* A2= RESERVED s B P* A3= AT ENTRY LAST SEARCH ADDR., AT RETURN NULL ADDR. IF
0x2f0918…2f0aac Dummy {f00=0x00f6, f01=0x0190, f02=» s ~ P* t D P**************************************************************** t PSNULL EQU * t Z P LDR A1,A4 t n PSNU100 EQU * t P ADK A1,1 t P CWK A1,LBVDU-1 WRAP AROUND? t P RF(NG) SNU200 NO t P LDK A1,0 FIRST SCREEN POS. t P
0x2f0aac…2f0c40 Dummy {f00=0x00f6, f01=0x0190, f02=» NULL CHAR? t P RB(NE) SNU100 NO u P LDR A3,A1 u . " P LDK A1,1 INDICATE NULL FOUND u @ P RF SNU900 u f PSNU300 EQU * u x P LDK A1,2 u PSNU900 EQU * u P RTN A14 u P EJECT u @ P********************************************************
0x2f0c40…2f0dd4 (3, 60) Dummy {f00=0x00f6, f01=0x0190, f02=» * u X @ P* * v @ P************************************************************ v P P* REGISTERS v P* v P* A2= KEY-CHAR v P* A4= REL. CURSOR POS. v P* A5= REL. ATTRIBUTE POS. v P
0x2f0dd4…2f0f68 Dummy {f00=0x00f6, f01=0x0190, f02=»******************************************* v ~ PWCHAR EQU * w 4 P LD A8,ECBVDU,A11 w H $ P LDK A1,/1E LOW INTENSITY CHAR. w b P LDR A7,A6 w P ANK A7,/8 STANDARD DISPLAY? w P RF(Z) WCH300 YES w P LDR A7,A6 w $ P ANK A7,/4 INTENSIFIED DISPL
0x2f0f68…2f10fc Dummy {f00=0x00f6, f01=0x0190, f02=»AY w | PWCH300 EQU * x & P LD A7,ECBBA,A8 GET BUFFER ADDRESS x $ P SC A1,2,A7 SAVE INTENSITY CHAR. x H * P CF A14,RFMDUP REPLACE FM OR DUP CHAR. x p * P SC A2,3,A7 STORE CHAR. IN VDU BUFFER x P LDK A1,4 REQ. LENGTH x P CF A14,DISCHA DISPLAY x P
0x2f10fc…2f1290 Dummy {f00=0x00f6, f01=0x0190, f02=»ATTRIBUTE x v P ST A6,ATTRIB,A11 y P LDR A1,A5 y , P LDR A7,A6 y > , P CF A14,STOVDU STORE CHAR. IN VDU BUFFER y P PWCH900 EQU * y P RTN A14 y P EJECT y > P********************************************************* y > P*
0x2f1290…2f1424 Dummy {f00=0x00f6, f01=0x0190, f02=» * y x > P********************************************************* z * P* REGISTERS z l P* A2= KEY-CHAR z P* A4= RESERVED z P* A5= RESERVED z P* A6= RESERVED z P* A11= CREDIT WORK AREA z P* A13= RESERVED
0x2f1424…2f15b8 Dummy {f00=0x00f6, f01=0x0190, f02=»MD10 NO z P LDK A2,/2A REPLACE { P RF RFMD90 { , PRFMD10 EQU * { > P CWK A2,FMCH FM CHAR? { R P RF(NE) RFMD90 NO { p P LDK A2,/3B REPLACE { PRFMD90 EQU * { P RTN A14 { P EJECT { 4 P************************************************
0x2f15b8…2f174c Dummy {f00=0x00f6, f01=0x018e, f02=» * { 4 P************************************************ | ( P* REGISTERS | ` P* | t P* A1= REQ. LENGTH | ~ P* A2= RESERVED | P* A4= RESERVED | P* A5= RESERVED | P* A6= RESERVED | P* A8= VDU-ECB | P*
0x2f174c…2f18e0 Dummy {f00=0x00f6, f01=0x018e, f02=» | P LC A2,TCT01,A11 } " P CCK A2,VDUCOD PRINTER UNPACK? } P RF(NE) DISC95 YES } F P LD A8,ECBVDU,A11 } ` P ST A1,ECBRL,A8 } z ( P LDKL A1,/101 START AT LINE 1 POS. 1 } P ST A1,ECBCW,A8 } P LDKL A1,/100 } P LDR A7,A4 CURSOR POS. }
0x2f18e0…2f1a74 (3, 61) Dummy {f00=0x00f6, f01=0x40d8, f02=» } P RB DISC10 ~ PDISC90 EQU * ~ & P ADS A7,ECBCW,A8 POSITION IN LINE ~ . $ P LDK A7,/8B SET CURSOR AND WRITE ~ X P LKM ~ P DATA 1 ~ PDISC95 EQU * ~ P RTN A14 ~ P ~ P END ~ @ ~
0x2f1a74…2f1c08 Dummy {f00=0x00f6, f01=0x2008, f02=» ) DATA PF 24 * * $ END * ,@ * 8 6 ) 4 DATA PF 7 ) F DATA PF 8 ) X DATA PF 9 ) j DATA PF 10 ) | DATA PF 11 ) DATA PF 12 ) DATA PF 13 ) DATA PF 14 ) DATA PF 15 ) *C0 ) DATA PF
0x2f1c08…2f1d9c Dummy {f00=0x00f6, f01=0x0190, f02=» @dDP E X R. X P T" P C X P C Z P " H " P X * Y X V !Z W* X T X *P W !Z X T p X ! P !` W !` [ A ( @ " X 0 A . A $ A 0 ![N @ &T @ (P !` [ ![N @ &T @ (X W` @ $ @ , @ > @ 8 A
0x2f1d9c…2f1f30 Dummy {f00=0x00f6, f01=0x0190, f02=»_2 _6 @ $ Z A , A & X ! XD Y _N "P -P L _ 4 A ( A < H E A , A " 4 @ $P* X R$ X " T X *P Z p Zn A & A $ 4 @dD @ ,T @ > A < @ < A > A , !c T8 P: PN PP P P4 ( 1 A < @ < ]: _> P _F @dD
0x2f1f30…2f20c4 Dummy {f00=0x00f6, f01=0x0190, f02=» !c !c !b 4 !bf !cb @ 8 @ < A > @ <T* < !c @ $ ( !c @ .P - !c x . ! R W 0 " @ .PL R ~T }T T0 W, !c P " ! " :A *@ H T 0 !c W R !c A < @ : @ <UH Zx Q P Q T 0 !c A < 0 !c A < !c " !c
0x2f20c4…2f2258 Dummy {f00=0x00f6, f01=0x0190, f02=»b !b !c !cb 4 @ lT !b A L 2B 4B A LJ P 4 @ lT B 4B J 4 A ? Z J"T0 A 2T 2P @ (P !c H A L A H ] 4 !c [ A ? Z 4J "#T @ LP6R" 2B W," P @ LP"W ] " P [ " P Z * cN Z " P 1 P A H 4 A 4P T !
0x2f2258…2f23ec Dummy {f00=0x00f6, f01=0x0190, f02=» Ad Ad Ad Ad <a :a# P 4 A 2 !c @d !c A 2 @d :H T 4dFmJ
0x2f23ec…2f2580 Dummy {f00=0x00f6, f01=0x0190, f02=»
0x2f2580…2f2714 (3, 62) Opaque[0x194]
0x2f2714…2f28a8 # DirEnt {nam=»PAD «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1ee0, f03=0x0000}
0x2f2714…2f28a8 IdxSect {
0x2f2714…2f28a8 f00 = 0x00f7 // 0x2f2714 @0x0
0x2f2714…2f28a8 f01 = 0x0024 // 0x2f2716 @0x2
0x2f2714…2f28a8 gno = [ // 0x2f2718 @0x4
0x2f2714…2f28a8 [0x00]: C0x00f7.0x0.0
0x2f2714…2f28a8 [0x01]: C0x00f7.0x1.0
0x2f2714…2f28a8 [0x02]: C0x00f7.0x2.0
0x2f2714…2f28a8 [0x03]: C0x00f7.0x3.0
0x2f2714…2f28a8 [0x04]: C0x00f8.0x0.0
0x2f2714…2f28a8 [0x05]: C0x00f8.0x1.0
0x2f2714…2f28a8 [0x06]: C0x00f8.0x2.0
0x2f2714…2f28a8 [0x07]: C0x00f8.0x3.0
0x2f2714…2f28a8 [0x08]: C0x00f9.0x0.0
0x2f2714…2f28a8 [0x09]: C0x00f9.0x1.0
0x2f2714…2f28a8 [0x0a]: C0x00f9.0x2.0
0x2f2714…2f28a8 [0x0b]: C0x00f9.0x3.0
0x2f2714…2f28a8 [0x0c]: C0x00fa.0x0.0
0x2f2714…2f28a8 [0x0d]: C0x00fa.0x1.0
0x2f2714…2f28a8 [0x0e]: C0x00fa.0x2.0
0x2f2714…2f28a8 [0x0f]: C0x00fa.0x3.0
0x2f2714…2f28a8 [0x10]: C0x00fb.0x0.0
0x2f2714…2f28a8 [0x11]: C0x00fb.0x1.0
0x2f2714…2f28a8 ]
0x2f2714…2f28a8 }
0x2f28a8…2f2a3c Dummy {f00=0x00f7, f01=0x0190, f02=» 0 P IDENT PAD REL 11.0 DK 82-09-28 870150541100 P 8 P =9, CORRECTION IN PTORD @ P #8 CALL TO COPP b P 82-05-27 | P =7,ERROR IN SF P =6,2ND ERROR IN EUA ( P =5 ERROR IN ERASE UNPROT TO ADDR & P DK1, ATTRIBUTE ER
0x2f2a3c…2f2bd0 Dummy {f00=0x00f7, f01=0x0190, f02=» P 81-01-26 P =1, RA ON EUQ ADDRESS P 81-01-26 < B P************************************************************* P B P* * B P* MODULE PAD
0x2f2bd0…2f2d64 Dummy {f00=0x00f7, f01=0x0190, f02=»CBUFFER. THE VDU * h B P* BUFFER IS UPDATED * B P* (EMULATION 3270 SNA/SDLC, BSC) * d B P* * B P************************
0x2f2d64…2f2ef8 Dummy {f00=0x00f7, f01=0x0190, f02=» P* LIST OF ROUTINES P* " @ P* PACK PACK MODIFIED VDU-FIELDS INTO DC-BUFFER , 8 P* UNPACK UNPACK DC-BUFFER AND UPDATE VDU p ( P* RETTAB RETURN ADDRESSES ( P* UNPCOM UNPACK COMMANDS & P*
0x2f2ef8…2f308c Dummy {f00=0x00f7, f01=0x0190, f02=» SET BUFFER ADDRESS ~ & P* IC INSERT CURSOR $ P* PT PROGRAM TAB. F * P* RA REPEAT TO ADDRESS n 0 P* EUA ERASE UNPRO. TO ADDRESS ( P* CHAR < /20 BUT NOT ORDERS 6 P* PAC
0x2f308c…2f3220 Dummy {f00=0x00f7, f01=0x0190, f02=»ECK NEXT BUFFER r 8 P* PUTCHA PUT CHAR. IN DC-BUFFER AND WRITE , P* PDCCH PUT CHAR. IN BUFFER T , P* GDCCH GET CHAR. IN BUFFER , P* PAID STORE AID IN BUFFER : P* BUFADR STORE BUFFER ADD
0x2f3220…2f33b4 (3, 63) Dummy {f00=0x00f7, f01=0x0190, f02=» 6 P* P2WCC TAKE CARE OF WCC AFTER UPDATE 8 P* SAVE SAVE PACK AND UNPACK INFORMATION > < P* RESTOR RESTORE PACK AND UNPACK INFORMATION z $ P* BUFFER BUFFER POOL " P* GETBUF GET BUFFER & P
0x2f33b4…2f3548 Dummy {f00=0x00f7, f01=0x0190, f02=» B P************************************************************* B P* * J B P* ENTRY POINTS * B P*
0x2f3548…2f36dc Dummy {f00=0x00f7, f01=0x0190, f02=»UFFER j 2 P ENTRY UNPACK UNPACK DC BUFFER AND UPDATE VDU 2 P ENTRY UNPSYS UNPACK DC BUFFER IN SYSTEM MODE D P ENTRY GETBUF GET DC BUFFER z $ P ENTRY RELBUF RELEASE DC BUFFER , P ENTRY PAID STORE AID CODE IN DC BUFFER 2 P ENTRY BUFADR SORE
0x2f36dc…2f3870 Dummy {f00=0x00f7, f01=0x0190, f02=» RESTORE REGISTERS P P EJECT " 8 P*************************************************** 0 8 P* * l 8 P* EXTERNAL REFERENCES * 8 P*
0x2f3870…2f3a04 Dummy {f00=0x00f7, f01=0x0190, f02=» d 0 P EXTRN CONASC CONVERT EBCDIC-ASCII (CONVER) * P EXTRN ERASE ERASE ENTIRE SCREEN (VDU) < 4 P EXTRN ERASUA ERASE UNPROTECTED TO ADDRESS (VDU) j 2 P EXTRN CONORD CONVERT ORDER TO INDEX (CONVER) . P EXTRN CONATT CONVERT ATTRIBUTE (CONVER) .
0x2f3a04…2f3b98 Dummy {f00=0x00f7, f01=0x0190, f02=»PY (KEYB) x * P EXTRN SOUND SOUND ALARM ON VDU (VDU) 2 P EXTRN ATMASB SEARCH ATTRIBUTE BACKWARDS (VDU) @ 2 P EXTRN CONADR CONVERT BUFFER ADDRESS (CONVER) v * P EXTRN WRAP CHECK IF WRAP AROUND (VDU) 0 P EXTRN STOINF SAVE SCREEN INFORMATION (VDU)
0x2f3b98…2f3d2c Dummy {f00=0x00f7, f01=0x0190, f02=»CBSC) p 0 P EXTRN DCWRIT WRITE DC BUFFER (DCSNA,DCBSC) 0 P EXTRN DISMOD DISPLAY MODIFIED FIELDS (VDU) B . P EXTRN THRBUF THROW BUFFERS (DCSNA,DCBSC) v ( P EXTRN NLROUT NEW LINE ROUTINE (VDU) " P EXTRN LINE WRAP ROUTINE (VDU) 2 P EXTRN LINATT
0x2f3d2c…2f3ec0 Dummy {f00=0x00f7, f01=0x018e, f02=» MATCH MATCH ADDRESS AND TASKID (DSPBSC) * P EXTRN ICSET INTERTASK TIMEOUT (KEYB) 0 ( P EXTRN ICWRT INTERTASK WRITE (KEYB) ^ , P EXTRN COPP COPY ON PRINTER DIRECTLY =4 P EXTRN LMP3ON P EJECT 8 P******************************************
0x2f3ec0…2f4054 (3, 64) Dummy {f00=0x00f7, f01=0x0190, f02=» 8 P* * 8 P*************************************************** @ P | PX:A EQU 0 SNA HANDLING IF:=1 PSNA EQU 0 & PX:K EQU 2 NUMBER OF BUFFERS (1-32) PBUFFNR EQU 02 * PX:L EQU 1000 M
0x2f4054…2f41e8 Dummy {f00=0x00f7, f01=0x0190, f02=» CHAR IF:=1 PEBCDIC EQU 1 * PX:Z EQU 1 =0,WHOLE,=1 CHAIN,=2 SEGMENT ( PDISHOW EQU X:Z V P EJECT l D P*************************************************************** z D P* * &
0x2f41e8…2f437c Dummy {f00=0x00f7, f01=0x0190, f02=»******************************************* | P 4 P* < $ P* EQUATES FOR ECB HANDLING F P* n PECBBA EQU 2 BUFFER ADDRESS x PECBRL EQU 4 REQUESTED LENGTH PECBEL EQU 6 EFFECTIVE LENGTH PECBRC EQU 8 RETURN CODE PECBCW
0x2f437c…2f4510 Dummy {f00=0x00f7, f01=0x018e, f02=»00 THROW BUFFERS PNEWCH EQU /0400 NEW CHAIN ( PATTREC EQU /0002 ATTRIBUTE RECEIVED : & PPTORD EQU /0001 PT ORDER INDICATOR f P IFT SNA=1 P* P* SNA MODES P* PLOCMOD EQU 0 LOCAL MODE PSYSOP EQU 2 SYSTEM MODE
0x2f4510…2f46a4 Dummy {f00=0x00f7, f01=0x0190, f02=» r P* P* SPECIAL CHARACTERS P* . PNULL EQU 0 NULL CHAR. 8 PSBACH EQU /11 SBA CHAR. V PESCCHA EQU /1B ESCAPE CHAR. v P* P* VDU SCREEN SIZE P* PLBVDU EQU 1920 TOTAL SIZE PLLINE EQU 80 LINE LENGTH
0x2f46a4…2f4838 Dummy {f00=0x00f7, f01=0x0190, f02=» x P* TERMINAL WORKBLOCK P* $ $ PTCT01 EQU 0 TASK IDENTIFICATION . " PBVDU EQU TCT01+2 SCREEN BUFFER V , PLINFLG EQU BVDU+1920 INTERNAL LINE FLAGS | 0 PPCURS EQU LINFLG+24 CURSOR ADDRESS , BINARY PCURATT EQU PCURS+4 & PWCC EQU CURATT
0x2f4838…2f49cc Dummy {f00=0x00f7, f01=0x0190, f02=» CURSOR POS IN SYSTEM MODE | & PBUFPNT EQU CURPOS+2 BUFFER ADDRESS " $ PREGI EQU BUFPNT+2 WORK REGISTER L $ PSTACK1 EQU REGI+2 INTERNAL STACK t PSTACK2 EQU STACK1+14 $ PUNPMOD EQU STACK2+14 UNPACK MODE PSNAMOD EQU UNPMOD+2 SNA MODE 0 PECBI
0x2f49cc…2f4b60 Dummy {f00=0x00f7, f01=0x0190, f02=» * B P* PACK PACK MODIFIED VDU-FIELDS INTO DC-BUFFER * > B P* * B P*************************************************************
0x2f4b60…2f4cf4 (3, 65) Dummy {f00=0x00f7, f01=0x0190, f02=»TTRIBUTE POS. P* A6= ATTRIBUTE CHAR P* A8= ADDRESS IN DC-BUFFER 2 P* A9= DC-BUFFER INDEX T P* A10= START ADDRESS r P* A11= RESERVED P* A12= BUFFER ADDRESS P* A13= RESERVED P* @ P**********************************
0x2f4cf4…2f4e88 Dummy {f00=0x00f7, f01=0x0190, f02=»DKL A3,BVDU P ADR A3,A11 P LDR A10,A4 INITIATE ADDRESS ( ( P CWK A5,LBVDU+1 UNFORMATTED SCREEN? L P RF(E) PACK70 YES x PPACK10 EQU * P LCR A2,A3 GET CHAR. P CCK A2,/8000 ATTRIBUTE? P RF(NL) PACK15 YES P ADK A3,1
0x2f4e88…2f501c Dummy {f00=0x00f7, f01=0x0190, f02=»F A14,WRAP CHECK IF WRAP AROUND P CWR A10,A4 ALL SCANNED? ( P RF(E) PACK80 YES H PPACK30 EQU * b P LCR A2,A3 GET CHAR. v P ADK A3,1 P ADK A4,1 P CCK A2,/8000 ATTRIBUTE? P RB(L) PACK20 NO P ANK A2,1 MODIFIED FIELD?
0x2f501c…2f51b0 Dummy {f00=0x00f7, f01=0x0190, f02=»TO DC-BUFFER ~ P LDKL A1,/8000 INDICATE SBA & P CF A14,PUTCHA PUT CHAR. IN BUFFER 8 P LDR A1,A1 TRANSMISSION OK? b P RF(NZ) PACK90 NO * P LDR A1,A4 BUFFER ADDRESS TO DC-BUFFER P CF A14,BUFADR PPACK60 EQU * & P CF A14,WRAP CHE
0x2f51b0…2f5344 Dummy {f00=0x00f7, f01=0x0190, f02=» A2,/8000 ATTRIBUTE? P RB(NL) PACK20 YES P CWK A2,NULL NULL CHAR? 6 " P RF(E) PACK75 YES,DON'T STORE V & P CF A14,PUTCHA PUT CHAR. IN BUFFER | P LDR A1,A1 TRANSMISSION OK? P RF(NZ) PACK90 NO PPACK75 EQU * P ADK A3,1
0x2f5344…2f54d8 Dummy {f00=0x00f7, f01=0x0190, f02=»PACK90 EQU * " P LDR A8,A12 BUFFER TO RELEASE " P CF A14,RELBUF RELEASE BUFFER : P RTN A14 ` P EJECT p @ P************************************************************ ~ @ P* * @ P*
0x2f54d8…2f566c Dummy {f00=0x00f7, f01=0x0190, f02=»********************************************************** P* REGISTERS B P* V P* A2= CHAR. ` P* A3= POINTER IN VDU-BUFFER t P* A4= REL. CURSOR POS. P* A5= LAST IN ROW REL POS $ P* A6= INTERNAL LINE FLAG ADDRESS P* A8= AD
0x2f566c…2f5800 Dummy {f00=0x00f7, f01=0x0190, f02=»* A13= RESERVED P* < P******************************************************** " PUNPACK EQU * b P LDK A1,3 KB TOTALLY INHIBIT v P ORS A1,KBINH,A11 P LC A1,TCT01,A11 " P CCK A1,VDUCOD PRINTER UNPACK? P RF(NE) UNP050 YES
0x2f5800…2f5994 (3, 66) Dummy {f00=0x00f8, f01=0x0190, f02=»LLINE * P CF A14,LINE CHECK WRAP AND LINE FLAG P SUR A9,A9 < ( P LD A8,BUFPNT,A11 GET BUFFER ADDRESS N " P LDK A1,ICOMND PROCESS COMMAND z P ST A1,UNPMOD,A11 PUNP100 EQU * P CF A14,GDCCH GET CHAR. P LDR A1,A1 ANYTHING LEFT?
0x2f5994…2f5b28 Dummy {f00=0x00f8, f01=0x018e, f02=» OKEY? ~ P RB(Z) UNP100 YES P RF UNP300 ( PUNP200 EQU * : P IFT SNA=1 N " P CF A14,GETNXT GET NEXT BUFFER ` P LDR A1,A1 FINISHED? P RB(Z) UNP100 NO P XIF PUNP300 EQU * " P CF A14,SCRINF GET LATEST NEWS P LDR A1,
0x2f5b28…2f5cbc Dummy {f00=0x00f8, f01=0x0190, f02=» ~ P CF A14,THRBUF THROW BUFFERS P RF UNP600 , PUNP400 EQU * > P IFF DISHOW=2 R P LC A1,TCT01,A11 h P CCK A1,VDUCOD P RF(NE) UNP500 6 P CF A14,DISMOD TESTINGTESTINGTESTING!!!!!!!!!!!!! PUNP500 EQU * P XIF * P C
0x2f5cbc…2f5e50 Dummy {f00=0x00f8, f01=0x0190, f02=» P RTN A14 ! P EJECT ! J P********************************************************************** ! & J P* * ! t J P* INDEX FOR RETURNS AFTER GET CHARCTER *
0x2f5e50…2f5fe4 Dummy {f00=0x00f8, f01=0x0190, f02=»******************** ! ^ P " PICOMND EQU 0 " $ PICOMN1 EQU ICOMND+2 " 8 P IFT COPCMD=1 " T PICOCOP EQU ICOMN1+2 " j PICOWCC EQU ICOCOP+2 " P XIF " P IFF COPCMD=1 " PICOWCC EQU ICOMN1+2 " P XIF " PIORDER EQU ICOWCC+2 " P
0x2f5fe4…2f6178 Dummy {f00=0x00f8, f01=0x0190, f02=» PIORACH EQU IORAA2+2 # PIOEUA1 EQU IORACH+2 # PIOEUA2 EQU IOEUA1+2 # < P EJECT # X J P********************************************************************* # f J P* * # J P*
0x2f6178…2f630c Dummy {f00=0x00f8, f01=0x0190, f02=» * # P J P********************************************************************* $ PRETTAB EQU * $ & P DATA UNPCOM PROCESS COMMAND CHAR. $ p 0 P DATA UNC100 PROCESS COMMAND CHAR AFTER ESC. $ P IFT COPCMD=1 $ $ P DATA UNC150 PROCESS FROM DEVICE $
0x2f630c…2f64a0 Dummy {f00=0x00f8, f01=0x0190, f02=»A SBA100 PROCESS FIRST ADDRESS BYTE $ , P DATA SBA200 PROCESS SECOND ADDRESS BYTE % , * P DATA RA100 PROCESS FIRST ADDRESS BYTE % , P DATA RA200 PROCESS SECOND ADDRESS BYTE % ( P DATA RA250 PROCESS CHAR. TO REPEAT % , P DATA EUA100 PROCESS FIRST ADDRESS
0x2f64a0…2f6634 (3, 67) Dummy {f00=0x00f8, f01=0x0190, f02=»*********** % T L P* * & L P* UNPCOM UNPACK COMMAND * & d L P* * & L P****
0x2f6634…2f67c8 Dummy {f00=0x00f8, f01=0x0190, f02=»ESS IN VDU-BUFFER & P* A4= REL. CURSOR ADDRESS ' P* A5= LAST IN ROW REL POS ' < $ P* A6= INTERNAL LINE FLAG ADDRESS ' ^ P* A8= ADDRESS IN DC-BUFFER ' P* A9= RESERVED ' P* A10= INDICATOR ' P* A11= CREDIT WORK AREA ' P* A12= RESERVED '
0x2f67c8…2f695c Dummy {f00=0x00f8, f01=0x0190, f02=»RY LABEL FROM RETTAB ' P IFF SNA=1 ( $ P LDK A1,ICOMN1 WHERE TO CONTINUE ( . P ST A1,UNPMOD,A11 ( V P LDK A1,0 RETURN CODE ( p P CWK A2,ESCCHA ESCAPE? ( P RF(E) UNC900 YES ( P LDK A1,1 NO INDICATE ERROR ( P RF UNC900 ( P XIF ( P
0x2f695c…2f6af0 Dummy {f00=0x00f8, f01=0x0190, f02=»WK A2,/3F ERASE ALL UNPROTECTED? ( P RF(E) UNC300 YES ) ( P IFT COPCMD=1 ) B P CWK A2,/37 COPY COMMAND? ) X P RF(NE) UNC175 NO ) z P LDK A1,ICOCOP RESTART ENTRY ) P RF UNC800 ) ( PUNC150 EQU * ENTRY LABEL FROM RETTAB ) P CF A14,MATCH GET
0x2f6af0…2f6c84 Dummy {f00=0x00f8, f01=0x0190, f02=» ) P LD A8,ECBICW,A11 * P CF A14,ICSET SET TIMEOUT * " P LDR A1,A2 TASK TO CALL * D P LDK A2,2 LENGTH * d P LDKL A3,REGI * | P ADR A3,A11 BUFFER * P CF A14,ICWRT SEND IT * PUNC175 EQU * * P XIF * $ P LDKL A10,THROWB THROW THE RES
0x2f6c84…2f6e18 Dummy {f00=0x00f8, f01=0x0190, f02=»ASE ENTIRE SCREEN * P LD A8,REGI,A11 + P LDR A6,A11 + 2 P LDK A5,LLINE + F & P LDK A4,0 INITIATE BUFFER ADDRESS + P RF UNC500 + PUNC300 EQU * + ( P CF A14,ERASUP ERASE ALL UNPROTECTED + " P LDKL A10,THROWB THROW IT AWAY + P LDK A1,1
0x2f6e18…2f6fac Dummy {f00=0x00f8, f01=0x0190, f02=» RF UNC900 + ( PUNC600 EQU * ENTRY LABEL FROM RETTAB , , P CF A14,P1WCC PROCESS WCC BEFORE UPDATE , > P LDR A3,A4 , n " P ADKL A3,BVDU GET REAL ADDRESS , P ADR A3,A11 , & P ORKL A10,PTORD INDICATE PT ORDER , & P LDK A1,IORDER INDICATE NEXT CALL ,
0x2f6fac…2f7140 Dummy {f00=0x00f8, f01=0x0190, f02=»****************************************** , > P* * - 2 > P* UNPORD UNPACK ORDERS * - t > P* * - > P****************
0x2f7140…2f72d4 (3, 68) Dummy {f00=0x00f8, f01=0x0190, f02=»* A4= REL. CURSOR POS. - P* A5= LAST IN ROW REL POS . $ P* A6= INTERNAL LINE FLAG ADDRESS . @ P* A8= RESERVED . h P* A9= RESERVED . ~ P* A10= INDICATOR . P* A11= RESERVED . P* A12= RESERVED . P* A13= RESERVED . P* . > P**********
0x2f72d4…2f7468 Dummy {f00=0x00f8, f01=0x0190, f02=»100 YES . P ANKL A10,/FFFF-PTORD =9 / P CWR A5,A4 NEW LINE? / 2 P RF(G) UNO050 NO / N P CF A14,LINE CHECK WRAP / f PUNO050 EQU * / ( P SCR A2,A3 STORE CHAR. IN VDU BUFFER / P LC A1,LINFLG,A6 / P ORK A1,1 / P SC A1,LINFLG,A6 / P
0x2f7468…2f75fc Dummy {f00=0x00f8, f01=0x0190, f02=» A14,ORDTAB,A1 TAKE CARE OF ORDER / PUNO200 EQU * 0 * P RTN A14 0 > P EJECT 0 N B P************************************************************* 0 B P* * 0 B P* ORDTAB ORDER TABL
0x2f75fc…2f7790 Dummy {f00=0x00f8, f01=0x0190, f02=»********************************* 0 t PORDTAB EQU * 1 * P DATA INVAL INVALID CHAR. 1 > P DATA SF START FIELD 1 ` P DATA SBA SET BUFFER ADDRESS 1 | P DATA IC INSERT CURSOR 1 P DATA PT TAB. 1 P DATA RA REPEAT TO AADRESS 1 * P DATA EUA ERASE UN
0x2f7790…2f7924 Dummy {f00=0x00f8, f01=0x0190, f02=» DATA EM END MESSAGE 1 P DATA CR CARRIAGE RETURN 2 P EJECT 2 < @ P*********************************************************** 2 J @ P* * 2 @ P* SF START FIELD
0x2f7924…2f7ab8 Dummy {f00=0x00f8, f01=0x0190, f02=»***** 2 Z P* REGISTERS 3 P* 3 " P* A1= RETURN CODE 3 , P* A2= RESERVED 3 F P* A3= POINTER IN VDU BUFFER 3 P* A4= REL. CURSOR POS. 3 P* A5= RESERVED 3 P* A6= RESERVED 3 P* A8= RESERVED 3 P* A9= DC-BUFFER INDEX 3 P* A10= IND
0x2f7ab8…2f7c4c Dummy {f00=0x00f8, f01=0x018e, f02=»**************************** 3 p PSF EQU * 4 $ & P LDK A1,IOSFAT INDICATE NEXT CALL 4 4 P ST A1,UNPMOD,A11 4 ^ P RF SF900 GET CHAR. 4 x ( PSF100 EQU * ENTRY LABEL FROM RETTAB 4 P LDK A1,IORDER NEXT ALBEL 4 P ST A1,UNPMOD,A11 4 P LC A2,CONAT
0x2f7c4c…2f7de0 Dummy {f00=0x00f8, f01=0x0190, f02=» P LC A1,LINFLG,A6 5 P ANK A1,2 LINE IN FIELD? 5 P RF(Z) SF600 NO 5 < . P CF A14,LINATT INDICATE ATTRIBUTE OVERRUN 5 T PSF600 EQU * 5 0 P ORKL A10,ATTREC INDICATE ATTRIBUTE RECEIVED 5 P SCR A2,A3 STORE CHAR. 5 P ADK A3,1 5 P ADK A4,1
0x2f7de0…2f7f74 (3, 69) Dummy {f00=0x00f8, f01=0x0190, f02=»*********************************** 5 x @ P* * 6 , @ P* SBA SET BUFFER ADDRESS * 6 p @ P* * 6 @ P****************
0x2f7f74…2f8108 Dummy {f00=0x00f8, f01=0x018e, f02=»SERVED 6 P* A4= RESERVED 7 P* A5= RESERVED 7 $ P* A6= RESERVED 7 : P* A8= RESERVED 7 P P* A9= RESERVED 7 f P* A10= INDICATOR 7 | P* A11= CREDIT WORK AREA 7 P* A12= RESERVED 7 P* A13= RESERVED 7 P* 7 @ P**************************
0x2f8108…2f829c Dummy {f00=0x00f8, f01=0x0190, f02=» P RF SBA900 FIRST BYTE 8 ( PSBA100 EQU * ENTRY LABEL FROM RETTAB 8 " P LC A7,CONATT,A2 CONVERT 8 N P ANK A7,/3F 8 n P SLL A7,6 8 P LDK A1,IOSBA2 8 P ST A1,UNPMOD,A11 8 P LDK A1,0 8 P RF SBA900 NEXT BYTE 8 ( PSBA200 EQU * ENTRY LAB
0x2f829c…2f8430 Dummy {f00=0x00f8, f01=0x0190, f02=» 8 ~ " P CWK A7,LBVDU ILLEGAL ADDRESS? 9 P RF(NL) SBA800 YES 9 . P LDR A3,A7 9 H P LDR A4,A3 9 Z P ADKL A3,BVDU 9 l P ADR A3,A11 9 & P ORKL A10,PTORD INDICATE PT ORDER 9 * P CF A14,LINE CHECK WRAP AND LINE FLAGS 9 P LDK A1,0 REURN CODE 9
0x2f8430…2f85c4 Dummy {f00=0x00f8, f01=0x0190, f02=» 9 P EJECT : > P********************************************************** : > P* * : X > P* IC INSERT CURSOR * : > P*
0x2f85c4…2f8758 Dummy {f00=0x00f8, f01=0x0190, f02=» : ~ P* A2= RESERVED ; P* A3= RESERVED ; P* A4= REL. CURSOR POS. ; 4 P* A5= RESERVED ; R P* A6= RESERVED ; h P* A9= RESERVED ; ~ P* A10= INDICATOR ; P* A11= CREDIT WORK AREA ; P* A12= RESERVED ; P* A13= RESERVED ; P* ; 4 P**
0x2f8758…2f88ec Dummy {f00=0x00f8, f01=0x0190, f02=»RETURN CODE ; P RTN A14 < P EJECT < $ @ P*********************************************************** < 2 @ P* * < v @ P* PT PROGRAM TAB. * < @ P*
0x2f88ec…2f8a80 Dummy {f00=0x00f8, f01=0x018e, f02=»RS < P* = P* A1= RETURN CODE = P* A2= CHAR. = . P* A3= ADDRESS IN VDU-BUFFER = B P* A4= REL. CURSOR POS. = f P* A5= RESERVED = P* A6= ATTRIBUTE CHAR. = P* A8= RESERVED = P* A9= RESERVED = P* A10= INDICATOR = P* A11= RESER
0x2f8a80…2f8c14 (3, 70) Dummy {f00=0x00f9, f01=0x0190, f02=» PPT EQU * > P LDR A1,A10 > . P ANK A1,PTORD FOLLOWING ORDER OR COMMAND? > ( P RF(NZ) PT300 YES > Z 0 P LDK A7,NULL FILL WITH NULLS TO END OF FIELD > t " P LDR A4,A4 AT POS. ZERO ? DK1 > $ P RF(Z) PT210 YES, PROCESS IT DK1 > PPT200 EQU * >
0x2f8c14…2f8da8 Dummy {f00=0x00f9, f01=0x0190, f02=» A2,A3 > P ANK A2,/80 ATTRIBUTE? ? P RF(NZ) PT400 YES ? , P SCR A7,A3 STORE NULL CHAR. ? F P LC A1,LINFLG,A6 ? j P ORK A1,1 ? P SC A1,LINFLG,A6 ? P ADK A3,1 ? P ADK A4,1 ? P RB PT200 ? PPT300 EQU * DK1 ? " P LDR A4,A4 AT
0x2f8da8…2f8f3c Dummy {f00=0x00f9, f01=0x0190, f02=»F BUFFER? ? P RF(Z) PT700 YES OS AND DOS @ PPT410 EQU * DK1 @ 6 P LCR A2,A3 GET CHAR. @ N P ANK A2,/80 ATTRIBUTE? @ j P RF(NZ) PT500 YES @ PPT420 EQU * DK1 @ P ADK A4,1 @ P ADK A3,1 @ P RB PT400 @ PPT500 EQU * @ & P LCR
0x2f8f3c…2f90d0 Dummy {f00=0x00f9, f01=0x0190, f02=»4,LINWRP CHECK WRAP @ PPT700 EQU * A P ORKL A10,PTORD A 0 PPT800 EQU * A H P LDK A1,0 RETURN CODE A P RTN A14 A z P EJECT A B P************************************************************* A B P*
0x2f90d0…2f9264 Dummy {f00=0x00f9, f01=0x0190, f02=» * A j B P************************************************************* B P* REGISTERS B f P* B z P* A1= RETURN CODE B P* A2= CHAR. TO BE REPEATED B P* A3= ADDRESS IN VDU-BUFFER B P* A4= REL. CURSOR POS. B P* A5=
0x2f9264…2f93f8 Dummy {f00=0x00f9, f01=0x0190, f02=»1= CREDIT WORK AREA B P* A12= RESERVED C P* A13= RESERVED C 4 P* C L 6 P************************************************** C V PRA EQU * C P LDK A1,IORAA1 NEXT LABEL C P ST A1,UNPMOD,A11 C P LDK A1,0 C P RF RA900 FIRST BYTE C (
0x2f93f8…2f958c Dummy {f00=0x00f9, f01=0x0190, f02=»LABEL C | P ST A1,UNPMOD,A11 D P LDK A1,0 D ( P RF RA900 SECOND BYTE D : ( PRA200 EQU * ENTRY LABEL FROM RETTAB D X P LC A2,CONATT,A2 D P ANK A2,/3F D P ORR A7,A2 D " P CWK A7,LBVDU INVALID ADDRESS D P RF(NL) RA800 YES D P LDK A
0x2f958c…2f9720 Dummy {f00=0x00f9, f01=0x018e, f02=» D l P LDK A1,IORDER E P ST A1,UNPMOD,A11 E PRA300 EQU * E 8 " P SCR A2,A3 STORE IN VDU-BUFFER E L P LC A1,LINFLG,A6 E r P ORK A1,1 E P SC A1,LINFLG,A6 E P ADK A3,1 E P ADK A4,1 E P CF A14,LINWRP CHECK WRAP =1 E P CWR A4,A7 A
0x2f9720…2f98b4 (3, 71) Dummy {f00=0x00f9, f01=0x0190, f02=» E PRA800 EQU * F " P ORKL A10,THROWB THROW IT AWAY F P LDK A1,1 RETURN CODE F B PRA900 EQU * F ` P RTN A14 F t P EJECT F : P****************************************************** F : P* * F
0x2f98b4…2f9a48 Dummy {f00=0x00f9, f01=0x0190, f02=»************************************************ F P* REGISTERS G 8 P* G L P* A1= RETURN CODE G V P* A2= CHAR. G p P* A3= RESERVED G P* A4= RESERVED G P* A5= RESERVED G P* A6= RESERVED G P* A8= RESERVED G P* A9= RESERVED G P
0x2f9a48…2f9bdc Dummy {f00=0x00f9, f01=0x0190, f02=»********************************* G z PEUA EQU * H * P LDK A1,IOEUA1 NEXT LABEL H < P ST A1,UNPMOD,A11 H ^ P LDK A1,0 H x P RF EUA900 FIRST BYTE H ( PEUA100 EQU * ENTRY LABEL FROM RETTAB H P LC A7,CONATT,A2 CONVERT H P ANK A7,/3F H P
0x2f9bdc…2f9d70 Dummy {f00=0x00f9, f01=0x0190, f02=» * ENTRY LABEL FROM RETTAB H P LC A2,CONATT,A2 I " P ANK A2,/3F I : P ORR A7,A2 I N P LDK A1,IORDER NEXT LABEL I ` P ST A1,UNPMOD,A11 I P LDR A1,A7 RESTORE ADDR. =6 I " P CWK A1,LBVDU INVALID ADDRESS? I P RF(NL) EUA800 YES I P LDR A2,
0x2f9d70…2f9f04 Dummy {f00=0x00f9, f01=0x0190, f02=»SAVE DCBF-POINTER =5 I ( P SUKL A14,2 ADJUST STACK POINTER =5 J * P CF A14,ERASUA ERASE UNPRO. TO ADDRESS J H ( P ADKL A14,2 ADJUST STACK POINTER =5 J v ( P LDR* A8,A14 RESTORE DCBF-POINTER =5 J P LDK A1,0 RETURN CODE J & P ORKL A10,PTORD INDICATE PT
0x2f9f04…2fa098 Dummy {f00=0x00f9, f01=0x018e, f02=» A14 J P EJECT K < P******************************************************** K < P* * K Z < P* CHAR. < /20 BUT NOT ORDER * K < P*
0x2fa098…2fa22c Dummy {f00=0x00f9, f01=0x0190, f02=» P* A2= CHAR. L P* A3= ADDRESS IN VDU-BUFFER L P* A4= REL. CURSOR POS. L < P* A5= RESERVED L Z $ P* A6= INTERNAL LINE FLAG ADDRESS L p P* A8= RESERVED L P* A9= RESERVED L P* A10= INDICATOR L P* A11= CREDIT WORK AREA L P* A12= RESER
0x2fa22c…2fa3c0 Dummy {f00=0x00f9, f01=0x0190, f02=» INDICATE COMMAND L P LDK A1,1 STOP ORDER PROCESS M P RF CHARET M > PINVAL EQU * M P " P ORKL A10,/9800 END UNPACKING M d P LDK A1,1 M P RF CHARET M PNULCHA EQU * M PNL EQU * M PFF EQU * M PEM EQU * M PCR EQU * M P CF A1
0x2fa3c0…2fa554 (3, 72) Dummy {f00=0x00f9, f01=0x0190, f02=»FFF-PTORD =9 M P ADK A3,1 N P ADK A4,1 N ( P LDK A1,0 CONTINUE N : PCHARET EQU * N T P RTN A14 N h P EJECT N x D P**************************************************************** N D P*
0x2fa554…2fa6e8 Dummy {f00=0x00f9, f01=0x0190, f02=» * N ^ D P**************************************************************** O P* REGISTERS O ^ P* O r P* A2= CHAR O | P* A3= ADDRESS IN VDU-BUFFER O P* A4= REL. CURSOR POS. O P* A5= RESERVED O P* A6= RESERVED O P* A8= ADDRES
0x2fa6e8…2fa87c Dummy {f00=0x00f9, f01=0x0190, f02=» P* P D P*************************************************************** P PPACKSY EQU * P V P IFT SNA=1 P j P LDKL A9,0 COUNTER P | $ P LD A3,CURPOS,A11 GET START POS. P & P CWK A3,/800 ANY CHAR. ON DISPLAY? P P RF(E) PASY40 NO P * P CF A14,
0x2fa87c…2faa10 Dummy {f00=0x00f9, f01=0x0190, f02=»DKL A1,LBVDU-1 LAST POS. ON SCREEN P P SUR A1,A3 GET LENGTH AGAIN Q * PPASY10 EQU * Q N P CWK A1,256 ILLEGAL LENGTH? Q b P RF(NG) PASY20 NO Q P LDKL A1,256 ADJUST LENGTH Q PPASY20 EQU * Q P ADKL A3,BVDU Q P ADR A3,A11 Q PPASY30 E
0x2faa10…2faba4 Dummy {f00=0x00f9, f01=0x0190, f02=»2,NULL NULL CHAR.? Q " P RB(E) PASY30 YES, DON'T STORE R * P CF A14,PDCCH STORE CHAR. IN DC BUFFER R @ P RB PASY30 R n PPASY40 EQU * R $ P LDK A1,0 INDICATE LAST IN CHAIN R P CF A14,DCWRIT SEND BUFFER R & P LDR A8,A12 GET BUFFER TO RELEASE R " P
0x2faba4…2fad38 Dummy {f00=0x00f9, f01=0x0190, f02=»***** R X B P* * S B P* UNPSYS UNPACK DC BUFFER IN SYSTEM MODE * S T B P* * S B P****************************************
0x2fad38…2faecc Dummy {f00=0x00f9, f01=0x0190, f02=»S. S | P* A5= LAST IN ROW REL POS T $ P* A6= INTERNAL LINE FLAG ADDRESS T , P* A8= ADDRESS IN DC-BUFFER T T P* A9= INDEX IN DC-BUFFER T v P* A10= INDICATOR T P* A11= CREDIT WORK AREA T P* A12= RESERVED T P* A13= RESERVED T P* T B P
0x2faecc…2fb060 Dummy {f00=0x00f9, f01=0x0190, f02=» A1,3 T P ST A1,KBINH,A11 U P CF A14,LMP4ON U & * P CF A14,SCRINF GET SCREEN INFORMATION U < P LDR A3,A4 CURSOR ADDRESS U j P ADKL A3,BVDU U " P ADR A3,A11 VDU BUFFER ADDRESS U , P LD A8,BUFPNT,A11 GET DC BUFFER ADDRESS U " P SUR A9,A9 INDEX
0x2fb060…2fb1f4 (3, 73) Dummy {f00=0x00f9, f01=0x0190, f02=»CCH GET CHAR. IN DC BUFFER U P LDR A1,A1 ANYTHING LEFT? V $ P RF(NZ) UNPS60 NO V F P CWK A2,/31 BIND? V ` P RF(E) UNPS50 YES,PERHAPS V z PUNPS07 EQU * V P CWK A2,/20 ORDER? V P RF(NL) UNPS40 NO V P CWK A2,/0A NEW LINE? V P RF(NE
0x2fb1f4…2fb388 Dummy {f00=0x00f9, f01=0x0190, f02=» NO V P LDK A2,/2A REPLACE WITH * W P RF UNPS40 W . PUNPS20 EQU * W @ P CWK A2,/1E IRS? W T P RF(NE) UNPS30 NO W l P LDK A2,/3B REPLACE WITH ; W P RF UNPS40 W PUNPS30 EQU * W P CWK A2,NULL NULL? W P RF(NE) UNPS40 NO W " P LDK A
0x2fb388…2fb51c Dummy {f00=0x00f9, f01=0x0190, f02=»G,A6 W P ORK A1,1 X P SC A1,LINFLG,A6 X P ADK A3,1 X 6 P ADK A4,1 X H P RB UNPS05 X Z PUNPS50 EQU * X l P CF A14,GDCCH X P ANK A2,/FE SHURE OF BIND? X P RF(Z) UNPS55 ALMOST X P SUKL A8,2 X P SUKL A9,2 X P CF A14,GDCCH X
0x2fb51c…2fb6b0 Dummy {f00=0x00f9, f01=0x0190, f02=»NAMOD,A11 X P LDKL A10,1 NO DISPLAY Y P RF UNPS70 Y 0 PUNPS60 EQU * Y B P LDKL A5,LBVDU+1 Y V P LDK A6,0 Y n . P CF A14,STOINF SAVE NEW SCREEN INFORMATION Y P LDKL A10,0 Y PUNPS70 EQU * Y , P LD A8,BUFPNT,A11 GET BUFFER TO RELEASE Y "
0x2fb6b0…2fb844 Dummy {f00=0x00f9, f01=0x0190, f02=»****** Y Z @ P* * Z 4 P* GETNXT GET AND CHECK NEXT BUFFER Z R @ P* * Z @ P**********************************************************
0x2fb844…2fb9d8 Dummy {f00=0x00f9, f01=0x0190, f02=»ESERVED Z P* [ @ P************************************************************ [ PGETNXT EQU * [ ^ P IFT SNA=1 [ r * P CF A14,SAVE2 SAVE UNPACK INFORMATION [ , P LD A8,BUFPNT,A11 GET BUFFER TO RELEASE [ " P CF A14,RELBUF RELEASE BUFFER [ P
0x2fb9d8…2fbb6c Dummy {f00=0x00f9, f01=0x018e, f02=»IFIED FIELDS [ v P XIF P IFT SNA=1 PGETC10 EQU * 2 P CF A14,WAIT SYNCHRONIZE F " P LD A2,ECBEL,A8 SAVE LENGTH =4 f P ST A2,DCLENG,A11 . =4 P LDR A9,A1 P CF A14,REST2 P LDR A1,A9 GET RETURN CODE ( P SRC A1,1 FIRST OR M
0x2fbb6c…2fbd00 Dummy {f00=0x00f9, f01=0x0190, f02=» P RF(Z) GETC60 NO ] P LC A1,TCT01,A11 ] " P CCK A1,VDUCOD PRINTER UNPACK? ] 4 P RF(NE) GETC20 YES ] Z 0 P CF A14,P2WCC TAKE CARE OF WCC AFTER UPDATE ] t PGETC20 EQU * ] ( P XRKL A10,LICREC RESET LAST IN CHAIN ] P ORKL A10,NEWCH NEW CHAIN ]
0x2fbd00…2fbe94 (3, 74) Dummy {f00=0x00fa, f01=0x0190, f02=»A10 GET INTERNAL STATUS ] , P ORKL A10,LICREC LAST IN CHAIN RECEIVED ^ , P ANKL A1,LICREC LAST IN CHAIN RECEIVED? ^ P P RF(Z) GETC60 NO ^ 0 P CF A14,P2WCC TAKE CARE OF WCC AFTER UPDATE ^ P ORKL A10,NEWCH NEW CHAIN ^ PGETC60 EQU * ^ * P ST A1
0x2fbe94…2fc028 Dummy {f00=0x00fa, f01=0x0190, f02=»UFFER ADDRESS ^ $ P CF A14,READNW READ WITH NO WAIT _ , P CF A14,REST2 RESTORE UNPACK INFORMATION _ > P LDR A1,A10 _ n P ANKL A1,NEWCH NEW CHAIN? _ P RF(Z) GETC80 NO _ P IFT DISHOW=1 _ P XRKL A10,NEWCH RESET _ P LC A1,TCT01,A11 _ P
0x2fc028…2fc1bc Dummy {f00=0x00fa, f01=0x0190, f02=» PGETC70 EQU * ` P LDK A1,ICOMN1 NEXT LABEL ` P ST A1,UNPMOD,A11 ` : PGETC80 EQU * ` T P LD A8,BUFPNT,A11 ` h P SUR A9,A9 ` P LDK A1,0 RETUR N CODE ` PGETC90 EQU * ` P XIF ` P RTN A14 ` P EJECT ` B P************************
0x2fc1bc…2fc350 Dummy {f00=0x00fa, f01=0x018e, f02=» PUT CHAR. IN DC BUFFER * ` | B P* * a 2 B P************************************************************* a x P* REGISTERS a P* a P* A1= RETURN CODE a P* A11= CREDIT WORK
0x2fc350…2fc4e4 Dummy {f00=0x00fa, f01=0x0190, f02=» a P PPUTCHA EQU * b P LDR A1,A1 SBA TO STORE? b P RF(N) PUTC10 YES b < $ P CWK A9,BUFFL+BUFFL BUFFER FULL? b V P RF(NL) PUTC20 YES b ~ P RF PUTC30 b PPUTC10 EQU * b P LDKL A1,BUFFL+BUFFL-3 b ( P SUR A1,A9 ROOM FOR SBA AND ADDRESS? b P
0x2fc4e4…2fc678 Dummy {f00=0x00fa, f01=0x0190, f02=»IN CHAIN b t " P CF A14,DCWRIT WRITE DC BUFFER c P LDR A9,A1 c 6 P CF A14,REST2 c H P LDR A9,A9 TRANSMISSION OK? c ^ P RF(NZ) PUTC90 NO c P SUR A9,A9 BUFFER INDEX c P LDR A8,A12 BUFFER ADDRESS c P XIF c P IFF SNA=1 c P CF A14,ERRO
0x2fc678…2fc80c Dummy {f00=0x00fa, f01=0x0190, f02=»IN DC BUFFER c x P LDK A1,0 RETURN CODE d PPUTC90 EQU * d 2 P RTN A14 d F P EJECT d V 6 P************************************************** d d 6 P* * d 6 P* PDCCH PUT CHAR. IN DC BUFFER
0x2fc80c…2fc9a0 Dummy {f00=0x00fa, f01=0x0190, f02=»RS d P* e P* A2= CHAR. e P* A3= RESERVED e ( P* A4= RESERVED e > P* A5= RESERVED e T P* A6= RESERVED e j P* A8= ADDRESS IN DC-BUFFER e P* A9= DC-BUFFER INDEX e P* A10= INDICATOR e P* A11= RESERVED e P* A12= RESERVED e P
0x2fc9a0…2fcb34 (3, 75) Dummy {f00=0x00fa, f01=0x0190, f02=»ERFLOW? e z P RF(NL) PDC100 YES f P ANK A2,/FF f * P IFT EBCDIC=1 f > * P* CONVERSION DELETED * DK 82-03-30 * f T P XIF f " P SCR A2,A8 STORE IN DC-BUFFER f P ADKL A8,1 f P ADKL A9,1 f PPDC100 EQU * f P RTN A14 f P EJECT f D
0x2fcb34…2fccc8 Dummy {f00=0x00fa, f01=0x0190, f02=»* f R D P* GDCCH GET CHAR. IN DC BUFFER * g D P* * g R D P*************************************************************** g P* REGISTERS g P* g P* A1= RE
0x2fccc8…2fce5c Dummy {f00=0x00fa, f01=0x018e, f02=» P* A8= ADDRESS IN DC-BUFFER h P* A9= DC-BUFFER INDEX h & P* A10= INDICATOR h D P* A11= CREDIT WORK AREA h P* A12= RESERVED h | P* A13= RESERVED h P* h 8 P**************************************************** h PGDCCH EQU * h P L
0x2fce5c…2fcff0 Dummy {f00=0x00fa, f01=0x0190, f02=» h z P ANK A2,/FF i P IFT EBCDIC=1 i 4 P* EBCDIC-ASCII CONVERSION DELETED PR. 8625,DK* i 2 P XIF i j P ADKL A8,1 i v P ADKL A9,1 i PGDCC90 EQU * i P RTN A14 i P EJECT i @ P***********************************************************
0x2fcff0…2fd184 Dummy {f00=0x00fa, f01=0x0190, f02=» i T @ P* * j @ P*********************************************************** j L P* REGISTERS j P* j P* A2= AID j P* A11= RESERVED j P* A13= RESERVED j P* j > P**************
0x2fd184…2fd318 Dummy {f00=0x00fa, f01=0x0190, f02=»****************************************************** j > P* * k > > P* BUFADR STORE BUFFER ADDRESS IN DC-BUFFER * k > P* * k > P****
0x2fd318…2fd4ac Dummy {f00=0x00fa, f01=0x0190, f02=»A4= RESERVED k P* A5= RESERVED l P* A6= RESERVED l * P* A8= RESERVED l @ P* A9= RESERVED l V P* A10= RESERVED l l P* A11= RESERVED l P* A12= RESERVED l P* A13= RESERVED l P* l > P**************************************************
0x2fd4ac…2fd640 Dummy {f00=0x00fa, f01=0x0190, f02=»CII l r $ P CF A14,PDCCH STORE IN DC-BUFFER m P LDR A2,A1 GET REL. POS. m 4 P ANK A2,/3F m T & P LC A2,CONADR,A2 CONVERT TO ASCII m h $ P CF A14,PDCCH STORE IN DC-BUFFER m P RTN A14 m P EJECT m @ P************************************************
0x2fd640…2fd7d4 (3, 76) Dummy {f00=0x00fa, f01=0x0190, f02=»IBUTES * m ` @ P* * n @ P************************************************************ n X P* REGISTERS n P* n P* A2= CHAR. n P* A3= ADDRESS IN VDU-BUFFER n P* A4= RESERVED n P
0x2fd7d4…2fd968 Dummy {f00=0x00fa, f01=0x0190, f02=» n x P* A12= RESERVED o P* A13= RESERVED o P* o 8 B P************************************************************* o B PRESMDT EQU * o P LDK A1,0 FIRST SCREEN POS. o P LDKL A3,BVDU o P ADR A3,A11 o PRESM10 EQU * o P CWK A1,LB
0x2fd968…2fdafc Dummy {f00=0x00fa, f01=0x0190, f02=»NK A2,/FE RESET MDT-BIT o P SCR A2,A3 RESTORE p PRESM20 EQU * p : P ADK A1,1 p N P ADK A3,1 p ` P RB RESM10 p r PRESM90 EQU * p P RTN A14 p P EJECT p < P******************************************************** p < P*
0x2fdafc…2fdc90 Dummy {f00=0x00fa, f01=0x0190, f02=» * p l < P******************************************************** q P* REGISTERS q P* q p P* A2= CHAR. q z P* A3= RESERVED q P* A4= RESERVED q P* A5= RESERVED q P* A6= RESERVED q P* A8= RESERVED q P* A9= RESERV
0x2fdc90…2fde24 Dummy {f00=0x00fa, f01=0x0190, f02=»*************************************** q PP1WCC EQU * r 0 P LC A2,CONATT,A2 IN EBCDIC r D P ST A2,WCC,A11 SAVE r f P ANK A2,1 RESET MDT-BITS? r P RF(Z) P1W900 NO r & P CF A14,RESMDT RESET ALL MDT-BITS r PP1W900 EQU * r P RTN A14 r
0x2fde24…2fdfb8 Dummy {f00=0x00fa, f01=0x0190, f02=» * r Z > P* P2WCC TAKE CARE OF WCC AFTER UPDATE * s > P* * s N > P********************************************************* s P* REGISTERS s P* s P* A11= CREDIT WORK AREA
0x2fdfb8…2fe14c Dummy {f00=0x00fa, f01=0x0190, f02=»C EQU * s " P CF A14,SAVE2 KEEP IT AWAY =4 t P LD A1,WCC,A11 t 6 P LDR A7,A1 t L P ANK A7,4 SOUND? t ^ P RF(Z) P2W100 NO t v P CF A14,SOUND SOUND t PP2W100 EQU * t P ANK A1,8 COPY? t P RF(Z) P2W300 NO t P LC A1,TCT01,A11 . =4 t
0x2fe14c…2fe2e0 Dummy {f00=0x00fa, f01=0x0190, f02=»4 t P CF A14,COPP PRINT #8 u PP2W300 EQU * u ( " P CF A14,REST2 TAKE IT BACK =4 u < P RTN A14 u b P EJECT u r F P****************************************************************** u F P*
0x2fe2e0…2fe474 (3, 77) Dummy {f00=0x00fa, f01=0x0190, f02=» * u ^ F P****************************************************************** v P* REGISTERS v b P* v v P* A1= STACK POINTER v P* A2= CHAR. v P* A3= VDU BUFFER ADDRESS v P* A4= REL CURSOR POS. v P* A5= REL STTRIBUTE POS. v
0x2fe474…2fe608 Dummy {f00=0x00fa, f01=0x0190, f02=»ERVED v P* w D P**************************************************************** w PSAVE1 EQU * w ` & P LDKL A1,STACK1 GET STACK ADDRESS w t P RF SAVE w PSAVE2 EQU * w P LDKL A1,STACK2 w PSAVE EQU * w P ADR A1,A11 w P STR A2,
0x2fe608…2fe79c Dummy {f00=0x00fa, f01=0x0190, f02=» STR A6,A1 w P ADK A1,2 x P STR A7,A1 x $ P ADK A1,2 x 6 P STR A10,A1 x H P RTN A14 x P EJECT x l H P******************************************************************* x z H P*
0x2fe79c…2fe930 Dummy {f00=0x00fa, f01=0x0190, f02=» * x ^ H P******************************************************************* y P* REGISTERS y f P* y z P* A1= STACK POINTER y P* A2= CHAR. y P* A3= VDU BUFFER ADDRESS y P* A4= REL. CURSOR POS. y P* A5= REL. ATTRIBUTE P
0x2fe930…2feac4 Dummy {f00=0x00fa, f01=0x018e, f02=» RESERVED y P* A13= RESERVED z P* z * D P*************************************************************** z 4 PREST1 EQU * z | & P LDKL A1,STACK1 GET STACK ADDRESS z P RF RESTOR z PREST2 EQU * z P LDKL A1,STACK2 z PRESTOR EQU * z
0x2feac4…2fec58 Dummy {f00=0x00fa, f01=0x0190, f02=» P LDR* A5,A1 { P ADK A1,2 { P LDR* A6,A1 { * P ADK A1,2 { > P LDR* A7,A1 { P P ADK A1,2 { d P LDR* A10,A1 { v P RTN A14 { P EJECT { < P******************************************************* { < P*
0x2fec58…2fedec Dummy {f00=0x00fa, f01=0x018e, f02=» * { h < P******************************************************* | PBUFFER EQU * | X P DATA *+2 POINTER FIRST FREE | l P IFF BUFFNR=1 | P DATA *+LINK | P RES BUFFL | P IFF BUFFNR=2 | P DATA *+LINK | P RES BUFFL | P
0x2fedec…2fef80 Dummy {f00=0x00fa, f01=0x018e, f02=» | P DATA *+LINK } P RES BUFFL } P IFF BUFFNR=6 } . P DATA *+LINK } D P RES BUFFL } X P IFF BUFFNR=7 } j P DATA *+LINK } P RES BUFFL } P IFF BUFFNR=8 } P DATA *+LINK } P RES BUFFL } P IFF BUFFNR=9 } P DATA *+LINK }
0x2fef80…2ff114 (3, 78) Dummy {f00=0x00fb, f01=0x0190, f02=» } P IFF BUFFNR=12 ~ P DATA *+LINK ~ P RES BUFFL ~ 2 P IFF BUFFNR=13 ~ D P DATA *+LINK ~ Z P RES BUFFL ~ n P IFF BUFFNR=14 ~ P DATA *+LINK ~ P RES BUFFL ~ P IFF BUFFNR=15 ~ P DATA *+LINK ~ P RES BUFFL ~ P IFF BUFFNR=16 ~
0x2ff114…2ff2a8 Dummy {f00=0x00fb, f01=0x0190, f02=»NK ~ P RES BUFFL P IFF BUFFNR=19 P DATA *+LINK 2 P RES BUFFL F P IFF BUFFNR=20 X P DATA *+LINK n P RES BUFFL P IFF BUFFNR=21 P DATA *+LINK P RES BUFFL P IFF BUFFNR=22 P DATA *+LINK P RES BUFFL
0x2ff2a8…2ff43c Dummy {f00=0x00fb, f01=0x0190, f02=»25 P DATA *+LINK P RES BUFFL P IFF BUFFNR=26 0 P DATA *+LINK F P RES BUFFL Z P IFF BUFFNR=27 l P DATA *+LINK P RES BUFFL P IFF BUFFNR=28 P DATA *+LINK P RES BUFFL P IFF BUFFNR=29 P DATA *+LINK
0x2ff43c…2ff5d0 Dummy {f00=0x00fb, f01=0x0190, f02=» P IFF BUFFNR=32 P DATA *+LINK P RES BUFFL 2 P XIF D P DATA 0 P P RES BUFFL ` P EJECT r < P******************************************************* < P* * < P*
0x2ff5d0…2ff764 Dummy {f00=0x00fb, f01=0x0190, f02=»*************************************** P* REGISTERS 0 P* D P* A8= DC-BUFFER ADDRESS N P* A9= INDEX IN DC-BUFFER n P* A11= RESERVED P* A12= BUFFER ADDRESS P* A13= RESERVED P* < P**********************************
0x2ff764…2ff8f8 Dummy {f00=0x00fb, f01=0x0190, f02=»FREE z P LKM P DATA 0 SWITCH TASK P RB GETB10 4 PGETB90 EQU * F P LDR* A1,A8 Z P STR A1,A7 n P ADKL A8,2 P LDR A12,A8 P SUR A9,A9 P RTN A14 P EJECT > P**************************************************
0x2ff8f8…2ffa8c Dummy {f00=0x00fb, f01=0x018e, f02=» * Z > P* * > P********************************************************* N P* REGISTERS P* P* A8= BUFFER ADDRESS P* A11= RESERVED P* A13= RESERVED P* > P****
0x2ffa8c…2ffc20 Dummy {f00=0x00fb, f01=0x40c4, f02=» PRELB10 EQU * P LDR* A1,A7 P RF(Z) RELB90 , P LDR A7,A1 B P RB RELB10 T PRELB90 EQU * f P STR A8,A7 z P CMR A8 P RTN A14 P P END @ P* A11= RESERVED P* A13= RESERVED P* > P****
0x2ffc20…2ffdb4 (3, 79) Dummy {f00=0x00fb, f01=0x2008, f02=»
0x2ffdb4…2fff48 Dummy {f00=0x00fb, f01=0x0190, f02=» _. rY ( !TTX @ @ @ ! P @ 8 8 8 3 U ( . !TTT (_ !CCP R rY W V P0 A A @ @ < @ _2 v ]X @ 8 8 8 4 D P$ @ # P
0x2fff48…3000dc Dummy {f00=0x00fb, f01=0x0190, f02=» F !SST WN !AAT WB !VVT W6 !PPT W* !LLT dW !RRT lW !QQP ( , A A A @ 0 PV @ P P 0 _ P H (&? @ #? H & D # * H D > R @ D @ @ ) I ( D #@PV D L Tp D 0
0x3000dc…300270 Dummy {f00=0x00fb, f01=0x0190, f02=»% PD H I H T P( H U @ ~U A ~ < + + P @ : ` P: @ @ @ D (P W H $ I 0 % E , a : @ Q A % @ B A A A A F @ @ P A @ E A
0x300270…300404 Dummy {f00=0x00fb, f01=0x0190, f02=» ( ( QZ RT D (%? # ;H ;D &`>e : Q* R$ D (%? # ;H ;D &`>e : ( ( ( P< r A V R A @ _ S : 0 N N !TTP 9H N A V A & N 9H N A
0x300404…300598 Dummy {f00=0x00fb, f01=0x0190, f02=» P @ # _R @ 0=H A B PT N !DDPJ !SSP" A " B P, N !SST" V A $ P Y (9A *_ : @ " 9a @ $ 3 V ( : @ 9 @ 9 9@ @ " :HP @ U W 9 9@
0x300598…30072c Dummy {f00=0x00fb, f01=0x0190, f02=» ! : ( N PD ! P8 !==P( !NNP2 !SSP, U ( - _> _H : P AAT : N =H N : N =H N : &=H F : F =H F : ? ? f > > : P N =H N T V (_ : @ ! P (W ( : @
0x30072c…3008c0 Dummy {f00=0x00fb, f01=0x0190, f02=» * PF J # P _ :d Y @ Z A P T _: @ 2T P _ / : .P W P A .X @ P T :D * J TT J & P T .& >aW T (& P T &@P @ 9 A
0x3008c0…300a54 (3, 80) Opaque[0x194]
0x300a54…300be8 # DirEnt {nam=»PRINT «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1550, f03=0x0000}
0x300a54…300be8 IdxSect {
0x300a54…300be8 f00 = 0x00aa // 0x300a54 @0x0
0x300a54…300be8 f01 = 0x001a // 0x300a56 @0x2
0x300a54…300be8 gno = [ // 0x300a58 @0x4
0x300a54…300be8 [0x00]: C0x00aa.0x2.0
0x300a54…300be8 [0x01]: C0x00aa.0x3.0
0x300a54…300be8 [0x02]: C0x00ab.0x0.0
0x300a54…300be8 [0x03]: C0x00ab.0x1.0
0x300a54…300be8 [0x04]: C0x00ab.0x2.0
0x300a54…300be8 [0x05]: C0x00ab.0x3.0
0x300a54…300be8 [0x06]: C0x00ac.0x0.0
0x300a54…300be8 [0x07]: C0x00ac.0x3.0
0x300a54…300be8 [0x08]: C0x00ad.0x0.0
0x300a54…300be8 [0x09]: C0x00ad.0x1.0
0x300a54…300be8 [0x0a]: C0x00ad.0x2.0
0x300a54…300be8 [0x0b]: C0x00ad.0x3.0
0x300a54…300be8 [0x0c]: C0x00ae.0x0.0
0x300a54…300be8 ]
0x300a54…300be8 }
0x300be8…300d7c Dummy {f00=0x00aa, f01=0x0190, f02=» 2 P IDENT PRINT REL 11.1 83-11-21 DK 870150541110 P : , P DK43, DANISH CHARS. FOR 6883 PRINTER B * P DK42, INTERVENTION REQUIRED STATUS r ( P DK41, TIME-OUT IN PRLINE EXTENDED " P DK40, LP100 OR LINE PRINTER & P DK39,MAIN NOT CLEAR
0x300d7c…300f10 Dummy {f00=0x00aa, f01=0x0190, f02=»8 P =35 IMPROVEMENT OF =24 0 P =32 MISSING PRINTING AFTER PRINTER ERROR , $ P =31 PAPER OUT ON COPY80 (SUM) ` P 82-06-21 P =30 IMPROVEMENT OF =5 & P =27 NO STATUS CHECK AFTER ABORT P =26 LONG SNA CH STRING " P
0x300f10…3010a4 Dummy {f00=0x00aa, f01=0x0190, f02=»N CODE | $ P =19 ERRONEOUS PRINTER STATUS P =18 DOUBLE SETTIM ENTRIES 6 P =17 TWO DC LINES Z P 82-04-16 v $ P =15 CORRECTION OF =7 FOR SNA P 82-02-12 & P =7 TEST PRINTER BEFORE CONNECT P =6 SET PRINTER STATUS
0x3010a4…301238 Dummy {f00=0x00aa, f01=0x0190, f02=» z P 81-05-12 P =2 NEW LABEL P 81-04-08 4 P =1, EOC ON FIRST READ H P 81-01-26 h H P******************************************************************* | H P*
0x301238…3013cc Dummy {f00=0x00aa, f01=0x0190, f02=»UTS BOTH FROM * ` H P* DISPLAY AND MAIN-FRAME * H P* (EMULATION 3270 SNA/SDLC, BSC * h H P* * H P********
0x3013cc…301560 Dummy {f00=0x00aa, f01=0x0190, f02=»** Z P* P* LIST OF ROUTINES P* 6 $ P* PRINT MAIN ROUTINE @ 0 P* IOACT ACTIVATE IN CURRENT MODE h 0 P* IOCPL COMPLETE IN CURRENT MODE ( P* DCPINP DC PRINTER INPUT ( P* ICP
0x301560…3016f4 (3, 81) Dummy {f00=0x00aa, f01=0x0190, f02=» INTERTASK ABORT ~ 6 P* COPP COPY SCREEN BUFFER TO PRINTER $ P* TABLE OF PRINTERORDERS T P* NL NEW LINE | , P* FFDUM SIMULATED FORM FEED " P* FFVAL FORM FEED ( P* CR
0x3016f4…301888 Dummy {f00=0x00aa, f01=0x0190, f02=»CHECK IF FF IS VALID | " P* PRLINE PRINT LINE $ P* INIT INIT ROUTINE B & P* TSTPRT TEST HARDWARE j ( P* GETTAB GET ORDER INDEX P* @ P***********************************************************
0x301888…301a1c Dummy {f00=0x00aa, f01=0x0190, f02=» * h H P* ENTRY POINTS * $ H P* * p H P******************************************************************* P
0x301a1c…301bb0 Dummy {f00=0x00aa, f01=0x0190, f02=»*********************************************************** H P* * D H P* EXTERNAL REFERENCES * H P*
0x301bb0…301d44 Dummy {f00=0x00aa, f01=0x0190, f02=» INITIATE ROUTINE (DSPSNA) | 2 P EXTRN OPINIT OPEN CONNECTION INITIATE (DCSNA9 " $ P EXTRN OPSYS OPEN SYSTEM (DCSNA) X P EXTRN OPEN OPEN (DCBSC) ( P EXTRN CONCT CONNECT PASSIVE (DCBSC) 0 P EXTRN SETTYM SET REQUEST TIMER (DCBSC) =18 , P EXTRN A
0x301d44…301ed8 Dummy {f00=0x00aa, f01=0x0190, f02=»DNW READ WITH NO WAIT (DCSNA) " P EXTRN GETBUF GET BUFFER (PAD) & & P EXTRN RELBUF RELEASE BUFFER (PAD) L ( P EXTRN UNPACK UNPACK DC BUFFER (PAD) v ( P EXTRN ECBINI INIT IF ECB:S (DSPSNA) . P EXTRN ICSET SET INTERTASK TIMEOUT (KEYB) ( P EXTRN I
0x301ed8…30206c Dummy {f00=0x00aa, f01=0x0190, f02=»ANSFORM OF NAT CHAR =4 , P EXTRN RFMDUP REPLACE FM OR DUP CHAR =37 P EJECT N D P*************************************************************** D P* * D P* CONDITIONAL ASSEMBL
0x30206c…302200 Dummy {f00=0x00aa, f01=0x0190, f02=»******************************************* | P 4 PX:A EQU 0 SNA HANDLING IF:=1 < PSNA EQU X:A ` & PX:D EQU 1 NUMBER OF DC LINES (1-2) t PNBRLIN EQU 1 PX:O EQU 0 TEST MODE IF:=1 PTEST EQU X:O , PX:R EQU 0 TRANSFORM OF NAT.CHAR
0x302200…302394 (3, 82) Dummy {f00=0x00ab, f01=0x0190, f02=»DLING =26 n , PLMARG EQU 0 LEFT MARGIN FOR PRINTER =25 " PP6883 EQU 1 6883 PRINTER DK43 B P EJECT h H P******************************************************************* v H P* *
0x302394…302528 Dummy {f00=0x00ab, f01=0x0190, f02=»******************************************************* P @ P* H P* TABLE OF PRINTER TYPES R P* r PPRTTAB EQU * | & P DATA /0004 NUMBER OF PRINTERTYPES P DATA 'TT',0 GTP P DATA 'LL',2 LINE PRINTER P DATA 'GG',4 GP 74
0x302528…3026bc Dummy {f00=0x00ab, f01=0x0190, f02=»TE2= NUMBER OF CHAR./LINE P* " PPRTLEN DATA /2382 GTP , P DATA /2382 LP J P DATA /2382 GP 74 ` P DATA /2382 COPY 80 z P IFF LMARG=0 . =25 4 PLMARGT EQU * NO. OF POSITIONS IN LEFT MARGIN =25 P DATA 0 GTP =25 P DATA 0
0x3026bc…302850 Dummy {f00=0x00ab, f01=0x0190, f02=»U 132 PRINTER BUFFER LENGTH =24 P =BUFL-2 (IN DATXXX) =24 ( P XIF . =36 J P IFT BASWRI=1 . =36 ^ , PPRBFL EQU 256 PRINTER BUFFER LENGTH =36 z P =BUFL IN DATXXX =36 P XIF . =36 P* " P* LINE LENGTHS FROM WCC
0x302850…3029e4 Dummy {f00=0x00ab, f01=0x0190, f02=»A EQU 2 BUFFER ADDRESS PECBRL EQU 4 REQUESTED LENGTH PECBEL EQU 6 EFFECTIVE LENGTH B PECBRC EQU 8 RETURN CODE f PECBCW EQU 10 CONTROL WORD P* P* PRINTER MODES P* PLOCAL EQU 0 LOCAL MODE PSHARED EQU 2 SHARED MO
0x3029e4…302b78 Dummy {f00=0x00ab, f01=0x018e, f02=»N A10 x P* $ PNXTCHA EQU /8000 GET NEXT CHAR. " PENDPRT EQU /4000 END PRINTING @ $ PNTONLY EQU /2000 NOT ONLY SPACES f PCRREC EQU /1000 CR RECEIVED $ PFFCCH EQU /0800 FF CCH IND. =36 0 PNOEMLF EQU /0400 NO EXTRA LINE FEED(EM) DK38
0x302b78…302d0c Dummy {f00=0x00ab, f01=0x0190, f02=» PLBVDU EQU 1920 P* P* RECEIVE STATUS $ P* < PLICREC EQU /2000 . =1 F P* d P* LOCAL EQUATES n P* PSO EQU /0E 'SHIFT OUT' PSI EQU /0F 'SHIFT IN' P EJECT P* P* RELATIVE ADDRESSES IN P* TE
0x302d0c…302ea0 Dummy {f00=0x00ab, f01=0x0190, f02=»LENG EQU LINCNT+2 LENGTH OF RECEIVED BUFFER & PPRTID EQU DCLENG+6 PRINTER TASKID 4 $ PPRTTYP EQU PRTID+2 PRINTER TYPE ^ " PMAIN EQU PRTTYP+4 WHAT DC LINE PECBBLK EQU MAIN+6 ECB BLOCK ( PBUFPNT EQU ECBBLK+14 BUFFER POINTER PREGI EQU BUF
0x302ea0…303034 (3, 83) Dummy {f00=0x00ab, f01=0x0190, f02=»AD ECB p , PECBICW EQU ECBICR+2 INTERTASK WRITE ECB PECBDC EQU ECBICW+2 ECB DC > " PECBDC1 EQU ECBDC ECB DC LINE 1 ` & PECBDC2 EQU ECBDC1+2 ECB DC LINE 2 P IFF SNA=1 . =24 . PPRCCCT EQU ECBDC2+2 CHARACTER COUNTER =24 P XIF . =24
0x303034…3031c8 Dummy {f00=0x00ab, f01=0x0190, f02=»RESS =24 l 4 PPRLMAR EQU PRBA+2 NO. OF POS IN LEFT MARGIN =25 P* H P* RELATIVE ADDRESSES IN R P* COMMON WORKBLOCK r P* P IFF TEST=1 " PTSKTAB EQU 26 DEVICE TABLE =17 P XIF P IFT TEST=1 PTSKTAB EQU 221 . =17
0x3031c8…30335c Dummy {f00=0x00ab, f01=0x0190, f02=» * r H P* PRINT MAIN ROUTINE PRINTER * . H P* * z H P******************************************************************
0x30335c…3034f0 Dummy {f00=0x00ab, f01=0x018e, f02=»INIT OPEN CONNECTION INITIATE P RF(N) PRI100 DC NOT PRESENT & P CF A14,OPSYS OPEN SYSTEM J P XIF l P IFF SNA=1 x P CF A14,OPEN OPEN P RF(N) PRI100 NO DC INVOLVED P LDKL A8,20 P LKM P DATA 6 * P CF A14,TSTPRT G
0x3034f0…303684 Dummy {f00=0x00ab, f01=0x0190, f02=» h P XRS A1,MAIN,A11 . =17 P CF A14,CONCT . =17 & P LDK A1,1 . =17 B 2 P XRS A1,MAIN,A11 INDICATE FIRST LINE AGAIN =17 Z P XIF . =17 P IFF SNA=1 . =17 * P CF A14,SETTYM SET REQUEST TIMEOUT =18 P XIF ( P LDK A1,SHARED ALW
0x303684…303818 Dummy {f00=0x00ab, f01=0x0190, f02=» A2,/FF P SUK A2,/30 P SLL A2,2 $ P LD A3,+6,A13 6 P LDK A1,TSKTAB L P ADR A3,A1 d P ADR A3,A2 x " P LC A4,+3,A3 STATUS TO A4 DK42 * P RF(Z) PRI200 WAS OPERABLE, GO ON DK42 PPRI100 EQU * P CF A14,TSTPRT TEST
0x303818…3039ac Dummy {f00=0x00ab, f01=0x0190, f02=»? f $ P RF(NN) PRI200 NO, SKIP STATUS * P LDK A1,0 SET STATUS = DEVICE END DK42 2 P CF A14,SETSTA DK42 ` P RF PRI200 CONTINUE DK42 ~ PPRI150 EQU * $ P LDKL A8,50 WAIT 5 SECONDS DK42 P LKM P DATA 6 P RB PRI100 D
0x3039ac…303b40 Dummy {f00=0x00ab, f01=0x0190, f02=»ATA 7 MULTIPLE WAIT * P CF A14,IOCPL COMPLET IN CURRENT MODE P LD A1,PRTMOD,A11 J " P ANKL A1,PRTERR PRINTER ERROR? d P RB(Z) PRI200 NO P XRS A1,PRTMOD,A11 P RB PRI100 TRY TO FIX IT P EJECT J P******************************
0x303b40…303cd4 (3, 84) Dummy {f00=0x00ab, f01=0x0190, f02=»TIVATE IN CURRENT MODE J P* * J P********************************************************************* l PIOACT EQU * P LDK A4,0 & P LD A1,PRTMOD,A11 SHARED OR LOCAL?
0x303cd4…303e68 Dummy {f00=0x00ab, f01=0x0190, f02=»10 YES P CM MAIN,A11 INDICATE LINE 1 P CF A14,TSTMES TEST MESSAGE 2 P ST A8,ECBBLK+4,A11 V PIOAC10 EQU * r P IFT NBRLIN=2 P ADK A4,1 ADD MORE WAITS P LD A2,ECBBLK+6,A11 ALREADY? P RF(NZ) IOAC20 YES P IM MAIN,A11 I
0x303e68…303ffc Dummy {f00=0x00ab, f01=0x0190, f02=» LD A2,ECBBLK+2,A11 ALREADY? P RF(NZ) IOAC30 YES $ " P CF A14,ICPRED READ INTERTASK > P ST A8,ECBBLK+2,A11 d PIOAC30 EQU * & P ST A4,ECBBLK,A11 NUMBER OF WAITS P RTN A14 P EJECT J P********************************************
0x303ffc…304190 Dummy {f00=0x00ab, f01=0x0190, f02=»ENT MODE x J P* * ! J P********************************************************************* ! ^ PIOCPL EQU * ! $ P CM MAIN,A11 CLEAR MF FLAG DK39 ! " P CW A8,ECBBLK+2,A11 INTERTASK? !
0x304190…304324 Dummy {f00=0x00ab, f01=0x018e, f02=»,ECBBLK+4,A11 DC LINE 1? ! P IFT NBRLIN=2 " P RF(NE) IOCP20 NO " 6 P XIF " P P IFF NBRLIN=2 " P RF(NE) IOCP90 NO FORGET IT " r P XIF " P CM ECBBLK+4,A11 " P CM MAIN,A11 INDICATE LINE 1 " P RF IOCP30 " P IFT NBRLIN=2 " PIO
0x304324…3044b8 Dummy {f00=0x00ab, f01=0x0190, f02=» " r P XIF # PIOCP30 EQU * # " P CF A14,DCPINP TAKE CARE OF DC # ( PIOCP90 EQU * # N P RTN A14 # b P EJECT # r D P*************************************************************** # D P* *
0x3044b8…30464c Dummy {f00=0x00ab, f01=0x0190, f02=» * # X D P*************************************************************** $ PDCPINP EQU * $ X ( P CF A14,ICABOR ABORT LOCAL HARD COPY $ l " P LDR A7,A7 ALREADY COMPLETED? $ P RF(Z) DCP100 NO $ * P CF A14,ICPINP TAKE CARE OF THAT FIRST $ PDCP1
0x30464c…3047e0 Dummy {f00=0x00ab, f01=0x0190, f02=» $ ~ PDCP150 EQU * % P XIF % P IFT SNA=1 % ( P LD A1,ECBRC,A8 OK? % : P ANKL A1,/701 OK? % V P RF(NZ) DCP500 NO STOP IT % p P XIF % P CF A14,GETBUF GET BUFFER % P LDR A3,A8 % $ P CF A14,READW READ FIRST BUFFER % P ANK A1,3 ERRO
0x3047e0…304974 (3, 85) Dummy {f00=0x00ab, f01=0x0190, f02=» A10,A10 RESET INTERNAL UNPACK STATUS % P IFT SNA=1 . =1 & . P ANK A1,2 . =1 & F P RF(Z) DCP450 . =1 & P ORKL A10,LICREC . =1 & v PDCP450 EQU * . =1 & P XIF . =1 & P LD A1,ECBEL,A8 & " P ST A1,DCLENG,A11 SAVE LENGTH & * P ST A12,BU
0x304974…304b08 Dummy {f00=0x00ab, f01=0x0190, f02=»TH NO WAIT & z P XIF ' ( P CF A14,UNPACK UPDATE SCREEN BUFFER ' PDCP500 EQU * ' J P IFF SNA=1 ' ^ P LDK A1,0 ' p " P CF A14,SETSTA SET DEVICE END ' P XIF ' P RTN A14 ' P EJECT ' D P******************************************************
0x304b08…304c9c Dummy {f00=0x00ab, f01=0x0190, f02=» * ' b D P* * ( D P**************************************************************** ( b PICPINP EQU * ( P CF A14,COPP MAKE HARDCOPP ( , P ST A1,REGI,A11 RETURN CODE TO TERMINAL
0x304c9c…304e30 Dummy {f00=0x00ab, f01=0x0190, f02=»****** ( T F P* * ) F P* ICPRED INTERTASK READ * ) X F P* * ) F P****************************
0x304e30…304fc4 Dummy {f00=0x00ab, f01=0x0190, f02=»0 NOT ADDRESSED READ ) P LDKL A3,BVDU * P ADR A3,A11 * 2 P LDKL A2,LBVDU+/20 * F " P CF A14,ICREAD READ INTERTASK * ` P RTN A14 * P EJECT * H P******************************************************************** * H P*
0x304fc4…305158 Dummy {f00=0x00ab, f01=0x0190, f02=» * * H P******************************************************************** + D PICPWRT EQU * + P LD A8,ECBICW,A11 + P CF A14,ICSET SET NO TIMEOUT + P LD A1,ECBICR,A11 + P LD A1,ECBCW
0x305158…3052ec Dummy {f00=0x00ab, f01=0x0190, f02=»A14,ICWRT WRITE INTERTASK + PICPW90 EQU * , " P RTN A14 , 6 P EJECT , F B P************************************************************* , T B P* * , B P* ICABOR INTERTASK ABORT
0x3052ec…305480 Dummy {f00=0x00ab, f01=0x0190, f02=»************************* , l PICABOR EQU * - " P LDK A7,0 - 6 P CM ECBBLK+IC,A11 - H P LD A8,ECBICR,A11 - b P LKM - | P DATA 10 - P RTN A14 - P EJECT - J P********************************************************************* - J P*
0x305480…305614 (3, 86) Dummy {f00=0x00ac, f01=0x0190, f02=» * - R J P* * . J P********************************************************************* . ^ P* REGISTERS . P* . P* A2= CHAR. . " P* A3= SCREEN BUFFER PO
0x305614…3057a8 Dummy {f00=0x00ac, f01=0x0190, f02=» POINTER . ~ P* A9= ECB BUFFER INDEX / P* A10= INTERNAL STATUS / 0 P* A11= TASK BLOCK BASE / P P* A13= ECB BASE / p P* / J P********************************************************************* / PCOPP EQU * . =2 / P LD A8,ECBPRT,
0x3057a8…30593c Dummy {f00=0x00ac, f01=0x018e, f02=»E BACKWARDS / r & P CM LINCNT,A11 RESET LINE COUNTER 0 P LD A1,WCC,A11 0 > P ANK A1,/38 MASK RELEVANT 0 T P LDR A5,A1 0 v P ANK A1,8 START PRINT? 0 $ P ABL(Z) COP950 NO FORGET IT =19 0 P SRL A5,4 0 $ P LC A5,LINLEN,A5 GET LINE LENGTH 0 ( P
0x30593c…305ad0 Dummy {f00=0x00ac, f01=0x0190, f02=» 0 | PCOP100 EQU * 1 P LDKL A3,BVDU 1 P ADR A3,A11 1 2 P IFT BASWRI=1 . =24 1 F P LDR A1,A8 . =24 1 b . P LD A8,PRBA,A11 PRINTER BUFFER ADDRESS =24 1 z $ P ST A8,ECBBA,A1 STORE IN ECB =24 1 , P AD A8,PRLMAR,A11 ALLOW LEFT MARG/CR =25 1 6 P CM
0x305ad0…305c64 Dummy {f00=0x00ac, f01=0x0190, f02=»SET CONTROL CHAR. 1 P ADKL A8,2 2 P XIF . =24 2 , P SUR A9,A9 2 @ P LDK A2,0 2 R P LDK A4,0 2 d P SUR A10,A10 RESET STATUS 2 v PCOP200 EQU * 2 P CWK A4,LBVDU ALL PRINTED? 2 P RF(NL) COP850 YES 2 P CWR A9,A5 LINE FULL? 2 P R
0x305c64…305df8 Dummy {f00=0x00ac, f01=0x0190, f02=» LCR A2,A3 GET CHAR. 2 P ANK A2,/FF 3 P RF(Z) COP650 NULL CHAR. 3 0 P CCK A2,/8000 ATTRIBUTE? 3 P P RF(L) COP500 NO 3 p P LDR A6,A2 GET NEW ATTRIBUTE 3 P RF COP650 3 PCOP500 EQU * 3 P CCK A2,/2020 ORDER? 3 P RF(L) COP550 YES 3 * P
0x305df8…305f8c Dummy {f00=0x00ac, f01=0x018e, f02=»KE CARE OF ORDER 3 P LDR A1,A1 PRINTER ERROR? 4 P RF(NZ) COP900 YES 4 : P LDR A1,A10 GET STATUS 4 T P RF(N) COP800 GET NEXT CHAR. 4 r P SLL A1,1 4 P RF(N) COP850 END 4 PCOP600 EQU * 4 P LDR A1,A6 CHECK IF NONPRINT 4 P ANK A1,/C 4
0x305f8c…306120 Dummy {f00=0x00ac, f01=0x0190, f02=» " P LDK A2,/20 REPLACE WITH SPACE 5 PCOP700 EQU * 5 * P IFF TRANAT=0 . =4 5 > * P LC A2,CONNAT,A2 TRANSFORM NAT.CHAR =4 5 X P XIF . =4 5 P SCR A2,A8 5 P ADKL A9,1 5 P ADKL A8,1 5 P CCK A2,/2020 SPACE? =3 5 . P RF(E) COP800 YES, DON'T U
0x306120…3062b4 (3, 87) Dummy {f00=0x00ac, f01=0x0190, f02=»NKL A10,/FFFF-NXTCHA RESET TAKE NEXT CHAR =3 5 P ADK A3,1 6 4 P ADK A4,1 6 F P RB COP200 6 X PCOP850 EQU * 6 j P IFF BASWRI=1 . =24 6 ~ ( P LDR A9,A9 SOMETHING LEFT TO PRINT? 6 P RF(Z) COP950 NO! =19 6 " P CF A14,PRLINE PRINT LAST LINE 6
0x3062b4…306448 Dummy {f00=0x00ac, f01=0x0190, f02=»INE FEED 6 z P XIF . =24 7 P IFT BASWRI=1 . =24 7 $ , P LDR A9,A9 SOME TEXT LEFT TO PRINT? =24 7 @ P RF(Z) COP860 NO! =24 7 p " P CF A14,PRLINE PRINT TEXT =24 7 PCOP860 EQU * . =24 7 P IFF SCS=1 . =26 7 $ P LDR A1,A10 TEST END MESS. DK38 7
0x306448…3065dc Dummy {f00=0x00ac, f01=0x018e, f02=» SKIP IT DK38 7 ~ , P ORKL A10,NTONLY INDICATE PRINTABLE =24 8 & P CF A14,PRLINE EXTRA LINEFEED =24 8 F P XIF . =26 8 p P IFT BASWRI=1 . =26 8 PCOP870 EQU * . =24 8 . P CF A14,PRCCH CONTROL CH:S TO PRINTER =24 8 P XIF . =24 8 PCOP900 E
0x3065dc…306770 Dummy {f00=0x00ac, f01=0x0190, f02=» ( P RF(E) COP910 YES. SKIP PRINTING =32 9 PCOP902 EQU * 9 0 2 P CF A14,TSTPRT WAIT UNTIL PRINTER OPERABLE =32 9 F P ANK A4,1 OPERABLE? DK42 9 | " P RF(Z) COP905 YES, RETRY DK42 9 ( P LDKL A8,50 NO, WAIT 5 SECONDS DK42 9 P LKM 9 P DATA 6 9
0x306770…306904 Dummy {f00=0x00ac, f01=0x0190, f02=»RROR 9 v P ORS A2,PRTMOD,A11 : PCOP950 EQU * : & P RTN A14 : : P EJECT : J L P************************************************************************ : X P* : P* TABLE FOR PRINTERORDERS : P* : L P******************************************
0x306904…306a98 Dummy {f00=0x00ac, f01=0x0190, f02=» 2 P DATA /0C0C,FFDUM,FFVAL,FFVAL,FFDUM FORM FEED ; ( P DATA /0D0D,CR,CR,CR,CR CARR. RETURN ; : ( P DATA /1919,EM,EM,EM,EM END MESSAGE ; f " P DATA INVAL INVALID ORDER CODE ; P EJECT ; P P******************************************************************
0x306a98…306c2c Dummy {f00=0x00ac, f01=0x0190, f02=» * ; n P P* * < 2 P P**************************************************************************** < PNL EQU * < * P ORKL A10,NXTCHA+NTONLY GET NE
0x306c2c…306dc0 Dummy {f00=0x00ac, f01=0x0190, f02=»8 < v " P RF(E) NL005 YES, FLAG IT DK38 = . P ANKL A10,/FFFF-NOEMLF NO, CLEAR FLAG DK38 = 0 P RF NL010 DK38 = b PNL005 EQU * DK38 = z ( P ORKL A10,NOEMLF INDICATE NO LF DK38 = PNL010 EQU * DK38 = " P SUK A3,1 RESTORE POINTER DK38 = , P CF A14,
0x306dc0…306f54 (3, 88) Dummy {f00=0x00ad, f01=0x0190, f02=»******************** = ^ J P* * > J P* FFDUM SIMULATED FORM FEED * > j J P* * > J P**
0x306f54…3070e8 Dummy {f00=0x00ad, f01=0x0190, f02=»D > h P LDR A1,A1 VALID? ? P RF(NZ) FFD400 NO ? $ P LDK A7,0 RESET ? > & P LD A1,PRTTYP,A11 TYPE OF PRINTER ? V P LC A7,PRTLEN,A1 PAGE SIZE ? PFFD100 EQU * ? P CW A7,LINCNT,A11 NEW PAGE? ? " P RF(L) FFD200 YES BUT TO MANY ? P RF(E) F
0x3070e8…30727c Dummy {f00=0x00ad, f01=0x0190, f02=»STORE ? ~ P LDR A1,A1 PRINTER ERROR? @ P RF(NZ) FFD500 YES @ 0 P RB FFD100 @ J PFFD200 EQU * @ P NGR A1,A7 @ p * P ADS A1,LINCNT,A11 TAKE AWAY ONE PAGE @ P RB FFD100 @ PFFD300 EQU * @ P CM LINCNT,A11 TOP OF PAGE @ & P LDK A2,/20 REPL
0x30727c…307410 Dummy {f00=0x00ad, f01=0x0190, f02=»*********************************************************** @ J P* * A D J P* FFVAL FORM FEED * A J P*
0x307410…3075a4 Dummy {f00=0x00ad, f01=0x018e, f02=» CF A14,FFCHK CHECK IF FF VALID A P LDR A1,A1 VALID? B ( P RF(NZ) FFV200 NO B B P . =36 B P IFF BASWRI=1 . =30 B l * P LDK A1,/31 FF FOR STANDARD WRITE =30 B ( P SC A1,-1,A8 STORE FF CONTROL CHAR. B P XIF . =24 B P IFT BASWRI=1 . =2
0x3075a4…307738 Dummy {f00=0x00ad, f01=0x0190, f02=» P CM LINCNT,A11 TOP OF PAGE C PFFV200 EQU * C & P LDK A1,0 RETURN CODE C : P RTN A14 C X P EJECT C h J P********************************************************************** C v J P*
0x307738…3078cc Dummy {f00=0x00ad, f01=0x0190, f02=» * C ` J P********************************************************************** D PCR EQU * D l P LDR A1,A6 GET ATTRIBUTE D | P ANK A1,/C D P XRK A1,/C NONPRINT FIELD? D P RF(Z) CR100 YES D P LD A1,WCC,A11 D P ANK A1,/3
0x3078cc…307a60 Dummy {f00=0x00ad, f01=0x0190, f02=» D r P LDK A1,0 RETURN CODE E P RTN A14 E & P EJECT E 6 J P********************************************************************* E D H P* * E H P* EM END MESSAGE
0x307a60…307bf4 (3, 89) Dummy {f00=0x00ad, f01=0x0190, f02=»****************************************** E v PEM EQU * F 2 " P ORKL A10,ENDPRT END PRINTING F B P LDK A1,0 RETURN CODE F h P RTN A14 F P EJECT F F P****************************************************************** F F P*
0x307bf4…307d88 Dummy {f00=0x00ad, f01=0x0190, f02=» * F F P****************************************************************** G < P* G P* ALSO HANDLING: G P* DUP & FM CHARACTERS G P* G PINVAL EQU * G P LDR A1,A2 SAVE CHAR =37 G , P CF
0x307d88…307f1c Dummy {f00=0x00ad, f01=0x0190, f02=»7 G t " P LDK A2,/20 REPLACE WITH SPACE H PINVA10 EQU * . =37 H 0 P ORKL A10,NTONLY NOT ONLY H J P LDK A1,0 RETURN CODE H l P RTN A14 H P EJECT H F P***************************************************************** H F P*
0x307f1c…3080b0 Dummy {f00=0x00ad, f01=0x018e, f02=» * H F P***************************************************************** I @ PFFCHK EQU * I P LD A1,WCC,A11 I P ANK A1,/30 I P XRK A1,/30 FORMATTED? I 0 P RF(NZ) FFCH10 YES BUT NOT AS LOCA
0x3080b0…308244 Dummy {f00=0x00ad, f01=0x0190, f02=» P LDR A9,A9 FF ALLOWED J P RF(Z) FFCH30 NOT J " P LDR A1,A10 J < P ANKL A1,CRREC CR RECEIVED? J P P RF(NZ) FFCH30 YES J t PFFCH20 EQU * J " P LDK A2,/20 REPLACE WITH SPACE J P LDK A1,1 RETURN CODE J P RF FFCH40 J PFFCH30 EQU * J
0x308244…3083d8 Dummy {f00=0x00ad, f01=0x0190, f02=» PFFCH35 EQU * K P LDK A1,0 RETURN CODE K PFFCH40 EQU * K 6 P ORKL A10,NTONLY NOT ONLY K J P RTN A14 K l P EJECT K | D P**************************************************************** K D P*
0x3083d8…30856c Dummy {f00=0x00ad, f01=0x018e, f02=» * K b D P**************************************************************** L PPRLINE EQU * L b P LD A8,ECBPRT,A11 L v P LDR A1,A10 L P ANKL A1,NTONLY ONLY RUBB.? L P RF(NZ) PRL050 NO L P LD A1,WCC,A11 L P LDR A2,A1 L
0x30856c…308700 Dummy {f00=0x00ad, f01=0x0190, f02=» PPRL050 EQU * M 8 P ANKL A10,/FFFF-NTONLY RESET NOT ONLY SPACES RCV =3 M P IFF BASWRI=1 . =24 M T . P LDKL A9,2 ADD CONTROL CHAR. TO LENGTH =3 M p P ADS A9,ECBRL,A8 . =3 M P LDK A7,/06 PRINT M P LKM M P DATA 1 M P XIF . =24 M
0x308700…308894 (3, 90) Dummy {f00=0x00ad, f01=0x0190, f02=» TEXT LINE =36 M ~ * P PREPARE LINE. FIRST LEFT MARGIN =36 N P IFF LMARG=0 . =36 N D 0 P LDK A7,/20 FILL LEFT MARGIN WITH SPACE =36 N ^ P LD A1,PRLMAR,A11 . =36 N P AD A1,ECBBA,A8 . =36 N P SUK A1,1 . =36 N PPRL055 EQU * . =36 N P SCR A
0x308894…308a28 Dummy {f00=0x00ad, f01=0x0190, f02=»ASWRI=1 . =36 N P . =36 O P LDK A7,/0D CR CCH =36 O & 0 P SC* A7,ECBBA,A8 CR CCH FIRST IN BUFFER =36 O D $ P IM LINCNT,A11 ANOTHER LINE =24 O x P LDK A1,/0A LF CCH =24 O P LD A7,ECBRL,A8 . =24 O P AD A7,ECBBA,A8 . =24 O 0 P AD A7,PRLMAR,
0x308a28…308bbc Dummy {f00=0x00ad, f01=0x0190, f02=» A1,1 ALLOW FOR LF =36 O & P AD A1,ECBRL,A8 ALLOW FOR TEXT =36 P 0 P AD A1,PRLMAR,A11 ALLOW FOR LEFT MARGIN =36 P H 0 P ADS A1,PRCCCT,A11 NO. OF CH:S TO PRINT =36 P | 2 P ADS A1,ECBBA,A8 UPDATE POINTER TO BUFFER =36 P P EJECT . =36 P 4 PPRL060 EQU *
0x308bbc…308d50 Dummy {f00=0x00ad, f01=0x0190, f02=»UR A1,A5 MAX. LINE LENGTH =36 P & P SU A1,PRLMAR,A11 LEFT MARGIN =36 Q & 0 P RF(G) PRL200 ENOUGH SPACE. DON'T PRINT =36 Q P P . =36 Q " PPRL065 EQU * PRINT BUFFER =36 Q P LD A1,PRCCCT,A11 . =36 Q $ P ST A1,ECBRL,A8 REQ. LENGTH =36 Q P LD A1
0x308d50…308ee4 Dummy {f00=0x00ad, f01=0x0190, f02=» = L1 = 6883 Q * P RF(NE) PRL067 NO, NORMAL BASIC WRITE R * P LDK A7,/07 ORDER - BAS. WRT W/ CONV. R D P RF PRL069 R r P XIF R PPRL067 EQU * R P LDK A7,/05 BASIC WRITE =24 R PPRL069 EQU * R P LKM . =24 R P DATA 1 . =24
0x308ee4…309078 Dummy {f00=0x00ad, f01=0x0190, f02=» EQU * STORE CCH IN BUFFER =24 R $ P IM LINCNT,A11 ANOTHER LINE =24 S ( P LDK A7,/0A LF CCH =24 S P P LDR A1,A10 . =36 S n " P ANKL A1,FFCCH FORM FEED? =36 S P RF(Z) PRL075 NO =36 S P LDK A7,/0C YES. FF CCH =36 S , P ANKL A10,/FFFF-FFCCH RESE
0x309078…30920c Dummy {f00=0x00ad, f01=0x0190, f02=»M PRCCCT,A11 STEP NO. OF CH:S IN BUFFER =36 S & P ADKL A8,1 STEP BUFFER POINTER =36 T 4 * P RB PRL060 CHECK IF END OF BUFFER =36 T ^ P EJECT . =36 T PPRL090 EQU * . =24 T P XIF . =24 T & P LDK A1,100 NUMBER OF DELAYS DK41 T PPRL100 EQU * T
0x30920c…3093a0 Dummy {f00=0x00ad, f01=0x0190, f02=» PRL150 YES T P SUK A1,1 MORE TO WAIT FOR? U P RB(NZ) PRL100 YES U 8 P LKM U R P DATA 10 ABORT U ^ P . =27 U t P LDK A1,1 INDICATE ERROR =27 U P RF PRL300 U PPRL150 EQU * U P LKM U P DATA 2 RESYNCHRONIZE U P IFF BASWRI=1
0x3093a0…309534 (3, 91) Dummy {f00=0x00ad, f01=0x0190, f02=» 6 P ANKL A1,/2011 PAPER OUT/HARDWARE T-O/NOT OP? =31 V P RF(NZ) PRL300 YES! =23 V > PPRL200 EQU * V ^ P IFT BASWRI=1 . =24 V r ( P CM ECBRL,A8 RESET PRINT LENGTH =36 V * P LD A8,ECBBA,A8 SET BUFFER POINTER =36 V 0 P AD A8,PRLMAR,A11 ALLOW FOR LEFT
0x309534…3096c8 Dummy {f00=0x00ad, f01=0x0190, f02=». V v P XIF . =24 W P SUR A9,A9 W P IFF BASWRI=1 . =24 W 0 P ADKL A8,2 W L P XIF . =24 W ^ P LDK A1,0 RETURN CODE W r P RF PRL900 . =6 W PPRL300 EQU * W * P LD A2,PRTID,A11 GET PRINTER TASKID =6 W P ANK A2,/FF . =6 W P SUK A
0x3096c8…30985c Dummy {f00=0x00ad, f01=0x0190, f02=»C A1,+3,A3 SET PRINTER STATUS =6 W PPRL900 EQU * . =6 X ( P RTN A14 X B P IFT BASWRI=1 . =24 X R P EJECT . =24 X n L P************************************************************************ X P* X B P* PRCCH - SEND BUFFER WITH CONT
0x30985c…3099f0 Dummy {f00=0x00ad, f01=0x0190, f02=»U * . =24 X , P LD A1,PRCCCT,A11 ANYTHING TO SEND? =24 Y P RB(Z) PRL900 NO! RETURN =24 Y B & P LD A8,ECBPRT,A11 ECB ADDRESS =24 Y f ( P RB PRL065 SEND CH:S TO PRINTER =36 Y P XIF . =24 Y P EJECT Y H P******************************************
0x3099f0…309b84 Dummy {f00=0x00ad, f01=0x0190, f02=»OUTINE * Y v H P* * Z 2 H P******************************************************************* Z ~ PINIT EQU * Z P CF A14,COMINI COMMON INIT Z P CF A14,EC
0x309b84…309d18 Dummy {f00=0x00ad, f01=0x0190, f02=»ET TYPE OF PRINTER AND MAKE INDEX Z " P LD A7,PRTTAB NUMBER OF TYPES [ * , P LDKL A1,PRTTAB+2 START OF PRINTER TABLE [ P PINI100 EQU * [ $ P CCR A2,A1 CONVERT TYPE TO INDEX [ P RF(E) INI200 [ P ADK A1,4 [ P SUK A7,1 ILLEGAL ID? [ P RB(NZ
0x309d18…309eac Dummy {f00=0x00ad, f01=0x0190, f02=» ( P ST A1,PRTTYP,A11 SAVE PRINTER TYPE P* 0 * P* IF TID =< 'L1',SELECT FILE CODE '80' : P* THE LINE PRINTER...... h P* P CF A14,SELPFC P* P IFT BASWRI=1 . =24 . P LD A2,ECBPRT,A11 PRINTER ECB ADDRESS =24 . P LD A2
0x309eac…30a040 Dummy {f00=0x00ad, f01=0x0190, f02=»LOW FOR CR =25 | , P IFF LMARG=0 LEFT MARGIN FOR PRINTER =25 ] P LD A1,LMARGT,A1 . =25 ] F 2 P ADS A1,PRLMAR,A11 SAVE VALUE IN WORK AREA =25 ] d P XIF . =24 ] P RTN A14 ] P EJECT ] F P************************************************************
0x30a040…30a1d4 (3, 92) Dummy {f00=0x00ae, f01=0x018e, f02=» * ] ` F P* * ^ F P***************************************************************** ^ d PTSTPRT EQU * ^ P . =6 ^ P LD A8,ECBPRT,A11 ^ P LDK A7,/80 TEST STATUS ^
0x30a1d4…30a368 Dummy {f00=0x00ae, f01=0x018e, f02=» P RF(Z) TSTP20 NO! =31 _ & P LDK A4,1 YES. INDICATE ERROR =31 _ " PTSTP20 EQU * . =31 _ L P . =6 _ f P LD A2,PRTID,A11 . =6 _ v P ANK A2,/FF _ P SUK A2,/30 _ P SLL A2,2 _ P LD A3,+6,A13 _ P LDK A1,TSKTAB _ P ADR A3,A1 _
0x30a368…30a4fc Dummy {f00=0x00ae, f01=0x0190, f02=» P . =6 ` PTSTP90 EQU * ` P RTN A14 ` ( P EJECT ` 8 H P******************************************************************* ` F H P* * ` H P* GETTAB GET ORDER INDEX
0x30a4fc…30a690 Dummy {f00=0x00ae, f01=0x0190, f02=»***************************************** ` v PGETTAB EQU * a 2 . P LD A7,PRTORD NUMBER OF VALID ORDER CODES a F & P LDKL A1,PRTORD+2 ORDERTABLE BASE a x PGETT10 EQU * a , P CCR A2,A1 CONVERT ORDER CODE TO ADDRESS a P RF(E) GETT20 a P AD A1,PRTTA
0x30a690…30a824 Dummy {f00=0x00ae, f01=0x0190, f02=» PGETT20 EQU * b P ADK A1,2 b P LD A2,PRTTYP,A11 b * P ADR A1,A2 b D PGETT30 EQU * b V P LDR* A1,A1 b j P RTN A14 b ~ P EJECT b P* b $ P* SELECTION OF PRINTER FILE CODE b ( P* FC=30, LP100, FC=80, LINE PRINTER b P* b PSE
0x30a824…30a9b8 Dummy {f00=0x00ae, f01=0x4132, f02=» P RF(E) SELP05 YES. c P RF SELP90 NO, QUIT. c PSELP05 EQU * c : P CWK A2,/4C31 ='L1'? c P P RF(G) SELP90 NO, QUIT c l & P LD A2,ECBPRT,A11 GET PRINTER ECB c $ P LDK A1,/80 OVER WRITE ORIG. FC c P SC A1,+1,A2 c PSELP90 EQU * c P
0x30a9b8…30ab4c Dummy {f00=0x00ae, f01=0x2008, f02=» d A1,TSKTAB ADR A3,A1 ADR A3,A2 0 LDK A1,1 B " SC A1,+2,A3 INDICATE NOT OP. T LKM z DATA 0 SWITCH TASK $ LDK A2,1 INDICATE ONCE NOT OP. RB TSTP10 TSTP80 EQU * LDR A2,A2 NOT OP. ONC
0x30ab4c…30ace0 Dummy {f00=0x00ae, f01=0x0190, f02=»RN DWTOR DWT ORDER P EXTRN DWTECB DWT ECB P EXTRN DWTOPT OPTION CODE 8 " P EXTRN DWTUEC USER ECB IF MMU Z P EXTRN DWTMEC MMU ECB P EXTRN ECBFC FILE CODE P EXTRN ECBBA BUFFER ADDRESS " P EXTRN ECBRL REQUESTED LENGTH " P E
0x30ace0…30ae74 (3, 93) Opaque[0x194]
0x30ae74…30b008 # DirEnt {nam=»CONVER«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1fd8, f03=0x0000}
0x30ae74…30b008 IdxSect {
0x30ae74…30b008 f00 = 0x00fe // 0x30ae74 @0x0
0x30ae74…30b008 f01 = 0x0006 // 0x30ae76 @0x2
0x30ae74…30b008 gno = [ // 0x30ae78 @0x4
0x30ae74…30b008 [0x00]: C0x00fe.0x3.0
0x30ae74…30b008 [0x01]: C0x00ff.0x0.0
0x30ae74…30b008 [0x02]: C0x00ff.0x1.0
0x30ae74…30b008 ]
0x30ae74…30b008 }
0x30b008…30b19c Dummy {f00=0x00fe, f01=0x0190, f02=» 2 P IDENT CONVER REL 11.0 DK82-04-01 870150541100 P : < P**************** SCANDINAVIAN ALPHABET****************** B P DK CORRECTED CONATT D P**************************************************************** D P*
0x30b19c…30b330 Dummy {f00=0x00fe, f01=0x0190, f02=»CDIC-ASCII * x D P* ASCII-EBCDIC * 0 D P* ATTRIBUTES,BUFFER ADDRESSES * x D P* PF-KEYS * D P
0x30b330…30b4c4 Dummy {f00=0x00fe, f01=0x0190, f02=» P D P**************************************************************** P EJECT P D P**************************************************************** ^ D P* * D P* ENTRY POINTS
0x30b4c4…30b658 Dummy {f00=0x00fe, f01=0x0190, f02=»********************************************** ~ P 6 P ENTRY CONASC > P ENTRY CONEBC T P ENTRY CONATT j P ENTRY CONADR P ENTRY CONPF P ENTRY CONORD P EJECT F P**********************************************************
0x30b658…30b7ec Dummy {f00=0x00fe, f01=0x0190, f02=» * b F P* * F P***************************************************************** f PCONASC EQU * ( P DATA /0001,/0203,/0009,/0000 00-07 ( P DATA /0000,/000B,/0C0D,
0x30b7ec…30b980 Dummy {f00=0x00fe, f01=0x0190, f02=»B 20-27 t ( P DATA /0000,/0000,/0005,/0607 28-2F ( P DATA /0031,/1600,/001E,/0004 30-37 < ( P DATA /0000,/0000,/1415,/001A 38-3F h ( P DATA /2041,/4243,/4445,/4647 40-47 ( P DATA /4849,/242E,/3C28,/2B7C 48-4F ( P DATA /264A,/4B4C,/4D4E,/4F5
0x30b980…30bb14 (3, 94) Dummy {f00=0x00ff, f01=0x0190, f02=»-6F p ( P DATA /1831,/3233,/3435,/3637 70-77 ( P DATA /3860,/3A23,/4027,/3D22 78-7F 8 ( P DATA /2061,/6263,/6465,/6667 80-87 d ( P DATA /6869,/5B2E,/3C28,/2B21 88-8F ( P DATA /266A,/6B6C,/6D6E,/6F70 90-97 ( P DATA /7172,/5D24,/2A29,/3B5E 98
0x30bb14…30bca8 Dummy {f00=0x00ff, f01=0x0190, f02=» l ( P DATA /3839,/3A23,/4027,/3D22 B8-BF ( P DATA /7B41,/4243,/4445,/4647 C0-C7 4 ( P DATA /4849,/5B2E,/3C28,/2B21 C8-CF ` ( P DATA /7D4A,/4B4C,/4D4E,/4F50 D0-D7 ( P DATA /5152,/5D24,/2A29,/3B5E D8-DF ( P DATA /5C2F,/5354,/5556,/5758 E0-E7
0x30bca8…30be3c Dummy {f00=0x00ff, f01=0x0190, f02=» P EJECT H P******************************************************************* H P* * ^ H P* CONEBC CONVERT ASCII-EBCDIC * H P*
0x30be3c…30bfd0 Dummy {f00=0x00ff, f01=0x0190, f02=»NEBC EQU * ( P DATA /0001,/0203,/372D,/2E2F 00-07 ( P DATA /1605,/150B,/0C0D,/0E0F 08-0F > ( P DATA /1011,/124F,/3C3D,/3226 10-17 j ( P DATA /7019,/3F27,/1C1D,/1E1F 18-1F ( P DATA /405A,/7F7B,/4A6C,/507D 20-27 ( P DATA /4D5D,/5C4E,/6B60,/4
0x30bfd0…30c164 Dummy {f00=0x00ff, f01=0x0190, f02=»40-47 r ( P DATA /C8C9,/D1D2,/D3D4,/D5D6 48-4F ( P DATA /D7D8,/D9E2,/E3E4,/E5E6 50-57 : ( P DATA /E7E8,/E97B,/E05B,/5F6D 58-5F f ( P DATA /7981,/8283,/8485,/8687 60-67 ( P DATA /8889,/9192,/9394,/9596 68-6F ( P DATA /9798,/99A2,/A3A4,/A5A6
0x30c164…30c2f8 Dummy {f00=0x00ff, f01=0x0190, f02=» P D P* * D P* CONATT CONVERT ATTRIBUTE AND ADDRESSES * P D P* * D P****************************************
0x30c2f8…30c48c Dummy {f00=0x00ff, f01=0x0190, f02=» ( P DATA /1011,/1213,/3C3D,/3226 10-17 ( P DATA /7019,/3F27,/1C1D,/1E1F 18-1F 0 ( P DATA /404F,/7F4A,/5A6C,/507D 20-27 ( P DATA /4D5D,/5C4E,/6B60,/4B61 28-2F ( P DATA /F0F1,/F2F3,/F4F5,/F6F7 30-37 ( P DATA /F8F9,/7A5E,/4C7E,/6E6F 38-3F
0x30c48c…30c620 Dummy {f00=0x00ff, f01=0x0190, f02=» DATA /E7E8,/E97B,/7C5B,/5F6D 58-5F ( P DATA /0081,/8283,/8485,/8687 60-67 , ( P DATA /8889,/9192,/9394,/9596 68-6F X ( P DATA /9798,/99A2,/A3A4,/A5A6 70-77 ( P DATA /A7A8,/A91C,/0000,/0000 78-7F P EJECT B P******************************
0x30c620…30c7b4 (3, 95) Dummy {f00=0x00ff, f01=0x0190, f02=»RT ADDRESSES TO ASCII * v B P* * , B P************************************************************* r PCONADR EQU * * P DATA /2041,/4243,/4445,/4647 /00-/07 ( P DATA /4849,/2
0x30c7b4…30c948 Dummy {f00=0x00ff, f01=0x0190, f02=»354,/5556,/5758 /20-/27 * P DATA /595A,/402C,/255F,/3E3F /28-/2F * P DATA /3031,/3233,/3435,/3637 /30-/37 N * P DATA /3839,/3A5B,/5C27,/3D22 /38-/3F | P EJECT D P**************************************************************** D P*
0x30c948…30cadc Dummy {f00=0x00ff, f01=0x0190, f02=» * D P*************************************************************** : PCONPF EQU * 4 P DATA /3132,/3334,/3536,/3738,/393A,/235C PF1-12 6 P DATA /4142,/4344,/4546,/4748,/497F,/2E3C PF13-24 P
0x30cadc…30cc70 Dummy {f00=0x00ff, f01=0x0190, f02=» * ` F P* CONORD CONVERT ORDER CODES TO INDEX * F P* * d F P****************************************************************** PCONORD EQU *
0x30cc70…30ce04 Dummy {f00=0x00ff, f01=0x403c, f02=» DATA /0016,/000E,/0002,/0000 18-1F P END ,@ 8ER CODES TO INDEX * F P* * d F P****************************************************************** PCONORD EQU *
0x30ce04…30cf98 Dummy {f00=0x00ff, f01=0x2008, f02=» NT EBCASC TESTVERSION 1 END (@ 4
0x30cf98…30d12c Dummy {f00=0x00ff, f01=0x0190, f02=» ? F C I M Q , U Y j ] d a l e . i : m q u H D ! y } 4 p p j T P B H D ! 0 d d | H N # /W* 3 GW K MW Q g H D !j| mP P W P W
0x30d12c…30d2c0 Dummy {f00=0x00ff, f01=0x0190, f02=»V W r H D ! > T j W T W # ' + 3 7 > ; . H D ! ? I j M h ] g oW W P z H D !6n P P P T W < P # b + 5 b ;
0x30d2c0…30d454 (3, 96) Opaque[0x194]
0x30d454…30d5e8 # DirEnt {nam=»/OBJCT«, typ=»OB«, f00=0x0000, f01=0x0000, f02=0x1ff0, f03=0x0000}
0x30d454…30d5e8 IdxSect {
0x30d454…30d5e8 f00 = 0x00ff // 0x30d454 @0x0
0x30d454…30d5e8 f01 = 0x0064 // 0x30d456 @0x2
0x30d454…30d5e8 gno = [ // 0x30d458 @0x4
0x30d454…30d5e8 [0x00]: C0x00ff.0x2.0
0x30d454…30d5e8 [0x01]: C0x00ff.0x3.0
0x30d454…30d5e8 [0x02]: C0x0100.0x0.0
0x30d454…30d5e8 [0x03]: C0x0100.0x1.0
0x30d454…30d5e8 [0x04]: C0x0100.0x2.0
0x30d454…30d5e8 [0x05]: C0x0100.0x3.0
0x30d454…30d5e8 [0x06]: C0x0101.0x0.0
0x30d454…30d5e8 [0x07]: C0x0101.0x1.0
0x30d454…30d5e8 [0x08]: C0x0101.0x2.0
0x30d454…30d5e8 [0x09]: C0x0101.0x3.0
0x30d454…30d5e8 [0x0a]: C0x0102.0x0.0
0x30d454…30d5e8 [0x0b]: C0x0102.0x1.0
0x30d454…30d5e8 [0x0c]: C0x0102.0x2.0
0x30d454…30d5e8 [0x0d]: C0x0102.0x3.0
0x30d454…30d5e8 [0x0e]: C0x0103.0x0.0
0x30d454…30d5e8 [0x0f]: C0x0103.0x1.0
0x30d454…30d5e8 [0x10]: C0x0103.0x2.0
0x30d454…30d5e8 [0x11]: C0x0103.0x3.0
0x30d454…30d5e8 [0x12]: C0x0104.0x0.0
0x30d454…30d5e8 [0x13]: C0x0104.0x1.0
0x30d454…30d5e8 [0x14]: C0x0104.0x2.0
0x30d454…30d5e8 [0x15]: C0x0104.0x3.0
0x30d454…30d5e8 [0x16]: C0x0105.0x0.0
0x30d454…30d5e8 [0x17]: C0x0105.0x1.0
0x30d454…30d5e8 [0x18]: C0x0105.0x2.0
0x30d454…30d5e8 [0x19]: C0x0105.0x3.0
0x30d454…30d5e8 [0x1a]: C0x0106.0x0.0
0x30d454…30d5e8 [0x1b]: C0x0106.0x1.0
0x30d454…30d5e8 [0x1c]: C0x0106.0x2.0
0x30d454…30d5e8 [0x1d]: C0x0106.0x3.0
0x30d454…30d5e8 [0x1e]: C0x0107.0x0.0
0x30d454…30d5e8 [0x1f]: C0x0107.0x1.0
0x30d454…30d5e8 [0x20]: C0x0107.0x2.0
0x30d454…30d5e8 [0x21]: C0x0107.0x3.0
0x30d454…30d5e8 [0x22]: C0x0108.0x0.0
0x30d454…30d5e8 [0x23]: C0x0108.0x1.0
0x30d454…30d5e8 [0x24]: C0x0108.0x2.0
0x30d454…30d5e8 [0x25]: C0x0108.0x3.0
0x30d454…30d5e8 [0x26]: C0x0109.0x0.0
0x30d454…30d5e8 [0x27]: C0x0109.0x1.0
0x30d454…30d5e8 [0x28]: C0x0109.0x2.0
0x30d454…30d5e8 [0x29]: C0x0109.0x3.0
0x30d454…30d5e8 [0x2a]: C0x010a.0x0.0
0x30d454…30d5e8 [0x2b]: C0x010a.0x1.0
0x30d454…30d5e8 [0x2c]: C0x010a.0x2.0
0x30d454…30d5e8 [0x2d]: C0x010a.0x3.0
0x30d454…30d5e8 [0x2e]: C0x010b.0x0.0
0x30d454…30d5e8 [0x2f]: C0x010b.0x1.0
0x30d454…30d5e8 [0x30]: C0x00e5.0x2.0
0x30d454…30d5e8 [0x31]: C0x00e5.0x3.0
0x30d454…30d5e8 ]
0x30d454…30d5e8 }
0x30d5e8…30d77c Dummy {f00=0x00ff, f01=0x0190, f02=» @ @ IDENT DSPBSC REL 11.0 83-11-16DK 870150541100 " VDUKB COMINI ECBINI MATCH H VDUKB n , ( 0 @ B P Q a b ! TSTMES , ( ! ( _ N T N ICVRED , (
0x30d77c…30d910 Dummy {f00=0x00ff, f01=0x0190, f02=» KBINP2 , ( y : T O W T O DCINP J ICINP Z , ( @ W T O W O j MATCH , ( : V M P W OPEN , ( , !VV , :
0x30d910…30daa4 Dummy {f00=0x00ff, f01=0x0190, f02=» n STOINF ERASE LMP2ON 0 LMP1ON B * & +$ N P W T CHKSTA COMINI J I:EVA0 , ( C : " . V ! 0 ECBINI t , ( ] 9B
0x30daa4…30dc38 Dummy {f00=0x00ff, f01=0x40e8, f02=» SOUND , ( " L : $ P ( _ : > H D ! , ) | 3T EP MT ]T mT T W( T W T W P W Z ( $ J t R 9P ?W P P @ ECBINI t , ( ] 9B
0x30dc38…30ddcc Dummy {f00=0x00ff, f01=0x0190, f02=» > @ IDENT VDU REL 11.0 82-09-28 870150541100 F B INSMOD GETVDU STOVDU SCRINF STOINF POSUNP ATMASB ATMASF F D @ DISCHA WCHAR DISMOD DISID ERASUA ERASE SOUND ERASUP WRAP 4 0 NLROUT LINWRP LINE LINATT DISSTA RFMDUP
0x30ddcc…30df60 Dummy {f00=0x00ff, f01=0x0190, f02=» R T B W PR , ( a _* , ! V X" $ , ( X( X. X4 Y _> O ! T , ( P " P W W 9 _f , ( PR _ , ! ^< _ , ( ( : P R
0x30df60…30e0f4 (3, 97) Dummy {f00=0x00ff, f01=0x0190, f02=» C B t , ( a T : B P 9 Y , ( Y B : T " T P D , ( P C C W T " U t SAVE1 , ( @ N P REST1 , ( @ O
0x30e0f4…30e288 Dummy {f00=0x00ff, f01=0x0190, f02=» h , ( = ! P , ( ] W P . O O P 8 , ( } P P h , ( N P , ( _6 P , (
0x30e288…30e41c Dummy {f00=0x00ff, f01=0x018e, f02=» < l STOVDU @ SCRINF L STOINF Z 4 , ( = ' : # : N N N : O H SOUND h x , ( ] O O : B + E E WRAP , ( } C ( B : R LINWRP
0x30e41c…30e5b0 Dummy {f00=0x00ff, f01=0x0190, f02=» , ( QR P _> : , ( Q X ) Y Q PW 8 NLROUT 4 h CRDOWN | , ( P P , ]: : , ( 9 PR P_ P - X ERASE f , ( W
0x30e5b0…30e744 Dummy {f00=0x00ff, f01=0x0190, f02=»( : O t , ( @ T fW , ! V , ( _ P W , ! D , ( Z P ! " - X ) Y t RDHOME * & , ! ^( - X ) Y _ ERASUA 8 , ( 5 :
0x30e744…30e8d8 Dummy {f00=0x00ff, f01=0x0190, f02=»P , ! R " BW - POSUNP ( , ( _. : U O 2 ! R < , ( ' P O U Z l bTAB DISID , ( W B ! QT : , ( n V .
0x30e8d8…30ea6c Dummy {f00=0x00ff, f01=0x0190, f02=» U t ATMASB , ( q N P 2 ! Z Z : O ( , ( 2 ! V V N P _ Z X , ( : U P 2 ! WCHAR , ( W : ' P ' T W B , ( ]
0x30ea6c…30ec00 Dummy {f00=0x00ff, f01=0x0190, f02=» !VVT C C , ( Q PR C P_ C ( : " H D ! l L % n 5T ?T C KRt MT YW _R c k qV& u ( P P R H D ! ( W W ( R ( L 4 P P W. #P$ cT k n T H D !8# W^ P$ L Z P
0x30ec00…30ed94 (3, 98) Dummy {f00=0x0100, f01=0x4120, f02=» Q, P Q R Q& Q W %P ?R KP uV T T H D ! Wj V W P6 GP2 MT UP` ]P ePP W P" R W U R* P > H D !H U 4 W T 4 )P /R mU uP V V P U P W P 0 , 0 T W 4 P %T )W /T =T0 YR
0x30ed94…30ef28 Dummy {f00=0x0100, f01=0x0190, f02=» B @ IDENT PAD REL 11.0 DK 82-09-28 870150541100 H D ! PACK UNPACK UNPSYS GETBUF RELBUF PAID BUFADR PACKSY SAVE1 J REST1 PACK SCRINF , ( @ P , ! V WRAP ,
0x30ef28…30f0bc Dummy {f00=0x0100, f01=0x0190, f02=» P T _$ | UNPACK LMP3ON 0 , ( {@ : O N !VVT B LINE r , ( P O ATMASB , ( T N X W , (
0x30f0bc…30f250 Dummy {f00=0x0100, f01=0x0190, f02=» ICSET ICWRT , ( - T O $ ERASE T , ( K @ W P d ERASUP , ( g W W O W , ( O : R
0x30f250…30f3e4 Dummy {f00=0x0100, f01=0x0190, f02=» O W O H * O LINWRP ( LINATT : , ( @ X ! P - L , ( @ : O W H '??F | , ( 5 O W H "? O V , ( S W : O
0x30f3e4…30f578 Dummy {f00=0x0100, f01=0x0190, f02=» j , ( : O W H '??F , ( O W H "? V O : , ( W O - X ) Y j , ( # W : O W H , ( C '??F O W H "? O ERASUA
0x30f578…30f70c Dummy {f00=0x0100, f01=0x0190, f02=» j PACKSY UNPSYS , ( : : : : R V W 2 ERROR b , ( V " O ( : r , ( V " # : V "" PAID BUFADR " CONADR ,
0x30f70c…30f8a0 Dummy {f00=0x0100, f01=0x0190, f02=» j SOUND , ( o > : N ' P &! P N COPY J COPP Z SAVE1 j , ( !VVT (W * : W | , ( % % % % % % REST1 , ( : W $
0x30f8a0…30fa34 (3, 99) Dummy {f00=0x0100, f01=0x0190, f02=» : v <P _ # : H D ! ) PH V %W -PJ =T I MT0 S " [P iP m qT T 8 H D !_ T W r & ~ * < H D ! @ R P W Pd P> PL !T* %Wj -T SWB gW sW"
0x30fa34…30fbc8 Dummy {f00=0x0100, f01=0x40c2, f02=» T P P T WV WD V0 h H D ! W, -W ?WP QW> gV" W W" W R V W V V V KV $ 8 4 ! SR kP u P P T W W W T P p " @ H D ! @ R P W Pd P> PL !T* %Wj -T SWB gW sW"
0x30fbc8…30fd5c Dummy {f00=0x0100, f01=0x0190, f02=» @ @ IDENT CONVER REL 11.0 DK82-04-01 870150541100 4 0 CONASC CONEBC CONATT CONADR CONPF CONORD H CONASC , ( , ( ! 1 , ( A ABCDEFGHI$.
0x30fd5c…30fef0 Dummy {f00=0x0100, f01=0x0190, f02=»uvwxyz|,%_>?0123456789:#@'=" , ( {ABCDEFGHI[.<(+!}JKLMNOPQR]$*);^ $ CONEBC T , ( /STUVWXYZ|,%_>?0123456789:#@'= h , ( 7-./ O<=2&p ?' , ( ! @Z {JlP}M] Nk`Ka z^L~no , ( A |
0x30fef0…310084 Dummy {f00=0x0100, f01=0x0190, f02=» l , ( @O JZlP}M] Nk`Ka z^L~no , ( j {|[_m < CONADR l , ( , ( ABCDEFGHI#.<(+!&JKLMNOPQR$]*);^ CONPF @ , ( ! -/STUVWXYZ@,%_
0x310084…310218 Dummy {f00=0x0100, f01=0x4014, f02=» x @ @O JZlP}M] Nk`Ka z^L~no , ( j {|[_m < CONADR l , ( , ( ABCDEFGHI#.<(+!&JKLMNOPQR$]*);^ CONPF @ , ( ! -/STUVWXYZ@,%_
0x310218…3103ac Dummy {f00=0x0100, f01=0x4110, f02=» > @ IDENT FMOVE P,REL=11.0,810128,870136941100 FMOVE F FMOVE V I:EVA0 h I:EVA5 z , ( B & + P I:RT1 _ P (
0x3103ac…310540 Dummy {f00=0x0100, f01=0x40cc, f02=» > @ IDENT TYPET P,REL=11.0,810128,870136941100 TYPET F TYPET V I:EVA0 h I:RT1 z ( $ D ;d # + @ :RT1 RETURN TO INTERPRETER P END @
0x310540…3106d4 (3, 100) Dummy {f00=0x0100, f01=0x40fc, f02=» > @ IDENT ICLEAR P,REL=11.0,810128,870136941100 ICLEAR F ICLEAR X I:EVA0 l I:RT1 ~ , ( @ #0 0T ' ' _ T $ @
0x3106d4…310868 Dummy {f00=0x0100, f01=0x411c, f02=» > @ IDENT EMPTYT P,REL=11.0,810128,870136941100 EMPTYT F EMPTYT X I:EVA0 l , ( @ #0 0T & ! T ~ I:RT1 , ( P & ! X T C T T !P
0x310868…3109fc Dummy {f00=0x0100, f01=0x0190, f02=» > @ IDENT T:STIN P,REL=11.0,810128,870136941100 STRIN1 F STRIN1 X T:STEV l , ( @ X x & Y " X R ~ T:RNOK , ( W R P _ Y $ T:LOFS I:E
0x3109fc…310b90 Dummy {f00=0x0100, f01=0x0190, f02=» h , ( u [ z [ }T 0W 3R V : , ( %W X $ X " R W V 8 , ( R W V % _ [ h I:MOV , ( " D $ D Z P Z T:GRFC , ( @ % z " * {
0x310b90…310d24 Dummy {f00=0x0100, f01=0x402e, f02=» V P @ *
0x310d24…310eb8 Dummy {f00=0x0100, f01=0x0190, f02=» > @ IDENT T:STOU P,REL=11.0,810128,870136941100 STROU1 F STROU1 X T:STEV l T:LOFS ~ * & @ X x & Y " I:EVA0 T:LOPS , ( !0P <
0x310eb8…31104c Dummy {f00=0x0100, 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 <
0x31104c…3111e0 Dummy {f00=0x0100, f01=0x40f4, f02=» > @ IDENT T:STEV P,REL=11.0,810128,870136941100 T:STEV F T:STEV X T:GRFC l I:EVA0 ~ , ( H Y Y & ( : & @ P RTN PS P I
0x3111e0…311374 (3, 101) Dummy {f00=0x0100, f01=0x0190, f02=» > @ IDENT T:EDFL P,REL=11.0,810128,870136941100 T:EDFL F T:EDFL X T:PRKB l T:PRDY ~ T:PM1 T:PM2 T:CASP , ( I$ Y , ( ( x P Y *
0x311374…311508 Dummy {f00=0x0100, f01=0x0190, f02=» X 0 v , ( s P X T 5 ! Y * T:SCUW F T:CLRD X , ( y X V X X ( j , ( x C ( Y * , ( X Y , X X C & , ( C
0x311508…31169c Dummy {f00=0x0100, f01=0x018e, f02=» X l , ( I *YrP y X " x Y X " T T:BELL < , ( i Y _ _ B U C Q N T:CLR1 ~ T:CLR2 , ( P C D X , ( X * $" ~_> @ Y X * _R X , (
0x31169c…311830 Dummy {f00=0x0100, f01=0x0190, f02=» , ( ! @ " X # X * y _< X , ( ? # X * y X 1 1 4 , ( ] X !@T X $ " P y d T:CLIT T:EKEY , ( } @ _ x T X H , ( X X * , )$ P
0x311830…3119c4 Dummy {f00=0x0100, f01=0x405c, f02=»T {U Q < V P eT uP T P F@ X
0x3119c4…311b58 Dummy {f00=0x0100, f01=0x0190, f02=» > @ IDENT T:DYKI P,REL=11.0,810128,870136941100 J F " T:DYKI T:PM1 T:PM2 T:CLR1 T:CLIT T:CLR2 T:IOER T:EKEY T:BELL F T:DYKI T:PRKB T:PRDY I:EVA7 * & H ' Y
0x311b58…311cec Dummy {f00=0x0100, f01=0x0190, f02=» X l T:CASP * & y ! T _ y C Q " T T:CLRD L , ( X ! X ^ , ( X ! x Y~ Y _ X "@P B , ( R y C B P 9 V _F9 , ( V X ! T X !@X
0x311cec…311e80 Dummy {f00=0x0100, f01=0x0190, f02=» B y " y $ c C T:CLR1 X & T:CLR2 f : T:SCUW N , ( Q _$ _ y _6 ( x X@ X ` , ( qA X # C _. B , ( ]d P C Q X8_H x XD @ Y , ( c C y
0x311e80…312014 (3, 102) Dummy {f00=0x0101, f01=0x0190, f02=» T:IOWR , ( # B P B C : T:CLIT : F , ( ' + X Z T:LOFS I:EVA0 T:LOPS T:CLMI , ( A ( ( T:P
0x312014…3121a8 Dummy {f00=0x0101, f01=0x4104, f02=» , ( B Y Y . : & " " $ : 8 H D ! ! n # aTf i mR s J }T Q T Z P R P V b < 8 ` VV T 'P +Q( [ * P Q8 Z P & a j {V P @ T:P
0x3121a8…31233c Dummy {f00=0x0101, f01=0x0190, f02=» > @ IDENT T:UPDF P,REL=11.0,810128,870136941100 T:UPDF F T:UPDF X T:GRFC l T:LOFS ~ I:EVA0 , ( @ 2! Y " T:LOPS I:MOV , ( A
0x31233c…3124d0 Dummy {f00=0x0101, f01=0x4032, f02=» =T P @ .870136941100 T:UPDF F T:UPDF X T:GRFC l T:LOFS ~ I:EVA0 , ( @ 2! Y " T:LOPS I:MOV , ( A
0x3124d0…312664 Dummy {f00=0x0101, f01=0x018e, f02=» > @ IDENT T:DUPL P,REL=11.0,810128,870136941100 T:DUPL T:DUPX F T:DUPL ` T:GRFC t I:EVA0 T:RNOK T:ROK T:DUPX , ( HB X T:LOFS
0x312664…3127f8 Dummy {f00=0x0101, 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
0x3127f8…31298c Dummy {f00=0x0101, f01=0x4140, f02=» > @ IDENT T:GETC P,REL=11.0,810128,870136941100 T:GETC F T:GETC X T:GRFC l I:EVA0 ~ , ( @ 2' R P P X I:RT1 , ( ' ' X _ X ' _ X '? ;
0x31298c…312b20 Dummy {f00=0x0101, f01=0x4124, f02=» > @ IDENT T:GETA P,REL=11.0,810128,870136941100 T:GETA F T:GETA X T:GRFC l I:EVA0 ~ T:RNOK T:ROK , ( H X ' X ! T:RCR H
0x312b20…312cb4 (3, 103) Dummy {f00=0x0101, f01=0x410e, f02=» > @ IDENT T:TSTC P,REL=11.0,810128,870136941100 T:TSTC F T:TSTC X T:GRFC l , ( @ X " 9b! X :c 2" ~ T:RTES $ H @ % , 4 @
0x312cb4…312e48 Dummy {f00=0x0101, f01=0x0190, f02=» > @ IDENT T:TFWD P,REL=11.0,810128,870136941100 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
0x312e48…312fdc Dummy {f00=0x0101, f01=0x4132, f02=» Y ( Y 09H Y * T:TABE * & = Y 4 Y 2 Y 69h Q X :h Y 0 2 T:SCR2 ` T:TABC r , ( [ W U X Q W Y 0 T:TABN w 8 4 W W W W W W !W MQ ]W
0x312fdc…313170 Dummy {f00=0x0101, f01=0x0190, f02=» > @ IDENT T:DISP P,REL=11.0,810827,870136941100 T:PRIN T:DISP T:ERAS F T:PRIN h T:GDSP | T:DSM T:EDWI T:GRFC , ( D 9H Y T:GTIP T
0x313170…313304 Dummy {f00=0x0101, f01=0x0190, f02=» 0 X +" X *9h P R , ( Q Y ?_ P P Y +W T:TABD P , ( q Y + W T W b , ( Q W Y + U T:TABC , ( Q P W W Y ( C T
0x313304…313498 Dummy {f00=0x0101, f01=0x4134, f02=» h , ( 0 X 0 X 2] X 8 Y 0 : , ( # X 0 :H* : X 2T Y 2 : 8 T:EDIO h $ C @ C 1 B ] : z H D ! !W %W KP2 OR YP _P gW^ k < w . }WL T . W> Q W , ( U Q P W W
0x313498…31362c Dummy {f00=0x0101, f01=0x0190, f02=» > @ IDENT T:GETF P,REL=11.0,810128,870136941100 T:GETF T:GTIT T:GTIP F T:GETF h T:PRDY | , ( @ X +! U 9K Y ( Y T:TABC T:TABN T:GTIT ( T:GRFC
0x31362c…3137c0 Dummy {f00=0x0101, f01=0x405a, f02=» 0 p W 6 2 : ! ( U ! 0 d ! D@ ! V:GTIP F T:GETF h T:PRDY | , ( @ X +! U 9K Y ( Y T:TABC T:TABN T:GTIT ( T:GRFC
0x3137c0…313954 (3, 104) Dummy {f00=0x0101, f01=0x0190, f02=» > @ IDENT T:DEDT P,REL=11.0,810827,870136941100 . * T:TABC T:TABD T:TABE T:TABN T:SCR2 F I:EVNO x I:ESKI I:EVA0 I:EBRI I:EBRB I:EBR , (
0x313954…313ae8 Dummy {f00=0x0101, f01=0x0190, f02=» z T:DSL I:RET * T:TABC , : T:TABD 0 N T:TABE 4 b , ( ! W W v , ( 5 X 0Q Y ( Y *P T:EDWI I:EVT I:EDSK ,
0x313ae8…313c7c Dummy {f00=0x0101, f01=0x0190, f02=» P X 0P V _` " P T T:LOPS , , ( & (W " P Y 0] > T:EOR n * & Y (_t " X _. X *# T ~ T:EDWF , ( *W , B 1 ,W T:SCR2 , (
0x313c7c…313e10 Dummy {f00=0x0101, f01=0x40d4, f02=» , ( ; (T W X y 6 Y ( : X (;n [@ 0 8 H D ! /W 3W ;Q ? C OP Qv P P: Vv P4 T WZ P T W N W P !P 5W =T AW ^ @ 1 ,W T:SCR2 , (
0x313e10…313fa4 Dummy {f00=0x0101, f01=0x0190, f02=» > @ IDENT T:EINP P,REL=11.0,810827,870136941100 " T:PKI T:PINP T:TKI T:TINP F T:PKI l T:PINP ~ T:GRFC I:ETAB I:EVIN , ( I P & , ( Y *T
0x313fa4…314138 Dummy {f00=0x0101, f01=0x0190, f02=»Q X &P V D ! P | T:TINP T:TKI 0 * & u $ ! P %_ : B , ( V Y " X .9H $ p , ( P & X ( " Q Y +Q R , ( " P W " U Y , " Q X . , (
0x314138…3142cc Dummy {f00=0x0101, f01=0x0190, f02=» M X (# P X # :! R W T:ENIN 0 T:ENI B * & m T @ Y (W Y , W R I:EXIT , ( Y ( : X *:h X (! , ( # P X & V L T W X , X 0 , ( P T X *
0x3142cc…314460 Dummy {f00=0x0101, f01=0x0190, f02=» , ( @ % P Y 8 & X 8 X $ , ( E@ W _ " P X ( T X & V 4 , ( c H "@T P V Y d , ( X (P X ( T:CLMI , ( P 8 Y 0 X 2P X , (
0x314460…3145f4 (3, 105) Dummy {f00=0x0101, f01=0x0190, f02=» P : : x , ( "0P $ T W %T , ( ; : : Y ( X $ Y X " Y X & H , ( [ Y X < Y > : Y : X : x , ( y X ( T X & V H " V T:SPAC X $ : H D !
0x3145f4…314788 Dummy {f00=0x0101, f01=0x4100, f02=» 3P< R H D ! 7 @ 9WZ IP< KQ SP2 aR$ cW g @ k oT$ wW W P Tb W P@ H D ! T, T @ P !P* ) -P| IWh QP [T kTF o sP6 P h Z @ < A P P V T P P #P )T -W 1T T V @ H D !
0x314788…31491c Dummy {f00=0x0101, f01=0x0190, f02=» > @ IDENT T:ENIN P,REL=11.0,810128,870136941100 1 T:ENIN T:ENI T:EVOU 1 F T:ENIN 1 f T:ENI 1 z , ( X Y " X Y $ X Y & X >W X 1 T:LOFS 1 , ( ! < Y = " 1 I:EGTB
0x31491c…314ab0 Dummy {f00=0x0101, f01=0x0190, f02=» X (P 1 n T:WRDY 2 , ( W X & V D ! P @ W X 2 , ( W Y ( : X , Y X $ Y 2 P , ( X &T Y Y Y W V $ 2 , ( :H D Y D :H Y ! P V 2 I:EVA0 2 I:EVA1 2 , (
0x314ab0…314c44 Dummy {f00=0x0101, f01=0x411a, f02=» 2 , ( Q : 2' " P T 3 I:EVA3 3 8 I:EPIC 3 J , ( mD W : N : 3 H D ! W CT IW SP a mT" }T W4 W, P W" P W W T WD 3 ( $ P W )P /W A X aP gT qW 3
0x314c44…314dd8 Dummy {f00=0x0101, f01=0x415c, f02=» > @ IDENT T:SETC P,REL=11.0,810128,870136941100 4 T:SETC T:SCUR 4 F T:SETC 4 ` T:PRDY 4 t T:GRFC 4 T:EDWI 4 T:RCTS 4 , ( H C 4 T:SCUR 4 T:WRD
0x314dd8…314f6c Dummy {f00=0x0101, f01=0x40e2, f02=» > @ IDENT T:CLMI P,REL=11.0,810128,870136941100 5 T:CLMI 5 F T:CLMI 5 X , ( "0P ' Q W ' 5 l ! Y : 5 P Q W 5 ( 5 @ 5 A2,0 PCLRM20 EQU * P SCR
0x314f6c…315100 Dummy {f00=0x0101, f01=0x0190, f02=» > @ IDENT T:ATTF P,REL=11.0,810827,870136941100 J F " T:ATTF T:DETF T:ROK T:RNOK T:RCR T:RCTS T:RTES T:GRFC T:WRDY F . * T:PRKB T:PRDY T:ADDY T:SPAC T:CHBU T:DETF T:ATTF I:EVA6 I:FFS
0x315100…315294 (3, 106) Dummy {f00=0x0102, f01=0x0190, f02=»TES : , ( Y Y Y < V E B T:RNOK < > T:GRFC @ R T:WRDY H f T:EDIO z * & ; X _ v : C C T:SPAC T:CHBU n , ( Y : H C : +
0x315294…315428 Dummy {f00=0x0102, f01=0x4080, f02=» W @ X B ; [ Z : : . ` W @ _ n W N j@ |DIO z * & ; X _ v : C C T:SPAC T:CHBU n , ( Y : H C : +
0x315428…3155bc Dummy {f00=0x0102, f01=0x0190, f02=» > @ IDENT T:LSEG P,REL=11.0,810128,870136941100 9 & " T:LOFS T:LOPS T:LSEG T:CSEG 9 F T:LSEG 9 p T:CSEG 9 , ( ( R : V E V D ' 9 , ( ! $ T ( W P 9 I:RT1 9
0x3155bc…315750 Dummy {f00=0x0102, f01=0x401a, f02=» f : @ : G P,REL=11.0,810128,870136941100 9 & " T:LOFS T:LOPS T:LSEG T:CSEG 9 F T:LSEG 9 p T:CSEG 9 , ( ( R : V E V D ' 9 , ( ! $ T ( W P 9 I:RT1 9
0x315750…3158e4 Dummy {f00=0x0102, f01=0x4146, f02=» > @ IDENT T:DC00 P,REL=11.0,810128,870136941100 ; DCREAD DCWRTE DCEXCH ; F T:FDS0 ; h DCREAD ; z T:DCR1 ; DCWRTE ; T:DCW1 ; DCEXCH ; T:DCE1 ; , ( I$
0x3158e4…315a78 Dummy {f00=0x0102, f01=0x40aa, f02=» > @ IDENT T:SWI0 P,REL=11.0,810128,870136941100 < SWITCH < F T:SWIT < X SWITCH < j @ < ~ < @ < ~ . P* CREDIT ASSEMBLER SUBROUTINE ENTRIES * . P*
0x315a78…315c0c Dummy {f00=0x0102, f01=0x40da, f02=» > @ IDENT T:TEI0 P,REL=11.0,810128,870136941100 = TESTIO ABORT = F T:TEST = ^ TESTIO = p T:ABOR = ABORT = H = = @ = . P*
0x315c0c…315da0 Dummy {f00=0x0102, f01=0x40de, f02=» > @ IDENT T:CLO0 P,REL=11.0,810128,870136941100 > SETTIM GETTIM > F T:SETT > ` SETTIM > r T:GETT > GETTIM > H > > @ > . P*
0x315da0…315f34 (3, 107) Dummy {f00=0x0102, f01=0x40a6, f02=» > @ IDENT T:DEL0 P,REL=11.0,810128,870136941100 ? DELAY ? F T:DELA ? V DELAY ? h @ ? z ? @ ? * ~ . P* CREDIT ASSEMBLER SUBROUTINE ENTRIES * . P*
0x315f34…3160c8 Dummy {f00=0x0102, f01=0x40aa, f02=» > @ IDENT T:GTI0 P,REL=11.0,810128,870136941100 @ GETTID @ F T:GETI @ X GETTID @ j @ @ ~ @ @ @ ~ . P* CREDIT ASSEMBLER SUBROUTINE ENTRIES * . P*
0x3160c8…31625c Dummy {f00=0x0102, f01=0x0190, f02=» > @ IDENT T:DC P,REL=11.0,810128,870136941100 A 6 2 T:DCRE T:DCR1 T:DCWR T:DCW1 T:DCEX T:DCE1 A F T:DCRE A T:GDSP A T:DCR1 A T:DCWR A T:DCW1 A T:EDIO A , ( @@ /
0x31625c…3163f0 Dummy {f00=0x0102, f01=0x40ca, f02=»:EVA0 A , ( 7 ' / C B , ( Q$ C B > & " k &P C & C : B n V W V 1 V B B @ B T:DCW1 A T:EDIO A , ( @@ /
0x3163f0…316584 Dummy {f00=0x0102, f01=0x40b6, f02=» > @ IDENT T:SWI P,REL=11.0,810128,870136941100 C T:SWIT C F T:SWIT C X I:RT1 C l ( C | C @ C E LEVEL P* PT:SWIT EQU * P LDK A7,0 " P SU PP,CSB,TCA GET
0x316584…316718 Dummy {f00=0x0102, f01=0x4174, f02=» > @ IDENT T:TEI P,REL=11.0,810128,870136941100 D T:TEST T:ABOR D F T:TEST D ` T:GDSP D t I:RT1 D T:ABOR D * & @ "Q V I D T:KIAA D , ( ( T
0x316718…3168ac Dummy {f00=0x0102, f01=0x4178, f02=» > @ IDENT T:CLO P,REL=11.0,810128,870136941100 E & " T:SETT T:GETT T:SETD T:GETD E F T:SETT E p I:EVA0 E I:RT1 E T:GETT E * & @ ( E T:SETD . E , (
0x3168ac…316a40 Dummy {f00=0x0102, f01=0x40d0, f02=» > @ IDENT T:DEL P,REL=11.0,810128,870136941100 F T:DELA F F T:DELA F X I:EVA0 F l I:RT1 F ~ ( $ @ ( F F @ F RY * P LDK WK1,2 NOT BINARY; SET ERROR CODE P
0x316a40…316bd4 (3, 108) Dummy {f00=0x0102, f01=0x40cc, f02=» > @ IDENT T:MSK0 P,REL=11.0,810128,870136941100 G MASK G F MASK G V I:EVA0 G h I:RT1 G z ( $ D V G G @ G TYPE? P RF(NZ) MSK010 NOT BINARY P XIF P
0x316bd4…316d68 Dummy {f00=0x0102, f01=0x0190, f02=» > @ IDENT T:SCD P,REL=11.0,810224,870136941100 T:ACTV T:PAUS T:RSTR F T:ACTV h , ( 2 ;B P J | P:BAS I:NTPB , ( ! T ( T:BAT
0x316d68…316efc Dummy {f00=0x0102, f01=0x408e, f02=» ( W V x I:RT1 y V I ( ( $ ( P0 #T + X ?W6 I X WW uW V L x@ P J | P:BAS I:NTPB , ( ! T ( T:BAT
0x316efc…317090 Dummy {f00=0x0102, f01=0x0190, f02=» > @ IDENT T:UNUS P,REL=11.0,810224,870136941100 T:UNUS F T:UNUS X , ( 2 ' >A >A 2 $ l P:MTAB , ( ! V L ;a ; R @ ( 8 , ( ? ? X Q ( V )<B
0x317090…317224 Dummy {f00=0x0102, f01=0x402a, f02=» 5RF OQ0 @ &,810224,870136941100 T:UNUS F T:UNUS X , ( 2 ' >A >A 2 $ l P:MTAB , ( ! V L ;a ; R @ ( 8 , ( ? ? X Q ( V )<B
0x317224…3173b8 Dummy {f00=0x0102, f01=0x4096, f02=» > @ IDENT T:EXIT P,REL=11.0,810128,870136941100 N T:EXIT N F T:EXIT N X ( N l N @ N KM P DATA 3 P* P END @ LDKL A6,-1 P ABL T:UERR END @ P ADR
0x3173b8…31754c Dummy {f00=0x0102, f01=0x413a, f02=» > @ IDENT T:GTCW P,REL=11.0,810128,870136941100 O GETCW O F T:GDSP O V GETCW O h I:EVA0 O z T:BINB O * & H V 0V B B O T:GTCW O I:RT1 O W
0x31754c…3176e0 Dummy {f00=0x0102, f01=0x40cc, f02=» > @ IDENT T:GTID P,REL=11.0,810128,870136941100 P T:GETI P F T:GETI P X I:EVA0 P l I:RT1 P ~ $ @ V G 9h ' P P @ P VALUE " P SC WK1,1,OP2A STORE FOR USER P SRL WK1
0x3176e0…317874 (3, 109) Dummy {f00=0x0102, f01=0x4184, f02=» > @ IDENT T:DMR P,REL=11.0,810128,870136941100 & " T:DREA T:IREA T:XREA T:IXID F T:DREA p T:REAX T:SCW2 T:IO2 T:IREA , ( $ T:XREA
0x317874…317a08 Dummy {f00=0x0102, f01=0x0190, f02=» > @ IDENT T:DMW P,REL=11.0,810128,870136941100 > : T:SWRI T:DWRI T:IWRI T:XWRI T:DREW T:CREW T:IREW F T:SWRI T:WRIX T:IO1 T:XWRI T:DWRI , ( / W
0x317a08…317b9c Dummy {f00=0x0102, f01=0x40a2, f02=» T:CREW > T:IREW L , ( 5D" / / ( M X W | @ RIX T:IO1 T:XWRI T:DWRI , ( / W
0x317b9c…317d30 Dummy {f00=0x0102, f01=0x416a, f02=» > @ IDENT T:DMDI P,REL=11.0,810128,870136941100 T:DDIS T:CDIS T:IDIS F T:DDIS h T:DSB | T:SCW2 T:IO2 T:CDIS , ( $ C <H / T:IDIS
0x317d30…317ec4 Dummy {f00=0x0102, f01=0x4162, f02=» > @ IDENT T:DMPO P,REL=11.0,810128,870136941100 T:DPOS T:IPOS F T:DPOS ` T:DSB t T:SCW2 T:GTBY T:IO2 , ( H@ C <H / T:IPOS T:WRIX
0x317ec4…318058 Dummy {f00=0x0102, f01=0x0190, f02=» > @ IDENT T:DCC P,REL=11.0,810128,870136941100 X F B T:COPE T:COP1 T:CCLO T:CCL1 T:CCL2 T:ACON T:ACO1 T:ACO2 X F F B T:ACO3 T:PCON T:PCO1 T:PCO2 T:DISC T:DIS1 T:DIS2 T:DIS3 X T:DIS4 T:OPT X T:COPE X
0x318058…3181ec Dummy {f00=0x0102, f01=0x018e, f02=» T:CCLO " X T:CCL1 & Y T:CCL2 * Y & , ( W W /" C Y : T:ACON P Y j T:ACO1 T Y ~ , ( 7 C C P P _2 W Y T:ACO2 X Y T:ACO3 Y T:PCON f Y T:PCO1
0x3181ec…318380 Dummy {f00=0x0102, f01=0x0190, f02=» T:DIS3 Z T:DIS4 Z , ( s /'W W W W W Z , T:STCW Z , ( // C C C P P Z n * & C P P Z T:OPT Z I:EVA0 Z &<H
0x318380…318514 (3, 110) Dummy {f00=0x0103, f01=0x400c, f02=» Z @ [ 3 Z T:DIS4 Z , ( s /'W W W W W Z , T:STCW Z , ( // C C C P P Z n * & C P P Z T:OPT Z I:EVA0 Z &<H
0x318514…3186a8 Dummy {f00=0x0103, f01=0x0190, f02=» > @ IDENT T:DCR P,REL=11.0,810128,870136941100 & " T:RECE T:REC1 T:AREC T:ARE1 F T:RECE p T:REC1 T:REAX T:OPT T:IO2 , ( W C C P T:AREC
0x3186a8…31883c Dummy {f00=0x0103, f01=0x403a, f02=» v W P #W 3P ] D ] $@ ] 61100 & " T:RECE T:REC1 T:AREC T:ARE1 F T:RECE p T:REC1 T:REAX T:OPT T:IO2 , ( W C C P T:AREC
0x31883c…3189d0 Dummy {f00=0x0103, f01=0x0190, f02=» > @ IDENT T:DCS P,REL=11.0,810128,870136941100 ^ & " T:SEND T:SEN1 T:ASEN T:ASE1 ^ F T:SEND ^ p T:SEN1 ^ T:WRIX ^ T:OPT ^ * & W / C C P ^ T:IO1 ^ T:ASEN " ^
0x3189d0…318b64 Dummy {f00=0x0103, f01=0x403e, f02=» _* ^ t W P %W 7P _ H _ (@ _ : ^ & " T:SEND T:SEN1 T:ASEN T:ASE1 ^ F T:SEND ^ p T:SEN1 ^ T:WRIX ^ T:OPT ^ * & W / C C P ^ T:IO1 ^ T:ASEN " ^
0x318b64…318cf8 Dummy {f00=0x0103, f01=0x018e, f02=» > @ IDENT T:IO P,REL=11.0,810803,870136941100 J F " T:WRIT T:READ T:SREA T:KI T:NKI T:EDWR T:DSC0 T:DSC1 T:DSC2 F H D ! T:EDWE T:EDWF T:EDWI T:EDIO T:XSTA T:WAIT T:IO1 T:IO2 T:IO3 D @ T:IO5 T:FDS0 T:FDSP T:GDSP T:KIPR
0x318cf8…318e8c Dummy {f00=0x0103, f01=0x0190, f02=» p T:KI T:NKI T:WRIT , T:WRIL @ T:LWRI T , ( W / h T:WRIX " T:WRIO & I:EVA0 , ( ! _ C P <H T:S
0x318e8c…319020 Dummy {f00=0x0103, f01=0x0190, f02=» V C / <H : C T:DSC1 " , ( } C W C 9HR 6 T:DSC2 f , ( ' W 781"&$ 39#$;< '()*+,-! z T:XSTA , ( P _J T:WAIT T:M
0x319020…3191b4 (3, 111) Dummy {f00=0x0103, f01=0x0190, f02=» ( v , ( 7 0 W T:IO1 F T:IO2 ` X T:IO3 d j T:IO5 p | T:IORE t , ( W : 1W C C ( ' P T:GCW2 , ( w @ P V ,V W B
0x3191b4…319348 Dummy {f00=0x0103, f01=0x0190, f02=» I:EDW , ( B P B P B 5 : T:EDWE > T:EDWF R , ( @ C C C B f T:EDWI , ( B P C : V I C T:EDIO , ( B : (
0x319348…3194dc Dummy {f00=0x0103, f01=0x018e, f02=» & R r , ( i V C : B T:FDS0 B , ( T T T V : 2 V T:GDSP P:MTAB I:EVTO * & ' W 2 6 2 @ & " T # ' ?D I:FML , ( @
0x3194dc…319670 Dummy {f00=0x0103, f01=0x0190, f02=» , ( : _: L C L C T:DSB , 8 T:FDSP 6 J , ( B C : : ^ T:GTBY P , ( ? : C : : T:SCW2 T:DSCX n I:EVA2 ,
0x319670…319804 Dummy {f00=0x0103, f01=0x414e, f02=» : H D !~ W 6 d " % , - @ 1P G L K ` O , S @ _P eV u , y P H D !V W R W @ P W W| P [W sP0 H D ! w }P& V W P z P P P )P - z @ < 9 , = @ cR iV
0x319804…319998 Dummy {f00=0x0103, f01=0x0190, f02=» > @ IDENT T:CW P,REL=11.0,810615,870136941100 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
0x319998…319b2c Dummy {f00=0x0103, f01=0x0190, f02=» X R _ S W T:GTCW , ( 4 _T :#0 T B 'W B B 4 T:BINB d , ( " : x , ( P P L R R , ( _ R _ # Q R , (
0x319b2c…319cc0 Dummy {f00=0x0103, f01=0x0190, f02=» h , ( _ B@ ' d w5 1 T:KIAA 8 T:KIAC L T:GCW2 ` , ( #0 T t T:SCW2 , ( @ B ' : B B : V C , ( @ P C #0 T &
0x319cc0…319e54 (3, 112) Dummy {f00=0x0103, f01=0x404e, f02=» X R R Q P 'P 7P GR T P T 8@ J T:KIAC L T:GCW2 ` , ( #0 T t T:SCW2 , ( @ B ' : B B : V C , ( @ P C #0 T &
0x319e54…319fe8 Dummy {f00=0x0103, f01=0x40d0, f02=» > @ IDENT T:LEN P,REL=11.0,810128,870136941100 l GETLEN l F GETLEN l X I:EVA0 l l I:RT1 l ~ ( $ A #03 1 l l @ l XIF * % LDR A4,OP2A SAVE ADDR. TO RETURNITEM
0x319fe8…31a17c Dummy {f00=0x0103, f01=0x0190, f02=» > @ IDENT T:ADIT P,REL=11.0,810128,870136941100 m & " T:RREA T:RRE1 T:RWRI T:RWR1 m F T:RREA m p T:DSB m T:RRE1 m I:EVA0 m T:STCW m , ( A &P C m T:IO2 m
0x31a17c…31a310 Dummy {f00=0x0103, f01=0x4034, f02=» : m t 6 + 6 n F n @ n 0
0x31a310…31a4a4 Dummy {f00=0x0103, f01=0x0190, f02=» > @ IDENT T:KIA P,REL=11.0,810128,870136941100 o T:KIA T:NKIA o F T:KIA o ^ T:NKIA o p T:ABUF o T:KIPR o , ( W 6 V :a o , ( ' ( ( o
0x31a4a4…31a638 Dummy {f00=0x0103, f01=0x0190, f02=» y K V K V 6V ( - o , ( _ : J 7 J V W J p , , ( :A V 6V $ - _ * p , ( + : D T E D :A D p , ( ;A 9A Q 5 U _ 5 p T:KIAA p T:KIAC
0x31a638…31a7cc Dummy {f00=0x0103, f01=0x40c8, f02=» D V p p , ( @ m D V ( 2 C C q _, q @ H D !r W ^ - 2 IT MP Y V V T> Q U ! R /P 7P ?W q R [R ]P q q @ q 9A Q 5 U _ 5 p T:KIAA p T:KIAC
0x31a7cc…31a960 Dummy {f00=0x0103, f01=0x4098, f02=» > @ IDENT T:ABUF P,REL=11.0,810128,870136941100 r T:ABUF r F M r X T:ABUF r n r @ r IN T:ABUF f & !T:ABUF RES SIZE KIA/NKIA SAVEAREA P EJECT T:ABUF END @
0x31a960…31aaf4 (3, 113) Dummy {f00=0x0103, f01=0x414a, f02=» > @ IDENT WRITEL P,REL=11.0,810128,870136941100 s WRITEL s F WRITEL s X T:FDS0 s l T:DSM s ~ I:EVA0 s , ( H / C s T:IO2 s , ( @ &P C & C
0x31aaf4…31ac88 Dummy {f00=0x0103, f01=0x0190, f02=» > @ IDENT I:NTP P,REL=11.0,810803,870136941100 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
0x31ac88…31ae1c Dummy {f00=0x0103, f01=0x0190, f02=»:DLT I:MCH I:XCP I:EDS , , ( / < I:TRC l I:RST D ~ T:CSEG I:NTPA H I:NTPB H P:MTAB , ( A V 7 @ " ! P
0x31ae1c…31afb0 Dummy {f00=0x0103, f01=0x0190, f02=» 9c D 9a1 P I:EVA2 $ * & $ & Q W 6 I:RT2 d I:RT1 v I:RT0 , ( :aW _J( 2 P T:BAT , ( V W _ 2 # ;B V T ,
0x31afb0…31b144 Dummy {f00=0x0103, f01=0x0190, f02=» 8 j T:PAT , ( M ^n D . V @ 2 ! 9B V T , ( m@ *W V P D $ V 6 V J , ( % V E W 2 % z T:CAT , ( ^ 6 E 7_ 2 # L , ( , $ 2#
0x31b144…31b2d8 Dummy {f00=0x0103, f01=0x4170, f02=» W F z I:EVB , ( P E . V & * c H L 'W 'W '_8 Z H D ! H L D ! # % ' ) + - = l ~ H D ! ? h A r C t [P eP q r T P Q W W P W8 T
0x31b2d8…31b46c Dummy {f00=0x0103, f01=0x0190, f02=» > @ IDENT I:EVA P,REL=11.0,810910,870136941100 J F " I:EVA0 I:EVA1 I:EVA2 I:EVA3 I:EVA5 I:EVA6 I:EVA7 I:EVB I:EVI F I:FML I:FML2 I:EVTO P:MTAB , ( :l:d:h I:EVA2
0x31b46c…31b600 Dummy {f00=0x0103, f01=0x018e, f02=» 6 2 n , ( 9 # W @ $ E " T ; [ , ( W # :H 2 T Z L > , ( @ w L D V W # n , ( L D V $ W D V I:EVA0 , ( @ L , W 6 2 W "
0x31b600…31b794 (3, 114) Dummy {f00=0x0104, f01=0x0190, f02=» , ( Z Z , ( 3 : R ; 8 , ( S 6 : F _v :B , h , ( s (V ; H [ [ [ , ( z ;AV Z H # , ( ;
0x31b794…31b928 Dummy {f00=0x0104, f01=0x0190, f02=» & @ $ ! P , ( 1 [ 6 [ Z 7 . Z ( I:FML ^ X I:FML2 n j , ( Q 7 : T # ( ~ I:EVTO , ( H q : " T # :A ( , ( @ @ & " P !
0x31b928…31babc Dummy {f00=0x0104, f01=0x4110, f02=» : 6 2 W v , ( " # ^;b ; : ;f" #?_" F H D ! #W 'W -P 1W = ?W4 KT> [ ^ kT V, W ^ V W W f D @ W$ P& Pd ^ Wv yVv V$ P P P R W&
0x31babc…31bc50 Dummy {f00=0x0104, f01=0x0190, f02=» > @ IDENT I:ADS P,REL=11.0,810128,870136941100 ~ I:ADD I:SUB ~ F I:ADD ~ I:SUB ~ n , ( W " T & T + : ~ I:CPA ~ , ( ! * & !@P `1` P Q ~ " ? [
0x31bc50…31bde4 Dummy {f00=0x0104, f01=0x0190, f02=» $ P T ~ v , ( R R ` ; <( , ( Q P # W " <! =# T W = Z F , ( P _ V ^< `_@ v , ( R Q <# =_ P :" P * U , ( 5 P 1`! T "# 9e! # K
0x31bde4…31bf78 Dummy {f00=0x0104, f01=0x4008, f02=»@ T ~ v , ( R R ` ; <( , ( Q P # W " <! =# T W = Z F , ( P _ V ^< `_@ v , ( R Q <# =_ P :" P * U , ( 5 P 1`! T "# 9e! # K
0x31bf78…31c10c Dummy {f00=0x0104, f01=0x4166, f02=» > @ IDENT I:CMP P,REL=11.0,810128,870136941100 I:CMP F I:CMP V , ( P " T * & : * & h I:CPA , ( ! !`P :J +_ +Q , ( A _0 , T T XD W 1
0x31c10c…31c2a0 Dummy {f00=0x0104, f01=0x4172, f02=» > @ IDENT I:CPA P,REL=11.0,810128,870136941100 I:CPA F I:CPA V * & R W h , ( ( V W Q P W ! W V , ( ? P , V W Q P W $ W V * & _ P
0x31c2a0…31c434 (3, 115) Dummy {f00=0x0104, f01=0x0190, f02=» > @ IDENT I:MOV P,REL=11.0,810910,870136941100 " I:MOV I:MVC I:MBTD I:MDTB F I:MOV l I:MVC ~ , ( $0#0;b P P P , ( ! 0 - P _ 4 , ( A V W Q P )
0x31c434…31c5c8 Dummy {f00=0x0104, f01=0x0190, f02=» , ( # ; [ I:MDTB 4 , ( _ ' d V W V H , ( 4! P < X 4 x , ( 9d $ & ! R + : , ( ! V W R 4 0R Y 7 Y& , (
0x31c5c8…31c75c Dummy {f00=0x0104, f01=0x414a, f02=» h , ( Y " W , ( Q V V 7 Y P _& & Q 8 , ( 9d! )0 + P 7 Y Z $ h _ : H D ! t P Pd P /PN IQ KP SP YP _P qP wT P Q 4 0 R
0x31c75c…31c8f0 Dummy {f00=0x0104, f01=0x4140, f02=» > @ IDENT I:MMOV P,REL=11.0,810128,870136941100 I:MMOV F I:MMOV X I:EVA2 l , ( 2' ~ I:EVA0 , ( [ [ Z I:MOV & " =
0x31c8f0…31ca84 Dummy {f00=0x0104, f01=0x0190, f02=» > @ IDENT I:MUL P,REL=11.0,810128,870136941100 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
0x31ca84…31cc18 Dummy {f00=0x0104, 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
0x31cc18…31cdac Dummy {f00=0x0104, 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
0x31cdac…31cf40 Dummy {f00=0x0104, f01=0x0190, f02=» > @ IDENT I:DIV P,REL=11.0,810128,870136941100 I:DIV I:SH1R F I:DIV ^ , ( " T *V &V p ! P = , ( ' ;@ R P W ;a , ( G =a P " R & R
0x31cf40…31d0d4 (3, 116) Dummy {f00=0x0104, f01=0x0190, f02=» [ [ x I:MOV I:NTFA , ( &! P 0 I:SUB ` , ( z " ! ! p , ( R 2` { z " P ! R 2` { 1 I:CPA , ( ! { [ Z
0x31d0d4…31d268 Dummy {f00=0x0104, f01=0x0190, f02=» { R [ _ , ( Z ! Z $ & * & P Z %_N [ Q V * & R [ Z { , ( z 9e! W Z I:SH1R , ( : V I
0x31d268…31d3fc Dummy {f00=0x0104, 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
0x31d3fc…31d590 Dummy {f00=0x0104, f01=0x40da, f02=» > @ IDENT I:NTF P,REL=11.0,810128,870136941100 I:NTFA F I:NTFA X , ( Z H D & H l $ ! D % [ ( 8 @ P ABR* WK2 P P END ,PS
0x31d590…31d724 Dummy {f00=0x0104, f01=0x0190, f02=» > @ IDENT I:EPIC P,REL=11.0,810625,870136941100 I:EPIC F I:EPIC X I:EVA0 l : + ~ [ [ < , ( ! !AAP !TTT W !**T * [ !FF A
0x31d724…31d8b8 Dummy {f00=0x0104, 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
0x31d8b8…31da4c Dummy {f00=0x0104, f01=0x4120, f02=» } !++P !-- z ;$# + ^$ _* $ T tX. PT*AXYZ9 . H D ! ` %P +T /W 5T AP GT KW OR S P Wn W8 Wf V H D ! T& W, P T W F W@ P U T P W R( R P U ; ?U kP
0x31da4c…31dbe0 Dummy {f00=0x0104, f01=0x0190, f02=» > @ IDENT I:EDTE P,REL=11.0,810128,870136941100 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 , ( @
0x31dbe0…31dd74 (3, 117) Dummy {f00=0x0104, 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
0x31dd74…31df08 Dummy {f00=0x0104, f01=0x40ea, f02=» > @ IDENT I:EDS P,REL=11.0,810128,870136941100 I:EDS F I:EDS V I:EVS2 h I:ED1 z , ( : { : & @ P2E,OP1E END OF MAIN STRING
0x31df08…31e09c Dummy {f00=0x0104, f01=0x0190, f02=» > @ IDENT I:STR P,REL=11.0,810128,870136941100 $ I:INS I:DLT I:MCH I:CPY I:XCP F I:DLT n I:EVS1 I:MCH , ( @ P 9 _ , ( @ [ , (
0x31e09c…31e230 Dummy {f00=0x0104, 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 _. :
0x31e230…31e3c4 Dummy {f00=0x0104, 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 _. :
0x31e3c4…31e558 Dummy {f00=0x0104, f01=0x4152, f02=» > @ IDENT I:EVS P,REL=11.0,810128,870136941100 I:EVS1 I:EVS2 F I:EVA0 ` , ( A jP kT r I:EVS1 8 , ( T : & 9! " : $ : I:EVA2 I:EVS2
0x31e558…31e6ec Dummy {f00=0x0104, f01=0x0190, f02=» > @ IDENT STRIX P,REL=11.0,810128,870136941100 STRIX STROUX USRFMT F I:EVNO f I:ESKI x I:EVA0 I:EBRI I:EBRB I:EBR , ( I:ECW
0x31e6ec…31e880 Dummy {f00=0x0104, f01=0x0190, f02=» STRIN2 USRFLD STROUX . , STRIX 2 @ USRFMT 6 R , ( # W W f T:GRFC T:STEV , ( 7! Y * & Y + , ( Q 8 & Y 0 4 y 4
0x31e880…31ea14 (3, 118) Dummy {f00=0x0105, f01=0x0190, f02=»VT I:EDSK * & " $ X <' X X I:RT1 J I:EVIN Z , ( & x 4 X 2P y 6 ( l T:EVOU , ( HH * , , , , ( X +! Q P P P y 4 x 4 X
0x31ea14…31eba8 Dummy {f00=0x0105, f01=0x4022, f02=» R$ ` B @ " $ X <' X X I:RT1 J I:EVIN Z , ( & x 4 X 2P y 6 ( l T:EVOU , ( HH * , , , , ( X +! Q P P P y 4 x 4 X
0x31eba8…31ed3c Dummy {f00=0x0105, f01=0x018e, f02=» > @ IDENT STRIN2 P,REL=11.0,810128,870136941100 STRIN2 F STRIN2 X , ( X x & Y " X R W l I:EXIT , ( ! V P _ y 6 : Y I:EVA0 T:CLMI , ( ?
0x31ed3c…31eed0 Dummy {f00=0x0105, f01=0x4150, f02=» , ( W V R W V % _ I:MOV 4 * & [ " D $ D D T:GRFC r * & Z P Z % z " * { $ X $ X y & : H D ! R W !V %P SP ]P* uT yW }R< V8
0x31eed0…31f064 Dummy {f00=0x0105, f01=0x0190, f02=» > @ IDENT STROU2 P,REL=11.0,810128,870136941100 STROU2 F STROU2 X I:EVA0 l , ( X x & Y " !0P <! ~ , ( T T W < X ! P , ( ? ?A W ?AW <! P
0x31f064…31f1f8 Dummy {f00=0x0105, f01=0x408a, f02=» I:EXIT " @ y $ : y 6 : 8 4 P6 !T$ 'T +W ;P EW MW WP mR qW uV* P 8 t@
0x31f1f8…31f38c Dummy {f00=0x0105, f01=0x4094, f02=» > @ IDENT USRFLD P,REL=11.0,810128,870136941100 USRFLD F USRFLD X : l ~@ E P=IDIOT4 * HMES ILLEGAL PARAMETER COMBINATION !!! * HMES FOLLOWING COMBINATIONS ARE VALID: " HMES 1
0x31f38c…31f520 Dummy {f00=0x0105, f01=0x0190, f02=» > @ IDENT T:DM P,REL=11.0,810827,870136941100 F B T:OPEN T:CLOS T:DCLO T:COMM T:PCOM T:ROLL T:RSTA T:OPCH F T:IXCH T:STCH T:OPEN T:DSB , ( @ 2 2 ! <e T:WRIO
0x31f520…31f6b4 (3, 119) Dummy {f00=0x0105, f01=0x0190, f02=» T:DCLO Z T:COMM f I:EVA0 , , ( Y <H _ ( > I:RT1 n T:PCOM ~ T:GTBY * & u@ R ' T:GDSP , ( &
0x31f6b4…31f848 Dummy {f00=0x0105, f01=0x40bc, f02=» l T:SCW2 T:IO3 T:OPCH , T:STCH @ T:IXCH T " @ C / h ;T {R R @ T:GDSP , ( &
0x31f848…31f9dc Dummy {f00=0x0105, f01=0x0190, f02=» > @ IDENT T:USE P,REL=11.0,810224,870136941100 T:USE T:UERR T:UER F T:USE d I:EVA0 v * & 2 & >A >A 2 $ P:MTAB , ( & V D 9a 9 V , ( =D @ W
0x31f9dc…31fb70 Dummy {f00=0x0105, f01=0x0190, f02=»_ X @ 9 X ( R , ( 9 8 ? X ( , ( Q , V ( X , ( R - 4T V 5 , ( ( R W V P W U V T:UERR T I:RT0
0x31fb70…31fd04 Dummy {f00=0x0105, f01=0x4058, f02=»R R< V R Q" Rf T #R< %W, n +P& /W$ IT * f B@ T Q , V ( X , ( R - 4T V 5 , ( ( R W V P W U V T:UERR T I:RT0
0x31fd04…31fe98 Dummy {f00=0x0105, f01=0x0190, f02=» B @ IDENT KEYB REL 11.0 DK 830113 NJ 870150541100 J F " KBINP KBINP2 READKB READK2 RESKB LMP1ON LMP1OF LMP2ON LMP2OF J F B LMP3ON LMP3OF LMP4ON LMP4OF LMP5ON LMP5OF LMP6ON LMP6OF H D ! RDHOME COPY ERRORdTAB CRDOWN ICV
0x31fe98…32002c Dummy {f00=0x0105, f01=0x0190, f02=» N ! P T R Q DCABOR ! $ , ( A R O T N P ! 6 READKB v ! f , ( _@ N W W : ! z READK2 ! , ( } C C ( : C C ! RESKB ! ICVRE
0x32002c…3201c0 Dummy {f00=0x0105, f01=0x0190, f02=» ! , ( @ O W @ O " P : " ICREAD " 8 , ( C ( : C C C ( " L ICWRT " | ERROR 4 " , ( : C C C ( : O " SOUND " LMP1ON D " LMP1OF H "
0x3201c0…320354 (3, 120) Dummy {f00=0x0105, f01=0x0190, f02=»N " LMP4OF ` # LMP5ON d # LMP5OF h # 4 LMP6ON p # H LMP6OF t # , ( [ W W W W W W W W # p , ( { W W W C A C ( # , ( @ C ( : # , (
0x320354…3204e8 Dummy {f00=0x0105, f01=0x018e, f02=» # , ( ; $ 0 , ( [ $ ` , ( { $ , ( $ , (
0x3204e8…32067c Dummy {f00=0x0105, f01=0x0190, f02=» INSMOD % STOVDU % , ( T N P ' T ! T % ( WCHAR % X POSUNP % h , ( 7I W 4 : % z STOINF % ATMASB % DISCHA % , ( O P
0x32067c…320810 Dummy {f00=0x0105, f01=0x0190, f02=» P P V P % , ( @ ' P V ' P & $ , ( W U & T |TAB & ATMASF & , ( D : P & , ( ' P W U & , (
0x320810…3209a4 Dummy {f00=0x0105, f01=0x0190, f02=» W & x RDHOME ' , ( " : P ' , , ( @B ! R W ' * & ' P W : ' , ( P ' T P ' , ( .
0x3209a4…320b38 Dummy {f00=0x0105, f01=0x0190, f02=» ERASUP ' * & +D : T W ( , ( C " : O : ( > * & ] P Z P P ' T . ( n , ( { U ( SAVE1 ( , ( (
0x320b38…320ccc Dummy {f00=0x0105, f01=0x0190, f02=» : : 0 ( z , ( 0 0 : H P ) DISCON ) J CONCT ) * & @$ % X ( O T DW L ) l CHKSTA ) COPY H ) , ( A * , : N @ T N P ! 0 ) , ( ] 9B V L !
0x320ccc…320e60 Dummy {f00=0x0105, f01=0x0190, f02=» L L $ . O W O ) , ( & P T ," X * . , ( 9HR !VV H_ V _$ ,9H L * ^ TRPF * TRPA * * & O : ' T 0 : _ T * , ( 3 2 : %W >W , T 2 *
0x320e60…320ff4 (3, 121) Dummy {f00=0x0105, f01=0x0190, f02=» T 0 : W O * | , ( 0R T W T W T W + , ( O 1R V W O 0R V W + L , ( O 0R V W O W 4 : + | : + H D ! Rd TZ TR +P 1T> 7R8 =Q2 ER M t UT ]P iW m oW s + H
0x320ff4…321188 Dummy {f00=0x0105, f01=0x0190, f02=» + V H D ! , H D ! , ^ H D ! , H D ! ! #
0x321188…32131c Dummy {f00=0x0105, f01=0x0190, f02=» ] _ a c e g i k J m J o J q J s u w B y { , H D ! } 0 N T H - J H D ! * N : > B - H D ! L L L L L L L
0x32131c…3214b0 Dummy {f00=0x0105, f01=0x0190, f02=»T& #P -T 1T CW U n _P o v q s u yV, - z H D ! W& R W R W V PD P V P P" V P W U P" . 6 H D ! P +W 3U OR [P* eV qP sW wV W P( R W P W P2 . H D ! T& P" W W R 9T ?W gP, kPd qT^ U W * 3
0x3214b0…321644 Dummy {f00=0x0105, f01=0x4070, f02=» WH T W> T@ . f 4 0 W4 R2 V. W R" V W R V W W / " / Z@ / lW U P" . 6 H D ! P +W 3U OR [P* eV qP sW wV W P( R W P W P2 . H D ! T& P" W W R 9T ?W gP, kPd qT^ U W * 3
0x321644…3217d8 Dummy {f00=0x0105, f01=0x0190, f02=» > @ IDENT DCBSC REL 11.0 83-11-15 870150541100 H D ! DCINP TSTSTA SETSTA OPEN CONCT DISCON SETTYM TSTMES DCABOR F 8 4 TRPA TRPF DCOFLN CHKSTA DCWRIT READW RDSTAT DCINP GETBUF RELBUF , (
0x3217d8…32196c Dummy {f00=0x0105, f01=0x0190, f02=»F OPEN P , ( 9 ! P " O : , ( W V L C ( B R T L CONCT | , ( w L _ : V N P , ( .! S C C L C DISCON , (
0x32196c…321b00 Dummy {f00=0x0105, f01=0x0190, f02=»T _ : N P C DCWRIT 2 ( , ( C ( B ![P W : < , ( 3 N P O ( l ERROR , ( S B ![P N ! O RESKB TSTMES z , ( q
0x321b00…321c94 (3, 122) Dummy {f00=0x0106, f01=0x0190, f02=» : N P C ( B RDSTAT ( DCABOR < CHKSTA P , ( : N P ( T O : d LMP1ON DCOFLN TRPA PAID , ( @ " " T W : :
0x321c94…321e28 Dummy {f00=0x0106, f01=0x40aa, f02=» : H D ! D P W 3P =P M mR qT P T P %P ) -W ;P , ( @ [P c P P P P T T W d 0 @ COFLN TRPA PAID , ( @ " " T W : :
0x321e28…321fbc Dummy {f00=0x0106, f01=0x0190, f02=» > @ IDENT T:REWR P,REL=11.0,810827,870136941100 4 0 T:REWR T:SCUW T:CLRD T:IOWR T:CASP T:SCW F T:IOWR ~ T:SCW T:CHBU , ( C ( C : T:SCUW $ T:CLRD 6
0x321fbc…322150 Dummy {f00=0x0106, f01=0x018e, f02=» T:CASP ^ T:LOFS , ( ] @_^ ( X D * I:EVA3 Z , ( { D : K + Q 2 P P l I:EPIC T:LOPS , ( H ( B I:EVA0 I:E
0x322150…3222e4 Dummy {f00=0x0106, f01=0x401a, f02=» @ T:LOFS , ( ] @_^ ( X D * I:EVA3 Z , ( { D : K + Q 2 P P l I:EPIC T:LOPS , ( H ( B I:EVA0 I:E
0x3222e4…322478 Dummy {f00=0x0106, f01=0x0190, f02=» > @ IDENT T:ENLI P,REL=11.0,810827,870136941100 T:DNL T:DSL T:ECW T:EOR F I:EVNO h I:ECPY z I:EPIC I:ETXT I:ETAB I:EBRI I:EBRB I:EBR * &
0x322478…32260c Dummy {f00=0x0106, f01=0x0190, f02=» T I:EXPY . I:RET @ I:ATTR P T:DSL , b T:GRFC t T:DNL : , ( % @ " $ Y . Y ,W , ( ;@ $ Y . X ( X ." P X 0R T , ( @ Y K
0x32260c…3227a0 Dummy {f00=0x0106, f01=0x0190, f02=»:ENL I:ESL , ( *_ ,W . X . X 2Q I:ECTR L , ( Y *T 0 : " P X 0U X * ^ , ( # P P T " T : T:ENIN T:ECW T:EOR , ( @ Y . 2
0x3227a0…322934 (3, 123) Dummy {f00=0x0106, f01=0x4086, f02=» : # , 9W OPj UR WT eT6 mP( }Q W W QH T2 , ( P$ U P P T T %T -T 3W @ > p@ ^ , ( # P P T " T : T:ENIN T:ECW T:EOR , ( @ Y . 2
0x322934…322ac8 Dummy {f00=0x0106, f01=0x0190, f02=» > @ IDENT I:EDT P,REL=11.0,810827,870136941100 F B I:EDT I:EDW I:ED1 I:EDSK I:EVT I:ETAB I:EXIT I:ETXT I:ECPY F F B I:ECTR I:ESL I:ENL I:ENL1 I:EOR I:ECW I:ECWC I:EFIL I:EFLA * & I:SCB I:FFSN I:EXPY I:RET I:ATTR , (
0x322ac8…322c5c Dummy {f00=0x0106, f01=0x0190, f02=»:EVA2 I:EVA5 I:EVB I:EGTB 0 I:EVI B I:EVA3 R I:EVA0 d * & AUT v I:EVNO I:EPIC I:ESKI I:EBRI I:EBRB I:EBR
0x322c5c…322df0 Dummy {f00=0x0106, f01=0x0190, f02=» I:EDSK ~ , ( { 6 K K I:EDT D I:ED1 V I:EDW h , ( K K V K : z I:EVA6 , ( R B " V , ( V Z P
0x322df0…322f84 Dummy {f00=0x0106, f01=0x0190, f02=» T:LSEG , ( 7 _Z Z [ Z P I:RET r B , ( W@ $ [ V 7_ T I:EXIT x P:MTAB * & u W Z @ " &! P , ( $ Z 7 Z Z P $
0x322f84…323118 Dummy {f00=0x0106, f01=0x0190, f02=»:ETAB , ( J P v I < : J I:ECPY @ I:ETXT ( T I:EXPY ( h , ( Q : P 4 ! T _ | I:ATTR : I:ECTR < I:ESL F , ( ) P 4 W K
0x323118…3232ac Dummy {f00=0x0106, f01=0x0190, f02=» I:ECW p T:EDWE I:ECWC z $ I:EFIL 8 , ( i @X *W X & , J K : L I:SCB | V : 1 H D ! U Y ( [ e f g x i p k 8 m P s u F y ( { r } : @ H D ! @
0x3232ac…323440 Dummy {f00=0x0106, f01=0x4012, f02=» @
0x323440…3235d4 (3, 124) Dummy {f00=0x0106, f01=0x4146, f02=» > @ IDENT T:DCOM P,REL=11.0,810910,870136941100 DCREAD DCWRTE DCEXCH F T:FDS0 h DCREAD z T:DCR1 DCWRTE T:DCW1 DCEXCH T:DCE1 , ( I$
0x3235d4…323768 Dummy {f00=0x0106, f01=0x0190, f02=» B @ IDENT PRINT REL 11.1 83-11-21 DK 870150541110 PRINT COPP J PRINT ` , ( TT LL GG CC # # # # (@P r OPEN CONCT SETTYM * & ! R ( , ( ;
0x323768…3238fc Dummy {f00=0x0106, f01=0x0190, f02=» N t TSTMES , ( @ X O _B N P N T O & , ( N T O : O V , ( T O W T O O GETBUF READW , ( W : P
0x3238fc…323a90 Dummy {f00=0x0106, f01=0x0190, f02=»CSET ICREAD , ( K : ICWRT N , ( g N D P ^ COPP ATMASB , ( : O ( : C , ( O N !8 ! =d T
0x323a90…323c24 Dummy {f00=0x0106, f01=0x018e, f02=» T r , ( ! R 9AR ! 1 P W # , ( A ! P N _r P B , ( a @ P T P r , ( N 8P $ P 2( _ , ( @ O : , (
0x323c24…323db8 Dummy {f00=0x0106, f01=0x018e, f02=» , ( ! T _ O _& O : , ( A T O : ! 1 P N 4 RFMDUP d , ( a !0T 0 : @ : v , ( T : N !010T N !@P , ( P T W P , (
0x323db8…323f4c Dummy {f00=0x0106, f01=0x0190, f02=» f , ( N Q N C N C . L1T , ( ? W ( O W O P 8 , ( _ c C O _^ d ( h , ( "R ( W ( B , ( T C W N " 0:B V COMINI
0x323f4c…3240e0 Dummy {f00=0x0106, f01=0x0190, f02=»( D O N | , ( H O O : ( B , ( ; P N " 0:B V M : L , ( Q@ [ @ %P @ @ P _ N | , ( { $ : . L P W L1Q N I : H D ! ! 'R6 3 * ]
0x3240e0…324274 (3, 125) Dummy {f00=0x0106, f01=0x018e, f02=» T P6 R W, R W Z T #R, 'R2 /P 5W GP ]P a H D !2 iP oT w { P( P * P : : J H D ! V V V V p p p p x P W T6 R P H D ! %T = AT I ]P eT T
0x324274…324408 Dummy {f00=0x0106, f01=0x401e, f02=» z @ Z T #R, 'R2 /P 5W GP ]P a H D !2 iP oT w { P( P * P : : J H D ! V V V V p p p p x P W T6 R P H D ! %T = AT I ]P eT T
0x324408…32459c Dummy {f00=0x0106, f01=0x0190, f02=» B @ IDENT KEYB1 REL 11.0 DK 831110 NJ 870150541100 J F " KBINP KBINP2 READKB READK2 RESKB LMP1ON LMP1OF LMP2ON LMP2OF J F B LMP3ON LMP3OF LMP4ON LMP4OF LMP5ON LMP5OF LMP6ON LMP6OF H D ! RDHOME COPY ERRORdTAB CRDOWN ICV
0x32459c…324730 Dummy {f00=0x0106, f01=0x0190, f02=» b " N ! P T R DCABOR $ , ( A Q R O T 6 READKB | f , ( _ N P N W W : z READK2 , ( } C C ( : C RESKB ICVRE
0x324730…3248c4 Dummy {f00=0x0106, f01=0x0190, f02=» @ O W @ O ICSET & ICREAD 8 , ( " P : C ( : C C C L ICWRT & | ERROR : , ( ( : C C C ( : SOUND LMP1ON J LMP1OF N
0x3248c4…324a58 Dummy {f00=0x0106, f01=0x0190, f02=»N b LMP4OF f LMP5ON j LMP5OF n 4 LMP6ON v H , ( [ W W W W W W W W LMP6OF z , ( { W W W W C A C , ( ( @ C ( : , (
0x324a58…324bec Dummy {f00=0x0106, f01=0x0190, f02=» , ( ; 0 , ( [ ` , ( { , ( , (
0x324bec…324d80 Dummy {f00=0x0106, f01=0x0190, f02=» INSMOD , ( P T N P ' T STOVDU B WCHAR T POSUNP d , ( 5 ! T W : v STOINF ATMASB , ( O @ : P DISCHA
0x324d80…324f14 (3, 126) Dummy {f00=0x0107, f01=0x0190, f02=» P P V , ( P ' P V , ( ' P W U P |TAB ATMASF , ( D@ : P , ( @ ' P W , ( 7
0x324f14…3250a8 Dummy {f00=0x0107, f01=0x0190, f02=» t RDHOME , ( ""W : ( , ( P ! R W X * & ' P W , ( : P ' T P , ( .
0x3250a8…32523c Dummy {f00=0x0107, f01=0x0190, f02=»$@ : T ERASUP ( , ( C W " : O : : , ( ] P Z P P ' T . j , ( { , ( U SAVE1 ,
0x32523c…3253d0 Dummy {f00=0x0107, f01=0x0190, f02=» : : z , ( $ 0 0 0 : N DISCON J CONCT , ( P ' V ^ ( O T JW R l CHKSTA COPY N , ( EH * , : N @ T N P ! , ( a 09B V L
0x3253d0…325564 Dummy {f00=0x0107, f01=0x0190, f02=» @=H L L $ . O W , ( O & P T ," 0 , ( X 9HR !VV H_ V _$ ,9H ` TRPF TRPA , ( @ L O : ' Z 0 : _ Z , ( 9 2 : %W >W , Z 2
0x325564…3256f8 Dummy {f00=0x0107, f01=0x0190, f02=» 4 Z 0 : W O , ( 0R T W T W T W , ( O 1R V W O 0R V W P , ( O 0R V W O W : : : H D ! E Pn Rd TZ #TR 1P 7T> =R8 CQ2 KR S z [T cP oW s uW y
0x3256f8…32588c Dummy {f00=0x0107, f01=0x018e, f02=» Z H D ! H D ! b H D ! H D ! ! # %
0x32588c…325a20 Dummy {f00=0x0107, f01=0x0190, f02=» H D ! a c e g i k m o q P s P u P w P y { } H H D ! 6 T Z N P H D ! $ 0 T @ D H D ! H R R R R R R
0x325a20…325bb4 (3, 127) Dummy {f00=0x0107, f01=0x0190, f02=» P, #T& )P 3T 7T IW [ t eP u | w y { H D ! V, W& R W R W V PD P V P P" V P W U < H D ! P" %P 1W 9U UR aP* kV wP yW }V W P( R W P W H D ! P2 T& P" W W #R ?T EW mP, qPd wT^ U
0x325bb4…325d48 Dummy {f00=0x0107, f01=0x407a, f02=» RV T WH T W> T@ l 8 4 W4 R2 V. W R" V W R V W W ( d@ vW U < H D ! P" %P 1W 9U UR aP* kV wP yW }V W P( R W P W H D ! P2 T& P" W W #R ?T EW mP, qPd wT^ U
0x325d48…325edc Dummy {f00=0x0107, f01=0x0190, f02=» B @ IDENT KEYB2 REL 11.0 DK 830113 NJ 870150541100 J F " KBINP KBINP2 READKB READK2 RESKB LMP1ON LMP1OF LMP2ON LMP2OF J F B LMP3ON LMP3OF LMP4ON LMP4OF LMP5ON LMP5OF LMP6ON LMP6OF H D ! RDHOME COPY ERRORdTAB CRDOWN ICV
0x325edc…326070 Dummy {f00=0x0107, f01=0x0190, f02=» N ! P T R Q DCABOR $ , ( A R O T N P 6 READKB v f , ( _@ N W W : z READK2 , ( } C C ( : C C RESKB ICVRE
0x326070…326204 Dummy {f00=0x0107, f01=0x0190, f02=» , ( @ O W @ O " P : ICREAD 8 , ( C ( : C C C ( L ICWRT | ERROR 4 , ( : C C C ( : O SOUND LMP1ON D LMP1OF H
0x326204…326398 Dummy {f00=0x0107, f01=0x0190, f02=»N LMP4OF ` LMP5ON d LMP5OF h 4 LMP6ON p H LMP6OF t , ( [ W W W W W W W W p , ( { W W W C A C ( , ( @ C ( : , (
0x326398…32652c Dummy {f00=0x0107, f01=0x018e, f02=» , ( ; 0 , ( [ ` , ( { , ( , (
0x32652c…3266c0 Dummy {f00=0x0107, f01=0x0190, f02=» INSMOD STOVDU , ( T N P ' T ! T ( WCHAR X POSUNP h , ( 7I W 4 : z STOINF ATMASB DISCHA , ( O P
0x3266c0…326854 (3, 128) Dummy {f00=0x0107, f01=0x0190, f02=» P P V P , ( @ ' P V ' P $ , ( W U T |TAB ATMASF , ( D : P , ( ' P W U , (
0x326854…3269e8 Dummy {f00=0x0107, f01=0x0190, f02=» W x RDHOME , ( " : P , , ( @B ! R W * & ' P W : , ( P ' T P , ( .
0x3269e8…326b7c Dummy {f00=0x0107, f01=0x0190, f02=» ERASUP * & +D : T W , ( C " : O : > * & ] P Z P P ' T . n , ( { U SAVE1 , (
0x326b7c…326d10 Dummy {f00=0x0107, f01=0x0190, f02=» : : 0 z , ( 0 0 : H P DISCON J CONCT * & @$ % X ( O T DW L l CHKSTA COPY H , ( A * , : N @ T N P ! 0 , ( ] 9B V L !
0x326d10…326ea4 Dummy {f00=0x0107, f01=0x0190, f02=» L L $ . O W O , ( & P T ," X . , ( 9HR !VV H_ V _$ ,9H L ^ TRPF TRPA * & O : ' T 0 : _ T , ( 3 2 : %W >W , T 2
0x326ea4…327038 Dummy {f00=0x0107, f01=0x0190, f02=» T 0 : W O | , ( 0R T W T W T W , ( O 1R V W O 0R V W L , ( O 0R V W O W 4 : | : H D ! Rd TZ TR +P 1T> 7R8 =Q2 ER M t UT ]P iW m oW s H
0x327038…3271cc Dummy {f00=0x0107, f01=0x0190, f02=» V H D ! H D ! ^ H D ! H D ! ! #
0x3271cc…327360 Dummy {f00=0x0107, f01=0x0190, f02=» ] _ a c e g i k J m J o J q J s u w B y { H D ! } 0 N T H J H D ! * N : > B H D ! L L L L L L L
0x327360…3274f4 (3, 129) Dummy {f00=0x0107, f01=0x0190, f02=»T& #P -T 1T CW U n _P o v q s u yV, z H D ! W& R W R W V PD P V P P" V P W U P" 6 H D ! P +W 3U OR [P* eV qP sW wV W P( R W P W P2 H D ! T& P" W W R 9T ?W gP, kPd qT^ U W * 3
0x3274f4…327688 Dummy {f00=0x0107, f01=0x4070, f02=» WH T W> T@ f 4 0 W4 R2 V. W R" V W R V W W " Z@ lW U P" 6 H D ! P +W 3U OR [P* eV qP sW wV W P( R W P W P2 H D ! T& P" W W R 9T ?W gP, kPd qT^ U W * 3
0x327688…32781c Dummy {f00=0x0107, f01=0x0190, f02=» B @ IDENT PRINT2 REL 11.1 84-01-05 DK 870150541110 PRINT COPP J PRINT ` , ( TT LL GG CC # # # # (@P r OPEN CONCT , ( ! R ( O SETTYM , (
0x32781c…3279b0 Dummy {f00=0x0107, f01=0x0190, f02=» O v , ( W 2( _2 ( N , ( @ X O _T N P N T O F TSTMES v , ( N T O , ( N T O : O , ( T O W T O O
0x3279b0…327b44 Dummy {f00=0x0107, f01=0x0190, f02=» ! T | UNPACK * & m W B O . ICSET , ( : O : l ICREAD , ( : N ICWRT , ( D P
0x327b44…327cd8 Dummy {f00=0x0107, f01=0x018e, f02=» D r , ( O , ( ; V R T ," P ! R W ! B , ( [ R W T R 9AR ! r , ( { 1 P W # ! P N , ( _r P @ P , (
0x327cd8…327e6c Dummy {f00=0x0107, f01=0x018e, f02=» , ( ,! P W , ( ; : T N D N 4 , ( [ R P O N T _ O d , ( { _& O : T , ( O : ! 1 P N !0T 0 RFMDUP , (
0x327e6c…328000 Dummy {f00=0x0107, f01=0x0190, f02=» f , ( T N !010T "@T B P , ( 9 c O B B N = B 8 , ( Y N O C N N Q N h , ( y C N C . L1T W ( O , ( W O P c C , ( O
0x328000…328194 (3, 130) Dummy {f00=0x0108, f01=0x0190, f02=»I ECBINI , ( N X _ $:H D , ( 5 O $ @ %P L O L , ( U ( D O N H O O | , ( u : ( B P N " , ( 0:B V M : @ %P
0x328194…328328 Dummy {f00=0x0108, f01=0x0190, f02=» P( T T T T j H D ! W" !T +W 1T = @ C GP K UP gT oW P & H D ! T ;Vl ?R C GT MP6 SR WW, ]R cW g mT qR, uR2 }P W r H D !&_ P P P T P( P x P $ $ $ $ F H
0x328328…3284bc Dummy {f00=0x0108, f01=0x409c, f02=»P T W V H D !@ P T )T -T 7Pd sQz T W W& P R W T W EP $ c P P P P W Q ^ @ W g mT qR, uR2 }P W r H D !&_ P P P T P( P x P $ $ $ $ F H
0x3284bc…328650 Dummy {f00=0x0108, f01=0x2008, f02=» L = KMD25 DATE = 81 09 23 1216PACK NBR = 0025 8
0x328650…3287e4 Dummy {f00=0x0108, f01=0x0190, f02=»NE) SYS300 NO & P LDK A1,SYSOP INDICATE SYSTEM MODE P RF SYS500 @ PSYS300 EQU * R $ P ANKL A2,/800 SSCP-LU AND LU-LU? f P RF(NZ) SYS400 YES & P LDK A1,SYSOP INDICATE SYSTEM MODE P RF SYS500 PSYS400 EQU * & P LDK A1,MYJOB IN
0x3287e4…328978 Dummy {f00=0x0108, f01=0x0190, f02=» P XIF P EJECT D P*************************************************************** D P* * f D P* ATTN ATTENTION KEY HANDLING * D P*
0x328978…328b0c Dummy {f00=0x0108, f01=0x0190, f02=» REGISTERS P* P* A11= RESERVED P* A13= RESERVED 6 P* N > P********************************************************** X P IFT SNA=1 PATTN EQU * $ P LDK A1,/4B SIGNAL ATTENTION KEY P CF A14,SETSTA SET STATUS P
0x328b0c…328ca0 Dummy {f00=0x0108, f01=0x0190, f02=» * x @ P* PA PROGRAM ACCESS KEY HANDLING * . B P* * r B P************************************************************** P* REGISTE
0x328ca0…328e34 (3, 131) Dummy {f00=0x0108, f01=0x0190, f02=»************************** l PPA1 EQU * " P LDK A2,/25 AID-CODE 4 P RF PA500 P PPA2 EQU * b P LDK A2,/3E AID-CODE t P RF PA500 PPA3 EQU * P LDK A2,/2C AID-CODE PPA500 EQU * , P CF A14,LMP3ON TURN ON KEYBOARD INHI
0x328e34…328fc8 Dummy {f00=0x0108, f01=0x0190, f02=»******************************************************************* H P* * L H P* PAEX PAEX KEY FOLLOWED BY NUMBER * H P*
0x328fc8…32915c Dummy {f00=0x0108, f01=0x0190, f02=»* P* A11= CREDIT WORK AREA P* A13= RESERVED * P* B 8 P*************************************************** L P IFT PAX=1 PPAEX EQU * P LDKL A1,PAEXA P ST A1,RDMORE,A11 P RTN A14 PPAEXA EQU * P CM RDMO
0x32915c…3292f0 Dummy {f00=0x0108, f01=0x0190, f02=»RT OF RECORD % ( P LDK A5,'S' STANDARD FILE CHARACTER & P CC A5,27,A6 STANDARD FILE? & @ P RF(NE) GET:50 NO! & d * P LDK A5,'$' LEADING CHAR IN CONF. FILE & ~ " P CCR A5,A4 CONFIGURATION FILE? & P RF(NE) GET:50 NO! & 2 PGET:25 LDK A3,'C' THIS INSTR
0x3292f0…329484 Dummy {f00=0x0108, f01=0x000c, f02=») * * * * *
0x329484…329618 Dummy {f00=0x0108, f01=0x0190, f02=» 0 P IDENT DSPBSC REL 11.0 811101DK 870150541100 P 8 B P************************************************************* @ B P* * B P* MODULE DSPBSC
0x329618…3297ac Dummy {f00=0x0108, f01=0x0190, f02=» * X B P* AND MULTIPLE WAIT FOR KB AND DC. * < P* (EMULATION 3270 BSC) * T B P* * B P**********************************************
0x3297ac…329940 Dummy {f00=0x0108, f01=0x0190, f02=» * v D P* LIST OF ROUTINES * . D P* * v D P* VDUKB MAIN ROUTINE * $ P*
0x329940…329ad4 (3, 132) Dummy {f00=0x0108, f01=0x0190, f02=»IT INITIALIZE THE TASK * * P* COMINI COMMON INIT ROUTINE @ $ P* ECBINI INIT OF ECB:S n D P* TSTDEV TEST KEYBOARD AND DISPLAY * D P*
0x329ad4…329c68 Dummy {f00=0x0108, f01=0x0190, f02=»************************************** | > P* * . > P* ENTRY POINTS * p > P* * > P********************
0x329c68…329dfc Dummy {f00=0x0108, f01=0x0190, f02=»INE r P ENTRY ECBINI INIT OF ECB:S . P ENTRY MATCH MATCH TASID AND PHYS. ADDRESS 0 P b > P********************************************************** j > P* * > P* EXTERNAL REFERENC
0x329dfc…329f90 Dummy {f00=0x0108, f01=0x0190, f02=»**************************** r P $ , P EXTRN I:EVA0 CREDIT EVALUATION ROUTINE , P EXTRN OPEN OPEN DC (DCBSC) $ P EXTRN CONCT CONNECT DC (DCBSC) . P EXTRN SETTIM SET REQUEST TIMEOUT (DCBSC) 2 P EXTRN ERASE ERASE SCREEN AND VDU BUFFER (VDU)
0x329f90…32a124 Dummy {f00=0x0108, f01=0x0190, f02=»INE IN KEYB-MODULE (KEYB) z 6 P EXTRN DCINP MAIN ROUTINE IN DCSNA-MODULE (DCSNA) " * P EXTRN LMP6OF OFFLINE LAMP OFF (KEYB) " P EXTRN LMP1ON DC LINE 1 (KEYB) " P EXTRN LMP2ON DC LINE 2 (KEYB) . P EXTRN SOUND SOUND ALARM AT DISPLAY (VDU) & P
0x32a124…32a2b8 Dummy {f00=0x0108, f01=0x0190, f02=» EXTRN STOINF SAVE SCREEN INFORMATION (VDU) ( P EXTRN ICVRED INTERTASK READ (KEYB) 4 ( P EXTRN ICINP INTERTASK INPUT (KEYB) ` * P EXTRN CHKSTA CHECK DC STATUS (DCBSC) 6 P EXTRN READK2 READ NUMERIC KEYB'RD, NO-WAIT (KEYB) , P EXTRN KBINP2 ROUTIN
0x32a2b8…32a44c Dummy {f00=0x0108, f01=0x0190, f02=» * x B P* CONDITIONAL ASSEMBLY PARAMETERS * . B P* * t B P************************************************************* P $ P
0x32a44c…32a5e0 Dummy {f00=0x0108, f01=0x0190, f02=»MBER OF LINES (1-2) PNBRLIN EQU 2 * PX:M EQU 0 COPY COMMNAND INCLUDED IF:=1 0 PCOPCMD EQU 1 ^ " PX:O EQU 0 TEST INCLUDED IF:=1 r PTEST EQU 0 P EJECT @ P*********************************************************** @ P*
0x32a5e0…32a774 (3, 133) Dummy {f00=0x0108, f01=0x0190, f02=» * j @ P*********************************************************** P b P* j P* ECB INDEX TABLE t P* PECBIND EQU * P DATA 8 NUMBER OF ENTRIES P DATA X'2000' ECB KB P DATA X'3002' ECB PRINTER
0x32a774…32a908 Dummy {f00=0x0108, f01=0x018e, f02=»RTASK WRITE z P DATA X'610C' ECB DC LINE1 ( P DATA X'210E' ECB FOR NUMERIC KB DK 6 P* b $ P* SCREEN SIZE ON DISPLAY l P* PLBVDU EQU 1920 P* P* MODES P* * PHCPMOD EQU /4000 HARDCOPY OUTSTANDING P*
0x32a908…32aa9c Dummy {f00=0x0108, f01=0x0190, f02=» P* TERMINAL WORKBLOCK TB1 P* $ POFFFLG EQU 1962 OFFLINE FLAG . * PPRTID EQU OFFFLG+2 TASKID FOR HARDCOPY R " PMAIN EQU PRTID+6 WHICH DC LINE . PECBBLK EQU MAIN+6 ECBBLK FOR MULTIPLE WAIT PREGI EQU ECBBLK+16 SAVE AREA PBSCMOD EQU R
0x32aa9c…32ac30 Dummy {f00=0x0108, f01=0x0190, f02=»A11,TADISP+STKEND W.B.-ADDRESS TO EXAMINE P LDR* A11,A11 2 0 P CW A11,SAVE06+STKEND COMPARE W.B.-ADDRESSES H P XIF | P IFT MMUPAG=1 PMOVC30 ELR A11,A6 P EL A2,T:DAD,A11 T:D-ADDRESS " P AD A2,MOVADD+STKEND RELOCATE 4 P ST A2
0x32ac30…32adc4 Dummy {f00=0x0108, f01=0x018e, f02=»NG) MOVC10 TO FEW WAT ELEMENTS. TAKE NEXT T:A 2 P AD A11,TADISP+STKEND W.B.-ADDRESS TO EXAMINE 6 P ELR A11,A11 l 0 P CW A11,SAVE06+STKEND COMPARE W.B.-ADDRESSES P XIF P RB(NE) MOVC10 .NEQ. , P LD A9,MOVED+STKEND W.B. ALREADY MOVED?
0x32adc4…32af58 Dummy {f00=0x0108, f01=0x0190, f02=» h P CALL MOVWB MOV WORK BLOCK $ P IM MOVED+STKEND INDICATE MOVED * " P LD A4,UWB+STKEND UWB-BLOCKS? R P RF(Z) MOVC40 NO! x " P CALL GETPRO CREATE REAL UWB'S 8 PMOVC40 ST A2,NEWAD2+STKEND SAVE NEW ADDRESS TO W.B. P CALL MOVDWB & P
0x32af58…32b0ec Dummy {f00=0x0108, f01=0x0190, f02=»SAVE04+STKEND SAVE T:A-ADDRESS & P LDR A8,A6 REPLACE POINTER TO T:A & . P LD A12,SAVE03+STKEND REPLACE T:D-ADDRESS P P CALL MOVDWB P LDR A8,A11 , P LD A12,SAVE04+STKEND RELOAD T:D-ADDRESS P RB MOVC10 P EJECT P P
0x32b0ec…32b280 Dummy {f00=0x0108, f01=0x0190, f02=» ** 4 P** SEARCH U:BTAB PROTOTYPE AND GET NUMBER OF ** * 4 P** COPIES. FILL REAL U:BTAB ** b 4 P** ** 4 P** INPUT : A11=PROTOTYPE ADDRESS ** 4
0x32b280…32b414 (3, 134) Dummy {f00=0x0109, f01=0x0190, f02=»9 ** z 4 P************************************************ " P Z PGETPRO EQU * f ( P LD A3,U:BTOD,A10 GET U:BTAB ADDRESS z P IFT MMUPAG=0 P LDR* A4,A3 LENGTH PGETP10 EQU * 6 P SUK A4,UP:REC SUB RECORD LENG
0x32b414…32b5a8 Dummy {f00=0x0109, f01=0x0190, f02=»ADDR,A3 SAME W.B.? , P RF(E) GETP30 YES! GET NUMBER OF COPIES P ADK A3,UP:REC NEXT J P RB GETP10 f P x 0 P* GET NUMBER OF COPIES * 0 P* A3 POINTS AT PROTOTYPE ADDRESS IN U:BTAB * P PGETP30 EQU * P
0x32b5a8…32b73c Dummy {f00=0x0109, f01=0x0190, f02=»CEMENT n . P AD A3,U:BTNW,A10 ADD TO NEW TABLE ADDRESS P LDR A9,A3 @ " P ST A4,URLENG,A9 STORE LENGTH R * P ST A5,URNUMB,A9 STORE IN REAL U:BTAB x 0 P* COPY NUMBER OF WORKBLOCKS TO COMMON AREA * 0 P********************************************
0x32b73c…32b8d0 Dummy {f00=0x0109, f01=0x0190, f02=» P & P* UPDATE POINTER IN REAL U:BTAB * & P********************************* > PGETP50 EQU * h 6 P ST A2,URADDR,A9 STORE ADDRESS TO FIRST IN U:BTAB | P XIF P IFT MMUPAG=1 P ELR A4,A3 LENGTH PGETP10 EQU * 6 P S
0x32b8d0…32ba64 Dummy {f00=0x0109, f01=0x0190, f02=»TP20 EQU * ( P EL A9,UPADDR,A3 CHECK IF SAME W.B. P CWR A11,A9 > , P RF(E) GETP30 YES! GET NUMBER OF COPIES R P ADK A3,UP:REC NEXT P RB GETP10 P 0 P* GET NUMBER OF COPIES * 0 P* A3 POINTS AT PROTOTYPE
0x32ba64…32bbf8 Dummy {f00=0x0109, f01=0x0190, f02=» t , P EL A5,UPNUMB-1,A3 GET NUMBER OF COPIES P ANK A5,/FF 8 , P SU A3,U:BTOD,A10 GET TABLE DISPLACEMENT L . P AD A3,U:BTNW,A10 ADD TO NEW TABLE ADDRESS | P LDR A9,A3 " P TL* MMTO+STKCOM LOAD TO-TABLE * P ES A5,URNUMB,A9 ESORE IN REAL U:B
0x32bbf8…32bd8c Dummy {f00=0x0109, f01=0x0190, f02=» * f 0 P******************************************** . P SUK A5,1 ONE ALREADY MOVED (IN 'MOVCOM') > P RF(NP) GETP50 p PGETP40 CALL MOVWB P SUK A5,1 P RB(NZ) GETP40 P & P* UPDATE POINTER IN REAL U:BTAB * & P**********
0x32bd8c…32bf20 Dummy {f00=0x0109, f01=0x018e, f02=»L* MMFROM+STKCOM P XIF P RTN A14 $ P EJECT 4 P B 2 P** M O V C L A ** N 2 P** ** 2 P** ** 2 P** CHECKS IF W.B. ALREA
0x32bf20…32c0b4 (3, 135) Dummy {f00=0x0109, f01=0x0190, f02=» 2 P** ** 2 P** A LOT OF WORKREGS. ** : 2 P********************************************* p P PMOVCLA EQU * P CALL SHIFT P RF(Z) MVCL30 * PMVCL10 CALL GETWB W.B.-ADDRE
0x32c0b4…32c248 Dummy {f00=0x0109, f01=0x0190, f02=»B(NZ) MVCL10 PMVCL30 RTN A14 PMVCL40 CALL MOVDT * P CALL MOVWB D " P LD A4,UWB+STKEND UWB-SCANNING X P RF(Z) MVCL50 NO! ~ P CALL GETPRO DUPLICATE WB'S 0 PMVCL50 ST A2,NEWAD2+STKEND SAVE W.B.-ADDRESS P CALL MOVDWB PROCESS DWB
0x32c248…32c3dc Dummy {f00=0x0109, f01=0x0190, f02=» ** 6 P** ** . 6 P** CHANGE ADDRESS TO W.B. & D.T. IN T:A, ** h 6 P** BLOCKS ALREDY MOVED ** 6 P**
0x32c3dc…32c570 Dummy {f00=0x0109, f01=0x0190, f02=» & A *<a P j A ) " A H A @ & @ @ T A A P@ @ PB @ ! T A @ A # A $ RE bRN cME nMN o W R, ( T ( W P T $ ; V ;
0x32c570…32c704 Dummy {f00=0x0109, f01=0x0190, f02=» Y W Y Y @ " P$ @ = ] ] ] W A A A W ^ P _ " ^ T @ 9J A T _ 1@ _ ^ 9 V >! D A A > > > > > > > > ^ _ ^ _ ? ? ? ? ? A D ^ @ ?
0x32c704…32c898 Dummy {f00=0x0109, f01=0x0190, f02=» A ^ " , , A A :B A Q (P _ # # H A " A F 0R$ 9U AR FQ 0:D A F _* A F " A p A r T A r A p " R _U . " A : A " A A $ T !
0x32c898…32ca2c Dummy {f00=0x0109, f01=0x0190, f02=» H > " ! R :W" W W W ?W /W : A W ! A A PL _ " @ _ I T " T A P I T$! A A A A A A A A A F
0x32ca2c…32cbc0 Dummy {f00=0x0109, f01=0x0190, f02=» A P A < V A > > @ A jW "
0x32cbc0…32cd54 (3, 136) Dummy {f00=0x0109, f01=0x0190, f02=» Z ? Z > A n L _ @ > > U # T @ H ( ( P c P W6 A J V ( U P @ V L x U #P A n A Q ? > ? @ XB ) A A _N A A 2 A _` A n A Q > ? A
0x32cd54…32cee8 Dummy {f00=0x0109, f01=0x0190, f02=» J _, ? _ P H H ? ? ? ? ? ^ A _ _ ^ $P T I R $ 5 % > ? W ? W ? T T U T U U > > 4 T - 1_( U T P 0 U _h ? @ T x 0 A 1 Q Q
0x32cee8…32d07c Dummy {f00=0x0109, f01=0x0190, f02=» $ H W W > > > > > > @n0V ? n0 > _ > ? _ > > ? ^ ! Y ^ _ x ? pA. $ ( , 0 4 8 < #M 1 J J : $ ( , 0 4 8
0x32d07c…32d210 Dummy {f00=0x0109, f01=0x0190, f02=» Xh I Y T # C C W4 O " # X Y ) C C x # P Y '? Y Y T # P W Y P R R P T `P (@ (@ " 2 @ _ > X $? P r$ > >
0x32d210…32d3a4 Dummy {f00=0x0109, f01=0x0190, f02=» R Q~ P0 B P* 0$ T # R QL ^ > X B U( H Q2 X D B $ T C x > C $ ) _ X 9BV X 0 X D C > X H UJ H B P PL $ # Q > P _0 # T p
0x32d3a4…32d538 Dummy {f00=0x0109, f01=0x0190, f02=» X T (@ X L U L Q4 M X L P ( L ) 1_f _& ?(@ X P 4 Y X 1 1 X P - M T $ PJ _ T " # p X L R P P ZP (@ ^ X P, P$ # P( T P 0
0x32d538…32d6cc Dummy {f00=0x0109, f01=0x0190, f02=» 9B X T u X > & Z l F x < 4BHBB h' X $P % Y $ X " T @C T AC AC C " x 4 ! " 6 ' / | 8 9 ( - $ B H P> ] ]
0x32d6cc…32d860 Dummy {f00=0x0109, f01=0x0190, f02=» Y 2 P X Z& _. P f !% !& B = ] @C P aC AC ] ] B X 2 B C N B P Y B Y V Y Y D Y C "T ] "W H I Y Y Y 2 Y " X P Y @C T p
0x32d860…32d9f4 (3, 137) Dummy {f00=0x0109, f01=0x0190, f02=» X 2 X * B ! T X ! P Y B Y " X 2 X " P B : X 2 X *T W, P C X P C 0P Y * v W @ W @W W W W W
0x32d9f4…32db88 Dummy {f00=0x0109, f01=0x0190, f02=» @C T AC AC X $P y $ Y $ D ' (P 0 ) D ' (P _ ) 1_ * $X 0 % _ C ( (P _ ) 1_@ C ( (XL P _ 0 )_Z C &_2 C &_$ * (P _ ) 1 4 A . A 2 A 6 A : A > BW > f C ] p ]
0x32db88…32dd1c Dummy {f00=0x0109, f01=0x0190, f02=» C ] f !% !% ] " P ] p f AC AC !% !' T. @ f ` ". "t "F AC f !% !& @C T " !% _Z !' ] P = $ !' x !' > !' F !% AC P "P, !# @C T( PV ! ` X ! T4 X RD X ! PBW8 @C P !
0x32dd1c…32deb0 Dummy {f00=0x0109, f01=0x0190, f02=» @ a : T ` @ W H A h J AS BAT :a A K @ ;C :W @ " P " J V ;C *U BAT8 @ @ : A @ ) @ P S _ S A @ 3 3 J V
0x32deb0…32e044 Dummy {f00=0x0109, f01=0x0002, f02=»
0x32e044…32e1d8 Dummy {f00=0x0109, f01=0x0028, f02=» HMES END OF $PDISC HEND MON,/L " HRUN PDISC,0 M=PTMON 6 0 HOPT OUT=@M=,FC=F4,FT=M,SOP=01,INP=PTMON,DATE R H$PDISCE P=PTMON * HMES ILLEGAL PARAMETER COMBINATION !!! * HMES FOLLOWING COMBINATIONS ARE VALID: 4 HMES 1 M,M+MU,M
0x32e1d8…32e36c Dummy {f00=0x0109, f01=0x2008, f02=» END OF $PDISC HEND MON,/L " HRUN PDISC,0 M=PTMON 6 0 HOPT OUT=@M=,FC=F4,FT=M,SOP=01,INP=PTMON,DATE R H$PDISCE P=PTMON * HMES ILLEGAL PARAMETER COMBINATION !!! * HMES FOLLOWING COMBINATIONS ARE VALID: 4 HMES 1 M,M+MU,M
0x32e36c…32e500 Dummy {f00=0x0109, f01=0x0010, f02=» HEND FILE n 2 HMES 4 D,D+DU,D+DOUT,D+DU+DOUT FOR DATA FILE 2 HMES 5 FC FILE CODE. DEFAULT VALUE IS F4 R 8 HMES 6 SOP SOP SWITCH NUMBER. DEFAUL VALUE IS 01 HMES 7 DATE UPDATING DATE < HMES ANY COMBINATION OF ALTERNATI
0x32e500…32e694 (3, 138) Dummy {f00=0x010a, f01=0x2008, f02=» END FILE n 2 HMES 4 D,D+DU,D+DOUT,D+DU+DOUT FOR DATA FILE 2 HMES 5 FC FILE CODE. DEFAULT VALUE IS F4 R 8 HMES 6 SOP SOP SWITCH NUMBER. DEFAUL VALUE IS 01 HMES 7 DATE UPDATING DATE < HMES ANY COMBINATION OF ALTERNATI
0x32e694…32e828 Dummy {f00=0x010a, f01=0x0190, f02=» P< r A R A : @ _ S : 0 N N !TTP 9H N A A & N 9H N A P N !AAT p N A " P !SST A $ U P (9A t @
0x32e828…32e9bc Dummy {f00=0x010a, f01=0x0190, f02=» Y (9A t _ : @ " 9a @ $ 3 *V : @ 9 @ 9 9@ @ " :HP @ U W 9 9@ @ $P$ @ ( ;A 9@T 9 9@ 9 : P L P 9@T 9 9@ _* :! )R @R P F
0x32e9bc…32eb50 Dummy {f00=0x010a, f01=0x0190, f02=»AAT : N =H N : N =H N : &=H F : F =H F : ? ? > > : P N =H N T _ : @ ! P (W ( : @ 0 P 0 _ @ Q @ P P$_ @ A P A P _ Q @ Q 1 a : @ J
0x32eb50…32ece4 Dummy {f00=0x010a, f01=0x0026, f02=» ( ( 0 8 @ x
0x32ece4…32ee78 Dummy {f00=0x010a, f01=0x0190, f02=» H H H H H H H H H 6BlB H Hn H H H H H H Hm n H H H H H Hx* H H H H H H H H H H H H H H H H H H H H H H H H H H H H N @
0x32ee78…32f00c Dummy {f00=0x010a, f01=0x0190, f02=» _ A D " y _ @y > > U # T @ H ( ( P c P W6 z Ay V ( U P @ V L
0x32f00c…32f1a0 Dummy {f00=0x010a, f01=0x0190, f02=» A D A Q > ? A P A NQ ._ A N < Q H P H Q H R Y _ A F_0 8 y Q Z P 0 9 _ _, ? _ P H H ? ? ? ? ? ^ A _ _ ^ y $P T I R $ 5 % > ? W ? W
0x32f1a0…32f334 (3, 139) Dummy {f00=0x010a, f01=0x0190, f02=»T N 0 Ay 1 Q Q > > 0 @y 1 Ay P P > " ? * X R Y P _ ? @ 8 R Y P _ W0 8 X W( ? ` @ @ P $ H W W > > > > > > @` V ? ` > _ > ? _ > > ? ^ ! Y ^ _ N ? FA. ~ $
0x32f334…32f4c8 Dummy {f00=0x010a, f01=0x0190, f02=» $ ( , 0 4 8 < C C T 8P Y ^ 5 ) P U y ( XJ XF Y @ P R T X 0P Xh I Y T # C C W4 O " # X Y ) C C x # P Y '? Y Y T #
0x32f4c8…32f65c Dummy {f00=0x010a, f01=0x0190, f02=» F C F C > B R Q F ! P C > C > F 8D D ! 9b8d9D # C > B R Q~ P0 B P* 0$ T # R QL 4 > X B U( H Q2 X D B $ T C x > C $ )
0x32f65c…32f7f0 Dummy {f00=0x010a, f01=0x0190, f02=» _0 # T p > P p (_H _2 B U X 4 > ? _ X T (@ ^ > > ? _ X T (@ X L U L Q4 M X L P ( L ) 1_f _& ?(@ X P 4 Y X 1 1
0x32f7f0…32f984 Dummy {f00=0x010a, f01=0x0190, f02=» T P 0 1 Y > > _ T R L U T9C _ T M D W2 D D " T X X - U _ 9B X T u X > & 0zXy zly z 2 z d ( BHBB l > X $P % Y $ X "
0x32f984…32fb18 Dummy {f00=0x010a, f01=0x0190, f02=»P> ] ] {x V ] ] < " P H :H ! D = X B P ] "P( R^ X ] " Y 2 P X Z& _. P < ! ! B = ] @5 P a5 A5 ] y ] B X 2
0x32fb18…32fcac Dummy {f00=0x010a, f01=0x0190, f02=»P Y @5 T F X 2 "P4 T X Y 2 ] "_( T P X U Y 2_F B T X 2:D :D :D C X 2 X * y B ! T X ! P Y B Y " X 2 X " P B
0x32fcac…32fe40 Dummy {f00=0x010a, f01=0x0190, f02=» @W W W W W y > > , L Q , L X "R P A Y $ W> Y $W6 X "Z X A $ , Y $_. Y $ @5` T A5b A5` X $P y $ Y $ (P 0 ) (P _ ) 1_ * $X 0 % n_ 5 ( (P _ ) 1_@ 5 ( (XL
0x32fe40…32ffd4 (3, 140) Dummy {f00=0x010a, f01=0x0190, f02=»4 ] F y ] a5 4 X A5 _< f A5~ 4 A5~ < 4 ! @5bP ! ! V @5~P % A5~ 4 < ! ! y 4 ] < ! ! ] " P ] F < A5n A5p ! ! T. < 6 | J A5h < ! ! @5 T
0x32ffd4…330168 Dummy {f00=0x010a, f01=0x0190, f02=»RD X ! PBW8 @5bP ! ! ! V ! 6 @5|P & ! F ! V A5b @5 T ! _ ( T _ 5r A5` + C $ B B A5t A5v A5x A5f A5h ! < ! V A5b_ ! T 4 @5b X ! P ! # T @ T ! _ ! A5z ! _$ ! A5j @5bP @5`P ! A5b A5d ! @
0x330168…3302fc Dummy {f00=0x010a, f01=0x0190, f02=» P P @5^ P X 2P A5x 8 H @ P E X R. X P T" P C X P { C J P " H " P X * Y X V ! W* X T X *P LW ! X T X ! P ! W ! A5d @5^ X 0 A5j A5` A5l ! @5bT @5dP ! !
0x3302fc…330490 Dummy {f00=0x010a, f01=0x0190, f02=» ` 2 P* SUBROUTINES: * 2 P* * > 2 P********************************************* t PCHCRIO EQU * P CIO A1,1,CHCR P SST A3,CHCR P RB(NA) CHCRIO P RTN A14
0x330490…330624 Dummy {f00=0x010a, f01=0x018e, f02=»* RDBLK - READ ONE CASSETTE BLOCK * 6 P* =============================== * : 6 P* * t 6 P* REFERENCED IN: SYSLOD * 6 P*
0x330624…3307b8 Dummy {f00=0x010a, f01=0x0190, f02=» 6 P* EXIT: A2 - NUMBER OF CHARACTERS IN BLOCK * 6 P* * B : P* WORK REGISTERS: A1,A2,A3,A4,A5 * | 6 P* * 6 P* SUBROUTINES:
0x3307b8…33094c Dummy {f00=0x010a, f01=0x018e, f02=»B:10 EQU * P LDR A3,A9 START OF BUFFER & P LDK A2,0 RESET CHARACTER COUNTER 4 $ P LDR A4,A3 SAVE START OF BUFFER ^ P ADKL A3,CBLEN END OF BUFFER P LDK A1,/A P CIO A1,1,CHCR READ BLOCK P RF(NA) RDERR3 PRDB:20 EQU * P
0x33094c…330ae0 Dummy {f00=0x010a, f01=0x0190, f02=» * P ADK A2,1 INCREMENT CHARACTER COUNTER & P ADK A4,1 INCREMENT BUFFER POINTER 2 PRDB:30 EQU * P SST A1,CHCR p P RB(NA) RDB:20 P ANKL A1,/FCFF CHECK STATUS P LDR A4,A1 SAVE STATUS P RF(Z) RDBEX OK P SLC A4,3 CHECK IF
0x330ae0…330c74 (3, 141) Dummy {f00=0x010a, f01=0x0190, f02=»READ > P* THE SAME BLOCK IF NOT 3 ATTEMPTS ALREADY HAS BEEN MADE P* N P ADK A5,1 NEXT ATTEMPT X P CWK A5,3 THIRD ATTEMPT? v P RF(E) RDERR3 YES - GIVE UP! P LDK A1,/E REVERSE ONE BLOCK P CIO A1,1,CHCR EXECUTE ORDER $ P RB(NA
0x330c74…330e08 Dummy {f00=0x010a, f01=0x0190, f02=»TN A14 P XIF P IFT DISC=1 P EJECT . ( P*********************************** < ( P* * h ( P* DUINIT - INITIALIZE DISC UNIT * ( P* ============================= * ( P*
0x330e08…330f9c Dummy {f00=0x010a, f01=0x0190, f02=» * p ( P* * ( P* EXIT: * 8 ( P* * d * P* WORK REGISTERS: A2,A3 * ( P* * ( P* SUBROUTINES:
0x330f9c…331130 Dummy {f00=0x010a, f01=0x0190, f02=»A2,RDSEC2 GET SUBROUTINE ADDRESS P LDR A5,A1 SAVE FILE CODE ( P EJECT J P* X $ P* INIT DISC COMMANDS VERSION A2 b P* , P ORKL A1,CIO+8 CONF. CIO A1,1,XX INSTR. P ST A1,SEEK20 ( P ORKL A1,/800 FORM SST A1,XX INSTR. P S
0x331130…3312c4 Dummy {f00=0x010a, f01=0x0190, f02=»,READ22 * P ST A2,READ INIT SUBROUTINE ADDRESSES P ST A2,READS > P LDK A2,4 R $ P XRS A2,CRCCHK DISCARD CRC CHECK d $ P CF A14,GETVLB GET VOLUME LABEL P LDK A2,4 P ORS A2,CRCCHK SET CRC CHECK P LC A2,FORDEV,A9 GET FORMAT
0x3312c4…331458 Dummy {f00=0x010a, f01=0x0190, f02=»DDRESS p P* $ P* INIT DISC COMMANDS VERSION A3 P* @ , P LDKL A3,DKBA3 BUFFER LENGTH VERSION A3 J * P ST A3,SAVCON BUFFER LENGTH VERSION A3 z P ORKL A1,CIO+8 , P XRKL A1,/500 CONFIG. CIO A4,1,XX INSTR. P ST A1,SEEK30 ( P ORK
0x331458…3315ec Dummy {f00=0x010a, f01=0x0190, f02=»A1,/800 FORM SST A2,XX INSTR. P ST A1,READ31 & P* < P* INIT SUBROUTINE ADDRESSES F P* j " PDUI:40 ST A2,READ READ PROGRAM t ( P ST A2,READS READ CONFIGURATION DATA PDUI:50 EQU * P RTN A14 P EJECT 4 P****************
0x3315ec…331780 Dummy {f00=0x010a, f01=0x0190, f02=» * h 4 P* ================================= * 4 P* * H 4 P* REFERENCED IN: SYSLOD * 4 P* * " P* ENTRY: A9 = BUFFER A
0x331780…331914 (3, 142) Dummy {f00=0x010b, f01=0x0190, f02=» * 4 P* EXIT: * . 4 P* * f ( P* WORK REGISTERS: A1,A2,A3,A4,A7 4 P* * 4 P* SUB
0x331914…331aa8 Dummy {f00=0x010b, f01=0x018e, f02=»***************** r P* P EJECT $ P* 2 " P* READ DISC SECTOR VERSION A2 < P* b PRDSEC2 EQU * l P LDK A2,0 * P LDR A1,A11 GET LOGICAL SECTOR NUMBER PDIV200 EQU * P ADR A2,A1 P SRL A1,5 ( P RB(NZ) DIV200 M
0x331aa8…331c3c Dummy {f00=0x010b, f01=0x0190, f02=» * P RF(P) DIV210 NO CORRECTION OF RESULT P ADK A2,1 6 PDIV210 EQU * H . P LDR A2,A2 A2:=CYL NBR = LOG SEC NBR / 31 P RF(Z) DIV220 CYLINDER 0 P ADK A2,1 PDIV220 EQU * 4 P ADR A2,A11 A2:=PHYS. SEC NBR BEFORE INTERLACING
0x331c3c…331dd0 Dummy {f00=0x010b, f01=0x0190, f02=»
[…0x6…]
0x332748…3328dc Dummy {f00=0x010b, f01=0x0190, f02=»+!&JKLMNOPQR]$*);^-/STUVWXYZ|,%_>?0123456789:#@'=" . BHBB CHC Q X $P
0x3328dc…332a70 Dummy {f00=0x010b, f01=0x0034, f02=» $ P ABL DISEND COMPLETE REQUEST =12 ##EN ,30$$REL 11.0 81-02-20$$ ##IL 1 T $ =12, ABORT ROUTINE FOR REL 11 b REL 10.0 80-06-30 ##DL 718 * &ABORT LD A2,DWTTP,A6 TIMER POINTER =12 ##DL 723 ( #AB:10 LD A2,DWTOR,A6
0x332a70…332c04 Dummy {f00=0x010b, f01=0x2008, f02=» DISEND COMPLETE REQUEST =12 ##EN ,30$$REL 11.0 81-02-20$$ ##IL 1 T $ =12, ABORT ROUTINE FOR REL 11 b REL 10.0 80-06-30 ##DL 718 * &ABORT LD A2,DWTTP,A6 TIMER POINTER =12 ##DL 723 ( #AB:10 LD A2,DWTOR,A6
0x332c04…332d98 Dummy {f00=0x010b, f01=0x0190, f02=» ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ # !!EN # 0 ASM /S # < KPF /O # J KPF /S # X SCR # f LED TLDSEG # r ( #!!CH $$CPU857 EQU 0$$CPU857 EQU 1$$ # ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ # ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ #
0x332d98…332f2c Dummy {f00=0x010b, f01=0x0190, f02=»MUPAG EQU 0$$MMUPAG EQU 1$$ # ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ $ $ !!EN $ P ASM /S $ KPF /O $ j KPF /S $ x SCR $ LED MONTIM $ ( #!!CH $$CPU857 EQU 0$$CPU857 EQU 1$$ $ ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ $ ( #!!CH $$CPU85
0x332f2c…3330c0 Dummy {f00=0x010b, f01=0x0190, f02=»$CPU857 EQU 1$$ $ | ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ % ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ % D !!EN % p ASM /S % | KPF /O % KPF /S % SCR % LED LKMAL % !!DL 065 % DATA 00 % !!DL 066 %
0x3330c0…333254 (3, 144) Dummy {f00=0x00e5, f01=0x0190, f02=»
0x333254…3333e8 Dummy {f00=0x00e5, f01=0x0190, f02=» B P P 3T Y W { P X ( ( 7 Z& ( P H R H P ' Pt Tt ' P B ]` F U F ]n P U W. C G H L C X L G B G { 9 @_ Xt X X R A Y X
0x3333e8…33357c Dummy {f00=0x00e5, f01=0x0190, f02=» _0 i " _ _ F H P P $ $ - )W ) $P e % > ABCDEFGHI#.<(+!&JKLMNOPQR$]*);^-/STUVWXYZ@,%_>? 123456789:[ '=" abcdefghi[.<(+!&jklmnopqr]$*);^-/stuvwxyz|,%_>?01
0x33357c…333710 Dummy {f00=0x00e5, f01=0x0190, f02=» JZlP}M] Nk`Ka z^L~noj {|[_m TOSS B^B^ B B CZCZ C C { { { { { H H { X ! 9 D W~ X ! 9 D Wl X ! 9 D WZ X ! 9 D
0x333710…3338a4 Dummy {f00=0x00e5, f01=0x0190, f02=» Y $ & > X X X X $ & > ? R* X X P X( N_. { ?(@ " X '? X D X T { { ? P >A D V 8P X ?!W > >?A P >A D V 8P X V 8W ?a > T { `
0x3338a4…333a38 Dummy {f00=0x00e5, f01=0x0190, f02=» P H U _ T U P U ;C ,$ T -_> - X_H "Rf P^ X TX X PJ X RD< V X 0 X L T P* X P Y 9 C " { L < ? < ? <(@ $ P B $ 9H C ">h # P >_2 < U =
0x333a38…333bcc Dummy {f00=0x00e5, f01=0x0190, f02=» > . > N ^ n ~ 0123456789 - ' < +,-. 0123456789 'ABCDEFGHIJKLMNOPQRSTUVWXYZ []^ 0123456789 - * > ?;_: =!"#$%&/() @ABCDEFGHIJKLMNOPQRSTUVWXYZ []^
0x333bcc…333d60 Dummy {f00=0x00e5, f01=0x0190, f02=» X : % Y :(@ p ) _* X . P Y . v B B % X < $ 4 T %(@ X :P" Y < X :P Y .(@W Y ._ ! :(@" ! 9 Y . XV VP Rz P P 9 _ X 2 v Y 2W X 2 X Y 2 Rv p< R <A<a C W X 2X
0x333d60…333ef4 (3, 145) Dummy {f00=0x00e5, f01=0x0190, f02=»R % C Wv ? X . T 9 V _W W 9 R "? 9 0 R Q > ! B W8 > ! B T ! X^ J 0 B F C " X : $4 P X <Tt 1 pRr p Y / X : X <P 1 WL X : X <P $$ P< T W Z %W, X /$ X :
0x333ef4…334088 Dummy {f00=0x00e5, f01=0x0190, f02=»W X < X :P Y < 0 %_ % Y < (@ X Y :_( X < X 0 P L X " [000b [000e [00t [00q 8 [00w [00v c [5n & $$ X " X /# Y / P Y M P ^ L 2 > J J ! t !
0x334088…33421c Dummy {f00=0x00e5, f01=0x0190, f02=» X . T +P B ! L Y J PB PTWF X JP ! D Y G Y I ! L X JPN ! ^ G ! W6 ! ^ ! ^ W ! ^ W ! t +XR X RT _ Y R Q P ! ^ ! p ! W6 Z* _R /P C _: . ! ^ X " T Y J_T Y L_Z Y R
0x33421c…3343b0 Dummy {f00=0x00e5, f01=0x0190, f02=» ! L ! X PP8 Y P ! D Y 2 Y 4 0 ! D Y 6 6 ! 0 ! D Y 8 ! p Y : Y . X Y ? ! L ! ^ [ ! ^ 5 ! ^ n ! ^ ! p 0 X " T A A . ! :" ! P 0 : P Y ? _$ X ? X 0P y 0 Y
0x3343b0…334544 Dummy {f00=0x00e5, f01=0x0190, f02=»P :h ! ^ Y @_" X B , ! ^ Y B_ 4 :h 0 :C ! 412151824253033353648505160667072010203040506070809101111131415 A A A A A A | - M J @ " A. UU @>B @ A @
0x334544…3346d8 Dummy {f00=0x00e5, f01=0x0190, f02=» @ : A P A @ | @ | $ A A @ @ @ E E E E E A & E @ F CRP <A COP <A BAP AS<A E ASP @ T > A ASP F @ U A AS P > F ;j 6 Y P F P
0x3346d8…33486c Dummy {f00=0x00e5, f01=0x0190, f02=»WJ P R* 9 P4:l P R R 9_ > > P :L AST A A E E A A 8 P W 89B @ V W Zb A @ @ A A @ D AS r @ r A W l @ L @ P _ @ !
0x33486c…334a00 Dummy {f00=0x00e5, f01=0x0190, f02=» @ r A @ L P :l l 9b ) V l_ @ A r A b A A E @ < V4 @ R, U R 8 !RRT A " @ Pf A A @ > V T P T ;a=a?j V
0x334a00…334b94 (3, 146) Opaque[0x194]
0x334b94…334d28 # DirEnt {nam=»OBDIR «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1508, f03=0x0000}
0x334b94…334d28 IdxSect {
0x334b94…334d28 f00 = 0x00a8 // 0x334b94 @0x0
0x334b94…334d28 f01 = 0x000a // 0x334b96 @0x2
0x334b94…334d28 gno = [ // 0x334b98 @0x4
0x334b94…334d28 [0x00]: C0x00a8.0x1.0
0x334b94…334d28 [0x01]: C0x00a8.0x2.0
0x334b94…334d28 [0x02]: C0x00a8.0x3.0
0x334b94…334d28 [0x03]: C0x00a9.0x0.0
0x334b94…334d28 [0x04]: C0x00a9.0x1.0
0x334b94…334d28 ]
0x334b94…334d28 }
0x334d28…334ebc Dummy {f00=0x00a8, f01=0x000c, f02=»840105 $ PRINT OPEN CONCT SETTYM SETSTA TSTMES GETBUF READW RELBUF UNPACK ICSET ICREAD ICWRT COPP ATMASB RFMDUP COMINI ECBINI CRDOWN |TAB ATMASF GETVDU RDHOME LINE ERASUA
0x334ebc…335050 Dummy {f00=0x00a8, f01=0x0190, f02=» DSPBSC 840105 VDUKB TSTMES ICVRED READKB READK2 KBINP KBINP2 DCINP ICINP MATCH OPEN CONCT SETTYM STOINF ERASE LMP2ON LMP1ON CHKSTA COMINI J I:EVA0 ECBINI t SOUND RVDU 840105
0x335050…3351e4 Dummy {f00=0x00a8, f01=0x0190, f02=» LINATT NLROUT 4 CRDOWN ERASE f ERASUP RDHOME ERASUA 8 POSUNP bTAB DISID DISSTA ` ATMASF b ATMASB WCHAR RFMDUP DISCHA 4 p NPAD 840105 PACK SCRINF WRAP DCWRIT UNPACK LMP
0x3351e4…335378 Dummy {f00=0x00a8, f01=0x0190, f02=» ERROR PAID BUFADR " CONADR SOUND COPY COPP SAVE1 REST1 GETBUF RELBUF " fCONVER 840105 CONASC CONEBC CONATT CONADR CONPF @ CONORD X x FFMOVE 840105 FMOVE I:E
0x335378…33550c Dummy {f00=0x00a8, f01=0x0190, f02=»VA0 I:RT1 $ >EMPTYT 840105 EMPTYT I:EVA0 I:RT1 < T:STIN 840105 STRIN1 T:STEV T:RNOK T:LOFS I:EVA0 T:LOPS T:CLMI I:MOV T:GRFC T:ROK zT:STOU # 840105 STROU1 T:STEV
0x33550c…3356a0 Dummy {f00=0x00a8, f01=0x0190, f02=» & T:EDFL & 840105 T:EDFL T:PRKB T:PRDY T:PM1 T:PM2 T:CASP T:DUPX T:GRFC T:SCUW T:CLRD T:IOER T:BELL T:CLR1 T:CLR2 T:CLIT T:EKEY T:DYKI + 840105 T:DYKI T:PRKB T:PRDY I:EVA
0x3356a0…335834 (3, 147) Dummy {f00=0x00a8, f01=0x0190, f02=»:EVA0 T:LOPS T:CLMI T:PM1 n T:GRFC T:PM2 xT:UPDF 0 840105 T:UPDF T:GRFC T:LOFS I:EVA0 T:LOPS I:MOV T:RCR T:REWR T:RCTS P zT:DUPL 2 840105 T:DUPL T:GRFC I:EVA0 T:RNOK T:ROK
0x335834…3359c8 Dummy {f00=0x00a8, f01=0x0190, f02=»840105 T:GETA T:GRFC I:EVA0 T:RNOK T:ROK T:RCR " @T:TSTC 6 840105 T:TSTC T:GRFC T:RTES 4 T:TFWD 7 840105 T:TLEF T:TRIG T:TLDO T:TDOW T:TUP T:TFWD T:TBWD T:THOM "
0x3359c8…335b5c Dummy {f00=0x00a8, f01=0x0190, f02=»:GRFC T:GTIP T:DISP " T:ERAS & T:GTIT T:PRDY T:TABD T:TABC T:RNOK I:RT1 T:SPAC T:EDIO X T:GETF < 840105 T:GETF T:PRDY T:TABC T:TABN T:GTIT ( T:GRFC T:GTIP 8 I:EVA0 I:EVA2 d <T:DE
0x335b5c…335cf0 Dummy {f00=0x00a8, f01=0x0190, f02=»:DSL I:RET T:TABC , T:TABD 0 T:TABE 4 T:EDWI I:EVT I:EDSK T:GRFC T:ENIN T:LOPS T:EOR T:EDWF T:SCR2 T:SCUR T:TABN T T:RCR ^ T:EINP B 840105 T:PKI T:PINP T:GRFC I:ETAB I:EVIN I:ECTR
0x335cf0…335e84 Dummy {f00=0x00a8, f01=0x0190, f02=»:ENIN T:ENI T:LOFS I:EGTB T:WRDY I:EVA0 I:EVA1 I:ECPY T:EVOU X I:EVI I:EVA3 I:EPIC jT:SETC K 840105 T:SETC T:PRDY T:GRFC T:EDWI T:RCTS T:SCUR T:WRDY * ,T:CLMI L 840105 T
0x335e84…336018 Dummy {f00=0x00a8, f01=0x0190, f02=» : T:RNOK < T:GRFC @ T:WRDY H T:EDIO T:SPAC T:CHBU n T:PRKB T:PRDY T:ADDY T:DSM XT:LSEG P 840105 T:LSEG T:CSEG I:RT1 T:LOFS F T:LOPS R f lT:DC00 R 840105 T:FDS0 DCREAD
0x336018…3361ac Dummy {f00=0x00a8, f01=0x0190, f02=»05 T:TEST TESTIO T:ABOR ABORT LT:CLO0 U 840105 T:SETT SETTIM T:GETT GETTIM 4T:DEL0 V 840105 T:DELA DELAY 6T:GTI0 W 840105 T:GETI GETTID T:DC X 8401
0x3361ac…336340 Dummy {f00=0x00a8, f01=0x0190, f02=» 840105 T:SWIT I:RT1 ^T:TEI [ 840105 T:TEST T:GDSP I:RT1 T:ABOR T:KIAA T:KIAC B bT:CLO 840105 T:SETT I:EVA0 I:RT1 T:GETT T:SETD . T:GETD D H >T:DEL ] 840105
0x336340…3364d4 (3, 148) Dummy {f00=0x00a8, f01=0x0190, f02=» P:BAS I:NTPB T:BAT T:RSTR F I:EVA0 T:PAUS f I:RT1 PT:UNUS a 840105 T:UNUS P:MTAB T:UER I:RT1 T:UERR ,T:EXIT c 840105 T:EXIT ZT:GTCW d 840105 T:GDSP GETCW I:EVA0
0x3364d4…336668 Dummy {f00=0x00a8, f01=0x0190, f02=» T:REAX T:SCW2 T:IO2 T:IREA T:XREA T:IXID I:EVA2 , T:DMW g 840105 T:SWRI T:WRIX T:IO1 T:XWRI T:DWRI T:SCW2 T:IO2 T:DREW $ T:IWRI 0 T:CREW > T:IREW L pT:DMDI i 840105
0x336668…3367fc Dummy {f00=0x00a8, f01=0x0190, f02=»:SCW2 T:GTBY T:IO2 T:IPOS T:WRIX T:IXID . .T:DCC k 840105 T:COPE T:COP1 T:DSB T:SCW2 T:WRIO T:IO1 T:CCLO " T:CCL1 & T:CCL2 * T:ACON P T:ACO1 T T:ACO2 X T:ACO3 T:PCON f T:PCO1 j T:P
0x3367fc…336990 Dummy {f00=0x00a8, f01=0x0190, f02=»ECE T:REC1 T:REAX T:OPT T:IO2 T:AREC T:ARE1 $ T:STCW T:SCW2 D ~T:DCS q 840105 T:SEND T:SEN1 T:WRIX T:OPT T:IO1 T:ASEN " T:ASE1 & T:STCW T:SCW2 H HT:IO s 840105 T:KI T
0x336990…336b24 Dummy {f00=0x00a8, f01=0x0190, f02=» T:DSC2 T:XSTA T:WAIT T:MWAI T:IO1 T:IO2 ` T:IO3 d T:IO5 p T:IORE t T:GCW2 T:GTCW I:RT1 T:IOEN T:EDWR I:EDW T:EDWE T:EDWF T:EDWI T:EDIO T:KIPR 6 I:EVA7 T:FDS0 T:GDSP P:MTAB
0x336b24…336cb8 Dummy {f00=0x00a8, f01=0x0190, f02=» T:CW { 840105 T:STCW I:EVA2 T:SCW0 T:BCDB $ T:GTCW T:BINB T:KIAA T:KIAC T:GCW2 T:SCW2 >T:LEN 840105 GETLEN I:EVA0 I:RT1 |T:ADIT 840105 T:RREA
0x336cb8…336e4c Dummy {f00=0x00a8, f01=0x0190, f02=» T:ABUF T:KIPR T:LSEG T:IORE T:KIAA T:KIAC ,T:ABUF 840105 T:ABUF PWRITEL 840105 WRITEL T:FDS0 T:DSM I:EVA0 T:IO2 8 DI:NTP 840105 I:MOV I:ADD I:SUB I:CMP I:MUL
0x336e4c…336fe0 Dummy {f00=0x00a8, f01=0x0190, f02=» T:LSEG I:NTP r I:NTPR r I:EVA0 I:EVA2 I:RT2 I:RT1 I:RT0 T:BAT T:PAT T:CAT I:EVB I v I:EVA 840105 P:MTAB I:EVA2 I:EVA1 I:EVA3 $ I:EVA6 ( I:EVA5 . I:EVA7 2 I:EVA0 T:LOFS T:LOPS
0x336fe0…337174 (3, 149) Dummy {f00=0x00a9, f01=0x0190, f02=» 840105 I:CMP I:CPA n *I:CPA 840105 I:CPA | LI:MOV 840105 I:MOV I:MVC I:MBTD I:MDTB HI:MMOV 840105 I:MMOV I:EVA2 I:EVA0 I:MOV T VI:MUL 840105 I
0x337174…337308 Dummy {f00=0x00a9, f01=0x0190, f02=» I:ADD I:SH1R ,I:NTF 840105 I:NTFA 8 >I:EPIC 840105 I:EPIC I:EVA0 I:SCB I:EDTE 840105 I:EKIH I:EINH I:ETAB I:EVIN I:EVA0 I:EVA1 I:EBRI F I:EBR j I:EBRB n
0x337308…33749c Dummy {f00=0x00a9, f01=0x0190, f02=»0105 I:DLT I:EVS1 I:MCH I:INS p I:EVS2 I:CPY I:XCP I:MVC LI:EVS 840105 I:EVA0 I:EVS1 8 I:EVA2 I:EVS2 J STRIX 840105 I:EVNO I:ESKI I:EVA0 I:EBRI I:EBRB I:EBR I:ECW
0x33749c…337630 Dummy {f00=0x00a9, f01=0x0190, f02=»:EVT I:EDSK I:RT1 I:EVIN T:EVOU B STRIN2 840105 STRIN2 I:EXIT I:EVA0 T:CLMI I:MOV T:GRFC RSTROU2 840105 STROU2 I:EVA0 I:MOV T:GRFC I:EXIT ,USRFLD 840105 USRFLD
0x337630…3377c4 Dummy {f00=0x00a9, f01=0x0190, f02=»M T:GTBY T:GDSP T:ROLL T:RSTA T:SCW2 T:IO3 T:OPCH T:STCH T:IXCH T:USE 840105 T:USE I:EVA0 P:MTAB T:UERR T I:RT0 T:UER ` f @KEYB 840105 KBINP2 KBINP DCABOR
0x3377c4…337958 Dummy {f00=0x00a9, f01=0x0190, f02=»N L LMP2OF P LMP3ON T LMP3OF X LMP4ON LMP4OF ` LMP5ON d LMP5OF h LMP6ON p LMP6OF t SCRINF INSMOD STOVDU WCHAR POSUNP STOINF ATMASB DISCHA CRDOWN |TAB ATMASF GETVDU RDHOME LINE ERASUA D
0x337958…337aec Dummy {f00=0x00a9, f01=0x0190, f02=»0105 DCINP GETBUF RELBUF UNPACK DISMOD LMP3OF OPEN P CONCT DISCON SETTYM READW DCWRIT 2 ERROR RESKB TSTMES z SETSTA TSTSTA RDSTAT DCABOR CHKSTA LMP1ON DCOFLN TRPA PAID
0x337aec…337c80 Dummy {f00=0x00a9, f01=0x0190, f02=» < T:PRDY T:CASP ^ T:LOFS I:EVA3 I:EPIC T:LOPS I:EVA0 I:ECPY I:EVI 8T:ENLI 840105 I:EVNO I:ECPY I:EPIC I:ETXT I:ETAB I:EBRI I:EBRB I:EBR I:EXIT I:EFLA T:PINP T:PKI I:EFIL I:ESKI
0x337c80…337e14 (3, 150) Dummy {f00=0x00a9, f01=0x0190, f02=»:EOR > I:EDT 840105 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 ~ I:EDT I:ED1 I:EDW I:EVA6 I:EFL
0x337e14…337fa8 Dummy {f00=0x00a9, f01=0x0190, f02=» < I:ESL F I:ENL P I:ENL1 T I:EOR f T:EDWF I:ECW p T:EDWE I:ECWC z I:EFIL I:SCB lT:DCOM 840105 T:FDS0 DCREAD T:DCR1 DCWRTE T:DCW1 DCEXCH T:DCE1 PRINT 840105 PRINT
0x337fa8…33813c Dummy {f00=0x00a9, f01=0x0190, f02=»P COMINI ECBINI @KEYB1 840105 KBINP2 KBINP DCABOR READKB | READK2 RESKB ICVRED ICINP ICSET ICREAD ICWRT & ERROR : SOUND LMP1ON J LMP1OF N LMP2ON R LMP2OF V LMP3ON Z LMP3OF
0x33813c…3382d0 Dummy {f00=0x00a9, f01=0x0190, f02=»TMASB DISCHA CRDOWN |TAB ATMASF GETVDU RDHOME LINE ERASUA DISMOD ERASE ERASUP SAVE1 REST1 DISCON CONCT CHKSTA COPY N DISID TRPF TRPA CONPF @KEYB2 840105 KBINP2 KBINP DCABO
0x3382d0…338464 Dummy {f00=0x00a9, f01=0x0190, f02=»MP2ON L LMP2OF P LMP3ON T LMP3OF X LMP4ON LMP4OF ` LMP5ON d LMP5OF h LMP6ON p LMP6OF t SCRINF INSMOD STOVDU WCHAR POSUNP STOINF ATMASB DISCHA CRDOWN |TAB ATMASF GETVDU RDHOME LINE ERASUA
0x338464…3385f8 Dummy {f00=0x00a9, f01=0x40c2, f02=» 840105 PRINT OPEN CONCT SETTYM SETSTA TSTMES GETBUF READW RELBUF UNPACK ICSET ICREAD ICWRT COPP ATMASB RFMDUP COMINI ECBINI CRDOWN |TAB ATMASF GETVDU RDHOME LINE ERASUA
0x3385f8…33878c Dummy {f00=0x00a9, f01=0x0190, f02=» * C ` J P********************************************************************** D PCR EQU * D l P LDR A1,A6 GET ATTRIBUTE D | P ANK A1,/C D P XRK A1,/C NONPRINT FIELD? D P RF(Z) CR100 YES D P LD A1,WCC,A11 D P ANK A1,/3
0x33878c…338920 Dummy {f00=0x00a9, f01=0x0190, f02=» D r P LDK A1,0 RETURN CODE E P RTN A14 E & P EJECT E 6 J P********************************************************************* E D H P* * E H P* EM END MESSAGE
0x338920…338ab4 (3, 151) Opaque[0x194]
0x338ab4…338c48 # DirEnt {nam=»KEYB1 «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2540, f03=0x0000}
0x338ab4…338c48 IdxSect {
0x338ab4…338c48 f00 = 0x012a // 0x338ab4 @0x0
0x338ab4…338c48 f01 = 0x002e // 0x338ab6 @0x2
0x338ab4…338c48 gno = [ // 0x338ab8 @0x4
0x338ab4…338c48 [0x00]: C0x012a.0x0.0
0x338ab4…338c48 [0x01]: C0x012a.0x1.0
0x338ab4…338c48 [0x02]: C0x012a.0x2.0
0x338ab4…338c48 [0x03]: C0x012a.0x3.0
0x338ab4…338c48 [0x04]: C0x012b.0x0.0
0x338ab4…338c48 [0x05]: C0x012b.0x1.0
0x338ab4…338c48 [0x06]: C0x012b.0x2.0
0x338ab4…338c48 [0x07]: C0x012b.0x3.0
0x338ab4…338c48 [0x08]: C0x012c.0x0.0
0x338ab4…338c48 [0x09]: C0x012c.0x1.0
0x338ab4…338c48 [0x0a]: C0x012c.0x2.0
0x338ab4…338c48 [0x0b]: C0x012c.0x3.0
0x338ab4…338c48 [0x0c]: C0x012d.0x0.0
0x338ab4…338c48 [0x0d]: C0x012e.0x0.0
0x338ab4…338c48 [0x0e]: C0x012e.0x1.0
0x338ab4…338c48 [0x0f]: C0x012f.0x1.0
0x338ab4…338c48 [0x10]: C0x012f.0x2.0
0x338ab4…338c48 [0x11]: C0x012f.0x3.0
0x338ab4…338c48 [0x12]: C0x0130.0x0.0
0x338ab4…338c48 [0x13]: C0x0130.0x1.0
0x338ab4…338c48 [0x14]: C0x0130.0x2.0
0x338ab4…338c48 [0x15]: C0x0130.0x3.0
0x338ab4…338c48 [0x16]: C0x0131.0x1.0
0x338ab4…338c48 ]
0x338ab4…338c48 }
0x338c48…338ddc Dummy {f00=0x012a, f01=0x0190, f02=» 4 P IDENT KEYB1 REL 11.0 DK 831110 NJ 870150541100 P DK3 PA 4-9 830113 NJ < $ P DK2 RESTORE A1 AFTER DC ABRT P DK1,ERASE ONE LINE 'EOF' P =3 ERASE TO END OF FIELD P =2 TWO DC-LINES P 82-02-28 P =1, SYSTE
0x338ddc…338f70 Dummy {f00=0x012a, f01=0x0190, f02=» * z D P* MODULE KEYB * 2 D P* MODULE HANDLING THE KEYBOARD DEVICE * z D P* (EMULATION 3270 SNA/SDLC, BSC) * D
0x338f70…339104 Dummy {f00=0x012a, f01=0x0190, f02=»* R P EJECT D P*************************************************************** D P* * ` D P* LIST OF ROUTINES * D P*
0x339104…339298 Dummy {f00=0x012a, f01=0x0190, f02=» KB-COMPLETION TABLE FOR DIFF. MODES * < P* KBCPLO KB-COMPLETION ROUTINE IN LOCAL MODE 8 D P* KBCPSY KB-COMPLETION ROUTINE IN SYSTEM MODE * x D P* KBCPJO KB-COMPLETION ROUTINE IN MY JOB MODE * D P
0x339298…33942c Dummy {f00=0x012a, f01=0x0190, f02=» P . P* ICVRED KB/VDU INTERTASK READ ( P* ICINP INTERTASK INPUT : . P* ICSET SET INTERTASK TIMEOUT f ( P* ICREAD READ INTERTASK ( P* ICWRT WRITE INTERTASK D P* ERROR ILL
0x33942c…3395c0 Dummy {f00=0x012a, f01=0x0190, f02=» SIGNAL ROUTINE * D P* KEYTAB KEY-TABLE, FIXED ENTRY FOR EACH FUNC. * 8 D P* CHAR ALPHA. CHAR HANDLING * D P* NUM NUM. CHAR HANDLING *
0x3395c0…339754 (3, 152) Dummy {f00=0x012a, f01=0x0190, f02=» * X D P* BAKTAB TAB. UNPROT. BACKWARDS * D P* TAB TAB. UNPROT. FORWARDS * d D P* CRNL TAB. UNPROT. NEXT LINE * D P* RDHOME
0x339754…3398e8 Dummy {f00=0x012a, f01=0x0190, f02=»RINPT ERASE UNPROT. ENTIRE SCREEN * D P* INSERT INSERT HANDLING * < D P* DELETE DELETE HANDLING * D P* RESET RESET HANDLING
0x3398e8…339a7c Dummy {f00=0x012a, f01=0x0190, f02=» * D P* ZERO:2,3 DOUBLE & TRIPLE ZERO HANDLING * D P* OFLINE OFFLINE HANDLING * D P* MFCHGE MAIN FRAME CHANGE * D P* COPY LOCAL H
0x339a7c…339c10 Dummy {f00=0x012a, f01=0x0190, f02=» KEYLOCK STATUS HANDLING * | " P* TESTM TEST MODE 4 D P* ENTER ENTER HANDLING * Z D P* CLEAR CLEAR HANDLING * D P* SYSREQ SYSTEM RE
0x339c10…339da4 Dummy {f00=0x012a, f01=0x0190, f02=»ROGRAM ACCESS HANDLING * z D P* PF PROGRAM FUNCTION HANDLING * 2 D P* RETURN RETURN * z D P* * D
0x339da4…339f38 Dummy {f00=0x012a, f01=0x0190, f02=»*** ` 8 P* * 8 P* ENTRY POINTS * H 8 P* * 8 P**************************************************** P . P ENT
0x339f38…33a0cc Dummy {f00=0x012a, f01=0x0190, f02=» LMP1ON LAMPROUTINES P ENTRY LMP1OF . P ENTRY LMP2ON . 4 P ENTRY LMP2OF . L P ENTRY LMP3ON . d P ENTRY LMP3OF . | P ENTRY LMP4ON . P ENTRY LMP4OF . P ENTRY LMP5ON . P ENTRY LMP5OF . P ENTRY LMP6ON .
0x33a0cc…33a260 Dummy {f00=0x012a, f01=0x0190, f02=»NDICATION | ( P ENTRY TAB TAB FOREWARD UNPROTECTED , P ENTRY CRDOWN MOVE CURSOR DOWN ONE LINE > $ P ENTRY ICVRED VDU INTERTASK READ n P ENTRY ICINP INTERTASK INPUT & P ENTRY ICSET SET INTERTASK TIMEOUT P ENTRY ICWRT WRITE INTERTASK P
0x33a260…33a3f4 (3, 153) Dummy {f00=0x012a, f01=0x0190, f02=» * : P* EXTERNAL REFERENCES * . : P* * l : P****************************************************** P & P EXTRN I:RT1 RETURN TO C
0x33a3f4…33a588 Dummy {f00=0x012a, f01=0x018e, f02=»R ABORT DC-REQUEST (DCSNA,DCBSC) * P EXTRN ERASE ERASE ENTIRE SCREEN (VDU) ( 8 P EXTRN ERASUA ERASE ALL UNPROTECTED TO ADDRESS (VDU) V . P EXTRN ERASUP ERASE ALL UNPROTECTED (VDU) 2 P EXTRN TRPA TRANSMIT SHORT READ (DCSNA,DCBSC) 4 P EXTRN TRPF TR
0x33a588…33a71c Dummy {f00=0x012a, f01=0x0190, f02=» b . P EXTRN SOUND SOUND ALARM ON DISPLAY (VDU) . P EXTRN SCRINF GET SCREEN INFORMATION (VDU) : 0 P EXTRN STOINF SAVE SCREEN INFORMATION (VDU) l 0 P EXTRN GETVDU GET CHAR. IN VDU BUFFER (VDU) 2 P EXTRN STOVDU STORE CHAR. IN VDU BUFFER (VDU) &
0x33a71c…33a8b0 Dummy {f00=0x012a, f01=0x0190, f02=»(VDU) n 6 P EXTRN DCOFLN INDICATE OFFLINE TO DC (DCSNA,DCBSC) 0 P EXTRN DISMOD DISPLAY MODIFIED FIELDS (VDU) H . P EXTRN CONPF CONVERT PF-KEY TABLE (CONVER) | * P EXTRN OPSYS OPEN SYSTEM (DCSNA,DCBSC) $ P EXTRN LINE GET LINE FLAG (VDU) & P EXT
0x33a8b0…33aa44 Dummy {f00=0x012a, f01=0x0190, f02=»BUF GET BUFFER (PAD) & P EXTRN RELBUF RELEASE BUFFER (PAD) * P EXTRN DISSTA DISPLAY STATISTICS (VDU) F * P EXTRN RDSTAT READ STATISTICS (DCBSC) t 2 P EXTRN CHKSTA CHECK LINE STATUS (DCBSC,DCSNA) $ P EXTRN SETSTA SET STATUS (DCSNA) $ P EXTRN C
0x33aa44…33abd8 Dummy {f00=0x012a, f01=0x0190, f02=»*************** b B P* * B P* CONDITIONAL ASSEMBLY PARAMETERS * ^ B P* * B P******************************
0x33abd8…33ad6c Dummy {f00=0x012a, f01=0x018e, f02=»NG IF :=1 x POFLIN EQU 0 $ PX:D EQU 1 NUMBER OF LINES (1-2) & PNBRLIN EQU 2 N $ PX:F EQU 0 KEY-LOCK STATUS IF:=1 b PKEYLST EQU 0 $ PX:G EQU 0 PF KEY HANDLING IF:=1 PPFX EQU 1 $ PX:H EQU 0 PA KEY HANDLING IF :=1 PPAX EQU
0x33ad6c…33af00 Dummy {f00=0x012a, f01=0x0190, f02=» * PX:M EQU 0 COPY COMMAND INCLUDED IF:=1 PCOPCMD EQU 1 2 & PX:O EQU 0 TEST MODE INCLUDED IF:=1 F PTEST EQU 0 p 0 PX:P EQU 0 COPY LOCK FUNCTION INCLUDED IF:=1 PCOPL EQU 0 P EJECT D P**************************************************
0x33af00…33b094 (3, 154) Dummy {f00=0x012a, f01=0x0190, f02=»* * D P*************************************************************** H P P* P* PREDEFINED KEYS P* * PCRUP EQU /80 FIRST "MOVE CURSOR " KEY , PERFKEY EQU /88
0x33b094…33b228 Dummy {f00=0x012a, f01=0x0190, f02=»FKLKEY EQU /94 FIRST KEYLOCK VALUE & PLKLKEY EQU /9C LAST KEYLOCK VALUE * ( PFIPA EQU /9F FIRST PROGRAM ATTN. KEY T PENTKEY EQU /A0 ENTER KEY & PSYSKEY EQU /A1 SYSTEM REQUEST KEY PCLRKEY EQU /A2 CLEAR KEY & PPFKEY EQU /B1 PROGRAM FUNTION
0x33b228…33b3bc Dummy {f00=0x012a, f01=0x0190, f02=»DDRESS | PECBRL EQU 4 REQUESTED LENGTH PECBEL EQU 6 EFFECTIVE LENGTH 2 PECBRC EQU 8 RETURN CODE V PECBCW EQU 10 CONTROL WORD v & PECBCW2 EQU 12 CONTROL WORD TWO DK P* P* SPECIAL CHARACTERS P* PNULL EQU 0 NULL CHAR.
0x33b3bc…33b550 Dummy {f00=0x012a, f01=0x0190, f02=»N EQU /B7 PLOF EQU /B8 PLFL EQU /B9 FLASH & P IFT KB6272=1 @ PLAMP1 EQU /20 V PLAMP2 EQU /10 l PLAMP3 EQU 8 PLAMP4 EQU 4 PLAMP5 EQU 2 PLAMP6 EQU 1 P XIF P IFF KB6272=1 PLAMP1 EQU 0 P
0x33b550…33b6e4 Dummy {f00=0x012a, f01=0x0190, f02=»IZE P* PLLINE EQU 80 LINE LENGTH PLBVDU EQU 1920 TOTAL SIZE 6 P* X P* MODES b P* r PNEWMOD EQU /8000 NEW MODE | * PHCPMOD EQU /4000 HARDCOPY OUTSTANDING PMYJOB EQU /0004 MY JOB MODE ( PSYSOP EQU /0002 SYSTEM O
0x33b6e4…33b878 Dummy {f00=0x012a, f01=0x0190, f02=»K v P EJECT P* P* RELATIVE ADDRESSES IN " P* TERMINAL WORKBLOCK B P* ^ PBVDU EQU 2 VDU SCREEN BUFFER h $ PLINFLG EQU BVDU+1920 LINE FLAGS PWCC EQU LINFLG+30 WCC CHAR. . PKBINH EQU WCC+2 KEYBOARD INHIBIT INDICATOR $
0x33b878…33ba0c Dummy {f00=0x012a, f01=0x0190, f02=»2 INSERT MODE SWITCH $ PKEYS EQU MODE+2 KEY LOCK STATUS 4 PRDMORE EQU KEYS+12 BRANCH ADDRESS TO NEXT KB-KEY D 2 PCURPOS EQU RDMORE+2 CURSOR POS. IN SYSTEM MODE | PREGI EQU CURPOS+4 SAVE AREA PSNAMOD EQU REGI+32 SNA MODE PBSCMOD EQU SNA
0x33ba0c…33bba0 Dummy {f00=0x012a, f01=0x0190, f02=» j * PECBICW EQU ECBICR+2 ECB INTERTAS WRITE , PECBKB2 EQU ECBICW+6 ECB 2ND KEYBOARD DK 6 P* f P* RELATIVE ADDRESSES IN p P* COMMON WORKBLOCK P* P IFF TEST=1 PTSKTAB EQU 26 TASK TABLE P XIF P IFT TEST=1 P
0x33bba0…33bd34 (3, 155) Dummy {f00=0x012b, f01=0x0190, f02=» * D P* KBINP MAIN ROUTINE * D D P* * D P****************************************************
0x33bd34…33bec8 Dummy {f00=0x012b, f01=0x0190, f02=»RVED P* A6= RESERVED P* A7= KEY-HANDLING INDICATOR " P* A11= CREDIT WORK AREA F P* A13= RESERVED f P* ~ @ P*********************************************************** PKBINP2 EQU * . P LDK A1,1 INDICATE 2ND KEYBOARD PRESEN
0x33bec8…33c05c Dummy {f00=0x012b, f01=0x0190, f02=»EYLST=0 ( P LD A1,ECBCW,A8 SEE IF KEYLOCK ? DK P RF(N) KBIN80 SKIP IT DK < P XIF P IFT KEYLST=1 h & P LC* A2,ECBBA,A8 GET KEYLOCK VALUE ~ * P ADKL A2,FKLKEY-/70 PREPARE FOR TABLE P SC* A2,ECBBA,A8 RESTORE P XIF P LD A1
0x33c05c…33c1f0 Dummy {f00=0x012b, f01=0x0190, f02=»NZ) KBIN80 YES $ P LC* A2,ECBBA,A8 GET INPUT CHAR. ! P ANK A2,/FF ! > P LD A1,KBINH,A11 ! R " P ANK A1,6 MUST BE A RESET KEY? ! j P RF(Z) KBIN30 NO ! P CWK A2,RSET RESET KEY? ! P IFT SNA=1 ! P RF(E) KBIN30 YES ! & P CWK A2,SYSKEY SYSTE
0x33c1f0…33c384 Dummy {f00=0x012b, f01=0x0190, f02=» RF(N) KBIN80 ILLEGAL CHAR ! P CWK A2,LAKEY " " P RF(G) KBIN80 ILLEGAL CHAR " 8 P IFT SNA=1 " Z " P LD A1,SNAMOD,A11 GET SNA MODE " l P ANK A1,/FF " 2 P CFI A14,CPLKB,A1 COMPLETE KB IN CURRENT MODE " P XIF " P IFF SNA=1 " P LDK A7,0 "
0x33c384…33c518 Dummy {f00=0x012b, f01=0x0190, f02=»ABOR " PKBIN40 EQU * # P XIF # P LDR A7,A7 ANY KEY-HANDLING # , P RF(NZ) KBIN80 NO # P $ P ADR A3,A3 PREPARE FOR KEY-TABLE # j & P LD A1,RDMORE,A11 KEY IN SEQUENCE? # P RF(Z) KBIN50 NO # $ P CF A14,DCABOR KILL DC AGAIN DK # $ P LD A1,RDMOR
0x33c518…33c6ac Dummy {f00=0x012b, f01=0x018e, f02=»TO RESP. KEY-HANDLER # v P RF KBIN90 $ PKBIN80 EQU * $ . " P CF A14,RESKB RESET KB BUFFER $ B PKBIN90 EQU * $ h P RTN A14 $ | P EJECT $ P IFT SNA=1 $ J P********************************************************************* $ J P*
0x33c6ac…33c840 Dummy {f00=0x012b, f01=0x0190, f02=» $ H J P* * % J P********************************************************************* % V PCPLKB EQU * % ( P DATA KBCPLO KB-COMPL. IN LOCAL MODE % * P DATA KBCPSY KB-COMPL. IN SYSTEM MOD
0x33c840…33c9d4 (3, 156) Dummy {f00=0x012b, f01=0x018e, f02=»*** % N J P* * & J P* KBCLO KB-COMPLETION IN LOCAL MODE * & Z J P* * & J P******************
0x33c9d4…33cb68 Dummy {f00=0x012b, f01=0x0190, f02=» & x P* A4= RESERVED ' P* A5= RESERVED ' P* A6= RESERVED ' 4 P* A7= KEY-HANDLING INDICATOR ' J P* A11= CREDIT WORK AREA ' n P* A13= RESERVED ' P* ' @ P*********************************************************** ' PKBCPLO EQU * ' $ P
0x33cb68…33ccfc Dummy {f00=0x012b, f01=0x0190, f02=» " P CWK A2,SYSKEY SYSTEM REQUEST? ( P RF(NE) KBCL80 NO ( * & P CF A14,OPSYS START COMMUNICATION ( D P CF A14,TSTSTA TEST STATUS ( n P ANKL A1,/101 ACTIVE? ( P RF(NZ) KBCL90 NO ( & P LDK A1,SYSOP INDICATE SYSTEM MODE ( , P ORKL A1,/8000 INDICAT
0x33ccfc…33ce90 Dummy {f00=0x012b, f01=0x0190, f02=»85 NO ( , P LD A1,RDMORE,A11 INSIDE IDENT ROUTINE? ) P RF(Z) KBCL85 NO ) > $ P LDK A7,0 INDICATE KEY-HANDLING ) V P RF KBCL90 ) ~ PKBCL85 EQU * ) P CF A14,ERROR ILLEGAL KEY ) PKBCL90 EQU * ) P RTN A14 ) P EJECT ) H P****************
0x33ce90…33d024 Dummy {f00=0x012b, f01=0x0190, f02=»* KBCPSY KB-COMPLETION IN SYSTEM MODE * ) H P* * * L H P******************************************************************** * P* REGISTERS * P* * P* A2=
0x33d024…33d1b8 Dummy {f00=0x012b, f01=0x0190, f02=»ATOR * x P* A11= CREDIT WORK AREA + P* A13= RESERVED + , P* + D @ P*********************************************************** + N PKBCPSY EQU * + $ P LDK A7,0 INDICATE KEY-HANDLING + $ P CWK A2,FIPA PROGRAM ATTN. KEY? + P RF(L) KBCS20 NO +
0x33d1b8…33d34c Dummy {f00=0x012b, f01=0x0190, f02=» CF A14,ERASE ERASE ENTIRE SCREEN + P RF KBCS80 , * PKBCS10 EQU * , < P RF(G) KBCS70 YES , P P CM MODE,A11 , j $ P CF A14,LMP6OF CLEAR INSERT MODE , ~ P CF A14,DCABOR ABORT DC , P RF KBCS80 , PKBCS20 EQU * , $ P CWK A2,ERIKEY ERASE INPUT K
0x33d34c…33d4e0 Dummy {f00=0x012b, f01=0x0190, f02=»OR? =1 , v P RF(NL) KBCS90 NO =1 - P LD A1,CURPOS,A11 - * " P CWK A1,/800 CURSOR INITIATED? - D P RF(NE) KBCS90 YES - j $ P CF A14,SCRINF GET SCREEN INFO. - & P ST A4,CURPOS,A11 INITIATE CURSOR - P RF KBCS90 - PKBCS70 EQU * - P CF A14,ERRO
0x33d4e0…33d674 (3, 157) Dummy {f00=0x012b, f01=0x0190, f02=» - h P ORS A1,SNAMOD,A11 . PKBCS90 EQU * . " P RTN A14 . 6 P EJECT . F F P****************************************************************** . T F P* * . F P* KBCPJO KB-COMPLETI
0x33d674…33d808 Dummy {f00=0x012b, f01=0x0190, f02=»********************************************** . | P* REGISTERS / 6 P* / J P* A2= KEY-CHAR / T P* A3= KEY-TABLE INDEX / j P* A4= RESERVED / P* A5= RESRVED / P* A6= RESRVED / P* A7= KEY-HANDLING INDICATOR / P* A11= CREDIT WORK AREA /
0x33d808…33d99c Dummy {f00=0x012b, f01=0x0190, f02=»0 INDICATE KEY-HANDLING / $ P CWK A2,FIPA PROGRAM ATTN. KEY? 0 P RF(L) KBCJ90 NO 0 H P IFT OFLIN=1 0 ` P RF(E) KBCJ80 0 t P XIF 0 P IFT SNA=1 0 P CM MODE,A11 0 ( P CF A14,LMP6OF TURN OFF INSERT LAMP 0 P CF A14,DCABOR ABORT DC 0 P
0x33d99c…33db30 Dummy {f00=0x012b, f01=0x0190, f02=» P IFT SNA=1 1 PKBCJ90 EQU * 1 P RTN A14 1 * P XIF 1 : P EJECT 1 F D P*************************************************************** 1 T D P* * 1 D P* READKB READ KEYBOARD W
0x33db30…33dcc4 Dummy {f00=0x012b, f01=0x0190, f02=»*********************************** 1 t P* REGISTERS 2 , P* 2 H P* A8= KB-ECB 2 R P* A11= CREDIT WORK AREA 2 f P* A13= RESERVED 2 P* 2 : P***************************************************** 2 PREADKB EQU * 2 P LD A8,ECBKB,A
0x33dcc4…33de58 Dummy {f00=0x012b, f01=0x0190, f02=»...DK 81-10-17 * 2 t P LDK A7,2 STANDARD READ 3 P LKM 3 : P DATA 1 3 F P RTN A14 3 V 0 P** READ FROM SECOND KEYBOARD, P & T, DK ** 3 f PREADK2 EQU * 3 P LD A8,ECBKB2,A11 GET ECB 3 P LDK A7,0 CLEAR ECBCW 3 P ST A7,ECBCW,A8 3
0x33de58…33dfec Dummy {f00=0x012b, f01=0x0190, f02=»IFICATION ** 3 P EJECT 4 D P*************************************************************** 4 $ D P* * 4 l D P* RESKB RESET KEYBOARD BUFFER * 4 D P*
0x33dfec…33e180 Dummy {f00=0x012b, f01=0x018e, f02=» REGISTERS 4 P* 5 P* A11= CREDIT WORK AREA 5 & P* A13= RESERVED 5 F P* 5 ^ : P****************************************************** 5 h PRESKB EQU * 5 2 P* REMOVED UNTIL NEEDED......DK, 811028....** 5 P RTN A14 5 P EJECT 5
0x33e180…33e314 (3, 158) Dummy {f00=0x012b, f01=0x0190, f02=» 5 R " P* ICVRED KB/VDU INTERTASK READ 6 @ P* * 6 . @ P*********************************************************** 6 r P* REGISTERS 6 P* 6 P* A2= RESERVED 6 P* A11= CREDIT WORK A
0x33e314…33e4a8 Dummy {f00=0x012b, f01=0x0190, f02=»D A8,ECBICR,A11 6 P CF A14,ICSET SET NO TIMEOUT 7 P IFF COPCMD=1 7 < P LD A1,PRTID,A11 7 R P XIF 7 j P IFT COPCMD=1 7 v P LDK A1,0 UNADDRESSED 7 P XIF 7 P LDKL A3,REGI 7 P ADR A3,A11 7 P LDK A2,2 LENGTH 7 " P CF A14,ICREAD R
0x33e4a8…33e63c Dummy {f00=0x012b, f01=0x0190, f02=» * 7 D P* ICINP INTERTASK INPUT * 8 < D P* * 8 D P************************************************************
0x33e63c…33e7d0 Dummy {f00=0x012b, f01=0x0190, f02=»************************************************ 8 PICINP EQU * 9 8 P LD* A2,ECBBA,A8 9 L P IFT COPCMD=1 9 d P LDR A1,A2 COPY COMMAND? 9 z P RF(NN) ICIN80 NO 9 P LDKL A3,BVDU BUFFER TO SEND 9 P ADR A3,A11 9 P IFT COPL=1 9 ( P LCR A2,
0x33e7d0…33e964 Dummy {f00=0x012b, f01=0x0190, f02=» YES DON'T COPY 9 PICIN20 EQU * : P XIF : , P IFT COPCMD=1 : 8 P LD A2,ECBCW,A8 GET TO WHOM : N P LD A8,ECBICW,A11 : r P CF A14,ICSET SET TIMEOUT : P LDR A1,A2 : P LDKL A2,LBVDU+/20 LENGTH : P CF A14,ICWRT SEND IT AWAY : ( P LDK
0x33e964…33eaf8 Dummy {f00=0x012b, f01=0x0190, f02=»T HARDCOPY OUTSTANDING : | P IFT SNA=1 ; P XRS A1,SNAMOD,A11 ; 0 P XIF ; J P IFF SNA=1 ; V P XRS A1,BSCMOD,A11 ; h P XIF ; P ANK A2,1 PRINTER OK? ; P RF(Z) ICIN90 YES ; PICIN90 EQU * ; P RTN A14 ; P EJECT ; @ P****************
0x33eaf8…33ec8c Dummy {f00=0x012b, f01=0x0190, f02=» SET INTERTASK TIMEOUT * ; ~ > P* * < 2 @ P*********************************************************** < t P* REGISTERS < P* < P* A2= RESERVED < P* A8= INTERTASK
0x33ec8c…33ee20 Dummy {f00=0x012b, f01=0x0190, f02=»ICSET EQU * < P LDKL A1,-1 NO TIMEOUT = P ST A1,ECBCW,A8 = 2 P LDK A7,/B9 SET TIMEOUT = J P LKM = j P DATA 1 = v P RTN A14 = P EJECT = B P************************************************************* = B P*
0x33ee20…33efb4 (3, 159) Dummy {f00=0x012c, f01=0x0190, f02=» * = v B P************************************************************** > , P* REGISTERS > r P* > P* A1= TASK ID > P* A2= LENGTH > P* A3= BUFFER ADDRESS > P* A8= INTETASK READ ECB > P* A1
0x33efb4…33f148 Dummy {f00=0x012c, f01=0x018e, f02=» > P ST A1,ECBCW,A8 TASK ID ? P ST A2,ECBRL,A8 LENGTH ? ( " P ST A3,ECBBA,A8 BUFFER ADDRESS ? F P LDK A7,/02 READ ? l P LKM ? P DATA 1 ? P RTN A14 ? P EJECT ? D P*************************************************************** ? D P*
0x33f148…33f2dc Dummy {f00=0x012c, f01=0x0190, f02=» ? N D P* * @ D P*************************************************************** @ P P* REGISTERS @ P* @ P* A1= TASK ID @ P* A2= LENGTH @ P* A3= BUFFER ADDRESS @
0x33f2dc…33f470 Dummy {f00=0x012c, f01=0x0190, f02=»********************** @ f PICWRT EQU * A P ST A1,ECBCW,A8 TASK ID A 2 P ST A2,ECBRL,A8 LENGTH A R " P ST A3,ECBBA,A8 BUFFER ADDRESS A p P LDK A7,/86 WRITE A P LKM A P DATA 1 A P RTN A14 A P EJECT A H P******************************
0x33f470…33f604 Dummy {f00=0x012c, f01=0x018e, f02=» ILLEGAL KEY-HANDLING * A H P* * B > H P******************************************************************* B P* REGISTERS B P* B P* A11= CREDI
0x33f604…33f798 Dummy {f00=0x012c, f01=0x0190, f02=» ( P CF A14,LMP4ON TURN ON 'ERROR' LAMP C P LDK A1,4 RESET ALLOWED C 0 P ORS A1,KBINH,A11 C P & P CF A14,SOUND TURN ON SOUND ALARM C j P RTN A14 C P C P EJECT C B P************************************************************* C B P*
0x33f798…33f92c Dummy {f00=0x012c, f01=0x0190, f02=» * C B P************************************************************* D B PLMP1ON LDK A1,LAMP1 D P RF LMPON D PLMP1OF LDK A1,LAMP1 D P RF LMPOF D PLMP2ON LDK A1,LAMP2 D P RF LMPO
0x33f92c…33fac0 Dummy {f00=0x012c, f01=0x0190, f02=»POF D PLMP4ON LDK A1,LAMP4 E P RF LMPON E ( PLMP4OF LDK A1,LAMP4 E : P RF LMPOF E V PLMP5ON LDK A1,LAMP5 E h P RF LMPON E PLMP5OF LDK A1,LAMP5 E P RF LMPOF E PLMP5FL LDK A1,LAMP5 E P RF LMPFL E PLMP6ON LDK A1,LAMP6 E
0x33fac0…33fc54 (3, 160) Dummy {f00=0x012c, f01=0x0190, f02=»OF E P RF SDISP F PLMPFL LDK A7,LFL F P RF SDISP F 4 P EJECT F F B P************************************************************* F T B P* * F B P* SDISP SIGNAL ROUTINE
0x33fc54…33fde8 Dummy {f00=0x012c, f01=0x0190, f02=»************************* F l P* REGISTERS G " P* G > P* A8= SIGNAL ECB G H P* A11= CREDIT WORK AREA G ` P* A13= RESERVED G P* G < P******************************************************* G PSDISP EQU * G P LD A8,ECBSD,A11 G
0x33fde8…33ff7c Dummy {f00=0x012c, f01=0x0190, f02=»ILE CODE G | P SC A1,1,A8 H P LKM H & $ P DATA 1 LAMPS ON SECOND KEYB'RD H 4 PSDISP1 EQU * H P LD A8,ECBSD,A11 H r * P LDK A1,/40 RESTORE FILE CODE 1ST KB H P SC A1,1,A8 H P** END OF DK MODS ** H P LKM H P DATA 1 H P
0x33ff7c…340110 Dummy {f00=0x012c, f01=0x0190, f02=» * H n D P* KEYTAB KEY-TABLE, FIXED ENTRY FOR EACH FUNC. * I & D P* * I n D P**************************************************************** I PKEYTAB EQU
0x340110…3402a4 Dummy {f00=0x012c, f01=0x0190, f02=» I P DATA CHAR & J P DATA CHAR ' J P DATA CHAR ( J 0 P DATA CHAR ) J D P DATA CHAR * J X P DATA NUM + J l P DATA NUM , J P DATA NUM - J P DATA NUM . J P DATA CHAR / J P*30 J P DATA NUM 0 J P DATA NUM 1 J P DAT
0x3402a4…340438 Dummy {f00=0x012c, f01=0x0190, f02=» DATA NUM 9 J P DATA CHAR : K P DATA CHAR ; K ( P DATA CHAR < K < P DATA CHAR = K P P DATA CHAR > K d P DATA CHAR ? K x P*40 K P DATA CHAR K P DATA CHAR A K P DATA CHAR B K P DATA CHAR C K P DATA CHAR D K P DATA CHAR E K
0x340438…3405cc Dummy {f00=0x012c, f01=0x0190, f02=» L K P DATA CHAR M L P DATA CHAR N L P DATA CHAR O L 2 P*50 L F P DATA CHAR P L R P DATA CHAR Q L f P DATA CHAR R L z P DATA CHAR S L P DATA CHAR T L P DATA CHAR U L P DATA CHAR V L P DATA CHAR W L P DATA CHAR X L P D
0x3405cc…340760 Dummy {f00=0x012c, f01=0x018e, f02=» P*60 M P DATA CHAR M P DATA CHAR a LOWER CASE A-Z M " P DATA CHAR b M F P DATA CHAR c M Z P DATA CHAR d M n P DATA CHAR e M P DATA CHAR f M P DATA CHAR g M P DATA CHAR h M P DATA CHAR i M P DATA CHAR j M P DATA CHAR k M
0x340760…3408f4 (3, 161) Dummy {f00=0x012c, f01=0x018e, f02=» P DATA CHAR r N P DATA CHAR s N P DATA CHAR t N , P DATA CHAR u N @ P DATA CHAR v N T P DATA CHAR w N h P DATA CHAR x N | P DATA CHAR y N P DATA CHAR z N P DATA CHAR N P DATA CHAR N P DATA CHAR N P DATA CHAR N P DATA RE
0x3408f4…340a88 Dummy {f00=0x012c, f01=0x0190, f02=» N P DATA CRNL O P DATA RDHOME O P DATA EREOF O . P DATA ERINPT O B P IFT IN:DL=1 O V P DATA INSERT O j P DATA DELETE O ~ P XIF O P IFF IN:DL=1 O P DATA RETURN O P DATA RETURN O P XIF O P DATA RESET O P DATA DUP O
0x340a88…340c1c Dummy {f00=0x012c, f01=0x0190, f02=»FT KEYLST=1 O P DATA KEYL P P DATA KEYL P & P DATA KEYL P 8 P DATA KEYL P J P DATA KEYL P P DATA KEYL P n P DATA KEYL P P DATA KEYL P P XIF P P IFF KEYLST=1 P P DATA RETURN P P DATA RETURN P P DATA RETURN P P DATA
0x340c1c…340db0 Dummy {f00=0x012c, f01=0x0190, f02=»W KEY (NOT P. A. KEY) P r 8 P DATA RETURN FREE LABEL FOR NEW KEY (NOT P. A. KEY) Q 8 P DATA RETURN FREE LABEL FOR NEW KEY (NOT P. A. KEY) Q Z P*FIRST P. A. KEY Q P IFT OFLIN=1 Q P DATA OFLINE Q P XIF Q P IFF OFLIN=1 Q P DATA RETURN Q
0x340db0…340f44 Dummy {f00=0x012c, f01=0x0190, f02=»FF SNA=1 Q P DATA RETURN R P DATA CLEAR R $ P DATA RETURN R 8 P XIF R L P IFT NBRLIN=2 R X P DATA RETURN R n P XIF R P IFF NBRLIN=2 R P DATA RETURN R P XIF R P IFT PAX=1 R P DATA PAEX R P XIF R P IFF PAX=1 R P D
0x340f44…3410d8 Dummy {f00=0x012c, f01=0x0190, f02=» R P DATA PAALFA S P DATA PAALFA S P DATA PAALFA S 0 P DATA PAALFA S D P DATA PAALFA S X P*B0 S l P IFT PFX=1 S x P DATA PFEX S P XIF S P IFF PFX=1 S P DATA RETURN S P XIF S P DATA PF 1 S P DATA PF 2 S P DATA PF 3
0x3410d8…34126c Dummy {f00=0x012c, f01=0x0190, f02=» DATA PF 11 S P DATA PF 12 T P DATA PF 13 T ( P DATA PF 14 T < P DATA PF 15 T P P*C0 T d P DATA PF 16 T p P DATA PF 17 T P DATA PF 18 T P DATA PF 19 T P DATA PF 20 T P DATA PF 21 T P DATA PF 22 T P DATA PF 23
0x34126c…341400 Dummy {f00=0x012c, f01=0x0190, f02=»CT T B P************************************************************** U D P* * U P B P* CHAR ALPHABETIC AND SPEC. CHAR UPDAT. DISPL. * U B P*
0x341400…341594 (3, 162) Dummy {f00=0x012c, f01=0x0190, f02=»Y-CHAR U P* A3= ATTRIBUTE MASKL V P* A4= RESERVED V , P* A5= RESERVED V B P* A6= RESERVED V X P* A11= RESERVED V n P* A13= RESERVED V P* V B P************************************************************** V PCHAR EQU * V $ P LDK A3,
0x341594…341728 Dummy {f00=0x012c, f01=0x0190, f02=»****************************** V p B P* * W & B P* NUM NUMERIC UPDAT. DISPL. * W l B P* NUMCOM NUMERIC COMMA * W D P*
0x341728…3418bc Dummy {f00=0x012c, f01=0x0190, f02=»RS W P* X P* A2= KEY-CHAR X P* A3= ATTRIBUTE MASK X * P* A4= RESERVED X F P* A5= RESERVED X P* A6= RESERVED X r P* A11= RESERVED X P* A13= RESERVED X P* X B P************************************************************* X P
0x3418bc…341a50 Dummy {f00=0x012c, f01=0x018e, f02=»F CHAR. X v P RTN A14 Y P EJECT Y D P*************************************************************** Y . D P* * Y v D P* ANCOMM COMMON ROUTINE FOR ALPHANUM. CHAR. * Y D P*
0x341a50…341be4 Dummy {f00=0x012c, f01=0x0190, f02=» Y N P* REGISTERS Z P* Z P* A2= KEY-CHAR Z & " P* A3= AT ENTRY ATTRIBUTE MASK Z < P* A4= REL. CURSOR POS. Z b P* A5= REL. ATTRIBUTE POS. Z P* A6= ATTRIBUTE CHAR. Z P* A11= CREDIT WORK AREA Z P* A13= RESERVED Z P* Z D P******
0x341be4…341d78 Dummy {f00=0x012c, f01=0x0190, f02=» A4,A5 CURSOR ON ATTRIBUTE Z P RF(E) ANC800 YES [ " P LDR A1,A6 [ < P ANR A1,A3 ALLOWED POS. ? [ N P RF(NZ) ANC800 NO [ p P IFT IN:DL=1 [ P LD A1,MODE,A11 INSERT MODE? [ P RF(Z) ANC100 NO [ P CF A14,INSMOD [ P LDR A7,A1 [ P ANK A
0x341d78…341f0c Dummy {f00=0x012c, f01=0x0190, f02=» EQU * [ P LDR A1,A4 P LDR A7,A2 0 P CF A14,STOVDU STORE KEY-CHAR IN VDU BUFFER 2 * P CF A14,WCHAR DISPLAY CHAR AND CURSOR f 8 P CF A14,POSUNP MOVE CURSOR TO NEXT UNPROTECTED POS. P RF ANC900 PANC800 EQU * P CF A14,ERROR INDI
0x341f0c…3420a0 Dummy {f00=0x012c, f01=0x0190, f02=»* * @ P* CURMOV MOVE CURSOR ON SCREEN * ] D @ P* * ] @ P************************************************************
0x3420a0…342234 (3, 163) Dummy {f00=0x012d, f01=0x0190, f02=»UTE CHAR ] P* A11= RESERVED ^ P* A13= RESERVED ^ ( P* ^ @ @ P************************************************************ ^ J PCURMOV EQU * ^ $ P CF A14,SCRINF GET SCREEN INFO. ^ P SUK A2,CRUP GET INDEX ^ P ADR A2,A2 ^ , P CFI A14,CURTA
0x342234…3423c8 Dummy {f00=0x012d, f01=0x0190, f02=»YES ^ P LDR A1,A4 _ $ P CF A14,ATMASB UPDATE ATTRIBUTE _ PCURM10 EQU * _ F P LDK A1,2 REQ. LENGTH _ Z P CF A14,DISCHA SET CURSOR _ x P RTN A14 _ P EJECT _ $ P* CURTAB CURSOR JUMP TABLE _ PCURTAB EQU * _ $ P DATA CRLEFT MOVE CU
0x3423c8…34255c Dummy {f00=0x012d, f01=0x0190, f02=»CRLEFT MOVE CURSOR TO LEFT _ PCRLEFT EQU * ` ( P SUK A4,1 ` < $ P RF(NN) CRRET NOT LEFTMOST POS. ` N ( P LDKL A4,LBVDU-1 LAST POS. ON SCREEN ` v P RF CRRET ` ( P* CRRIGT MOVE CURSOR TO RIGHT ` PCRRIGT EQU * ` P ADK A4,1 ` P C
0x34255c…3426f0 Dummy {f00=0x012d, f01=0x0190, f02=»DOWN EQU * ` P ADKL A4,LLINE a P CWK A4,LBVDU LAST LINE? a ( P RF(L) CRRET NO a H P SUKL A4,LBVDU a ` P RF CRRET a v P* CURUP MOVE CURSOR UP a PCURUP EQU * a P SUKL A4,LLINE a P RF(NN) CRRET UPMOST LINE a P ADKL A4,LBVDU a
0x3426f0…342884 Dummy {f00=0x012d, f01=0x0190, f02=» * a B P* BAKTAB TAB. UNPROTECTED BACKWARDS * b < B P* * b B P************************************************************** b
0x342884…342a18 Dummy {f00=0x012d, f01=0x0190, f02=»REL. ATTRIBUTE START POS. b P* A11= RESERVED c " P* A13= RESERVED c : P* c R D P*************************************************************** c PBAKTAB EQU * c * P CF A14,SCRINF GET SCREEN INFORMATION c P LDR A9,A5 c ( P CWK A5,LBVDU+1
0x342a18…342bac Dummy {f00=0x012d, f01=0x0190, f02=» , P RF(NN) BAK100 NOT FIRST POS. ON SCREEN d ( P LDKL A4,LBVDU-1 LAST POS. ON SCREEN d 4 PBAK100 EQU * d ` 0 P CWR A4,A5 STANDING ON POS. AFTER ATTRIBUTE? d t P RF(E) BAK300 YES d P LDR A4,A5 d P LDR A7,A6 d P ANK A7,/20 PROTECTED FIELD? d
0x342bac…342d40 Dummy {f00=0x012d, f01=0x0190, f02=»1,A4 d : P CF A14,ATMASB SEARCH ATTRIBUTE BACKWARDS AND MASK IT e P LDR A7,A6 e J P ANK A7,/20 PROTECTED FIELD? e P RF(Z) BAK500 NO e P LDR A4,A5 e & P CWR A5,A9 WHOLE SCREEN SEARCHED? e P RB(NE) BAK300 NO e P LDK A1,0 FIRST SCREEN POS
0x342d40…342ed4 (3, 164) Dummy {f00=0x012e, f01=0x0190, f02=» A4,LBVDU-1 WRAP AROUND? e P RF(NG) BAK700 NO f PBAK600 EQU * f : P LDK A4,0 FIRST SCREEN POS. f N PBAK700 EQU * f r * P CF A14,STOINF SAVE SCREEN INFORMATION f P LDK A1,2 REQ. LENGTH f P CF A14,DISCHA SET CURSOR f P RTN A14 f P EJE
0x342ed4…343068 Dummy {f00=0x012e, f01=0x0190, f02=» * f X B P* TAB TAB. UNPROTECTED FORWARD * g B P* * g T B P************************************************************* g P* REGISTERS g P* g P* A4= REL.
0x343068…3431fc Dummy {f00=0x012e, f01=0x018e, f02=»VED g P* A13= RESERVED h P* h $ B P************************************************************** h . PTAB EQU * h t * P CF A14,SCRINF GET SCREEN INFORMATION h P LDR A9,A5 h ( P CWK A5,LBVDU+1 UNFORMATTED SCREEN? h P RF(E) TAB200 YES h
0x3431fc…343390 Dummy {f00=0x012e, f01=0x018e, f02=» h P ANK A7,/20 PROTECTED FIELD? i P RF(Z) TAB150 NO i , & P CWR A5,A9 WHOLE SCREEN SEARCHED? i D P RB(NE) TAB100 NO i n " P LDK A1,0 FIRST POS. ON SCREEN i , P CF A14,ATMASB UPDATE FIELD INFORMATION i P RF TAB200 i PTAB150 EQU * i P ADK
0x343390…343524 Dummy {f00=0x012e, f01=0x0190, f02=» PTAB300 EQU * j * P CF A14,STOINF SAVE SCREEN INFORMATION j P LDK A1,2 REQ. LENGTH j F P CF A14,DISCHA SET CURSOR j d P RTN A14 j P EJECT j H P******************************************************************* j H P*
0x343524…3436b8 Dummy {f00=0x012e, f01=0x0190, f02=» * j H P******************************************************************* k D P* REGISTERS k P* k P* A4= REL. CURSOR POS. k P* A5= REL. ATTRIBUTE POS. k P* A6= ATTRIBUTE CHAR. k
0x3436b8…34384c Dummy {f00=0x012e, f01=0x018e, f02=»CRNL EQU * k * P CF A14,SCRINF GET SCREEN INFORMATION l $ P CF A14,CRDOWN MOVE CURSOR DOWN l @ $ P LDK A1,0 COMPUTE LEFTMOST POS. l h PCRN100 EQU * l P SUK A4,LLINE l P RF(N) CRN200 l P ADK A1,LLINE l P RB CRN100 l PCRN200 EQU * l
0x34384c…3439e0 Dummy {f00=0x012e, f01=0x0190, f02=» P CCK A7,/80 ATTRIBUTE? m P RF(NL) CRN400 YES m " P LDR A1,A4 m < , P CF A14,ATMASB SEARCH ATTRIBUTE BACKWARD m N P LDR A7,A6 m ~ P ANK A7,/20 PROTECTED? m P RF(Z) CRN800 NO m P RF CRN500 m PCRN400 EQU * m P SUK A4,1 m " P RF(NN) CR
0x3439e0…343b74 (3, 165) Dummy {f00=0x012e, f01=0x0190, f02=» CF A14,TAB TAB. UNPROTECTED FORWARD m P RF CRN900 n , PCRN800 EQU * n > * P CF A14,STOINF SAVE SCREEN INFORMATION n R P LDK A1,2 REQ. LENGTH n P CF A14,DISCHA SET CURSOR n PCRN900 EQU * n P RTN A14 n P EJECT n J P**********************
0x343b74…343d08 Dummy {f00=0x012e, f01=0x0190, f02=» RDHOME TAB. UNPROTECTED FIRST ON SCREEN * n J P* * o L J P********************************************************************* o P* REGISTERS o P* o P*
0x343d08…343e9c Dummy {f00=0x012e, f01=0x0190, f02=» P* p J P********************************************************************* p PRDHOME EQU * p * P CF A14,SCRINF GET SCREEN INFORMATION p p " P LDK A4,0 FIRST POS. ON SCREEN p P CF A14,STOINF p ( P CWK A5,LBVDU+1 UNFORMATTED SCREEN? p P R
0x343e9c…344030 Dummy {f00=0x012e, f01=0x0190, f02=» p & P LDKL A4,LBVDU-1 LAST SCREEN POS. q * P CF A14,STOINF SAVE SCREEN INFORMATION q 2 P RF RDH300 q ` PRDH100 EQU * q r P LDR A1,A4 q * P CF A14,ATMASB GET ATTRIBUTE BACKWARD q P LDR A7,A6 q P ANK A7,/20 PROTECTED? q P RF(Z) RDH800 NO q
0x344030…3441c4 Dummy {f00=0x012e, f01=0x0190, f02=»NFORMATION q t P LDK A1,2 REQ. LENGTH r P CF A14,DISCHA SET CURSOR r 0 PRDH900 EQU * r R P RTN A14 r f P EJECT r v B P************************************************************* r B P* *
0x3441c4…344358 Dummy {f00=0x012e, f01=0x0190, f02=» * r V B P************************************************************* s P* REGISTERS s P P* s d P* A4= REL. CURSOR POS. s n P* A5= REL. ATTRIBUTE POS. s P* A6= ATTRIBUTE CHAR. s P* A11= RESERVED s P* A13= RESERVED s P* s H P**
0x344358…3444ec Dummy {f00=0x012e, f01=0x0190, f02=» ( P CWK A5,LBVDU+1 UNFORMATTED SCREEN? t P RF(E) ERE700 YES t 0 P LDR A7,A6 t J P ANK A7,/20 PROTECTED FIELD? t P RF(NZ) ERE600 YES t & P CWR A5,A4 STANDING ON ATTRIBUTE? t P RF(E) ERE600 YES t P LDR A1,A4 t P LDR A8,A6 SAVE OLD t
0x3444ec…344680 Dummy {f00=0x012e, f01=0x0190, f02=»RK A6,1 SET MDT-BIT IN ATTRIBUTE t P LDR A7,A6 u ( P LDR A1,A5 u : 4 P CF A14,STOVDU STORE NEW ATTRIBUTE IN VDU BUFFER u L . P CF A14,STOINF SAVE NEW SCREEN INFORMATION u P LDR A1,A3 STOP ADDRESS u P RF ERE800 u PERE600 EQU * u P CF A14,ERRO
0x344680…344814 (3, 166) Dummy {f00=0x012f, f01=0x0190, f02=»VDU DK1 u P RF(L) ERE710 DK1 v P LDK A1,0 STOP ADDRESS =3 v * PERE710 EQU * DK1 v L P CF A14,SCRINF DK1 v f PERE800 EQU * v P SUR A10,A10 v 0 P CF A14,ERASUA ERASE UNPROTECTED TO ADDRESS v * P CF A14,DISMOD DISPLAY MODIFIED FIELD v
0x344814…3449a8 Dummy {f00=0x012f, f01=0x0190, f02=» * v H P* ERINPT ERASE UNPROTECTED ENTIRE SCREEN * w F H P* * w H P******************************************
0x3449a8…344b3c Dummy {f00=0x012f, f01=0x0190, f02=»TRIBUTE CHAR. w P* A11= RESERVED x P* A13= RESERVED x . P* x F H P******************************************************************* x P PERINPT EQU * x * P CF A14,SCRINF GET SCREEN INFORMATION x ( P CWK A5,LBVDU+1 UNFORMATTED SCREEN? x
0x344b3c…344cd0 Dummy {f00=0x012f, f01=0x0190, f02=»ROTECTED x t ( P CF A14,DISMOD DISPLAY ERASED FIELDS y 4 P CF A14,RDHOME TAB. UNPROTECTED FIRST ON SCREEN y < PERI900 EQU * y t P RTN A14 y P EJECT y P IFT IN:DL=1 y < P******************************************************** y < P*
0x344cd0…344e64 Dummy {f00=0x012f, f01=0x0190, f02=» * y z < P******************************************************** z * P* REGISTERS z j P* z ~ P* A11= CREDIT WORK AREA z P* A13= RESERVED z P* z 8 P*************************************************** z PIN
0x344e64…344ff8 Dummy {f00=0x012f, f01=0x0190, f02=»** z : P* * { : P* DELETE DELETE CHAR. HANDLING * { H : P* * { < P******************************************************* { P* R
0x344ff8…34518c Dummy {f00=0x012f, f01=0x0190, f02=»RK AREA { P* A13= RESERVED | P* | ( < P******************************************************* | 2 PDELETE EQU * | r * P CF A14,SCRINF GET SCREEN INFORMATION | P LDKL A3,-1 | PDEL025 EQU * | P ADK A3,LLINE | * P CWR A3,A4 LAST POS. O
0x34518c…345320 Dummy {f00=0x012f, f01=0x0190, f02=»G ON ATTRIBUTE? | ~ P RF(E) DEL700 YES } P LDR A7,A6 } 2 P ANK A7,/20 PROTECTED? } D P RF(NZ) DEL700 YES } b P ORK A6,1 SET MDT-BIT } | P LDR A7,A6 } P LDR A1,A5 } & P CF A14,STOVDU SAVE NEW ATTRIBUTE } P LDR A8,A6 SAVE OLD } P LDR
0x345320…3454b4 (3, 167) Dummy {f00=0x012f, f01=0x0190, f02=»OINF SAVE SCREEN INFORMATION } , P CWR A3,A1 ATTRIBUTE BEFOR END OF LINE? ~ $ P RF(NG) DEL200 NO ~ T P LDR A3,A1 ~ n PDEL200 EQU * ~ P LDR A1,A4 ~ PDEL300 EQU * ~ P ADK A1,1 ~ , P CF A14,GETVDU GET CHAR. IN VDU BUFFER ~ P SUK A1,1 ~
0x3454b4…345648 Dummy {f00=0x012f, f01=0x018e, f02=»7,NULL GET NULL CHAR. ~ 0 P CF A14,STOVDU STORE NULL CHAR IN VDU BUFFER P CF A14,SAVE1 R P LDK A5,LLINE h P LDR A6,A11 ~ P SUR A10,A10 P CF A14,LINE GET LINE FLAG P LC A1,LINFLG,A6 P ORK A1,1 P SC A1,LINFLG,A6
0x345648…3457dc Dummy {f00=0x012f, f01=0x0190, f02=» r PDEL900 EQU * P RTN A14 P XIF , P EJECT 8 < P******************************************************** F < P* * < P* RESET RESET KEY HANDLING * < P*
0x3457dc…345970 Dummy {f00=0x012f, f01=0x018e, f02=»RS P* P* A11= CREDIT WORK AREA P* A13= RESERVED 4 P* L 8 P**************************************************** V PRESET EQU * " P CM MODE,A11 RESET INSERT MODE * P CF A14,LMP6OF TURN OFF "INSERT" LAMP $ P CM KBINH,A11
0x345970…345b04 Dummy {f00=0x012f, f01=0x0190, f02=» P EJECT @ P*********************************************************** @ P* * Z @ P* DUP DUPLICATE KEY * @ P*
0x345b04…345c98 Dummy {f00=0x012f, f01=0x0190, f02=»Y-CHAR P* A11= RESERVED P* A13= RESERVED & P* > @ P************************************************************ H PDUP EQU * P LDK A2,DUPCH GET DUP CHAR. P CF A14,NUM P CF A14,TAB P RTN A14 P EJECT @ P
0x345c98…345e2c Dummy {f00=0x012f, f01=0x018e, f02=»* FLDMRK FIELD MARK KEY * @ P* * D @ P*********************************************************** P* REGISTERS P* P* A2= KEY-CHAR P* A11= R
0x345e2c…345fc0 Dummy {f00=0x012f, f01=0x0190, f02=» & P LDK A2,FMCH GET FIELD MARK CHAR. P CF A14,NUM . P RTN A14 B P EJECT R D P*************************************************************** ` P* & P* Z E R O : 3 TRIPLE ZERO KEY ( P* Z E R O : 2 DOUBLE ZERO KEY P
0x345fc0…346154 (3, 168) Dummy {f00=0x012f, f01=0x0190, f02=» P* A13= RESERVED P* > P********************************************************* * P l PZERO:3 EQU * t P LDK A2,/30 ZERO CHAR. " P CF A14,NUM DISPLAY CHARACTER PZERO:2 EQU * P LDK A2,/30 ZERO CHAR. " P CF A14,NU
0x346154…3462e8 Dummy {f00=0x012f, f01=0x0190, f02=» < P******************************************************** < P* * H < P* OFLINE OFFLINE KEY HANDLING * < P* * < P
0x3462e8…34647c Dummy {f00=0x012f, f01=0x0190, f02=»ERVED P* < P******************************************************* POFLINE EQU * X P CF A14,CLEAR l P CF A14,RESET * P CF A14,DCOFLN INDICATE OFFLINE TO DC ( P CF A14,LMP6ON TURN ON OFFLINE LAMP $ P IM OFFFLG,A11 SET OFF
0x34647c…346610 Dummy {f00=0x012f, f01=0x0190, f02=»4 UPDATE STACK POINTER * P ABL I:RT1 RETURN TO "OFFLINE" PROGRAM P XIF L P EJECT X > P********************************************************* f > P* * > P* MFCHGE MAIN FRAM
0x346610…3467a4 Dummy {f00=0x012f, f01=0x0190, f02=»*********************** n P* REGISTERS P* 4 P* A11= CREDIT WORK AREA > P* A13= RESERVED ^ P* v < P******************************************************* P IFT NBRLIN=2 PMFCHGE EQU * P CF A14,CLEAR P CF A14,
0x3467a4…346938 Dummy {f00=0x012f, f01=0x0190, f02=»1 . =2 . P XRS A1,MAIN,A11 IND MAIN FRAME CHANGE =2 P RF(NZ) MFCH10 @ P CF A14,LMP1ON V P RF MFCH90 l PMFCH10 EQU * ~ P CF A14,LMP2ON PMFCH90 EQU * P . =2 ( P CF A14,CONCT CONNECT ON NEW LINE =2 $ P CF A14,CHKSTA C
0x346938…346acc Dummy {f00=0x012f, f01=0x0190, f02=» * @ P* COPY LOCAL HARDCOPY * B @ P* * @ P***********************************************************
0x346acc…346c60 Dummy {f00=0x012f, f01=0x0190, f02=»*************************************** z PCOPY EQU * 0 P LD A1,SNAMOD,A11 B 2 P ANKL A1,HCPMOD HARDCOPY ALREADY OUTSTANDING? $ P RF(NZ) COPY80 YES,WAIT A WHILE P LD A1,PRTID,A11 & P RF(Z) COPY80 PRINTER NOT ASSIGNED 2 P ANK A1,/FF
0x346c60…346df4 (3, 169) Dummy {f00=0x0130, f01=0x0190, f02=» P ADR A3,A4 & P ADR A3,A1 PRINTER ASSIGNED FOUND P LC A1,+3,A3 @ P ANK A1,/FF PRINTER OK? T P RF(Z) COPY10 YES t P RF COPY80 PCOPY10 EQU * ( P LDK A1,/38 INDICATE HARDCOPY IN WCC P ST A1,WCC,A11 P LDKL A3,BVDU BUFF
0x346df4…346f88 Dummy {f00=0x0130, f01=0x018e, f02=» n $ P LDKL A2,LBVDU+/20 BUFFER LENGTH " P CF A14,ICWRT WRITE INTERTASK 0 P IFT SNA=1 V 2 P LDKL A1,HCPMOD INDICATE HARDCOPY OUTSTANDING h P ORS A1,SNAMOD,A11 P XIF P IFF SNA=1 2 P LDKL A1,HCPMOD INDICATE HARDCOPY OUTSTANDING
0x346f88…34711c Dummy {f00=0x0130, f01=0x0190, f02=» P EJECT D P*************************************************************** D P* * Z 0 P* IDENT PRINTER IDENT. HANDLING D P*
0x34711c…3472b0 Dummy {f00=0x0130, f01=0x0190, f02=»* A3= POINTER IN TASK TABLE P* A11= CREDIT WORK AREA $ P* A13= T:A ADDRESS D P* ^ B P************************************************************* h PIDENT EQU * ( P LD A1,PRTID,A11 GET CURRENT TASKID $ P LD A4,+6,A13 COMMON BLOCK
0x3472b0…347444 Dummy {f00=0x0130, f01=0x0190, f02=» PIDEN30 EQU * P LCR A5,A3 GET ID P SLL A5,8 6 P LC A5,+1,A3 H P LC A4,+3,A3 GET STATUS P CF A14,SAVE1 SAVE REGISTERS | P CF A14,DISID DISPLAY TASKID " P LDKL A1,IDEN40 NEXT KEY ENTRY P ST A1,RDMORE,A11 P RF
0x347444…3475d8 Dummy {f00=0x0130, f01=0x0190, f02=»EY SAVE CURRENT TASKID P RF(E) IDEN80 YES " P CWK A9,IDKEY GET NEXT TASKID? 8 ( P RF(NE) IDEN90 NO KEEP THE FIRST ONE ^ PIDEN50 EQU * & P ADK A3,4 SEARCH FOR NEXT PRINTER P LCR A2,A3 P ANK A2,/FF P LDR A1,A2 P RB(Z) I
0x3475d8…34776c Dummy {f00=0x0130, f01=0x0190, f02=» EQU * P LDKL A2,TSKTAB P LD A3,6,A13 & P ADR A3,A2 : P SUK A3,4 L P RB IDEN50 ^ PIDEN80 EQU * p " P LCR A1,A3 GET PRINTER TO SAVE P SLL A1,8 P LC A1,+1,A3 ( P ST A1,PRTID,A11 NEW HARDCOPY TASKID PIDEN90 EQU *
0x34776c…347900 Dummy {f00=0x0130, f01=0x0190, f02=» * t B P* KEYL KEYLOCK STATUS * * B P* * p B P************************************************************* P* REGISTERS
0x347900…347a94 (3, 170) Dummy {f00=0x0130, f01=0x0190, f02=»************************************** x P IFT KEYLST=1 . P IFT KB6272=1 D PKEYL EQU * Z * P SUK A2,LKLKEY GET NEG KEY LOCK VALUE l P LD A3,KEYS,A11 OLD STATUS P LDK A4,/10 PKEYL10 EQU * P SRL A4,1 P ADK A2,2 1 = OFF,
0x347a94…347c28 Dummy {f00=0x0130, f01=0x0190, f02=»KEYL99 NOW OFF, NO CHANGE P RF KEYL30 NOW ON " PKEYL20 EQU * WAS ON < P LDR A2,A2 X $ P RF(Z) KEYL99 NOW ON, NO CHANGE j PKEYL30 EQU * CHANGE P LD A3,KEYS,A11 P XRR A3,A4 CHANGE STATUS $ P ST A3,KEYS,A11 STORE NEW STATUS
0x347c28…347dbc Dummy {f00=0x0130, f01=0x0190, f02=»EYLOCK CHANGED, LAYOUT AS A3 ( P* A2 = 1, IF CHANGED TO OFF ELSE 0 $ P* P * P* INSERT USER ROUTINE BELOW THIS LINE Z P* PKEYL99 EQU * P RTN A14 P XIF P EJECT > P********************************************************
0x347dbc…347f50 Dummy {f00=0x0130, f01=0x0190, f02=»TERS P* P* A11= RESERVED P* A13= RESERVED . P* F > P********************************************************* P P IFT TEST=1 PTESTM EQU * P CF A14,ERASE P CF A14,GETBUF P CF A14,RDSTAT P CF A14,DISS
0x347f50…3480e4 Dummy {f00=0x0130, f01=0x0190, f02=»*************** f > P* * > P* ENTER ENTER KEY HANDLING * Z > P* * > P******************************************
0x3480e4…348278 Dummy {f00=0x0130, f01=0x0190, f02=»******************************************************* PENTER EQU * @ P LDK A2,/27 AID-CODE T . P CF A14,LMP3ON TURN ON "KEYBOARD INHIBIT" p . P CF A14,TRPF AID+MODIFIED FIELDS+TRANSMIT P RTN A14 P EJECT B P**********************
0x348278…34840c Dummy {f00=0x0130, f01=0x0190, f02=» CLEAR KEY HANDLING * ~ B P* * 4 B P************************************************************** z P* REGISTERS P* P* A2= AID-CODE P* A11= RESERVED
0x34840c…3485a0 Dummy {f00=0x0130, f01=0x0190, f02=»/5F POS FOR 'CLEAR' . P CF A14,LMP3ON TURN ON "KEYBOARD INHIBIT" ( P CF A14,TRPA UPDATE AID AND TRANSMIT N & P CF A14,ERASE ERASE ENTIRE SCREEN z P RTN A14 P EJECT D P*************************************************************** D
0x3485a0…348734 (3, 171) Dummy {f00=0x0130, f01=0x0190, f02=»* R D P* * D P*************************************************************** R P* REGISTERS P* P* A11= CREDIT WORK AREA P* A13= RESERVED P* 8 P**************
0x348734…3488c8 Dummy {f00=0x0130, f01=0x0190, f02=»TUS ~ P ANKL A2,/101 ACTIVE? P RF(Z) SYS100 YES * & P LDK A1,LOCMOD INDICATE LOCAL MODE D P RF SYS500 n PSYS100 EQU * P LDR A2,A1 GET STATUS P ANKL A2,/C00 MY JOB MODE? P RF(NZ) SYS200 NO & P CF A14,CLEAR CLEAR SCREEN
0x3488c8…348a5c Dummy {f00=0x0130, f01=0x0190, f02=» ( P CWK A2,/C00 SSCP-LU AND NOT LU-LU? P RF(NE) SYS300 NO 0 & P LDK A1,SYSOP INDICATE SYSTEM MODE J P RF SYS500 t PSYS300 EQU * $ P ANKL A2,/800 SSCP-LU AND LU-LU? P RF(NZ) SYS400 YES & P LDK A1,SYSOP INDICATE SYSTEM MODE P R
0x348a5c…348bf0 Dummy {f00=0x0130, f01=0x0190, f02=»VATION j P ST A1,SNAMOD,A11 P RTN A14 ( P XIF 8 P EJECT D D P*************************************************************** R D P* * D P* ATTN ATTENTION KEY HANDL
0x348bf0…348d84 Dummy {f00=0x0130, f01=0x0190, f02=»********************************* r P* REGISTERS * P* H P* A11= RESERVED R P* A13= RESERVED j P* > P********************************************************** P IFT SNA=1 PATTN EQU * $ P LDK A1,/4B SIGNAL ATT
0x348d84…348f18 Dummy {f00=0x0130, f01=0x018e, f02=»******************** f B P* * @ P* PA PROGRAM ACCESS KEY HANDLING * b B P* * B P****************************
0x348f18…3490ac Dummy {f00=0x0130, f01=0x0190, f02=» ~ P* B P************************************************************** PPA1 EQU * X P LDK A2,/25 AID-CODE j P RF PA500 PPA2 EQU * P LDK A2,/3E AID-CODE P RF PA500 PPA3 EQU * P LDK A2,/2C AID-CODE PPA
0x3490ac…349240 Dummy {f00=0x0130, f01=0x0190, f02=»SKOP STATEMENTS P RTN A14 P EJECT ( H P******************************************************************* 6 H P* * H P* PAEX PAEX KEY FOLLOWED BY NUMBER
0x349240…3493d4 (3, 172) Dummy {f00=0x0130, f01=0x018e, f02=»************************* f P* REGISTERS " P* 6 P* A11= CREDIT WORK AREA @ P* A13= RESERVED ` P* x 8 P*************************************************** P IFT PAX=1 PPAEX EQU * P LDKL A1,PAEXA P ST A1,RDMORE,A1
0x3493d4…349568 Dummy {f00=0x0130, f01=0x0190, f02=» P SUK A2,/2 CHECK IF NUM.1-3 P RF(G) PAEXB ILLEGAL CHAR. ( P RF(NZ) PAEX10 J P CF A14,PA3 PA3 KEY ` P RF PARET | PPAEX10 EQU * P ADK A2,1 P RF(NZ) PAEX20 P CF A14,PA2 PA2 KEY P RF PARET PPAEX20 EQU *
0x349568…3496fc Dummy {f00=0x0130, f01=0x0190, f02=» DK3 P CF A14,PA500 DK3 P RF PARET DK3 & PPAERR EQU * < P CF A14,ERROR INDICATE ERROR P PPARET EQU * t P RTN A14 P XIF P EJECT F P****************************************************************** F P*
0x3496fc…349890 Dummy {f00=0x0130, f01=0x0190, f02=»* * F P****************************************************************** J P* REGISTERS P* P* A2= AID-CODE P* A11= RESERVED P* A13= RESERVED P* F P******
0x349890…349a24 Dummy {f00=0x0130, f01=0x0190, f02=»PF,A2 GET AID , P CF A14,LMP3ON TURN ON KEYBOARD INHIBIT 2 P CF A14,TRPF TRANSMIT AID AND MODIFIED FIELDS F P RTN A14 | P EJECT F P***************************************************************** F P*
0x349a24…349bb8 Dummy {f00=0x0130, f01=0x0190, f02=» * x F P***************************************************************** 2 P* REGISTERS | P* P* A11= CREDIT WORK AREA P* A13= RESERVED P* 6 P********************************************
0x349bb8…349d4c Dummy {f00=0x0130, f01=0x0190, f02=» A2,/30 LEGAL CHAR ? , P RF(L) PFERR ILLEGAL,GO TO ERR.HANDLING P RF(NZ) PFEX10 L P LDKL A1,PF0A FIRST NUM 0 b P RF PFNXT NEXT NUMBER PPFEX10 EQU * P SUK A2,1 P RF(NZ) PFEX20 P LDKL A1,PF1A FIRST NUM 1 P RF PFNX
0x349d4c…349ee0 Dummy {f00=0x0130, f01=0x0190, f02=»T NEXT NUMBER PPF0A EQU * P CM RDMORE,A11 ( P SUK A2,/31 ILLEGAL NUM? > P RF(N) PFERR YES ^ P SUK A2,9 ILLEGAL NUM? v P RF(NN) PFERR YES P ADK A2,/9+PFKEY PF1-PF9 P RF PFHAND PPF1A EQU * P CM RDMORE,A11 P
0x349ee0…34a074 (3, 173) Dummy {f00=0x0131, f01=0x0190, f02=»10-PF19 z P RF PFHAND PPF2A EQU * " P CM RDMORE,A11 4 P SUK A2,/30 ILLEGAL NUM? J P RF(N) PFERR YES j P SUK A2,5 ILLEGAL NUM? P RF(NN) PFERR YES " P ADK A2,/5+PFKEY+/13 PF20-PF24 PPFHAND EQU * , P CF A14,PF PROGRAM F
0x34a074…34a208 Dummy {f00=0x0131, f01=0x0190, f02=»4,ERROR PPFRET EQU * P RTN A14 $ P XIF 4 P EJECT @ P N > P********************************************************** V > P* * > P* RETURN RETURN
0x34a208…34a39c Dummy {f00=0x0131, f01=0x40ee, f02=»********* ^ P* REGISTERS P* . P* A11= RESERVED 8 P* A13= RESERVED P P* h < P******************************************************** r PRETURN EQU * P RTN A14 P P END @ RETURN
0x34a39c…34a530 Dummy {f00=0x0131, f01=0x2008, f02=» ) DATA PF 24 * * $ END * ,@ * 8 6 ) 4 DATA PF 7 ) F DATA PF 8 ) X DATA PF 9 ) j DATA PF 10 ) | DATA PF 11 ) DATA PF 12 ) DATA PF 13 ) DATA PF 14 ) DATA PF 15 ) *C0 ) DATA PF
0x34a530…34a6c4 Dummy {f00=0x0131, f01=0x0190, f02=»A3 I P CWK A2,/80 ATTRIBUTE J P RB(NG) LINA10 YES J ( PLINA40 EQU * . =1 J B P CF A14,REST1 J P RTN A14 J r P EJECT J @ P*********************************************************** J @ P*
0x34a6c4…34a858 Dummy {f00=0x0131, f01=0x0190, f02=» * J @ P*********************************************************** K P* REGISTERS K T P* K h P* A3= ADDRES IN VDU BUFFER K r P* A4= REL CURSOR POS K P* A5= RESERVED K P* A6= RESERVED K P* A8= RESERVED K P* A9= RESERVED K P
0x34a858…34a9ec Dummy {f00=0x0131, f01=0x0190, f02=»***** K Z PNLROUT EQU * L P LDR A1,A4 SAVE CURSOR POS. L " . P CF A14,CRDOWN MOVE CURSOR ON E LINE DOWN L F P LDK A7,0 L x PNLR100 EQU * L ( P SUK A4,LLINE COMPUTE LEFTMOST POS. L P RF(N) NLR200 L P ADK A7,LLINE L P RB NLR100 L P
0x34a9ec…34ab80 Dummy {f00=0x0131, f01=0x0190, f02=»CR A2,A3 NULL IN VDU BUFFER L P LC A1,LINFLG,A6 M $ P ORKL A1,1 M < P SC A1,LINFLG,A6 M N P ADK A3,1 M f P ADK A4,1 M x P CF A14,LINWRP M P RB NLR300 M PNLR900 EQU * M P RTN A14 M P EJECT M H P************************************
0x34ab80…34ad14 (3, 174) Opaque[0x194]
0x34ad14…34aea8 # DirEnt {nam=»APLNK1«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x2250, f03=0x0000}
0x34ad14…34aea8 IdxSect {
0x34ad14…34aea8 f00 = 0x0112 // 0x34ad14 @0x0
0x34ad14…34aea8 f01 = 0x0002 // 0x34ad16 @0x2
0x34ad14…34aea8 gno = [ // 0x34ad18 @0x4
0x34ad14…34aea8 [0x00]: C0x0112.0x2.0
0x34ad14…34aea8 ]
0x34ad14…34aea8 }
0x34aea8…34b03c Dummy {f00=0x0112, f01=0x00be, f02=» PASG 2,NO PSCR PTRA DATBSC PTLK U,M 2 PINC KEYB1 B PASG 2,LP0F T PLKE M f PKPF /L,PT3270 t PSCR P$PDISC A=PT3270 PASG /E0,TY10
0x34b03c…34b1d0 Dummy {f00=0x0112, f01=0x2008, f02=» 2,NO PSCR PTRA DATBSC PTLK U,M 2 PINC KEYB1 B PASG 2,LP0F T PLKE M f PKPF /L,PT3270 t PSCR P$PDISC A=PT3270 PASG /E0,TY10
0x34b1d0…34b364 Dummy {f00=0x0112, f01=0x0156, f02=» b 2 HMES 5 FC FILE CODE. DEFAULT VALUE IS F4 8 HMES 6 SOP SOP SWITCH NUMBER. DEFAUL VALUE IS 01 > HMES 7 DATE UPDATING DATE z < HMES ANY COMBINATION OF ALTERNATIVE 1,2,3 AND 4 IS VALID, 0 HMES AND AT LEAST ONE OF THEM MUST BE CHOOS
0x34b364…34b4f8 Dummy {f00=0x0112, f01=0x2008, f02=» MES 5 FC FILE CODE. DEFAULT VALUE IS F4 8 HMES 6 SOP SOP SWITCH NUMBER. DEFAUL VALUE IS 01 > HMES 7 DATE UPDATING DATE z < HMES ANY COMBINATION OF ALTERNATIVE 1,2,3 AND 4 IS VALID, 0 HMES AND AT LEAST ONE OF THEM MUST BE CHOOS
0x34b4f8…34b68c Dummy {f00=0x0112, f01=0x0190, f02=» A : p , ( 0 !99Q !00R P P =H_ : , ( TID=TCL=LEV=TDC=T0LC=0SDC=S0 @ , ( '@ A I. : A A p , ( E " Q :d @ 1 # R P R W , ( cD * A $ W , ( }"
0x34b68c…34b820 Dummy {f00=0x0112, f01=0x0190, f02=» A A A F 0 A , ( 2 : A A : 0 , ( @ @ 2 ! P V :AW 9E R ` , ( 3 _ <e @ 2 $ T 9A $ < :B , ( Q 9A) @ P A A I T , ( q W 9D @ @
0x34b820…34b9b4 (3, 175) Opaque[0x194]
0x34b9b4…34bb48 # DirEnt {nam=»CTAB01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2258, f03=0x0000}
0x34b9b4…34bb48 IdxSect {
0x34b9b4…34bb48 f00 = 0x0112 // 0x34b9b4 @0x0
0x34b9b4…34bb48 f01 = 0x0004 // 0x34b9b6 @0x2
0x34b9b4…34bb48 gno = [ // 0x34b9b8 @0x4
0x34b9b4…34bb48 [0x00]: C0x0112.0x3.0
0x34b9b4…34bb48 [0x01]: C0x0113.0x0.0
0x34b9b4…34bb48 ]
0x34b9b4…34bb48 }
0x34bb48…34bcdc Dummy {f00=0x0112, f01=0x0190, f02=» $ P IDENT CTAB01 REL. 11.0 81/10/28 P , 8 P*************************************************** 4 8 P* * p 8 P* CTAB01, CTAB02, CTAB03, KEY CONVERSION FOR * 8 P* 6271, 6272 KEYBOARDS FOR DAN
0x34bcdc…34be70 Dummy {f00=0x0112, f01=0x0190, f02=»*** ` P EJECT P********************* P* ENTRIES * 8 P********************* V P ENTRY CTAB01,CTAB02,CTAB03 t P EJECT PCTAB01 EQU * PCTAB02 EQU * PCTAB03 EQU * P " P DATA UNSH,SHIFT,UNSH,SHIFT,0
0x34be70…34c004 Dummy {f00=0x0112, f01=0x0190, f02=»3,SHIFT4,SHIFT5,SHIFT6,0 p PUNSH0 EQU * : P DATA /BAB1,/B2B3,/B4B5,/B6B7,/B8B9,/B0A2,/8489,/88A0 4 PUNSH1 EQU * r : P DATA /3031,/3233,/3435,/3637,/3839,/8F90,/852D,/8C8D PUNSH2 EQU * : P DATA /207F,/7F7F,/7F7F,/7F27,/7F3C,/7F2B,/2C2D,
0x34c004…34c198 Dummy {f00=0x0112, f01=0x0190, f02=»445,/4647,/4849,/4A4B,/4C4D,/4E4F | PUNSH5 EQU * * : P DATA /5051,/5253,/5455,/5657,/5859,/5A5C,/5B5D,/5E7F > PUNSH6 EQU * | : P DATA /7F92,/7FA5,/7F8A,/8B7F,/7F7F,/7F7F,/7F7F,/7F7F P EJECT PSHIFT0 EQU * : P DATA /C6B1,/B2B3,/B4B5,
0x34c198…34c32c Dummy {f00=0x0112, f01=0x018e, f02=» : P DATA /207F,/7F7F,/7F7F,/7F2A,/7F3E,/7F3F,/385F,/3A7F PSHIFT3 EQU * B : P DATA /3D21,/2223,/2425,/262F,/2829,/8682,/8780,/8183 V PSHIFT4 EQU * : P DATA /4041,/4243,/4445,/4647,/4849,/4A4B,/4C4D,/4E4F PSHIFT5 EQU * : P DATA /5051,/5
0x34c32c…34c4c0 Dummy {f00=0x0112, f01=0x400c, f02=» @ 07F,/7F7F,/7F7F,/7F2A,/7F3E,/7F3F,/385F,/3A7F PSHIFT3 EQU * B : P DATA /3D21,/2223,/2425,/262F,/2829,/8682,/8780,/8183 V PSHIFT4 EQU * : P DATA /4041,/4243,/4445,/4647,/4849,/4A4B,/4C4D,/4E4F PSHIFT5 EQU * : P DATA /5051,/5
0x34c4c0…34c654 (3, 176) Dummy {f00=0x0113, f01=0x2008, f02=»
0x34c654…34c7e8 Dummy {f00=0x0113, f01=0x0190, f02=» X 2:D :D :D C . . X 2 . X * . B ! T X ! P / Y . . B Y " . X 2 . . . X " P . /l B . . /~ X 2 . . X *T . . W, P C X P q C 0P Y *
0x34c7e8…34c97c Dummy {f00=0x0113, f01=0x0190, f02=»Z X A/ * / Y $_. Y $ / @pV T ApX ApV . X $P y $ Y $ 0 9j (P 0 ) 0 9j (P _ ) 1_ * $X 0 % /X_ pv ( (P _ ) 1_@ pv ( (XL P _ 0 )_Z pr &_2 pr &_$ * (P _ ) 1 4 A/ A/ A/ A/ A/ 0 W
0x34c97c…34cb10 Dummy {f00=0x0113, f01=0x0190, f02=»P % Apt 4 * 0 +& !7 !7 o ] +& !7 !7 ] " P ] 00 0 +& Apd Apf !7 !8 T. . 1 1& 1 2 2f 3 44 4 Ap^ +& !7 !8 @pzT " !7 _Z !8 ] P = $ !8 x !8 > !8 F !7 Apb P "P, !4 @pXT( PV !0 X
0x34cb10…34cca4 Dummy {f00=0x0113, f01=0x0190, f02=» C B B Apj Apl Apn Ap Ap^ !6& !0@ ApX_ !4 T o @pX X ! P !5 0 # T @9jT !5 _ !4 App !5 _$ !0t Ap` @pXP @pVP !4 ApX ApZ 0 !0t @pZP @9j 1 !56 T> Ap^ !5 0 @pXP @9jP @pV 1 8 !4 !4 Apb_: !8 X8_` Ap^ @9j @ppT 1
0x34cca4…34ce38 Dummy {f00=0x0113, f01=0x0190, f02=» " H " P X * Y X V !/ W* X T X *P W !/ X T X ! P !5 W !5 0 ApZ @pT X 0 Ap` ApV Apb 2 !0t @pXT @pZP !6 0 !0t @pXT @pZX W` @pV @p^ 1 @pp @pj Apn 2 !0t @pXT _> !8 T @pbP !5 !0@_X /T, @pbX @p P @
0x34ce38…34cfcc Dummy {f00=0x0113, f01=0x0190, f02=» 4 ApZ Apn H E Ap^ ApT 4 @pVP* X R$ X " T X *P /4 / ApX ApV 4 @9j @p^T @pp Apn @pn App Ap^ !8 T8 P: PN PP P P4 ( 1 Apn @pn ]: _> P _F @9j @pn E !9BP !7 4 _" !9B 0_p / ApbT W ,W @ Apx A
0x34cfcc…34d160 Dummy {f00=0x0113, f01=0x0190, f02=»p`P - !8 x . !o W 0 " @p`PL R ~T }T T0 W, !8 P " ! " :A *@ H T 0 !8 W R !8 Apn @pl @pnUH Zx Q P Q T 0 !8 Apn 0 !8 Apn !8 " !8 " !8 6 Ap _" Ap^ ApV !7 !8 % !8 R !8 !8 < !8 @pV
0x34d160…34d2f4 (3, 177) Opaque[0x194]
0x34d2f4…34d488 # DirEnt {nam=»AARCON«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x2268, f03=0x0000}
0x34d2f4…34d488 IdxSect {
0x34d2f4…34d488 f00 = 0x0113 // 0x34d2f4 @0x0
0x34d2f4…34d488 f01 = 0x0002 // 0x34d2f6 @0x2
0x34d2f4…34d488 gno = [ // 0x34d2f8 @0x4
0x34d2f4…34d488 [0x00]: C0x0113.0x1.0
0x34d2f4…34d488 ]
0x34d2f4…34d488 }
0x34d488…34d61c Dummy {f00=0x0113, f01=0x018e, f02=» PT; P01; PTID=V0; PTCL=K2; * PLEV=60; : P02; J PTDC=T01; V PLC=001P; f PTDC=T02; v PLC=001P; P01; PSDC=S01; PT; P01; PTID=V1; PTCL=K2; PLEV=60; P02; PTDC=
0x34d61c…34d7b0 Dummy {f00=0x0113, f01=0x0190, f02=» PLEV=60; P01; PTDC=T01; $ PLC=001P; 4 P01; D PSDC=S01; P PT; ` P01; j PTID=V3; v PTCL=K2; PLEV=60; P02; PTDC=T01; PLC=001Q; PTDC=T02; PLC=001Q; P01; PSDC=S01;
0x34d7b0…34d944 Dummy {f00=0x0113, f01=0x0190, f02=»S01; PT; P01; PTID=V5; " PTCL=K2; 2 PLEV=60; B P02; R PTDC=T01; ^ PLC=009Q; n PTDC=T02; ~ PLC=009Q; P01; PSDC=S01; PT; P01; PTID=L6; PTCL=P2; PLEV=60; P01;
0x34d944…34dad8 Dummy {f00=0x0113, f01=0x006a, f02=»0; PNSA=07; P40; PC1; & PC8; 2 PC2; > PC9; J PC3; V P4A; b PLC=009Q; n PTDC=T02; ~ PLC=009Q; P01; PSDC=S01; PT; P01; PTID=L6; PTCL=P2; PLEV=60; P01;
0x34dad8…34dc6c Dummy {f00=0x0113, f01=0x2008, f02=» PNSA=07; P40; PC1; & PC8; 2 PC2; > PC9; J PC3; V P4A; b PLC=009Q; n PTDC=T02; ~ PLC=009Q; P01; PSDC=S01; PT; P01; PTID=L6; PTCL=P2; PLEV=60; P01;
0x34dc6c…34de00 Dummy {f00=0x0113, f01=0x0190, f02=»
0x34de00…34df94 (3, 178) Opaque[0x194]
0x34df94…34e128 # DirEnt {nam=»APLNK2«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1ca0, f03=0x0000}
0x34df94…34e128 IdxSect {
0x34df94…34e128 f00 = 0x00e5 // 0x34df94 @0x0
0x34df94…34e128 f01 = 0x0002 // 0x34df96 @0x2
0x34df94…34e128 gno = [ // 0x34df98 @0x4
0x34df94…34e128 [0x00]: C0x00e5.0x0.0
0x34df94…34e128 ]
0x34df94…34e128 }
0x34e128…34e2bc Dummy {f00=0x00e5, f01=0x00d0, f02=» PASG 2,NO PSCR PTRA DATBSC PTLK U,M 2 PINC KEYB2 B PINC PRINT2 T PASG 2,LP0F f PLKE M x PKPF /L,PT3272 PSCR P$PDISC A=PT3272 PASG /E0,TY10
0x34e2bc…34e450 Dummy {f00=0x00e5, f01=0x2008, f02=» 2,NO PSCR PTRA DATBSC PTLK U,M 2 PINC KEYB2 B PINC PRINT2 T PASG 2,LP0F f PLKE M x PKPF /L,PT3272 PSCR P$PDISC A=PT3272 PASG /E0,TY10
0x34e450…34e5e4 Dummy {f00=0x00e5, f01=0x0190, f02=» Q ! T W B O , ( mD : O : . ICSET ^ ICREAD n , ( : ICWRT , ( @ N D P : COPP ATM
0x34e5e4…34e778 Dummy {f00=0x00e5, f01=0x018e, f02=» O r , ( V R T ," P , ( = ! R W ! R W T B , ( ] R 9AR ! 1 P W # r , ( } ! P N _r P , ( @ P T P , (
0x34e778…34e90c Dummy {f00=0x00e5, f01=0x018e, f02=» , ( P W : T , ( = N D N R P O N 4 , ( ] T _ O _& O : d , ( } T O : ! 1 P N RFMDUP , ( !0T 0 : @ : , (
0x34e90c…34eaa0 Dummy {f00=0x00e5, f01=0x0190, f02=» f , ( T B P c O B B , ( ; N = B N O C N 8 , ( [ N Q N C N C . L1T h , ( { W ( O W O P , ( c C O _^ d ( , ( "R
0x34eaa0…34ec34 (3, 179) Opaque[0x194]
0x34ec34…34edc8 # DirEnt {nam=»KEYB2 «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2278, f03=0x0000}
0x34ec34…34edc8 IdxSect {
0x34ec34…34edc8 f00 = 0x0113 // 0x34ec34 @0x0
0x34ec34…34edc8 f01 = 0x002e // 0x34ec36 @0x2
0x34ec34…34edc8 gno = [ // 0x34ec38 @0x4
0x34ec34…34edc8 [0x00]: C0x0113.0x3.0
0x34ec34…34edc8 [0x01]: C0x0114.0x0.0
0x34ec34…34edc8 [0x02]: C0x0114.0x1.0
0x34ec34…34edc8 [0x03]: C0x0114.0x2.0
0x34ec34…34edc8 [0x04]: C0x0114.0x3.0
0x34ec34…34edc8 [0x05]: C0x0115.0x0.0
0x34ec34…34edc8 [0x06]: C0x0115.0x1.0
0x34ec34…34edc8 [0x07]: C0x0115.0x2.0
0x34ec34…34edc8 [0x08]: C0x0115.0x3.0
0x34ec34…34edc8 [0x09]: C0x0116.0x0.0
0x34ec34…34edc8 [0x0a]: C0x0116.0x1.0
0x34ec34…34edc8 [0x0b]: C0x0116.0x2.0
0x34ec34…34edc8 [0x0c]: C0x0116.0x3.0
0x34ec34…34edc8 [0x0d]: C0x0117.0x0.0
0x34ec34…34edc8 [0x0e]: C0x0117.0x1.0
0x34ec34…34edc8 [0x0f]: C0x0117.0x2.0
0x34ec34…34edc8 [0x10]: C0x0117.0x3.0
0x34ec34…34edc8 [0x11]: C0x0118.0x0.0
0x34ec34…34edc8 [0x12]: C0x0118.0x1.0
0x34ec34…34edc8 [0x13]: C0x0118.0x2.0
0x34ec34…34edc8 [0x14]: C0x0118.0x3.0
0x34ec34…34edc8 [0x15]: C0x0119.0x0.0
0x34ec34…34edc8 [0x16]: C0x0119.0x1.0
0x34ec34…34edc8 ]
0x34ec34…34edc8 }
0x34edc8…34ef5c Dummy {f00=0x0113, f01=0x0190, f02=» 4 P IDENT KEYB2 REL 11.0 DK 830113 NJ 870150541100 P DK3 PA 4-9 830113 NJ < $ P DK2 RESTORE A1 AFTER DC ABRT P DK1,ERASE ONE LINE 'EOF' P =3 ERASE TO END OF FIELD P =2 TWO DC-LINES P 82-02-28 P =1, SYSTE
0x34ef5c…34f0f0 Dummy {f00=0x0113, f01=0x0190, f02=» * z D P* MODULE KEYB * 2 D P* MODULE HANDLING THE KEYBOARD DEVICE * z D P* (EMULATION 3270 SNA/SDLC, BSC) * D
0x34f0f0…34f284 Dummy {f00=0x0113, f01=0x0190, f02=»* R P EJECT D P*************************************************************** D P* * ` D P* LIST OF ROUTINES * D P*
0x34f284…34f418 Dummy {f00=0x0113, f01=0x0190, f02=» KB-COMPLETION TABLE FOR DIFF. MODES * < P* KBCPLO KB-COMPLETION ROUTINE IN LOCAL MODE 8 D P* KBCPSY KB-COMPLETION ROUTINE IN SYSTEM MODE * x D P* KBCPJO KB-COMPLETION ROUTINE IN MY JOB MODE * D P
0x34f418…34f5ac Dummy {f00=0x0113, f01=0x0190, f02=» P . P* ICVRED KB/VDU INTERTASK READ ( P* ICINP INTERTASK INPUT : . P* ICSET SET INTERTASK TIMEOUT f ( P* ICREAD READ INTERTASK ( P* ICWRT WRITE INTERTASK D P* ERROR ILL
0x34f5ac…34f740 Dummy {f00=0x0113, f01=0x0190, f02=» SIGNAL ROUTINE * D P* KEYTAB KEY-TABLE, FIXED ENTRY FOR EACH FUNC. * 8 D P* CHAR ALPHA. CHAR HANDLING * D P* NUM NUM. CHAR HANDLING *
0x34f740…34f8d4 (3, 180) Dummy {f00=0x0114, f01=0x0190, f02=» * X D P* BAKTAB TAB. UNPROT. BACKWARDS * D P* TAB TAB. UNPROT. FORWARDS * d D P* CRNL TAB. UNPROT. NEXT LINE * D P* RDHOME
0x34f8d4…34fa68 Dummy {f00=0x0114, f01=0x0190, f02=»RINPT ERASE UNPROT. ENTIRE SCREEN * D P* INSERT INSERT HANDLING * < D P* DELETE DELETE HANDLING * D P* RESET RESET HANDLING
0x34fa68…34fbfc Dummy {f00=0x0114, f01=0x0190, f02=» * D P* ZERO:2,3 DOUBLE & TRIPLE ZERO HANDLING * D P* OFLINE OFFLINE HANDLING * D P* MFCHGE MAIN FRAME CHANGE * D P* COPY LOCAL H
0x34fbfc…34fd90 Dummy {f00=0x0114, f01=0x0190, f02=» KEYLOCK STATUS HANDLING * | " P* TESTM TEST MODE 4 D P* ENTER ENTER HANDLING * Z D P* CLEAR CLEAR HANDLING * D P* SYSREQ SYSTEM RE
0x34fd90…34ff24 Dummy {f00=0x0114, f01=0x0190, f02=»ROGRAM ACCESS HANDLING * z D P* PF PROGRAM FUNCTION HANDLING * 2 D P* RETURN RETURN * z D P* * D
0x34ff24…3500b8 Dummy {f00=0x0114, f01=0x0190, f02=»*** ` 8 P* * 8 P* ENTRY POINTS * H 8 P* * 8 P**************************************************** P . P ENT
0x3500b8…35024c Dummy {f00=0x0114, f01=0x0190, f02=» LMP1ON LAMPROUTINES P ENTRY LMP1OF . P ENTRY LMP2ON . 4 P ENTRY LMP2OF . L P ENTRY LMP3ON . d P ENTRY LMP3OF . | P ENTRY LMP4ON . P ENTRY LMP4OF . P ENTRY LMP5ON . P ENTRY LMP5OF . P ENTRY LMP6ON .
0x35024c…3503e0 Dummy {f00=0x0114, f01=0x0190, f02=»NDICATION | ( P ENTRY TAB TAB FOREWARD UNPROTECTED , P ENTRY CRDOWN MOVE CURSOR DOWN ONE LINE > $ P ENTRY ICVRED VDU INTERTASK READ n P ENTRY ICINP INTERTASK INPUT & P ENTRY ICSET SET INTERTASK TIMEOUT P ENTRY ICWRT WRITE INTERTASK P
0x3503e0…350574 (3, 181) Dummy {f00=0x0114, f01=0x0190, f02=» * : P* EXTERNAL REFERENCES * . : P* * l : P****************************************************** P & P EXTRN I:RT1 RETURN TO C
0x350574…350708 Dummy {f00=0x0114, f01=0x018e, f02=»R ABORT DC-REQUEST (DCSNA,DCBSC) * P EXTRN ERASE ERASE ENTIRE SCREEN (VDU) ( 8 P EXTRN ERASUA ERASE ALL UNPROTECTED TO ADDRESS (VDU) V . P EXTRN ERASUP ERASE ALL UNPROTECTED (VDU) 2 P EXTRN TRPA TRANSMIT SHORT READ (DCSNA,DCBSC) 4 P EXTRN TRPF TR
0x350708…35089c Dummy {f00=0x0114, f01=0x0190, f02=» b . P EXTRN SOUND SOUND ALARM ON DISPLAY (VDU) . P EXTRN SCRINF GET SCREEN INFORMATION (VDU) : 0 P EXTRN STOINF SAVE SCREEN INFORMATION (VDU) l 0 P EXTRN GETVDU GET CHAR. IN VDU BUFFER (VDU) 2 P EXTRN STOVDU STORE CHAR. IN VDU BUFFER (VDU) &
0x35089c…350a30 Dummy {f00=0x0114, f01=0x0190, f02=»(VDU) n 6 P EXTRN DCOFLN INDICATE OFFLINE TO DC (DCSNA,DCBSC) 0 P EXTRN DISMOD DISPLAY MODIFIED FIELDS (VDU) H . P EXTRN CONPF CONVERT PF-KEY TABLE (CONVER) | * P EXTRN OPSYS OPEN SYSTEM (DCSNA,DCBSC) $ P EXTRN LINE GET LINE FLAG (VDU) & P EXT
0x350a30…350bc4 Dummy {f00=0x0114, f01=0x0190, f02=»BUF GET BUFFER (PAD) & P EXTRN RELBUF RELEASE BUFFER (PAD) * P EXTRN DISSTA DISPLAY STATISTICS (VDU) F * P EXTRN RDSTAT READ STATISTICS (DCBSC) t 2 P EXTRN CHKSTA CHECK LINE STATUS (DCBSC,DCSNA) $ P EXTRN SETSTA SET STATUS (DCSNA) $ P EXTRN C
0x350bc4…350d58 Dummy {f00=0x0114, f01=0x0190, f02=»*************** b B P* * B P* CONDITIONAL ASSEMBLY PARAMETERS * ^ B P* * B P******************************
0x350d58…350eec Dummy {f00=0x0114, f01=0x018e, f02=»NG IF :=1 x POFLIN EQU 0 $ PX:D EQU 1 NUMBER OF LINES (1-2) & PNBRLIN EQU 2 N $ PX:F EQU 0 KEY-LOCK STATUS IF:=1 b PKEYLST EQU 0 $ PX:G EQU 0 PF KEY HANDLING IF:=1 PPFX EQU 1 $ PX:H EQU 0 PA KEY HANDLING IF :=1 PPAX EQU
0x350eec…351080 Dummy {f00=0x0114, f01=0x0190, f02=» * PX:M EQU 0 COPY COMMAND INCLUDED IF:=1 PCOPCMD EQU 1 2 & PX:O EQU 0 TEST MODE INCLUDED IF:=1 F PTEST EQU 0 p 0 PX:P EQU 0 COPY LOCK FUNCTION INCLUDED IF:=1 PCOPL EQU 0 P EJECT D P**************************************************
0x351080…351214 (3, 182) Dummy {f00=0x0114, f01=0x0190, f02=»* * D P*************************************************************** H P P* P* PREDEFINED KEYS P* * PCRUP EQU /80 FIRST "MOVE CURSOR " KEY , PERFKEY EQU /88
0x351214…3513a8 Dummy {f00=0x0114, f01=0x0190, f02=»FKLKEY EQU /94 FIRST KEYLOCK VALUE & PLKLKEY EQU /9C LAST KEYLOCK VALUE * ( PFIPA EQU /9F FIRST PROGRAM ATTN. KEY T PENTKEY EQU /A0 ENTER KEY & PSYSKEY EQU /A1 SYSTEM REQUEST KEY PCLRKEY EQU /A2 CLEAR KEY & PPFKEY EQU /B1 PROGRAM FUNTION
0x3513a8…35153c Dummy {f00=0x0114, f01=0x0190, f02=»DDRESS | PECBRL EQU 4 REQUESTED LENGTH PECBEL EQU 6 EFFECTIVE LENGTH 2 PECBRC EQU 8 RETURN CODE V PECBCW EQU 10 CONTROL WORD v & PECBCW2 EQU 12 CONTROL WORD TWO DK P* P* SPECIAL CHARACTERS P* PNULL EQU 0 NULL CHAR.
0x35153c…3516d0 Dummy {f00=0x0114, f01=0x0190, f02=»N EQU /B7 PLOF EQU /B8 PLFL EQU /B9 FLASH & P IFT KB6272=1 @ PLAMP1 EQU /20 V PLAMP2 EQU /10 l PLAMP3 EQU 8 PLAMP4 EQU 4 PLAMP5 EQU 2 PLAMP6 EQU 1 P XIF P IFF KB6272=1 PLAMP1 EQU 0 P
0x3516d0…351864 Dummy {f00=0x0114, f01=0x0190, f02=»IZE P* PLLINE EQU 80 LINE LENGTH PLBVDU EQU 1920 TOTAL SIZE 6 P* X P* MODES b P* r PNEWMOD EQU /8000 NEW MODE | * PHCPMOD EQU /4000 HARDCOPY OUTSTANDING PMYJOB EQU /0004 MY JOB MODE ( PSYSOP EQU /0002 SYSTEM O
0x351864…3519f8 Dummy {f00=0x0114, f01=0x0190, f02=»K v P EJECT P* P* RELATIVE ADDRESSES IN " P* TERMINAL WORKBLOCK B P* ^ PBVDU EQU 2 VDU SCREEN BUFFER h $ PLINFLG EQU BVDU+1920 LINE FLAGS PWCC EQU LINFLG+30 WCC CHAR. . PKBINH EQU WCC+2 KEYBOARD INHIBIT INDICATOR $
0x3519f8…351b8c Dummy {f00=0x0114, f01=0x0190, f02=»2 INSERT MODE SWITCH $ PKEYS EQU MODE+2 KEY LOCK STATUS 4 PRDMORE EQU KEYS+12 BRANCH ADDRESS TO NEXT KB-KEY D 2 PCURPOS EQU RDMORE+2 CURSOR POS. IN SYSTEM MODE | PREGI EQU CURPOS+4 SAVE AREA PSNAMOD EQU REGI+32 SNA MODE PBSCMOD EQU SNA
0x351b8c…351d20 Dummy {f00=0x0114, f01=0x0190, f02=» j * PECBICW EQU ECBICR+2 ECB INTERTAS WRITE , PECBKB2 EQU ECBICW+6 ECB 2ND KEYBOARD DK 6 P* f P* RELATIVE ADDRESSES IN p P* COMMON WORKBLOCK P* P IFF TEST=1 PTSKTAB EQU 26 TASK TABLE P XIF P IFT TEST=1 P
0x351d20…351eb4 (3, 183) Dummy {f00=0x0114, f01=0x0190, f02=» * D P* KBINP MAIN ROUTINE * D D P* * D P****************************************************
0x351eb4…352048 Dummy {f00=0x0114, f01=0x0190, f02=»RVED P* A6= RESERVED P* A7= KEY-HANDLING INDICATOR " P* A11= CREDIT WORK AREA F P* A13= RESERVED f P* ~ @ P*********************************************************** PKBINP2 EQU * . P LDK A1,1 INDICATE 2ND KEYBOARD PRESEN
0x352048…3521dc Dummy {f00=0x0114, f01=0x0190, f02=»D A1,ECBCW,A8 SEE IF KEYLOCK ? DK P RF(N) KBIN80 SKIP IT DK * P XIF J P IFT KEYLST=1 V & P LC* A2,ECBBA,A8 GET KEYLOCK VALUE l * P ADKL A2,FKLKEY-/70 PREPARE FOR TABLE P SC* A2,ECBBA,A8 RESTORE P XIF P LD A1,ECBRC,A8 ERROR?
0x3521dc…352370 Dummy {f00=0x0114, f01=0x0190, f02=» $ P LC* A2,ECBBA,A8 GET INPUT CHAR. ! P ANK A2,/FF ! , P LD A1,KBINH,A11 ! @ " P ANK A1,6 MUST BE A RESET KEY? ! X P RF(Z) KBIN30 NO ! ~ P CWK A2,RSET RESET KEY? ! P IFT SNA=1 ! P RF(E) KBIN30 YES ! & P CWK A2,SYSKEY SYSTEM REQUEST KEY? !
0x352370…352504 Dummy {f00=0x0114, f01=0x0190, f02=»GAL CHAR ! ~ P CWK A2,LAKEY " P RF(G) KBIN80 ILLEGAL CHAR " & P IFT SNA=1 " H " P LD A1,SNAMOD,A11 GET SNA MODE " Z P ANK A1,/FF " 2 P CFI A14,CPLKB,A1 COMPLETE KB IN CURRENT MODE " P XIF " P IFF SNA=1 " P LDK A7,0 " " P CWK A2,FIPA P
0x352504…352698 Dummy {f00=0x0114, f01=0x0190, f02=» EQU * " P XIF # P LDR A7,A7 ANY KEY-HANDLING # P RF(NZ) KBIN80 NO # > $ P ADR A3,A3 PREPARE FOR KEY-TABLE # X & P LD A1,RDMORE,A11 KEY IN SEQUENCE? # P RF(Z) KBIN50 NO # $ P CF A14,DCABOR KILL DC AGAIN DK # $ P LD A1,RDMORE,A11 RESTORE A1 D
0x352698…35282c Dummy {f00=0x0114, f01=0x0190, f02=»ER # d P RF KBIN90 $ PKBIN80 EQU * $ " P CF A14,RESKB RESET KB BUFFER $ 0 PKBIN90 EQU * $ V P RTN A14 $ j P EJECT $ z P IFT SNA=1 $ J P********************************************************************* $ J P*
0x35282c…3529c0 Dummy {f00=0x0114, f01=0x0190, f02=» * $ J P********************************************************************* % B PCPLKB EQU * % ( P DATA KBCPLO KB-COMPL. IN LOCAL MODE % * P DATA KBCPSY KB-COMPL. IN SYSTEM MODE % * P DATA KBCP
0x3529c0…352b54 (3, 184) Dummy {f00=0x0115, f01=0x0190, f02=» * % J P* KBCLO KB-COMPLETION IN LOCAL MODE * & F J P* * & J P**************************************
0x352b54…352ce8 Dummy {f00=0x0115, f01=0x0190, f02=» & P* A5= RESERVED ' P* A6= RESERVED ' P* A7= KEY-HANDLING INDICATOR ' 4 P* A11= CREDIT WORK AREA ' X P* A13= RESERVED ' x P* ' @ P*********************************************************** ' PKBCPLO EQU * ' $ P LDK A7,0 INDICATE KEY
0x352ce8…352e7c Dummy {f00=0x0115, f01=0x0190, f02=»TEM REQUEST? ' ~ P RF(NE) KBCL80 NO ( & P CF A14,OPSYS START COMMUNICATION ( . P CF A14,TSTSTA TEST STATUS ( X P ANKL A1,/101 ACTIVE? ( z P RF(NZ) KBCL90 NO ( & P LDK A1,SYSOP INDICATE SYSTEM MODE ( , P ORKL A1,/8000 INDICATE MODE ACTIVATION (
0x352e7c…353010 Dummy {f00=0x0115, f01=0x0190, f02=»DMORE,A11 INSIDE IDENT ROUTINE? ( P RF(Z) KBCL85 NO ) ( $ P LDK A7,0 INDICATE KEY-HANDLING ) @ P RF KBCL90 ) h PKBCL85 EQU * ) z P CF A14,ERROR ILLEGAL KEY ) PKBCL90 EQU * ) P RTN A14 ) P EJECT ) H P**************************************
0x353010…3531a4 Dummy {f00=0x0115, f01=0x0190, f02=»B-COMPLETION IN SYSTEM MODE * ) z H P* * * 6 H P******************************************************************** * P* REGISTERS * P* * P* A2= KEY-CHAR * P* A3=
0x3531a4…353338 Dummy {f00=0x0115, f01=0x0190, f02=»DIT WORK AREA * P* A13= RESERVED + P* + . @ P*********************************************************** + 8 PKBCPSY EQU * + | $ P LDK A7,0 INDICATE KEY-HANDLING + $ P CWK A2,FIPA PROGRAM ATTN. KEY? + P RF(L) KBCS20 NO + 0 P CWK A2,CLRKEY U
0x353338…3534cc Dummy {f00=0x0115, f01=0x0190, f02=»TIRE SCREEN + z P RF KBCS80 , PKBCS10 EQU * , & P RF(G) KBCS70 YES , : P CM MODE,A11 , T $ P CF A14,LMP6OF CLEAR INSERT MODE , h P CF A14,DCABOR ABORT DC , P RF KBCS80 , PKBCS20 EQU * , $ P CWK A2,ERIKEY ERASE INPUT KEY? , P RF(E) KBC
0x3534cc…353660 Dummy {f00=0x0115, f01=0x0190, f02=»KBCS90 NO =1 , P LD A1,CURPOS,A11 - " P CWK A1,/800 CURSOR INITIATED? - . P RF(NE) KBCS90 YES - T $ P CF A14,SCRINF GET SCREEN INFO. - n & P ST A4,CURPOS,A11 INITIATE CURSOR - P RF KBCS90 - PKBCS70 EQU * - P CF A14,ERROR INDICATE ERROR -
0x353660…3537f4 (3, 185) Dummy {f00=0x0115, f01=0x0190, f02=»,A11 - PKBCS90 EQU * . P RTN A14 . P EJECT . 0 F P****************************************************************** . > F P* * . F P* KBCPJO KB-COMPLETION IN MY JOB MODE
0x3537f4…353988 Dummy {f00=0x0115, f01=0x0190, f02=»************************ . f P* REGISTERS / P* / 4 P* A2= KEY-CHAR / > P* A3= KEY-TABLE INDEX / T P* A4= RESERVED / r P* A5= RESRVED / P* A6= RESRVED / P* A7= KEY-HANDLING INDICATOR / P* A11= CREDIT WORK AREA / P* A13= RESERVED
0x353988…353b1c Dummy {f00=0x0115, f01=0x0190, f02=»G / r $ P CWK A2,FIPA PROGRAM ATTN. KEY? 0 P RF(L) KBCJ90 NO 0 2 P IFT OFLIN=1 0 J P RF(E) KBCJ80 0 ^ P XIF 0 t P IFT SNA=1 0 P CM MODE,A11 0 ( P CF A14,LMP6OF TURN OFF INSERT LAMP 0 P CF A14,DCABOR ABORT DC 0 P IFT OFLIN=1 0 P R
0x353b1c…353cb0 Dummy {f00=0x0115, f01=0x0190, f02=»KBCJ90 EQU * 0 P RTN A14 1 P XIF 1 $ P EJECT 1 0 D P*************************************************************** 1 > D P* * 1 D P* READKB READ KEYBOARD WITH NO WAIT
0x353cb0…353e44 Dummy {f00=0x0115, f01=0x0190, f02=»************* 1 ^ P* REGISTERS 2 P* 2 2 P* A8= KB-ECB 2 < P* A11= CREDIT WORK AREA 2 P P* A13= RESERVED 2 p P* 2 : P***************************************************** 2 PREADKB EQU * 2 P LD A8,ECBKB,A11 2 P LDK A7,0 CL
0x353e44…353fd8 Dummy {f00=0x0115, f01=0x0190, f02=» P LDK A7,2 STANDARD READ 3 P LKM 3 $ P DATA 1 3 0 P RTN A14 3 @ 0 P** READ FROM SECOND KEYBOARD, P & T, DK ** 3 P PREADK2 EQU * 3 P LD A8,ECBKB2,A11 GET ECB 3 P LDK A7,0 CLEAR ECBCW 3 P ST A7,ECBCW,A8 3 P LDK A7,1 3 P S
0x353fd8…35416c Dummy {f00=0x0115, f01=0x018e, f02=» EJECT 3 D P*************************************************************** 4 D P* * 4 V D P* RESKB RESET KEYBOARD BUFFER * 4 D P*
0x35416c…354300 Dummy {f00=0x0115, f01=0x0190, f02=» 4 v P* 5 P* A11= CREDIT WORK AREA 5 P* A13= RESERVED 5 2 P* 5 J : P****************************************************** 5 T PRESKB EQU * 5 2 P* REMOVED UNTIL NEEDED......DK, 811028....** 5 P RTN A14 5 P EJECT 5 @ P**************
0x354300…354494 (3, 186) Dummy {f00=0x0115, f01=0x018e, f02=»U INTERTASK READ 5 @ P* * 6 @ P*********************************************************** 6 P* REGISTERS 6 P* 6 P* A2= RESERVED 6 P* A11= CREDIT WORK AREA 6 P* A13= RES
0x354494…354628 Dummy {f00=0x0115, f01=0x0190, f02=» P CF A14,ICSET SET NO TIMEOUT 7 P IFF COPCMD=1 7 ( P LD A1,PRTID,A11 7 > P XIF 7 V P IFT COPCMD=1 7 b P LDK A1,0 UNADDRESSED 7 x P XIF 7 P LDKL A3,REGI 7 P ADR A3,A11 7 P LDK A2,2 LENGTH 7 " P CF A14,ICREAD READ INTERTASK 7
0x354628…3547bc Dummy {f00=0x0115, f01=0x0190, f02=» * 7 p D P* ICINP INTERTASK INPUT * 8 ( D P* * 8 p D P**************************************************************** 8 P*
0x3547bc…354950 Dummy {f00=0x0115, f01=0x0190, f02=»**************************** 8 l PICINP EQU * 9 $ P LD* A2,ECBBA,A8 9 8 P IFT COPCMD=1 9 P P LDR A1,A2 COPY COMMAND? 9 f P RF(NN) ICIN80 NO 9 P LDKL A3,BVDU BUFFER TO SEND 9 P ADR A3,A11 9 P IFT COPL=1 9 ( P LCR A2,A3 CHECK IF ALLOWED
0x354950…354ae4 Dummy {f00=0x0115, f01=0x0190, f02=» PICIN20 EQU * : P XIF : P IFT COPCMD=1 : $ P LD A2,ECBCW,A8 GET TO WHOM : : P LD A8,ECBICW,A11 : ^ P CF A14,ICSET SET TIMEOUT : x P LDR A1,A2 : P LDKL A2,LBVDU+/20 LENGTH : P CF A14,ICWRT SEND IT AWAY : ( P LDKL A1,HCPMOD HARDCOPY
0x354ae4…354c78 Dummy {f00=0x0115, f01=0x0190, f02=»NG : h P IFT SNA=1 ; P XRS A1,SNAMOD,A11 ; P XIF ; 6 P IFF SNA=1 ; B P XRS A1,BSCMOD,A11 ; T P XIF ; n P ANK A2,1 PRINTER OK? ; z P RF(Z) ICIN90 YES ; PICIN90 EQU * ; P RTN A14 ; P EJECT ; @ P************************************
0x354c78…354e0c Dummy {f00=0x0115, f01=0x0190, f02=»OUT * ; j > P* * < @ P*********************************************************** < ` P* REGISTERS < P* < P* A2= RESERVED < P* A8= INTERTASK ECB < P* A11= R
0x354e0c…354fa0 Dummy {f00=0x0115, f01=0x0190, f02=» LDKL A1,-1 NO TIMEOUT < P ST A1,ECBCW,A8 = P LDK A7,/B9 SET TIMEOUT = 6 P LKM = V P DATA 1 = b P RTN A14 = r P EJECT = B P************************************************************* = B P*
0x354fa0…355134 (3, 187) Dummy {f00=0x0115, f01=0x0190, f02=» * = b B P************************************************************** > P* REGISTERS > ^ P* > P* A1= TASK ID > P* A2= LENGTH > P* A3= BUFFER ADDRESS > P* A8= INTETASK READ ECB > P* A11= RESERVED > P
0x355134…3552c8 Dummy {f00=0x0115, f01=0x0190, f02=»,A8 TASK ID > P ST A2,ECBRL,A8 LENGTH ? " P ST A3,ECBBA,A8 BUFFER ADDRESS ? 2 P LDK A7,/02 READ ? X P LKM ? p P DATA 1 ? | P RTN A14 ? P EJECT ? D P*************************************************************** ? D P*
0x3552c8…35545c Dummy {f00=0x0115, f01=0x0190, f02=» * ? D P*************************************************************** @ : P* REGISTERS @ P* @ P* A1= TASK ID @ P* A2= LENGTH @ P* A3= BUFFER ADDRESS @ P* A8= INTERTASK WRIT
0x35545c…3555f0 Dummy {f00=0x0115, f01=0x0190, f02=» @ P PICWRT EQU * A P ST A1,ECBCW,A8 TASK ID A P ST A2,ECBRL,A8 LENGTH A < " P ST A3,ECBBA,A8 BUFFER ADDRESS A Z P LDK A7,/86 WRITE A P LKM A P DATA 1 A P RTN A14 A P EJECT A H P****************************************************
0x3555f0…355784 Dummy {f00=0x0115, f01=0x0190, f02=»DLING * A l H P* * B ( H P******************************************************************* B t P* REGISTERS B P* B P* A11= CREDIT WORK AREA B P*
0x355784…355918 Dummy {f00=0x0115, f01=0x0190, f02=»ON 'ERROR' LAMP B | P LDK A1,4 RESET ALLOWED C P ORS A1,KBINH,A11 C 8 & P CF A14,SOUND TURN ON SOUND ALARM C R P RTN A14 C | P C P EJECT C B P************************************************************* C B P*
0x355918…355aac Dummy {f00=0x0115, f01=0x0190, f02=» * C t B P************************************************************* D * PLMP1ON LDK A1,LAMP1 D p P RF LMPON D PLMP1OF LDK A1,LAMP1 D P RF LMPOF D PLMP2ON LDK A1,LAMP2 D P RF LMPON D PLMP2OF LDK A1,
0x355aac…355c40 Dummy {f00=0x0115, f01=0x0190, f02=»1,LAMP4 D P RF LMPON E PLMP4OF LDK A1,LAMP4 E " P RF LMPOF E > PLMP5ON LDK A1,LAMP5 E P P RF LMPON E l PLMP5OF LDK A1,LAMP5 E ~ P RF LMPOF E PLMP5FL LDK A1,LAMP5 E P RF LMPFL E PLMP6ON LDK A1,LAMP6 E P RF LMPON E P
0x355c40…355dd4 (3, 188) Dummy {f00=0x0116, f01=0x0190, f02=» PLMPFL LDK A7,LFL F P RF SDISP F P EJECT F . B P************************************************************* F < B P* * F B P* SDISP SIGNAL ROUTINE * F
0x355dd4…355f68 Dummy {f00=0x0116, f01=0x0190, f02=»* F T P* REGISTERS G P* G & P* A8= SIGNAL ECB G 0 P* A11= CREDIT WORK AREA G H P* A13= RESERVED G h P* G < P******************************************************* G PSDISP EQU * G P LD A8,ECBSD,A11 G P ST A1,ECBCW,A8 G
0x355f68…3560fc Dummy {f00=0x0116, f01=0x0190, f02=»,1,A8 G P LKM H $ P DATA 1 LAMPS ON SECOND KEYB'RD H PSDISP1 EQU * H D P LD A8,ECBSD,A11 H Z * P LDK A1,/40 RESTORE FILE CODE 1ST KB H t P SC A1,1,A8 H P** END OF DK MODS ** H P LKM H P DATA 1 H P RTN A14 H P EJECT H
0x3560fc…356290 Dummy {f00=0x0116, f01=0x0190, f02=» * H V D P* KEYTAB KEY-TABLE, FIXED ENTRY FOR EACH FUNC. * I D P* * I V D P**************************************************************** I PKEYTAB EQU * I P*20 I P D
0x356290…356424 Dummy {f00=0x0116, f01=0x0190, f02=» P DATA CHAR ' J P DATA CHAR ( J P DATA CHAR ) J , P DATA CHAR * J @ P DATA NUM + J T P DATA NUM , J h P DATA NUM - J | P DATA NUM . J P DATA CHAR / J P*30 J P DATA NUM 0 J P DATA NUM 1 J P DATA NUM 2 J P DATA NU
0x356424…3565b8 Dummy {f00=0x0116, f01=0x018e, f02=»A CHAR : J P DATA CHAR ; K P DATA CHAR < K $ P DATA CHAR = K 8 P DATA CHAR > K L P DATA CHAR ? K ` P*40 K t P DATA CHAR K P DATA CHAR A K P DATA CHAR B K P DATA CHAR C K P DATA CHAR D K P DATA CHAR E K P DATA CHAR F K
0x3565b8…35674c Dummy {f00=0x0116, f01=0x0190, f02=» K P DATA CHAR N L P DATA CHAR O L P*50 L 0 P DATA CHAR P L < P DATA CHAR Q L P P DATA CHAR R L d P DATA CHAR S L x P DATA CHAR T L P DATA CHAR U L P DATA CHAR V L P DATA CHAR W L P DATA CHAR X L P DATA CHAR Y L P DAT
0x35674c…3568e0 Dummy {f00=0x0116, f01=0x0190, f02=»CHAR L P DATA CHAR a LOWER CASE A-Z M P DATA CHAR b M 0 P DATA CHAR c M D P DATA CHAR d M X P DATA CHAR e M l P DATA CHAR f M P DATA CHAR g M P DATA CHAR h M P DATA CHAR i M P DATA CHAR j M P DATA CHAR k M P DATA CHAR l M
0x3568e0…356a74 (3, 189) Dummy {f00=0x0116, f01=0x0190, f02=» DATA CHAR s M P DATA CHAR t N P DATA CHAR u N ( P DATA CHAR v N < P DATA CHAR w N P P DATA CHAR x N d P DATA CHAR y N x P DATA CHAR z N P DATA CHAR N P DATA CHAR N P DATA CHAR N P DATA CHAR N P DATA RETURN N P*80 N P
0x356a74…356c08 Dummy {f00=0x0116, f01=0x0190, f02=» DATA RDHOME N P DATA EREOF O P DATA ERINPT O ( P IFT IN:DL=1 O < P DATA INSERT O P P DATA DELETE O d P XIF O x P IFF IN:DL=1 O P DATA RETURN O P DATA RETURN O P XIF O P DATA RESET O P DATA DUP O P DATA FLDMRK O P D
0x356c08…356d9c Dummy {f00=0x0116, f01=0x0190, f02=»KEYL O P DATA KEYL P P DATA KEYL P P DATA KEYL P 0 P DATA KEYL P B P DATA KEYL P T P DATA KEYL P f P DATA KEYL P x P XIF P P IFF KEYLST=1 P P DATA RETURN P P DATA RETURN P P DATA RETURN P P DATA RETURN P P DATA RETURN
0x356d9c…356f30 Dummy {f00=0x0116, f01=0x0190, f02=» 8 P DATA RETURN FREE LABEL FOR NEW KEY (NOT P. A. KEY) Q 8 P DATA RETURN FREE LABEL FOR NEW KEY (NOT P. A. KEY) Q @ P*FIRST P. A. KEY Q | P IFT OFLIN=1 Q P DATA OFLINE Q P XIF Q P IFF OFLIN=1 Q P DATA RETURN Q P XIF Q P*A0 Q P
0x356f30…3570c4 Dummy {f00=0x0116, f01=0x018e, f02=»RN Q P DATA CLEAR R P DATA RETURN R P XIF R 2 P IFT NBRLIN=2 R > P DATA MFCHGE R T P XIF R h P IFF NBRLIN=2 R t P DATA RETURN R P XIF R P IFT PAX=1 R P DATA PAEX R P XIF R P IFF PAX=1 R P DATA RETURN R P XIF R
0x3570c4…357258 Dummy {f00=0x0116, f01=0x0190, f02=» P DATA PAALFA S P DATA PAALFA S P DATA PAALFA S , P DATA PAALFA S @ P*B0 S T P IFT PFX=1 S ` P DATA PFEX S r P XIF S P IFF PFX=1 S P DATA RETURN S P XIF S P DATA PF 1 S P DATA PF 2 S P DATA PF 3 S P DATA PF 4 S
0x357258…3573ec Dummy {f00=0x0116, f01=0x0190, f02=»A PF 12 S P DATA PF 13 T P DATA PF 14 T $ P DATA PF 15 T 8 P*C0 T L P DATA PF 16 T X P DATA PF 17 T l P DATA PF 18 T P DATA PF 19 T P DATA PF 20 T P DATA PF 21 T P DATA PF 22 T P DATA PF 23 T P DATA PF 24 T
0x3573ec…357580 Dummy {f00=0x0116, f01=0x0190, f02=»************************************************ T D P* * U 8 B P* CHAR ALPHABETIC AND SPEC. CHAR UPDAT. DISPL. * U B P* * U
0x357580…357714 (3, 190) Dummy {f00=0x0116, f01=0x0190, f02=»IBUTE MASKL U P* A4= RESERVED V P* A5= RESERVED V * P* A6= RESERVED V @ P* A11= RESERVED V V P* A13= RESERVED V n P* V B P************************************************************** V PCHAR EQU * V $ P LDK A3,/30 LOAD ATTRIBUTE MASK
0x357714…3578a8 Dummy {f00=0x0116, f01=0x0190, f02=»****** V X B P* * W B P* NUM NUMERIC UPDAT. DISPL. * W T B P* NUMCOM NUMERIC COMMA * W D P*
0x3578a8…357a3c Dummy {f00=0x0116, f01=0x0190, f02=»= KEY-CHAR W P* A3= ATTRIBUTE MASK X P* A4= RESERVED X . P* A5= RESERVED X D P* A6= RESERVED X Z P* A11= RESERVED X p P* A13= RESERVED X P* X B P************************************************************* X PNUMCOM EQU * X P LDK
0x357a3c…357bd0 Dummy {f00=0x0116, f01=0x018e, f02=» X P EJECT Y D P*************************************************************** Y D P* * Y ^ D P* ANCOMM COMMON ROUTINE FOR ALPHANUM. CHAR. * Y D P*
0x357bd0…357d64 Dummy {f00=0x0116, f01=0x0190, f02=» P* Z P* A2= KEY-CHAR Z " P* A3= AT ENTRY ATTRIBUTE MASK Z $ P* A4= REL. CURSOR POS. Z J P* A5= REL. ATTRIBUTE POS. Z h P* A6= ATTRIBUTE CHAR. Z P* A11= CREDIT WORK AREA Z P* A13= RESERVED Z P* Z D P******************************
0x357d64…357ef8 Dummy {f00=0x0116, f01=0x0190, f02=»TE Z t P RF(E) ANC800 YES [ P LDR A1,A6 [ $ P ANR A1,A3 ALLOWED POS. ? [ 6 P RF(NZ) ANC800 NO [ X P IFT IN:DL=1 [ r P LD A1,MODE,A11 INSERT MODE? [ P RF(Z) ANC100 NO [ P CF A14,INSMOD [ P LDR A7,A1 [ P ANK A7,1 INSRETED NORMAL? [
0x357ef8…35808c Dummy {f00=0x0116, f01=0x0190, f02=» [ P LDR A7,A2 0 P CF A14,STOVDU STORE KEY-CHAR IN VDU BUFFER * P CF A14,WCHAR DISPLAY CHAR AND CURSOR N 8 P CF A14,POSUNP MOVE CURSOR TO NEXT UNPROTECTED POS. | P RF ANC900 PANC800 EQU * P CF A14,ERROR INDICATE ERROR PANC900
0x35808c…358220 Dummy {f00=0x0116, f01=0x0190, f02=» * x @ P* CURMOV MOVE CURSOR ON SCREEN * ] , @ P* * ] p @ P************************************************************ ] P* REGISTERS ]
0x358220…3583b4 (3, 191) Dummy {f00=0x0116, f01=0x018e, f02=»ESERVED ] P* A13= RESERVED ^ P* ^ ( @ P************************************************************ ^ 2 PCURMOV EQU * ^ v $ P CF A14,SCRINF GET SCREEN INFO. ^ P SUK A2,CRUP GET INDEX ^ P ADR A2,A2 ^ , P CFI A14,CURTAB,A2 JUMP IN CURSOR TABL
0x3583b4…358548 Dummy {f00=0x0116, f01=0x0190, f02=» ^ $ P CF A14,ATMASB UPDATE ATTRIBUTE _ PCURM10 EQU * _ 0 P LDK A1,2 REQ. LENGTH _ D P CF A14,DISCHA SET CURSOR _ b P RTN A14 _ P EJECT _ $ P* CURTAB CURSOR JUMP TABLE _ PCURTAB EQU * _ $ P DATA CRLEFT MOVE CURSOR TO LEFT _ & P D
0x358548…3586dc Dummy {f00=0x0116, f01=0x0190, f02=»OR TO LEFT _ x PCRLEFT EQU * ` P SUK A4,1 ` & $ P RF(NN) CRRET NOT LEFTMOST POS. ` 8 ( P LDKL A4,LBVDU-1 LAST POS. ON SCREEN ` ` P RF CRRET ` ( P* CRRIGT MOVE CURSOR TO RIGHT ` PCRRIGT EQU * ` P ADK A4,1 ` P CWK A4,LBVDU END OF BUF
0x3586dc…358870 Dummy {f00=0x0116, f01=0x0190, f02=»L A4,LLINE ` P CWK A4,LBVDU LAST LINE? a P RF(L) CRRET NO a 2 P SUKL A4,LBVDU a J P RF CRRET a ` P* CURUP MOVE CURSOR UP a r PCURUP EQU * a P SUKL A4,LLINE a P RF(NN) CRRET UPMOST LINE a P ADKL A4,LBVDU a PCRRET EQU * a
0x358870…358a04 Dummy {f00=0x0116, f01=0x0190, f02=» * a p B P* BAKTAB TAB. UNPROTECTED BACKWARDS * b & B P* * b l B P************************************************************** b P* REGISTERS b
0x358a04…358b98 Dummy {f00=0x0116, f01=0x0190, f02=»OS. b t P* A11= RESERVED c P* A13= RESERVED c $ P* c < D P*************************************************************** c F PBAKTAB EQU * c * P CF A14,SCRINF GET SCREEN INFORMATION c P LDR A9,A5 c ( P CWK A5,LBVDU+1 UNFORMATTED SCREEN? c
0x358b98…358d2c Dummy {f00=0x0116, f01=0x0190, f02=» FIRST POS. ON SCREEN c ~ ( P LDKL A4,LBVDU-1 LAST POS. ON SCREEN d PBAK100 EQU * d J 0 P CWR A4,A5 STANDING ON POS. AFTER ATTRIBUTE? d ^ P RF(E) BAK300 YES d P LDR A4,A5 d P LDR A7,A6 d P ANK A7,/20 PROTECTED FIELD? d P RF(Z) BAK500 NO d
0x358d2c…358ec0 Dummy {f00=0x0116, f01=0x0190, f02=»MASB SEARCH ATTRIBUTE BACKWARDS AND MASK IT d P LDR A7,A6 e 4 P ANK A7,/20 PROTECTED FIELD? e F P RF(Z) BAK500 NO e j P LDR A4,A5 e & P CWR A5,A9 WHOLE SCREEN SEARCHED? e P RB(NE) BAK300 NO e P LDK A1,0 FIRST SCREEN POS. e , P CF A14,ATMA
0x358ec0…359054 (3, 192) Dummy {f00=0x0117, f01=0x0190, f02=»D? e v P RF(NG) BAK700 NO f PBAK600 EQU * f $ P LDK A4,0 FIRST SCREEN POS. f 8 PBAK700 EQU * f * P CF A14,STOINF SAVE SCREEN INFORMATION f p P LDK A1,2 REQ. LENGTH f P CF A14,DISCHA SET CURSOR f P RTN A14 f P EJECT f B P************
0x359054…3591e8 Dummy {f00=0x0117, f01=0x0190, f02=» TAB TAB. UNPROTECTED FORWARD * f B P* * g > B P************************************************************* g P* REGISTERS g P* g P* A4= REL. CURSOR POS. g P*
0x3591e8…35937c Dummy {f00=0x0117, f01=0x0190, f02=»ERVED g P* h B P************************************************************** h PTAB EQU * h ^ * P CF A14,SCRINF GET SCREEN INFORMATION h p P LDR A9,A5 h ( P CWK A5,LBVDU+1 UNFORMATTED SCREEN? h P RF(E) TAB200 YES h PTAB100 EQU * h
0x35937c…359510 Dummy {f00=0x0117, f01=0x0190, f02=»ECTED FIELD? h P RF(Z) TAB150 NO i & P CWR A5,A9 WHOLE SCREEN SEARCHED? i , P RB(NE) TAB100 NO i V " P LDK A1,0 FIRST POS. ON SCREEN i p , P CF A14,ATMASB UPDATE FIELD INFORMATION i P RF TAB200 i PTAB150 EQU * i P ADK A4,1 i & P CWK A4,LB
0x359510…3596a4 Dummy {f00=0x0117, f01=0x0190, f02=»F A14,STOINF SAVE SCREEN INFORMATION i P LDK A1,2 REQ. LENGTH j , P CF A14,DISCHA SET CURSOR j J P RTN A14 j l P EJECT j | H P******************************************************************* j H P*
0x3596a4…359838 Dummy {f00=0x0117, f01=0x0190, f02=» * j n H P******************************************************************* k * P* REGISTERS k v P* k P* A4= REL. CURSOR POS. k P* A5= REL. ATTRIBUTE POS. k P* A6= ATTRIBUTE CHAR. k P* A11= RESERVED k
0x359838…3599cc Dummy {f00=0x0117, f01=0x018e, f02=»SCRINF GET SCREEN INFORMATION k $ P CF A14,CRDOWN MOVE CURSOR DOWN l & $ P LDK A1,0 COMPUTE LEFTMOST POS. l N PCRN100 EQU * l v P SUK A4,LLINE l P RF(N) CRN200 l P ADK A1,LLINE l P RB CRN100 l PCRN200 EQU * l P LDR A4,A1 l ( P CWK
0x3599cc…359b60 Dummy {f00=0x0117, f01=0x0190, f02=» l x P RF(NL) CRN400 YES m P LDR A1,A4 m " , P CF A14,ATMASB SEARCH ATTRIBUTE BACKWARD m 4 P LDR A7,A6 m d P ANK A7,/20 PROTECTED? m v P RF(Z) CRN800 NO m P RF CRN500 m PCRN400 EQU * m P SUK A4,1 m " P RF(NN) CRN500 NOT WRAP AROUND m &
0x359b60…359cf4 (3, 193) Dummy {f00=0x0117, f01=0x0190, f02=»ED FORWARD m v P RF CRN900 n PCRN800 EQU * n $ * P CF A14,STOINF SAVE SCREEN INFORMATION n 8 P LDK A1,2 REQ. LENGTH n f P CF A14,DISCHA SET CURSOR n PCRN900 EQU * n P RTN A14 n P EJECT n J P************************************************
0x359cf4…359e88 Dummy {f00=0x0117, f01=0x0190, f02=»NPROTECTED FIRST ON SCREEN * n t J P* * o 2 J P********************************************************************* o P* REGISTERS o P* o P* A4= REL. CURSOR POS. o
0x359e88…35a01c Dummy {f00=0x0117, f01=0x0190, f02=»********************************************************* o PRDHOME EQU * p B * P CF A14,SCRINF GET SCREEN INFORMATION p V " P LDK A4,0 FIRST POS. ON SCREEN p P CF A14,STOINF p ( P CWK A5,LBVDU+1 UNFORMATTED SCREEN? p P RF(E) RDH800 YES p P L
0x35a01c…35a1b0 Dummy {f00=0x0117, f01=0x0190, f02=»AST SCREEN POS. p ~ * P CF A14,STOINF SAVE SCREEN INFORMATION q P RF RDH300 q F PRDH100 EQU * q X P LDR A1,A4 q l * P CF A14,ATMASB GET ATTRIBUTE BACKWARD q ~ P LDR A7,A6 q P ANK A7,/20 PROTECTED? q P RF(Z) RDH800 NO q PRDH300 EQU * q ( P
0x35a1b0…35a344 Dummy {f00=0x0117, f01=0x0190, f02=»2 REQ. LENGTH q P CF A14,DISCHA SET CURSOR r PRDH900 EQU * r 8 P RTN A14 r L P EJECT r B P************************************************************* r j B P* * r B P* EREOF
0x35a344…35a4d8 Dummy {f00=0x0117, f01=0x0190, f02=»********************************************* r P* REGISTERS s 6 P* s J P* A4= REL. CURSOR POS. s T P* A5= REL. ATTRIBUTE POS. s r P* A6= ATTRIBUTE CHAR. s P* A11= RESERVED s P* A13= RESERVED s P* s H P****************************
0x35a4d8…35a66c Dummy {f00=0x0117, f01=0x0190, f02=»ATTED SCREEN? s z P RF(E) ERE700 YES t P LDR A7,A6 t 0 P ANK A7,/20 PROTECTED FIELD? t B P RF(NZ) ERE600 YES t f & P CWR A5,A4 STANDING ON ATTRIBUTE? t P RF(E) ERE600 YES t P LDR A1,A4 t P LDR A8,A6 SAVE OLD t P LDR A9,A5 SAVE OLD t
0x35a66c…35a800 Dummy {f00=0x0117, f01=0x0190, f02=»RIBUTE t t P LDR A7,A6 u P LDR A1,A5 u 4 P CF A14,STOVDU STORE NEW ATTRIBUTE IN VDU BUFFER u 2 . P CF A14,STOINF SAVE NEW SCREEN INFORMATION u j P LDR A1,A3 STOP ADDRESS u P RF ERE800 u PERE600 EQU * u P CF A14,ERROR INDICATE ERROR u P R
0x35a800…35a994 (3, 194) Dummy {f00=0x0117, f01=0x0190, f02=»710 DK1 u P LDK A1,0 STOP ADDRESS =3 v PERE710 EQU * DK1 v 2 P CF A14,SCRINF DK1 v L PERE800 EQU * v h P SUR A10,A10 v | 0 P CF A14,ERASUA ERASE UNPROTECTED TO ADDRESS v * P CF A14,DISMOD DISPLAY MODIFIED FIELD v PERE900 EQU * v P R
0x35a994…35ab28 Dummy {f00=0x0117, f01=0x0190, f02=» * v p H P* ERINPT ERASE UNPROTECTED ENTIRE SCREEN * w , H P* * w x H P*******************************************************************
0x35ab28…35acbc Dummy {f00=0x0117, f01=0x0190, f02=»1= RESERVED w P* A13= RESERVED x P* x , H P******************************************************************* x 6 PERINPT EQU * x * P CF A14,SCRINF GET SCREEN INFORMATION x ( P CWK A5,LBVDU+1 UNFORMATTED SCREEN? x P RF(NE) ERI100 NO x &
0x35acbc…35ae50 Dummy {f00=0x0117, f01=0x0190, f02=»SMOD DISPLAY ERASED FIELDS x 4 P CF A14,RDHOME TAB. UNPROTECTED FIRST ON SCREEN y " PERI900 EQU * y Z P RTN A14 y n P EJECT y ~ P IFT IN:DL=1 y < P******************************************************** y < P*
0x35ae50…35afe4 Dummy {f00=0x0117, f01=0x0190, f02=» * y ` < P******************************************************** z P* REGISTERS z P P* z d P* A11= CREDIT WORK AREA z n P* A13= RESERVED z P* z 8 P*************************************************** z PINSERT EQU * z P IM MODE
0x35afe4…35b178 Dummy {f00=0x0117, f01=0x0190, f02=» * z : P* DELETE DELETE CHAR. HANDLING * { . : P* * { l < P******************************************************* { P* REGISTERS { P* { P
0x35b178…35b30c Dummy {f00=0x0117, f01=0x0190, f02=»ERVED { P* | < P******************************************************* | PDELETE EQU * | X * P CF A14,SCRINF GET SCREEN INFORMATION | l P LDKL A3,-1 | PDEL025 EQU * | P ADK A3,LLINE | * P CWR A3,A4 LAST POS. ON CURRENT LINE? | P R
0x35b30c…35b4a0 Dummy {f00=0x0117, f01=0x0190, f02=»F(E) DEL700 YES | P LDR A7,A6 } P ANK A7,/20 PROTECTED? } * P RF(NZ) DEL700 YES } H P ORK A6,1 SET MDT-BIT } b P LDR A7,A6 } P LDR A1,A5 } & P CF A14,STOVDU SAVE NEW ATTRIBUTE } P LDR A8,A6 SAVE OLD } P LDR A9,A5 SAVE OLD } , P C
0x35b4a0…35b634 (3, 195) Dummy {f00=0x0117, f01=0x0190, f02=»ON } l , P CWR A3,A1 ATTRIBUTE BEFOR END OF LINE? ~ P RF(NG) DEL200 NO ~ : P LDR A3,A1 ~ T PDEL200 EQU * ~ f P LDR A1,A4 ~ z PDEL300 EQU * ~ P ADK A1,1 ~ , P CF A14,GETVDU GET CHAR. IN VDU BUFFER ~ P SUK A1,1 ~ , P CF A14,STOVDU STORE
0x35b634…35b7c8 Dummy {f00=0x0117, f01=0x0190, f02=» 0 P CF A14,STOVDU STORE NULL CHAR IN VDU BUFFER P CF A14,SAVE1 8 P LDK A5,LLINE N P LDR A6,A11 d P SUR A10,A10 x P CF A14,LINE GET LINE FLAG P LC A1,LINFLG,A6 P ORK A1,1 P SC A1,LINFLG,A6 P CF A14,REST1 ( P C
0x35b7c8…35b95c Dummy {f00=0x0117, f01=0x0190, f02=» RTN A14 P XIF P EJECT < P******************************************************** * < P* * j < P* RESET RESET KEY HANDLING * < P*
0x35b95c…35baf0 Dummy {f00=0x0117, f01=0x0190, f02=»REDIT WORK AREA P* A13= RESERVED P* 0 8 P**************************************************** : PRESET EQU * v " P CM MODE,A11 RESET INSERT MODE * P CF A14,LMP6OF TURN OFF "INSERT" LAMP $ P CM KBINH,A11 RESSTORE KEYBOARD ( P C
0x35baf0…35bc84 Dummy {f00=0x0117, f01=0x0190, f02=»*************************************************** @ P* * < @ P* DUP DUPLICATE KEY * @ P* * @ P
0x35bc84…35be18 Dummy {f00=0x0117, f01=0x0190, f02=» P* A13= RESERVED P* @ P************************************************************ * PDUP EQU * n P LDK A2,DUPCH GET DUP CHAR. P CF A14,NUM P CF A14,TAB P RTN A14 P EJECT @ P******************************
0x35be18…35bfac Dummy {f00=0x0117, f01=0x0190, f02=»RK KEY * r @ P* * & @ P*********************************************************** j P* REGISTERS P* P* A2= KEY-CHAR P* A11= RESERVED P* A13= RESERVE
0x35bfac…35c140 Dummy {f00=0x0117, f01=0x0190, f02=»CHAR. t P CF A14,NUM P RTN A14 " P EJECT 2 D P*************************************************************** @ P* & P* Z E R O : 3 TRIPLE ZERO KEY ( P* Z E R O : 2 DOUBLE ZERO KEY P* 6 P**********************
0x35c140…35c2d4 (3, 196) Dummy {f00=0x0118, f01=0x0190, f02=»* > P********************************************************* P L PZERO:3 EQU * T P LDK A2,/30 ZERO CHAR. h " P CF A14,NUM DISPLAY CHARACTER PZERO:2 EQU * P LDK A2,/30 ZERO CHAR. " P CF A14,NUM DISPLAY CHARACTER P LDK
0x35c2d4…35c468 Dummy {f00=0x0118, f01=0x0190, f02=»******************************** x < P* * ( < P* OFLINE OFFLINE KEY HANDLING * h < P* * < P********************************
0x35c468…35c5fc Dummy {f00=0x0118, f01=0x0190, f02=»*********************************************** POFLINE EQU * 8 P CF A14,CLEAR L P CF A14,RESET b * P CF A14,DCOFLN INDICATE OFFLINE TO DC x ( P CF A14,LMP6ON TURN ON OFFLINE LAMP $ P IM OFFFLG,A11 SET OFFLINE FLAG $ P ADKL A14,4 SK
0x35c5fc…35c790 Dummy {f00=0x0118, f01=0x0190, f02=»BL I:RT1 RETURN TO "OFFLINE" PROGRAM P XIF , P EJECT 8 > P********************************************************* F > P* * > P* MFCHGE MAIN FRAME CHANGE *
0x35c790…35c924 Dummy {f00=0x0118, f01=0x0190, f02=»* REGISTERS P* P* A11= CREDIT WORK AREA P* A13= RESERVED > P* V < P******************************************************* ` P IFT NBRLIN=2 PMFCHGE EQU * P CF A14,CLEAR P CF A14,RESET P CF A14,LMP1OF
0x35c924…35cab8 Dummy {f00=0x0118, f01=0x0190, f02=»ND MAIN FRAME CHANGE =2 ~ P RF(NZ) MFCH10 P CF A14,LMP1ON 6 P RF MFCH90 L PMFCH10 EQU * ^ P CF A14,LMP2ON r PMFCH90 EQU * P . =2 ( P CF A14,CONCT CONNECT ON NEW LINE =2 $ P CF A14,CHKSTA CHECK LINE STATUS P RTN A14
0x35cab8…35cc4c Dummy {f00=0x0118, f01=0x0190, f02=» * n @ P* COPY LOCAL HARDCOPY * " @ P* * f @ P*********************************************************** P* REGISTERS
0x35cc4c…35cde0 Dummy {f00=0x0118, f01=0x0190, f02=»******* Z PCOPY EQU * P LD A1,SNAMOD,A11 " 2 P ANKL A1,HCPMOD HARDCOPY ALREADY OUTSTANDING? < $ P RF(NZ) COPY80 YES,WAIT A WHILE r P LD A1,PRTID,A11 & P RF(Z) COPY80 PRINTER NOT ASSIGNED 2 P ANK A1,/FF CHECK IF PRINTER OK IN TASK TABL
0x35cde0…35cf74 (3, 197) Dummy {f00=0x0118, f01=0x0190, f02=» PRINTER ASSIGNED FOUND P LC A1,+3,A3 P ANK A1,/FF PRINTER OK? 4 P RF(Z) COPY10 YES T P RF COPY90 n PCOPY10 EQU * ( P LDK A1,/38 INDICATE HARDCOPY IN WCC P ST A1,WCC,A11 P LDKL A3,BVDU BUFFER P ADR A3,A11 ADDRESSS
0x35cf74…35d108 Dummy {f00=0x0118, f01=0x0190, f02=»R LENGTH x " P CF A14,ICWRT WRITE INTERTASK P IFT SNA=1 6 2 P LDKL A1,HCPMOD INDICATE HARDCOPY OUTSTANDING H P ORS A1,SNAMOD,A11 ~ P XIF P IFF SNA=1 2 P LDKL A1,HCPMOD INDICATE HARDCOPY OUTSTANDING P ORS A1,BSCMOD,A11 P X
0x35d108…35d29c Dummy {f00=0x0118, f01=0x018e, f02=»*********************************************** D P* * 8 0 P* IDENT PRINTER IDENT. HANDLING D P* * D P************
0x35d29c…35d430 Dummy {f00=0x0118, f01=0x0190, f02=» P* A11= CREDIT WORK AREA P* A13= T:A ADDRESS $ P* > B P************************************************************* H PIDENT EQU * ( P LD A1,PRTID,A11 GET CURRENT TASKID $ P LD A4,+6,A13 COMMON BLOCK BASE P ANK A1,X'FF' GET
0x35d430…35d5c4 Dummy {f00=0x0118, f01=0x0190, f02=» A5,A3 GET ID P SLL A5,8 P LC A5,+1,A3 ( P LC A4,+3,A3 GET STATUS < P CF A14,SAVE1 SAVE REGISTERS P CF A14,DISID DISPLAY TASKID " P LDKL A1,IDEN40 NEXT KEY ENTRY P ST A1,RDMORE,A11 P RF IDEN90 NEXT KEY PIDEN40 E
0x35d5c4…35d758 Dummy {f00=0x0118, f01=0x018e, f02=»F(E) IDEN80 YES " P CWK A9,IDKEY GET NEXT TASKID? ( P RF(NE) IDEN90 NO KEEP THE FIRST ONE > PIDEN50 EQU * j & P ADK A3,4 SEARCH FOR NEXT PRINTER ~ P LCR A2,A3 P ANK A2,/FF P LDR A1,A2 P RB(Z) IDEN50 P SLL A1,8 P
0x35d758…35d8ec Dummy {f00=0x0118, f01=0x0190, f02=» ~ P LD A3,6,A13 P ADR A3,A2 P SUK A3,4 . P RB IDEN50 @ PIDEN80 EQU * R " P LCR A1,A3 GET PRINTER TO SAVE f P SLL A1,8 P LC A1,+1,A3 ( P ST A1,PRTID,A11 NEW HARDCOPY TASKID PIDEN90 EQU * P RTN A14 P EJECT
0x35d8ec…35da80 Dummy {f00=0x0118, f01=0x0190, f02=» * V B P* KEYL KEYLOCK STATUS * B P* * R B P************************************************************* P* REGISTERS P* P* A2= KEYLOC
0x35da80…35dc14 (3, 198) Dummy {f00=0x0118, f01=0x0190, f02=»******** Z P IFT KEYLST=1 P IFT KB6272=1 & PKEYL EQU * < * P SUK A2,LKLKEY GET NEG KEY LOCK VALUE N P LD A3,KEYS,A11 OLD STATUS | P LDK A4,/10 PKEYL10 EQU * P SRL A4,1 P ADK A2,2 1 = OFF,0 = ON P RB(N) KEYL10
0x35dc14…35dda8 Dummy {f00=0x0118, f01=0x018e, f02=» P RF KEYL30 NOW ON PKEYL20 EQU * WAS ON P LDR A2,A2 : $ P RF(Z) KEYL99 NOW ON, NO CHANGE L PKEYL30 EQU * CHANGE t P LD A3,KEYS,A11 P XRR A3,A4 CHANGE STATUS $ P ST A3,KEYS,A11 STORE NEW STATUS P* P* KEYLOCK STAT
0x35dda8…35df3c Dummy {f00=0x0118, f01=0x0190, f02=» h ( P* A2 = 1, IF CHANGED TO OFF ELSE 0 P* 4 * P* INSERT USER ROUTINE BELOW THIS LINE > P* l PKEYL99 EQU * v P RTN A14 P XIF P EJECT > P********************************************************** P* P* TESTM
0x35df3c…35e0d0 Dummy {f00=0x0118, f01=0x0190, f02=» RESERVED P* A13= RESERVED P* * > P********************************************************* 4 P IFT TEST=1 v PTESTM EQU * P CF A14,ERASE P CF A14,GETBUF P CF A14,RDSTAT P CF A14,DISSTA P LDR A8,A12
0x35e0d0…35e264 Dummy {f00=0x0118, f01=0x0190, f02=» * > P* ENTER ENTER KEY HANDLING * > > P* * > P********************************************************* P* R
0x35e264…35e3f8 Dummy {f00=0x0118, f01=0x0190, f02=»*************************** r PENTER EQU * $ P LDK A2,/27 AID-CODE 8 . P CF A14,LMP3ON TURN ON "KEYBOARD INHIBIT" T . P CF A14,TRPF AID+MODIFIED FIELDS+TRANSMIT P RTN A14 P EJECT B P**************************************************
0x35e3f8…35e58c Dummy {f00=0x0118, f01=0x0190, f02=» * b B P* * B P************************************************************** ^ P* REGISTERS P* P* A2= AID-CODE P* A11= RESERVED P* A13= RESERVED P
0x35e58c…35e720 Dummy {f00=0x0118, f01=0x0190, f02=» CF A14,LMP3ON TURN ON "KEYBOARD INHIBIT" ( P CF A14,TRPA UPDATE AID AND TRANSMIT 2 & P CF A14,ERASE ERASE ENTIRE SCREEN ^ P RTN A14 P EJECT D P*************************************************************** D P*
0x35e720…35e8b4 (3, 199) Dummy {f00=0x0118, f01=0x0190, f02=» * ~ D P*************************************************************** 6 P* REGISTERS ~ P* P* A11= CREDIT WORK AREA P* A13= RESERVED P* 8 P******************************************
0x35e8b4…35ea48 Dummy {f00=0x0118, f01=0x0190, f02=»TIVE? P RF(Z) SYS100 YES & P LDK A1,LOCMOD INDICATE LOCAL MODE ( P RF SYS500 R PSYS100 EQU * d P LDR A2,A1 GET STATUS x P ANKL A2,/C00 MY JOB MODE? P RF(NZ) SYS200 NO & P CF A14,CLEAR CLEAR SCREEN AND DC ( P CF A14,RESK
0x35ea48…35ebdc Dummy {f00=0x0118, f01=0x0190, f02=» NOT LU-LU? x P RF(NE) SYS300 NO & P LDK A1,SYSOP INDICATE SYSTEM MODE . P RF SYS500 X PSYS300 EQU * j $ P ANKL A2,/800 SSCP-LU AND LU-LU? ~ P RF(NZ) SYS400 YES & P LDK A1,SYSOP INDICATE SYSTEM MODE P RF SYS500 PSYS400 EQU *
0x35ebdc…35ed70 Dummy {f00=0x0118, f01=0x0190, f02=»A11 P RTN A14 P XIF P EJECT ( D P*************************************************************** 6 D P* * ~ D P* ATTN ATTENTION KEY HANDLING *
0x35ed70…35ef04 Dummy {f00=0x0118, f01=0x0190, f02=»***** V P* REGISTERS P* , P* A11= RESERVED 6 P* A13= RESERVED N P* f > P********************************************************** p P IFT SNA=1 PATTN EQU * $ P LDK A1,/4B SIGNAL ATTENTION KEY P CF A14,SE
0x35ef04…35f098 Dummy {f00=0x0118, f01=0x0190, f02=»* * @ P* PA PROGRAM ACCESS KEY HANDLING * F B P* * B P********************************************************
0x35f098…35f22c Dummy {f00=0x0118, f01=0x0190, f02=»************************************************** PPA1 EQU * : P LDK A2,/25 AID-CODE L P RF PA500 h PPA2 EQU * z P LDK A2,/3E AID-CODE P RF PA500 PPA3 EQU * P LDK A2,/2C AID-CODE PPA500 EQU * , P CF A14,LMP3
0x35f22c…35f3c0 Dummy {f00=0x0118, f01=0x0190, f02=»14 P EJECT H P******************************************************************* H P* * d H P* PAEX PAEX KEY FOLLOWED BY NUMBER * H P*
0x35f3c0…35f554 (3, 200) Dummy {f00=0x0119, f01=0x0190, f02=» P* REGISTERS P* P* A11= CREDIT WORK AREA " P* A13= RESERVED B P* Z 8 P*************************************************** d P IFT PAX=1 PPAEX EQU * P LDKL A1,PAEXA P ST A1,RDMORE,A11 P RTN A14 PPAEX
0x35f554…35f6e8 Dummy {f00=0x0119, f01=0x018e, f02=» t P RF(G) PAEXB ILLEGAL CHAR. P RF(NZ) PAEX10 * P CF A14,PA3 PA3 KEY @ P RF PARET PPAEX10 EQU * n P ADK A2,1 P RF(NZ) PAEX20 P CF A14,PA2 PA2 KEY P RF PARET PPAEX20 EQU * P CF A14,PA1 PA1 KEY P
0x35f6e8…35f87c Dummy {f00=0x0119, f01=0x0190, f02=» | P RF PARET DK3 PPAERR EQU * P CF A14,ERROR INDICATE ERROR 2 PPARET EQU * V P RTN A14 j P XIF z P EJECT F P****************************************************************** F P*
0x35f87c…35fa10 Dummy {f00=0x0119, f01=0x0190, f02=» * r F P****************************************************************** , P* REGISTERS v P* P* A2= AID-CODE P* A11= RESERVED P* A13= RESERVED P* F P************************************
0x35fa10…35fba4 Dummy {f00=0x0119, f01=0x0190, f02=»LMP3ON TURN ON KEYBOARD INHIBIT 2 P CF A14,TRPF TRANSMIT AID AND MODIFIED FIELDS ( P RTN A14 ^ P EJECT n F P***************************************************************** | F P* *
0x35fba4…35fd38 Dummy {f00=0x0119, f01=0x0190, f02=» * Z F P***************************************************************** P* REGISTERS ^ P* r P* A11= CREDIT WORK AREA | P* A13= RESERVED P* 6 P************************************************* P IFT PFX=1
0x35fd38…35fecc Dummy {f00=0x0119, f01=0x0190, f02=»F(L) PFERR ILLEGAL,GO TO ERR.HANDLING P RF(NZ) PFEX10 . P LDKL A1,PF0A FIRST NUM 0 D P RF PFNXT NEXT NUMBER f PPFEX10 EQU * P SUK A2,1 P RF(NZ) PFEX20 P LDKL A1,PF1A FIRST NUM 1 P RF PFNXT NEXT NUMBER PPFEX20 E
0x35fecc…360060 Dummy {f00=0x0119, f01=0x0190, f02=» * P CM RDMORE,A11 P SUK A2,/31 ILLEGAL NUM? P RF(N) PFERR YES @ P SUK A2,9 ILLEGAL NUM? X P RF(NN) PFERR YES v P ADK A2,/9+PFKEY PF1-PF9 P RF PFHAND PPF1A EQU * P CM RDMORE,A11 P SUK A2,/30 ILLEGAL NUM?
0x360060…3601f4 (3, 201) Dummy {f00=0x0119, f01=0x018e, f02=» PPF2A EQU * P CM RDMORE,A11 P SUK A2,/30 ILLEGAL NUM? , P RF(N) PFERR YES L P SUK A2,5 ILLEGAL NUM? d P RF(NN) PFERR YES " P ADK A2,/5+PFKEY+/13 PF20-PF24 PPFHAND EQU * , P CF A14,PF PROGRAM FUNCTION KEY HANDLING P R
0x3601f4…360388 Dummy {f00=0x0119, f01=0x0190, f02=» P RTN A14 P XIF P EJECT $ P 2 > P********************************************************** : > P* * | > P* RETURN RETURN * > P*
0x360388…36051c Dummy {f00=0x0119, f01=0x40d2, f02=»REGISTERS P* P* A11= RESERVED P* A13= RESERVED 4 P* L < P******************************************************** V PRETURN EQU * P RTN A14 P P END @ RETURN * > P*
0x36051c…3606b0 Dummy {f00=0x0119, f01=0x2008, f02=» ) DATA PF 24 * * $ END * ,@ * 8 6 ) 4 DATA PF 7 ) F DATA PF 8 ) X DATA PF 9 ) j DATA PF 10 ) | DATA PF 11 ) DATA PF 12 ) DATA PF 13 ) DATA PF 14 ) DATA PF 15 ) *C0 ) DATA PF
0x3606b0…360844 Dummy {f00=0x0119, f01=0x0190, f02=» * < P* SUBROUTINES: SOPIN,CHCRIO * 8 < P* * x < P******************************************************* PCASSIN EQU *
0x360844…3609d8 Dummy {f00=0x0119, f01=0x0190, f02=»CAS:10 EQU * P CF A14,SOPIN READ SOP $ P ANKL A1,/0300 ALLOWED SWITCHES? 2 P RB(Z) CAS:10 NO! Z & P LDKL A3,LMP1 SWITCH ON LOAD LAMP t P OTR A3,0,SOP P SRL A1,8 RIGHT ALIGN P ANK A1,1 SELECT UNIT P CF A14,CHCRIO SELECT UN
0x3609d8…360b6c Dummy {f00=0x0119, f01=0x0190, f02=»SBOT , P CF A14,CHCRIO SEARCH BEGINNING OF TAPE P LDK A1,STMF > * P CF A14,CHCRIO SEARCH TAPEMARK FORWARD R P RTN A14 P EJECT 2 P********************************************* 2 P* CHCRIO - CASSETTE I/O EXECUTING ROUTINE * 2
0x360b6c…360d00 Dummy {f00=0x0119, f01=0x018e, f02=»SYSLOD * v 2 P* * 2 P* ENTRY: A1 - I/O INSTRUCTION COMMAND * R 2 P* * 2 P* EXIT: * 2 P*
0x360d00…360e94 (3, 202) Opaque[0x194]
0x360e94…361028 # DirEnt {nam=»PROD1 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x14f8, f03=0x0000}
0x360e94…361028 IdxSect {
0x360e94…361028 f00 = 0x00a7 // 0x360e94 @0x0
0x360e94…361028 f01 = 0x0002 // 0x360e96 @0x2
0x360e94…361028 gno = [ // 0x360e98 @0x4
0x360e94…361028 [0x00]: C0x00a7.0x3.0
0x360e94…361028 ]
0x360e94…361028 }
0x361028…3611bc Dummy {f00=0x00a7, f01=0x00f2, f02=» PSCR 2 PMES .........PRODUCING A DISK FOR P&T........ . P$PDISC M=PTMON,MU=PTMON,A=PT3270,C=AABCON F 4 P$PDISC M=PTMON,MU=PTMON,A=PT3270,C=AABCON,FC=F5 x " PMES END OF PRODUCTION......... PASG /E0,TY10 PEND
0x3611bc…361350 Dummy {f00=0x00a7, f01=0x2008, f02=» 2 PMES .........PRODUCING A DISK FOR P&T........ . P$PDISC M=PTMON,MU=PTMON,A=PT3270,C=AABCON F 4 P$PDISC M=PTMON,MU=PTMON,A=PT3270,C=AABCON,FC=F5 x " PMES END OF PRODUCTION......... PASG /E0,TY10 PEND
0x361350…3614e4 Dummy {f00=0x00a7, f01=0x0190, f02=» P QR P _> : " Q& X ) Y Q PW P P , ]: " : 8 PR P_ P - X Y :_ : V - _ N !VVT 1 B E C ( : O T Wj , ! V _
0x3614e4…361678 Dummy {f00=0x00a7, f01=0x0190, f02=»T P` *" P * PP , ! Z P D W : P" , ! R " BW - _. : U O ! R* ' P O U W B ! QT : V . $ P R 4 9 _ B Y 6 @ Y /
0x361678…36180c Dummy {f00=0x00a7, f01=0x0190, f02=» ! W : ' P ' T W B ] ] O P . O : T *W T ; : N !VVT0 C C PR C P_ C ( : PH , ! V _ W * PJ , ! Z " T _ ! T0 ". * P
0x36180c…3619a0 Dummy {f00=0x00a7, f01=0x0190, f02=» & "~ 5 : 2 6 H ! !L!^ O P W 1Pd 5P> ?PL 7T* Wj l T O WB P W L W" O W "l O : R Q D - X ) Y W H7 :! , z
0x3619a0…361b34 (3, 203) Opaque[0x194]
0x361b34…361cc8 # DirEnt {nam=»TSTCON«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x2338, f03=0x0000}
0x361b34…361cc8 IdxSect {
0x361b34…361cc8 f00 = 0x0119 // 0x361b34 @0x0
0x361b34…361cc8 f01 = 0x0002 // 0x361b36 @0x2
0x361b34…361cc8 gno = [ // 0x361b38 @0x4
0x361b34…361cc8 [0x00]: C0x0119.0x3.0
0x361b34…361cc8 ]
0x361b34…361cc8 }
0x361cc8…361e5c Dummy {f00=0x0119, f01=0x018e, f02=» PT; P05; PTID=V0; PTCL=K2; * PLEV=60; : P02; J PTDC=T01; V PLC=001P; f PTDC=T02; v PLC=001P; P01; PSDC=S01; PT; P01; PTID=L5; PTCL=P2; PLEV=60; P01; PTDC=
0x361e5c…361ff0 Dummy {f00=0x0119, f01=0x0190, f02=» PTDC=T01; PLC=001Q; PTDC=T02; $ PLC=001Q; 4 P01; D PSDC=S01; P PT; ` P01; j PTID=L7; v PTCL=P2; PLEV=60; P01; PTDC=T01; PLC=001Q; P01; PSDC=S01; PT; P01; PTID=
0x361ff0…362184 Dummy {f00=0x0119, f01=0x0190, f02=»S01; PT; P01; PTID=L9; " PTCL=P2; 2 PLEV=60; B P01; R PTDC=T01; ^ PLC=017Q; n P01; ~ PSDC=S01; PT; P01; PTID=VA; PTCL=K2; PLEV=60; P02; PTDC=T01; PLC=025Q;
0x362184…362318 Dummy {f00=0x0119, f01=0x0134, f02=»; PTDC=T01; PLC=025Q; P01; * PSDC=S01; 6 PD; F P01; P PSDTE=AB; P01; l PTYPE=LT; x PNA=4060; PNSA=14; P40; PC1; PC2; PC3; PC4; P4A; PC5; P4B; P
0x362318…3624ac Dummy {f00=0x0119, f01=0x2008, f02=» PTDC=T01; PLC=025Q; P01; * PSDC=S01; 6 PD; F P01; P PSDTE=AB; P01; l PTYPE=LT; x PNA=4060; PNSA=14; P40; PC1; PC2; PC3; PC4; P4A; PC5; P4B; P
0x3624ac…362640 Dummy {f00=0x0119, f01=0x0190, f02=»
0x362640…3627d4 (3, 204) Opaque[0x194]
0x3627d4…362968 # DirEnt {nam=»PROD2 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x2340, f03=0x0000}
0x3627d4…362968 IdxSect {
0x3627d4…362968 f00 = 0x011a // 0x3627d4 @0x0
0x3627d4…362968 f01 = 0x0002 // 0x3627d6 @0x2
0x3627d4…362968 gno = [ // 0x3627d8 @0x4
0x3627d4…362968 [0x00]: C0x011a.0x0.0
0x3627d4…362968 ]
0x3627d4…362968 }
0x362968…362afc Dummy {f00=0x011a, f01=0x00ba, f02=» PSCR 2 PMES .........PRODUCING A DISK FOR P&T........ . P$PDISC M=PTMON,MU=PTMON,A=PT3272,C=AMFCON F " PMES END OF PRODUCTION......... x PASG /E0,TY10 PEND
0x362afc…362c90 Dummy {f00=0x011a, f01=0x2008, f02=» 2 PMES .........PRODUCING A DISK FOR P&T........ . P$PDISC M=PTMON,MU=PTMON,A=PT3272,C=AMFCON F " PMES END OF PRODUCTION......... x PASG /E0,TY10 PEND
0x362c90…362e24 Dummy {f00=0x011a, f01=0x0190, f02=» P Q a b P2 8 ^ N P2 @ * * ^
0x362e24…362fb8 Dummy {f00=0x011a, f01=0x0190, f02=»
[…0x2…]
0x3632e0…363474 (3, 205) Opaque[0x194]
0x363474…363608 # DirEnt {nam=»PT3270«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x1618, f03=0x0000}
0x363474…363608 IdxSect {
0x363474…363608 f00 = 0x00b0 // 0x363474 @0x0
0x363474…363608 f01 = 0x0010 // 0x363476 @0x2
0x363474…363608 gno = [ // 0x363478 @0x4
0x363474…363608 [0x00]: C0x00b0.0x3.0
0x363474…363608 [0x01]: C0x00b1.0x0.0
0x363474…363608 [0x02]: C0x00cf.0x3.0
0x363474…363608 [0x03]: C0x00d0.0x2.0
0x363474…363608 [0x04]: C0x00d1.0x3.0
0x363474…363608 [0x05]: C0x00d2.0x0.0
0x363474…363608 [0x06]: C0x00d3.0x1.0
0x363474…363608 [0x07]: C0x00d3.0x2.0
0x363474…363608 ]
0x363474…363608 }
0x363608…36379c Dummy {f00=0x00b0, f01=0x0190, f02=»8 >Y LCR & @ B P Q a ! K1 8 ^ N K1 @ * *
0x36379c…363930 Dummy {f00=0x00b0, f01=0x0190, f02=» @ B P Q a b ! K2 8 ^ N K2 @ * * 0 P Q a j P1 8 ^ N P1 @ * *
0x363930…363ac4 Dummy {f00=0x00b0, f01=0x0190, f02=» P Q a b P2 8 ^ N P2 @ * * ^
0x363ac4…363c58 Dummy {f00=0x00b0, f01=0x0190, f02=»
[…0x2…]
0x363f80…364114 (3, 206) Dummy {f00=0x00b1, f01=0x0190, f02=»
[…0x1…]
0x3642a8…36443c Dummy {f00=0x00b1, f01=0x0190, f02=» > H8 J8 0 0 _ 0 0 7 L: C B Pn B Rd B TZ N !
0x36443c…3645d0 Dummy {f00=0x00b1, f01=0x0190, f02=» : C C ( : : : b V& B @ O W @ O " P : C ( : C C C ( : C C C ( : O : W0 W0 W( W( W W W W W W W W W W W W C A C
0x3645d0…364764 Dummy {f00=0x00b1, f01=0x0190, f02=» T > N J : : : : : : : : : : : : : : : : : : : : : : : : 0 : ,
0x364764…3648f8 Dummy {f00=0x00b1, f01=0x0190, f02=» W& R W P R W PV : PD P V P ' P" V & ' P &W U : P" ' P &W U : 8 PR P_ P* ! V & ' P W V
0x3648f8…364a8c Dummy {f00=0x00b1, f01=0x0190, f02=» . W W D R : T W L > : O : P Z P, Pd ' T^. U " P D X ) Y " W : O O : :
0x364a8c…364c20 Dummy {f00=0x00b1, f01=0x0190, f02=»! P W* 8 O N @ O W : N V ! 09B ,=H L L " O WF O " P* T0 ," X 9HR !VV H_ V _$ ,9H L O : ' In : _ IZ : %W >W , IZ : O : O 1R( Q T W T
0x364c20…364db4 (3, 207) Dummy {f00=0x00cf, f01=0x0190, f02=» W O 0R V :W O W : : 0 @ B P Q a b ! ( 2_ N T H N @ P N T T N T " N T : O : T O W( T O W T O GVW O l : V M P W , !VV , :
0x364db4…364f48 Dummy {f00=0x00cf, f01=0x0190, f02=» V ! 09B O E :h % : V H @ X =P T O ( C X C B C " L : P ( _ : ( C O N T O T 0 RtT B W PR _* , ! V&
0x364f48…3650dc Dummy {f00=0x00cf, f01=0x0190, f02=» ( : P R C B ( B ! P C W. B ! QP$ B + Y Y :h Y T C ( C C B T : B P 9 Y Y B : T " T P P C C W^ T " U N P$ " & O
0x3650dc…365270 Dummy {f00=0x00cf, f01=0x0190, f02=»W P . O O P D P0 P D N P4_6 P D _: P D O N U O : : <' : # : N N N : O O O
0x365270…365404 Dummy {f00=0x00cf, f01=0x0190, f02=» P QR P _> : " Q& X ) Y Q PW P P , ]: " : 8 PR P_ P - X Y :_ : V - _ N !VVT 1 B E C ( : O T Wj , ! V _
0x365404…365598 Dummy {f00=0x00cf, f01=0x0190, f02=»T P` *" P * PP , ! Z P D W : P" , ! R " BW - _. : U O ! R* ' P O U W B ! QT : V . $ P R 4 9 _ B Y 6 @ Y /
0x365598…36572c Dummy {f00=0x00cf, f01=0x0190, f02=» ! W : ' P ' T W B ] ] O P . O : T *W T ; : N !VVT0 C C PR C P_ C ( : PH , ! V _ W * PJ , ! Z " T _ ! T0 ". * P
0x36572c…3658c0 Dummy {f00=0x00cf, f01=0x0190, f02=» & "~ 5 : 2 6 H ! !L!^ O P W 1Pd 5P> ?PL 7T* Wj l T O WB P W L W" O W "l O : R Q D - X ) Y W H7 :! , z
0x3658c0…365a54 (3, 208) Dummy {f00=0x00d0, f01=0x0190, f02=» O V D W : O : ! T& P : PB ," T - X ) Y _ P : P ," T _ ," : : O WV H6 '??F O WD H6 "? V0 O W, O - X ) Y : W : O WP H6 '??F O
0x365a54…365be8 Dummy {f00=0x00d0, f01=0x0190, f02=» : : : : R V W V ! O ( ! : V " # : V "" : ! : :f"? H7. ! "? H7. ! : V , ! R " - _ : H6 O " P "J : " N ' P ! P N !VVT W M " : W % % % % % %
0x365be8…365d7c Dummy {f00=0x00d0, f01=0x0190, f02=»
[…0x5…]
0x366560…3666f4 (3, 209) Dummy {f00=0x00d1, f01=0x0190, f02=»
[…0x5…]
0x366ed8…36706c Dummy {f00=0x00d1, f01=0x0190, f02=» " T ( _ " = : " <P _ # : 1 ABCDEFGHI$.<(+|&JKLMNOPQR!]*);^-/STUVWXYZ},%_>? 12345678`:#@'=" abcdefghi[.<(+!&jklmnopqr]$*);^-/stuvwxyz|,%_>?0123456789
0x36706c…367200 Dummy {f00=0x00d1, f01=0x0190, f02=» Nk`Ka z^L~no| { [_my O ZJ 7- <=2&p ?' @O JZlP}M] Nk`Ka z^L~noj {|[_m ABCDEFGHI#.<(+!&JKLMNOPQR$]*);^-/STUVWXYZ@,%_>?01
0x367200…367394 (3, 210) Dummy {f00=0x00d2, f01=0x0190, f02=»=X> A CzCzA 9|9|9 8x9 8x9 9 J8F F E F F E :*:&:0:2 Q V 7 @ n! P Q P W 80 9 9c D7 9a1 P : :L Q 7 W > :aW _J( 2 P V W8 _ 2 # ;B V T W V P L , V 2P " 2 P V
0x367394…367528 Dummy {f00=0x00d2, f01=0x0190, f02=» % V E W 2 % ^ 6 E 7_ 2 # L : 2# &X 3Y $! 2P R P _ 9B 8 _ 6 D " 7 $ V P Q W 9 7 8x = V & 8 H8 'W 'W '_8 Z b ^ f :l:d:h
0x367528…3676bc Dummy {f00=0x00d2, f01=0x0190, f02=»# < L:4 D V $ W D V L:< , W 6 2 < W$ " P& Pd" # < ;b Wv " ;d# _ [ v [ R : R Z Z : R ; : 6 : F _v :B , (Vv ; H [ [ [
0x3676bc…367850 Dummy {f00=0x00d2, f01=0x0190, f02=» : [ [ : & @ p! P [ 6 [ Z 7 :b Z 7 : T # ( ;n ;. " T # :A ( @ r" P ! P [ :;H 2 ;h R # # XR : ; V Y : 2! : 6 2 < W& " # < ;b ;
0x367850…3679e4 Dummy {f00=0x00d2, 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 : P8"
0x3679e4…367b78 Dummy {f00=0x00d2, f01=0x0190, f02=» 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 A P @ Pd P 0 - PN _ 4 V W Q P ) P ! P ! P 9_. &" ! ! P $ T 9 : & P Q @V ,^ ,
0x367b78…367d0c Dummy {f00=0x00d2, f01=0x0190, f02=»R + : V W R 4 0R Y 7 Y& P Z,;D 9_8 8 _< V W YL T 9 : &9d! + P( & T 9d! T 7 V Y " WJ Q V V 7 Y P._& & Q 9d! )0 + P 7 Y Z $ _ : 2'
0x367d0c…367ea0 Dummy {f00=0x00d2, f01=0x0190, f02=»S W P 9 S W _ V P W T V E + : & [ [ [ [ $ [ [ >h [ [ E ? E ? E =X Z PP [ 9a Z $" T 9d! P6 P( [ Z w [ P E =R V H )_ E CH _X z R z ! P 1` { V
0x367ea0…368034 (3, 211) Dummy {f00=0x00d3, f01=0x0190, f02=» PP= ;@ R P W ;a=a P " R & R V T W V E + : V & [ [ [ [ $ [ [ &! P Ed E ? E ? E =X z " ! ! R 2` { z " P ! R 2` { 1 ! {
0x368034…3681c8 Dummy {f00=0x00d3, f01=0x0190, f02=»! Z $ Z %_N [ Q* E =R E ? R [ Z { E =R z 9e! W Z : V I _ , " -! 9H X" ,9 -9d_ Z H D & H D % [ ( G J< : { : GD G PX 9 _ GD
0x3681c8…36835c Dummy {f00=0x00d3, f01=0x0190, f02=»W ) V E G WX GD [ G : Z !0P0 R* 4 R :d" 8 R ! :DW ! 9 R R _. : ? : : : jP kT T : & 9! " : $ : G :L $ : 4 HT! P 5 W B O N !
0x36835c…3684f0 Dummy {f00=0x00d3, f01=0x0190, f02=» C C L C ( N B E 5 : I$ ( : , C ( T _ : N P C C ( B ![P IB W : N P O ( B ![P IB N ! O R : N P C ( : N P C
0x3684f0…368684 Dummy {f00=0x00d3, f01=0x0190, f02=»4 "( ". : !! gg++ L 33 Y :L:b= Y = :X: Y K W K K Y Y Y Y K J K J K Y Y L K Y K J K J 6 J K K K K V K : : I I J : V KD J Kj V Z P 2 " T
0x368684…368818 Dummy {f00=0x00d3, f01=0x0190, f02=» V 7_ W Z Kj @ n! P Q Z 7 Z Z P Q : V R (Q V : : I J P v I < : J Qz : Pp 4 ! Tj_ PZ 4 WV K L WJ K W +_ K K K W. _& X
0x368818…3689ac Dummy {f00=0x00d3, f01=0x0190, f02=» N " 0:B V L P QF$ T n V H W 2( _ L ( L N @ X O _B N P N T O H N T Mf O : O T O MXW T O O W M : M P MX 4 HT! T 5 W B O H : M O M :
0x3689ac…368b40 Dummy {f00=0x00d3, f01=0x0190, f02=» T N DL/ O Vl R O T ," P6 ! R W, ! R W Qv T R,9AR2 ! 1 P W # ! P N _r P O @ P T O P P( N 8P QF$ P 2( _ M @ O : N N N N O OVOVO Or
0x368b40…368cd4 (3, 212) Dummy {f00=0x00d3, f01=0x0190, f02=» : O T O O : ! 1 P N !0T 0 : @ : T : N !010T N !@P P T W P O : T N !010T "@T B Pd c O B B N = B N O C N N Qz N C N C . L1
0x368cd4…368e68 Dummy {f00=0x00d3, f01=0x0190, f02=» W N " 0:B V M : N X _ * $:H D O $ @L L %P Q O ( D O Q N H O O : ( B P N " 0:B V M : @N N %P @L @L P _ N $ : . L P W L1Q N I :( R : V
0x368e68…368ffc Dummy {f00=0x00d3, f01=0x0190, f02=»S _ UR C Uf P : <H : Rr S UR Uf : &P B V C / <H : UR Uv C C W U C 9HR R ' W 781"&$ 39#$;< '()*+,-! U Uf : P _J T B : 'W T ( W| : Uv T 1
0x368ffc…369190 Dummy {f00=0x00d3, f01=0x0190, f02=»% P C + VH 8x T I B P B P B 5 : T U4 T( J> T C C S C B B P C T@ : V I C B : ( ' P T I : UR Uf % Y :f C : & R V C : : B T T T
0x369190…369324 Dummy {f00=0x00d3, f01=0x0190, f02=» _: L C L C B C : T U4 : T U4 : : C : : UR Uv ,V Wp : :L P C W $0 P C U : :L#0 T & C C : U C C : & T ;d# P S W P P, 9A:AV X R _ S W
0x369324…3694b8 Dummy {f00=0x00d3, f01=0x0190, f02=» _ # Q R V > _V X^ ' h P P & 1_ P 1_ , @ - R T U :J a B@ ' d w5 1 W@ :L #0 T B ' : B B Vf : V C :L P C #0 T & C C : U C C : : +
0x3694b8…36964c Dummy {f00=0x00d3, f01=0x0190, f02=» 8 ! DYD 0P Wn 0W8 Wf :T& *W, FP . :T Z ! XBW *X& FW@ :P # U 1 X !00T ; L _ 9P F " X6# ; W )0_: J R( Z R 4! P ;)0 9U ? Z ] 49d_. _BU ; :X _ _ z 9d! ) ^ _ ,_ 8 _ :P K _ X 8 8 !++
0x36964c…3697e0 Dummy {f00=0x00d3, f01=0x0190, f02=»W : ! )P9H # T &W &" :I : Y : P & _ &X _ : : : :
0x3697e0…369974 (3, 213) Opaque[0x194]
0x369974…369b08 # DirEnt {nam=»RODCON«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x2388, f03=0x0000}
0x369974…369b08 IdxSect {
0x369974…369b08 f00 = 0x011c // 0x369974 @0x0
0x369974…369b08 f01 = 0x0002 // 0x369976 @0x2
0x369974…369b08 gno = [ // 0x369978 @0x4
0x369974…369b08 [0x00]: C0x011c.0x1.0
0x369974…369b08 ]
0x369974…369b08 }
0x369b08…369c9c Dummy {f00=0x011c, f01=0x018e, f02=» PT; P05; PTID=V0; PTCL=K2; * PLEV=60; : P02; J PTDC=T01; V PLC=001P; f PTDC=T02; v PLC=001P; P01; PSDC=S01; PT; P01; PTID=L5; PTCL=P2; PLEV=60; P01; PTDC=
0x369c9c…369e30 Dummy {f00=0x011c, f01=0x0058, f02=» PNSA=06; P40; PC1; PC2; , PC3; 8 PC4; D PC8; PC=T01; V PLC=001P; f PTDC=T02; v PLC=001P; P01; PSDC=S01; PT; P01; PTID=L5; PTCL=P2; PLEV=60; P01; PTDC=
0x369e30…369fc4 Dummy {f00=0x011c, f01=0x2008, f02=» 06; P40; PC1; PC2; , PC3; 8 PC4; D PC8; PC=T01; V PLC=001P; f PTDC=T02; v PLC=001P; P01; PSDC=S01; PT; P01; PTID=L5; PTCL=P2; PLEV=60; P01; PTDC=
0x369fc4…36a158 Dummy {f00=0x011c, f01=0x0076, f02=»0; PNSA=08; P40; P00; & PC8; 2 PC1; > PC9; J PC2; V PC3; b P4A; n n PTDC=T02; ~ PLC=017Q; P01; PSDC=S01; PT; P01; PTID=L7; PTCL=P2; PLEV=60; P01;
0x36a158…36a2ec Dummy {f00=0x011c, f01=0x2008, f02=» PNSA=08; P40; P00; & PC8; 2 PC1; > PC9; J PC2; V PC3; b P4A; n n PTDC=T02; ~ PLC=017Q; P01; PSDC=S01; PT; P01; PTID=L7; PTCL=P2; PLEV=60; P01;
0x36a2ec…36a480 Dummy {f00=0x011c, f01=0x0190, f02=»
0x36a480…36a614 (3, 214) Opaque[0x194]
0x36a614…36a7a8 # DirEnt {nam=»PT3272«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x1500, f03=0x0000}
0x36a614…36a7a8 IdxSect {
0x36a614…36a7a8 f00 = 0x00a8 // 0x36a614 @0x0
0x36a614…36a7a8 f01 = 0x0010 // 0x36a616 @0x2
0x36a614…36a7a8 gno = [ // 0x36a618 @0x4
0x36a614…36a7a8 [0x00]: C0x00a8.0x0.0
0x36a614…36a7a8 [0x01]: C0x00b1.0x1.0
0x36a614…36a7a8 [0x02]: C0x00b6.0x3.0
0x36a614…36a7a8 [0x03]: C0x00b7.0x2.0
0x36a614…36a7a8 [0x04]: C0x00cd.0x3.0
0x36a614…36a7a8 [0x05]: C0x00e3.0x2.0
0x36a614…36a7a8 [0x06]: C0x00e4.0x0.0
0x36a614…36a7a8 [0x07]: C0x00e4.0x1.0
0x36a614…36a7a8 ]
0x36a614…36a7a8 }
0x36a7a8…36a93c Dummy {f00=0x00a8, f01=0x0190, f02=»= >Z6 LCR & @ B P Q a ! K1 8 ^ N K1 @ * *
0x36a93c…36aad0 Dummy {f00=0x00a8, f01=0x0190, f02=» @ B P Q a b ! K2 8 ^ N K2 @ * * 0 P Q a j P1 8 ^ N P1 @ * *
0x36aad0…36ac64 Dummy {f00=0x00a8, f01=0x0190, f02=» P Q a b P2 8 ^ N P2 @ * * ^
0x36ac64…36adf8 Dummy {f00=0x00a8, f01=0x0190, f02=»
[…0x2…]
0x36b120…36b2b4 (3, 215) Dummy {f00=0x00b1, f01=0x0190, f02=»
[…0x1…]
0x36b448…36b5dc Dummy {f00=0x00b1, f01=0x0190, f02=» > H= J= 0 0 _ 0 0 = C B Rd B TZ N ! TR b
0x36b5dc…36b770 Dummy {f00=0x00b1, f01=0x0190, f02=» C C ( : : : b V& B @ O W @ O " P : C ( : C C C ( : C C C ( : O : W0 W0 W( W( W W W W W W W W W W W W C A C (
0x36b770…36b904 Dummy {f00=0x00b1, f01=0x0190, f02=» N 8 | | H D 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 0 : , :
0x36b904…36ba98 Dummy {f00=0x00b1, f01=0x0190, f02=» R W P R W PV : PD P V P ' P" V # ' P # W U # : P" " ' P # W U # : 2 PR P_ P* ! V # ' P W V W
0x36ba98…36bc2c Dummy {f00=0x00b1, f01=0x0190, f02=». W W 0 R ! : T W !8 8 : O : P Z P, Pd ' T^. " U ( P 0 X ) Y ( W : O O : : : 0
0x36bc2c…36bdc0 Dummy {f00=0x00b1, f01=0x0190, f02=» 8 O N @ O W : N V ! 09B ,=H L L ( " | O WF O ( P* T0 ," X 9HR !VV H_ V _$ ,9H L O : ' OZ : _ OF : %W >W , OF : O : O 1R( Q T W T W
0x36bdc0…36bf54 (3, 216) Dummy {f00=0x00b6, f01=0x0190, f02=» 0R V 4W O W : : TT LL GG CC # # # # (@P M RF ( ( M O M O N O N " 0:B V L P2 ($ T n V$ N O N O W 2( _2 r ( N @ X O _T N P( N T O N N T O
0x36bf54…36c0e8 Dummy {f00=0x00b6, f01=0x0190, f02=» : N@! T ; W B O $~ N : O b : : N D P : O ( : C # O N !8 ! =d T T N D O Vl R T ," P6 ! R W, ! R
0x36c0e8…36c27c Dummy {f00=0x00b6, f01=0x0190, f02=» 8P ($ P 2( _ @ O : 8 8 T T T T n n n n v ,! P W : T6 N D N R P O N T _ O _& O : T O : ! 1 P N !0T 0 : @ : # T
0x36c27c…36c410 Dummy {f00=0x00b6, f01=0x0190, f02=» B N = B N O C N N Qz N C N C . L1T W ( O W& O P c C O _^ d ( "R ( W ( B T C W N " 0:B V M : N X _ $:H D O $ @ %P
0x36c410…36c5a4 Dummy {f00=0x00b6, f01=0x0190, f02=»P _ N $ : . L P W L1Q N I : 0 @ B P Q a b ! ( _ N T N N @ P N T N N T N T 4 O : T O W( T O W T O MBW O f : V M P W , !VV
0x36c5a4…36c738 Dummy {f00=0x00b6, f01=0x0190, f02=»O. : @ . V ! 09B O E :h % : V H @ X =P @ O ( C X C B C " L : P ( _ : ( C O N T O T RtT B W PR t_* ,
0x36c738…36c8cc Dummy {f00=0x00b6, f01=0x0190, f02=»_ # ( : P R C B ( B ! P C W. B ! QP$ B + Y Y :h Y T C ( C C B T : B P 9 Y Y B : T " T P P C C W^ T " U N P$ (
0x36c8cc…36ca60 Dummy {f00=0x00b6, f01=0x0190, f02=» #:! P W P . O O P 0 P0 P 0 N P4_6 P 0 _: P 0 O N U O : : <' : # : N N N
0x36ca60…36cbf4 (3, 217) Dummy {f00=0x00b7, f01=0x0190, f02=» _$ P QR P _> : ( Q& X ) Y Q PW P P , ]: ( : 2 PR P_ P - X Y &_ : V - _ N !VVT 1 B E C ( : O T Wj , !
0x36cbf4…36cd88 Dummy {f00=0x00b7, f01=0x0190, f02=» P2 T P` " P PP , ! Z P 0 W & P" , ! R " BW - _. : U O ! R* ' P O U # W B ! QT # : V . $ P R 4 9 _ B Y 6 @ Y
0x36cd88…36cf1c Dummy {f00=0x00b7, f01=0x0190, f02=» U P ! W : ' P ' T W B ] # ] # O P . O : T *W T ; : N !VVT0 C C PR C P_ C ( : PH , ! V _ W PJ , ! Z " T _ ' T0
0x36cf1c…36d0b0 Dummy {f00=0x00b7, f01=0x0190, f02=»$ X W # (j ; :$ % % %v% % &"&4& & ' '8'J O P W 1Pd 5P> ?PL 7T* Wj X T O WB P W !8 W" O W (X O : R Q 0 - X ) Y W H=r % :
0x36d0b0…36d244 Dummy {f00=0x00b7, f01=0x0190, f02=» W0 H< "? O V 0 W : O : ! T& P & PB ," T - X ) Y _ P & P ," T _ ," & : O WV H< '??F O WD H< "? V0 O W, O - X ) Y & W : O WP
0x36d244…36d3d8 Dummy {f00=0x00b7, f01=0x0190, f02=» : : : : R V W V ' O ( ' : V " # : V "" : ' : :f"? H= ' "? H= ' : V , ! R " - _ : H< O " P (6 : ( N ' P ! P N !VVT W ( : W % % %
0x36d3d8…36d56c Dummy {f00=0x00b7, f01=0x0190, f02=»
[…0x1…]
0x36d700…36d894 (3, 218) Dummy {f00=0x00cd, f01=0x0190, f02=»
[…0x7…]
0x36e3a0…36e534 (3, 219) Dummy {f00=0x00e3, f01=0x0190, f02=»
[…0x1…]
0x36e6c8…36e85c Dummy {f00=0x00e3, f01=0x0190, f02=» ( T ( _ " = : ( <P _ # : 1 ABCDEFGHI$.<(+|&JKLMNOPQR!]*);^-/STUVWXYZ},%_>? 12345678`:#@'=" abcdefghi[.<(+!&jklmnopqr]$*);^-/stuvwxyz|,%_
0x36e85c…36e9f0 Dummy {f00=0x00e3, f01=0x0190, f02=» @Z {JlP}M] Nk`Ka z^L~no| { [_my O ZJ 7- <=2&p ?' @O JZlP}M] Nk`Ka z^L~noj {|[_m ABCDEFGHI#.<(+!&JKLMNOPQR$]*);^-/STUV
0x36e9f0…36eb84 Dummy {f00=0x00e3, f01=0x0190, f02=»> ? >j? E C>CDD G IfIfG ?h?h?v>d? >d?v?vP$L LHK K L K @ @ @ @ R V 7 @ n! P R P W > > 9c D= 9a1 P @ @8 Q = W D :aW _J( 2 P V W8 _ 2 # ;B V T W V P L , V
0x36eb84…36ed18 Dummy {f00=0x00e3, f01=0x0190, f02=» $ V 6 V % V E W 2 % ^ 6 E 7_ 2 # L @ 2# &X 3Y $! 2P R P _ 9B > _ 6 D " 7 $ V P R W > =x >d C V & > H= 'W 'W '_8 Z b ^ f
0x36ed18…36eeac Dummy {f00=0x00e3, f01=0x0190, f02=» W # B~ L@ D V $ W D V L@( , W 6 2 B W$ " P& Pd" # B~ ;b Wv " ;d# _ [ v [ RN @ RZ Z Z : R ; @ 6 : F _v :B , (Vv ; H [ [
0x36eeac…36f040 Dummy {f00=0x00e3, f01=0x0190, f02=» " 2@P : [ [ @ & @ p! P [ 6 [ Z 7 @N Z 7 : T # ( AZ A " T # :A ( @ r" P ! P [ :;H 2 ;h R # # XR : ; V Y : 2! : 6 2 B W& " # B~;b
0x36f040…36f1d4 (3, 220) Dummy {f00=0x00e4, f01=0x0190, f02=» ; 8 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 :
0x36f1d4…36f368 Dummy {f00=0x00e4, f01=0x0190, f02=» 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 F P F Pd P 0 - PN _ 4 V W Q P ) P ! P ! P 9_. &" ! ! P $ T 9 : & P Q
0x36f368…36f4fc Dummy {f00=0x00e4, f01=0x0190, f02=»9d $ & ! R + : V W R 4 0R Y 7 Y& P Z,;D 9_8 8 _< V W YL T 9 : &9d! + P( & T 9d! T 7 V Y " WJ Q V V 7 Y P._& & Q 9d! )0 + P 7 Y Z $ _ :
0x36f4fc…36f690 Dummy {f00=0x00e4, f01=0x0190, f02=» : V S W P 9 S W _ V P W T V E + : & [ [ [ [ $ [ [ >h [ [ KzE KzE KzCD Z PP [ 9a Z $" T 9d! P6 P( [ Z w [ P KzC> V H )_ KzI4 _X z R z
0x36f690…36f824 Dummy {f00=0x00e4, f01=0x0190, f02=»V &V PP= ;@ R P W ;a=a P " R & R V T W V E + : V & [ [ [ [ $ [ [ &! P KP KzE KzE KzCD z " ! ! R 2` { z " P ! R
0x36f824…36f9b8 Dummy {f00=0x00e4, f01=0x0190, f02=» KzI4 Z ! Z $ Z %_N [ Q* KzC> KzE R [ Z { KzC> z 9e! W Z : V I _ , " -! 9H X" ,9 -9d_ Z H D & H D % [ ( L P( : { : M0 L PX 9
0x36f9b8…36fb4c Dummy {f00=0x00e4, f01=0x0190, f02=»W R # P W ) V E L WX M0 [ L : Z !0P0 R* 4 R :d" 8 R ! :DW ! 9 R R _. : E : @ @ jP kT T : & 9! " : $ : L @8 $ : : N@! P ; W B O $~
0x36fb4c…36fce0 Dummy {f00=0x00e4, f01=0x0190, f02=» .! S C C L C ( N B E ; : O ( : , C ( T _ : N P C C ( B ![P O. W : N P O ( B ![P O. N ! O L : N P C ( : N
0x36fce0…36fe74 (3, 221) Dummy {f00=0x00e4, f01=0x0190, f02=»Nt ; : : ( ( # : !! gg++ L 33 Z(@8@NC Z*B @D@ Z&Q W Q QlZ$Y Z Z Q P Q P Q Y Y Q Q Z$Q P Q P 6 P K K K K V K : @ O O P @H V Q0 P QV V Z
0x36fe74…370008 Dummy {f00=0x00e4, f01=0x0190, f02=» R [ V 7_ W Z QV @ n! P R Z 7 Z Z P R : V R (Q V : : O J P v I < : J Qz : Pp 4 ! Tj_ PZ 4 WV K R WJ Q W +_ Q Q K
0x370008…37019c Dummy {f00=0x00e4, f01=0x0190, f02=»R P >d X =' V W V Y =P R : W T S R / S _ U C U P @ <H : R S U U @ &P B V C / <H : U U C C W U C 9HR S ' W 781"&$ 39#$;< '()*+,-! U U @ P _J U
0x37019c…370330 Dummy {f00=0x00e4, f01=0x0190, f02=» 0 W : 1W C C ( ' P0 T P& V ,V W W B % P C + V >d T I B P B P B 5 : U U| Tp P* TZ C C T C B B P C T : V I C B : ( ' P T I : U U % Y @R
0x370330…3704c4 Dummy {f00=0x00e4, f01=0x0190, f02=»B W<' #? B~ ;B V D W ,"? :D;B D V : _: L C L C B C : U U| : U U| : @ C : : U U ,V W : @8 P C W $0 P C V : @8#0 T & C C : V* C C :
0x3704c4…370658 Dummy {f00=0x00e4, f01=0x0190, f02=» V : PWr W PR LW^ R R _ R _ # Q R V > _V X^ ' h P P & 1_ P 1_ , @ - R T U :J a B@ ' d w5 1 W @8 #0 T B ' : B B
0x370658…3707ec Dummy {f00=0x00e4, f01=0x0190, f02=» !**T * [ !FFP !EET W R IY * B Z 9 ! ; *Xt 8 ! DY 0P Wn 0W8 Wf :T& *W, FP . :T Z ! XBW *X& FW@ :P # U 1 X` !00T ; R _ 9P F " X6# ; W )0_: J R( Z R 4! P ;)0 9U ? Z ] 49d
0x3707ec…370980 Dummy {f00=0x00e4, f01=0x0190, f02=» PT*AXYZ9 Ql Y : ! P ! P ! P ! P @ ! P @@W : ! )P9H # T &W &" :I : Z* : P & _ &X _ : : : :
0x370980…370b14 (3, 222) Opaque[0x194]
0x370b14…370ca8 # DirEnt {nam=»M:PROC«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x14e8, f03=0x0000}
0x370b14…370ca8 IdxSect {
0x370b14…370ca8 f00 = 0x00a7 // 0x370b14 @0x0
0x370b14…370ca8 f01 = 0x0002 // 0x370b16 @0x2
0x370b14…370ca8 gno = [ // 0x370b18 @0x4
0x370b14…370ca8 [0x00]: C0x00a7.0x1.0
0x370b14…370ca8 ]
0x370b14…370ca8 }
0x370ca8…370e3c Dummy {f00=0x00a7, f01=0x0046, f02=» $PROD1 ASG /E0,DK,PROD1 ASG /E0,TY10 * END >$PDISC M=PTMON,MU=PTMON,A=PT3270,C=AABCON F 4 P$PDISC M=PTMON,MU=PTMON,A=PT3270,C=AABCON,FC=F5 x " PMES END OF PRODUCTION......... PASG /E0,TY10 PEND
0x370e3c…370fd0 Dummy {f00=0x00a7, f01=0x2008, f02=» D1 ASG /E0,DK,PROD1 ASG /E0,TY10 * END >$PDISC M=PTMON,MU=PTMON,A=PT3270,C=AABCON F 4 P$PDISC M=PTMON,MU=PTMON,A=PT3270,C=AABCON,FC=F5 x " PMES END OF PRODUCTION......... PASG /E0,TY10 PEND
0x370fd0…371164 Dummy {f00=0x00a7, f01=0x0190, f02=» P Q a b P2 8 ^ N P2 @ * * ^
0x371164…3712f8 Dummy {f00=0x00a7, f01=0x0190, f02=»
[…0x2…]
0x371620…3717b4 (3, 223) Opaque[0x194]
0x3717b4…371948 # DirEnt {nam=»AABCON«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x23d8, f03=0x0000}
0x3717b4…371948 IdxSect {
0x3717b4…371948 f00 = 0x011e // 0x3717b4 @0x0
0x3717b4…371948 f01 = 0x0004 // 0x3717b6 @0x2
0x3717b4…371948 gno = [ // 0x3717b8 @0x4
0x3717b4…371948 [0x00]: C0x011e.0x3.0
0x3717b4…371948 [0x01]: C0x011f.0x0.0
0x3717b4…371948 ]
0x3717b4…371948 }
0x371948…371adc Dummy {f00=0x011e, f01=0x018e, f02=» PT; P01; PTID=V1; PTCL=K2; * PLEV=60; : P02; J PTDC=T01; V PLC=001P; f PTDC=T02; v PLC=001P; P01; PSDC=S01; PT; P01; PTID=L0; PTCL=P2; PLEV=60; P00; P01;
0x371adc…371c70 Dummy {f00=0x011e, f01=0x0190, f02=» PTDC=T02; PLC=002P; P01; $ PSDC=S01; 0 PT; @ P01; J PTID=V3; V PTCL=K2; f PLEV=60; v P02; PTDC=T01; PLC=003P; PTDC=T02; PLC=003P; P01; PSDC=S01; PT; P01; PTID=
0x371c70…371e04 Dummy {f00=0x011e, f01=0x0190, f02=»S01; PT; P01; PTID=V5; " PTCL=K2; 2 PLEV=60; B P02; R PTDC=T03; ^ PLC=005P; n PTDC=T04; ~ PLC=005P; P01; PSDC=S01; PT; P01; PTID=L6; PTCL=P2; PLEV=60; P01;
0x371e04…371f98 Dummy {f00=0x011e, f01=0x018e, f02=»; PTDC=T01; PLC=001Q; PTDC=T02; * PLC=001Q; : P01; J PSDC=S01; V PT; f P01; p PTID=L8; | PTCL=P2; PLEV=60; P01; PTDC=T01; PLC=001Q; P01; PSDC=S01; PD; P01;
0x371f98…37212c Dummy {f00=0x011e, f01=0x0030, f02=» PC5; PC8; PC4; PC9; (2; * PLC=001Q; : P01; J PSDC=S01; V PT; f P01; p PTID=L8; | PTCL=P2; PLEV=60; P01; PTDC=T01; PLC=001Q; P01; PSDC=S01; PD; P01;
0x37212c…3722c0 Dummy {f00=0x011e, f01=0x2008, f02=» PC8; PC4; PC9; (2; * PLC=001Q; : P01; J PSDC=S01; V PT; f P01; p PTID=L8; | PTCL=P2; PLEV=60; P01; PTDC=T01; PLC=001Q; P01; PSDC=S01; PD; P01;
0x3722c0…372454 (3, 224) Dummy {f00=0x011f, f01=0x0190, f02=» P P V P , ( @ ' P V ' P $ , ( W U T |TAB ATMASF , ( D : P , ( ' P W U , (
0x372454…3725e8 Dummy {f00=0x011f, f01=0x0190, f02=» W x RDHOME , ( " : P , , ( @B ! R W * & ' P W : , ( P ' T P , ( .
0x3725e8…37277c Dummy {f00=0x011f, f01=0x0190, f02=» ERASUP * & +D : T W , ( C " : O : > * & ] P Z P P ' T . n , ( { U SAVE1 , (
0x37277c…372910 Dummy {f00=0x011f, f01=0x0190, f02=» : : 0 z , ( 0 0 : H P DISCON J CONCT * & @$ % X ( O T DW L l CHKSTA COPY H , ( A * , : N @ T N P ! 0 , ( ] 9B V L !
0x372910…372aa4 Dummy {f00=0x011f, f01=0x0190, f02=» L L $ . O W O , ( & P T ," X . , ( 9HR !VV H_ V _$ ,9H L ^ TRPF TRPA * & O : ' T 0 : _ T , ( 3 2 : %W >W , T 2
0x372aa4…372c38 Dummy {f00=0x011f, f01=0x0190, f02=» T 0 : W O | , ( 0R T W T W T W , ( O 1R V W O 0R V W L , ( O 0R V W O W 4 : | : H D ! Rd TZ TR +P 1T> 7R8 =Q2 ER M t UT ]P iW m oW s H
0x372c38…372dcc Dummy {f00=0x011f, f01=0x0190, f02=» V H D ! H D ! ^ H D ! H D ! ! #
0x372dcc…372f60 Dummy {f00=0x011f, f01=0x0190, f02=» ] _ a c e g i k J m J o J q J s u w B y { H D ! } 0 N T H J H D ! * N : > B H D ! L L L L L L L
0x372f60…3730f4 (3, 225) Opaque[0x194]
0x3730f4…373288 # DirEnt {nam=»FARCON«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x23e8, f03=0x0000}
0x3730f4…373288 IdxSect {
0x3730f4…373288 f00 = 0x011f // 0x3730f4 @0x0
0x3730f4…373288 f01 = 0x0002 // 0x3730f6 @0x2
0x3730f4…373288 gno = [ // 0x3730f8 @0x4
0x3730f4…373288 [0x00]: C0x011f.0x1.0
0x3730f4…373288 ]
0x3730f4…373288 }
0x373288…37341c Dummy {f00=0x011f, f01=0x018e, f02=» PT; P01; PTID=V0; PTCL=K2; * PLEV=60; : P02; J PTDC=T01; V PLC=001P; f PTDC=T02; v PLC=001P; P01; PSDC=S01; PT; P01; PTID=L2; PTCL=P2; PLEV=60; P01; PTDC=
0x37341c…3735b0 Dummy {f00=0x011f, f01=0x0190, f02=» PTDC=T01; PLC=001Q; PTDC=T02; $ PLC=001Q; 4 P01; D PSDC=S01; P PT; ` P01; j PTID=L4; v PTCL=P2; PLEV=60; P01; PTDC=T01; PLC=001Q; P01; PSDC=S01; PT; P01; PTID=
0x3735b0…373744 Dummy {f00=0x011f, f01=0x0190, f02=»S01; PT; P01; PTID=V6; " PTCL=K2; 2 PLEV=60; B P02; R PTDC=T01; ^ PLC=017Q; n PTDC=T02; ~ PLC=017Q; P01; PSDC=S01; PT; P01; PTID=L7; PTCL=P2; PLEV=60; P01;
0x373744…3738d8 Dummy {f00=0x011f, f01=0x0076, f02=»0; PNSA=08; P40; P00; & PC8; 2 PC1; > PC9; J PC2; V PC3; b P4A; n n PTDC=T02; ~ PLC=017Q; P01; PSDC=S01; PT; P01; PTID=L7; PTCL=P2; PLEV=60; P01;
0x3738d8…373a6c Dummy {f00=0x011f, f01=0x2008, f02=» PNSA=08; P40; P00; & PC8; 2 PC1; > PC9; J PC2; V PC3; b P4A; n n PTDC=T02; ~ PLC=017Q; P01; PSDC=S01; PT; P01; PTID=L7; PTCL=P2; PLEV=60; P01;
0x373a6c…373c00 Dummy {f00=0x011f, f01=0x0190, f02=»
0x373c00…373d94 (3, 226) Opaque[0x194]
0x373d94…373f28 # DirEnt {nam=»HVDCON«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x23f0, f03=0x0000}
0x373d94…373f28 IdxSect {
0x373d94…373f28 f00 = 0x011f // 0x373d94 @0x0
0x373d94…373f28 f01 = 0x0002 // 0x373d96 @0x2
0x373d94…373f28 gno = [ // 0x373d98 @0x4
0x373d94…373f28 [0x00]: C0x011f.0x2.0
0x373d94…373f28 ]
0x373d94…373f28 }
0x373f28…3740bc Dummy {f00=0x011f, f01=0x018e, f02=» PT; P02; PTID=V0; PTCL=K2; * PLEV=60; : P02; J PTDC=T01; V PLC=001P; f PTDC=T02; v PLC=001P; P01; PSDC=S01; PT; P01; PTID=L2; PTCL=P2; PLEV=60; P01; PTDC=
0x3740bc…374250 Dummy {f00=0x011f, f01=0x00a4, f02=» PNSA=03; P40; PC1; PC8; , PSDTE=CD; 8 P01; H PTYPE=LT; T PNA=C161; d PNSA=03; t P40; PC1; PC8; C=S01; PT; P01; PTID=L2; PTCL=P2; PLEV=60; P01; PTDC=
0x374250…3743e4 Dummy {f00=0x011f, f01=0x2008, f02=» 03; P40; PC1; PC8; , PSDTE=CD; 8 P01; H PTYPE=LT; T PNA=C161; d PNSA=03; t P40; PC1; PC8; C=S01; PT; P01; PTID=L2; PTCL=P2; PLEV=60; P01; PTDC=
0x3743e4…374578 Dummy {f00=0x011f, f01=0x0190, f02=»502 IH2501 IH2502 , ( 0 IHPR01 ` , ( ! r IHPL01 IHPL02 , ( 1 , ( A
0x374578…37470c Dummy {f00=0x011f, f01=0x0190, f02=» HALT & 6 SCTMSZ N SCTSFA b SCTEFA v SCTIPL SCTANO SCTTCT SCTCDT , ( @
0x37470c…3748a0 Dummy {f00=0x011f, f01=0x0190, f02=» SCTDMT SCTDMI SCTFWT ( SCTNOF < SCTNFT P SCTFWL d SCTBLK x SCTDCT SCTNOS , ( SCTMXS SCTMOX
0x3748a0…374a34 (3, 227) Opaque[0x194]
0x374a34…374bc8 # DirEnt {nam=»ANHCON«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x23f8, f03=0x0000}
0x374a34…374bc8 IdxSect {
0x374a34…374bc8 f00 = 0x011f // 0x374a34 @0x0
0x374a34…374bc8 f01 = 0x0002 // 0x374a36 @0x2
0x374a34…374bc8 gno = [ // 0x374a38 @0x4
0x374a34…374bc8 [0x00]: C0x011f.0x3.0
0x374a34…374bc8 ]
0x374a34…374bc8 }
0x374bc8…374d5c Dummy {f00=0x011f, f01=0x018e, f02=» PT; P01; PTID=V1; PTCL=K2; * PLEV=60; : P02; J PTDC=T01; V PLC=001P; f PTDC=T02; v PLC=001P; P01; PSDC=S01; PT; P01; PTID=L2; PTCL=P2; PLEV=60; P01; PTDC=
0x374d5c…374ef0 Dummy {f00=0x011f, f01=0x0190, f02=» PTDC=T01; PLC=001Q; PTDC=T02; $ PLC=001Q; 4 P01; D PSDC=S01; P PT; ` P01; j PTID=L4; v PTCL=P2; PLEV=60; P01; PTDC=T01; PLC=001Q; P01; PSDC=S01; PT; P01; PTID=
0x374ef0…375084 Dummy {f00=0x011f, f01=0x014c, f02=»S01; PT; P01; PTID=L6; " PTCL=P2; 2 PLEV=60; B P01; R PTDC=T01; ^ PLC=009Q; n P01; ~ PSDC=S01; PD; P01; PSDTE=AB; P01; PTYPE=LT; PNA=4060; PNSA=07; P00; P
0x375084…375218 Dummy {f00=0x011f, f01=0x2008, f02=» PT; P01; PTID=L6; " PTCL=P2; 2 PLEV=60; B P01; R PTDC=T01; ^ PLC=009Q; n P01; ~ PSDC=S01; PD; P01; PSDTE=AB; P01; PTYPE=LT; PNA=4060; PNSA=07; P00; P
0x375218…3753ac Dummy {f00=0x011f, f01=0x0190, f02=» f , ( q HALT 8 H SCTMSZ ` SCTSFA t SCTEFA SCTIPL SCTANO SCTTCT SCTCDT , ( @
0x3753ac…375540 Dummy {f00=0x011f, f01=0x018e, f02=» SCTDMT SCTDMI SCTFWT , SCTNOF @ SCTNFT T SCTFWL h SCTBLK | SCTDCT SCTNOS SCTMXS , ( SCTMOX
0x375540…3756d4 (3, 228) Opaque[0x194]
0x3756d4…375868 # DirEnt {nam=»TIECON«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x2400, f03=0x0000}
0x3756d4…375868 IdxSect {
0x3756d4…375868 f00 = 0x0120 // 0x3756d4 @0x0
0x3756d4…375868 f01 = 0x0004 // 0x3756d6 @0x2
0x3756d4…375868 gno = [ // 0x3756d8 @0x4
0x3756d4…375868 [0x00]: C0x0120.0x0.0
0x3756d4…375868 [0x01]: C0x0120.0x1.0
0x3756d4…375868 ]
0x3756d4…375868 }
0x375868…3759fc Dummy {f00=0x0120, f01=0x018e, f02=» PT; P01; PTID=V0; PTCL=K2; * PLEV=60; : P02; J PTDC=T01; V PLC=001P; f PTDC=T02; v PLC=001P; P01; PSDC=S01; PT; P01; PTID=V1; PTCL=K2; PLEV=60; P02; PTDC=
0x3759fc…375b90 Dummy {f00=0x0120, f01=0x0190, f02=» PLEV=60; P01; PTDC=T01; $ PLC=001P; 4 P01; D PSDC=S01; P PT; ` P01; j PTID=V3; v PTCL=K2; PLEV=60; P02; PTDC=T01; PLC=001Q; PTDC=T02; PLC=001Q; P01; PSDC=S01;
0x375b90…375d24 Dummy {f00=0x0120, f01=0x0190, f02=»S01; PT; P01; PTID=V5; " PTCL=K2; 2 PLEV=60; B P02; R PTDC=T01; ^ PLC=009Q; n PTDC=T02; ~ PLC=009Q; P01; PSDC=S01; PT; P01; PTID=L6; PTCL=P2; PLEV=60; P01;
0x375d24…375eb8 Dummy {f00=0x0120, f01=0x018e, f02=»; PTDC=T01; PLC=017Q; PTDC=T02; * PLC=017Q; : P01; J PSDC=S01; V PT; f P01; p PTID=L8; | PTCL=P2; PLEV=60; P01; PTDC=T01; PLC=017Q; P01; PSDC=S01; PT; P01;
0x375eb8…37604c Dummy {f00=0x0120, f01=0x0184, f02=» PSDC=S01; PT; P01; PTID=L:; * PTCL=P2; : PLEV=60; J P01; Z PTDC=T01; f PLC=025Q; v P01; PSDC=S01; PD; P01; PSDTE=AB; P01; PTYPE=LT; PNA=4060; PNSA=11; P40;
0x37604c…3761e0 Dummy {f00=0x0120, f01=0x2008, f02=» S01; PT; P01; PTID=L:; * PTCL=P2; : PLEV=60; J P01; Z PTDC=T01; f PLC=025Q; v P01; PSDC=S01; PD; P01; PSDTE=AB; P01; PTYPE=LT; PNA=4060; PNSA=11; P40;
0x3761e0…376374 (3, 229) Dummy {f00=0x0120, f01=0x4048, f02=» _ 2@ D
0x376374…376508 Dummy {f00=0x0120, f01=0x0190, f02=» J F IDENT DEBUGM REL 11.0 81-07-26 870105041100 dBUG R |BUG ` , ( A :U A A p , ( ! @ ~ A A ~ @ A A , ( A @ A A @ A A " a
0x376508…37669c Dummy {f00=0x0120, f01=0x0190, f02=» h , ( , ( $ ( , 0 4 8 , ( 8 < h , ( 9 , ( Y , ( y
0x37669c…376830 Dummy {f00=0x0120, f01=0x0190, f02=» T :a R T <a Z _ = , ( :A , >a @ ( , ( " A P UW B X , ( 9 @ = / M Q , ( Y R S T Y G P H L , ( y V I U _v
0x376830…3769c4 Dummy {f00=0x0120, f01=0x0190, f02=» P A A x , ( . , + - ; # , ( $ : X " H W X " H TTB:AP x ACBRELA , ( * 9 H H A W W L , ( W@ H A A _p @ P A 1+ , ( !T u X A
0x3769c4…376b58 Dummy {f00=0x0120, f01=0x0190, f02=»NDTID , ( ! ? > " @ , ( D @ T " ( ^ @ P > , ( R A A " @ T @ n , ( 3 W @ A W W 0 , ( $ S _, W W , ( s
0x376b58…376cec Dummy {f00=0x0120, f01=0x0190, f02=» _` A , ( @ T @ W @ T @ W @ @ . , ( >a @ A ^ , ( 3 A , ( S ;a ]@ 1 _L W @ , ( s $ 0
0x376cec…376e80 Dummy {f00=0x0120, f01=0x0190, f02=» @ Q A @ ~ , ( BT A " T @ W @ A , ( ! A P @ _2 N , ( 3 T 0 P P ~ , ( S _ @ @ , ( P s @ @ P
0x376e80…377014 (3, 230) Opaque[0x194]
0x377014…3771a8 # DirEnt {nam=»AMFCON«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x2410, f03=0x0000}
0x377014…3771a8 IdxSect {
0x377014…3771a8 f00 = 0x0120 // 0x377014 @0x0
0x377014…3771a8 f01 = 0x0004 // 0x377016 @0x2
0x377014…3771a8 gno = [ // 0x377018 @0x4
0x377014…3771a8 [0x00]: C0x0120.0x2.0
0x377014…3771a8 [0x01]: C0x0120.0x3.0
0x377014…3771a8 ]
0x377014…3771a8 }
0x3771a8…37733c Dummy {f00=0x0120, f01=0x018e, f02=» PT; P01; PTID=V0; PTCL=K2; * PLEV=60; : P02; J PTDC=T01; V PLC=001P; f PTDC=T02; v PLC=001P; P01; PSDC=S01; PT; P01; PTID=V1; PTCL=K2; PLEV=60; P02; PTDC=
0x37733c…3774d0 Dummy {f00=0x0120, f01=0x0190, f02=» PLEV=60; P01; PTDC=T01; $ PLC=001P; 4 P01; D PSDC=S01; P PT; ` P01; j PTID=V3; v PTCL=K2; PLEV=60; P02; PTDC=T01; PLC=001Q; PTDC=T02; PLC=001Q; P01; PSDC=S01;
0x3774d0…377664 Dummy {f00=0x0120, f01=0x0190, f02=»S01; PT; P01; PTID=V5; " PTCL=K2; 2 PLEV=60; B P02; R PTDC=T01; ^ PLC=009Q; n PTDC=T02; ~ PLC=009Q; P01; PSDC=S01; PT; P01; PTID=L6; PTCL=P2; PLEV=60; P01;
0x377664…3777f8 Dummy {f00=0x0120, f01=0x018e, f02=»; PTDC=T01; PLC=017Q; PTDC=T02; * PLC=017Q; : P01; J PSDC=S01; V PT; f P01; p PTID=L8; | PTCL=P2; PLEV=60; P01; PTDC=T01; PLC=017Q; P01; PSDC=S01; PD; P01;
0x3777f8…37798c Dummy {f00=0x0120, f01=0x0030, f02=» PC3; P4A; PC4; P4B; (2; * PLC=017Q; : P01; J PSDC=S01; V PT; f P01; p PTID=L8; | PTCL=P2; PLEV=60; P01; PTDC=T01; PLC=017Q; P01; PSDC=S01; PD; P01;
0x37798c…377b20 Dummy {f00=0x0120, f01=0x2008, f02=» P4A; PC4; P4B; (2; * PLC=017Q; : P01; J PSDC=S01; V PT; f P01; p PTID=L8; | PTCL=P2; PLEV=60; P01; PTDC=T01; PLC=017Q; P01; PSDC=S01; PD; P01;
0x377b20…377cb4 (3, 231) Dummy {f00=0x0120, f01=0x403a, f02=» $@ 6 , SCTNOF @ SCTNFT T SCTFWL h SCTBLK | SCTDCT SCTNOS SCTMXS , ( SCTMOX
0x377cb4…377e48 Dummy {f00=0x0120, f01=0x4016, f02=» PNOD AM @
0x377e48…377fdc Dummy {f00=0x0120, f01=0x0190, f02=» > @ IDENT SYSLOD REL 11.0 83-08-24 870105041100 F B SYSLOD SYSBAS NUMSEG PRGLG1 APLADA APLLAC APLLAP APLLDA F F B APLMMC APLMMP APLNPE APLREL APLSTA APLTYP APLIOE APLSEG APLSWB APLADA APLRE
0x377fdc…378170 Dummy {f00=0x0120, f01=0x0190, f02=»PLSEG APLNPE APLSWB $ APLSTA 8 APLTYP L NUMSEG ` PRGLG1 t SYSLOD STKEND SCTIPL SCTANO , ( I$ A 0 A A " A A STK
0x378170…378304 Dummy {f00=0x0120, f01=0x0190, f02=» A. z bREL TABBE ( , ( O UU @>B @ A 8 , ( k @ D E D E P h MMDDIV , ( $_( W V W V P ERROR SCTMSZ SCTEFA
0x378304…378498 Dummy {f00=0x0120, f01=0x018e, f02=» @ @ A , ( ! P A @ , ( ! @ $ A A @ P , ( H @ @ E E E E E , ( 9A A & E @ F CRP , ( U <A COP <A BAP AS<A E ASP
0x378498…37862c Dummy {f00=0x0120, f01=0x0190, f02=» , ( F ;j , ( Y P F P 4 , ( @ P - P _ d , ( :L E A W , ( F D AST =l R , ( ? W R Q
0x37862c…3787c0 Dummy {f00=0x0120, f01=0x0190, f02=» :L AST , ( A A E E A A " , ( 8 P W 89B @ V R , ( $ W Zb A @ @ , ( A A @ D , ( # B AS @ A
0x3787c0…378954 (3, 232) Opaque[0x194]
0x378954…378ae8 # DirEnt {nam=»XXXCON«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1a00, f03=0x0000}
0x378954…378ae8 IdxSect {
0x378954…378ae8 f00 = 0x00d0 // 0x378954 @0x0
0x378954…378ae8 f01 = 0x0004 // 0x378956 @0x2
0x378954…378ae8 gno = [ // 0x378958 @0x4
0x378954…378ae8 [0x00]: C0x00d0.0x0.0
0x378954…378ae8 [0x01]: C0x00d0.0x1.0
0x378954…378ae8 ]
0x378954…378ae8 }
0x378ae8…378c7c Dummy {f00=0x00d0, f01=0x018e, f02=» PT; P01; PTID=V0; PTCL=K2; * PLEV=60; : P02; J PTDC=T01; V PLC=001P; f PTDC=T02; v PLC=001P; P01; PSDC=S01; PT; P01; PTID=V1; PTCL=K2; PLEV=60; P02; PTDC=
0x378c7c…378e10 Dummy {f00=0x00d0, f01=0x0190, f02=» PLEV=60; P01; PTDC=T01; $ PLC=001P; 4 P01; D PSDC=S01; P PT; ` P01; j PTID=V3; v PTCL=K2; PLEV=60; P02; PTDC=T01; PLC=001Q; PTDC=T02; PLC=001Q; P01; PSDC=S01;
0x378e10…378fa4 Dummy {f00=0x00d0, f01=0x0190, f02=»S01; PT; P01; PTID=V5; " PTCL=K2; 2 PLEV=60; B P02; R PTDC=T01; ^ PLC=009Q; n PTDC=T02; ~ PLC=009Q; P01; PSDC=S01; PT; P01; PTID=L6; PTCL=P2; PLEV=60; P01;
0x378fa4…379138 Dummy {f00=0x00d0, f01=0x018e, f02=»; PTDC=T01; PLC=017Q; PTDC=T02; * PLC=017Q; : P01; J PSDC=S01; V PT; f P01; p PTID=L8; | PTCL=P2; PLEV=60; P01; PTDC=T01; PLC=017Q; P01; PSDC=S01; PT; P01;
0x379138…3792cc Dummy {f00=0x00d0, f01=0x0190, f02=» PSDC=S01; PT; P01; PTID=L:; * PTCL=P2; : PLEV=60; J P01; Z PTDC=T01; f PLC=025Q; v P01; PSDC=S01; PD; P02; PSDTE=AB; P01; PTYPE=LT; PNA=4060; PNSA=11; P40;
0x3792cc…379460 Dummy {f00=0x00d0, f01=0x00c4, f02=» P01; PTYPE=LT; PNA=C161; $ PNSA=11; 4 P40; D PC1; P PC8; PC3; h P4A; t PC4; P4B; PC5; P4C; PC2; PC9; P01; PTYPE=LT; PNA=4060; PNSA=11; P40;
0x379460…3795f4 (3, 233) Dummy {f00=0x00d0, f01=0x2008, f02=»
0x3795f4…379788 Dummy {f00=0x00d0, f01=0x0190, f02=»
[…0x4…]
0x379dd8…379f6c Dummy {f00=0x00d0, f01=0x0190, f02=» " T ( _ " = : " <P _ # : 1 ABCDEFGHI$.<(+|&JKLMNOPQR!]*);^-/STUVWXYZ},%_>? 12345678`:#@'=" abcdefghi[.<(+!&jklmnopqr]$*);^-/stuvwxyz|,%_>?0123456789:#@'="{A
0x379f6c…37a100 Dummy {f00=0x00d0, f01=0x0190, f02=» z^L~no| { [_my O ZJ 7- <=2&p ?' @O JZlP}M] Nk`Ka z^L~noj {|[_m ABCDEFGHI#.<(+!&JKLMNOPQR$]*);^-/STUVWXYZ@,%_>?0123456789
0x37a100…37a294 (3, 234) Opaque[0x194]
0x37a294…37a428 # DirEnt {nam=»NN «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x2630, f03=0x0000}
0x37a294…37a428 IdxSect {
0x37a294…37a428 f00 = 0x0131 // 0x37a294 @0x0
0x37a294…37a428 f01 = 0x0002 // 0x37a296 @0x2
0x37a294…37a428 gno = [ // 0x37a298 @0x4
0x37a294…37a428 [0x00]: C0x0131.0x2.0
0x37a294…37a428 ]
0x37a294…37a428 }
0x37a428…37a5bc Dummy {f00=0x0131, f01=0x0084, f02=» SCR BEA PRINT KPF /O " SCR 0 BEA KEYB1 < KPF /O N SCR ASG /E0,TY10 h END |
0x37a5bc…37a750 Dummy {f00=0x0131, f01=0x2008, f02=» BEA PRINT KPF /O " SCR 0 BEA KEYB1 < KPF /O N SCR ASG /E0,TY10 h END |
0x37a750…37a8e4 Dummy {f00=0x0131, f01=0x0190, f02=» Q V > P********************************************************* R P* REGISTERS R J P* R ^ P* A2= CHAR. R h P* A3= ADDRESS IN VDU-BUFFER R | P* A4= REL. CURSOR POS. R P* A5= REL. ATTRIBUTE POS. R $ P* A6= INTERNAL LINE FLAG ADDRESS R P
0x37a8e4…37aa78 Dummy {f00=0x0131, f01=0x0190, f02=»UP EQU * R " P LDK A1,2 RESTORE KEYBOARD-BIT S P ST A1,WCC,A11 S 6 P LDK A4,0 FIRST SCREEN POS. S L P LDKL A3,BVDU S p P ADR A3,A11 S " P LDK A7,NULL STORE NULL CHAR. S ( P CWK A5,LBVDU+1 UNFORMATTED SCREEN? S P RF(NE) ERUP10 NO S P C
0x37aa78…37ac0c Dummy {f00=0x0131, f01=0x0190, f02=» S ~ P ADK A3,1 T P ADK A4,1 T P RB ERUP10 T , PERUP20 EQU * T > $ P LDR A9,A4 FIRST ATTRIBUTE POS. T R P LDK A5,LLINE T z P LDR A6,A11 T P SUR A10,A10 T P CF A14,LINE T P RF ERUP47 T PERUP30 EQU * T P ADK A3,1 T P ADK
0x37ac0c…37ada0 Dummy {f00=0x0131, f01=0x0190, f02=» T PERUP45 EQU * U P CWR A9,A4 ALL SCANNED? U P RF(E) ERUP70 YES U < PERUP47 EQU * U V P LDR A1,A2 U j P ANK A1,/20 PROTECTED? U | P RB(NZ) ERUP30 YES U P ANK A2,/FE RESET MDT-BIT U P SCR A2,A3 SAVE ATTRIBUTE U P LC A1,LINFLG,A6
0x37ada0…37af34 (3, 235) Opaque[0x194]
0x37af34…37b0c8 # DirEnt {nam=»DO «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x16b0, f03=0x0000}
0x37af34…37b0c8 IdxSect {
0x37af34…37b0c8 f00 = 0x00b5 // 0x37af34 @0x0
0x37af34…37b0c8 f01 = 0x0002 // 0x37af36 @0x2
0x37af34…37b0c8 gno = [ // 0x37af38 @0x4
0x37af34…37b0c8 [0x00]: C0x00b5.0x2.0
0x37af34…37b0c8 ]
0x37af34…37b0c8 }
0x37b0c8…37b25c Dummy {f00=0x00b5, f01=0x00b0, f02=» BEA DSPBSC KPF /O SCR $ BEA DCBSC 0 KPF /O B SCR P BYE PTMON h BEA DRGP02 v SCR ASG /E0,TY10 END
0x37b25c…37b3f0 Dummy {f00=0x00b5, f01=0x2008, f02=» DSPBSC KPF /O SCR $ BEA DCBSC 0 KPF /O B SCR P BYE PTMON h BEA DRGP02 v SCR ASG /E0,TY10 END
0x37b3f0…37b584 Dummy {f00=0x00b5, f01=0x0190, f02=»
[…0x3…]
0x37ba40…37bbd4 (3, 236) Opaque[0x194]
0x37bbd4…37bd68 # DirEnt {nam=»ARHCON«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1ab0, f03=0x0000}
0x37bbd4…37bd68 IdxSect {
0x37bbd4…37bd68 f00 = 0x00d5 // 0x37bbd4 @0x0
0x37bbd4…37bd68 f01 = 0x0002 // 0x37bbd6 @0x2
0x37bbd4…37bd68 gno = [ // 0x37bbd8 @0x4
0x37bbd4…37bd68 [0x00]: C0x00d5.0x2.0
0x37bbd4…37bd68 ]
0x37bbd4…37bd68 }
0x37bd68…37befc Dummy {f00=0x00d5, f01=0x018e, f02=» PT; P01; PTID=L1; PTCL=P2; * PLEV=60; : P01; J PTDC=T01; V PLC=004P; f P01; v PSDC=S01; PT; P01; PTID=V2; PTCL=K2; PLEV=60; P02; PTDC=T01; PLC=001P; PTDC=
0x37befc…37c090 Dummy {f00=0x00d5, f01=0x0190, f02=» PTDC=T01; PLC=002P; PTDC=T02; $ PLC=002P; 4 P01; D PSDC=S01; P PT; ` P01; j PTID=L4; v PTCL=P2; PLEV=60; P01; PTDC=T01; PLC=001P; P01; PSDC=S01; PT; P01; PTID=
0x37c090…37c224 Dummy {f00=0x00d5, f01=0x0190, f02=»S01; PT; P01; PTID=L6; " PTCL=P2; 2 PLEV=60; B P01; R PTDC=T01; ^ PLC=001Q; n P01; ~ PSDC=S01; PT; P01; PTID=V7; PTCL=K2; PLEV=60; P02; PTDC=T01; PLC=009Q;
0x37c224…37c3b8 Dummy {f00=0x00d5, f01=0x0110, f02=»; PTDC=T01; PLC=009Q; P01; * PSDC=S01; 6 PD; F P01; P PSDTE=AB; P01; l PTYPE=LT; x PNA=4060; PNSA=07; P00; PC8; P40; PC1; P00; PC2; PC9; PC3; P
0x37c3b8…37c54c Dummy {f00=0x00d5, f01=0x2008, f02=» PTDC=T01; PLC=009Q; P01; * PSDC=S01; 6 PD; F P01; P PSDTE=AB; P01; l PTYPE=LT; x PNA=4060; PNSA=07; P00; PC8; P40; PC1; P00; PC2; PC9; PC3; P
0x37c54c…37c6e0 Dummy {f00=0x00d5, f01=0x018e, f02=» SCTDMT SCTDMI SCTFWT , SCTNOF @ SCTNFT T SCTFWL h SCTBLK | SCTDCT SCTNOS SCTMXS , ( SCTMOX
0x37c6e0…37c874 (3, 237) Opaque[0x194]
0x37c874…37ca08 # DirEnt {nam=»RDVCON«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x0b68, f03=0x0000}
0x37c874…37ca08 IdxSect {
0x37c874…37ca08 f00 = 0x005b // 0x37c874 @0x0
0x37c874…37ca08 f01 = 0x0002 // 0x37c876 @0x2
0x37c874…37ca08 gno = [ // 0x37c878 @0x4
0x37c874…37ca08 [0x00]: C0x005b.0x1.0
0x37c874…37ca08 ]
0x37c874…37ca08 }
0x37ca08…37cb9c Dummy {f00=0x005b, f01=0x018e, f02=» PT; P01; PTID=L1; PTCL=P2; * PLEV=60; : P01; J PTDC=T01; V PLC=007P; f P01; v PSDC=S01; PT; P05; PTID=V2; PTCL=K2; PLEV=60; P02; PTDC=T01; PLC=001P; PTDC=
0x37cb9c…37cd30 Dummy {f00=0x005b, f01=0x00fe, f02=» PTDC=T01; PLC=001P; P01; $ PSDC=S01; 0 PD; @ P01; J PSDTE=AB; V P01; f PTYPE=LT; r PNA=4060; PNSA=06; P00; PC8; P40; PC1; PC2; PC3; PC4; P00; PTDC=
0x37cd30…37cec4 Dummy {f00=0x005b, f01=0x2008, f02=» T01; PLC=001P; P01; $ PSDC=S01; 0 PD; @ P01; J PSDTE=AB; V P01; f PTYPE=LT; r PNA=4060; PNSA=06; P00; PC8; P40; PC1; PC2; PC3; PC4; P00; PTDC=
0x37cec4…37d058 Dummy {f00=0x005b, f01=0x2008, f02=» MES 5 FC FILE CODE. DEFAULT VALUE IS F4 8 HMES 6 SOP SOP SWITCH NUMBER. DEFAUL VALUE IS 01 > HMES 7 DATE UPDATING DATE z < HMES ANY COMBINATION OF ALTERNATIVE 1,2,3 AND 4 IS VALID, 0 HMES AND AT LEAST ONE OF THEM MUST BE CHOOS
0x37d058…37d1ec Dummy {f00=0x005b, f01=0x018e, f02=» Y ! ! , ( [ ! 5 ! " SETIMP R , ( ! n ! ! d INPUT , ( 1@@ ! " ! P 0 * & M : P Y _$ X X , ( g
0x37d1ec…37d380 Dummy {f00=0x005b, f01=0x018e, f02=» * & DH Y _ Y Y X , ( ," :HR 0 P :h ! Y 2 , ( B _" X , ! Y b , ( _ 4 :h 0 :C ! 4121518 , ( ' 24253033353648505160667072010203 , ( G 04050607080910
0x37d380…37d514 (3, 238) Opaque[0x194]
0x37d514…37d6a8 # DirEnt {nam=»PRINT2«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x23b8, f03=0x0000}
0x37d514…37d6a8 IdxSect {
0x37d514…37d6a8 f00 = 0x011d // 0x37d514 @0x0
0x37d514…37d6a8 f01 = 0x001c // 0x37d516 @0x2
0x37d514…37d6a8 gno = [ // 0x37d518 @0x4
0x37d514…37d6a8 [0x00]: C0x011d.0x3.0
0x37d514…37d6a8 [0x01]: C0x011e.0x0.0
0x37d514…37d6a8 [0x02]: C0x011e.0x1.0
0x37d514…37d6a8 [0x03]: C0x011e.0x2.0
0x37d514…37d6a8 [0x04]: C0x0121.0x3.0
0x37d514…37d6a8 [0x05]: C0x0122.0x0.0
0x37d514…37d6a8 [0x06]: C0x0122.0x1.0
0x37d514…37d6a8 [0x07]: C0x0122.0x2.0
0x37d514…37d6a8 [0x08]: C0x0122.0x3.0
0x37d514…37d6a8 [0x09]: C0x0123.0x0.0
0x37d514…37d6a8 [0x0a]: C0x0123.0x1.0
0x37d514…37d6a8 [0x0b]: C0x0123.0x2.0
0x37d514…37d6a8 [0x0c]: C0x0123.0x3.0
0x37d514…37d6a8 [0x0d]: C0x0124.0x0.0
0x37d514…37d6a8 ]
0x37d514…37d6a8 }
0x37d6a8…37d83c Dummy {f00=0x011d, f01=0x0190, f02=» 4 P IDENT PRINT2 REL 11.1 84-01-05 DK 870150541110 P < , P DK43, DANISH CHARS. FOR 6883 PRINTER D * P DK42, INTERVENTION REQUIRED STATUS t ( P DK41, TIME-OUT IN PRLINE EXTENDED " P DK40, LP100 OR LINE PRINTER & P DK39,MAIN NOT CLE
0x37d83c…37d9d0 Dummy {f00=0x011d, f01=0x0190, f02=»-28 P =35 IMPROVEMENT OF =24 0 P =32 MISSING PRINTING AFTER PRINTER ERROR . $ P =31 PAPER OUT ON COPY80 (SUM) b P 82-06-21 P =30 IMPROVEMENT OF =5 & P =27 NO STATUS CHECK AFTER ABORT P =26 LONG SNA CH STRING "
0x37d9d0…37db64 Dummy {f00=0x011d, f01=0x0190, f02=»URN CODE ~ $ P =19 ERRONEOUS PRINTER STATUS P =18 DOUBLE SETTIM ENTRIES 8 P =17 TWO DC LINES P 82-04-16 x $ P =15 CORRECTION OF =7 FOR SNA P 82-02-12 & P =7 TEST PRINTER BEFORE CONNECT P =6 SET PRINTER STAT
0x37db64…37dcf8 Dummy {f00=0x011d, f01=0x0190, f02=»ON | P 81-05-12 P =2 NEW LABEL P 81-04-08 6 P =1, EOC ON FIRST READ J P 81-01-26 j H P******************************************************************* ~ H P*
0x37dcf8…37de8c Dummy {f00=0x011d, f01=0x0190, f02=»TOUTS BOTH FROM * b H P* DISPLAY AND MAIN-FRAME * H P* (EMULATION 3270 SNA/SDLC, BSC * j H P* * H P******
0x37de8c…37e020 Dummy {f00=0x011d, f01=0x0190, f02=»**** P* P* LIST OF ROUTINES P* 8 $ P* PRINT MAIN ROUTINE B 0 P* IOACT ACTIVATE IN CURRENT MODE j 0 P* IOCPL COMPLETE IN CURRENT MODE ( P* DCPINP DC PRINTER INPUT ( P* I
0x37e020…37e1b4 (3, 239) Dummy {f00=0x011e, f01=0x0190, f02=» INTERTASK ABORT 6 P* COPP COPY SCREEN BUFFER TO PRINTER $ P* TABLE OF PRINTERORDERS V P* NL NEW LINE ~ , P* FFDUM SIMULATED FORM FEED " P* FFVAL FORM FEED ( P* CR
0x37e1b4…37e348 Dummy {f00=0x011e, f01=0x0190, f02=» CHECK IF FF IS VALID ~ " P* PRLINE PRINT LINE $ P* INIT INIT ROUTINE D & P* TSTPRT TEST HARDWARE l ( P* GETTAB GET ORDER INDEX P* @ P***********************************************************
0x37e348…37e4dc Dummy {f00=0x011e, f01=0x0190, f02=» * j H P* ENTRY POINTS * & H P* * r H P*******************************************************************
0x37e4dc…37e670 Dummy {f00=0x011e, f01=0x0190, f02=»************************************************************* H P* * F H P* EXTERNAL REFERENCES * H P*
0x37e670…37e804 Dummy {f00=0x011e, f01=0x0190, f02=»ON INITIATE ROUTINE (DSPSNA) ~ 2 P EXTRN OPINIT OPEN CONNECTION INITIATE (DCSNA9 $ $ P EXTRN OPSYS OPEN SYSTEM (DCSNA) Z P EXTRN OPEN OPEN (DCBSC) ( P EXTRN CONCT CONNECT PASSIVE (DCBSC) 0 P EXTRN SETTYM SET REQUEST TIMER (DCBSC) =18 , P EXTRN
0x37e804…37e998 Dummy {f00=0x011e, f01=0x0190, f02=»EADNW READ WITH NO WAIT (DCSNA) " P EXTRN GETBUF GET BUFFER (PAD) ( & P EXTRN RELBUF RELEASE BUFFER (PAD) N ( P EXTRN UNPACK UNPACK DC BUFFER (PAD) x ( P EXTRN ECBINI INIT IF ECB:S (DSPSNA) . P EXTRN ICSET SET INTERTASK TIMEOUT (KEYB) ( P EXTRN
0x37e998…37eb2c Dummy {f00=0x011e, f01=0x0190, f02=»TRANSFORM OF NAT CHAR =4 , P EXTRN RFMDUP REPLACE FM OR DUP CHAR =37 P EJECT P D P*************************************************************** ^ D P* * D P* CONDITIONAL ASSEM
0x37eb2c…37ecc0 Dummy {f00=0x011e, f01=0x0190, f02=»********************************************* ~ P 6 PX:A EQU 0 SNA HANDLING IF:=1 > PSNA EQU X:A b & PX:D EQU 1 NUMBER OF DC LINES (1-2) v PNBRLIN EQU 2 PX:O EQU 0 TEST MODE IF:=1 PTEST EQU X:O , PX:R EQU 0 TRANSFORM OF NAT.CHA
0x37ecc0…37ee54 (3, 240) Dummy {f00=0x011e, f01=0x0190, f02=»ANDLING =26 p , PLMARG EQU 0 LEFT MARGIN FOR PRINTER =25 " PP6883 EQU 1 6883 PRINTER DK43 D P EJECT j H P******************************************************************* x H P* *
0x37ee54…37efe8 Dummy {f00=0x011e, f01=0x0190, f02=»********************************************************* P B P* J P* TABLE OF PRINTER TYPES T P* t PPRTTAB EQU * ~ & P DATA /0004 NUMBER OF PRINTERTYPES P DATA 'TT',0 GTP P DATA 'LL',2 LINE PRINTER P DATA 'GG',4 GP 74
0x37efe8…37f17c Dummy {f00=0x011e, f01=0x0190, f02=»BYTE2= NUMBER OF CHAR./LINE P* $ PPRTLEN DATA /2382 GTP . P DATA /2382 LP L P DATA /2382 GP 74 b P DATA /2382 COPY 80 | P IFF LMARG=0 . =25 4 PLMARGT EQU * NO. OF POSITIONS IN LEFT MARGIN =25 P DATA 0 GTP =25 P DATA
0x37f17c…37f310 Dummy {f00=0x011e, f01=0x0190, f02=»EQU 132 PRINTER BUFFER LENGTH =24 P =BUFL-2 (IN DATXXX) =24 * P XIF . =36 L P IFT BASWRI=1 . =36 ` , PPRBFL EQU 256 PRINTER BUFFER LENGTH =36 | P =BUFL IN DATXXX =36 P XIF . =36 P* " P* LINE LENGTHS FROM WCC
0x37f310…37f4a4 Dummy {f00=0x011e, f01=0x0190, f02=»BBA EQU 2 BUFFER ADDRESS PECBRL EQU 4 REQUESTED LENGTH PECBEL EQU 6 EFFECTIVE LENGTH D PECBRC EQU 8 RETURN CODE h PECBCW EQU 10 CONTROL WORD P* P* PRINTER MODES P* PLOCAL EQU 0 LOCAL MODE PSHARED EQU 2 SHARED
0x37f4a4…37f638 Dummy {f00=0x011e, f01=0x0190, f02=» IN A10 z P* $ PNXTCHA EQU /8000 GET NEXT CHAR. " PENDPRT EQU /4000 END PRINTING B $ PNTONLY EQU /2000 NOT ONLY SPACES h PCRREC EQU /1000 CR RECEIVED $ PFFCCH EQU /0800 FF CCH IND. =36 0 PNOEMLF EQU /0400 NO EXTRA LINE FEED(EM) DK38
0x37f638…37f7cc Dummy {f00=0x011e, f01=0x0190, f02=» PLBVDU EQU 1920 P* P* RECEIVE STATUS $ P* < PLICREC EQU /2000 . =1 F P* d P* LOCAL EQUATES n P* PSO EQU /0E 'SHIFT OUT' PSI EQU /0F 'SHIFT IN' P EJECT P* P* RELATIVE ADDRESSES IN P* TE
0x37f7cc…37f960 Dummy {f00=0x011e, f01=0x0190, f02=»LENG EQU LINCNT+2 LENGTH OF RECEIVED BUFFER & PPRTID EQU DCLENG+6 PRINTER TASKID 4 $ PPRTTYP EQU PRTID+2 PRINTER TYPE ^ " PMAIN EQU PRTTYP+4 WHAT DC LINE PECBBLK EQU MAIN+6 ECB BLOCK ( PBUFPNT EQU ECBBLK+14 BUFFER POINTER PREGI EQU BUF
0x37f960…37faf4 (3, 241) Dummy {f00=0x011e, f01=0x0190, f02=»AD ECB p , PECBICW EQU ECBICR+2 INTERTASK WRITE ECB PECBDC EQU ECBICW+2 ECB DC > " PECBDC1 EQU ECBDC ECB DC LINE 1 ` & PECBDC2 EQU ECBDC1+2 ECB DC LINE 2 P IFF SNA=1 . =24 . PPRCCCT EQU ECBDC2+2 CHARACTER COUNTER =24 P XIF . =24
0x37faf4…37fc88 Dummy {f00=0x011e, f01=0x0190, f02=»RESS =24 l 4 PPRLMAR EQU PRBA+2 NO. OF POS IN LEFT MARGIN =25 P* H P* RELATIVE ADDRESSES IN R P* COMMON WORKBLOCK r P* P IFF TEST=1 " PTSKTAB EQU 26 DEVICE TABLE =17 P XIF P IFT TEST=1 PTSKTAB EQU 221 . =17
0x37fc88…37fe1c Dummy {f00=0x011e, f01=0x0190, f02=» * r H P* PRINT MAIN ROUTINE PRINTER * . H P* * z H P******************************************************************
0x37fe1c…37ffb0 Dummy {f00=0x011e, f01=0x018e, f02=»INIT OPEN CONNECTION INITIATE P RF(N) PRI100 DC NOT PRESENT & P CF A14,OPSYS OPEN SYSTEM J P XIF l P IFF SNA=1 x P CF A14,OPEN OPEN P RF(N) PRI100 NO DC INVOLVED P LDKL A8,20 P LKM P DATA 6 * P CF A14,TSTPRT G
0x37ffb0…380144 Dummy {f00=0x011e, f01=0x0190, f02=» h P XRS A1,MAIN,A11 . =17 P CF A14,CONCT . =17 & P LDK A1,1 . =17 B 2 P XRS A1,MAIN,A11 INDICATE FIRST LINE AGAIN =17 Z P XIF . =17 P IFF SNA=1 . =17 * P CF A14,SETTYM SET REQUEST TIMEOUT =18 P XIF ( P LDK A1,SHARED ALW
0x380144…3802d8 Dummy {f00=0x011e, f01=0x0190, f02=» A2,/FF P SUK A2,/30 P SLL A2,2 $ P LD A3,+6,A13 6 P LDK A1,TSKTAB L P ADR A3,A1 d P ADR A3,A2 x " P LC A4,+3,A3 STATUS TO A4 DK42 * P RF(Z) PRI200 WAS OPERABLE, GO ON DK42 PPRI100 EQU * P CF A14,TSTPRT TEST
0x3802d8…38046c Dummy {f00=0x011e, f01=0x0190, f02=»? f $ P RF(NN) PRI200 NO, SKIP STATUS * P LDK A1,0 SET STATUS = DEVICE END DK42 2 P CF A14,SETSTA DK42 ` P IFT NBRLIN=2 ~ ( P LDK A1,1 STATUS TO SECOND LINE DK42 P XRS A1,MAIN,A11 DK42 P LDK A1,0 . DK42 P CF A14,SETSTA .
0x38046c…380600 Dummy {f00=0x011e, f01=0x0190, f02=»50 EQU * $ P LDKL A8,50 WAIT 5 SECONDS DK42 P LKM : P DATA 6 H P RB PRI100 DK42 X PPRI200 EQU * r * P CF A14,IOACT ACTIVATE IN CURRENT MODE P LDKL A7,ECBBLK P ADR A7,A11 P LKM P DATA 7 MULTIPLE WAIT *
0x380600…380794 (3, 242) Dummy {f00=0x0121, f01=0x0190, f02=» XRS A1,PRTMOD,A11 P RB PRI100 TRY TO FIX IT P EJECT : J P********************************************************************* H J P* * $ P* IOACT ACTIVATE IN CURRENT MODE
0x380794…380928 Dummy {f00=0x0121, f01=0x0190, f02=»*************** Z PIOACT EQU * P LDK A4,0 , & P LD A1,PRTMOD,A11 SHARED OR LOCAL? > P RF(Z) IOAC20 LOCAL h " P ADK A4,1 ADD NUMBER OF WAITS 4 P LD A2,ECBBLK+4,A11 REQUEST OUTSTANDING ALREADY? P RF(NZ) IOAC10 YES P CM MAIN,A11
0x380928…380abc Dummy {f00=0x0121, f01=0x0190, f02=»4,1 ADD MORE WAITS P LD A2,ECBBLK+6,A11 ALREADY? P RF(NZ) IOAC20 YES > P IM MAIN,A11 INDICATE LINE 2 X P CF A14,TSTMES TEST MESSAGE | P ST A8,ECBBLK+6,A11 P XIF PIOAC20 EQU * P ADK A4,1 P LD A2,ECBBLK+2,A11 ALREAD
0x380abc…380c50 Dummy {f00=0x0121, f01=0x0190, f02=»A11 NUMBER OF WAITS P RTN A14 ! P EJECT ! , J P********************************************************************* ! : J P* * ! $ P* IOCPL COMPLETE IN CURRENT MODE ! J P*
0x380c50…380de4 Dummy {f00=0x0121, f01=0x0190, f02=»* ! L PIOCPL EQU * " $ P CM MAIN,A11 CLEAR MF FLAG DK39 " " P CW A8,ECBBLK+2,A11 INTERTASK? " F P RF(NE) IOCP10 NO " l P CM ECBBLK+2,A11 " P CF A14,ICPINP MAKE HARDCOPY " P RF IOCP90 " PIOCP10 EQU * " " P CW A8,ECBBLK+4,A11 DC LINE 1? "
0x380de4…380f78 Dummy {f00=0x0121, f01=0x0190, f02=» CM ECBBLK+4,A11 " P CM MAIN,A11 INDICATE LINE 1 # P RF IOCP30 # < P IFT NBRLIN=2 # N PIOCP20 EQU * # d " P CW A8,ECBBLK+6,A11 DC LINE 2? # x P RF(NE) IOCP90 NO # P CM ECBBLK+6,A11 # P IM MAIN,A11 INDICATE LINE 2 # P XIF # PIOCP30 E
0x380f78…38110c Dummy {f00=0x0121, f01=0x0190, f02=»*************************** # l D P* * $ $ D P* DCPINP DC PRINTER INPUT * $ l D P* * $ D P************
0x38110c…3812a0 Dummy {f00=0x0121, f01=0x0190, f02=»LREADY COMPLETED? $ P RF(Z) DCP100 NO % * P CF A14,ICPINP TAKE CARE OF THAT FIRST % 2 PDCP100 EQU * % ` P LD A8,ECBDC,A11 % t P IFT NBRLIN=2 % P LD A1,MAIN,A11 LINE 1 % P RF(Z) DCP150 YES % P LD A8,ECBDC2,A11 % PDCP150 EQU * % P
0x3812a0…381434 (3, 243) Dummy {f00=0x0122, f01=0x0190, f02=»4,GETBUF GET BUFFER % P LDR A3,A8 & $ P CF A14,READW READ FIRST BUFFER & . P ANK A1,3 ERROR? & V P RF(NZ) DCP400 NO & n P LDR A8,A12 & " P CF A14,RELBUF RELEASE BUFFER & P RF DCP500 & PDCP400 EQU * & . P SUR A10,A10 RESET INTERNAL UNPA
0x381434…3815c8 Dummy {f00=0x0122, f01=0x0190, f02=»1 & P XIF . =1 ' P LD A1,ECBEL,A8 ' " P ST A1,DCLENG,A11 SAVE LENGTH ' 4 * P ST A12,BUFPNT,A11 SAVE BUFFER ADDRESS ' Z P IFT SNA=1 ' & P CF A14,GETBUF GET ANOTHER BUFFER ' P LDR A3,A8 ' $ P CF A14,READNW READ WITH NO WAIT ' P XIF ' (
0x3815c8…38175c Dummy {f00=0x0122, f01=0x018e, f02=» P XIF ( P RTN A14 ( P EJECT ( D P**************************************************************** ( . D P* * ( v D P* ICPINP INTERTASK INPUT * ( D P*
0x38175c…3818f0 Dummy {f00=0x0122, f01=0x0190, f02=» ( N PICPINP EQU * ) P CF A14,COPP MAKE HARDCOPP ) , P ST A1,REGI,A11 RETURN CODE TO TERMINAL ) > " P CF A14,ICPWRT WRITE INTERTASK ) n P RTN A14 ) P EJECT ) F P****************************************************************** ) F P*
0x3818f0…381a84 Dummy {f00=0x0122, f01=0x018e, f02=»* * ) F P****************************************************************** * J PICPRED EQU * * P LD A8,ECBICR,A11 * P CF A14,ICSET SET NO TIMEOUT * P LDK A1,0 NOT ADDRESSED READ *
0x381a84…381c18 Dummy {f00=0x0122, f01=0x0190, f02=» H P******************************************************************** + H P* * + P H P* ICPWRT WRITE INTERTASK * + H P*
0x381c18…381dac Dummy {f00=0x0122, f01=0x0190, f02=» P LD A8,ECBICW,A11 , P CF A14,ICSET SET NO TIMEOUT , P LD A1,ECBICR,A11 , B P LD A1,ECBCW,A1 GET TASKID , P RF(Z) ICPW90 NOT THERE , ~ P LDKL A3,REGI RETURN CODE , P ADR A3,A11 , P LDK A2,2 LENGTH , " P CF A14,ICWRT WRITE INTERTAS
0x381dac…381f40 Dummy {f00=0x0122, f01=0x0190, f02=» * , B P* ICABOR INTERTASK ABORT * - @ B P* * - B P************************************************************
0x381f40…3820d4 (3, 244) Dummy {f00=0x0122, f01=0x0190, f02=» - P EJECT . J P********************************************************************* . J P* * . d J P* COPP COPY SCREEN BUFFER TO PRINTER * . J P*
0x3820d4…382268 Dummy {f00=0x0122, f01=0x0190, f02=»*** . N P* REGISTERS / P* / 0 P* A2= CHAR. / : " P* A3= SCREEN BUFFER POINTER / P & P* A4= REL. SCREEN BUFFER ADDRESS / v P* A5= LINE LENGTH / P* A6= CURRENT ATTRIBUTE / P* A8= ECB BUFFER POINTER / P* A9=
0x382268…3823fc Dummy {f00=0x0122, f01=0x018e, f02=»********************************************************* / PCOPP EQU * . =2 0 B P LD A8,ECBPRT,A11 0 Z & P CM ECBRL,A8 RESET PRINT LENGTH =3 0 t P LDK A1,0 0 P LDK A6,0 RESET ATTRIBUTE 0 . P CF A14,ATMASB SEARCH ATTRIBUTE BACKWARDS 0 & P CM
0x3823fc…382590 Dummy {f00=0x0122, f01=0x0190, f02=» 0 x $ P ABL(Z) COP950 NO FORGET IT =19 1 P SRL A5,4 1 0 $ P LC A5,LINLEN,A5 GET LINE LENGTH 1 B ( P LDR A5,A5 NL,EM AND CR DET. LENGTH? 1 j P RF(NZ) COP100 NO 1 * P LD A1,PRTTYP,A11 GET MAX LINE LENGTH 1 P LC A5,PRTLEN+1,A1 1 PCOP100 EQU * 1
0x382590…382724 Dummy {f00=0x0122, f01=0x0190, f02=» =24 1 j $ P ST A8,ECBBA,A1 STORE IN ECB =24 2 , P AD A8,PRLMAR,A11 ALLOW LEFT MARG/CR =25 2 4 6 P CM PRCCCT,A11 CLEAR BUFFER CHARACTER COUNTER =36 2 d P XIF . =24 2 P IFF BASWRI=1 . =24 2 P LD A8,ECBBA,A8 2 P CMR A8 RESET CONTROL CHAR. 2
0x382724…3828b8 Dummy {f00=0x0122, f01=0x0190, f02=»QU * 2 P CWK A4,LBVDU ALL PRINTED? 3 P RF(NL) COP850 YES 3 . P CWR A9,A5 LINE FULL? 3 H P RF(L) COP400 NO 3 f P CF A14,PRLINE PRINT LINE 3 ~ P LDR A1,A1 PRINTER ERROR? 3 P RF(NZ) COP900 YES 3 PCOP400 EQU * 3 P LCR A2,A3 GET CHAR. 3
0x3828b8…382a4c Dummy {f00=0x0122, f01=0x0190, f02=»BUTE 3 x P RF COP650 4 PCOP500 EQU * 4 P CCK A2,/2020 ORDER? 4 2 P RF(L) COP550 YES 4 N * P ANKL A10,/FFFF-CRREC RESET CR RCV =3 4 h P RF COP600 4 PCOP550 EQU * 4 " P CF A14,GETTAB GET ORDERINDEX 4 " P CFR A14,A1 TAKE CARE OF ORDER 4 P
0x382a4c…382be0 Dummy {f00=0x0122, f01=0x0190, f02=» 4 P RF(N) COP850 END 5 PCOP600 EQU * 5 " P LDR A1,A6 CHECK IF NONPRINT 5 6 P ANK A1,/C 5 Z P XRK A1,/C 5 l P RF(Z) COP650 NONPRINT 5 ~ , P ORKL A10,NTONLY INIDICATE NOT ONLY NOT 5 P RF COP700 5 PCOP650 EQU * 5 " P LDK A2,/20 REPLACE WI
0x382be0…382d74 (3, 245) Dummy {f00=0x0122, f01=0x0190, f02=» 5 P ADKL A9,1 6 P ADKL A8,1 6 P CCK A2,/2020 SPACE? =3 6 , . P RF(E) COP800 YES, DON'T UPDATE LENGTH =3 6 L P LD A1,ECBPRT,A11 GET ECB =3 6 ~ 2 P ST A9,ECBRL,A1 UPDATE LAST POS. NOT SPACE =3 6 PCOP800 EQU * 6 2 P ANKL A10,/FFFF-NXTCHA RESET
0x382d74…382f08 Dummy {f00=0x0122, f01=0x0190, f02=»A9 SOMETHING LEFT TO PRINT? 6 P RF(Z) COP950 NO! =19 7 $ " P CF A14,PRLINE PRINT LAST LINE 7 B P ANKL A10,ENDPRT END MESS.? 7 h P RF(Z) COP900 NO STOP IT 7 ( P ORKL A10,NTONLY INDICATE PRINTABLE 7 " P CF A14,PRLINE EXTRA LINE FEED 7 P XIF . =2
0x382f08…38309c Dummy {f00=0x0122, f01=0x0190, f02=» TEXT =24 7 | PCOP860 EQU * . =24 8 P IFF SCS=1 . =26 8 , $ P LDR A1,A10 TEST END MESS. DK38 8 D P ANKL A1,ENDPRT DK38 8 l P RF(Z) COP870 DK38 8 2 P ANKL A10,NOEMLF TEST IF EXTRA LF NECESS. DK38 8 $ P RF(NZ) COP870 NO, SKIP IT DK38 8 , P ORK
0x38309c…383230 Dummy {f00=0x0122, f01=0x0190, f02=»P870 EQU * . =24 8 . P CF A14,PRCCH CONTROL CH:S TO PRINTER =24 9 P XIF . =24 9 J PCOP900 EQU * 9 ^ P LDR A1,A1 PRINTER FAILED? 9 r P RF(Z) COP950 NO 9 P LD A2,WCC,A11 . =32 9 $ P CWK A2,/38 LOCAL HARDCOPY? =32 9 ( P RF(E) COP910 YES. SKIP
0x383230…3833c4 Dummy {f00=0x0122, f01=0x0190, f02=»OP905 YES, RETRY DK42 9 ( P LDKL A8,50 NO, WAIT 5 SECONDS DK42 : P LKM : J P DATA 6 : X P RB COP902 : h PCOP905 EQU * : | " P ABL COPP RESUME PRINTING =34 : PCOP910 EQU * . =32 : " P LDKL A2,PRTERR INDICATE ERROR : P ORS A2,PRTMOD,A
0x3833c4…383558 Dummy {f00=0x0122, f01=0x0190, f02=» P* ; P* TABLE FOR PRINTERORDERS ; P* ; 0 L P************************************************************************ ; : PPRTORD EQU * ; & P DATA /0004 NUMBER OF ORDER CODES ; $ P DATA /0A0A,NL,NL,NL,NL NEW LINE ; 2 P DATA /0C0C,FFDUM,FFVAL,
0x383558…3836ec Dummy {f00=0x0122, f01=0x0190, f02=»D ORDER CODE ; ~ P EJECT < P P**************************************************************************** < " P P* * < v P P* NL NEW LINE
0x3836ec…383880 Dummy {f00=0x0122, f01=0x0190, f02=»********************************************** < r PNL EQU * = 6 * P ORKL A10,NXTCHA+NTONLY GET NEXT CHAR. = F " P ADK A3,1 GET NEXT CHAR. DK38 = t P LCR A1,A3 DK38 = P ANK A1,/FF MASK IT DK38 = P CWK A1,/19 END MESS.? DK38 = " P RF(E) NL005 YES,
0x383880…383a14 (3, 246) Dummy {f00=0x0122, f01=0x0190, f02=» INDICATE NO LF DK38 = PNL010 EQU * DK38 > " P SUK A3,1 RESTORE POINTER DK38 > 6 , P CF A14,PRLINE PRINT LINE AFTER NEW LINE > P . =DK > P RTN A14 > P EJECT > J P********************************************************************** > J P
0x383a14…383ba8 Dummy {f00=0x0122, f01=0x0190, f02=» * > V J P* * ? J P********************************************************************** ? b PFFDUM EQU * ? . P CF A14,FFCHK CHECK IF FORM FEED IS VALID ? P LDR A1,A1 VALID?
0x383ba8…383d3c Dummy {f00=0x0122, f01=0x0190, f02=»D100 EQU * ? P CW A7,LINCNT,A11 NEW PAGE? @ " P RF(L) FFD200 YES BUT TO MANY @ 6 P RF(E) FFD300 YES FINISHED @ P ORKL A10,NTONLY @ ~ P ST A7,REGI,A11 SAVE @ $ P CF A14,PRLINE ADVANCE ONE LINE @ P LD A7,REGI,A11 RESTORE @ P LDR A1,A1 PRI
0x383d3c…383ed0 Dummy {f00=0x0122, f01=0x0190, f02=»AGE @ n P RB FFD100 A PFFD300 EQU * A P CM LINCNT,A11 TOP OF PAGE A 2 & P LDK A2,/20 REPLACE FF WITH SPACE A T PFFD400 EQU * A ~ P LDK A1,0 RETURN CODE A PFFD500 EQU * A P RTN A14 A P EJECT A J P**************************************
0x383ed0…384064 Dummy {f00=0x0122, f01=0x0190, f02=» FORM FEED * A ~ J P* * B < J P********************************************************************* B PFFVAL EQU * B $ P CF A14,FFCHK CHECK IF FF VA
0x384064…3841f8 Dummy {f00=0x0122, f01=0x0190, f02=»WRITE =30 B t ( P SC A1,-1,A8 STORE FF CONTROL CHAR. C P XIF . =24 C > P IFT BASWRI=1 . =24 C R $ P ORKL A10,FFCCH IND. FF CCH =36 C n " P CF A14,PRLINE PRINT LINE =36 C P XIF . =24 C P ORKL A10,NXTCHA . =DK C P CM LINCNT,A11 TOP OF PAGE
0x3841f8…38438c Dummy {f00=0x0122, f01=0x0190, f02=»********************** C ` J P* * D J P* CR CARRIAGE RETURN * D l J P* * D J P
0x38438c…384520 Dummy {f00=0x0122, f01=0x0190, f02=» D P XRK A1,/C NONPRINT FIELD? E P RF(Z) CR100 YES E * P LD A1,WCC,A11 E B P ANK A1,/30 FORMATTED? E X P RF(NZ) CR100 NO E v & P ORKL A10,NTONLY+CRREC CR RECEIVED E PCR100 EQU * E " P LDK A2,/20 REPLACE WITH SPACE E P LDK A1,0 RETURN CODE
0x384520…3846b4 (3, 247) Dummy {f00=0x0123, f01=0x0190, f02=» * E | H P* EM END MESSAGE * F 8 H P* * F H P********************************************************
0x3846b4…384848 Dummy {f00=0x0123, f01=0x018e, f02=»**************************************************************** F F P* * G H F P* INVAL INVALID PRINTER ORDER * G F P*
0x384848…3849dc Dummy {f00=0x0123, f01=0x0190, f02=» P* DUP & FM CHARACTERS H P* H " PINVAL EQU * H , P LDR A1,A2 SAVE CHAR =37 H @ , P CF A14,RFMDUP REPLACE IF DUP OR FM =37 H ` P SUR A1,A2 REPLACED? =37 H P RF(NZ) INVA10 YES! =37 H " P NO! I.E. INVALID ORDER =37 H " P LDK A2,/20 REPLAC
0x3849dc…384b70 Dummy {f00=0x0123, f01=0x0190, f02=» F P***************************************************************** I F P* * I N F P* FFCHK CHECK IF FF IS VALID * I F P*
0x384b70…384d04 Dummy {f00=0x0123, f01=0x0190, f02=»,WCC,A11 I P ANK A1,/30 J P XRK A1,/30 FORMATTED? J $ 0 P RF(NZ) FFCH10 YES BUT NOT AS LOCAL HARDCOPY J B P LD A1,WCC,A11 J v P ANK A1,/40 LOCAL HARD COPY? J & P RF(Z) FFCH20 YES, FF NOT ALLOWED J PFFCH10 EQU * J P LDR A9,A9 FF ALLOWED J
0x384d04…384e98 Dummy {f00=0x0123, f01=0x0190, f02=» A2,/20 REPLACE WITH SPACE J P LDK A1,1 RETURN CODE K " P RF FFCH40 K @ PFFCH30 EQU * K R * P ANKL A10,/FFFF-CRREC RESET CR RCV =3 K f P LDR A9,A9 EMPTY LINE K P RF(Z) FFCH35 YES K P CF A14,PRLINE PRINT LINE K PFFCH35 EQU * K P LDK A
0x384e98…38502c Dummy {f00=0x0123, f01=0x0190, f02=»************************************ K t D P* * L , D P* PRLINE PRINT LINE * L t D P* * L D P****
0x38502c…3851c0 Dummy {f00=0x0123, f01=0x0190, f02=»NKL A1,NTONLY ONLY RUBB.? L P RF(NZ) PRL050 NO M " P LD A1,WCC,A11 M < P LDR A2,A1 M R P ANK A1,/30 M d P XRK A1,/30 HRADCOPY? M x P RF(NZ) PRL200 NO M P ANK A2,/40 HARDCOPY????? M P RF(NZ) PRL200 NO M PPRL050 EQU * M 8 P ANKL A1
0x3851c0…385354 (3, 248) Dummy {f00=0x0123, f01=0x0190, f02=»9,ECBRL,A8 . =3 M P LDK A7,/06 PRINT N P LKM N 2 P DATA 1 N > P XIF . =24 N N P IFT BASWRI=1 . =24 N b & P LD A1,ECBRL,A8 TEXT TO PRINT? =24 N ~ * P RF(Z) PRL070 NO! JUST CONTROL CH =24 N $ P EJECT HANDLING A TEXT LINE =36 N * P PREPARE
0x385354…3854e8 Dummy {f00=0x0123, f01=0x0190, f02=»6 N z P AD A1,ECBBA,A8 . =36 O P SUK A1,1 . =36 O ( PPRL055 EQU * . =36 O @ P SCR A7,A1 . =36 O Z P SUK A1,1 . =36 O r " P CW A1,ECBBA,A8 FINISHED? =36 O P RB(G) PRL055 NO! =36 O P XIF . =36 O P IFT BASWRI=1 . =36 O P . =36 O
0x3854e8…38567c Dummy {f00=0x0123, f01=0x0190, f02=»/0A LF CCH =24 O P LD A7,ECBRL,A8 . =24 P P AD A7,ECBBA,A8 . =24 P 4 0 P AD A7,PRLMAR,A11 ALLOW FOR LEFT MARG/CR =25 P R & P SCR A1,A7 LF CCH LAST IN BUF =25 P P . =35 P P CALCULATE LINE LENGTH =36 P P LDK A1,1 ALLOW FOR LF =36 P & P A
0x38567c…385810 Dummy {f00=0x0123, f01=0x0190, f02=» P d 2 P ADS A1,ECBBA,A8 UPDATE POINTER TO BUFFER =36 Q P EJECT . =36 Q > 4 PPRL060 EQU * ENOUGH SPACE FOR ANOTHER LINE? =36 Q T $ P LDKL A1,PRBFL BUFFER LENGTH =36 Q . P SU A1,PRCCCT,A11 USED PART OF BUFFER =36 Q $ P SUR A1,A5 MAX. LINE LENGTH =36 Q
0x385810…3859a4 Dummy {f00=0x0123, f01=0x0190, f02=»UFFER =36 Q | P LD A1,PRCCCT,A11 . =36 R $ P ST A1,ECBRL,A8 REQ. LENGTH =36 R 2 P LD A1,PRBA,A11 . =36 R Z & P ST A1,ECBBA,A8 BUFFER ADDRESS =36 R x P IFT P6883=1 R P LDR* A1,A11 6883 PRINTER? R " P CWK A1,'L1' TID = L1 = 6883 R * P RF(NE) PR
0x3859a4…385b38 Dummy {f00=0x0123, f01=0x018e, f02=» P LDK A7,/05 BASIC WRITE =24 S PPRL069 EQU * S ( P LKM . =24 S > P DATA 1 . =24 S R . P CM PRCCCT,A11 CLEAR CHARACTER COUNTER =24 S h P RF PRL090 . =24 S , P EJECT HANDLING A CONTROL CHARACTER =36 S * PPRL070 EQU * STORE CCH IN BUFFER =24
0x385b38…385ccc Dummy {f00=0x0123, f01=0x0190, f02=» S p P RF(Z) PRL075 NO =36 T P LDK A7,/0C YES. FF CCH =36 T $ , P ANKL A10,/FFFF-FFCCH RESET FF IND. =36 T H PPRL075 EQU * . =36 T x & P SC* A7,ECBBA,A8 CCH TO BUFFER =36 T ( P IM ECBBA,A8 STEP BUFFER ADDRESS =36 T 2 P IM PRCCCT,A11 STEP NO. OF CH:S
0x385ccc…385e60 Dummy {f00=0x0123, f01=0x018e, f02=»90 EQU * . =24 T P XIF . =24 U & P LDK A1,100 NUMBER OF DELAYS DK41 U * PPRL100 EQU * U T P LDKL A8,1 WAIT FOR A WHILE U h P LKM U P DATA 6 U P LD A8,ECBPRT,A11 U P LDR* A2,A8 PRINT COMPL.? U P RF(N) PRL150 YES U P SUK A1,1
0x385e60…385ff4 (3, 249) Dummy {f00=0x0123, f01=0x0190, f02=» P RF PRL300 V PPRL150 EQU * V P LKM V * P DATA 2 RESYNCHRONIZE V 8 P IFF BASWRI=1 . =24 V V P IM LINCNT,A11 ANOTHER LINE V r & P CM ECBRL,A8 RESET PRINT LENGTH =3 V P XIF . =36 V P LD A1,ECBRC,A8 OK? V 6 P ANKL A1,/2011 PAPER OUT
0x385ff4…386188 Dummy {f00=0x0123, f01=0x0190, f02=»NT LENGTH =36 V z * P LD A8,ECBBA,A8 SET BUFFER POINTER =36 W 0 P AD A8,PRLMAR,A11 ALLOW FOR LEFT MARG/CR =25 W D P XIF . =24 W x P IFF BASWRI=1 . =24 W & P LD A8,ECBBA,A8 GET BUFFER ADDRESS W P CMR A8 RESET CONTROL CHAR. W P XIF . =24 W
0x386188…38631c Dummy {f00=0x0123, f01=0x0190, f02=» PPRL300 EQU * X * P LD A2,PRTID,A11 GET PRINTER TASKID =6 X P ANK A2,/FF . =6 X F P SUK A2,/30 . =6 X ^ P SLL A2,2 . =6 X v & P LD A3,+6,A13 COMMON BLOCK BASE =6 X P ADK A3,TSKTAB . =6 X P ADR A3,A2 . =6 X & P SC A1,+3,A3 SET PRINTER STATU
0x38631c…3864b0 Dummy {f00=0x0123, f01=0x0190, f02=»**************************************** X p P* Y 0 B P* PRCCH - SEND BUFFER WITH CONTROL CH:S TO PRINTER Y : P* Y L P************************************************************************ Y P* Y PPRCCH EQU * . =24 Y , P LD A1,PRC
0x3864b0…386644 Dummy {f00=0x0123, f01=0x0190, f02=» TO PRINTER =36 Y | P XIF . =24 Z P EJECT Z , H P******************************************************************* Z : H P* * Z H P* INIT INIT ROUTINE
0x386644…3867d8 Dummy {f00=0x0123, f01=0x0190, f02=»***************************** Z j PINIT EQU * [ & P CF A14,COMINI COMMON INIT [ 8 P CF A14,ECBINI INIT OF ECB:S [ Z P LCR A2,A1 [ ~ P SLL A2,8 [ P LC A2,+1,A1 [ & P ST A2,PRTID,A11 SAVE WHOLE TASKID [ 2 P LCR A2,A1 GET TYPE OF PRINTER AND MAKE
0x3867d8…38696c Dummy {f00=0x0123, f01=0x018e, f02=»RT TYPE TO INDEX [ P RF(E) INI200 P ADK A1,4 . P SUK A7,1 ILLEGAL ID? @ P RB(NZ) INI100 NO ^ P LDKL A1,* x P ST A1,REGI,A11 P LKM P DATA 3 FORGET IT PINI200 EQU * P LD A1,+2,A1 ( P ST A1,PRTTYP,A11 SAVE P
0x38696c…386b00 Dummy {f00=0x0123, f01=0x0190, f02=» ~ P* ] P IFT BASWRI=1 . =24 ] . P LD A2,ECBPRT,A11 PRINTER ECB ADDRESS =24 ] . . P LD A2,ECBBA,A2 PRINTER BUFFER ADDRESS =24 ] ` , P ST A2,PRBA,A11 SAVE IT IN WORK AREA =24 ] P LDK A2,1 . =25 ] & P ST A2,PRLMAR,A11 ALLOW FOR CR =25 ] , P IFF
0x386b00…386c94 (3, 250) Dummy {f00=0x0123, f01=0x0190, f02=»=24 ] P RTN A14 ^ P EJECT ^ F P***************************************************************** ^ * F P* * ^ t F P* TSTPRT TEST HARDWARE * ^ F P
0x386c94…386e28 Dummy {f00=0x0123, f01=0x0190, f02=»*** ^ R PTSTPRT EQU * _ P . =6 _ P LD A8,ECBPRT,A11 _ 0 P LDK A7,/80 TEST STATUS _ J PTSTP10 EQU * _ j P LKM _ ~ P DATA 1 _ P LD A4,ECBRC,A8 . =6 _ 6 P ANKL A4,/2011 PAPER OUT/HARDWARE T-O/NOT OP? =31 _ P RF(Z) TSTP20 NO! =31 _
0x386e28…386fbc Dummy {f00=0x0123, f01=0x0190, f02=» P SUK A2,/30 ` P SLL A2,2 ` P LD A3,+6,A13 ` * P LDK A1,TSKTAB ` @ P ADR A3,A1 ` V P ADR A3,A2 ` h P . =6 ` z 0 P SC A4,+3,A3 INDICATE STATUS IN DEV TABLE =6 ` P . =6 ` P . =6 ` P . =6 ` P . =6 ` PTSTP90 EQU
0x386fbc…387150 Dummy {f00=0x0123, f01=0x0190, f02=» * ` | H P* GETTAB GET ORDER INDEX * a 8 H P* * a H P********************************************************
0x387150…3872e4 Dummy {f00=0x0123, f01=0x018e, f02=»10 EQU * a , P CCR A2,A1 CONVERT ORDER CODE TO ADDRESS b P RF(E) GETT20 b @ P AD A1,PRTTAB b V P AD A1,PRTTAB b l P ADK A1,2 b P SUK A7,1 ORDER FOUND? b P RF(Z) GETT30 NO INVALID b P RB GETT10 TRY AGAIN b PGETT20 EQU * b P ADK A
0x3872e4…387478 Dummy {f00=0x0123, f01=0x0190, f02=» $ P* SELECTION OF PRINTER FILE CODE c ( P* FC=30, LP100, FC=80, LINE PRINTER c , P* c X PSELPFC EQU * c b P LDR* A1,A11 GET TASK ID c x P LDR A2,A1 SAVE IT c P ANKL A1,/FF00 MASK LETTER c P CWK A1,/4C00 ='L'? c P RF(E) SELP05 YES. c
0x387478…38760c Dummy {f00=0x0123, f01=0x408e, f02=»TER ECB c v $ P LDK A1,/80 OVER WRITE ORIG. FC d P SC A1,+1,A2 d 8 PSELP90 EQU * d N P RTN A14 d d P d v P END d ~@ d ID c x P LDR A2,A1 SAVE IT c P ANKL A1,/FF00 MASK LETTER c P CWK A1,/4C00 ='L'? c P RF(E) SELP05 YES. c
0x38760c…3877a0 Dummy {f00=0x0123, f01=0x2008, f02=» e A1,TSKTAB ADR A3,A1 ADR A3,A2 0 LDK A1,1 B " SC A1,+2,A3 INDICATE NOT OP. T LKM z DATA 0 SWITCH TASK $ LDK A2,1 INDICATE ONCE NOT OP. RB TSTP10 TSTP80 EQU * LDR A2,A2 NOT OP. ONC
0x3877a0…387934 (3, 251) Dummy {f00=0x0124, f01=0x0190, f02=»
[…0x1…]
0x387ac8…387c5c Dummy {f00=0x0124, f01=0x0190, f02=» ( ( 7 Z& ( P H R H P ' Pt Tt ' P B ]` F U F ]n P U W. C G H L C X L G B G 9 @_ Xt X X R A Y X T P (P H U ^ 9 1 X T @ P ( A >_ ( Y
0x387c5c…387df0 Dummy {f00=0x0124, f01=0x0190, f02=» - )W ) $P e % > ABCDEFGHI#.<(+!&JKLMNOPQR$]*);^-/STUVWXYZ@,%_>? 123456789:[ '=" abcdefghi[.<(+!&jklmnopqr]$*);^-/stuvwxyz|,%_>?0123456789:#@'=" ABCDEFGHI[.<(+!&JKLMNOPQR]$*);^ /STUVWXYZ|,%_>?
0x387df0…387f84 Dummy {f00=0x0124, f01=0x0190, f02=» TOSS %B%B % % &>&> &|&| + + X ! 9 D W~ X ! 9 D Wl X ! 9 D WZ X ! 9 D WH B U B (" W C (@ > Y > X ! 9
0x387f84…388118 Dummy {f00=0x0124, f01=0x0190, f02=» X P X( H_. ?(@ " X '? X D X T ? P >A D V 8P X ?!W > >?A P >A D V 8P X V 8W ?a > T < _ ? ^ 4 _
0x388118…3882ac Dummy {f00=0x0124, f01=0x0190, f02=» - _H "Rf P^ X TX X PJ X RD< V X 0 X L T P* X P Y 9 C " < ? < ? <(@ $ P B $ 9H C ">h # P >_2 < U = (@ " $ P B >H<h P ?_" = > = > =
0x3882ac…388440 Dummy {f00=0x0124, f01=0x0190, f02=»0123456789 - ' < +,-. 0123456789 'ABCDEFGHIJKLMNOPQRSTUVWXYZ []^ 0123456789 - * > ?;_: =!"#$%&/() @ABCDEFGHIJKLMNOPQRSTUVWXYZ []^ ^ T Y . X C