|
|
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: 411 (0x19b)
Types: SEQ, TextFile
Names: »RPC_FRU.SEQ«
└─⟦24d56d853⟧ Bits:30000744 8mm tape, Rational 1000, DFS, D_12_6_5 SEQ293
└─⟦this⟧ »RPC_FRU.SEQ«
└─⟦9031b0687⟧ Bits:30000407 8mm tape, Rational 1000, DFS, D_12_7_3
└─⟦this⟧ »RPC_FRU.SEQ«
10 ; --------------------------------------------------------------------------------------
10 ; Hash 5c99aa5702e14a5d (no python module)
10 ; --------------------------------------------------------------------------------------
10 PC_:
10 36 .CODE EXPERIMENT
11 R1_:
11 00 .DATA 0x0 ; P11OF0 RETURN_PC_PASSED
12 R2_:
12 30 .DATA 0x30
13 R3_:
13 22 .DATA 0x22
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 5f .CODE 0x5f
19 67 .CODE 0x67
1a 27 .DATA 0x27
1b 00 .DATA 0x0 ; P1BOS8 RETURN_PC.TYP
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 ; P22OS8 PATTERN.TYP
23 00 .DATA 0x0 ; P23OS8 RETURN_PC.VAL
24 00 .DATA 0x0
25 00 .DATA 0x0
26 00 .DATA 0x0
27 00 .DATA 0x0
28 00 .DATA 0x0
29 00 .DATA 0x0
2a 00 .DATA 0x0 ; P2AOS8 PATTERN.VAL
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 10 .DATA 0x10
32 00 .DATA 0x0
33 00 .DATA 0x0
34 00 .DATA 0x0
35 00 .DATA 0x0
36 EXPERIMENT:
36 18 CALL 0x5f
37 91 00 20 34 MOV.W #0x0020,0x34
3b 19 CALL 0x67
3c 18 CALL 0x5f
3d 91 04 03 34 MOV.W #0x0403,0x34
41 19 CALL 0x67
42 bc 3e FSM {3e}
44 da 92 1b 30 CHN_RCV {S.TYPVAL:30},0x1b
48 97 f0 2a AND #0xf0,0x2a
4b b0 27 24 2b 5e VJMP NE,[0x7],0x24,0x2b,0x5e
50 a7 10 LEFT.0 #0x1,R3,[0x10]
52 4f 19 1a 5a JMP NE,#0x19,0x1a,0x5a
56 0d REPEAT #0x0d
57 a7 10 LEFT.0 #0x1,R3,[0x10]
59 16 UNTIL
5a 54 1a 36 DJNZ 0x1a,EXPERIMENT
5d 64 SET PT
5e 5c END
5f ; --------------------------------------------------------------------------------------
5f ; Subroutine
5f ; --------------------------------------------------------------------------------------
5f 91 00 30 34 MOV.W #0x0030,0x34
63 19 CALL 0x67
64 af 90 VINV [0x10],R3
66 2c RET
67 ; --------------------------------------------------------------------------------------
67 ; Subroutine
67 ; --------------------------------------------------------------------------------------
67 da a1 41 CHN_SND @R2,{S.UIR:41}
6a 10 REPEAT #0x10
6b c4 ff 43 WFSM.L #0xff,{43}
6e 16 UNTIL
6f da 90 22 40 CHN_SND 0x22,{S.TYPVAL:40}
73 bc 66 FSM {66}
75 2c RET
P11OF0 RETURN_PC_PASSED P22OS8 PATTERN.TYP P2AOS8 PATTERN.VAL P1BOS8 RETURN_PC.TYP P23OS8 RETURN_PC.VAL 36 00 30 22 00 00 00 00 5F 67 27 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 10 00 00 00 00 18 91 00 20 34 19 18 91 04 03 34 19 BC 3E DA 92 1B 30 97 F0 2A B0 27 24 2B 5E A7 10 4F 19 1A 5A 0D A7 10 16 54 1A 36 64 5C 91 00 30 34 19 AF 90 2C DA A1 41 10 C4 FF 43 16 DA 90 22 40 BC 66 2C