|
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: 1024 (0x400)
Types: SEQ, TextFile
Names: »RARELY_DISP_T_H_GOOD_FRU.SEQ«
└─⟦b4205821b⟧ Bits:30000743 8mm tape, Rational 1000, DFS, D_12_7_3 SEQ288
└─ ⟦this⟧ »RARELY_DISP_T_H_GOOD_FRU.SEQ«
└─⟦b434774df⟧ Bits:30000528 8mm tape, Rational 1000, DFS, D_12_6_5
└─ ⟦this⟧ »RARELY_DISP_T_H_GOOD_FRU.SEQ«
└─⟦bc1274df5⟧ Bits:30000750 8mm tape, Rational 1000, DFS backup from PAM's R1000
└─ ⟦this⟧ »RARELY_DISP_T_H_GOOD_FRU.SEQ«
10 ; --------------------------------------------------------------------------------------
10 ; Hash f7c4a77d4972d828 (no python module)
10 ; --------------------------------------------------------------------------------------
10 PC_:
10 30 .CODE EXPERIMENT
11 R1_:
11 00 .DATA 0x0 ; P11OF1 RARELY_DISP_T_H_GOOD
12 R2_:
12 27 .DATA 0x27
13 R3_:
13 1b .DATA 0x1b
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 58 .CODE 0x58
19 3f .DATA 0x3f
1a fc .DATA 0xfc
1b 3f .DATA 0x3f
1c fe .DATA 0xfe
1d 03 .DATA 0x3
1e 00 .DATA 0x0
1f 40 .DATA 0x40
20 00 .DATA 0x0 ; P20OS2 EXPECTED_RESULT
21 01 .DATA 0x1
22 33 .DATA 0x33
23 38 .DATA 0x38
24 00 .DATA 0x0
25 00 .DATA 0x0
26 ff .DATA 0xff
27 ff .DATA 0xff ; P27OS2 RESULT
28 ff .DATA 0xff
29 ff .DATA 0xff
2a ff .DATA 0xff
2b ff .DATA 0xff
2c ff .DATA 0xff
2d ff .DATA 0xff
2e ff .DATA 0xff
2f ff .DATA 0xff
30 EXPERIMENT:
30 0e REPEAT #0x0e
31 18 CALL 0x58
32 b0 22 20 27 57 VJMP NE,[0x2],0x20,0x27,0x57
37 18 CALL 0x58
38 b0 22 20 27 57 VJMP NE,[0x2],0x20,0x27,0x57
3d a7 02 LEFT.0 #0x1,R3,[0x2]
3f 82 1c INC 0x1c
41 97 1f 1b AND #0x1f,0x1b
44 90 1b 19 MOV.W 0x1b,0x19
47 a6 02 19 LEFT.0 #0x1,0x19,[0x2]
4a 97 3f 19 AND #0x3f,0x19
4d 90 1b 20 MOV.W 0x1b,0x20
50 8c 20 INV.W 0x20
52 97 3f 20 AND #0x3f,0x20
55 16 UNTIL
56 66 SET PX
57 5c END
58 ; --------------------------------------------------------------------------------------
58 ; Subroutine
58 ; --------------------------------------------------------------------------------------
58 b0 46 26 27 VMOV [0x6],0x26,0x27
5c da a0 20 41 CHN_SND 0x20,{S.UIR:41}
60 da b0 1b 42 CHN_SND 0x1b,{S.DECODER:42}
64 da c0 27 43 CHN_SND 0x27,{S.MISC:43}
68 bc 62 FSM {62}
6a da c2 27 36 CHN_RCV {S.MISC:36},0x27
6e 97 3f 27 AND #0x3f,0x27
71 2c RET
P11OF1 RARELY_DISP_T_H_GOOD P20OS2 EXPECTED_RESULT P27OS2 RESULT 30 00 27 1B 00 00 00 00 58 3F FC 3F FE 03 00 40 00 01 33 38 00 00 FF FF FF FF FF FF FF FF FF FF 0E 18 B0 22 20 27 57 18 B0 22 20 27 57 A7 02 82 1C 97 1F 1B 90 1B 19 A6 02 19 97 3F 19 90 1B 20 8C 20 97 3F 20 16 66 5C B0 46 26 27 DA A0 20 41 DA B0 1B 42 DA C0 27 43 BC 62 DA C2 27 36 97 3F 27 2C«nul»