|
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: 4146 (0x1032)
Notes: pts_type(SC)
Names: »GRBUF.SC«
└─⟦c47f25c27⟧ Bits:30009688 Philips computer tape "600318"
└─⟦this⟧ »M:KMDV/GRBUF.SC«
└─⟦efe3a1cfc⟧ Bits:30009667 Philips computer tape "600113"
└─⟦this⟧ »TOSSWORK/GRBUF.SC«
└─⟦fcfed1ed9⟧ Bits:30009706 Philips computer tape "M_167"
└─⟦this⟧ »M:167D/GRBUF.SC«
IDENT GRBUF REL 8.2 78-09-15 870105040820 * ******************************************************* * * PHILIPS TERMINAL SYSTEM PTS * * GRBUF = LKM-PROCESSOR FOR GET AND RELEASE * * * * * * ******************************************************* * * THIS MODULE CONTAINS LKM-PROCESSORS FOR GET AND * RELEASE BUFFER. * * GET BUFFER : * NUMBER OF REQUIRED BUFFERS ARE GIVEN * IN A7. BUFFER ADDRESS IS RETURNED IN A8. * * RELEASE BUFFER: * BUFFER ADDRESS IS GIVEN IN A8. * EJECT * *********** * ENTRIES * *********** * * ENTRY GETBUF GET BUFFER ENTRY RELBUF RELEASE BUFFER * * ************* * EXTERNALS * ************* * * EXTRN TTB:SA TERMINAL SAVE AREA EXTRN TDISP DISPATCHER EXTRN LKMQDI QUEUE AND DISPATCH EXTRN QTJOB QUEUE AS TERMINAL JOB EXTRN GBQUE POINTER TO FIRST TTAB IN BUFFER QUEUE * * EJECT * * GETBUF EQU * LDKL A1,GBQUE POINTER TO FIRST IN QUEUE GET001 LDR* A2,A1 GET TTAB-ADDRESS RF(Z) GET005 NO IN QUEUE LD A3,TTB:SA,A2 CW A4,-2,A3 RF(E) GET030 SAME POOL LDR A1,A2 RB GET001 CHECK NEXT IN QUEUE * GET005 CF A15,GET TRY TO ALLOCATE BUFFERS LDR A4,A4 RF(NZ) REL060 BUFFER HAS BEEN ALLOCATED * * GET030 LDKL A1,GBQUE QUEUE REQUEST GET040 LDR A2,A1 LDR* A1,A1 RB(NZ) GET040 NOT LAST IN CHAIN STR A5,A2 CMR A5 GET050 ABL TDISP DISPATCH EJECT * * * RELBUF EQU * SUKL A8,2 BUFFER ADDRESS LD A1,2,A4 BUFFER UNIT ADK A1,2 ADD ONE WORD FOR CHAIN LDR* A2,A8 XRK A2,1 REL010 LDR A3,A8 ADR A3,A1 STR A3,A8 UPDATE CHAIN LDR A8,A3 CWR A3,A2 RB(NE) REL010 UPDATE NEXT CHAIN * LDR A3,A5 SAVE TTAB-ADDRESS LDKL A5,GBQUE REL020 LDR A2,A5 ADDRESS TO PREVIOUS BUFFER REL030 LDR* A5,A2 BUFFER ADDRESS RF(Z) REL050 END OF QUEUE LDR* A6,A5 ADDRESS TO NEXT BUFFER LD A1,TTB:SA,A5 GET DISPATCH ADDRESS CW A4,-2,A1 RB(NE) REL020 NOT SAME POOL STR A2,A15 STR A4,A15 STR A6,A15 LD A7,TTB:SA+14,A5 * * EJECT * * * CF A15,GET TRY TO ALLOCATE BUFFERS LDR A1,A4 LDR* A6,A15 LDR* A4,A15 LDR* A2,A15 LDR A1,A1 RF(Z) REL050 BUFFER NOT ALLOCATED CMR A5 TAKE OUT OF QUEUE STR A6,A2 UPDATE CHAIN CF A15,QTJOB QUEUE FOR DISPATCHING RB REL030 GET BUFFER TO NEXT IN QUEUE * REL050 LDR A5,A3 GET TTAB-ADDRESS REL060 ABL LKMQDI QUEUE AND DISPATCH EJECT * * * SUBROUTINE TO ALLOCATE BUFFERS TO REQUESTING PROGRAM * * GET LDK A6,1 LDR* A4,A4 ADDRESS TO BUFFER-POOL GET010 LDR A8,A4 BUFFER ADDRESS LDR A2,A7 GET020 LDR A1,A4 LDR* A4,A1 BUFFER POINTER RF(Z) GET025 NO BUFFER FOUND TM A4,A6 RB(NZ) GET010 BUFFER NOT FREE SUK A2,1 RB(NZ) GET020 ANKL A8,/FFFE * * ORK A4,1 FREE BUFFER FOUND STR A4,A8 UPDATE BUFFER POINTER ADKL A8,2 ADDRESS TO USER BUFFER ST A8,TTB:SA+16,A5 SAVE IT IN SAVE AREA GET025 RTN A15 * * END
0x0000…0034 (0, 0, 400) Head {h00=0x0030, h01=0x0050, text=» IDENT GRBUF REL 8.2 78-09-15 870105040820«, t00=0x0000, t01=0x0004}
0x0034…003c Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x0038}
0x003c…0046 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0040}
0x0046…0086 Head {h00=0x003c, h01=0x0050, text=»******************************************************* «, t00=0x0000, t01=0x004a}
0x0086…0090 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x008a}
0x0090…00b8 Head {h00=0x0024, h01=0x0050, text=»* PHILIPS TERMINAL SYSTEM PTS «, t00=0x0000, t01=0x0094}
0x00b8…00c2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00bc}
0x00c2…00f8 Head {h00=0x0032, h01=0x0050, text=»* GRBUF = LKM-PROCESSOR FOR GET AND RELEASE «, t00=0x0000, t01=0x00c6}
0x00f8…0102 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00fc}
0x0102…010c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0106}
0x010c…0116 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0110}
0x0116…0120 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x011a}
0x0120…012a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0124}
0x012a…0134 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x012e}
0x0134…0174 Head {h00=0x003c, h01=0x0050, text=»******************************************************* «, t00=0x0000, t01=0x0138}
0x0174…017e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0178}
0x017e…01ba Head {h00=0x0038, h01=0x0050, text=»* THIS MODULE CONTAINS LKM-PROCESSORS FOR GET AND«, t00=0x0000, t01=0x0182}
0x01ba…01d6 Head {h00=0x0018, h01=0x0050, text=»* RELEASE BUFFER.«, t00=0x0001, t01=0x002e}
0x01d6…01e0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x004a}
0x01e0…01fa Head {h00=0x0016, h01=0x0050, text=»* GET BUFFER : «, t00=0x0001, t01=0x0054}
0x01fa…0238 Head {h00=0x003a, h01=0x0050, text=»* NUMBER OF REQUIRED BUFFERS ARE GIVEN «, t00=0x0001, t01=0x006e}
0x0238…027a Head {h00=0x003e, h01=0x0050, text=»* IN A7. BUFFER ADDRESS IS RETURNED IN A8. «, t00=0x0001, t01=0x00ac}
0x027a…0284 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00ee}
0x0284…02a0 Head {h00=0x0018, h01=0x0050, text=»* RELEASE BUFFER:«, t00=0x0001, t01=0x00f8}
0x02a0…02d8 Head {h00=0x0034, h01=0x0050, text=»* BUFFER ADDRESS IS GIVEN IN A8. «, t00=0x0001, t01=0x0114}
0x02d8…02e2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x014c}
0x02e2…02f0 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0001, t01=0x0156}
0x02f0…02fa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0164}
0x02fa…030e Head {h00=0x0010, h01=0x0050, text=»*********** «, t00=0x0001, t01=0x016e}
0x030e…0322 Head {h00=0x0010, h01=0x0050, text=»* ENTRIES * «, t00=0x0001, t01=0x0182}
0x0322…0336 Head {h00=0x0010, h01=0x0050, text=»*********** «, t00=0x0002, t01=0x0008}
0x0336…0340 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x001c}
0x0340…034a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0026}
0x034a…036a Head {h00=0x001c, h01=0x0050, text=» ENTRY GETBUF GET BUFFER«, t00=0x0002, t01=0x0030}
0x036a…038e Head {h00=0x0020, h01=0x0050, text=» ENTRY RELBUF RELEASE BUFFER«, t00=0x0002, t01=0x0050}
0x038e…0398 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0074}
0x0398…03a2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x007e}
0x03a2…03b8 Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0002, t01=0x0088}
0x03b8…03ce Head {h00=0x0012, h01=0x0050, text=»* EXTERNALS * «, t00=0x0002, t01=0x009e}
0x03ce…03e4 Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0002, t01=0x00b4}
0x03e4…03ee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00ca}
0x03ee…03f8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00d4}
0x03f8…0420 Head {h00=0x0024, h01=0x0050, text=» EXTRN TTB:SA TERMINAL SAVE AREA«, t00=0x0002, t01=0x00de}
0x0420…0440 Head {h00=0x001c, h01=0x0050, text=» EXTRN TDISP DISPATCHER «, t00=0x0002, t01=0x0106}
0x0440…0468 Head {h00=0x0024, h01=0x0050, text=» EXTRN LKMQDI QUEUE AND DISPATCH«, t00=0x0002, t01=0x0126}
0x0468…0492 Head {h00=0x0026, h01=0x0050, text=» EXTRN QTJOB QUEUE AS TERMINAL JOB«, t00=0x0002, t01=0x014e}
0x0492…04cc Head {h00=0x0036, h01=0x0050, text=» EXTRN GBQUE POINTER TO FIRST TTAB IN BUFFER QUEUE«, t00=0x0002, t01=0x0178}
0x04cc…04d6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0022}
0x04d6…04e0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x002c}
0x04e0…04ee Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0003, t01=0x0036}
0x04ee…04f8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0044}
0x04f8…0502 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x004e}
0x0502…0516 Head {h00=0x0010, h01=0x0050, text=»GETBUF EQU *«, t00=0x0003, t01=0x0058}
0x0516…0546 Head {h00=0x002c, h01=0x0050, text=» LDKL A1,GBQUE POINTER TO FIRST IN QUEUE«, t00=0x0003, t01=0x006c}
0x0546…0570 Head {h00=0x0026, h01=0x0050, text=»GET001 LDR* A2,A1 GET TTAB-ADDRESS«, t00=0x0003, t01=0x009c}
0x0570…0592 Head {h00=0x001e, h01=0x0050, text=» RF(Z) GET005 NO IN QUEUE «, t00=0x0003, t01=0x00c6}
0x0592…05aa Head {h00=0x0014, h01=0x0050, text=» LD A3,TTB:SA,A2«, t00=0x0003, t01=0x00e8}
0x05aa…05c0 Head {h00=0x0012, h01=0x0050, text=» CW A4,-2,A3 «, t00=0x0003, t01=0x0100}
0x05c0…05e0 Head {h00=0x001c, h01=0x0050, text=» RF(E) GET030 SAME POOL «, t00=0x0003, t01=0x0116}
0x05e0…05f2 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x0003, t01=0x0136}
0x05f2…0618 Head {h00=0x0022, h01=0x0050, text=» RB GET001 CHECK NEXT IN QUEUE«, t00=0x0003, t01=0x0148}
0x0618…0622 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x016e}
0x0622…0654 Head {h00=0x002e, h01=0x0050, text=»GET005 CF A15,GET TRY TO ALLOCATE BUFFERS «, t00=0x0003, t01=0x0178}
0x0654…0668 Head {h00=0x0010, h01=0x0050, text=» LDR A4,A4 «, t00=0x0004, t01=0x001a}
0x0668…0698 Head {h00=0x002c, h01=0x0050, text=» RF(NZ) REL060 BUFFER HAS BEEN ALLOCATED«, t00=0x0004, t01=0x002e}
0x0698…06a2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x005e}
0x06a2…06ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0068}
0x06ac…06d6 Head {h00=0x0026, h01=0x0050, text=»GET030 LDKL A1,GBQUE QUEUE REQUEST«, t00=0x0004, t01=0x0072}
0x06d6…06ee Head {h00=0x0014, h01=0x0050, text=»GET040 LDR A2,A1«, t00=0x0004, t01=0x009c}
0x06ee…0702 Head {h00=0x0010, h01=0x0050, text=» LDR* A1,A1 «, t00=0x0004, t01=0x00b4}
0x0702…072a Head {h00=0x0024, h01=0x0050, text=» RB(NZ) GET040 NOT LAST IN CHAIN«, t00=0x0004, t01=0x00c8}
0x072a…073c Head {h00=0x000e, h01=0x0050, text=» STR A5,A2«, t00=0x0004, t01=0x00f0}
0x073c…074c Head {h00=0x000c, h01=0x0050, text=» CMR A5 «, t00=0x0004, t01=0x0102}
0x074c…076e Head {h00=0x001e, h01=0x0050, text=»GET050 ABL TDISP DISPATCH «, t00=0x0004, t01=0x0112}
0x076e…077c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0004, t01=0x0134}
0x077c…0786 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0142}
0x0786…0790 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x014c}
0x0790…079a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0156}
0x079a…07ae Head {h00=0x0010, h01=0x0050, text=»RELBUF EQU *«, t00=0x0004, t01=0x0160}
0x07ae…07d0 Head {h00=0x001e, h01=0x0050, text=» SUKL A8,2 BUFFER ADDRESS «, t00=0x0004, t01=0x0174}
0x07d0…07f0 Head {h00=0x001c, h01=0x0050, text=» LD A1,2,A4 BUFFER UNIT «, t00=0x0005, t01=0x0008}
0x07f0…0818 Head {h00=0x0024, h01=0x0050, text=» ADK A1,2 ADD ONE WORD FOR CHAIN«, t00=0x0005, t01=0x0028}
0x0818…082c Head {h00=0x0010, h01=0x0050, text=» LDR* A2,A8 «, t00=0x0005, t01=0x0050}
0x082c…083e Head {h00=0x000e, h01=0x0050, text=» XRK A2,1 «, t00=0x0005, t01=0x0064}
0x083e…0856 Head {h00=0x0014, h01=0x0050, text=»REL010 LDR A3,A8«, t00=0x0005, t01=0x0076}
0x0856…0868 Head {h00=0x000e, h01=0x0050, text=» ADR A3,A1«, t00=0x0005, t01=0x008e}
0x0868…0888 Head {h00=0x001c, h01=0x0050, text=» STR A3,A8 UPDATE CHAIN «, t00=0x0005, t01=0x00a0}
0x0888…089a Head {h00=0x000e, h01=0x0050, text=» LDR A8,A3«, t00=0x0005, t01=0x00c0}
0x089a…08ae Head {h00=0x0010, h01=0x0050, text=» CWR A3,A2 «, t00=0x0005, t01=0x00d2}
0x08ae…08d6 Head {h00=0x0024, h01=0x0050, text=» RB(NE) REL010 UPDATE NEXT CHAIN«, t00=0x0005, t01=0x00e6}
0x08d6…08e0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x010e}
0x08e0…0904 Head {h00=0x0020, h01=0x0050, text=» LDR A3,A5 SAVE TTAB-ADDRESS«, t00=0x0005, t01=0x0118}
0x0904…091c Head {h00=0x0014, h01=0x0050, text=» LDKL A5,GBQUE «, t00=0x0005, t01=0x013c}
0x091c…0950 Head {h00=0x0030, h01=0x0050, text=»REL020 LDR A2,A5 ADDRESS TO PREVIOUS BUFFER «, t00=0x0005, t01=0x0154}
0x0950…0978 Head {h00=0x0024, h01=0x0050, text=»REL030 LDR* A5,A2 BUFFER ADDRESS«, t00=0x0005, t01=0x0188}
0x0978…099a Head {h00=0x001e, h01=0x0050, text=» RF(Z) REL050 END OF QUEUE«, t00=0x0006, t01=0x0020}
0x099a…09c4 Head {h00=0x0026, h01=0x0050, text=» LDR* A6,A5 ADDRESS TO NEXT BUFFER«, t00=0x0006, t01=0x0042}
0x09c4…09f2 Head {h00=0x002a, h01=0x0050, text=» LD A1,TTB:SA,A5 GET DISPATCH ADDRESS «, t00=0x0006, t01=0x006c}
0x09f2…0a06 Head {h00=0x0010, h01=0x0050, text=» CW A4,-2,A1«, t00=0x0006, t01=0x009a}
0x0a06…0a2a Head {h00=0x0020, h01=0x0050, text=» RB(NE) REL020 NOT SAME POOL«, t00=0x0006, t01=0x00ae}
0x0a2a…0a3e Head {h00=0x0010, h01=0x0050, text=» STR A2,A15 «, t00=0x0006, t01=0x00d2}
0x0a3e…0a52 Head {h00=0x0010, h01=0x0050, text=» STR A4,A15 «, t00=0x0006, t01=0x00e6}
0x0a52…0a66 Head {h00=0x0010, h01=0x0050, text=» STR A6,A15 «, t00=0x0006, t01=0x00fa}
0x0a66…0a82 Head {h00=0x0018, h01=0x0050, text=» LD A7,TTB:SA+14,A5 «, t00=0x0006, t01=0x010e}
0x0a82…0a8c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x012a}
0x0a8c…0a96 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0134}
0x0a96…0aa4 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0006, t01=0x013e}
0x0aa4…0aae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x014c}
0x0aae…0ab8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0156}
0x0ab8…0ac2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0160}
0x0ac2…0aee Head {h00=0x0028, h01=0x0050, text=» CF A15,GET TRY TO ALLOCATE BUFFERS «, t00=0x0006, t01=0x016a}
0x0aee…0b02 Head {h00=0x0010, h01=0x0050, text=» LDR A1,A4 «, t00=0x0007, t01=0x0008}
0x0b02…0b16 Head {h00=0x0010, h01=0x0050, text=» LDR* A6,A15«, t00=0x0007, t01=0x001c}
0x0b16…0b2a Head {h00=0x0010, h01=0x0050, text=» LDR* A4,A15«, t00=0x0007, t01=0x0030}
0x0b2a…0b3e Head {h00=0x0010, h01=0x0050, text=» LDR* A2,A15«, t00=0x0007, t01=0x0044}
0x0b3e…0b50 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A1«, t00=0x0007, t01=0x0058}
0x0b50…0b7a Head {h00=0x0026, h01=0x0050, text=» RF(Z) REL050 BUFFER NOT ALLOCATED«, t00=0x0007, t01=0x006a}
0x0b7a…0b9c Head {h00=0x001e, h01=0x0050, text=» CMR A5 TAKE OUT OF QUEUE «, t00=0x0007, t01=0x0094}
0x0b9c…0bbc Head {h00=0x001c, h01=0x0050, text=» STR A6,A2 UPDATE CHAIN «, t00=0x0007, t01=0x00b6}
0x0bbc…0be8 Head {h00=0x0028, h01=0x0050, text=» CF A15,QTJOB QUEUE FOR DISPATCHING «, t00=0x0007, t01=0x00d6}
0x0be8…0c16 Head {h00=0x002a, h01=0x0050, text=» RB REL030 GET BUFFER TO NEXT IN QUEUE«, t00=0x0007, t01=0x0102}
0x0c16…0c20 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0130}
0x0c20…0c4a Head {h00=0x0026, h01=0x0050, text=»REL050 LDR A5,A3 GET TTAB-ADDRESS «, t00=0x0007, t01=0x013a}
0x0c4a…0c76 Head {h00=0x0028, h01=0x0050, text=»REL060 ABL LKMQDI QUEUE AND DISPATCH«, t00=0x0007, t01=0x0164}
0x0c76…0c84 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0007, t01=0x0190}
0x0c84…0c8e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x000e}
0x0c8e…0c98 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0018}
0x0c98…0cd8 Head {h00=0x003c, h01=0x0050, text=»* SUBROUTINE TO ALLOCATE BUFFERS TO REQUESTING PROGRAM«, t00=0x0008, t01=0x0022}
0x0cd8…0ce2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0062}
0x0ce2…0cec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x006c}
0x0cec…0d00 Head {h00=0x0010, h01=0x0050, text=»GET LDK A6,1«, t00=0x0008, t01=0x0076}
0x0d00…0d2a Head {h00=0x0026, h01=0x0050, text=» LDR* A4,A4 ADDRESS TO BUFFER-POOL«, t00=0x0008, t01=0x008a}
0x0d2a…0d52 Head {h00=0x0024, h01=0x0050, text=»GET010 LDR A8,A4 BUFFER ADDRESS «, t00=0x0008, t01=0x00b4}
0x0d52…0d64 Head {h00=0x000e, h01=0x0050, text=» LDR A2,A7«, t00=0x0008, t01=0x00dc}
0x0d64…0d7e Head {h00=0x0016, h01=0x0050, text=»GET020 LDR A1,A4 «, t00=0x0008, t01=0x00ee}
0x0d7e…0da0 Head {h00=0x001e, h01=0x0050, text=» LDR* A4,A1 BUFFER POINTER«, t00=0x0008, t01=0x0108}
0x0da0…0dc6 Head {h00=0x0022, h01=0x0050, text=» RF(Z) GET025 NO BUFFER FOUND «, t00=0x0008, t01=0x012a}
0x0dc6…0dd8 Head {h00=0x000e, h01=0x0050, text=» TM A4,A6 «, t00=0x0008, t01=0x0150}
0x0dd8…0dfe Head {h00=0x0022, h01=0x0050, text=» RB(NZ) GET010 BUFFER NOT FREE«, t00=0x0008, t01=0x0162}
0x0dfe…0e10 Head {h00=0x000e, h01=0x0050, text=» SUK A2,1 «, t00=0x0008, t01=0x0188}
0x0e10…0e26 Head {h00=0x0012, h01=0x0050, text=» RB(NZ) GET020«, t00=0x0009, t01=0x000a}
0x0e26…0e3c Head {h00=0x0012, h01=0x0050, text=» ANKL A8,/FFFE«, t00=0x0009, t01=0x0020}
0x0e3c…0e46 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0036}
0x0e46…0e50 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0040}
0x0e50…0e74 Head {h00=0x0020, h01=0x0050, text=» ORK A4,1 FREE BUFFER FOUND «, t00=0x0009, t01=0x004a}
0x0e74…0e9c Head {h00=0x0024, h01=0x0050, text=» STR A4,A8 UPDATE BUFFER POINTER«, t00=0x0009, t01=0x006e}
0x0e9c…0ec6 Head {h00=0x0026, h01=0x0050, text=» ADKL A8,2 ADDRESS TO USER BUFFER «, t00=0x0009, t01=0x0096}
0x0ec6…0ef6 Head {h00=0x002c, h01=0x0050, text=» ST A8,TTB:SA+16,A5 SAVE IT IN SAVE AREA«, t00=0x0009, t01=0x00c0}
0x0ef6…0f0c Head {h00=0x0012, h01=0x0050, text=»GET025 RTN A15«, t00=0x0009, t01=0x00f0}
0x0f0c…0f16 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0106}
0x0f16…0f20 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0110}
0x0f20…0f2c Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x0009, t01=0x011a}
0x0f2c…0f30 Head {h00=0x4004, h01=0x0000}
0x0f30…0f34 00 09 01 26 ┆ &┆
0x0f34…0f3c (10, 1, 8) 20 04 00 00 00 0a 00 04 ┆ ┆
0x0f3c…0f56 (11, 2, 26) 00 0e 00 0a 07 04 00 00 00 00 01 ca 00 00 00 03 00 04 40 04 00 00 00 03 00 16 ┆ @ ┆
0x0f56…0fa6 (12, 2, 220) 00 4a 00 46 20 20 20 20 20 20 20 20 20 49 44 45 4e 54 20 44 56 54 4d 53 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 52 45 4c 20 38 2e 31 20 37 38 2d 30 34 2d 32 31 20 20 38 37 30 31 30 35 30 34 30 38 31 30 00 00 00 04 00 0c ┆ J F IDENT DVTMS REL 8.1 78-04-21 870105040810 ┆
0x0fa6…0ff6 00 08 01 03 a4 44 56 54 4d 53 00 00 00 52 00 0e 00 0a 05 04 bc 44 56 54 4d 53 00 00 00 00 00 62 00 0c 00 08 02 03 82 4d 53 41 44 4e 00 00 00 74 00 26 00 22 03 10 00 00 00 01 08 00 b1 00 80 00 00 00 00 00 00 00 00 02 00 00 00 00 00 00 00 00 ┆ DVTMS R DVTMS b MSADN t & " ┆
0x0ff6…1032 00 00 00 00 00 00 00 00 00 84 00 14 00 10 03 07 00 00 00 21 00 00 00 00 00 00 00 00 00 00 00 00 00 ae 00 0e 00 0a 07 04 00 00 00 00 00 28 00 00 00 00 00 c6 40 04 00 00 00 00 00 d8 ┆ ! ( @ ┆