|
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: 285 (0x11d)
Types: FIU, TextFile
Names: »TEST_WCS_PARITY.FIU«
└─⟦24d56d853⟧ Bits:30000744 8mm tape, Rational 1000, DFS, D_12_6_5 SEQ293
└─⟦this⟧ »TEST_WCS_PARITY.FIU«
└─⟦9031b0687⟧ Bits:30000407 8mm tape, Rational 1000, DFS, D_12_7_3
└─⟦this⟧ »TEST_WCS_PARITY.FIU«
10 ; --------------------------------------------------------------------------------------
10 ; Hash 8c98db0bab387c71 (no python module)
10 ; --------------------------------------------------------------------------------------
10 PC_:
10 28 .CODE EXPERIMENT
11 R1_:
11 00 .DATA 0x0 ; P11OF0 PASS_WCS_PAR
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 4a .CODE 0x4a
19 60 .CODE 0x60
1a 00 .DATA 0x0
1b 00 .DATA 0x0
1c 00 .DATA 0x0
1d 00 .DATA 0x0
1e 00 .DATA 0x0
1f 03 .DATA 0x3
20 ff .DATA 0xff
21 ff .DATA 0xff
22 ff .DATA 0xff
23 ff .DATA 0xff
24 ff .DATA 0xff
25 fc .DATA 0xfc
26 00 .DATA 0x0
27 00 .DATA 0x0
28 EXPERIMENT:
28 18 CALL 0x4a
29 07 REPEAT #0x07
2a 19 CALL 0x60
2b 16 UNTIL
2c 06 REPEAT #0x06
2d 18 CALL 0x4a
2e 16 UNTIL
2f 02 REPEAT #0x02
30 19 CALL 0x60
31 16 UNTIL
32 00 15 REPEAT #0x15
34 18 CALL 0x4a
35 16 UNTIL
36 03 REPEAT #0x03
37 19 CALL 0x60
38 16 UNTIL
39 06 REPEAT #0x06
3a 18 CALL 0x4a
3b 16 UNTIL
3c 3a 48 JMP PX,0x48
3e 66 SET PX
3f b0 46 20 1a VMOV [0x6],0x20,0x1a
43 8f 04 26 MOV #0x04,0x26
46 36 28 JMP EXPERIMENT
48 64 SET PT
49 5c END
4a ; --------------------------------------------------------------------------------------
4a ; Subroutine
4a ; --------------------------------------------------------------------------------------
4a d2 ff 50 FSM_8X #0xff,{50}
4d da 80 1a 13 CHN_SND 0x1a,{F.UIR:13}
51 bc 53 FSM {53}
53 d4 08 51 27 RCV_P1 #0x08,{51},0x27
57 97 04 27 AND #0x04,0x27
5a 4e 27 26 49 JMP NE,0x27,0x26,0x49
5e 19 CALL 0x60
5f 2c RET
60 ; --------------------------------------------------------------------------------------
60 ; Subroutine
60 ; --------------------------------------------------------------------------------------
60 a6 06 1a LEFT.0 #0x1,0x1a,[0x6]
63 3e 67 JMP NPX,0x67
65 82 1f INC 0x1f
67 2c RET
P11OF0 PASS_WCS_PAR 28 00 18 18 00 00 00 00 4A 60 00 00 00 00 00 03 FF FF FF FF FF FC 00 00 18 07 19 16 06 18 16 02 19 16 00 15 18 16 03 19 16 06 18 16 3A 48 66 B0 46 20 1A 8F 04 26 36 28 64 5C D2 FF 50 DA 80 1A 13 BC 53 D4 08 51 27 97 04 27 4E 27 26 49 19 2C A6 06 1A 3E 67 82 1F 2C