|
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: »TEST_CTRLREAD_LL_4.SEQ«
└─⟦b4205821b⟧ Bits:30000743 8mm tape, Rational 1000, DFS, D_12_7_3 SEQ288
└─ ⟦this⟧ »TEST_CTRLREAD_LL_4.SEQ«
└─⟦b434774df⟧ Bits:30000528 8mm tape, Rational 1000, DFS, D_12_6_5
└─ ⟦this⟧ »TEST_CTRLREAD_LL_4.SEQ«
└─⟦bc1274df5⟧ Bits:30000750 8mm tape, Rational 1000, DFS backup from PAM's R1000
└─ ⟦this⟧ »TEST_CTRLREAD_LL_4.SEQ«
10 ; --------------------------------------------------------------------------------------
10 ; Hash c9afd7cc29be667a (no python module)
10 ; --------------------------------------------------------------------------------------
10 PC_:
10 2d .CODE EXPERIMENT
11 R1_:
11 00 .DATA 0x0 ; P11OF0 TEST_CONTROL_READ_LEX_LEVEL_DELTA4
12 R2_:
12 1c .DATA 0x1c
13 R3_:
13 1d .DATA 0x1d
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 5d .CODE 0x5d
19 67 .CODE 0x67
1a 55 .CODE 0x55
1b 0f .DATA 0xf ; P1BOS1 LEX
1c 0f .DATA 0xf ; P1COS1 DELTA_OFFSET
1d 00 .DATA 0x0 ; P1DOS1 BAD_BITS
1e 00 .DATA 0x0
1f 00 .DATA 0x0
20 00 .DATA 0x0
21 00 .DATA 0x0
22 00 .DATA 0x0
23 00 .DATA 0x0
24 00 .DATA 0x0 ; P24OS1 ADD_RESULT
25 00 .DATA 0x0
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 EXPERIMENT:
2d 8e 1b 1d MOV 0x1b,0x1d
30 9b f0 1d OR #0xf0,0x1d
33 a6 01 1d LEFT.0 #0x1,0x1d,[0x1]
36 8e 1c 1e MOV 0x1c,0x1e
39 18 CALL 0x5d
3a 19 CALL 0x67
3b 8e 1b 1d MOV 0x1b,0x1d
3e b1 61 VADD [0x1],R2,R3
40 b0 c1 24 1d VXOR [0x1],0x24,0x1d
44 97 0f 1d AND #0x0f,0x1d
47 46 1d 54 JMP NZ,0x1d,0x54
4a 58 1b 2d DJNN 0x1b,EXPERIMENT
4d 8f 0f 1b MOV #0x0f,0x1b
50 58 1c 2d DJNN 0x1c,EXPERIMENT
53 64 SET PT
54 5c END
55 ; --------------------------------------------------------------------------------------
55 ; Subroutine
55 ; --------------------------------------------------------------------------------------
55 bc 4e FSM {4e}
57 10 REPEAT #0x10
58 c4 ff 43 WFSM.L #0xff,{43}
5b 16 UNTIL
5c 2c RET
5d ; --------------------------------------------------------------------------------------
5d ; Subroutine
5d ; --------------------------------------------------------------------------------------
5d da 90 1d 40 CHN_SND 0x1d,{S.TYPVAL:40}
61 1a CALL 0x55
62 bc 5a FSM {5a}
64 bc 66 FSM {66}
66 2c RET
67 ; --------------------------------------------------------------------------------------
67 ; Subroutine
67 ; --------------------------------------------------------------------------------------
67 1a CALL 0x55
68 bc 5b FSM {5b}
6a bc 62 FSM {62}
6c da 92 1d 30 CHN_RCV {S.TYPVAL:30},0x1d
70 07 REPEAT #0x07
71 a8 04 21 SR.0 #0x1,0x21,[0x4]
74 16 UNTIL
75 2c RET
P11OF0 TEST_CONTROL_READ_LEX_LEVEL_DELTA4 P1BOS1 LEX P1COS1 DELTA_OFFSET P24OS1 ADD_RESULT P1DOS1 BAD_BITS 2D 00 1C 1D 00 00 00 00 5D 67 55 0F 0F 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 8E 1B 1D 9B F0 1D A6 01 1D 8E 1C 1E 18 19 8E 1B 1D B1 61 B0 C1 24 1D 97 0F 1D 46 1D 54 58 1B 2D 8F 0F 1B 58 1C 2D 64 5C BC 4E 10 C4 FF 43 16 2C DA 90 1D 40 1A BC 5A BC 66 2C 1A BC 5B BC 62 DA 92 1D 30 07 A8 04 21 16 2C«nul»