|
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 - metrics - download
Length: 4762 (0x129a)
Notes: pts_type(SC)
Names: »DEDISC.SC«
└─⟦48601905a⟧ Bits:30009668 Philips computer tape "600121"
└─⟦this⟧ »S:DU/DEDISC.SC«
└─⟦79fbed147⟧ Bits:30009697 Philips computer tape "600414"
└─⟦this⟧ »S:DU/DEDISC.SC«
└─⟦d2a299635⟧ Bits:30009698 Philips computer tape "600415"
└─⟦this⟧ »S:DU/DEDISC.SC«
IDENT DEDISC UPD 80-02-11/CHST * * ************************************************************************ * * * ALL COMMENTS TO DEDISC ARE FOUND IN MODULE * * D E D I C O M M * * ************************************************************************ * * DDUM DDINIT PDIV ENTRY DEDISC ENTRY COND ENTRY RELEAS ENTRY SCHPOO ENTRY RETURN ENTRY WAIT ENTRY STRT01 * EXT DEPOOL EXT WRFSP EXT CHANFC EXT CLSBTH EXT GETFMT EXT SCHFMT EXT WRICUR EXT GTNEXT EXT GTPREV EXT DLCURR EXT WRIACC EXT WRTCO EXT GETTBL EXT DELBTC EXT RECURR EXT ENTJOB EXT GETJOB EXT SCHJOB EXT DELJOB EXT ENTFMT EXT DELFMT EXT GETSYS EXT ENTSYS EXT NEXJOB EXT PREJOB EXT PREFMT EXT NEXFMT EXT ENTTBL EXT DELTBL EXT OPNEBC EXT OPNNBC EXT NXJOB EXT NXBTH * * ATTACH EQU X'0E' DETACH EQU X'0F' EJECT DEDISC PROC FC * * BRANCH TO PROGRAM INDICATED BY FC * PBIN FC CLEAR SWIT01 CLEAR SWIT02 CLEAR SWIT03 CLEAR SWIT05 CLEAR SWIT07 CLEAR SWITFS CLEAR SW95PR MOVE DEBINW4,W0 STRT01 IB FC C0000000000000 ENTJOB ENTER JOBDEF C GETJOB GET JOBDEF C DUMMY C SCHJOB SEARCH JOBDEF C DELJOB DELETE JOBDEF C OPNNBC OPEN NEW BATCH C OPNEBC OPEN EXISTING BATCH C CLSBTH CLOSE BATCH C ENTFMT ENTER FORMAT C GETFMT GET FORMAT C DUMMY C SCHFMT SEARCH FORMAT C DELFMT DELETE FORMAT C WRICUR WRITE CURRENT DATA-SECTOR C GTNEXT GET NEXT DATA-SECTOR C GTPREV GET PREVIOUS DATA-SECTOR C DLCURR DELETE CURRENT DATARECORD C WRIACC WRITE ACCUMULATOR-RECORD C GETSYS GET SYSTEM-VARIABLES C ENTSYS ENTER SYSTEM-VARIABLES C NXJOB GET NEXT JOBNAME C DUMMY GET PREVIOUS JOBNAME C WRTCO WRITE SECTOR (CORR) C GETTBL GET TABLE C DELTBL DELETE TABLE C ENTTBL ENTER TABLE C DELBTC DELETE BATCH C DUMMY GET NO OF FREESPACES C NEXJOB GET NEXT JOBDEFINITION C PREJOB GET PREVIOUS JOBDEF C NEXFMT GET NEXT FORMAT C PREFMT GET PREVIOUS FORMAT C RECURR READ CURRENT SCTR C NXBTH GET NEXT BATCHNAME C DUMMY GET PREV BATCHNAME EJECT * DUMMY RETURN TBF SWITFS,RETUNF PERF WRFSP,W1 RETUNF PERF RELEAS CBNE DEBINW4,W0,RETUN9 TBF SW95PR,RETUN9 MOVE DEBINW4,=W'-1' RETUN9 PERF COND RET PEND EJECT EJECT * * SET CONDITION-REGISTER * COND PROC CBL DEBINW4,W0,CON1 CBE DEBINW4,W0,CON0 CMP W1,W2 RET CON1 CMP W2,W1 RET CON0 CMP W1,W1 RET PEND * * WAIT PROC SUBROUTINE WAIT TBT SWITWT,WARE MOVE DEBINW4,W0 CLEAR SWIT08 MOVE DKBIN1,=X'51' CALL CHANFC,DISK,DKBIN1 DSC1 DISK,ATTACH,W128 BNERR WARE2 MOVE DEBINW4,W3 WARE PERF COND RET WARE2 SET SWITWT SWITCH B WARE * * PEND RELEAS PROC SUBROUTINE RELEAS CLEAR SWITWT BZ RELRET MOVE DKBIN1,=X'51' CALL CHANFC,DISK,DKBIN1 DSC1 DISK,DETACH,W0 RELRET RET PEND * * * SUBROUTINE SCHPOO, SEARCH POOL * SCHPOO PROC IND,STRG,WX PLIT IND PSTRG STRG PBIN WX MOVE STRG10A,IND COPY STRG10A,W1,W6,STRG,W0 PERF DEPOOL,WX,DEBIN3,DEBIN4,STRG10A RET PEND END
0x0000…0028 (0, 0, 400) Head {h00=0x0024, h01=0x0050, text=» IDENT DEDISC UPD 80-02-11/CHST «, t00=0x0000, t01=0x0004}
0x0028…0032 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x002c}
0x0032…003c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0036}
0x003c…008c Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x0000, t01=0x0040}
0x008c…0096 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0090}
0x0096…00a0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x009a}
0x00a0…00de Head {h00=0x003a, h01=0x0050, text=»* ALL COMMENTS TO DEDISC ARE FOUND IN MODULE «, t00=0x0000, t01=0x00a4}
0x00de…00e8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00e2}
0x00e8…0118 Head {h00=0x002c, h01=0x0050, text=»* D E D I C O M M «, t00=0x0000, t01=0x00ec}
0x0118…0122 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x011c}
0x0122…012c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0126}
0x012c…017c Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x0000, t01=0x0130}
0x017c…0186 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0180}
0x0186…0190 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x018a}
0x0190…01a4 (1, 0, 400) Head {h00=0x0010, h01=0x0050, text=» DDUM DDINIT«, t00=0x0001, t01=0x0004}
0x01a4…01b2 Head {h00=0x000a, h01=0x0050, text=» PDIV «, t00=0x0001, t01=0x0018}
0x01b2…01c8 Head {h00=0x0012, h01=0x0050, text=» ENTRY DEDISC «, t00=0x0001, t01=0x0026}
0x01c8…01dc Head {h00=0x0010, h01=0x0050, text=» ENTRY COND «, t00=0x0001, t01=0x003c}
0x01dc…01f2 Head {h00=0x0012, h01=0x0050, text=» ENTRY RELEAS «, t00=0x0001, t01=0x0050}
0x01f2…0208 Head {h00=0x0012, h01=0x0050, text=» ENTRY SCHPOO «, t00=0x0001, t01=0x0066}
0x0208…021e Head {h00=0x0012, h01=0x0050, text=» ENTRY RETURN «, t00=0x0001, t01=0x007c}
0x021e…0232 Head {h00=0x0010, h01=0x0050, text=» ENTRY WAIT «, t00=0x0001, t01=0x0092}
0x0232…0248 Head {h00=0x0012, h01=0x0050, text=» ENTRY STRT01 «, t00=0x0001, t01=0x00a6}
0x0248…0252 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00bc}
0x0252…0266 Head {h00=0x0010, h01=0x0050, text=» EXT DEPOOL «, t00=0x0001, t01=0x00c6}
0x0266…0278 Head {h00=0x000e, h01=0x0050, text=» EXT WRFSP«, t00=0x0001, t01=0x00da}
0x0278…028c Head {h00=0x0010, h01=0x0050, text=» EXT CHANFC «, t00=0x0001, t01=0x00ec}
0x028c…02a0 Head {h00=0x0010, h01=0x0050, text=» EXT CLSBTH «, t00=0x0001, t01=0x0100}
0x02a0…02b4 Head {h00=0x0010, h01=0x0050, text=» EXT GETFMT «, t00=0x0001, t01=0x0114}
0x02b4…02c8 Head {h00=0x0010, h01=0x0050, text=» EXT SCHFMT «, t00=0x0001, t01=0x0128}
0x02c8…02dc Head {h00=0x0010, h01=0x0050, text=» EXT WRICUR «, t00=0x0001, t01=0x013c}
0x02dc…02f0 Head {h00=0x0010, h01=0x0050, text=» EXT GTNEXT «, t00=0x0001, t01=0x0150}
0x02f0…0304 Head {h00=0x0010, h01=0x0050, text=» EXT GTPREV «, t00=0x0001, t01=0x0164}
0x0304…0318 Head {h00=0x0010, h01=0x0050, text=» EXT DLCURR «, t00=0x0001, t01=0x0178}
0x0318…032c Head {h00=0x0010, h01=0x0050, text=» EXT WRIACC «, t00=0x0001, t01=0x018c}
0x032c…033e Head {h00=0x000e, h01=0x0050, text=» EXT WRTCO«, t00=0x0002, t01=0x0010}
0x033e…0352 Head {h00=0x0010, h01=0x0050, text=» EXT GETTBL «, t00=0x0002, t01=0x0022}
0x0352…0366 Head {h00=0x0010, h01=0x0050, text=» EXT DELBTC «, t00=0x0002, t01=0x0036}
0x0366…037a Head {h00=0x0010, h01=0x0050, text=» EXT RECURR «, t00=0x0002, t01=0x004a}
0x037a…038e Head {h00=0x0010, h01=0x0050, text=» EXT ENTJOB «, t00=0x0002, t01=0x005e}
0x038e…03a2 Head {h00=0x0010, h01=0x0050, text=» EXT GETJOB «, t00=0x0002, t01=0x0072}
0x03a2…03b6 Head {h00=0x0010, h01=0x0050, text=» EXT SCHJOB «, t00=0x0002, t01=0x0086}
0x03b6…03ca Head {h00=0x0010, h01=0x0050, text=» EXT DELJOB «, t00=0x0002, t01=0x009a}
0x03ca…03de Head {h00=0x0010, h01=0x0050, text=» EXT ENTFMT «, t00=0x0002, t01=0x00ae}
0x03de…03f2 Head {h00=0x0010, h01=0x0050, text=» EXT DELFMT «, t00=0x0002, t01=0x00c2}
0x03f2…0406 Head {h00=0x0010, h01=0x0050, text=» EXT GETSYS «, t00=0x0002, t01=0x00d6}
0x0406…041a Head {h00=0x0010, h01=0x0050, text=» EXT ENTSYS «, t00=0x0002, t01=0x00ea}
0x041a…042e Head {h00=0x0010, h01=0x0050, text=» EXT NEXJOB «, t00=0x0002, t01=0x00fe}
0x042e…0442 Head {h00=0x0010, h01=0x0050, text=» EXT PREJOB «, t00=0x0002, t01=0x0112}
0x0442…0456 Head {h00=0x0010, h01=0x0050, text=» EXT PREFMT «, t00=0x0002, t01=0x0126}
0x0456…046a Head {h00=0x0010, h01=0x0050, text=» EXT NEXFMT «, t00=0x0002, t01=0x013a}
0x046a…047e Head {h00=0x0010, h01=0x0050, text=» EXT ENTTBL «, t00=0x0002, t01=0x014e}
0x047e…0492 Head {h00=0x0010, h01=0x0050, text=» EXT DELTBL «, t00=0x0002, t01=0x0162}
0x0492…04a6 Head {h00=0x0010, h01=0x0050, text=» EXT OPNEBC «, t00=0x0002, t01=0x0176}
0x04a6…04ba Head {h00=0x0010, h01=0x0050, text=» EXT OPNNBC «, t00=0x0002, t01=0x018a}
0x04ba…04cc Head {h00=0x000e, h01=0x0050, text=» EXT NXJOB«, t00=0x0003, t01=0x000e}
0x04cc…04de Head {h00=0x000e, h01=0x0050, text=» EXT NXBTH«, t00=0x0003, t01=0x0020}
0x04de…04e8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0032}
0x04e8…04f2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x003c}
0x04f2…050a Head {h00=0x0014, h01=0x0050, text=»ATTACH EQU X'0E'«, t00=0x0003, t01=0x0046}
0x050a…0522 Head {h00=0x0014, h01=0x0050, text=»DETACH EQU X'0F'«, t00=0x0003, t01=0x005e}
0x0522…0530 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0003, t01=0x0076}
0x0530…0546 Head {h00=0x0012, h01=0x0050, text=»DEDISC PROC FC«, t00=0x0003, t01=0x0084}
0x0546…0550 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x009a}
0x0550…057e Head {h00=0x002a, h01=0x0050, text=»* BRANCH TO PROGRAM INDICATED BY FC «, t00=0x0003, t01=0x00a4}
0x057e…0588 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00d2}
0x0588…0598 Head {h00=0x000c, h01=0x0050, text=» PBIN FC«, t00=0x0003, t01=0x00dc}
0x0598…05ae Head {h00=0x0012, h01=0x0050, text=» CLEAR SWIT01 «, t00=0x0003, t01=0x00ec}
0x05ae…05c4 Head {h00=0x0012, h01=0x0050, text=» CLEAR SWIT02 «, t00=0x0003, t01=0x0102}
0x05c4…05da Head {h00=0x0012, h01=0x0050, text=» CLEAR SWIT03 «, t00=0x0003, t01=0x0118}
0x05da…05f0 Head {h00=0x0012, h01=0x0050, text=» CLEAR SWIT05 «, t00=0x0003, t01=0x012e}
0x05f0…0606 Head {h00=0x0012, h01=0x0050, text=» CLEAR SWIT07 «, t00=0x0003, t01=0x0144}
0x0606…061c Head {h00=0x0012, h01=0x0050, text=» CLEAR SWITFS «, t00=0x0003, t01=0x015a}
0x061c…0632 Head {h00=0x0012, h01=0x0050, text=» CLEAR SW95PR «, t00=0x0003, t01=0x0170}
0x0632…064a Head {h00=0x0014, h01=0x0050, text=» MOVE DEBINW4,W0«, t00=0x0003, t01=0x0186}
0x064a…0658 Head {h00=0x000a, h01=0x0050, text=»STRT01«, t00=0x0004, t01=0x000e}
0x0658…0676 Head {h00=0x001a, h01=0x0050, text=» IB FC C0000000000000«, t00=0x0004, t01=0x001c}
0x0676…0696 Head {h00=0x001c, h01=0x0050, text=» ENTJOB ENTER JOBDEF C «, t00=0x0004, t01=0x003a}
0x0696…06b4 Head {h00=0x001a, h01=0x0050, text=» GETJOB GET JOBDEF C «, t00=0x0004, t01=0x005a}
0x06b4…06c6 Head {h00=0x000e, h01=0x0050, text=» DUMMY C«, t00=0x0004, t01=0x0078}
0x06c6…06e6 Head {h00=0x001c, h01=0x0050, text=» SCHJOB SEARCH JOBDEF C«, t00=0x0004, t01=0x008a}
0x06e6…0706 Head {h00=0x001c, h01=0x0050, text=» DELJOB DELETE JOBDEF C«, t00=0x0004, t01=0x00aa}
0x0706…0728 Head {h00=0x001e, h01=0x0050, text=» OPNNBC OPEN NEW BATCH C «, t00=0x0004, t01=0x00ca}
0x0728…074e Head {h00=0x0022, h01=0x0050, text=» OPNEBC OPEN EXISTING BATCH C«, t00=0x0004, t01=0x00ec}
0x074e…076c Head {h00=0x001a, h01=0x0050, text=» CLSBTH CLOSE BATCH C«, t00=0x0004, t01=0x0112}
0x076c…078c Head {h00=0x001c, h01=0x0050, text=» ENTFMT ENTER FORMAT C «, t00=0x0004, t01=0x0130}
0x078c…07aa Head {h00=0x001a, h01=0x0050, text=» GETFMT GET FORMAT C «, t00=0x0004, t01=0x0150}
0x07aa…07bc Head {h00=0x000e, h01=0x0050, text=» DUMMY C«, t00=0x0004, t01=0x016e}
0x07bc…07dc Head {h00=0x001c, h01=0x0050, text=» SCHFMT SEARCH FORMAT C«, t00=0x0004, t01=0x0180}
0x07dc…07fc Head {h00=0x001c, h01=0x0050, text=» DELFMT DELETE FORMAT C«, t00=0x0005, t01=0x0010}
0x07fc…0828 Head {h00=0x0028, h01=0x0050, text=» WRICUR WRITE CURRENT DATA-SECTOR C«, t00=0x0005, t01=0x0030}
0x0828…0850 Head {h00=0x0024, h01=0x0050, text=» GTNEXT GET NEXT DATA-SECTOR C «, t00=0x0005, t01=0x005c}
0x0850…087c Head {h00=0x0028, h01=0x0050, text=» GTPREV GET PREVIOUS DATA-SECTOR C «, t00=0x0005, t01=0x0084}
0x087c…08a8 Head {h00=0x0028, h01=0x0050, text=» DLCURR DELETE CURRENT DATARECORD C«, t00=0x0005, t01=0x00b0}
0x08a8…08d4 Head {h00=0x0028, h01=0x0050, text=» WRIACC WRITE ACCUMULATOR-RECORD C «, t00=0x0005, t01=0x00dc}
0x08d4…08fc Head {h00=0x0024, h01=0x0050, text=» GETSYS GET SYSTEM-VARIABLES C «, t00=0x0005, t01=0x0108}
0x08fc…0926 Head {h00=0x0026, h01=0x0050, text=» ENTSYS ENTER SYSTEM-VARIABLES C «, t00=0x0005, t01=0x0130}
0x0926…0948 Head {h00=0x001e, h01=0x0050, text=» NXJOB GET NEXT JOBNAME C«, t00=0x0005, t01=0x015a}
0x0948…096e Head {h00=0x0022, h01=0x0050, text=» DUMMY GET PREVIOUS JOBNAME C«, t00=0x0005, t01=0x017c}
0x096e…0994 Head {h00=0x0022, h01=0x0050, text=» WRTCO WRITE SECTOR (CORR) C «, t00=0x0006, t01=0x0012}
0x0994…09b0 Head {h00=0x0018, h01=0x0050, text=» GETTBL GET TABLE C«, t00=0x0006, t01=0x0038}
0x09b0…09d0 Head {h00=0x001c, h01=0x0050, text=» DELTBL DELETE TABLE C «, t00=0x0006, t01=0x0054}
0x09d0…09ee Head {h00=0x001a, h01=0x0050, text=» ENTTBL ENTER TABLE C«, t00=0x0006, t01=0x0074}
0x09ee…0a0e Head {h00=0x001c, h01=0x0050, text=» DELBTC DELETE BATCH C «, t00=0x0006, t01=0x0092}
0x0a0e…0a34 Head {h00=0x0022, h01=0x0050, text=» DUMMY GET NO OF FREESPACES C«, t00=0x0006, t01=0x00b2}
0x0a34…0a5e Head {h00=0x0026, h01=0x0050, text=» NEXJOB GET NEXT JOBDEFINITION C «, t00=0x0006, t01=0x00d8}
0x0a5e…0a84 Head {h00=0x0022, h01=0x0050, text=» PREJOB GET PREVIOUS JOBDEF C«, t00=0x0006, t01=0x0102}
0x0a84…0aa6 Head {h00=0x001e, h01=0x0050, text=» NEXFMT GET NEXT FORMAT C«, t00=0x0006, t01=0x0128}
0x0aa6…0acc Head {h00=0x0022, h01=0x0050, text=» PREFMT GET PREVIOUS FORMAT C«, t00=0x0006, t01=0x014a}
0x0acc…0af0 Head {h00=0x0020, h01=0x0050, text=» RECURR READ CURRENT SCTR C«, t00=0x0006, t01=0x0170}
0x0af0…0b14 (7, 0, 400) Head {h00=0x0020, h01=0x0050, text=» NXBTH GET NEXT BATCHNAME C«, t00=0x0007, t01=0x0004}
0x0b14…0b36 Head {h00=0x001e, h01=0x0050, text=» DUMMY GET PREV BATCHNAME«, t00=0x0007, t01=0x0028}
0x0b36…0b44 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0007, t01=0x004a}
0x0b44…0b4e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0058}
0x0b4e…0b5c Head {h00=0x000a, h01=0x0050, text=»DUMMY «, t00=0x0007, t01=0x0062}
0x0b5c…0b6a Head {h00=0x000a, h01=0x0050, text=»RETURN«, t00=0x0007, t01=0x0070}
0x0b6a…0b84 Head {h00=0x0016, h01=0x0050, text=» TBF SWITFS,RETUNF«, t00=0x0007, t01=0x007e}
0x0b84…0b9a Head {h00=0x0012, h01=0x0050, text=» PERF WRFSP,W1«, t00=0x0007, t01=0x0098}
0x0b9a…0ba8 Head {h00=0x000a, h01=0x0050, text=»RETUNF«, t00=0x0007, t01=0x00ae}
0x0ba8…0bbc Head {h00=0x0010, h01=0x0050, text=» PERF RELEAS«, t00=0x0007, t01=0x00bc}
0x0bbc…0bdc Head {h00=0x001c, h01=0x0050, text=» CBNE DEBINW4,W0,RETUN9 «, t00=0x0007, t01=0x00d0}
0x0bdc…0bf6 Head {h00=0x0016, h01=0x0050, text=» TBF SW95PR,RETUN9«, t00=0x0007, t01=0x00f0}
0x0bf6…0c12 Head {h00=0x0018, h01=0x0050, text=» MOVE DEBINW4,=W'-1'«, t00=0x0007, t01=0x010a}
0x0c12…0c20 Head {h00=0x000a, h01=0x0050, text=»RETUN9«, t00=0x0007, t01=0x0126}
0x0c20…0c32 Head {h00=0x000e, h01=0x0050, text=» PERF COND«, t00=0x0007, t01=0x0134}
0x0c32…0c3e Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0007, t01=0x0146}
0x0c3e…0c4c Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0007, t01=0x0152}
0x0c4c…0c5a Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0007, t01=0x0160}
0x0c5a…0c68 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0007, t01=0x016e}
0x0c68…0c72 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x017c}
0x0c72…0c94 Head {h00=0x001e, h01=0x0050, text=»* SET CONDITION-REGISTER«, t00=0x0007, t01=0x0186}
0x0c94…0c9e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0018}
0x0c9e…0cb0 Head {h00=0x000e, h01=0x0050, text=»COND PROC «, t00=0x0008, t01=0x0022}
0x0cb0…0ccc Head {h00=0x0018, h01=0x0050, text=» CBL DEBINW4,W0,CON1«, t00=0x0008, t01=0x0034}
0x0ccc…0ce8 Head {h00=0x0018, h01=0x0050, text=» CBE DEBINW4,W0,CON0«, t00=0x0008, t01=0x0050}
0x0ce8…0cfa Head {h00=0x000e, h01=0x0050, text=» CMP W1,W2«, t00=0x0008, t01=0x006c}
0x0cfa…0d06 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0008, t01=0x007e}
0x0d06…0d12 Head {h00=0x0008, h01=0x0050, text=»CON1«, t00=0x0008, t01=0x008a}
0x0d12…0d24 Head {h00=0x000e, h01=0x0050, text=» CMP W2,W1«, t00=0x0008, t01=0x0096}
0x0d24…0d30 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0008, t01=0x00a8}
0x0d30…0d3c Head {h00=0x0008, h01=0x0050, text=»CON0«, t00=0x0008, t01=0x00b4}
0x0d3c…0d4e Head {h00=0x000e, h01=0x0050, text=» CMP W1,W1«, t00=0x0008, t01=0x00c0}
0x0d4e…0d5a Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0008, t01=0x00d2}
0x0d5a…0d68 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0008, t01=0x00de}
0x0d68…0d72 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x00ec}
0x0d72…0d7c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x00f6}
0x0d7c…0d9e Head {h00=0x001e, h01=0x0050, text=»WAIT PROC SUBROUTINE WAIT«, t00=0x0008, t01=0x0100}
0x0d9e…0db6 Head {h00=0x0014, h01=0x0050, text=» TBT SWITWT,WARE«, t00=0x0008, t01=0x0122}
0x0db6…0dce Head {h00=0x0014, h01=0x0050, text=» MOVE DEBINW4,W0«, t00=0x0008, t01=0x013a}
0x0dce…0de4 Head {h00=0x0012, h01=0x0050, text=» CLEAR SWIT08 «, t00=0x0008, t01=0x0152}
0x0de4…0e00 Head {h00=0x0018, h01=0x0050, text=» MOVE DKBIN1,=X'51' «, t00=0x0008, t01=0x0168}
0x0e00…0e20 Head {h00=0x001c, h01=0x0050, text=» CALL CHANFC,DISK,DKBIN1«, t00=0x0008, t01=0x0184}
0x0e20…0e3e Head {h00=0x001a, h01=0x0050, text=» DSC1 DISK,ATTACH,W128«, t00=0x0009, t01=0x0014}
0x0e3e…0e52 Head {h00=0x0010, h01=0x0050, text=» BNERR WARE2«, t00=0x0009, t01=0x0032}
0x0e52…0e6a Head {h00=0x0014, h01=0x0050, text=» MOVE DEBINW4,W3«, t00=0x0009, t01=0x0046}
0x0e6a…0e76 Head {h00=0x0008, h01=0x0050, text=»WARE«, t00=0x0009, t01=0x005e}
0x0e76…0e88 Head {h00=0x000e, h01=0x0050, text=» PERF COND«, t00=0x0009, t01=0x006a}
0x0e88…0e94 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0009, t01=0x007c}
0x0e94…0ea2 Head {h00=0x000a, h01=0x0050, text=»WARE2 «, t00=0x0009, t01=0x0088}
0x0ea2…0eb6 Head {h00=0x0010, h01=0x0050, text=» SET SWITWT «, t00=0x0009, t01=0x0096}
0x0eb6…0ec6 Head {h00=0x000c, h01=0x0050, text=» SWITCH «, t00=0x0009, t01=0x00aa}
0x0ec6…0ed6 Head {h00=0x000c, h01=0x0050, text=» B WARE «, t00=0x0009, t01=0x00ba}
0x0ed6…0ee0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00ca}
0x0ee0…0eea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00d4}
0x0eea…0ef8 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0009, t01=0x00de}
0x0ef8…0f20 Head {h00=0x0024, h01=0x0050, text=»RELEAS PROC SUBROUTINE RELEAS «, t00=0x0009, t01=0x00ec}
0x0f20…0f36 Head {h00=0x0012, h01=0x0050, text=» CLEAR SWITWT «, t00=0x0009, t01=0x0114}
0x0f36…0f48 Head {h00=0x000e, h01=0x0050, text=» BZ RELRET«, t00=0x0009, t01=0x012a}
0x0f48…0f64 Head {h00=0x0018, h01=0x0050, text=» MOVE DKBIN1,=X'51' «, t00=0x0009, t01=0x013c}
0x0f64…0f84 Head {h00=0x001c, h01=0x0050, text=» CALL CHANFC,DISK,DKBIN1«, t00=0x0009, t01=0x0158}
0x0f84…0fa0 Head {h00=0x0018, h01=0x0050, text=» DSC1 DISK,DETACH,W0«, t00=0x0009, t01=0x0178}
0x0fa0…0fae (10, 2, 354) Head {h00=0x000a, h01=0x0050, text=»RELRET«, t00=0x000a, t01=0x0004}
0x0fae…0fba Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x000a, t01=0x0012}
0x0fba…0fc8 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x000a, t01=0x001e}
0x0fc8…0fd2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x002c}
0x0fd2…0fdc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0036}
0x0fdc…1008 Head {h00=0x0028, h01=0x0050, text=»* SUBROUTINE SCHPOO, SEARCH POOL«, t00=0x000a, t01=0x0040}
0x1008…1012 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x006c}
0x1012…1032 Head {h00=0x001c, h01=0x0050, text=»SCHPOO PROC IND,STRG,WX «, t00=0x000a, t01=0x0076}
0x1032…1044 Head {h00=0x000e, h01=0x0050, text=» PLIT IND «, t00=0x000a, t01=0x0096}
0x1044…1058 Head {h00=0x0010, h01=0x0050, text=» PSTRG STRG «, t00=0x000a, t01=0x00a8}
0x1058…1068 Head {h00=0x000c, h01=0x0050, text=» PBIN WX«, t00=0x000a, t01=0x00bc}
0x1068…1082 Head {h00=0x0016, h01=0x0050, text=» MOVE STRG10A,IND «, t00=0x000a, t01=0x00cc}
0x1082…10a6 Head {h00=0x0020, h01=0x0050, text=» COPY STRG10A,W1,W6,STRG,W0 «, t00=0x000a, t01=0x00e6}
0x10a6…10d4 Head {h00=0x002a, h01=0x0050, text=» PERF DEPOOL,WX,DEBIN3,DEBIN4,STRG10A «, t00=0x000a, t01=0x010a}
0x10d4…10e0 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x000a, t01=0x0138}
0x10e0…10ee Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x000a, t01=0x0144}
0x10ee…10fa Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x000a, t01=0x0152}
0x10fa…10fe Head {h00=0x4004, h01=0x0000}
0x10fe…1102 00 0a 01 5e ┆ ^┆
0x1102…110a (11, 1, 8) 20 04 00 00 00 0b 00 04 ┆ ┆
0x110a…115a (12, 0, 400) 10 3f 0f 00 d8 d7 00 50 d8 10 50 20 0c 12 50 28 10 80 03 00 51 50 6a 42 26 21 50 21 30 06 10 50 30 12 10 43 48 16 28 16 20 18 30 02 01 22 22 30 0e 02 21 21 21 5a 44 08 21 5a 45 04 28 48 49 04 3f 10 3f 11 3f 12 00 8a d7 28 8a 45 02 3f 0f 00 ┆ ? P P P( QPjB&!P!0 P0 CH ( 0 ""0 !!!ZD !ZE (HI ? ? ? ( E ? ┆
0x115a…11aa d8 8a 00 50 d8 14 50 22 58 12 50 28 5c 80 03 00 52 50 6a 42 27 21 50 21 30 06 10 50 30 12 10 43 48 16 18 16 20 34 30 02 01 24 24 30 0e 02 22 22 5f 4e 00 57 d7 00 c0 57 24 c0 24 13 01 c1 3d 02 c0 21 0a c1 c0 00 58 c1 30 0e 03 22 23 3f 10 3f ┆ P P"X P( RPjB'!P!0 P0 CH 40 $$0 ""_N W W$ $ = ! X 0 "#? ?┆
0x11aa…11fa 0f 00 58 d7 00 c0 58 10 c0 20 0c 3f 10 00 5e 22 d7 00 82 5e 22 32 82 09 10 10 10 10 0f 0f 0f 10 10 3f 0f 06 d3 26 38 10 02 d3 21 01 8a 14 62 d7 d3 21 8a 20 5f 13 22 50 24 05 04 50 21 57 03 02 50 23 03 50 3c 34 00 80 04 21 34 00 80 04 22 34 ┆ X X ? ^" ^"2 ? &8 ! b ! _ "P$ P!W P# P<4 !4 "4┆
0x11fa…124a 00 80 04 23 34 00 80 04 24 34 00 80 04 20 34 00 00 d4 00 06 d4 20 38 13 49 d0 1c 36 d4 04 00 07 2f 0e 30 02 02 21 20 57 28 30 02 05 21 20 57 21 30 0e 03 21 20 57 1a 40 d0 36 d4 04 00 07 0c 0c 30 02 03 21 20 57 05 30 02 06 21 20 30 0e 00 21 ┆ #4 $4 4 8 I 6 / 0 ! W(0 ! W!0 ! W @ 6 0 ! W 0 ! 0 !┆
0x124a…129a 20 30 13 d6 52 f0 30 14 00 d6 d5 50 07 52 e7 00 d6 d5 5f 0e 30 15 48 d2 3b 00 d3 20 00 d5 21 30 0d 91 d7 16 d5 d4 50 10 30 16 11 d5 30 17 d5 39 5c 19 31 0c 92 1e 5f 1f 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 08 ┆ 0 R 0 P R _ 0 H ; !0 P 0 0 9 1 _ ┆