|
|
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: 904 (0x388)
Notes: pts_type(SC)
Names: »BITPUL.SC«
└─⟦cd4bbebb4⟧ Bits:30009680 Philips computer tape "600221"
└─⟦this⟧ »ATM/BITPUL.SC«
└─⟦this⟧ »ATM6601/BITPUL.SC«
└─⟦this⟧ »BEBATM/BITPUL.SC«
IDENT BITPUL REL 12.0 83-01-21 ENTRY TESTBI ENTRY SETBIT EXTRN I:EVA0 EXTRN I:RT1 TESTBI EQU * CF A14,I:EVA0 LDR* A1,A9 GET BIN CONTENTS ST A1,-2,A9 STORE BOOLEANS RETURN EQU * ABL I:RT1 SETBIT EQU * CF A14,I:EVA0 LD A1,-2,A9 GET BOOLEANS STR A1,A9 STORE IN BIN RB RETURN END
0x000…028 (0, 0, 398) Head {h00=0x0024, h01=0x001f, text=» IDENT BITPUL REL 12.0 83-01-21 «, t00=0x0000, t01=0x0004}
0x028…03e Head {h00=0x0012, h01=0x000d, text=» ENTRY TESTBI «, t00=0x0000, t01=0x002c}
0x03e…054 Head {h00=0x0012, h01=0x000d, text=» ENTRY SETBIT «, t00=0x0000, t01=0x0042}
0x054…06a Head {h00=0x0012, h01=0x000d, text=» EXTRN I:EVA0 «, t00=0x0000, t01=0x0058}
0x06a…07e Head {h00=0x0010, h01=0x000c, text=» EXTRN I:RT1«, t00=0x0000, t01=0x006e}
0x07e…086 Head {h00=0x0004, h01=0x0000, t00=0x0000, t01=0x0082}
0x086…09a Head {h00=0x0010, h01=0x000c, text=»TESTBI EQU *«, t00=0x0000, t01=0x008a}
0x09a…0b0 Head {h00=0x0012, h01=0x000e, text=» CF A14,I:EVA0«, t00=0x0000, t01=0x009e}
0x0b0…0d4 Head {h00=0x0020, h01=0x001c, text=» LDR* A1,A9 GET BIN CONTENTS«, t00=0x0000, t01=0x00b4}
0x0d4…0f8 Head {h00=0x0020, h01=0x001b, text=» ST A1,-2,A9 STORE BOOLEANS «, t00=0x0000, t01=0x00d8}
0x0f8…10c Head {h00=0x0010, h01=0x000c, text=»RETURN EQU *«, t00=0x0000, t01=0x00fc}
0x10c…11e Head {h00=0x000e, h01=0x000a, text=» ABL I:RT1«, t00=0x0000, t01=0x0110}
0x11e…126 Head {h00=0x0004, h01=0x0000, t00=0x0000, t01=0x0122}
0x126…13a Head {h00=0x0010, h01=0x000c, text=»SETBIT EQU *«, t00=0x0000, t01=0x012a}
0x13a…150 Head {h00=0x0012, h01=0x000e, text=» CF A14,I:EVA0«, t00=0x0000, t01=0x013e}
0x150…172 Head {h00=0x001e, h01=0x0019, text=» LD A1,-2,A9 GET BOOLEANS «, t00=0x0000, t01=0x0154}
0x172…192 Head {h00=0x001c, h01=0x0017, text=» STR A1,A9 STORE IN BIN «, t00=0x0000, t01=0x0176}
0x192…1a4 Head {h00=0x000e, h01=0x000a, text=» RB RETURN«, t00=0x0001, t01=0x0008}
0x1a4…1b0 Head {h00=0x0008, h01=0x0004, text=» END«, t00=0x0001, t01=0x001a}
0x1b0…1b4 Head {h00=0x4004, h01=0x0000}
0x1b4…1b8 00 01 00 26 ┆ &┆
0x1b8…1c0 (2, 1, 8) 20 04 00 00 00 02 00 04 ┆ ┆
0x1c0…210 (3, 2, 246) 00 34 00 40 20 20 20 20 20 20 20 20 49 44 45 4e 54 20 20 20 20 45 4c 41 44 44 52 20 20 20 20 20 47 45 54 20 49 54 45 4d 20 53 54 41 52 54 20 41 44 44 52 20 00 03 00 04 00 0e 00 0a 01 04 c4 45 4c 41 44 44 52 00 00 03 00 3c 00 10 00 0c 05 05 ┆ 4 @ IDENT ELADDR GET ITEM START ADDR ELADDR < ┆
0x210…260 dc 45 4c 41 44 44 52 00 00 00 00 03 00 4e 00 0e 00 0a 02 04 c2 49 3a 45 56 41 30 00 00 03 00 62 00 2c 00 28 03 13 00 00 00 01 44 00 f6 a1 00 00 00 02 86 06 f6 a1 00 00 00 02 81 b9 01 00 a1 a0 00 01 50 00 01 02 e2 5a 00 02 22 fc 00 03 00 74 ┆ ELADDR N I:EVA0 b , ( D P Z " t┆
0x260…2b0 00 0c 00 08 02 03 a2 49 3a 52 54 31 00 03 00 a4 00 18 00 14 03 09 00 00 00 1d 08 00 aa 04 e2 5b 00 02 8f 20 00 00 00 04 00 03 00 b4 00 0c 00 08 04 03 00 00 00 13 50 02 00 03 00 d0 00 0e 00 0a 07 04 00 00 00 00 00 26 00 00 00 03 00 e0 40 04 ┆ I:RT1 [ P & @ ┆
0x2b0…2b6 00 00 00 03 00 f2 ┆ ┆
0x2b6…306 (4, 2, 210) 00 36 00 40 20 20 20 20 20 20 20 20 49 44 45 4e 54 20 20 20 20 47 45 54 46 43 20 20 20 20 20 20 47 45 54 20 46 49 4c 45 20 43 4f 44 45 20 52 45 4c 20 31 2e 31 20 00 04 00 04 00 0c 00 08 01 03 a4 47 45 54 46 43 00 04 00 3e 00 0e 00 0a 05 04 ┆ 6 @ IDENT GETFC GET FILE CODE REL 1.1 GETFC > ┆
0x306…356 bc 47 45 54 46 43 00 00 00 04 00 4e 00 0e 00 0a 02 04 c2 54 3a 46 44 53 50 00 00 04 00 60 00 0e 00 0a 02 04 c2 49 3a 45 56 41 30 00 00 04 00 72 00 0c 00 08 02 03 a2 49 3a 52 54 31 00 04 00 84 00 24 00 20 03 0f 00 00 00 01 48 20 f6 a1 00 00 ┆ GETFC N T:FDSP ` I:EVA0 r I:RT1 $ H ┆
0x356…388 00 02 f6 a1 00 00 00 04 81 22 e1 47 00 01 8f 20 00 00 00 06 00 04 00 94 00 0e 00 0a 07 04 00 00 00 00 00 12 00 00 00 04 00 bc 40 04 00 00 00 04 00 ce ┆ " G @ ┆