|
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: 322 (0x142)
Types: SEQ, TextFile
Names: »RARELY_RETURN_F_H_BAD_FRU.SEQ«
└─⟦24d56d853⟧ Bits:30000744 8mm tape, Rational 1000, DFS, D_12_6_5 SEQ293
└─ ⟦this⟧ »RARELY_RETURN_F_H_BAD_FRU.SEQ«
└─⟦9031b0687⟧ Bits:30000407 8mm tape, Rational 1000, DFS, D_12_7_3
└─ ⟦this⟧ »RARELY_RETURN_F_H_BAD_FRU.SEQ«
10 ; --------------------------------------------------------------------------------------
10 ; Hash 0f17b5906b357eff (no python module)
10 ; --------------------------------------------------------------------------------------
10 PC_:
10 31 .CODE EXPERIMENT
11 R1_:
11 00 .DATA 0x0 ; P11OF1 RARELY_RETURN_F_H_BAD
12 R2_:
12 28 .DATA 0x28
13 R3_:
13 19 .DATA 0x19
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 57 .CODE 0x57
19 3f .DATA 0x3f ; P19OS2 EXPECTED_RESULT
1a fe .DATA 0xfe
1b 26 .DATA 0x26
1c 2e .DATA 0x2e
1d 00 .DATA 0x0
1e 00 .DATA 0x0
1f 00 .DATA 0x0
20 01 .DATA 0x1
21 ff .DATA 0xff
22 ff .DATA 0xff
23 7f .DATA 0x7f
24 ff .DATA 0xff
25 ff .DATA 0xff
26 ff .DATA 0xff
27 ff .DATA 0xff
28 00 .DATA 0x0 ; P28OS2 RESULT
29 00 .DATA 0x0
2a 00 .DATA 0x0
2b 00 .DATA 0x0
2c 00 .DATA 0x0
2d 00 .DATA 0x0
2e 00 .DATA 0x0
2f 00 .DATA 0x0
30 00 .DATA 0x0
31 EXPERIMENT:
31 0e REPEAT #0x0e
32 da c0 1f 43 CHN_SND 0x1f,{S.MISC:43}
36 18 CALL 0x57
37 b1 22 56 VJMP NE,[0x2],R2,R3,0x56
3a b0 44 21 2a VMOV [0x4],0x21,0x2a
3e 88 28 DEC.W 0x28
40 da c0 28 43 CHN_SND 0x28,{S.MISC:43}
44 18 CALL 0x57
45 b0 22 1f 28 56 VJMP NE,[0x2],0x1f,0x28,0x56
4a a7 02 LEFT.0 #0x1,R3,[0x2]
4c 84 19 INC.W 0x19
4e a6 02 1f LEFT.0 #0x1,0x1f,[0x2]
51 97 3f 19 AND #0x3f,0x19
54 16 UNTIL
55 66 SET PX
56 5c END
57 ; --------------------------------------------------------------------------------------
57 ; Subroutine
57 ; --------------------------------------------------------------------------------------
57 da a0 19 41 CHN_SND 0x19,{S.UIR:41}
5b bc 62 FSM {62}
5d da c2 28 36 CHN_RCV {S.MISC:36},0x28
61 97 3f 28 AND #0x3f,0x28
64 2c RET
P11OF1 RARELY_RETURN_F_H_BAD P19OS2 EXPECTED_RESULT P28OS2 RESULT 31 00 28 19 00 00 00 00 57 3F FE 26 2E 00 00 00 01 FF FF 7F FF FF FF FF 00 00 00 00 00 00 00 00 00 0E DA C0 1F 43 18 B1 22 56 B0 44 21 2A 88 28 DA C0 28 43 18 B0 22 1F 28 56 A7 02 84 19 A6 02 1F 97 3F 19 16 66 5C DA A0 19 41 BC 62 DA C2 28 36 97 3F 28 2C