|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 DFS Tapes |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 DFS Tapes Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 267 (0x10b)
Types: FIU, TextFile
Names: »TEST_PX_WIRE.FIU«
└─⟦24d56d853⟧ Bits:30000744 8mm tape, Rational 1000, DFS, D_12_6_5 SEQ293
└─⟦this⟧ »TEST_PX_WIRE.FIU«
└─⟦9031b0687⟧ Bits:30000407 8mm tape, Rational 1000, DFS, D_12_7_3
└─⟦this⟧ »TEST_PX_WIRE.FIU«
10 ; --------------------------------------------------------------------------------------
10 ; Hash 83fe6e5b041bb638 (no python module)
10 ; --------------------------------------------------------------------------------------
10 PC_:
10 35 .CODE EXPERIMENT
11 R1_:
11 00 .DATA 0x0 ; P11OF0 PASS_PX_WIRE
12 R2_:
12 18 .DATA 0x18
13 R3_:
13 18 .DATA 0x18
14 R4_:
14 00 .DATA 0x0
15 R5_:
15 00 .DATA 0x0
16 R6_:
16 00 .DATA 0x0
17 R7_:
17 00 .DATA 0x0
18 43 .CODE 0x43
19 40 .DATA 0x40
1a 3f .DATA 0x3f
1b c3 .DATA 0xc3
1c 3e .DATA 0x3e
1d 7d .DATA 0x7d
1e 03 .DATA 0x3
1f 00 .DATA 0x0
20 3f .DATA 0x3f
21 c3 .DATA 0xc3
22 6e .DATA 0x6e
23 7e .DATA 0x7e
24 03 .DATA 0x3
25 00 .DATA 0x0
26 00 .DATA 0x0
27 00 .DATA 0x0
28 00 .DATA 0x0
29 00 .DATA 0x0
2a 00 .DATA 0x0
2b 00 .DATA 0x0
2c 4c .DATA 0x4c
2d 00 .DATA 0x0
2e 00 .DATA 0x0
2f 00 .DATA 0x0
30 00 .DATA 0x0
31 00 .DATA 0x0
32 00 .DATA 0x0
33 00 .DATA 0x0
34 00 .DATA 0x0
35 EXPERIMENT:
35 8f 00 29 MOV #0x00,0x29
38 18 CALL 0x43
39 3a 42 JMP PX,0x42
3b 8f 20 29 MOV #0x20,0x29
3e 18 CALL 0x43
3f 3e 42 JMP NPX,0x42
41 64 SET PT
42 5c END
43 ; --------------------------------------------------------------------------------------
43 ; Subroutine
43 ; --------------------------------------------------------------------------------------
43 da 80 1f 13 CHN_SND 0x1f,{F.UIR:13}
47 da 70 25 10 CHN_SND 0x25,{F.MDREG:10}
4b bc 54 FSM {54}
4d bc 4b FSM {4b}
4f da 80 19 13 CHN_SND 0x19,{F.UIR:13}
53 bc 3f FSM {3f}
55 da 72 2d 11 CHN_RCV {F.MDREG:11},0x2d
59 97 80 31 AND #0x80,0x31
5c 66 SET PX
5d 46 31 61 JMP NZ,0x31,0x61
60 6a CLR PX
61 2c RET
P11OF0 PASS_PX_WIRE 35 00 18 18 00 00 00 00 43 40 3F C3 3E 7D 03 00 3F C3 6E 7E 03 00 00 00 00 00 00 00 4C 00 00 00 00 00 00 00 00 8F 00 29 18 3A 42 8F 20 29 18 3E 42 64 5C DA 80 1F 13 DA 70 25 10 BC 54 BC 4B DA 80 19 13 BC 3F DA 72 2D 11 97 80 31 66 46 31 61 6A 2C