|
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: 365 (0x16d)
Types: SEQ, TextFile
Names: »TEST_FLOAT_RESOLVE_RAMS.SEQ«
└─⟦24d56d853⟧ Bits:30000744 8mm tape, Rational 1000, DFS, D_12_6_5 SEQ293
└─ ⟦this⟧ »TEST_FLOAT_RESOLVE_RAMS.SEQ«
└─⟦9031b0687⟧ Bits:30000407 8mm tape, Rational 1000, DFS, D_12_7_3
└─ ⟦this⟧ »TEST_FLOAT_RESOLVE_RAMS.SEQ«
10 ; --------------------------------------------------------------------------------------
10 ; Hash 372bb6468a1cf17a (no python module)
10 ; --------------------------------------------------------------------------------------
10 PC_:
10 3b .CODE EXPERIMENT
11 R1_:
11 00 .DATA 0x0 ; P11OF1 WALK_RESOLVE_RAMS
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 5d .CODE 0x5d
19 6d .CODE 0x6d
1a 40 .DATA 0x40
1b ff .DATA 0xff ; P1BOS8 EXPECTED_RESULT
1c ff .DATA 0xff
1d ff .DATA 0xff
1e ff .DATA 0xff
1f ff .DATA 0xff
20 ff .DATA 0xff
21 ff .DATA 0xff
22 fe .DATA 0xfe
23 ff .DATA 0xff
24 ff .DATA 0xff
25 ff .DATA 0xff
26 ff .DATA 0xff
27 07 .DATA 0x7
28 ff .DATA 0xff
29 ff .DATA 0xff
2a 80 .DATA 0x80
2b 00 .DATA 0x0 ; P2BOS8 BAD_BITS
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
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 EXPERIMENT:
3b da 90 1b 40 CHN_SND 0x1b,{S.TYPVAL:40}
3f 18 CALL 0x5d
40 bc 31 FSM {31}
42 19 CALL 0x6d
43 da 92 2b 30 CHN_RCV {S.TYPVAL:30},0x2b
47 b0 c8 1b 2b VXOR [0x8],0x1b,0x2b
4b b0 88 23 2b VAND [0x8],0x23,0x2b
4f ae 28 2b 5c VJMP NZ,[0x8],0x2b,0x5c
53 a6 08 1b LEFT.0 #0x1,0x1b,[0x8]
56 82 22 INC 0x22
58 54 1a 3b DJNZ 0x1a,EXPERIMENT
5b 66 SET PX
5c 5c END
5d ; --------------------------------------------------------------------------------------
5d ; Subroutine
5d ; --------------------------------------------------------------------------------------
5d bc 4e FSM {4e}
5f bc 5a FSM {5a}
61 10 REPEAT #0x10
62 c4 ff 43 WFSM.L #0xff,{43}
65 16 UNTIL
66 da 90 1b 40 CHN_SND 0x1b,{S.TYPVAL:40}
6a bc 66 FSM {66}
6c 2c RET
6d ; --------------------------------------------------------------------------------------
6d ; Subroutine
6d ; --------------------------------------------------------------------------------------
6d bc 4e FSM {4e}
6f bc 5b FSM {5b}
71 bc 3e FSM {3e}
73 2c RET
P11OF1 WALK_RESOLVE_RAMS P1BOS8 EXPECTED_RESULT P2BOS8 BAD_BITS 3B 00 18 18 00 00 00 00 5D 6D 40 FF FF FF FF FF FF FF FE FF FF FF FF 07 FF FF 80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 DA 90 1B 40 18 BC 31 19 DA 92 2B 30 B0 C8 1B 2B B0 88 23 2B AE 28 2B 5C A6 08 1B 82 22 54 1A 3B 66 5C BC 4E BC 5A 10 C4 FF 43 16 DA 90 1B 40 BC 66 2C BC 4E BC 5B BC 3E 2C