|
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: 1588 (0x634)
Notes: pts_type(SC)
Names: »DEAPPU.SC«
└─⟦5c22ed822⟧ Bits:30009675 Philips computer tape "600209"
└─⟦this⟧ »DEN10/DEAPPU.SC«
└─⟦79fbed147⟧ Bits:30009697 Philips computer tape "600414"
└─⟦this⟧ »SHBAPL/DEAPPU.SC«
└─⟦bf903a231⟧ Bits:30009665 Philips computer tape "600109"
└─⟦this⟧ »DEN10/DEAPPU.SC«
IDENT DEAPPU CE SYSTEM 80-10-29 DDUM DEDDIV PDIV ENTRY DEAPPU EXT EMPTYT EXT DEDISC EJECT INCLUDE DELITT EJECT DEAPPU PROC CBNE DEBINW3,W3,DEAPPR BGNR FIELD IF APPL =3 CALL EMPTYT,DEINPUT BNZ DEMPTY EMPTY MOVE BCDI21(W1),DEINPUT CMP BCDI21(W1),:FMTITEM ALL READY VALID BE DEAP15 YES B DEAPPR DEMPTY MOVE BIN15,W1 LOAD FIELD NO CALL EMPTYT,X.PSEU1,X.PSEU2,X.WB10,BIN15 FIELD 1 EMPTY BZ DEAP20 NOT EMPTY MOVE BCD13A,SYSV(W10) ADD BCD13A,=D'1' CMP SYSV(W10),=C'999999' BNG DEAP10 MOVE BCD13A,=C'1' DEAP10 MOVE SYSV(W10),BCD13A CON X.MOVE,X.PSEU1,X.PSEU2,X.WB10,BIN15,BCD13A MOVE DEINPUT,SYSV(W10) PERF DEDISC,W20 WRITE SYSTEM VARIABLES DEAP15 MOVE DEBINW1,W6 SET REQUESTED LENGTH MOVE DEBINW3,W1 REWRITE RET DEAP20 CON X.MOVE,DEINPUT,X.PSEU1,X.PSEU2,X.WB10,BIN15 B DEAP15 DEAPPR MOVE DEBINW3,W0 RET PEND END
0x000…02a (0, 0, 398) Head {h00=0x0026, h01=0x0050, text=» IDENT DEAPPU CE SYSTEM 80-10-29«, t00=0x0000, t01=0x0004}
0x02a…03e Head {h00=0x0010, h01=0x000c, text=» DDUM DEDDIV«, t00=0x0000, t01=0x002e}
0x03e…04c Head {h00=0x000a, h01=0x0005, text=» PDIV «, t00=0x0000, t01=0x0042}
0x04c…062 Head {h00=0x0012, h01=0x000d, text=» ENTRY DEAPPU «, t00=0x0000, t01=0x0050}
0x062…076 Head {h00=0x0010, h01=0x0050, text=» EXT EMPTYT «, t00=0x0000, t01=0x0066}
0x076…08a Head {h00=0x0010, h01=0x0050, text=» EXT DEDISC «, t00=0x0000, t01=0x007a}
0x08a…098 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0000, t01=0x008e}
0x098…0b0 Head {h00=0x0014, h01=0x0050, text=» INCLUDE DELITT «, t00=0x0000, t01=0x009c}
0x0b0…0be Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0000, t01=0x00b4}
0x0be…0d2 Head {h00=0x0010, h01=0x000b, text=»DEAPPU PROC «, t00=0x0000, t01=0x00c2}
0x0d2…108 Head {h00=0x0032, h01=0x0050, text=» CBNE DEBINW3,W3,DEAPPR BGNR FIELD IF APPL =3 «, t00=0x0000, t01=0x00d6}
0x108…124 Head {h00=0x0018, h01=0x0050, text=» CALL EMPTYT,DEINPUT«, t00=0x0000, t01=0x010c}
0x124…13e Head {h00=0x0016, h01=0x0050, text=» BNZ DEMPTY EMPTY «, t00=0x0000, t01=0x0128}
0x13e…15e Head {h00=0x001c, h01=0x0050, text=» MOVE BCDI21(W1),DEINPUT«, t00=0x0000, t01=0x0142}
0x15e…18e Head {h00=0x002c, h01=0x0050, text=» CMP BCDI21(W1),:FMTITEM ALL READY VALID«, t00=0x0000, t01=0x0162}
0x18e…1a4 (1, 0, 400) Head {h00=0x0012, h01=0x0050, text=» BE DEAP15 YES«, t00=0x0001, t01=0x0004}
0x1a4…1b6 Head {h00=0x000e, h01=0x0050, text=» B DEAPPR «, t00=0x0001, t01=0x001a}
0x1b6…1c4 Head {h00=0x000a, h01=0x0050, text=»DEMPTY«, t00=0x0001, t01=0x002c}
0x1c4…1e8 Head {h00=0x0020, h01=0x0050, text=» MOVE BIN15,W1 LOAD FIELD NO«, t00=0x0001, t01=0x003a}
0x1e8…228 Head {h00=0x003c, h01=0x0050, text=» CALL EMPTYT,X.PSEU1,X.PSEU2,X.WB10,BIN15 FIELD 1 EMPTY «, t00=0x0001, t01=0x005e}
0x228…244 Head {h00=0x0018, h01=0x0050, text=» BZ DEAP20 NOT EMPTY«, t00=0x0001, t01=0x009e}
0x244…262 Head {h00=0x001a, h01=0x0050, text=» MOVE BCD13A,SYSV(W10)«, t00=0x0001, t01=0x00ba}
0x262…27c Head {h00=0x0016, h01=0x0050, text=» ADD BCD13A,=D'1' «, t00=0x0001, t01=0x00d8}
0x27c…29e Head {h00=0x001e, h01=0x0050, text=» CMP SYSV(W10),=C'999999' «, t00=0x0001, t01=0x00f2}
0x29e…2b2 Head {h00=0x0010, h01=0x0050, text=» BNG DEAP10 «, t00=0x0001, t01=0x0114}
0x2b2…2cc Head {h00=0x0016, h01=0x0050, text=» MOVE BCD13A,=C'1'«, t00=0x0001, t01=0x0128}
0x2cc…2da Head {h00=0x000a, h01=0x0050, text=»DEAP10«, t00=0x0001, t01=0x0142}
0x2da…2f8 Head {h00=0x001a, h01=0x0050, text=» MOVE SYSV(W10),BCD13A«, t00=0x0001, t01=0x0150}
0x2f8…330 Head {h00=0x0034, h01=0x0050, text=» CON X.MOVE,X.PSEU1,X.PSEU2,X.WB10,BIN15,BCD13A «, t00=0x0001, t01=0x016e}
0x330…350 Head {h00=0x001c, h01=0x0050, text=» MOVE DEINPUT,SYSV(W10) «, t00=0x0002, t01=0x0016}
0x350…380 Head {h00=0x002c, h01=0x0050, text=» PERF DEDISC,W20 WRITE SYSTEM VARIABLES «, t00=0x0002, t01=0x0036}
0x380…38e Head {h00=0x000a, h01=0x0050, text=»DEAP15«, t00=0x0002, t01=0x0066}
0x38e…3bc Head {h00=0x002a, h01=0x0050, text=» MOVE DEBINW1,W6 SET REQUESTED LENGTH «, t00=0x0002, t01=0x0074}
0x3bc…3dc Head {h00=0x001c, h01=0x0050, text=» MOVE DEBINW3,W1 REWRITE«, t00=0x0002, t01=0x00a2}
0x3dc…3e8 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0002, t01=0x00c2}
0x3e8…3f0 Head {h00=0x0004, h01=0x0050, t00=0x0002, t01=0x00ce}
0x3f0…3fe Head {h00=0x000a, h01=0x0050, text=»DEAP20«, t00=0x0002, t01=0x00d6}
0x3fe…436 Head {h00=0x0034, h01=0x0050, text=» CON X.MOVE,DEINPUT,X.PSEU1,X.PSEU2,X.WB10,BIN15«, t00=0x0002, t01=0x00e4}
0x436…448 Head {h00=0x000e, h01=0x0050, text=» B DEAP15 «, t00=0x0002, t01=0x011c}
0x448…456 Head {h00=0x000a, h01=0x0050, text=»DEAPPR«, t00=0x0002, t01=0x012e}
0x456…46e Head {h00=0x0014, h01=0x0010, text=» MOVE DEBINW3,W0«, t00=0x0002, t01=0x013c}
0x46e…47a Head {h00=0x0008, h01=0x0004, text=» RET«, t00=0x0002, t01=0x0154}
0x47a…488 Head {h00=0x000a, h01=0x0005, text=» PEND «, t00=0x0002, t01=0x0160}
0x488…494 Head {h00=0x0008, h01=0x0004, text=» END«, t00=0x0002, t01=0x016e}
0x494…498 Head {h00=0x4004, h01=0x0000}
0x498…49c 00 02 01 7a ┆ z┆
0x49c…4a4 (3, 1, 8) 20 04 00 00 00 03 00 04 ┆ ┆
0x4a4…4f4 (4, 0, 400) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4f4…544 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00 0a 03 00 00 00 00 0a 03 00 00 3e b0 03 00 00 ┆ > ┆
0x544…594 00 08 00 00 00 50 00 18 00 50 00 68 00 06 00 b8 80 01 00 be 00 05 00 00 30 03 00 c3 a0 02 00 c6 00 18 00 00 20 02 00 f6 20 02 00 f8 20 02 00 fa 20 02 00 fc 20 02 00 fe 00 1e 20 02 00 00 20 02 00 02 a0 02 00 04 00 0c 00 00 80 06 00 1c 00 15 ┆ P P h 0 ┆
0x594…5e4 00 00 00 01 00 9a 00 1e 00 02 00 00 a0 02 00 02 00 06 00 00 b0 08 00 0e 00 0c 00 00 80 0f 00 6e 00 05 00 00 00 36 20 02 00 00 20 02 00 02 20 02 00 04 20 02 00 06 20 02 00 08 a0 02 00 0a 00 0b 00 00 80 11 00 20 00 0a 00 00 80 02 00 ca 00 01 ┆ n 6 ┆
0x5e4…634 00 00 80 02 00 cc 00 01 00 00 00 24 00 00 00 00 00 01 00 02 00 03 00 04 00 05 00 06 00 07 00 08 00 09 00 0a 00 0b 00 0c 00 0d 00 0e 00 0f 00 42 20 02 00 00 20 02 00 02 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ $ B ┆