|
|
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: 485 (0x1e5)
Types: M32, TextFile
Names: »READ_RDR.M32«
└─⟦24d56d853⟧ Bits:30000744 8mm tape, Rational 1000, DFS, D_12_6_5 SEQ293
└─⟦this⟧ »READ_RDR.M32«
└─⟦9031b0687⟧ Bits:30000407 8mm tape, Rational 1000, DFS, D_12_7_3
└─⟦this⟧ »READ_RDR.M32«
10 ; --------------------------------------------------------------------------------------
10 ; Hash 6b4515fedf359550 (no python module)
10 ; --------------------------------------------------------------------------------------
10 PC_:
10 30 .CODE EXPERIMENT
11 R1_:
11 00 .DATA 0x0 ; P11IF0 DIRECT
; P11IF1 FLIP_DRIVE
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 00 .DATA 0x0 ; P18OS8 RDR_DATA.TYP
19 00 .DATA 0x0
1a 00 .DATA 0x0
1b 00 .DATA 0x0
1c 00 .DATA 0x0
1d 00 .DATA 0x0
1e 00 .DATA 0x0
1f 00 .DATA 0x0
20 00 .DATA 0x0 ; P20OS8 RDR_DATA.VAL
21 00 .DATA 0x0
22 00 .DATA 0x0
23 00 .DATA 0x0
24 00 .DATA 0x0
25 00 .DATA 0x0
26 00 .DATA 0x0
27 00 .DATA 0x0
28 00 .DATA 0x0 ; P28OS1 RDR_DATA.VPAR
29 00 .DATA 0x0 ; P29OS2 RDR_DATA.CBITS
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 EXPERIMENT:
30 c6 fe a2 WFSM.H #0xfe,{a2}
33 cc 36 2b RFSM.H {36},0x2b
36 8e 2b 2d MOV 0x2b,0x2d
39 97 03 2d AND #0x03,0x2d
3c 8a 2b INV 0x2b
3e 8e 2b 2c MOV 0x2b,0x2c
41 97 04 2c AND #0x04,0x2c
44 44 2c 4a JMP Z,0x2c,0x4a
47 9b 04 2d OR #0x04,0x2d
4a 38 58 JMP PT,0x58
4c 3a 53 JMP PX,0x53
4e 44 2c 5a JMP Z,0x2c,0x5a
51 36 5e JMP 0x5e
53 46 2c 5a JMP NZ,0x2c,0x5a
56 36 5e JMP 0x5e
58 3a 5e JMP PX,0x5e
5a bc 27 FSM {27}
5c 36 60 JMP 0x60
5e bc a7 FSM {a7}
60 da 13 85 CHN_RCV {M.DREG_FULL:85},@R3
63 97 0c 2b AND #0x0c,0x2b
66 44 2b 84 JMP Z,0x2b,0x84
69 c6 7a a2 WFSM.H #0x7a,{a2}
6c cc 84 2f RFSM.H {84},0x2f
6f cc 84 2e RFSM.H {84},0x2e
72 c6 00 04 WFSM.H #0x00,{04}
75 b8 2d IDENT 0x2d
77 c0 2d 04 WP2_FSM 0x2d,{04}
7a bc 02 FSM {02}
7c c0 2f 04 WP2_FSM 0x2f,{04}
7f c0 2e 04 WP2_FSM 0x2e,{04}
82 36 86 JMP 0x86
84 bc 9f FSM {9f}
86 c6 fa a2 WFSM.H #0xfa,{a2}
89 d8 FSM2
8a 5c END
P11IF0 DIRECT P11IF1 FLIP_DRIVE P18OS8 RDR_DATA.TYP P20OS8 RDR_DATA.VAL P28OS1 RDR_DATA.VPAR P29OS2 RDR_DATA.CBITS 30 00 18 18 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 C6 FE A2 CC 36 2B 8E 2B 2D 97 03 2D 8A 2B 8E 2B 2C 97 04 2C 44 2C 4A 9B 04 2D 38 58 3A 53 44 2C 5A 36 5E 46 2C 5A 36 5E 3A 5E BC 27 36 60 BC A7 DA 13 85 97 0C 2B 44 2B 84 C6 7A A2 CC 84 2F CC 84 2E C6 00 04 B8 2D C0 2D 04 BC 02 C0 2F 04 C0 2E 04 36 86 BC 9F C6 FA A2 D8 5C