|
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: 521 (0x209)
Types: TextFile, VAL
Names: »NEW_ALU_SHIFTED.VAL«
└─⟦24d56d853⟧ Bits:30000744 8mm tape, Rational 1000, DFS, D_12_6_5 SEQ293
└─⟦this⟧ »NEW_ALU_SHIFTED.VAL«
└─⟦9031b0687⟧ Bits:30000407 8mm tape, Rational 1000, DFS, D_12_7_3
└─⟦this⟧ »NEW_ALU_SHIFTED.VAL«
10 ; --------------------------------------------------------------------------------------
10 ; Hash 18a72f6a21e25733 (no python module)
10 ; --------------------------------------------------------------------------------------
10 PC_:
10 30 .CODE EXPERIMENT
11 R1_:
11 00 .DATA 0x0 ; P11OF0 ALU_SHIFTED_PASSED
; P11OF1 SHIFT_RIGHT
12 R2_:
12 1f .DATA 0x1f
13 R3_:
13 27 .DATA 0x27
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 47 .CODE 0x47
19 61 .CODE 0x61
1a 04 .DATA 0x4
1b 0f .DATA 0xf
1c fe .DATA 0xfe
1d 07 .DATA 0x7
1e 83 .DATA 0x83
1f 00 .DATA 0x0 ; P1FOS8 EXPECT
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 ; P27OS8 RESULT
28 00 .DATA 0x0
29 00 .DATA 0x0
2a 00 .DATA 0x0
2b 00 .DATA 0x0
2c 00 .DATA 0x0
2d 00 .DATA 0x0
2e 00 .DATA 0x0
2f 00 .DATA 0x0
30 EXPERIMENT:
30 18 CALL 0x47
31 8f 08 1a MOV #0x08,0x1a
34 18 CALL 0x47
35 8f 0c 1a MOV #0x0c,0x1a
38 18 CALL 0x47
39 8f 10 1a MOV #0x10,0x1a
3c 18 CALL 0x47
3d 8f 14 1a MOV #0x14,0x1a
40 18 CALL 0x47
41 8f 18 1a MOV #0x18,0x1a
44 18 CALL 0x47
45 64 SET PT
46 5c END
47 ; --------------------------------------------------------------------------------------
47 ; Subroutine
47 ; --------------------------------------------------------------------------------------
47 8f 07 1d MOV #0x07,0x1d
4a 19 CALL 0x61
4b a6 08 1f LEFT.0 #0x1,0x1f,[0x8]
4e 6a CLR PX
4f b1 28 46 VJMP NE,[0x8],R2,R3,0x46
52 8f 87 1d MOV #0x87,0x1d
55 19 CALL 0x61
56 a8 e8 1f SR.0 #0x8,0x1f,[0x8]
59 a8 e8 1f SR.0 #0x8,0x1f,[0x8]
5c 66 SET PX
5d b1 28 46 VJMP NE,[0x8],R2,R3,0x46
60 2c RET
61 ; --------------------------------------------------------------------------------------
61 ; Subroutine
61 ; --------------------------------------------------------------------------------------
61 c8 ff c0 2b WFSM.W #0xffc0,{2b}
65 da 40 1a 3b CHN_SND 0x1a,{V.UIR:3b}
69 bc 4b FSM {4b}
6b bc 13 FSM {13}
6d bc 5b FSM {5b}
6f da 32 1f 39 CHN_RCV {TV.WDR:39},0x1f
73 ae 88 1f VINV [0x8],0x1f
76 bc 5c FSM {5c}
78 da 33 39 CHN_RCV {TV.WDR:39},@R3
7b af 88 VINV [0x8],R3
7d 2c RET
P11OF0 ALU_SHIFTED_PASSED\r P11OF1 SHIFT_RIGHT\r P1FOS8 EXPECT\r P27OS8 RESULT\r \r 30\r 00\r 1F\r 27\r 00\r 00\r 00\r 00\r \r 47\r 61\r 04\r 0F\r FE\r 07\r 83\r 00\r 00\r 00\r 00\r 00\r 00\r 00\r 00\r 00\r 00\r 00\r 00\r 00\r 00\r 00\r 00\r 00\r 18\r 8F\r 08\r 1A\r 18\r 8F\r 0C\r 1A\r 18\r 8F\r 10\r 1A\r 18\r 8F\r 14\r 1A\r 18\r 8F\r 18\r 1A\r 18\r 64\r 5C\r 8F\r 07\r 1D\r 19\r A6\r 08\r 1F\r 6A\r B1\r 28\r 46\r 8F\r 87\r 1D\r 19\r A8\r E8\r 1F\r A8\r E8\r 1F\r 66\r B1\r 28\r 46\r 2C\r C8\r FF\r C0\r 2B\r DA\r 40\r 1A\r 3B\r BC\r 4B\r BC\r 13\r BC\r 5B\r DA\r 32\r 1F\r 39\r AE\r 88\r 1F\r BC\r 5C\r DA\r 33\r 39\r AF\r 88\r 2C\r