|
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_BRANCH_NO_DISP_1_POS.SEQ«
└─⟦b4205821b⟧ Bits:30000743 8mm tape, Rational 1000, DFS, D_12_7_3 SEQ288
└─ ⟦this⟧ »TEST_BRANCH_NO_DISP_1_POS.SEQ«
└─⟦b434774df⟧ Bits:30000528 8mm tape, Rational 1000, DFS, D_12_6_5
└─ ⟦this⟧ »TEST_BRANCH_NO_DISP_1_POS.SEQ«
└─⟦bc1274df5⟧ Bits:30000750 8mm tape, Rational 1000, DFS backup from PAM's R1000
└─ ⟦this⟧ »TEST_BRANCH_NO_DISP_1_POS.SEQ«
10 ; --------------------------------------------------------------------------------------
10 ; Hash b3efd3276acefe93 (no python module)
10 ; --------------------------------------------------------------------------------------
10 PC_:
10 2f .CODE EXPERIMENT
11 R1_:
11 00 .DATA 0x0 ; P11OF0 TEST_BRANCH_ADDER
12 R2_:
12 18 .DATA 0x18
13 R3_:
13 1f .DATA 0x1f
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 7c .CODE 0x7c
19 74 .CODE 0x74
1a 6a .CODE 0x6a
1b 00 .DATA 0x0 ; P1BOS2 PC
1c 00 .DATA 0x0
1d 00 .DATA 0x0 ; P1DOS2 INSTRUCTION
1e 00 .DATA 0x0
1f 00 .DATA 0x0 ; P1FOS2 EXPECTED
20 00 .DATA 0x0
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
29 00 .DATA 0x0
2a 00 .DATA 0x0
2b 00 .DATA 0x0
2c 00 .DATA 0x0
2d 00 .DATA 0x0 ; P2DOS2 RESULT
2e 00 .DATA 0x0
2f EXPERIMENT:
2f 90 1b 2d MOV.W 0x1b,0x2d
32 04 REPEAT #0x04
33 a7 10 LEFT.0 #0x1,R3,[0x10]
35 16 UNTIL
36 18 CALL 0x7c
37 90 1d 2d MOV.W 0x1d,0x2d
3a 18 CALL 0x7c
3b 19 CALL 0x74
3c 90 1d 1f MOV.W 0x1d,0x1f
3f b0 62 1b 1f VADD [0x2],0x1b,0x1f
43 97 7f 1f AND #0x7f,0x1f
46 52 1f 2d 69 JMP.W NE,0x1f,0x2d,0x69
4a c4 01 58 WFSM.L #0x01,{58}
4d 95 01 01 1d ADD.W #0x0101,0x1d
51 97 03 1d AND #0x03,0x1d
54 53 03 0f 1d 37 JMP.W NE,#0x030f,0x1d,0x37
59 91 00 00 1d MOV.W #0x0000,0x1d
5d bc 5b FSM {5b}
5f 95 01 01 1b ADD.W #0x0101,0x1b
63 53 0f 0f 1b 2f JMP.W NE,#0x0f0f,0x1b,EXPERIMENT
68 64 SET PT
69 5c END
6a ; --------------------------------------------------------------------------------------
6a ; Subroutine
6a ; --------------------------------------------------------------------------------------
6a bc 4e FSM {4e}
6c bc 5a FSM {5a}
6e 10 REPEAT #0x10
6f c4 ff 43 WFSM.L #0xff,{43}
72 16 UNTIL
73 2c RET
74 ; --------------------------------------------------------------------------------------
74 ; Subroutine
74 ; --------------------------------------------------------------------------------------
74 1a CALL 0x6a
75 bc 62 FSM {62}
77 da 92 1f 30 CHN_RCV {S.TYPVAL:30},0x1f
7b 2c RET
7c ; --------------------------------------------------------------------------------------
7c ; Subroutine
7c ; --------------------------------------------------------------------------------------
7c 1a CALL 0x6a
7d da 90 1f 40 CHN_SND 0x1f,{S.TYPVAL:40}
81 bc 66 FSM {66}
83 2c RET
P11OF0 TEST_BRANCH_ADDER P1FOS2 EXPECTED P2DOS2 RESULT P1BOS2 PC P1DOS2 INSTRUCTION 2F 00 18 1F 00 00 00 00 7C 74 6A 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 90 1B 2D 04 A7 10 16 18 90 1D 2D 18 19 90 1D 1F B0 62 1B 1F 97 7F 1F 52 1F 2D 69 C4 01 58 95 01 01 1D 97 03 1D 53 03 0F 1D 37 91 00 00 1D BC 5B 95 01 01 1B 53 0F 0F 1B 2F 64 5C BC 4E BC 5A 10 C4 FF 43 16 2C 1A BC 62 DA 92 1F 30 2C 1A DA 90 1F 40 BC 66 2C«nul»