|
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 - download
Length: 462 (0x1ce)
Types: TYP, TextFile
Names: »TEST_DEC_A_OP.TYP«
└─⟦24d56d853⟧ Bits:30000744 8mm tape, Rational 1000, DFS, D_12_6_5 SEQ293
└─ ⟦this⟧ »TEST_DEC_A_OP.TYP«
└─⟦9031b0687⟧ Bits:30000407 8mm tape, Rational 1000, DFS, D_12_7_3
└─ ⟦this⟧ »TEST_DEC_A_OP.TYP«
10 ; --------------------------------------------------------------------------------------
10 ; Hash c3d594868af2e65e (no python module)
10 ; --------------------------------------------------------------------------------------
10 PC_:
10 3c .CODE EXPERIMENT
11 R1_:
11 00 .DATA 0x0 ; P11OF0 DEC_A_OP_PASS
; P11OF1 B_INPUT_ZEROS
12 R2_:
12 2b .DATA 0x2b
13 R3_:
13 33 .DATA 0x33
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 5d .CODE 0x5d
19 71 .DATA 0x71
1a ef .DATA 0xef
1b e0 .DATA 0xe0
1c ff .DATA 0xff
1d b9 .DATA 0xb9
1e 0d .DATA 0xd
1f 71 .DATA 0x71
20 df .DATA 0xdf
21 e0 .DATA 0xe0
22 ff .DATA 0xff
23 b9 .DATA 0xb9
24 0d .DATA 0xd
25 71 .DATA 0x71
26 cf .DATA 0xcf
27 e0 .DATA 0xe0
28 8f .DATA 0x8f
29 83 .DATA 0x83
2a 0d .DATA 0xd
2b 00 .DATA 0x0 ; P2BOS8 EXPECT
2c 00 .DATA 0x0
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 ; P33OS8 RESULT
34 00 .DATA 0x0
35 00 .DATA 0x0
36 00 .DATA 0x0
37 00 .DATA 0x0
38 00 .DATA 0x0
39 00 .DATA 0x0
3a 00 .DATA 0x0
3b 00 .DATA 0x0
3c EXPERIMENT:
3c 00 41 REPEAT #0x41
3e da 50 19 3b CHN_SND 0x19,{T.UIR:3b}
42 18 CALL 0x5d
43 66 SET PX
44 b1 28 5c VJMP NE,[0x8],R2,R3,0x5c
47 da 50 1f 3b CHN_SND 0x1f,{T.UIR:3b}
4b 18 CALL 0x5d
4c 6a CLR PX
4d b1 28 5c VJMP NE,[0x8],R2,R3,0x5c
50 a6 08 2b LEFT.0 #0x1,0x2b,[0x8]
53 82 32 INC 0x32
55 da 50 25 3b CHN_SND 0x25,{T.UIR:3b}
59 18 CALL 0x5d
5a 16 UNTIL
5b 64 SET PT
5c 5c END
5d ; --------------------------------------------------------------------------------------
5d ; Subroutine
5d ; --------------------------------------------------------------------------------------
5d c8 ff ff 2b WFSM.W #0xffff,{2b}
61 bc 4b FSM {4b}
63 bc 13 FSM {13}
65 d2 00 3b FSM_8X #0x00,{3b}
68 bc 5c FSM {5c}
6a da 33 39 CHN_RCV {TV.WDR:39},@R3
6d af 88 VINV [0x8],R3
6f 2c RET
P11OF0 DEC_A_OP_PASS\r P11OF1 B_INPUT_ZEROS\r P2BOS8 EXPECT\r P33OS8 RESULT\r \r 3C\r 00\r 2B\r 33\r 00\r 00\r 00\r 00\r \r 5D\r 71\r EF\r E0\r FF\r B9\r 0D\r 71\r DF\r E0\r FF\r B9\r 0D\r 71\r CF\r E0\r 8F\r 83\r 0D\r 00\r 00\r 00\r 00\r 00\r 00\r 00\r 00\r 00\r 00\r 00\r 00\r 00\r 00\r 00\r 00\r 00\r 00\r 41\r DA\r 50\r 19\r 3B\r 18\r 66\r B1\r 28\r 5C\r DA\r 50\r 1F\r 3B\r 18\r 6A\r B1\r 28\r 5C\r A6\r 08\r 2B\r 82\r 32\r DA\r 50\r 25\r 3B\r 18\r 16\r 64\r 5C\r C8\r FF\r FF\r 2B\r BC\r 4B\r BC\r 13\r D2\r 00\r 3B\r BC\r 5C\r DA\r 33\r 39\r AF\r 88\r 2C\r