DataMuseum.dk

Presents historical artifacts from the history of:

Philips Data Systems

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about Philips Data Systems

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - metrics - download

⟦2ccf9c6ec⟧

    Length: 1312 (0x520)
    Notes: pts_type(SC)
    Names: »EQULST.SC«

Derivation

└─⟦38a30a456⟧ Bits:30009662 Philips computer tape "600104"
    └─⟦this⟧ »OD-KOM/EQULST.SC« 
└─⟦75255755f⟧ Bits:30009693 Philips computer tape "600410"
    └─⟦this⟧ »NJREMIT/EQULST.SC« 
└─⟦b6546aa17⟧ Bits:30009689 Philips computer tape "600325"
    └─⟦this⟧ »REMIT2/EQULST.SC« 
    └─⟦this⟧ »REMIT2/EQULST.SC« 
└─⟦d2cdd233a⟧ Bits:30009674 Philips computer tape "600204"
    └─⟦this⟧ »OD-KOM/EQULST.SC« 

PTS(SC)

 IDENT EQULST 
 DDUM KMD08 
 PDIV 
 INCLUDE EQUATE,LIST
 END

HexDump

0x000…016 (0, 2, 104) Head {h00=0x0012, h01=0x000d, text=» IDENT EQULST «, t00=0x0000, t01=0x0004}
0x016…02a             Head {h00=0x0010, h01=0x000b, text=» DDUM KMD08 «, t00=0x0000, t01=0x001a}
0x02a…038             Head {h00=0x000a, h01=0x0005, text=» PDIV «, t00=0x0000, t01=0x002e}
0x038…054             Head {h00=0x0018, h01=0x0014, text=» INCLUDE EQUATE,LIST«, t00=0x0000, t01=0x003c}
0x054…060             Head {h00=0x0008, h01=0x0004, text=» END«, t00=0x0000, t01=0x0058}
0x060…064             Head {h00=0x4004, h01=0x0000}
0x064…068             00 00 00 64                                                                                                                                                                                                                                       ┆   d┆
0x068…070 (1, 1, 8)   20 04 00 00 00 01 00 04                                                                                                                                                                                                                           ┆        ┆
0x070…0c0 (2, 0, 400) 4d 50 54 59 20 43 4f 4d 50 2e 20 46 49 45 4c 44 20 46 4f 55 4e 44 00 11 01 82 00 34 00 50 20 4d 4f 56 45 20 53 50 42 49 4e 57 32 2c 3d 27 33 27 20 49 4e 44 49 43 41 54 45 20 45 4e 54 45 52 20 4b 45 59 20 44 45 50 52 45 53 53 45 44 20 00 12   ┆MPTY COMP. FIELD FOUND     4 P MOVE SPBINW2,='3' INDICATE ENTER KEY DEPRESSED   ┆
0x0c0…110             00 1e 00 08 00 50 20 52 45 54 00 12 00 56 00 06 00 50 2a 20 00 12 00 62 00 22 00 50 2a 5c 45 4d 50 54 59 20 43 4f 4d 50 55 4c 53 4f 52 59 20 46 49 45 4c 44 20 46 4f 55 4e 44 00 12 00 6c 00 06 00 50 2a 20 00 12 00 92 00 0a 00 50 4b 45 4e 54   ┆     P RET   V   P*    b " P* EMPTY COMPULSORY FIELD FOUND   l   P*        PKENT┆
0x110…160             31 30 00 12 00 9c 00 36 00 50 20 47 45 54 46 4c 44 20 30 2c 53 50 42 49 4e 57 33 2c 53 50 42 49 4e 57 32 20 47 45 54 20 54 48 45 20 43 4f 4d 50 55 4c 53 4f 52 59 20 46 49 45 4c 44 00 12 00 aa 00 06 00 50 2a 20 00 12 00 e4 00 0a 00 50 20 45   ┆10     6 P GETFLD 0,SPBINW3,SPBINW2 GET THE COMPULSORY FIELD       P*        P E┆
0x160…1b0             4a 45 43 54 00 12 00 ee 00 0a 00 50 45 52 52 50 52 54 00 12 00 fc 00 2a 00 50 20 43 42 45 20 53 50 42 49 4e 57 32 2c 3d 27 31 36 27 2c 4b 45 44 49 54 5c 4a 55 4d 50 20 49 46 20 45 44 49 54 20 00 12 01 0a 00 06 00 50 2a 20 00 12 01 38 00 14   ┆JECT       PERRPRT     * P CBE SPBINW2,='16',KEDIT JUMP IF EDIT        P*    8  ┆
0x1b0…200             00 50 2a 5c 45 52 52 4f 52 20 48 41 4e 44 4c 49 4e 47 00 12 01 42 00 06 00 50 2a 20 00 12 01 5a 00 0c 00 50 45 52 52 50 52 49 4e 54 00 12 01 64 00 28 00 50 20 45 44 57 52 54 20 53 50 44 53 53 43 52 4e 2c 42 45 4c 4c 20 41 43 4f 55 53 54 49   ┆ P* ERROR HANDLING   B   P*    Z   PERRPRINT   d ( P EDWRT SPDSSCRN,BELL ACOUSTI┆
0x200…250 (3, 0, 400) 43 20 41 4c 41 52 4d 45 00 12 01 74 00 30 00 50 20 43 42 45 20 53 50 42 49 4e 57 34 2c 3d 27 30 27 2c 43 4e 44 54 41 42 20 4a 55 4d 50 20 49 46 20 4e 4f 20 50 52 49 4e 54 4f 55 54 00 13 00 10 00 28 00 50 20 4d 4f 56 45 20 53 50 42 49 4e 57   ┆C ALARME   t 0 P CBE SPBINW4,='0',CNDTAB JUMP IF NO PRINTOUT     ( P MOVE SPBINW┆
0x250…2a0             33 2c 3d 58 27 31 38 30 31 27 20 52 4f 57 20 32 34 20 43 4f 4c 2e 20 31 00 13 00 44 00 32 00 50 20 44 53 43 31 20 53 50 44 53 53 43 52 4e 2c 36 2c 53 50 42 49 4e 57 33 20 53 45 54 20 43 55 52 53 4f 52 20 4f 4e 20 52 4f 57 20 32 34 20 00 13   ┆3,=X'1801' ROW 24 COL. 1   D 2 P DSC1 SPDSSCRN,6,SPBINW3 SET CURSOR ON ROW 24   ┆
0x2a0…2f0             00 70 00 06 00 50 2a 20 00 13 00 a6 00 3a 00 50 2a 5c 57 52 49 54 49 4e 47 20 46 52 4f 4d 20 53 50 46 54 42 45 52 52 20 53 48 4f 55 4c 44 20 42 45 20 49 4e 53 45 52 54 45 44 20 48 45 52 45 20 4c 41 54 45 52 20 00 13 00 b0 00 06 00 50 2a 20   ┆ p   P*      : P* WRITING FROM SPFTBERR SHOULD BE INSERTED HERE LATER        P* ┆
0x2f0…340             00 13 00 ee 00 24 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 20 00 13 00 f8 00 34 00 50 20 4d 4f 56 45 20 42 43 44 57 4b 2c 53 50 42 49 4e 57 34 20 4d 4f 56 45 20 45 52 52 4f 52 20 4e   ┆     $ P*******************************      4 P MOVE BCDWK,SPBINW4 MOVE ERROR N┆
0x340…390             55 4d 42 45 52 20 54 4f 20 57 4f 52 4b 20 45 4c 00 13 01 20 00 1a 00 50 20 45 44 57 52 54 20 53 50 44 53 53 43 52 4e 2c 45 52 52 46 4d 54 00 13 01 58 00 24 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a   ┆UMBER TO WORK EL       P EDWRT SPDSSCRN,ERRFMT   X $ P**************************┆
0x390…3e0 (4, 0, 400) 2a 2a 2a 2a 2a 20 00 13 01 76 00 06 00 50 2a 20 00 14 00 0e 00 16 00 50 2a 5c 52 45 41 44 20 41 46 54 45 52 20 45 52 52 4f 52 00 14 00 18 00 06 00 50 2a 20 00 14 00 32 00 0a 00 50 45 52 52 45 41 44 00 14 00 3c 00 28 00 50 20 53 45 54 43 55   ┆*****    v   P*        P* READ AFTER ERROR       P*    2   PERREAD   < ( P SETCU┆
0x3e0…430             52 5c 5c 53 45 54 20 43 55 52 53 4f 52 20 41 54 20 54 48 45 20 42 45 47 49 4e 4e 49 4e 47 00 14 00 4a 00 1c 00 50 5c 5c 5c 4f 46 20 54 48 45 20 43 55 52 52 45 4e 54 20 46 49 45 4c 44 20 00 14 00 76 00 0a 00 50 45 52 52 31 30 30 00 14 00 96   ┆R  SET CURSOR AT THE BEGINNING   J   P   OF THE CURRENT FIELD    v   PERR100    ┆
0x430…480             00 2a 00 50 20 4d 4f 56 45 20 53 50 42 49 4e 57 33 2c 3d 57 27 31 34 27 20 52 45 51 55 45 53 54 45 44 20 4c 45 4e 47 54 48 20 00 14 00 a4 00 36 00 50 20 4e 4b 49 41 20 2e 4e 45 2c 53 50 44 53 44 59 4b 42 2c 53 50 49 4e 50 55 54 2c 53 50 4b   ┆ * P MOVE SPBINW3,=W'14' REQUESTED LENGTH      6 P NKIA .NE,SPDSDYKB,SPINPUT,SPK┆
0x480…4d0             54 41 42 31 2c 53 50 42 49 4e 57 33 2c 53 50 42 49 4e 57 32 00 14 00 d2 00 1e 00 50 20 42 4e 5a 20 45 52 52 31 30 30 20 4a 55 4d 50 20 49 46 20 4e 4f 54 20 4f 4b 00 14 01 0c 00 2e 00 50 20 43 42 45 20 53 50 42 49 4e 57 32 2c 3d 27 30 27 2c   ┆TAB1,SPBINW3,SPBINW2       P BNZ ERR100 JUMP IF NOT OK     . P CBE SPBINW2,='0',┆
0x4d0…520             52 45 54 55 52 20 4a 55 4d 50 20 49 46 20 50 4f 57 45 52 20 4f 46 46 20 00 14 01 2e 00 22 00 50 20 49 42 20 53 50 42 49 4e 57 32 2c 45 52 52 31 30 30 2c 45 52 52 43 4f 4e 54 5c 5c 43 20 00 14 01 60 00 1e 00 50 5c 5c 45 52 52 43 4f 4e 54 2c   ┆RETUR JUMP IF POWER OFF    . " P IB SPBINW2,ERR100,ERRCONT  C    `   P  ERRCONT,┆

Reduced view