|
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: 4710 (0x1266)
Notes: pts_type(SC)
Names: »MONTIM.SC«
└─⟦18bf30ff4⟧ Bits:30009692 Philips computer tape "600409"
└─⟦this⟧ »BDKMON/MONTIM.SC«
└─⟦71472ef1e⟧ Bits:30009661 Philips computer tape "600103"
└─⟦this⟧ »BDKMON/MONTIM.SC«
IDENT MONTIM MIDNIGTH CARRY UPDATE #1 78.01.20 JES UPDATE #0 77-09-09 * ******************************************************* * * PHILIPS TERMINAL SYSTEM PTS * * MONTIM = MONITOR CLOCK PROCESSORS * * * LEVEL #2 77-09-09 * * RELEASE #7 77-09-09 * ******************************************************* * * * THIS MODULE CONTAINS MONITOR CLOCK PROCESSORS * * * -GETTIM GET CURRENT VALUE OF MONITOR CLOCK * -SETTIM SET MONITOR CLOCK EJECT * * * ******************************** * ENTRIES * ******************************** * ENTRY GETTIM GET CURRENT VALUE OF MONITOR CLOCK ENTRY SETTIM SET MONITOR CLOCK * ******************************** * EXTERNALS * ******************************** * EXTRN MONCLO MONITOR CLOCK EXTRN TDISP DISPATCHER EXTRN RTNA15 RETURN AND ENABLE EXTRN LKMQDI QUEUE TERMINAL JOB AND DISPATCH EXTRN TTB:SA TASK TABLE SAVE AREA EJECT * * * G E T T I M * * THIS IS THE GET TIME LKM PROCESSOR * * IT IS ENTERED FROM THE LKM HANDLER * WITH ADDRESS TO THE USER TIMER CONTROL * BLOCK IN A8. MONITOR CLOCK IS COPIED INTO * TIMER CONTROL BLOCK * GETTIM EQU * LDKL A7,MONCLO+6 ADDRESS TO MONITOR CLOCK SECOND LDK A3,6 COUNTER INH LDR* A6,A7 SECONDS STR A6,A15 SAVE ON STACK SUK A7,2 LDR* A6,A7 MINUTES STR A6,A15 SAVE ON STACK SUK A7,2 LDR* A6,A7 HOURS GETT10 CF A15,BYTASC CONVERT TO ASCII SC A6,1,A8 STORE RIGHT-HAND CHARACTER IN TIMER CONTROL BLOCK SRL A6,8 GET LEFT-HAND CHARACTER SCR A6,A8 AND STORE IT IN TIMER CONTROL BLOCK SUK A3,2 RF(E) GETT20 ADKL A8,2 LDR* A6,A15 GET ACTUAL TIME FROM STACK RB GETT10 EJECT GETT20 SUK A7,2 LDR* A6,A7 GET ACCUMULATED 24 HOUR CARRY ST A6,TTB:SA+14,A5 STORE IN SAVE AREA FOR A7 CMR A7 CLEAR CARRY TPDIS ABL LKMQDI EJECT * * * S E T T I M * * THIS IS THE SET TIME LKM PROCESSOR * * IT IS ENTERED FROM THE LKM HANDLER WITH * ADDRESS TO THE USER TIMER CONTROL BLOCK * IN A8. VALUE IN TIMER CONTROL BLOCK IS * COPIED INTO MONITOR CLOCK * SETTIM EQU * LDKL A7,MONCLO+6 ADDRESS TO MONITOR CLOCK SECOND LDK A3,6 COUNTER SETT10 LCR A6,A8 GET LEFT-HAND CHARACTER OF TIME FROM TIMER CONTROL BLOCK SLL A6,8 MAKE ROOM FOR THE RIGHT-HAND PART LC A6,1,A8 AND STORE IT IN TIMER CONTROL BLOCK CF A15,ASCTBY CONVERT TO BINARY SUK A3,2 END ? RF(E) SETT20 ADKL A8,2 STR A6,A15 SAVE ON STACK (HOURS AND MINUTES RB SETT10 SETT20 EQU * INH STR A6,A7 SECONDS TO MONITOR CLOCK SUK A7,2 LDR* A6,A15 STR A6,A7 MINUTES TO MONITOR CLOCK SUK A7,2 LDR* A6,A15 STR A6,A7 HOURS TO MONITOR CLOCK SUK A7,2 CMR A7 CLEAR 24 HOUR CARRY RB TPDIS EJECT * * * BYTASC = SUBROUTINE TO CONVERT A6-CONTENT * FROM BINARY TO ASCII. * RESULT IN A6. * BYTASC EQU * LDK A4,0 BYTA10 SUK A6,/A RF(N) BYTA20 ADKL A4,/100 RB BYTA10 BYTA20 ADK A6,/A ADR A6,A4 ORKL A6,/3030 RF ASCT20 * * * ASCTBY = SUBROUTINE TO CONVERT A6-CONTENT * FROM ASCII TO BINARY. * RESULT IN A6. * ASCTBY EQU * LDR A4,A6 ANK A6,/F SRL A4,8 ANK A4,/F RF(E) ASCT20 ASCT10 ADK A6,/A SUK A4,1 RB(NE) ASCT10 ASCT20 ABL RTNA15 END
0x0000…0024 (0, 0, 400) Head {h00=0x0020, h01=0x0050, text=» IDENT MONTIM MIDNIGTH CARRY«, t00=0x0000, t01=0x0004}
0x0024…0046 Head {h00=0x001e, h01=0x0050, text=» UPDATE #1 78.01.20 JES «, t00=0x0000, t01=0x0028}
0x0046…0068 Head {h00=0x001e, h01=0x0050, text=» UPDATE #0 77-09-09 «, t00=0x0000, t01=0x004a}
0x0068…0072 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x006c}
0x0072…00b2 Head {h00=0x003c, h01=0x0050, text=»******************************************************* «, t00=0x0000, t01=0x0076}
0x00b2…00bc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00b6}
0x00bc…00e4 Head {h00=0x0024, h01=0x0050, text=»* PHILIPS TERMINAL SYSTEM PTS «, t00=0x0000, t01=0x00c0}
0x00e4…00ee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00e8}
0x00ee…011c Head {h00=0x002a, h01=0x0050, text=»* MONTIM = MONITOR CLOCK PROCESSORS «, t00=0x0000, t01=0x00f2}
0x011c…0126 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0120}
0x0126…0130 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x012a}
0x0130…0152 Head {h00=0x001e, h01=0x0050, text=»* LEVEL #2 77-09-09«, t00=0x0000, t01=0x0134}
0x0152…015c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0156}
0x015c…017e Head {h00=0x001e, h01=0x0050, text=»* RELEASE #7 77-09-09«, t00=0x0000, t01=0x0160}
0x017e…0188 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0182}
0x0188…01c8 Head {h00=0x003c, h01=0x0050, text=»******************************************************* «, t00=0x0000, t01=0x018c}
0x01c8…01d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x003c}
0x01d2…01dc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0046}
0x01dc…0216 Head {h00=0x0036, h01=0x0050, text=»* THIS MODULE CONTAINS MONITOR CLOCK PROCESSORS«, t00=0x0001, t01=0x0050}
0x0216…0220 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x008a}
0x0220…022a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0094}
0x022a…0264 Head {h00=0x0036, h01=0x0050, text=»* -GETTIM GET CURRENT VALUE OF MONITOR CLOCK«, t00=0x0001, t01=0x009e}
0x0264…028e Head {h00=0x0026, h01=0x0050, text=»* -SETTIM SET MONITOR CLOCK «, t00=0x0001, t01=0x00d8}
0x028e…029c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0001, t01=0x0102}
0x029c…02a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0110}
0x02a6…02b0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x011a}
0x02b0…02ba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0124}
0x02ba…02e2 Head {h00=0x0024, h01=0x0050, text=»********************************«, t00=0x0001, t01=0x012e}
0x02e2…030a Head {h00=0x0024, h01=0x0050, text=»* ENTRIES *«, t00=0x0001, t01=0x0156}
0x030a…0332 Head {h00=0x0024, h01=0x0050, text=»********************************«, t00=0x0001, t01=0x017e}
0x0332…033c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0016}
0x033c…0374 Head {h00=0x0034, h01=0x0050, text=» ENTRY GETTIM GET CURRENT VALUE OF MONITOR CLOCK«, t00=0x0002, t01=0x0020}
0x0374…039c Head {h00=0x0024, h01=0x0050, text=» ENTRY SETTIM SET MONITOR CLOCK «, t00=0x0002, t01=0x0058}
0x039c…03a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0080}
0x03a6…03ce Head {h00=0x0024, h01=0x0050, text=»********************************«, t00=0x0002, t01=0x008a}
0x03ce…03f6 Head {h00=0x0024, h01=0x0050, text=»* EXTERNALS *«, t00=0x0002, t01=0x00b2}
0x03f6…041e Head {h00=0x0024, h01=0x0050, text=»********************************«, t00=0x0002, t01=0x00da}
0x041e…0428 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0102}
0x0428…044c Head {h00=0x0020, h01=0x0050, text=» EXTRN MONCLO MONITOR CLOCK «, t00=0x0002, t01=0x010c}
0x044c…046c Head {h00=0x001c, h01=0x0050, text=» EXTRN TDISP DISPATCHER «, t00=0x0002, t01=0x0130}
0x046c…0494 Head {h00=0x0024, h01=0x0050, text=» EXTRN RTNA15 RETURN AND ENABLE «, t00=0x0002, t01=0x0150}
0x0494…04ca Head {h00=0x0032, h01=0x0050, text=» EXTRN LKMQDI QUEUE TERMINAL JOB AND DISPATCH «, t00=0x0002, t01=0x0178}
0x04ca…04f4 Head {h00=0x0026, h01=0x0050, text=» EXTRN TTB:SA TASK TABLE SAVE AREA«, t00=0x0003, t01=0x001e}
0x04f4…0502 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0003, t01=0x0048}
0x0502…050c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0056}
0x050c…0516 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0060}
0x0516…052e Head {h00=0x0014, h01=0x0050, text=»* G E T T I M«, t00=0x0003, t01=0x006a}
0x052e…0538 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0082}
0x0538…0568 Head {h00=0x002c, h01=0x0050, text=»* THIS IS THE GET TIME LKM PROCESSOR «, t00=0x0003, t01=0x008c}
0x0568…0572 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00bc}
0x0572…05a2 Head {h00=0x002c, h01=0x0050, text=»* IT IS ENTERED FROM THE LKM HANDLER «, t00=0x0003, t01=0x00c6}
0x05a2…05d6 Head {h00=0x0030, h01=0x0050, text=»* WITH ADDRESS TO THE USER TIMER CONTROL «, t00=0x0003, t01=0x00f6}
0x05d6…060c Head {h00=0x0032, h01=0x0050, text=»* BLOCK IN A8. MONITOR CLOCK IS COPIED INTO«, t00=0x0003, t01=0x012a}
0x060c…062c Head {h00=0x001c, h01=0x0050, text=»* TIMER CONTROL BLOCK«, t00=0x0003, t01=0x0160}
0x062c…0636 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0180}
0x0636…064a Head {h00=0x0010, h01=0x0050, text=»GETTIM EQU *«, t00=0x0003, t01=0x018a}
0x064a…0684 Head {h00=0x0036, h01=0x0050, text=» LDKL A7,MONCLO+6 ADDRESS TO MONITOR CLOCK SECOND «, t00=0x0004, t01=0x000e}
0x0684…069e Head {h00=0x0016, h01=0x0050, text=» LDK A3,6 COUNTER «, t00=0x0004, t01=0x0048}
0x069e…06aa Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x0004, t01=0x0062}
0x06aa…06c6 Head {h00=0x0018, h01=0x0050, text=» LDR* A6,A7 SECONDS «, t00=0x0004, t01=0x006e}
0x06c6…06e8 Head {h00=0x001e, h01=0x0050, text=» STR A6,A15 SAVE ON STACK «, t00=0x0004, t01=0x008a}
0x06e8…06fa Head {h00=0x000e, h01=0x0050, text=» SUK A7,2 «, t00=0x0004, t01=0x00ac}
0x06fa…0716 Head {h00=0x0018, h01=0x0050, text=» LDR* A6,A7 MINUTES «, t00=0x0004, t01=0x00be}
0x0716…0738 Head {h00=0x001e, h01=0x0050, text=» STR A6,A15 SAVE ON STACK «, t00=0x0004, t01=0x00da}
0x0738…074a Head {h00=0x000e, h01=0x0050, text=» SUK A7,2 «, t00=0x0004, t01=0x00fc}
0x074a…0764 Head {h00=0x0016, h01=0x0050, text=» LDR* A6,A7 HOURS «, t00=0x0004, t01=0x010e}
0x0764…0792 Head {h00=0x002a, h01=0x0050, text=»GETT10 CF A15,BYTASC CONVERT TO ASCII «, t00=0x0004, t01=0x0128}
0x0792…07d8 Head {h00=0x0042, h01=0x0050, text=» SC A6,1,A8 STORE RIGHT-HAND CHARACTER IN TIMER CONTROL BLOCK «, t00=0x0004, t01=0x0156}
0x07d8…0802 Head {h00=0x0026, h01=0x0050, text=» SRL A6,8 GET LEFT-HAND CHARACTER «, t00=0x0005, t01=0x000c}
0x0802…0838 Head {h00=0x0032, h01=0x0050, text=» SCR A6,A8 AND STORE IT IN TIMER CONTROL BLOCK«, t00=0x0005, t01=0x0036}
0x0838…084a Head {h00=0x000e, h01=0x0050, text=» SUK A3,2 «, t00=0x0005, t01=0x006c}
0x084a…0860 Head {h00=0x0012, h01=0x0050, text=» RF(E) GETT20 «, t00=0x0005, t01=0x007e}
0x0860…0872 Head {h00=0x000e, h01=0x0050, text=» ADKL A8,2«, t00=0x0005, t01=0x0094}
0x0872…08a2 Head {h00=0x002c, h01=0x0050, text=» LDR* A6,A15 GET ACTUAL TIME FROM STACK «, t00=0x0005, t01=0x00a6}
0x08a2…08b4 Head {h00=0x000e, h01=0x0050, text=» RB GETT10«, t00=0x0005, t01=0x00d6}
0x08b4…08c2 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0005, t01=0x00e8}
0x08c2…08da Head {h00=0x0014, h01=0x0050, text=»GETT20 SUK A7,2 «, t00=0x0005, t01=0x00f6}
0x08da…090c Head {h00=0x002e, h01=0x0050, text=» LDR* A6,A7 GET ACCUMULATED 24 HOUR CARRY «, t00=0x0005, t01=0x010e}
0x090c…0942 Head {h00=0x0032, h01=0x0050, text=» ST A6,TTB:SA+14,A5 STORE IN SAVE AREA FOR A7 «, t00=0x0005, t01=0x0140}
0x0942…095e Head {h00=0x0018, h01=0x0050, text=» CMR A7 CLEAR CARRY «, t00=0x0005, t01=0x0176}
0x095e…0976 (6, 0, 400) Head {h00=0x0014, h01=0x0050, text=»TPDIS ABL LKMQDI«, t00=0x0006, t01=0x0004}
0x0976…0984 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0006, t01=0x001c}
0x0984…098e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x002a}
0x098e…0998 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0034}
0x0998…09b0 Head {h00=0x0014, h01=0x0050, text=»* S E T T I M«, t00=0x0006, t01=0x003e}
0x09b0…09ba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0056}
0x09ba…09ea Head {h00=0x002c, h01=0x0050, text=»* THIS IS THE SET TIME LKM PROCESSOR «, t00=0x0006, t01=0x0060}
0x09ea…09f4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0090}
0x09f4…0a28 Head {h00=0x0030, h01=0x0050, text=»* IT IS ENTERED FROM THE LKM HANDLER WITH«, t00=0x0006, t01=0x009a}
0x0a28…0a5c Head {h00=0x0030, h01=0x0050, text=»* ADDRESS TO THE USER TIMER CONTROL BLOCK«, t00=0x0006, t01=0x00ce}
0x0a5c…0a90 Head {h00=0x0030, h01=0x0050, text=»* IN A8. VALUE IN TIMER CONTROL BLOCK IS «, t00=0x0006, t01=0x0102}
0x0a90…0ab6 Head {h00=0x0022, h01=0x0050, text=»* COPIED INTO MONITOR CLOCK«, t00=0x0006, t01=0x0136}
0x0ab6…0ac0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x015c}
0x0ac0…0ad4 Head {h00=0x0010, h01=0x0050, text=»SETTIM EQU *«, t00=0x0006, t01=0x0166}
0x0ad4…0b0e Head {h00=0x0036, h01=0x0050, text=» LDKL A7,MONCLO+6 ADDRESS TO MONITOR CLOCK SECOND «, t00=0x0006, t01=0x017a}
0x0b0e…0b28 Head {h00=0x0016, h01=0x0050, text=» LDK A3,6 COUNTER «, t00=0x0007, t01=0x0024}
0x0b28…0b7a Head {h00=0x004e, h01=0x0050, text=»SETT10 LCR A6,A8 GET LEFT-HAND CHARACTER OF TIME FROM TIMER CONTROL BLOCK «, t00=0x0007, t01=0x003e}
0x0b7a…0bae Head {h00=0x0030, h01=0x0050, text=» SLL A6,8 MAKE ROOM FOR THE RIGHT-HAND PART «, t00=0x0007, t01=0x0090}
0x0bae…0be6 Head {h00=0x0034, h01=0x0050, text=» LC A6,1,A8 AND STORE IT IN TIMER CONTROL BLOCK «, t00=0x0007, t01=0x00c4}
0x0be6…0c0e Head {h00=0x0024, h01=0x0050, text=» CF A15,ASCTBY CONVERT TO BINARY«, t00=0x0007, t01=0x00fc}
0x0c0e…0c26 Head {h00=0x0014, h01=0x0050, text=» SUK A3,2 END ? «, t00=0x0007, t01=0x0124}
0x0c26…0c3c Head {h00=0x0012, h01=0x0050, text=» RF(E) SETT20 «, t00=0x0007, t01=0x013c}
0x0c3c…0c4e Head {h00=0x000e, h01=0x0050, text=» ADKL A8,2«, t00=0x0007, t01=0x0152}
0x0c4e…0c82 Head {h00=0x0030, h01=0x0050, text=» STR A6,A15 SAVE ON STACK (HOURS AND MINUTES«, t00=0x0007, t01=0x0164}
0x0c82…0c94 Head {h00=0x000e, h01=0x0050, text=» RB SETT10«, t00=0x0008, t01=0x0008}
0x0c94…0ca8 Head {h00=0x0010, h01=0x0050, text=»SETT20 EQU *«, t00=0x0008, t01=0x001a}
0x0ca8…0cb4 Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x0008, t01=0x002e}
0x0cb4…0ce0 Head {h00=0x0028, h01=0x0050, text=» STR A6,A7 SECONDS TO MONITOR CLOCK «, t00=0x0008, t01=0x003a}
0x0ce0…0cf2 Head {h00=0x000e, h01=0x0050, text=» SUK A7,2 «, t00=0x0008, t01=0x0066}
0x0cf2…0d06 Head {h00=0x0010, h01=0x0050, text=» LDR* A6,A15«, t00=0x0008, t01=0x0078}
0x0d06…0d32 Head {h00=0x0028, h01=0x0050, text=» STR A6,A7 MINUTES TO MONITOR CLOCK «, t00=0x0008, t01=0x008c}
0x0d32…0d44 Head {h00=0x000e, h01=0x0050, text=» SUK A7,2 «, t00=0x0008, t01=0x00b8}
0x0d44…0d58 Head {h00=0x0010, h01=0x0050, text=» LDR* A6,A15«, t00=0x0008, t01=0x00ca}
0x0d58…0d82 Head {h00=0x0026, h01=0x0050, text=» STR A6,A7 HOURS TO MONITOR CLOCK «, t00=0x0008, t01=0x00de}
0x0d82…0d94 Head {h00=0x000e, h01=0x0050, text=» SUK A7,2 «, t00=0x0008, t01=0x0108}
0x0d94…0db8 Head {h00=0x0020, h01=0x0050, text=» CMR A7 CLEAR 24 HOUR CARRY «, t00=0x0008, t01=0x011a}
0x0db8…0dca Head {h00=0x000e, h01=0x0050, text=» RB TPDIS «, t00=0x0008, t01=0x013e}
0x0dca…0dd8 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0008, t01=0x0150}
0x0dd8…0de2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x015e}
0x0de2…0dec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0168}
0x0dec…0e22 Head {h00=0x0032, h01=0x0050, text=»* BYTASC = SUBROUTINE TO CONVERT A6-CONTENT«, t00=0x0008, t01=0x0172}
0x0e22…0e4e Head {h00=0x0028, h01=0x0050, text=»* FROM BINARY TO ASCII. «, t00=0x0009, t01=0x0018}
0x0e4e…0e72 Head {h00=0x0020, h01=0x0050, text=»* RESULT IN A6. «, t00=0x0009, t01=0x0044}
0x0e72…0e7c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0068}
0x0e7c…0e90 Head {h00=0x0010, h01=0x0050, text=»BYTASC EQU *«, t00=0x0009, t01=0x0072}
0x0e90…0ea2 Head {h00=0x000e, h01=0x0050, text=» LDK A4,0 «, t00=0x0009, t01=0x0086}
0x0ea2…0eba Head {h00=0x0014, h01=0x0050, text=»BYTA10 SUK A6,/A«, t00=0x0009, t01=0x0098}
0x0eba…0ed0 Head {h00=0x0012, h01=0x0050, text=» RF(N) BYTA20 «, t00=0x0009, t01=0x00b0}
0x0ed0…0ee6 Head {h00=0x0012, h01=0x0050, text=» ADKL A4,/100 «, t00=0x0009, t01=0x00c6}
0x0ee6…0ef8 Head {h00=0x000e, h01=0x0050, text=» RB BYTA10«, t00=0x0009, t01=0x00dc}
0x0ef8…0f10 Head {h00=0x0014, h01=0x0050, text=»BYTA20 ADK A6,/A«, t00=0x0009, t01=0x00ee}
0x0f10…0f22 Head {h00=0x000e, h01=0x0050, text=» ADR A6,A4«, t00=0x0009, t01=0x0106}
0x0f22…0f38 Head {h00=0x0012, h01=0x0050, text=» ORKL A6,/3030«, t00=0x0009, t01=0x0118}
0x0f38…0f4a Head {h00=0x000e, h01=0x0050, text=» RF ASCT20«, t00=0x0009, t01=0x012e}
0x0f4a…0f54 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0140}
0x0f54…0f5e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x014a}
0x0f5e…0f94 Head {h00=0x0032, h01=0x0050, text=»* ASCTBY = SUBROUTINE TO CONVERT A6-CONTENT«, t00=0x0009, t01=0x0154}
0x0f94…0fc0 Head {h00=0x0028, h01=0x0050, text=»* FROM ASCII TO BINARY. «, t00=0x0009, t01=0x018a}
0x0fc0…0fe4 Head {h00=0x0020, h01=0x0050, text=»* RESULT IN A6. «, t00=0x000a, t01=0x0026}
0x0fe4…0fee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x004a}
0x0fee…1002 Head {h00=0x0010, h01=0x0050, text=»ASCTBY EQU *«, t00=0x000a, t01=0x0054}
0x1002…1014 Head {h00=0x000e, h01=0x0050, text=» LDR A4,A6«, t00=0x000a, t01=0x0068}
0x1014…1026 Head {h00=0x000e, h01=0x0050, text=» ANK A6,/F«, t00=0x000a, t01=0x007a}
0x1026…1038 Head {h00=0x000e, h01=0x0050, text=» SRL A4,8 «, t00=0x000a, t01=0x008c}
0x1038…104a Head {h00=0x000e, h01=0x0050, text=» ANK A4,/F«, t00=0x000a, t01=0x009e}
0x104a…1060 Head {h00=0x0012, h01=0x0050, text=» RF(E) ASCT20 «, t00=0x000a, t01=0x00b0}
0x1060…1078 Head {h00=0x0014, h01=0x0050, text=»ASCT10 ADK A6,/A«, t00=0x000a, t01=0x00c6}
0x1078…108a Head {h00=0x000e, h01=0x0050, text=» SUK A4,1 «, t00=0x000a, t01=0x00de}
0x108a…10a0 Head {h00=0x0012, h01=0x0050, text=» RB(NE) ASCT10«, t00=0x000a, t01=0x00f0}
0x10a0…10ba Head {h00=0x0016, h01=0x0050, text=»ASCT20 ABL RTNA15 «, t00=0x000a, t01=0x0106}
0x10ba…10c6 Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x000a, t01=0x0120}
0x10c6…10ca Head {h00=0x4004, h01=0x0000}
0x10ca…10ce 00 0a 01 2c ┆ ,┆
0x10ce…10d6 (11, 1, 8) 20 04 00 00 00 0b 00 04 ┆ ┆
0x10d6…1126 (12, 0, 400) 00 32 00 50 43 56 45 42 54 42 20 20 20 45 51 55 20 20 20 20 20 20 43 56 45 46 49 54 2b 32 20 20 20 20 41 4c 4c 4f 43 41 54 49 4f 4e 20 54 41 42 4c 45 00 04 00 04 00 06 00 50 2a 20 00 04 00 3a 00 06 00 50 2a 20 00 04 00 44 00 06 00 50 2a 20 ┆ 2 PCVEBTB EQU CVEFIT+2 ALLOCATION TABLE P* : P* D P* ┆
0x1126…1176 00 04 00 4e 00 06 00 50 2a 20 00 04 00 58 00 26 00 50 2a 20 20 20 20 20 20 20 20 46 43 54 20 20 20 20 20 20 46 49 4c 45 20 43 4f 44 45 20 54 41 42 4c 45 20 00 04 00 62 00 06 00 50 2a 20 00 04 00 8c 00 2c 00 50 46 43 54 46 43 20 20 20 20 45 ┆ N P* X & P* FCT FILE CODE TABLE b P* , PFCTFC E┆
0x1176…11c6 51 55 20 20 20 20 20 20 30 20 20 20 20 20 20 20 20 20 20 20 46 49 4c 45 20 43 4f 44 45 20 00 04 00 96 00 48 00 50 46 43 54 44 57 54 20 20 20 45 51 55 20 20 20 20 20 20 32 20 20 20 20 20 20 20 20 20 20 20 41 44 44 52 20 4f 46 20 44 57 54 20 ┆QU 0 FILE CODE H PFCTDWT EQU 2 ADDR OF DWT ┆
0x11c6…1216 41 53 53 49 47 4e 45 44 20 54 4f 20 54 48 45 20 46 49 4c 45 20 43 4f 44 45 20 00 04 00 c6 00 48 00 50 46 43 54 4c 46 54 20 20 20 45 51 55 20 20 20 20 20 20 32 20 20 20 20 20 20 20 20 20 20 20 41 44 44 52 20 4f 46 20 4c 46 49 20 41 53 53 49 ┆ASSIGNED TO THE FILE CODE H PFCTLFT EQU 2 ADDR OF LFI ASSI┆
0x1216…1266 47 4e 45 44 20 54 4f 20 54 48 45 20 46 49 4c 45 20 43 4f 44 45 20 00 04 01 12 00 06 00 50 2a 20 00 04 01 5e 00 06 00 50 2a 20 00 04 01 68 00 28 00 50 2a 20 20 20 20 20 20 20 20 44 43 54 20 20 20 20 20 20 44 49 53 4b 20 43 4f 4e 54 52 4f 4c ┆GNED TO THE FILE CODE P* ^ P* h ( P* DCT DISK CONTROL┆