|
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: »IBUFF_FRU.SEQ«
└─⟦b4205821b⟧ Bits:30000743 8mm tape, Rational 1000, DFS, D_12_7_3 SEQ288
└─ ⟦this⟧ »IBUFF_FRU.SEQ«
└─⟦b434774df⟧ Bits:30000528 8mm tape, Rational 1000, DFS, D_12_6_5
└─ ⟦this⟧ »IBUFF_FRU.SEQ«
└─⟦bc1274df5⟧ Bits:30000750 8mm tape, Rational 1000, DFS backup from PAM's R1000
└─ ⟦this⟧ »IBUFF_FRU.SEQ«
10 ; --------------------------------------------------------------------------------------
10 ; Hash ee33ade44b7a4037 (no python module)
10 ; --------------------------------------------------------------------------------------
10 PC_:
10 3c .CODE EXPERIMENT
11 R1_:
11 00 .DATA 0x0 ; P11OF0 IBUFF_FRU_PASSED
12 R2_:
12 19 .DATA 0x19
13 R3_:
13 3d .DATA 0x3d
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 6b .CODE 0x6b
19 ff .DATA 0xff ; P19OS8 EXPECTED.TYP
1a ff .DATA 0xff
1b ff .DATA 0xff
1c ff .DATA 0xff
1d ff .DATA 0xff
1e ff .DATA 0xff
1f ff .DATA 0xff
20 ff .DATA 0xff
21 ff .DATA 0xff ; P21OS8 EXPECTED.VAL
22 ff .DATA 0xff
23 ff .DATA 0xff
24 ff .DATA 0xff
25 ff .DATA 0xff
26 ff .DATA 0xff
27 ff .DATA 0xff
28 ff .DATA 0xff
29 10 .DATA 0x10 ; P29OS1 BIT_INDEX
2a 08 .DATA 0x8 ; P2AOS1 INSTR_COUNT
2b 00 .DATA 0x0
2c 00 .DATA 0x0
2d 00 .DATA 0x0
2e 30 .DATA 0x30
2f 00 .DATA 0x0 ; P2FOS8 IBUFF.TYP
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 ; P37OS8 IBUFF.VAL
38 00 .DATA 0x0
39 00 .DATA 0x0
3a 00 .DATA 0x0
3b 00 .DATA 0x0
3c EXPERIMENT:
3c 18 CALL 0x6b
3d 86 28 DEC 0x28
3f 70 29 LD R2,0x29
41 78 DEC R2
42 78 DEC R2
43 91 00 52 2d MOV.W #0x0052,0x2d
47 18 CALL 0x6b
48 91 02 00 2d MOV.W #0x0200,0x2d
4c 18 CALL 0x6b
4d bc 3e FSM {3e}
4f da 92 2f 30 CHN_RCV {S.TYPVAL:30},0x2f
53 b1 22 6a VJMP NE,[0x2],R2,R3,0x6a
56 a6 10 19 LEFT.0 #0x1,0x19,[0x10]
59 9b 01 28 OR #0x01,0x28
5c 54 29 43 DJNZ 0x29,0x43
5f 8f 10 29 MOV #0x10,0x29
62 8f 27 2e MOV #0x27,0x2e
65 18 CALL 0x6b
66 54 2a 41 DJNZ 0x2a,0x41
69 64 SET PT
6a 5c END
6b ; --------------------------------------------------------------------------------------
6b ; Subroutine
6b ; --------------------------------------------------------------------------------------
6b da a0 29 41 CHN_SND 0x29,{S.UIR:41}
6f 10 REPEAT #0x10
70 c4 ff 43 WFSM.L #0xff,{43}
73 16 UNTIL
74 da 90 19 40 CHN_SND 0x19,{S.TYPVAL:40}
78 bc 66 FSM {66}
7a 2c RET
P11OF0 IBUFF_FRU_PASSED P19OS8 EXPECTED.TYP P21OS8 EXPECTED.VAL P2FOS8 IBUFF.TYP P37OS8 IBUFF.VAL P2AOS1 INSTR_COUNT P29OS1 BIT_INDEX 3C 00 19 3D 00 00 00 00 6B FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF 10 08 00 00 00 30 00 00 00 00 00 00 00 00 00 00 00 00 00 18 86 28 70 29 78 78 91 00 52 2D 18 91 02 00 2D 18 BC 3E DA 92 2F 30 B1 22 6A A6 10 19 9B 01 28 54 29 43 8F 10 29 8F 27 2E 18 54 2A 41 64 5C DA A0 29 41 10 C4 FF 43 16 DA 90 19 40 BC 66 2C«nul»