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

⟦1858f8a45⟧

    Length: 1052 (0x41c)
    Notes: pts_type(SC)
    Names: »DANNES.SC«

Derivation

└─⟦48601905a⟧ Bits:30009668 Philips computer tape "600121"
    └─⟦this⟧ »S:DE/DANNES.SC« 
└─⟦d2a299635⟧ Bits:30009698 Philips computer tape "600415"
    └─⟦this⟧ »S:DE/DANNES.SC« 

PTS(SC)

 MOVE STR64A,HEX00
 MOVE DEBINW2,W0
 MOVE DEBINW3,W0
DES100
 CALL TESTB,WORK(W12),DEBINW3 MSKOUT-WORD 
 BZ DES200
 CBE DEBINW2,W0,DES120
 COPY STR64A,DEBINW2,W1,STATIU,W9 ',' 
 ADD DEBINW2,W1 
DES120
 CALL TESTB,WORK(W11),DEBINW3 COMP-WORD 
 BNZ DES140 
 COPY STR64A,DEBINW2,W1,STATIU,W8 '/' 
 ADD DEBINW2,W1 
DES140
 COPY STR64A,DEBINW2,W1,STATIU,DEBINW3
 ADD DEBINW2,W1 
DES200
 ADD DEBINW3,W1 
 CBNE DEBINW3,W8,DES100 

HexDump

0x000…01a (0, 0, 400) Head {h00=0x0016, h01=0x0050, text=» MOVE STR64A,HEX00«, t00=0x0000, t01=0x0004}
0x01a…032             Head {h00=0x0014, h01=0x0010, text=» MOVE DEBINW2,W0«, t00=0x0000, t01=0x001e}
0x032…04a             Head {h00=0x0014, h01=0x0050, text=» MOVE DEBINW3,W0«, t00=0x0000, t01=0x0036}
0x04a…058             Head {h00=0x000a, h01=0x0006, text=»DES100«, t00=0x0000, t01=0x004e}
0x058…08a             Head {h00=0x002e, h01=0x0050, text=» CALL TESTB,WORK(W12),DEBINW3 MSKOUT-WORD «, t00=0x0000, t01=0x005c}
0x08a…09c             Head {h00=0x000e, h01=0x000a, text=» BZ DES200«, t00=0x0000, t01=0x008e}
0x09c…0ba             Head {h00=0x001a, h01=0x0050, text=» CBE DEBINW2,W0,DES120«, t00=0x0000, t01=0x00a0}
0x0ba…0e8             Head {h00=0x002a, h01=0x0050, text=» COPY STR64A,DEBINW2,W1,STATIU,W9 ',' «, t00=0x0000, t01=0x00be}
0x0e8…100             Head {h00=0x0014, h01=0x000f, text=» ADD DEBINW2,W1 «, t00=0x0000, t01=0x00ec}
0x100…10e             Head {h00=0x000a, h01=0x0050, text=»DES120«, t00=0x0000, t01=0x0104}
0x10e…13e             Head {h00=0x002c, h01=0x0050, text=» CALL TESTB,WORK(W11),DEBINW3 COMP-WORD «, t00=0x0000, t01=0x0112}
0x13e…152             Head {h00=0x0010, h01=0x0050, text=» BNZ DES140 «, t00=0x0000, t01=0x0142}
0x152…180             Head {h00=0x002a, h01=0x0050, text=» COPY STR64A,DEBINW2,W1,STATIU,W8 '/' «, t00=0x0000, t01=0x0156}
0x180…198             Head {h00=0x0014, h01=0x000f, text=» ADD DEBINW2,W1 «, t00=0x0000, t01=0x0184}
0x198…1a6             Head {h00=0x000a, h01=0x0050, text=»DES140«, t00=0x0001, t01=0x000c}
0x1a6…1d4             Head {h00=0x002a, h01=0x0050, text=» COPY STR64A,DEBINW2,W1,STATIU,DEBINW3«, t00=0x0001, t01=0x001a}
0x1d4…1ec             Head {h00=0x0014, h01=0x000f, text=» ADD DEBINW2,W1 «, t00=0x0001, t01=0x0048}
0x1ec…1fa             Head {h00=0x000a, h01=0x0006, text=»DES200«, t00=0x0001, t01=0x0060}
0x1fa…212             Head {h00=0x0014, h01=0x0050, text=» ADD DEBINW3,W1 «, t00=0x0001, t01=0x006e}
0x212…232             Head {h00=0x001c, h01=0x0050, text=» CBNE DEBINW3,W8,DES100 «, t00=0x0001, t01=0x0086}
0x232…236             Head {h00=0x4004, h01=0x0000}
0x236…23a             00 01 00 a6                                                                                                                                                                                                                                       ┆    ┆
0x23a…242 (2, 1, 8)   20 04 00 00 00 02 00 04                                                                                                                                                                                                                           ┆        ┆
0x242…292 (3, 2, 150) 00 40 00 48 20 49 44 45 4e 54 20 53 3a 42 54 41 42 20 20 54 52 41 20 34 2e 32 20 20 38 30 2d 30 31 2d 32 31 20 46 31 20 4f 31 31 31 31 20 20 52 45 4c 20 31 2e 30 20 38 30 2d 30 32 2d 32 32 20 00 03 00 04 00 0e 00 0a 01 04 c8 53 3a 42 54 41   ┆ @ H IDENT S:BTAB  TRA 4.2  80-01-21 F1 O1111  REL 1.0 80-02-22            S:BTA┆
0x292…2d8             42 00 00 03 00 48 00 10 00 0c 05 05 c8 53 3a 42 54 41 42 42 00 02 00 03 00 5a 00 0e 00 0a 03 04 00 00 00 01 00 00 00 02 00 03 00 6e 00 0e 00 0a 07 04 00 00 3a 42 00 02 00 00 00 03 00 80 40 04 00 00 00 03 00 92                                 ┆B    H       S:BTABB     Z                 n        :B        @       ┆
0x2d8…328 (4, 2, 324) 00 40 00 48 20 49 44 45 4e 54 20 55 3a 43 42 31 30 20 20 54 52 41 20 34 2e 32 20 20 38 30 2d 30 31 2d 32 31 20 46 31 20 4f 31 31 31 31 20 20 52 45 4c 20 31 2e 30 20 38 30 2d 30 32 2d 32 32 20 00 04 00 04 00 0e 00 0a 01 04 c8 55 3a 43 42 31   ┆ @ H IDENT U:CB10  TRA 4.2  80-01-21 F1 O1111  REL 1.0 80-02-22            U:CB1┆
0x328…378             30 00 00 04 00 48 00 10 00 0c 05 05 c8 55 3a 43 42 31 30 43 00 04 00 04 00 5a 00 2a 00 26 03 12 00 00 00 01 00 00 00 00 00 00 20 20 20 20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 04 00 6e 00 1a 00 26 03 12 00 00   ┆0    H       U:CB10C     Z * &                                         n   &    ┆
0x378…3c8             00 1f 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 04 00 9c 00 0c 00 26 03 12 00 00 00 3d 00 00 00 04 00 ba 00 0c 00 26 03 12 00 00 00 5b 00 00 00 04 00 ca 00 0c 00 26 03 12 00 00 00 79 00 00 00 04 00 da 00 0c 00 26 03 12 00 00 00 97   ┆                         &     =         &     [         &     y         &      ┆
0x3c8…418             00 00 00 04 00 ea 00 0c 00 26 03 12 00 00 00 b5 00 00 00 04 00 fa 00 0c 00 0e 03 06 00 00 00 d3 00 00 00 04 01 0a 00 10 00 0c 04 05 00 00 00 01 00 d8 00 03 00 00 00 04 01 1a 00 0e 00 0a 07 04 00 00 00 d3 00 d8 00 00 00 04 01 2e 40 04 00 00   ┆         &                                                                 .@   ┆
0x418…41c             00 04 01 40                                                                                                                                                                                                                                       ┆   @┆

Reduced view