|
|
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: 1534 (0x5fe)
Notes: pts_type(UF)
Names: »UPDSPY.UF«
└─⟦71472ef1e⟧ Bits:30009661 Philips computer tape "600103"
└─⟦this⟧ »BDKAPP/UPDSPY.UF«
LED C:SPY,/S,!! !!IL 73 EXTRN K:FBD1 EXTRN K:FBD2 EXTRN K:FBD3 EXTRN K:FBD4 !!IL 77 EXTRN K:CON CONVERT 1-15 TO A-Z !!IL 472 * * PRINT LINE AND TC HEADER * CF A14,K:PRTN DATA K:FBD2 !!RE 597,$$DLEND$$DLRET$$ !!IL 601 * * CHECK LINE STATUS * LD A1,K:LST,A3 RF(Z) DL300 IFT LOOP=1 XIF * * PRINT HEADER * CF A14,K:PRTT DATA K:FBD1 RF DL50 !!DL 617 * GET UOTPUT FORMAT !!DL 620,624 LDKL A4,K:FBD4 !!DL 629 !!IL 630 LDR A1,A3 !!DL 631 ADKL A1,30 ADD DISCPL.FOR 15 TC !!IL 634 LDK A2,' ' SCR A2,A4 RF DL290 !!DL 648 !!DL 649 !!DL 655,656 LDK A2,'A' SCR A2,A4 !!DL 662,663 LDK A2,'I' SCR A2,A4 !!DL 665 ADK A4,1 LDK A2,' ' SPACE SCR A2,A4 ADK A4,1 SCR A2,A4 ADK A4,1 !!IL 674 RF DLRET !!IL 678 LDKL A1,/100 EOL SCR A2,A4 ADK A4,1 STR A1,A4 SUKL A4,K:FBD4 GET LENGTH SC A4,K:FBD4-1 CF A14,K:PRTN PRINT TC FORMAT DATA K:FBD3 DLRET EQU * !!IL 718 CF A14,K:CON COVERT 1-15 TO A-Z RF(NZ) DTEND !!EN ASM /S KPF /S ASG /E0,DK,UPDSUB
0x000…018 (0, 0, 400) Head {h00=0x0014, h01=0x0050, text=»LED C:SPY,/S,!! «, t00=0x0000, t01=0x0004}
0x018…028 Head {h00=0x000c, h01=0x0050, text=»!!IL 73 «, t00=0x0000, t01=0x001c}
0x028…03e Head {h00=0x0012, h01=0x0050, text=» EXTRN K:FBD1 «, t00=0x0000, t01=0x002c}
0x03e…054 Head {h00=0x0012, h01=0x0050, text=» EXTRN K:FBD2 «, t00=0x0000, t01=0x0042}
0x054…06a Head {h00=0x0012, h01=0x0050, text=» EXTRN K:FBD3 «, t00=0x0000, t01=0x0058}
0x06a…080 Head {h00=0x0012, h01=0x0050, text=» EXTRN K:FBD4 «, t00=0x0000, t01=0x006e}
0x080…090 Head {h00=0x000c, h01=0x0050, text=»!!IL 77 «, t00=0x0000, t01=0x0084}
0x090…0b8 Head {h00=0x0024, h01=0x0050, text=» EXTRN K:CON CONVERT 1-15 TO A-Z«, t00=0x0000, t01=0x0094}
0x0b8…0c8 Head {h00=0x000c, h01=0x0050, text=»!!IL 472«, t00=0x0000, t01=0x00bc}
0x0c8…0d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00cc}
0x0d2…0f4 Head {h00=0x001e, h01=0x0050, text=»* PRINT LINE AND TC HEADER«, t00=0x0000, t01=0x00d6}
0x0f4…0fe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00f8}
0x0fe…114 Head {h00=0x0012, h01=0x0050, text=» CF A14,K:PRTN«, t00=0x0000, t01=0x0102}
0x114…128 Head {h00=0x0010, h01=0x0050, text=» DATA K:FBD2«, t00=0x0000, t01=0x0118}
0x128…14a Head {h00=0x001e, h01=0x0050, text=»!!RE 597,$$DLEND$$DLRET$$ «, t00=0x0000, t01=0x012c}
0x14a…15a Head {h00=0x000c, h01=0x0050, text=»!!IL 601«, t00=0x0000, t01=0x014e}
0x15a…164 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x015e}
0x164…180 Head {h00=0x0018, h01=0x0050, text=»* CHECK LINE STATUS «, t00=0x0000, t01=0x0168}
0x180…18a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0184}
0x18a…1a2 Head {h00=0x0014, h01=0x0050, text=» LD A1,K:LST,A3 «, t00=0x0000, t01=0x018e}
0x1a2…1b6 Head {h00=0x0010, h01=0x0050, text=» RF(Z) DL300«, t00=0x0001, t01=0x0016}
0x1b6…1ca Head {h00=0x0010, h01=0x0050, text=» IFT LOOP=1 «, t00=0x0001, t01=0x002a}
0x1ca…1d6 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0001, t01=0x003e}
0x1d6…1e0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x004a}
0x1e0…1f6 Head {h00=0x0012, h01=0x0050, text=»* PRINT HEADER«, t00=0x0001, t01=0x0054}
0x1f6…200 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x006a}
0x200…216 Head {h00=0x0012, h01=0x0050, text=» CF A14,K:PRTT«, t00=0x0001, t01=0x0074}
0x216…22a Head {h00=0x0010, h01=0x0050, text=» DATA K:FBD1«, t00=0x0001, t01=0x008a}
0x22a…23a Head {h00=0x000c, h01=0x0050, text=» RF DL50«, t00=0x0001, t01=0x009e}
0x23a…24a Head {h00=0x000c, h01=0x0050, text=»!!DL 617«, t00=0x0001, t01=0x00ae}
0x24a…266 Head {h00=0x0018, h01=0x0050, text=»* GET UOTPUT FORMAT «, t00=0x0001, t01=0x00be}
0x266…27a Head {h00=0x0010, h01=0x0050, text=»!!DL 620,624«, t00=0x0001, t01=0x00da}
0x27a…292 Head {h00=0x0014, h01=0x0050, text=» LDKL A4,K:FBD4 «, t00=0x0001, t01=0x00ee}
0x292…2a2 Head {h00=0x000c, h01=0x0050, text=»!!DL 629«, t00=0x0001, t01=0x0106}
0x2a2…2b2 Head {h00=0x000c, h01=0x0050, text=»!!IL 630«, t00=0x0001, t01=0x0116}
0x2b2…2c4 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A3«, t00=0x0001, t01=0x0126}
0x2c4…2d4 Head {h00=0x000c, h01=0x0050, text=»!!DL 631«, t00=0x0001, t01=0x0138}
0x2d4…2fc Head {h00=0x0024, h01=0x0050, text=» ADKL A1,30 ADD DISCPL.FOR 15 TC«, t00=0x0001, t01=0x0148}
0x2fc…30c Head {h00=0x000c, h01=0x0050, text=»!!IL 634«, t00=0x0001, t01=0x0170}
0x30c…320 Head {h00=0x0010, h01=0x0050, text=» LDK A2,' ' «, t00=0x0001, t01=0x0180}
0x320…332 (2, 0, 400) Head {h00=0x000e, h01=0x0050, text=» SCR A2,A4«, t00=0x0002, t01=0x0004}
0x332…344 Head {h00=0x000e, h01=0x0050, text=» RF DL290 «, t00=0x0002, t01=0x0016}
0x344…354 Head {h00=0x000c, h01=0x0050, text=»!!DL 648«, t00=0x0002, t01=0x0028}
0x354…364 Head {h00=0x000c, h01=0x0050, text=»!!DL 649«, t00=0x0002, t01=0x0038}
0x364…378 Head {h00=0x0010, h01=0x0050, text=»!!DL 655,656«, t00=0x0002, t01=0x0048}
0x378…38c Head {h00=0x0010, h01=0x0050, text=» LDK A2,'A' «, t00=0x0002, t01=0x005c}
0x38c…39e Head {h00=0x000e, h01=0x0050, text=» SCR A2,A4«, t00=0x0002, t01=0x0070}
0x39e…3b2 Head {h00=0x0010, h01=0x0050, text=»!!DL 662,663«, t00=0x0002, t01=0x0082}
0x3b2…3c6 Head {h00=0x0010, h01=0x0050, text=» LDK A2,'I' «, t00=0x0002, t01=0x0096}
0x3c6…3d8 Head {h00=0x000e, h01=0x0050, text=» SCR A2,A4«, t00=0x0002, t01=0x00aa}
0x3d8…3e8 Head {h00=0x000c, h01=0x0050, text=»!!DL 665«, t00=0x0002, t01=0x00bc}
0x3e8…3fa Head {h00=0x000e, h01=0x0050, text=» ADK A4,1 «, t00=0x0002, t01=0x00cc}
0x3fa…414 Head {h00=0x0016, h01=0x0050, text=» LDK A2,' ' SPACE «, t00=0x0002, t01=0x00de}
0x414…426 Head {h00=0x000e, h01=0x0050, text=» SCR A2,A4«, t00=0x0002, t01=0x00f8}
0x426…438 Head {h00=0x000e, h01=0x0050, text=» ADK A4,1 «, t00=0x0002, t01=0x010a}
0x438…44a Head {h00=0x000e, h01=0x0050, text=» SCR A2,A4«, t00=0x0002, t01=0x011c}
0x44a…45c Head {h00=0x000e, h01=0x0050, text=» ADK A4,1 «, t00=0x0002, t01=0x012e}
0x45c…46c Head {h00=0x000c, h01=0x0050, text=»!!IL 674«, t00=0x0002, t01=0x0140}
0x46c…47e Head {h00=0x000e, h01=0x0050, text=» RF DLRET «, t00=0x0002, t01=0x0150}
0x47e…48e Head {h00=0x000c, h01=0x0050, text=»!!IL 678«, t00=0x0002, t01=0x0162}
0x48e…4a8 Head {h00=0x0016, h01=0x0050, text=» LDKL A1,/100 EOL «, t00=0x0002, t01=0x0172}
0x4a8…4ba Head {h00=0x000e, h01=0x0050, text=» SCR A2,A4«, t00=0x0002, t01=0x018c}
0x4ba…4cc Head {h00=0x000e, h01=0x0050, text=» ADK A4,1 «, t00=0x0003, t01=0x000e}
0x4cc…4de Head {h00=0x000e, h01=0x0050, text=» STR A1,A4«, t00=0x0003, t01=0x0020}
0x4de…500 Head {h00=0x001e, h01=0x0050, text=» SUKL A4,K:FBD4 GET LENGTH«, t00=0x0003, t01=0x0032}
0x500…518 Head {h00=0x0014, h01=0x0050, text=» SC A4,K:FBD4-1 «, t00=0x0003, t01=0x0054}
0x518…53e Head {h00=0x0022, h01=0x0050, text=» CF A14,K:PRTN PRINT TC FORMAT«, t00=0x0003, t01=0x006c}
0x53e…552 Head {h00=0x0010, h01=0x0050, text=» DATA K:FBD3«, t00=0x0003, t01=0x0092}
0x552…566 Head {h00=0x0010, h01=0x0050, text=»DLRET EQU * «, t00=0x0003, t01=0x00a6}
0x566…576 Head {h00=0x000c, h01=0x0050, text=»!!IL 718«, t00=0x0003, t01=0x00ba}
0x576…59e Head {h00=0x0024, h01=0x0050, text=» CF A14,K:CON COVERT 1-15 TO A-Z«, t00=0x0003, t01=0x00ca}
0x59e…5b4 Head {h00=0x0012, h01=0x0050, text=» RF(NZ) DTEND «, t00=0x0003, t01=0x00f2}
0x5b4…5c0 Head {h00=0x0008, h01=0x0050, text=»!!EN«, t00=0x0003, t01=0x0108}
0x5c0…5ce Head {h00=0x000a, h01=0x0050, text=»ASM /S«, t00=0x0003, t01=0x0114}
0x5ce…5dc Head {h00=0x000a, h01=0x0050, text=»KPF /S«, t00=0x0003, t01=0x0122}
0x5dc…5f6 Head {h00=0x0016, h01=0x0050, text=»ASG /E0,DK,UPDSUB «, t00=0x0003, t01=0x0130}
0x5f6…5fe (4, 1, 8) 20 04 00 00 00 04 00 04 ┆ ┆