|
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: 628 (0x274)
Types: M32, TextFile
Names: »CHECK_MEMORY_ONES.M32«
└─⟦24d56d853⟧ Bits:30000744 8mm tape, Rational 1000, DFS, D_12_6_5 SEQ293
└─ ⟦this⟧ »CHECK_MEMORY_ONES.M32«
└─⟦9031b0687⟧ Bits:30000407 8mm tape, Rational 1000, DFS, D_12_7_3
└─ ⟦this⟧ »CHECK_MEMORY_ONES.M32«
10 ; --------------------------------------------------------------------------------------
10 ; Hash faf7c4c4872b975b (no python module)
10 ; --------------------------------------------------------------------------------------
10 PC_:
10 38 .CODE EXPERIMENT
11 R1_:
11 00 .DATA 0x0 ; P11OF0 PASSED
12 R2_:
12 1a .DATA 0x1a
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 6d .CODE 0x6d
19 80 .CODE 0x80
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
21 00 .DATA 0x0
22 00 .DATA 0x0 ; P22OS1 FAIL_WORD
23 00 .DATA 0x0 ; P23IS1 SET_NUM
; P23OS2 FAIL_LINE
24 00 .DATA 0x0
25 00 .DATA 0x0 ; P25OS8 FAIL_DATA.TYP
26 00 .DATA 0x0
27 00 .DATA 0x0
28 00 .DATA 0x0
29 00 .DATA 0x0
2a 00 .DATA 0x0
2b 00 .DATA 0x0
2c 00 .DATA 0x0
2d 00 .DATA 0x0 ; P2DOS8 FAIL_DATA.VAL
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 ; P35OS1 FAIL_DATA.VPAR
36 00 .DATA 0x0 ; P36OS2 FAIL_DATA.CBITS
37 00 .DATA 0x0
38 EXPERIMENT:
38 c6 18 a2 WFSM.H #0x18,{a2}
3b b8 23 IDENT 0x23
3d 8e 23 24 MOV 0x23,0x24
40 97 40 24 AND #0x40,0x24
43 44 24 47 JMP Z,0x24,0x47
46 66 SET PX
47 da 01 03 CHN_SND @R2,{M.MAR:03}
4a c6 00 04 WFSM.H #0x00,{04}
4d c0 23 04 WP2_FSM 0x23,{04}
50 8e 23 24 MOV 0x23,0x24
53 10 REPEAT #0x10
54 d8 FSM2
55 62 0a DELAY #0x0a
57 28 CALL NPX,0x6d
58 21 CALL PX,0x80
59 f0 93 JMP DFLG,0x93
5b c6 00 04 WFSM.H #0x00,{04}
5e 82 24 INC 0x24
60 c0 24 04 WP2_FSM 0x24,{04}
63 16 UNTIL
64 82 22 INC 0x22
66 4f 40 22 47 JMP NE,#0x40,0x22,0x47
6a 64 SET PT
6b 36 9e JMP 0x9e
6d ; --------------------------------------------------------------------------------------
6d ; Subroutine
6d ; --------------------------------------------------------------------------------------
6d bc 3d FSM {3d}
6f bc 00 FSM {00}
71 c6 f7 14 WFSM.H #0xf7,{14}
74 f0 93 JMP DFLG,0x93
76 bc 3d FSM {3d}
78 f2 6f JMP NDFLG,0x6f
7a bc 00 FSM {00}
7c c6 f7 14 WFSM.H #0xf7,{14}
7f 2c RET
80 ; --------------------------------------------------------------------------------------
80 ; Subroutine
80 ; --------------------------------------------------------------------------------------
80 bc bd FSM {bd}
82 bc 00 FSM {00}
84 c6 f7 14 WFSM.H #0xf7,{14}
87 f0 93 JMP DFLG,0x93
89 bc bd FSM {bd}
8b f2 82 JMP NDFLG,0x82
8d bc 00 FSM {00}
8f c6 f7 14 WFSM.H #0xf7,{14}
92 2c RET
93 cc 84 24 RFSM.H {84},0x24
96 cc 84 23 RFSM.H {84},0x23
99 88 23 DEC.W 0x23
9b 97 0f 23 AND #0x0f,0x23
9e 3a a4 JMP PX,0xa4
a0 bc 27 FSM {27}
a2 36 a6 JMP 0xa6
a4 bc a7 FSM {a7}
a6 da 12 25 85 CHN_RCV {M.DREG_FULL:85},0x25
aa c6 f8 a2 WFSM.H #0xf8,{a2}
ad d8 FSM2
ae 5c END
P23IS1 SET_NUM P11OF0 PASSED P23OS2 FAIL_LINE P22OS1 FAIL_WORD P25OS8 FAIL_DATA.TYP P2DOS8 FAIL_DATA.VAL P35OS1 FAIL_DATA.VPAR P36OS2 FAIL_DATA.CBITS 38 00 1A 18 00 00 00 00 6D 80 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 00 00 C6 18 A2 B8 23 8E 23 24 97 40 24 44 24 47 66 DA 01 03 C6 00 04 C0 23 04 8E 23 24 10 D8 62 0A 28 21 F0 93 C6 00 04 82 24 C0 24 04 16 82 22 4F 40 22 47 64 36 9E BC 3D BC 00 C6 F7 14 F0 93 BC 3D F2 6F BC 00 C6 F7 14 2C BC BD BC 00 C6 F7 14 F0 93 BC BD F2 82 BC 00 C6 F7 14 2C CC 84 24 CC 84 23 88 23 97 0F 23 3A A4 BC 27 36 A6 BC A7 DA 12 25 85 C6 F8 A2 D8 5C